3 * Bacula Director -- User Agent Status Command
5 * Kern Sibbald, August MMI
11 Copyright (C) 2000-2004 Kern Sibbald and John Walker
13 This program is free software; you can redistribute it and/or
14 modify it under the terms of the GNU General Public License as
15 published by the Free Software Foundation; either version 2 of
16 the License, or (at your option) any later version.
18 This program is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 General Public License for more details.
23 You should have received a copy of the GNU General Public
24 License along with this program; if not, write to the Free
25 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
33 extern char my_name[];
34 extern time_t daemon_start_time;
35 extern int num_jobs_run;
37 static void list_scheduled_jobs(UAContext *ua);
38 static void list_running_jobs(UAContext *ua);
39 static void list_terminated_jobs(UAContext *ua);
40 static void do_storage_status(UAContext *ua, STORE *store);
41 static void do_client_status(UAContext *ua, CLIENT *client);
42 static void do_director_status(UAContext *ua);
43 static void do_all_status(UAContext *ua);
48 int status_cmd(UAContext *ua, const char *cmd)
57 Dmsg1(20, "status:%s:\n", cmd);
59 for (i=1; i<ua->argc; i++) {
60 if (strcasecmp(ua->argk[i], _("all")) == 0) {
63 } else if (strcasecmp(ua->argk[i], _("dir")) == 0 ||
64 strcasecmp(ua->argk[i], _("director")) == 0) {
65 do_director_status(ua);
67 } else if (strcasecmp(ua->argk[i], _("client")) == 0) {
68 client = get_client_resource(ua);
70 do_client_status(ua, client);
74 store = get_storage_resource(ua, 0);
76 do_storage_status(ua, store);
81 /* If no args, ask for status type */
83 char prmt[MAX_NAME_LENGTH];
85 start_prompt(ua, _("Status available for:\n"));
86 add_prompt(ua, _("Director"));
87 add_prompt(ua, _("Storage"));
88 add_prompt(ua, _("Client"));
89 add_prompt(ua, _("All"));
90 Dmsg0(20, "do_prompt: select daemon\n");
91 if ((item=do_prompt(ua, "", _("Select daemon type for status"), prmt, sizeof(prmt))) < 0) {
94 Dmsg1(20, "item=%d\n", item);
96 case 0: /* Director */
97 do_director_status(ua);
100 store = select_storage_resource(ua);
102 do_storage_status(ua, store);
106 client = select_client_resource(ua);
108 do_client_status(ua, client);
121 static void do_all_status(UAContext *ua)
123 STORE *store, **unique_store;
124 CLIENT *client, **unique_client;
128 do_director_status(ua);
130 /* Count Storage items */
133 foreach_res(store, R_STORAGE) {
136 unique_store = (STORE **) malloc(i * sizeof(STORE));
137 /* Find Unique Storage address/port */
139 foreach_res(store, R_STORAGE) {
141 if (!acl_access_ok(ua, Storage_ACL, store->hdr.name)) {
144 for (j=0; j<i; j++) {
145 if (strcmp(unique_store[j]->address, store->address) == 0 &&
146 unique_store[j]->SDport == store->SDport) {
152 unique_store[i++] = store;
153 Dmsg2(40, "Stuffing: %s:%d\n", store->address, store->SDport);
158 /* Call each unique Storage daemon */
159 for (j=0; j<i; j++) {
160 do_storage_status(ua, unique_store[j]);
164 /* Count Client items */
167 foreach_res(client, R_CLIENT) {
170 unique_client = (CLIENT **)malloc(i * sizeof(CLIENT));
171 /* Find Unique Client address/port */
173 foreach_res(client, R_CLIENT) {
175 if (!acl_access_ok(ua, Client_ACL, client->hdr.name)) {
178 for (j=0; j<i; j++) {
179 if (strcmp(unique_client[j]->address, client->address) == 0 &&
180 unique_client[j]->FDport == client->FDport) {
186 unique_client[i++] = client;
187 Dmsg2(40, "Stuffing: %s:%d\n", client->address, client->FDport);
192 /* Call each unique File daemon */
193 for (j=0; j<i; j++) {
194 do_client_status(ua, unique_client[j]);
200 static void do_director_status(UAContext *ua)
202 char dt[MAX_TIME_LENGTH];
204 bsendmsg(ua, "%s Version: " VERSION " (" BDATE ") %s %s %s\n", my_name,
205 HOST_OS, DISTNAME, DISTVER);
206 bstrftime_nc(dt, sizeof(dt), daemon_start_time);
207 bsendmsg(ua, _("Daemon started %s, %d Job%s run since started.\n"),
208 dt, num_jobs_run, num_jobs_run == 1 ? "" : "s");
210 * List scheduled Jobs
212 list_scheduled_jobs(ua);
217 list_running_jobs(ua);
220 * List terminated jobs
222 list_terminated_jobs(ua);
223 bsendmsg(ua, "====\n");
226 static void do_storage_status(UAContext *ua, STORE *store)
230 ua->jcr->store = store;
231 /* Try connecting for up to 15 seconds */
232 bsendmsg(ua, _("Connecting to Storage daemon %s at %s:%d\n"),
233 store->hdr.name, store->address, store->SDport);
234 if (!connect_to_storage_daemon(ua->jcr, 1, 15, 0)) {
235 bsendmsg(ua, _("\nFailed to connect to Storage daemon %s.\n====\n"),
237 if (ua->jcr->store_bsock) {
238 bnet_close(ua->jcr->store_bsock);
239 ua->jcr->store_bsock = NULL;
243 Dmsg0(20, _("Connected to storage daemon\n"));
244 sd = ua->jcr->store_bsock;
245 bnet_fsend(sd, "status");
246 while (bnet_recv(sd) >= 0) {
247 bsendmsg(ua, "%s", sd->msg);
249 bnet_sig(sd, BNET_TERMINATE);
251 ua->jcr->store_bsock = NULL;
255 static void do_client_status(UAContext *ua, CLIENT *client)
259 /* Connect to File daemon */
261 ua->jcr->client = client;
262 /* Release any old dummy key */
263 if (ua->jcr->sd_auth_key) {
264 free(ua->jcr->sd_auth_key);
266 /* Create a new dummy SD auth key */
267 ua->jcr->sd_auth_key = bstrdup("dummy");
269 /* Try to connect for 15 seconds */
270 bsendmsg(ua, _("Connecting to Client %s at %s:%d\n"),
271 client->hdr.name, client->address, client->FDport);
272 if (!connect_to_file_daemon(ua->jcr, 1, 15, 0)) {
273 bsendmsg(ua, _("Failed to connect to Client %s.\n====\n"),
275 if (ua->jcr->file_bsock) {
276 bnet_close(ua->jcr->file_bsock);
277 ua->jcr->file_bsock = NULL;
281 Dmsg0(20, _("Connected to file daemon\n"));
282 fd = ua->jcr->file_bsock;
283 bnet_fsend(fd, "status");
284 while (bnet_recv(fd) >= 0) {
285 bsendmsg(ua, "%s", fd->msg);
287 bnet_sig(fd, BNET_TERMINATE);
289 ua->jcr->file_bsock = NULL;
294 static void prt_runhdr(UAContext *ua)
296 bsendmsg(ua, _("\nScheduled Jobs:\n"));
297 bsendmsg(ua, _("Level Type Scheduled Name Volume\n"));
298 bsendmsg(ua, _("===============================================================================\n"));
301 static void prt_runtime(UAContext *ua, JOB *job, int level, time_t runtime, POOL *pool)
303 char dt[MAX_TIME_LENGTH];
304 const char *level_ptr;
306 bool close_db = false;
309 memset(&mr, 0, sizeof(mr));
310 if (job->JobType == JT_BACKUP) {
312 ok = complete_jcr_for_job(jcr, job, pool);
314 close_db = true; /* new db opened, remember to close it */
317 ok = find_next_volume_for_append(jcr, &mr, 0);
320 bstrncpy(mr.VolumeName, "*unknown*", sizeof(mr.VolumeName));
323 bstrftime_nc(dt, sizeof(dt), runtime);
324 switch (job->JobType) {
330 level_ptr = level_to_str(level);
333 bsendmsg(ua, _("%-14s %-8s %-18s %-18s %s\n"),
334 level_ptr, job_type_to_str(job->JobType), dt, job->hdr.name, mr.VolumeName);
336 db_close_database(jcr, jcr->db);
338 jcr->db = ua->db; /* restore ua db to jcr */
343 * Find all jobs to be run in roughly the
346 static void list_scheduled_jobs(UAContext *ua)
351 int level, num_jobs = 0;
352 bool hdr_printed = false;
354 Dmsg0(200, "enter list_sched_jobs()\n");
356 /* Loop through all jobs */
358 foreach_res(job, R_JOB) {
359 if (!acl_access_ok(ua, Job_ACL, job->hdr.name)) {
362 for (run=NULL; (run = find_next_run(run, job, runtime)); ) {
371 prt_runtime(ua, job, level, runtime, run->pool);
375 } /* end for loop over resources */
378 bsendmsg(ua, _("No Scheduled Jobs.\n"));
380 bsendmsg(ua, "====\n");
381 Dmsg0(200, "Leave list_sched_jobs_runs()\n");
384 static void list_running_jobs(UAContext *ua)
389 char *emsg; /* edited message */
390 char dt[MAX_TIME_LENGTH];
392 bool pool_mem = false;
394 Dmsg0(200, "enter list_run_jobs()\n");
395 bsendmsg(ua, _("Running Jobs:\n"));
399 if (jcr->JobId == 0) { /* this is us */
400 /* this is a console or other control job. We only show console
401 * jobs in the status output.
403 if (jcr->JobType == JT_CONSOLE) {
404 bstrftime_nc(dt, sizeof(dt), jcr->start_time);
405 bsendmsg(ua, _("Console connected at %s\n"), dt);
409 free_locked_jcr(jcr);
413 /* Note the following message is used in regress -- don't change */
414 bsendmsg(ua, _("No Jobs running.\n====\n"));
415 Dmsg0(200, "leave list_run_jobs()\n");
419 bsendmsg(ua, _(" JobId Level Name Status\n"));
420 bsendmsg(ua, _("======================================================================\n"));
422 if (jcr->JobId == 0 || !acl_access_ok(ua, Job_ACL, jcr->job->hdr.name)) {
423 free_locked_jcr(jcr);
427 switch (jcr->JobStatus) {
429 msg = _("is waiting execution");
432 msg = _("is running");
435 msg = _("is blocked");
438 msg = _("has terminated");
440 case JS_ErrorTerminated:
441 msg = _("has erred");
444 msg = _("has errors");
447 msg = _("has a fatal error");
450 msg = _("has verify differences");
453 msg = _("has been canceled");
456 emsg = (char *) get_pool_memory(PM_FNAME);
457 Mmsg(&emsg, _("is waiting on Client %s"), jcr->client->hdr.name);
462 emsg = (char *) get_pool_memory(PM_FNAME);
463 Mmsg(&emsg, _("is waiting on Storage %s"), jcr->store->hdr.name);
467 case JS_WaitStoreRes:
468 msg = _("is waiting on max Storage jobs");
470 case JS_WaitClientRes:
471 msg = _("is waiting on max Client jobs");
474 msg = _("is waiting on max Job jobs");
477 msg = _("is waiting on max total jobs");
479 case JS_WaitStartTime:
480 msg = _("is waiting for its start time");
482 case JS_WaitPriority:
483 msg = _("is waiting for higher priority jobs to finish");
487 emsg = (char *) get_pool_memory(PM_FNAME);
488 Mmsg(&emsg, _("is in unknown state %c"), jcr->JobStatus);
494 * Now report Storage daemon status code
496 switch (jcr->SDJobStatus) {
499 free_pool_memory(emsg);
502 msg = _("is waiting for a mount request");
506 free_pool_memory(emsg);
509 msg = _("is waiting for an appendable Volume");
513 emsg = (char *) get_pool_memory(PM_FNAME);
516 Mmsg(&emsg, _("is waiting for Client %s to connect to Storage %s"),
517 jcr->client->hdr.name, jcr->store->hdr.name);
521 switch (jcr->JobType) {
524 bstrncpy(level, " ", sizeof(level));
527 bstrncpy(level, level_to_str(jcr->JobLevel), sizeof(level));
532 bsendmsg(ua, _("%6d %-6s %-20s %s\n"),
539 free_pool_memory(emsg);
542 free_locked_jcr(jcr);
545 bsendmsg(ua, "====\n");
546 Dmsg0(200, "leave list_run_jobs()\n");
549 static void list_terminated_jobs(UAContext *ua)
551 char dt[MAX_TIME_LENGTH], b1[30], b2[30];
554 if (last_jobs->empty()) {
555 bsendmsg(ua, _("No Terminated Jobs.\n"));
558 lock_last_jobs_list();
559 struct s_last_job *je;
560 bsendmsg(ua, _("\nTerminated Jobs:\n"));
561 bsendmsg(ua, _(" JobId Level Files Bytes Status Finished Name \n"));
562 bsendmsg(ua, _("========================================================================\n"));
563 foreach_dlist(je, last_jobs) {
564 char JobName[MAX_NAME_LENGTH];
565 const char *termstat;
567 bstrftime_nc(dt, sizeof(dt), je->end_time);
568 switch (je->JobType) {
571 bstrncpy(level, " ", sizeof(level));
574 bstrncpy(level, level_to_str(je->JobLevel), sizeof(level));
578 switch (je->JobStatus) {
580 termstat = "Created";
583 case JS_ErrorTerminated:
599 bstrncpy(JobName, je->Job, sizeof(JobName));
600 /* There are three periods after the Job name */
602 for (int i=0; i<3; i++) {
603 if ((p=strrchr(JobName, '.')) != NULL) {
607 bsendmsg(ua, _("%6d %-6s %8s %14s %-7s %-8s %s\n"),
610 edit_uint64_with_commas(je->JobFiles, b1),
611 edit_uint64_with_commas(je->JobBytes, b2),
616 unlock_last_jobs_list();