]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/filed/verify_vol.c
Use rentrant mysql lib, eliminate race in sql_list, Win32 streams, misc see kes-1.31
[bacula/bacula] / bacula / src / filed / verify_vol.c
1 /*
2  *  Bacula File Daemon  verify-vol.c Verify files on a Volume
3  *    versus attributes in Catalog
4  *
5  *    Kern Sibbald, July MMII
6  *
7  *   Version $Id$
8  *
9  */
10 /*
11    Copyright (C) 2000-2003 Kern Sibbald and John Walker
12
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.
17
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.
22
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,
26    MA 02111-1307, USA.
27
28  */
29
30 #include "bacula.h"
31 #include "filed.h"
32
33 /* Data received from Storage Daemon */
34 static char rec_header[] = "rechdr %ld %ld %ld %ld %ld";
35
36 /* Forward referenced functions */
37 #ifdef needed
38 static void print_ls_output(JCR *jcr, char *fname, char *lname, int type, struct stat *statp);
39 #endif
40
41
42 /* 
43  * Verify attributes of the requested files on the Volume
44  * 
45  */
46 void do_verify_volume(JCR *jcr)
47 {
48    BSOCK *sd, *dir;
49    POOLMEM *fname;                    /* original file name */
50    POOLMEM *lname;                    /* link name */
51    int32_t stream;
52    uint32_t size;
53    uint32_t VolSessionId, VolSessionTime, file_index;
54    uint32_t record_file_index;
55    int type, stat;
56    
57    sd = jcr->store_bsock;
58    if (!sd) {
59       Jmsg(jcr, M_FATAL, 0, _("Storage command not issued before Verify.\n"));
60       set_jcr_job_status(jcr, JS_FatalError);
61       return;
62    }
63    dir = jcr->dir_bsock;
64    set_jcr_job_status(jcr, JS_Running);
65
66    if (!bnet_set_buffer_size(sd, MAX_NETWORK_BUFFER_SIZE, BNET_SETBUF_READ)) {
67       set_jcr_job_status(jcr, JS_FatalError);
68       return;
69    }
70    jcr->buf_size = sd->msglen;
71
72    fname = get_pool_memory(PM_FNAME);
73    lname = get_pool_memory(PM_FNAME);
74
75    /* 
76     * Get a record from the Storage daemon
77     */
78    while (bget_msg(sd) >= 0 && !job_canceled(jcr)) {
79       /*
80        * First we expect a Stream Record Header 
81        */
82       if (sscanf(sd->msg, rec_header, &VolSessionId, &VolSessionTime, &file_index,
83           &stream, &size) != 5) {
84          Jmsg1(jcr, M_FATAL, 0, _("Record header scan error: %s\n"), sd->msg);
85          goto bail_out;
86       }
87       Dmsg2(30, "Got hdr: FilInx=%d Stream=%d.\n", file_index, stream);
88
89       /* 
90        * Now we expect the Stream Data
91        */
92       if (bget_msg(sd) < 0) {
93          Jmsg1(jcr, M_FATAL, 0, _("Data record error. ERR=%s\n"), bnet_strerror(sd));
94          goto bail_out;
95       }
96       if (size != ((uint32_t)sd->msglen)) {
97          Jmsg2(jcr, M_FATAL, 0, _("Actual data size %d not same as header %d\n"), sd->msglen, size);
98          goto bail_out;
99       }
100       Dmsg1(30, "Got stream data, len=%d\n", sd->msglen);
101
102       /* File Attributes stream */
103       if (stream == STREAM_UNIX_ATTRIBUTES || stream == STREAM_WIN32_ATTRIBUTES) {
104          char *ap, *lp, *fp;
105
106          Dmsg0(400, "Stream=Unix Attributes.\n");
107
108          if ((int)sizeof_pool_memory(fname) < sd->msglen) {
109             fname = realloc_pool_memory(fname, sd->msglen + 1);
110          }
111
112          if ((int)sizeof_pool_memory(lname) < sd->msglen) {
113             lname = realloc_pool_memory(lname, sd->msglen + 1);
114          }
115          *fname = 0;
116          *lname = 0;
117
118          /*              
119           * An Attributes record consists of:
120           *    File_index
121           *    Type   (FT_types)
122           *    Filename
123           *    Attributes
124           *    Link name (if file linked i.e. FT_LNK)
125           *    Extended Attributes (if Win32)
126           */
127          if (sscanf(sd->msg, "%d %d", &record_file_index, &type) != 2) {
128             Jmsg(jcr, M_FATAL, 0, _("Error scanning record header: %s\n"), sd->msg);
129             Dmsg0(0, "\nError scanning header\n");
130             goto bail_out;
131          }
132          Dmsg2(30, "Got Attr: FilInx=%d type=%d\n", record_file_index, type);
133          if (record_file_index != file_index) {
134             Jmsg(jcr, M_FATAL, 0, _("Record header file index %ld not equal record index %ld\n"),
135                file_index, record_file_index);
136             Dmsg0(0, "File index error\n");
137             goto bail_out;
138          }
139          ap = sd->msg;
140          while (*ap++ != ' ')         /* skip record file index */
141             ;
142          while (*ap++ != ' ')         /* skip type */
143             ;
144          /* Save filename and position to attributes */
145          fp = fname;     
146          while (*ap != 0) {
147             *fp++  = *ap++;           /* copy filename to fname */
148          }
149          *fp = *ap++;                 /* terminate filename & point to attribs */
150
151          Dmsg1(200, "Attr=%s\n", ap);
152          /* Skip to Link name */
153          if (type == FT_LNK || type == FT_LNKSAVED) {
154             lp = ap;
155             while (*lp++ != 0) {
156                ;
157             }
158             strcat(lname, lp);        /* "save" link name */
159          } else {
160             *lname = 0;
161          }
162          P(jcr->mutex);
163          jcr->JobFiles++;
164          jcr->num_files_examined++;
165          pm_strcpy(&jcr->last_fname, fname); /* last file examined */
166          V(jcr->mutex);
167
168          /* 
169           * Send file attributes to Director
170           *   File_index
171           *   Stream
172           *   Verify Options
173           *   Filename (full path)
174           *   Encoded attributes
175           *   Link name (if type==FT_LNK)
176           * For a directory, link is the same as fname, but with trailing
177           * slash. For a linked file, link is the link.
178           */
179          /* Send file attributes to Director */
180          Dmsg2(200, "send ATTR inx=%d fname=%s\n", jcr->JobFiles, fname);
181          if (type == FT_LNK || type == FT_LNKSAVED) {
182             stat = bnet_fsend(dir, "%d %d %s %s%c%s%c%s%c", jcr->JobFiles,
183                           STREAM_UNIX_ATTRIBUTES, "pinsug5", fname, 
184                           0, ap, 0, lname, 0);
185          } else {
186             stat = bnet_fsend(dir,"%d %d %s %s%c%s%c%c", jcr->JobFiles,
187                           STREAM_UNIX_ATTRIBUTES, "pinsug5", fname, 
188                           0, ap, 0, 0);
189          }
190          Dmsg2(200, "bfiled>bdird: attribs len=%d: msg=%s\n", dir->msglen, dir->msg);
191          if (!stat) {
192             Jmsg(jcr, M_FATAL, 0, _("Network error in send to Director: ERR=%s\n"), bnet_strerror(dir));
193             goto bail_out;
194          }
195
196
197       /* Data stream */
198       } else if (stream == STREAM_FILE_DATA || stream == STREAM_SPARSE_DATA) {
199
200         /* Do nothing */
201         
202       /* GZIP data stream */
203       } else if (stream == STREAM_GZIP_DATA || stream == STREAM_SPARSE_GZIP_DATA) {
204
205         /* Do nothing */
206
207       } else if (stream == STREAM_WIN32_DATA || stream == STREAM_WIN32_GZIP_DATA) {
208
209         /* Do nothing */
210
211       /* If MD5 stream */
212       } else if (stream == STREAM_MD5_SIGNATURE) {
213          char MD5buf[30];
214          bin_to_base64(MD5buf, (char *)sd->msg, 16); /* encode 16 bytes */
215          Dmsg2(400, "send inx=%d MD5=%s\n", jcr->JobFiles, MD5buf);
216          bnet_fsend(dir, "%d %d %s *MD5-%d*", jcr->JobFiles, STREAM_MD5_SIGNATURE, MD5buf,
217             jcr->JobFiles);
218          Dmsg2(20, "bfiled>bdird: MD5 len=%d: msg=%s\n", dir->msglen, dir->msg);
219   
220       /* If SHA1 stream */
221       } else if (stream == STREAM_SHA1_SIGNATURE) {
222          char SHA1buf[30];
223          bin_to_base64(SHA1buf, (char *)sd->msg, 20); /* encode 20 bytes */
224          Dmsg2(400, "send inx=%d SHA1=%s\n", jcr->JobFiles, SHA1buf);
225          bnet_fsend(dir, "%d %d %s *SHA1-%d*", jcr->JobFiles, STREAM_SHA1_SIGNATURE, 
226             SHA1buf, jcr->JobFiles);
227          Dmsg2(20, "bfiled>bdird: SHA1 len=%d: msg=%s\n", dir->msglen, dir->msg);
228       } else {
229          Pmsg2(0, "None of above!!! stream=%d data=%s\n", stream,sd->msg);
230       }
231    }
232    set_jcr_job_status(jcr, JS_Terminated);
233    goto ok_out;
234
235 bail_out:
236    set_jcr_job_status(jcr, JS_ErrorTerminated);
237 ok_out:
238    if (jcr->compress_buf) {
239       free(jcr->compress_buf);
240       jcr->compress_buf = NULL;
241    }
242    free_pool_memory(fname);
243    free_pool_memory(lname);
244    Dmsg2(050, "End Verify-Vol. Files=%d Bytes=%" lld "\n", jcr->JobFiles,
245       jcr->JobBytes);
246 }          
247
248 extern char *getuser(uid_t uid);
249 extern char *getgroup(gid_t gid);
250
251 /*
252  * Print an ls style message, also send INFO
253  */
254 #ifdef needed
255 static void print_ls_output(JCR *jcr, char *fname, char *lname, int type, struct stat *statp)
256 {
257    char buf[2000]; 
258    char ec1[30];
259    char *p, *f;
260    int n;
261
262    p = encode_mode(statp->st_mode, buf);
263    n = sprintf(p, "  %2d ", (uint32_t)statp->st_nlink);
264    p += n;
265    n = sprintf(p, "%-8.8s %-8.8s", getuser(statp->st_uid), getgroup(statp->st_gid));
266    p += n;
267    n = sprintf(p, "%8.8s ", edit_uint64(statp->st_size, ec1));
268    p += n;
269    p = encode_time(statp->st_ctime, p);
270    *p++ = ' ';
271    *p++ = ' ';
272    for (f=fname; *f && (p-buf) < (int)sizeof(buf)-10; )
273       *p++ = *f++;
274    if (type == FT_LNK) {
275       *p++ = ' ';
276       *p++ = '-';
277       *p++ = '>';
278       *p++ = ' ';
279       /* Copy link name */
280       for (f=lname; *f && (p-buf) < (int)sizeof(buf)-10; )
281          *p++ = *f++;
282    }
283    *p++ = '\n';
284    *p = 0;
285    Dmsg0(20, buf);
286    Jmsg(jcr, M_INFO, 0, "%s", buf);
287 }
288 #endif