]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/status.c
Massive SD calling sequence reorganization
[bacula/bacula] / bacula / src / stored / status.c
1 /*
2  *  This file handles the status command
3  *
4  *     Kern Sibbald, May MMIII
5  *
6  *   Version $Id$
7  *  
8  */
9 /*
10    Copyright (C) 2000-2004 Kern Sibbald and John Walker
11
12    This program is free software; you can redistribute it and/or
13    modify it under the terms of the GNU General Public License as
14    published by the Free Software Foundation; either version 2 of
15    the License, or (at your option) any later version.
16
17    This program is distributed in the hope that it will be useful,
18    but WITHOUT ANY WARRANTY; without even the implied warranty of
19    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20    General Public License for more details.
21
22    You should have received a copy of the GNU General Public
23    License along with this program; if not, write to the Free
24    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
25    MA 02111-1307, USA.
26
27  */
28
29 #include "bacula.h"
30 #include "stored.h"
31
32 /* Exported variables */
33
34 /* Imported variables */
35 extern BSOCK *filed_chan;
36 extern int r_first, r_last;
37 extern struct s_res resources[];
38 extern char my_name[];
39 extern time_t daemon_start_time;
40 extern int num_jobs_run;
41
42
43 /* Static variables */
44 static char qstatus[] = ".status %127s\n";
45
46 static char OKqstatus[]   = "3000 OK .status\n";
47 static char DotStatusJob[] = "JobId=%d JobStatus=%c JobErrors=%d\n";
48
49
50 /* Forward referenced functions */
51 static void send_blocked_status(JCR *jcr, DEVICE *dev);
52 static void list_terminated_jobs(void *arg);
53 static void list_running_jobs(BSOCK *user);
54 static void sendit(const char *msg, int len, void *arg);
55 static const char *level_to_str(int level);
56
57
58 /*
59  * Status command from Director
60  */
61 bool status_cmd(JCR *jcr)
62 {
63    DEVRES *device;
64    DEVICE *dev;
65    BSOCK *user = jcr->dir_bsock;
66    char dt[MAX_TIME_LENGTH];
67    char b1[30], b2[30], b3[30];
68    int bpb;
69
70    bnet_fsend(user, "\n%s Version: " VERSION " (" BDATE ") %s %s %s\n", my_name,
71               HOST_OS, DISTNAME, DISTVER);
72    bstrftime_nc(dt, sizeof(dt), daemon_start_time);
73    bnet_fsend(user, _("Daemon started %s, %d Job%s run since started.\n"), dt, num_jobs_run,
74         num_jobs_run == 1 ? "" : "s");
75    if (debug_level > 0) {
76       char b1[35], b2[35], b3[35], b4[35];
77       bnet_fsend(user, _(" Heap: bytes=%s max_bytes=%s bufs=%s max_bufs=%s\n"),
78             edit_uint64_with_commas(sm_bytes, b1),
79             edit_uint64_with_commas(sm_max_bytes, b2),
80             edit_uint64_with_commas(sm_buffers, b3),
81             edit_uint64_with_commas(sm_max_buffers, b4));
82    }
83
84    /*
85     * List running jobs
86     */
87    list_running_jobs(user);
88
89    /*
90     * List terminated jobs
91     */
92    list_terminated_jobs(user);
93
94    /*
95     * List devices
96     */
97    bnet_fsend(user, _("\nDevice status:\n"));
98    LockRes();
99    foreach_res(device, R_DEVICE) {
100       for (dev=device->dev; dev; dev=dev->next) {
101          if (dev_state(dev, ST_OPENED)) {
102             if (dev_state(dev, ST_LABEL)) {
103                bnet_fsend(user, _("Device \"%s\" is mounted with Volume \"%s\"\n"), 
104                   dev_name(dev), dev->VolHdr.VolName);
105             } else {
106                bnet_fsend(user, _("Device \"%s\" open but no Bacula volume is mounted.\n"), dev_name(dev));
107             }
108             send_blocked_status(jcr, dev);
109             if (dev_state(dev, ST_APPEND)) {
110                bpb = dev->VolCatInfo.VolCatBlocks;
111                if (bpb <= 0) {
112                   bpb = 1;
113                }
114                bpb = dev->VolCatInfo.VolCatBytes / bpb;
115                bnet_fsend(user, _("    Total Bytes=%s Blocks=%s Bytes/block=%s\n"),
116                   edit_uint64_with_commas(dev->VolCatInfo.VolCatBytes, b1),
117                   edit_uint64_with_commas(dev->VolCatInfo.VolCatBlocks, b2), 
118                   edit_uint64_with_commas(bpb, b3));
119             } else {  /* reading */
120                bpb = dev->VolCatInfo.VolCatReads;
121                if (bpb <= 0) {
122                   bpb = 1;
123                }
124                if (dev->VolCatInfo.VolCatRBytes > 0) {
125                   bpb = dev->VolCatInfo.VolCatRBytes / bpb;
126                } else {
127                   bpb = 0;
128                }
129                bnet_fsend(user, _("    Total Bytes Read=%s Blocks Read=%s Bytes/block=%s\n"),
130                   edit_uint64_with_commas(dev->VolCatInfo.VolCatRBytes, b1),
131                   edit_uint64_with_commas(dev->VolCatInfo.VolCatReads, b2), 
132                   edit_uint64_with_commas(bpb, b3));
133             }
134             bnet_fsend(user, _("    Positioned at File=%s Block=%s\n"), 
135                edit_uint64_with_commas(dev->file, b1),
136                edit_uint64_with_commas(dev->block_num, b2));
137
138          } else {
139             bnet_fsend(user, _("Device \"%s\" is not open.\n"), dev_name(dev));
140             send_blocked_status(jcr, dev);
141          }
142       }
143    }
144    UnlockRes();
145
146
147 #ifdef xfull_status
148    bnet_fsend(user, "\n\n");
149    dump_resource(R_DEVICE, resources[R_DEVICE-r_first].res_head, sendit, user);
150 #endif
151    bnet_fsend(user, "====\n\n");
152
153    list_spool_stats(user);
154
155    bnet_sig(user, BNET_EOD);
156    return true;
157 }
158
159 static void send_blocked_status(JCR *jcr, DEVICE *dev) 
160 {
161    BSOCK *user = jcr->dir_bsock;
162    DCR *dcr = jcr->dcr;
163
164    switch (dev->dev_blocked) {
165    case BST_UNMOUNTED:
166       bnet_fsend(user, _("    Device is BLOCKED. User unmounted.\n"));
167       break;
168    case BST_UNMOUNTED_WAITING_FOR_SYSOP:
169       bnet_fsend(user, _("    Device is BLOCKED. User unmounted during wait for media/mount.\n"));
170       break;
171    case BST_WAITING_FOR_SYSOP:
172       if (jcr->JobStatus == JS_WaitMount) {
173          bnet_fsend(user, _("    Device is BLOCKED waiting for mount of volume \"%s\".\n"),
174             dcr->VolumeName);
175       } else {
176          bnet_fsend(user, _("    Device is BLOCKED waiting for appendable media.\n"));
177       }
178       break;
179    case BST_DOING_ACQUIRE:
180       bnet_fsend(user, _("    Device is being initialized.\n"));
181       break;
182    case BST_WRITING_LABEL:
183       bnet_fsend(user, _("    Device is blocked labeling a Volume.\n"));
184       break;
185    default:
186       break;
187    }
188    if (debug_level > 1) {
189       bnet_fsend(user, _("Configured device capabilities:\n"));
190       bnet_fsend(user, "%sEOF ", dev->capabilities & CAP_EOF ? "" : "!");
191       bnet_fsend(user, "%sBSR ", dev->capabilities & CAP_BSR ? "" : "!");
192       bnet_fsend(user, "%sBSF ", dev->capabilities & CAP_BSF ? "" : "!");
193       bnet_fsend(user, "%sFSR ", dev->capabilities & CAP_FSR ? "" : "!");
194       bnet_fsend(user, "%sFSF ", dev->capabilities & CAP_FSF ? "" : "!");
195       bnet_fsend(user, "%sEOM ", dev->capabilities & CAP_EOM ? "" : "!");
196       bnet_fsend(user, "%sREM ", dev->capabilities & CAP_REM ? "" : "!");
197       bnet_fsend(user, "%sRACCESS ", dev->capabilities & CAP_RACCESS ? "" : "!");
198       bnet_fsend(user, "%sAUTOMOUNT ", dev->capabilities & CAP_AUTOMOUNT ? "" : "!");
199       bnet_fsend(user, "%sLABEL ", dev->capabilities & CAP_LABEL ? "" : "!");
200       bnet_fsend(user, "%sANONVOLS ", dev->capabilities & CAP_ANONVOLS ? "" : "!");
201       bnet_fsend(user, "%sALWAYSOPEN ", dev->capabilities & CAP_ALWAYSOPEN ? "" : "!");
202       bnet_fsend(user, "\n");
203
204       bnet_fsend(user, _("Device status:\n"));
205       bnet_fsend(user, "%sOPENED ", dev->state & ST_OPENED ? "" : "!");
206       bnet_fsend(user, "%sTAPE ", dev->state & ST_TAPE ? "" : "!");
207       bnet_fsend(user, "%sLABEL ", dev->state & ST_LABEL ? "" : "!");
208       bnet_fsend(user, "%sMALLOC ", dev->state & ST_MALLOC ? "" : "!");
209       bnet_fsend(user, "%sAPPEND ", dev->state & ST_APPEND ? "" : "!");
210       bnet_fsend(user, "%sREAD ", dev->state & ST_READ ? "" : "!");
211       bnet_fsend(user, "%sEOT ", dev->state & ST_EOT ? "" : "!");
212       bnet_fsend(user, "%sWEOT ", dev->state & ST_WEOT ? "" : "!");
213       bnet_fsend(user, "%sEOF ", dev->state & ST_EOF ? "" : "!");
214       bnet_fsend(user, "%sNEXTVOL ", dev->state & ST_NEXTVOL ? "" : "!");
215       bnet_fsend(user, "%sSHORT ", dev->state & ST_SHORT ? "" : "!");
216       bnet_fsend(user, "\n");
217
218       bnet_fsend(user, _("Device parameters:\n"));
219       bnet_fsend(user, "Device name: %s\n", dev->dev_name);
220       bnet_fsend(user, "File=%u block=%u\n", dev->file, dev->block_num);
221       bnet_fsend(user, "Min block=%u Max block=%u\n", dev->min_block_size, dev->max_block_size);
222    }
223
224 }
225
226 static void list_running_jobs(BSOCK *user)
227 {
228    bool found = false;
229    int bps, sec;
230    JCR *jcr;
231    char JobName[MAX_NAME_LENGTH];
232    char b1[30], b2[30], b3[30];
233    
234    bnet_fsend(user, _("\nRunning Jobs:\n"));
235    lock_jcr_chain();
236    foreach_jcr(jcr) {
237       if (jcr->JobStatus == JS_WaitFD) {
238          bnet_fsend(user, _("%s Job %s waiting for Client connection.\n"),
239             job_type_to_str(jcr->JobType), jcr->Job);
240       }
241       if (jcr->device) {
242          bstrncpy(JobName, jcr->Job, sizeof(JobName));
243          /* There are three periods after the Job name */
244          char *p;
245          for (int i=0; i<3; i++) {
246             if ((p=strrchr(JobName, '.')) != NULL) {
247                *p = 0;
248             }
249          }
250          bnet_fsend(user, _("%s %s job %s JobId=%d Volume=\"%s\" device=\"%s\"\n"), 
251                    job_level_to_str(jcr->JobLevel),
252                    job_type_to_str(jcr->JobType),
253                    JobName,
254                    jcr->JobId,
255                    jcr->dcr->VolumeName,
256                    jcr->device->device_name);
257          sec = time(NULL) - jcr->run_time;
258          if (sec <= 0) {
259             sec = 1;
260          }
261          bps = jcr->JobBytes / sec;
262          bnet_fsend(user, _("    Files=%s Bytes=%s Bytes/sec=%s\n"), 
263             edit_uint64_with_commas(jcr->JobFiles, b1),
264             edit_uint64_with_commas(jcr->JobBytes, b2),
265             edit_uint64_with_commas(bps, b3));
266          found = true;
267 #ifdef DEBUG
268          if (jcr->file_bsock) {
269             bnet_fsend(user, "    FDReadSeqNo=%s in_msg=%u out_msg=%d fd=%d\n", 
270                edit_uint64_with_commas(jcr->file_bsock->read_seqno, b1),
271                jcr->file_bsock->in_msg_no, jcr->file_bsock->out_msg_no,
272                jcr->file_bsock->fd);
273          } else {
274             bnet_fsend(user, "    FDSocket closed\n");
275          }
276 #endif
277       }
278       free_locked_jcr(jcr);
279    }
280    unlock_jcr_chain();
281    if (!found) {
282       bnet_fsend(user, _("No Jobs running.\n"));
283    }
284    bnet_fsend(user, "====\n");
285 }
286
287 static void list_terminated_jobs(void *arg)
288 {
289    char dt[MAX_TIME_LENGTH], b1[30], b2[30];
290    char level[10];
291    struct s_last_job *je;
292    const char *msg;
293
294    if (last_jobs->size() == 0) {
295       msg = _("No Terminated Jobs.\n"); 
296       sendit(msg, strlen(msg), arg);
297       return;
298    }
299    lock_last_jobs_list();
300    msg =  _("\nTerminated Jobs:\n"); 
301    sendit(msg, strlen(msg), arg);
302    msg =  _(" JobId  Level   Files          Bytes Status   Finished        Name \n");
303    sendit(msg, strlen(msg), arg);
304    msg = _("======================================================================\n"); 
305    sendit(msg, strlen(msg), arg);
306    foreach_dlist(je, last_jobs) {
307       char JobName[MAX_NAME_LENGTH];
308       const char *termstat;
309       char buf[1000];
310
311       bstrftime_nc(dt, sizeof(dt), je->end_time);
312       switch (je->JobType) {
313       case JT_ADMIN:
314       case JT_RESTORE:
315          bstrncpy(level, "    ", sizeof(level));
316          break;
317       default:
318          bstrncpy(level, level_to_str(je->JobLevel), sizeof(level));
319          level[4] = 0;
320          break;
321       }
322       switch (je->JobStatus) {
323       case JS_Created:
324          termstat = "Created";
325          break;
326       case JS_FatalError:
327       case JS_ErrorTerminated:
328          termstat = "Error";
329          break;
330       case JS_Differences:
331          termstat = "Diffs";
332          break;
333       case JS_Canceled:
334          termstat = "Cancel";
335          break;
336       case JS_Terminated:
337          termstat = "OK";
338          break;
339       default:
340          termstat = "Other";
341          break;
342       }
343       bstrncpy(JobName, je->Job, sizeof(JobName));
344       /* There are three periods after the Job name */
345       char *p;
346       for (int i=0; i<3; i++) {
347          if ((p=strrchr(JobName, '.')) != NULL) {
348             *p = 0;
349          }
350       }
351       bsnprintf(buf, sizeof(buf), _("%6d  %-6s %8s %14s %-7s  %-8s %s\n"), 
352          je->JobId,
353          level, 
354          edit_uint64_with_commas(je->JobFiles, b1),
355          edit_uint64_with_commas(je->JobBytes, b2), 
356          termstat,
357          dt, JobName);
358       sendit(buf, strlen(buf), arg);
359    }
360    sendit("====\n", 5, arg);
361    unlock_last_jobs_list();
362 }
363
364 /*
365  * Convert Job Level into a string
366  */
367 static const char *level_to_str(int level) 
368 {
369    const char *str;
370
371    switch (level) {
372    case L_BASE:
373       str = _("Base");
374    case L_FULL:
375       str = _("Full");
376       break;
377    case L_INCREMENTAL:
378       str = _("Incremental");
379       break;
380    case L_DIFFERENTIAL:
381       str = _("Differential");
382       break;
383    case L_SINCE:
384       str = _("Since");
385       break;
386    case L_VERIFY_CATALOG:
387       str = _("Verify Catalog");
388       break;
389    case L_VERIFY_INIT:
390       str = _("Init Catalog");
391       break;
392    case L_VERIFY_VOLUME_TO_CATALOG:
393       str = _("Volume to Catalog");
394       break;
395    case L_VERIFY_DISK_TO_CATALOG:
396       str = _("Disk to Catalog");
397       break;
398    case L_VERIFY_DATA:
399       str = _("Data");
400       break;
401    case L_NONE:
402       str = " ";
403       break;
404    default:
405       str = _("Unknown Job Level");
406       break;
407    }
408    return str;
409 }
410
411 /*
412  * Send to Director 
413  */
414 static void sendit(const char *msg, int len, void *arg)
415 {
416    BSOCK *user = (BSOCK *)arg;
417
418    memcpy(user->msg, msg, len+1);
419    user->msglen = len+1;
420    bnet_send(user);
421 }
422
423 /*
424  * .status command from Director
425  */
426 bool qstatus_cmd(JCR *jcr)
427 {
428    BSOCK *dir = jcr->dir_bsock;
429    POOL_MEM time;
430    JCR *njcr;
431    s_last_job* job;
432
433    if (sscanf(dir->msg, qstatus, time.c_str()) != 1) {
434       pm_strcpy(jcr->errmsg, dir->msg);
435       Jmsg1(jcr, M_FATAL, 0, _("Bad .status command: %s\n"), jcr->errmsg);
436       bnet_fsend(dir, "3900 Bad .status command, missing argument.\n");
437       bnet_sig(dir, BNET_EOD);
438       return false;
439    }
440    unbash_spaces(time);
441    
442    if (strcmp(time.c_str(), "current") == 0) {
443       bnet_fsend(dir, OKqstatus, time.c_str());
444       lock_jcr_chain();
445       foreach_jcr(njcr) {
446          if (njcr->JobId != 0) {
447             bnet_fsend(dir, DotStatusJob, njcr->JobId, njcr->JobStatus, njcr->JobErrors);
448          }
449          free_locked_jcr(njcr);
450       }
451       unlock_jcr_chain();
452    }
453    else if (strcmp(time.c_str(), "last") == 0) {
454       bnet_fsend(dir, OKqstatus, time.c_str());
455       if ((last_jobs) && (last_jobs->size() > 0)) {
456          job = (s_last_job*)last_jobs->last();
457          bnet_fsend(dir, DotStatusJob, job->JobId, job->JobStatus, job->Errors);
458       }
459    }
460    else {
461       pm_strcpy(jcr->errmsg, dir->msg);
462       Jmsg1(jcr, M_FATAL, 0, _("Bad .status command: %s\n"), jcr->errmsg);
463       bnet_fsend(dir, "3900 Bad .status command, wrong argument.\n");
464       bnet_sig(dir, BNET_EOD);
465       return false;
466    }
467    bnet_sig(dir, BNET_EOD);
468    return true;
469 }