3 * Bacula Director -- User Agent Status Command
5 * Kern Sibbald, August MMI
11 Copyright (C) 2000-2003 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 struct s_last_job last_job;
37 static void print_jobs_scheduled(UAContext *ua);
38 static void do_storage_status(UAContext *ua, STORE *store);
39 static void do_client_status(UAContext *ua, CLIENT *client);
40 static void do_director_status(UAContext *ua, char *cmd);
41 static void do_all_status(UAContext *ua, char *cmd);
46 int status_cmd(UAContext *ua, char *cmd)
55 Dmsg1(20, "status:%s:\n", cmd);
57 for (i=1; i<ua->argc; i++) {
58 if (strcasecmp(ua->argk[i], _("all")) == 0) {
59 do_all_status(ua, cmd);
61 } else if (strcasecmp(ua->argk[i], _("dir")) == 0 ||
62 strcasecmp(ua->argk[i], _("director")) == 0) {
63 do_director_status(ua, cmd);
65 } else if (strcasecmp(ua->argk[i], _("client")) == 0) {
66 client = get_client_resource(ua);
68 do_client_status(ua, client);
72 store = get_storage_resource(ua, 0);
74 do_storage_status(ua, store);
79 /* If no args, ask for status type */
81 start_prompt(ua, _("Status available for:\n"));
82 add_prompt(ua, _("Director"));
83 add_prompt(ua, _("Storage"));
84 add_prompt(ua, _("Client"));
85 add_prompt(ua, _("All"));
86 Dmsg0(20, "do_prompt: select daemon\n");
87 if ((item=do_prompt(ua, "", _("Select daemon type for status"), cmd, MAX_NAME_LENGTH)) < 0) {
90 Dmsg1(20, "item=%d\n", item);
92 case 0: /* Director */
93 do_director_status(ua, cmd);
96 store = select_storage_resource(ua);
98 do_storage_status(ua, store);
102 client = select_client_resource(ua);
104 do_client_status(ua, client);
108 do_all_status(ua, cmd);
117 static void do_all_status(UAContext *ua, char *cmd)
119 STORE *store, **unique_store;
120 CLIENT *client, **unique_client;
123 do_director_status(ua, cmd);
125 /* Count Storage items */
128 for (i=0; (store = (STORE *)GetNextRes(R_STORAGE, (RES *)store)); i++)
130 unique_store = (STORE **) malloc(i * sizeof(STORE));
131 /* Find Unique Storage address/port */
132 store = (STORE *)GetNextRes(R_STORAGE, NULL);
134 unique_store[i++] = store;
135 while ((store = (STORE *)GetNextRes(R_STORAGE, (RES *)store))) {
137 for (j=0; j<i; j++) {
138 if (strcmp(unique_store[j]->address, store->address) == 0 &&
139 unique_store[j]->SDport == store->SDport) {
145 unique_store[i++] = store;
146 Dmsg2(40, "Stuffing: %s:%d\n", store->address, store->SDport);
151 /* Call each unique Storage daemon */
152 for (j=0; j<i; j++) {
153 do_storage_status(ua, unique_store[j]);
157 /* Count Client items */
160 for (i=0; (client = (CLIENT *)GetNextRes(R_CLIENT, (RES *)client)); i++)
162 unique_client = (CLIENT **)malloc(i * sizeof(CLIENT));
163 /* Find Unique Client address/port */
164 client = (CLIENT *)GetNextRes(R_CLIENT, NULL);
166 unique_client[i++] = client;
167 while ((client = (CLIENT *)GetNextRes(R_CLIENT, (RES *)client))) {
169 for (j=0; j<i; j++) {
170 if (strcmp(unique_client[j]->address, client->address) == 0 &&
171 unique_client[j]->FDport == client->FDport) {
177 unique_client[i++] = client;
178 Dmsg2(40, "Stuffing: %s:%d\n", client->address, client->FDport);
183 /* Call each unique File daemon */
184 for (j=0; j<i; j++) {
185 do_client_status(ua, unique_client[j]);
191 static void do_director_status(UAContext *ua, char *cmd)
196 char dt[MAX_TIME_LENGTH], b1[30], b2[30];
197 int pool_mem = FALSE;
199 bsendmsg(ua, "%s Version: " VERSION " (" BDATE ") %s %s %s\n", my_name,
200 HOST_OS, DISTNAME, DISTVER);
201 bstrftime(dt, sizeof(dt), daemon_start_time);
202 bsendmsg(ua, _("Daemon started %s, %d Job%s run.\n"), dt, last_job.NumJobs,
203 last_job.NumJobs == 1 ? "" : "s");
204 if (last_job.NumJobs > 0) {
207 bstrftime(dt, sizeof(dt), last_job.end_time);
208 bsendmsg(ua, _("Last Job %s finished at %s\n"), last_job.Job, dt);
209 jobstatus_to_ascii(last_job.JobStatus, termstat, sizeof(termstat));
211 bsendmsg(ua, _(" Files=%s Bytes=%s Termination Status=%s\n"),
212 edit_uint64_with_commas(last_job.JobFiles, b1),
213 edit_uint64_with_commas(last_job.JobBytes, b2),
217 for (jcr=NULL; (jcr=get_next_jcr(jcr)); njobs++) {
218 if (jcr->JobId == 0) { /* this is us */
219 bstrftime(dt, sizeof(dt), jcr->start_time);
220 bsendmsg(ua, _("Console connected at %s\n"), dt);
221 free_locked_jcr(jcr);
225 switch (jcr->JobStatus) {
227 msg = _("is waiting execution");
230 msg = _("is running");
233 msg = _("is blocked");
236 msg = _("has terminated");
238 case JS_ErrorTerminated:
239 msg = _("has erred");
242 msg = _("has errors");
245 msg = _("has a fatal error");
248 msg = _("has verify differences");
251 msg = _("has been canceled");
254 msg = (char *) get_pool_memory(PM_FNAME);
255 Mmsg(&msg, _("is waiting on Client %s"), jcr->client->hdr.name);
259 msg = (char *) get_pool_memory(PM_FNAME);
260 Mmsg(&msg, _("is waiting on Storage %s"), jcr->store->hdr.name);
263 case JS_WaitStoreRes:
264 msg = _("is waiting on max Storage jobs");
266 case JS_WaitClientRes:
267 msg = _("is waiting on max Client jobs");
270 msg = _("is waiting on max Job jobs");
273 msg = _("is waiting on max total jobs");
275 case JS_WaitStartTime:
276 msg = _("is waiting for its start time");
278 case JS_WaitPriority:
279 msg = _("is waiting for higher priority jobs to finish");
283 msg = (char *) get_pool_memory(PM_FNAME);
284 Mmsg(&msg, _("is in unknown state %c"), jcr->JobStatus);
289 * Now report Storage daemon status code
291 switch (jcr->SDJobStatus) {
294 free_pool_memory(msg);
297 msg = _("is waiting for a mount request");
301 free_pool_memory(msg);
304 msg = _("is waiting for an appendable Volume");
308 msg = (char *) get_pool_memory(PM_FNAME);
311 Mmsg(&msg, _("is waiting for Client %s to connect to Storage %s"),
312 jcr->client->hdr.name, jcr->store->hdr.name);
315 bsendmsg(ua, _("JobId %d Job %s %s.\n"), jcr->JobId, jcr->Job, msg);
317 free_pool_memory(msg);
320 free_locked_jcr(jcr);
325 bsendmsg(ua, _("No jobs are running.\n"));
327 print_jobs_scheduled(ua);
328 bsendmsg(ua, "====\n");
331 static void do_storage_status(UAContext *ua, STORE *store)
335 ua->jcr->store = store;
336 /* Try connecting for up to 15 seconds */
337 bsendmsg(ua, _("Connecting to Storage daemon %s at %s:%d\n"),
338 store->hdr.name, store->address, store->SDport);
339 if (!connect_to_storage_daemon(ua->jcr, 1, 15, 0)) {
340 bsendmsg(ua, _("\nFailed to connect to Storage daemon %s.\n====\n"),
342 if (ua->jcr->store_bsock) {
343 bnet_close(ua->jcr->store_bsock);
344 ua->jcr->store_bsock = NULL;
348 Dmsg0(20, _("Connected to storage daemon\n"));
349 sd = ua->jcr->store_bsock;
350 bnet_fsend(sd, "status");
351 while (bnet_recv(sd) >= 0) {
352 bsendmsg(ua, "%s", sd->msg);
354 bnet_sig(sd, BNET_TERMINATE);
356 ua->jcr->store_bsock = NULL;
360 static void do_client_status(UAContext *ua, CLIENT *client)
364 /* Connect to File daemon */
366 ua->jcr->client = client;
367 /* Release any old dummy key */
368 if (ua->jcr->sd_auth_key) {
369 free(ua->jcr->sd_auth_key);
371 /* Create a new dummy SD auth key */
372 ua->jcr->sd_auth_key = bstrdup("dummy");
374 /* Try to connect for 15 seconds */
375 bsendmsg(ua, _("Connecting to Client %s at %s:%d\n"),
376 client->hdr.name, client->address, client->FDport);
377 if (!connect_to_file_daemon(ua->jcr, 1, 15, 0)) {
378 bsendmsg(ua, _("Failed to connect to Client %s.\n====\n"),
380 if (ua->jcr->file_bsock) {
381 bnet_close(ua->jcr->file_bsock);
382 ua->jcr->file_bsock = NULL;
386 Dmsg0(20, _("Connected to file daemon\n"));
387 fd = ua->jcr->file_bsock;
388 bnet_fsend(fd, "status");
389 while (bnet_recv(fd) >= 0) {
390 bsendmsg(ua, "%s", fd->msg);
392 bnet_sig(fd, BNET_TERMINATE);
394 ua->jcr->file_bsock = NULL;
399 static void prt_runhdr(UAContext *ua)
401 bsendmsg(ua, _("\nScheduled Jobs:\n"));
402 bsendmsg(ua, _("Level Type Scheduled Name Volume\n"));
403 bsendmsg(ua, _("===============================================================================\n"));
406 static void prt_runtime(UAContext *ua, JOB *job, int level, time_t runtime, POOL *pool)
408 char dt[MAX_TIME_LENGTH];
410 bool close_db = false;
413 memset(&mr, 0, sizeof(mr));
414 if (job->JobType == JT_BACKUP) {
416 ok = complete_jcr_for_job(jcr, job, pool);
418 close_db = true; /* new db opened, remember to close it */
421 ok = find_next_volume_for_append(jcr, &mr, 0);
424 bstrncpy(mr.VolumeName, "*unknown*", sizeof(mr.VolumeName));
427 bstrftime(dt, sizeof(dt), runtime);
428 bsendmsg(ua, _("%-14s %-8s %-18s %-18s %s\n"),
429 level_to_str(level), job_type_to_str(job->JobType), dt, job->hdr.name,
432 db_close_database(jcr, jcr->db);
434 jcr->db = ua->db; /* restore ua db to jcr */
439 * Find all jobs to be run this hour
442 static void print_jobs_scheduled(UAContext *ua)
447 bool hdr_printed = false;
450 Dmsg0(200, "enter find_runs()\n");
452 /* Loop through all jobs */
454 for (job=NULL; (job=(JOB *)GetNextRes(R_JOB, (RES *)job)); ) {
455 for (run=NULL; (run = find_next_run(run, job, runtime)); ) {
464 prt_runtime(ua, job, level, runtime, run->pool);
467 } /* end for loop over resources */
469 Dmsg0(200, "Leave find_runs()\n");