3 * Bacula Director -- fd_cmds.c -- send commands to File daemon
5 * Kern Sibbald, October MM
7 * This routine is run as a separate thread. There may be more
8 * work to be done to make it totally reentrant!!!!
10 * Utility functions for sending info to File Daemon.
11 * These functions are used by both backup and verify.
16 Copyright (C) 2000-2003 Kern Sibbald and John Walker
18 This program is free software; you can redistribute it and/or
19 modify it under the terms of the GNU General Public License as
20 published by the Free Software Foundation; either version 2 of
21 the License, or (at your option) any later version.
23 This program is distributed in the hope that it will be useful,
24 but WITHOUT ANY WARRANTY; without even the implied warranty of
25 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
26 General Public License for more details.
28 You should have received a copy of the GNU General Public
29 License along with this program; if not, write to the Free
30 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
38 /* Commands sent to File daemon */
39 static char inc[] = "include\n";
40 static char exc[] = "exclude\n";
41 static char jobcmd[] = "JobId=%d Job=%s SDid=%u SDtime=%u Authorization=%s\n";
44 /* Responses received from File daemon */
45 static char OKinc[] = "2000 OK include\n";
46 static char OKexc[] = "2000 OK exclude\n";
47 static char OKjob[] = "2000 OK Job";
49 /* Forward referenced functions */
51 /* External functions */
52 extern int debug_level;
53 extern DIRRES *director;
54 extern int FDConnectTimeout;
60 * Open connection with File daemon.
61 * Try connecting every 10 seconds, give up after 1 hour.
64 int connect_to_file_daemon(JCR *jcr, int retry_interval, int max_retry_time,
69 fd = bnet_connect(jcr, retry_interval, max_retry_time,
70 _("File daemon"), jcr->client->address,
71 NULL, jcr->client->FDport, verbose);
73 set_jcr_job_status(jcr, JS_ErrorTerminated);
76 Dmsg0(10, "Opened connection with File daemon\n");
77 fd->res = (RES *)jcr->client; /* save resource in BSOCK */
79 set_jcr_job_status(jcr, JS_Running);
81 if (!authenticate_file_daemon(jcr)) {
82 set_jcr_job_status(jcr, JS_ErrorTerminated);
87 * Now send JobId and authorization key
89 bnet_fsend(fd, jobcmd, jcr->JobId, jcr->Job, jcr->VolSessionId,
90 jcr->VolSessionTime, jcr->sd_auth_key);
91 if (strcmp(jcr->sd_auth_key, "dummy") != 0) {
92 memset(jcr->sd_auth_key, 0, strlen(jcr->sd_auth_key));
94 Dmsg1(100, ">filed: %s", fd->msg);
95 if (bnet_recv(fd) > 0) {
96 Dmsg1(110, "<filed: %s", fd->msg);
97 if (strncmp(fd->msg, OKjob, strlen(OKjob)) != 0) {
98 Jmsg(jcr, M_FATAL, 0, _("File daemon \"%s\" rejected Job command: %s\n"),
99 jcr->client->hdr.name, fd->msg);
100 set_jcr_job_status(jcr, JS_ErrorTerminated);
104 memset(&cr, 0, sizeof(cr));
105 bstrncpy(cr.Name, jcr->client->hdr.name, sizeof(cr.Name));
106 cr.AutoPrune = jcr->client->AutoPrune;
107 cr.FileRetention = jcr->client->FileRetention;
108 cr.JobRetention = jcr->client->JobRetention;
109 bstrncpy(cr.Uname, fd->msg+strlen(OKjob)+1, sizeof(cr.Uname));
110 if (!db_update_client_record(jcr, jcr->db, &cr)) {
111 Jmsg(jcr, M_WARNING, 0, _("Error updating Client record. ERR=%s\n"),
112 db_strerror(jcr->db));
116 Jmsg(jcr, M_FATAL, 0, _("FD gave bad response to JobId command: %s\n"),
118 set_jcr_job_status(jcr, JS_ErrorTerminated);
126 * Send either an Included or an Excluded list to FD
128 static int send_list(JCR *jcr, int list)
134 fd = jcr->file_bsock;
135 fileset = jcr->fileset;
137 if (list == INC_LIST) {
138 num = fileset->num_includes;
140 num = fileset->num_excludes;
143 for (int i=0; i < num; i++) {
151 if (list == INC_LIST) {
152 ie = fileset->include_items[i];
154 ie = fileset->exclude_items[i];
156 for (int j=0; j<ie->num_names; j++) {
157 p = ie->name_list[j];
160 fd->msg = edit_job_codes(jcr, fd->msg, p, "");
161 bpipe = open_bpipe(fd->msg, 0, "r");
163 Jmsg(jcr, M_FATAL, 0, _("Cannot run program: %s. ERR=%s\n"),
167 /* Copy File options */
169 strcpy(buf, ie->opts_list[0]->opts);
174 optlen = strlen(buf);
175 while (fgets(buf+optlen, sizeof(buf)-optlen, bpipe->rfd)) {
176 fd->msglen = Mmsg(&fd->msg, "%s", buf);
177 Dmsg2(200, "Inc/exc len=%d: %s", fd->msglen, fd->msg);
178 if (!bnet_send(fd)) {
179 Jmsg(jcr, M_FATAL, 0, _(">filed: write error on socket\n"));
183 if ((stat=close_bpipe(bpipe)) != 0) {
184 Jmsg(jcr, M_FATAL, 0, _("Error running program: %s. RtnStat=%d ERR=%s\n"),
185 p, stat, strerror(errno));
190 p++; /* skip over < */
191 if ((ffd = fopen(p, "r")) == NULL) {
192 Jmsg(jcr, M_FATAL, 0, _("Cannot open %s file: %s. ERR=%s\n"),
193 list==INC_LIST?"included":"excluded", p, strerror(errno));
196 /* Copy File options */
198 strcpy(buf, ie->opts_list[0]->opts);
203 optlen = strlen(buf);
204 while (fgets(buf+optlen, sizeof(buf)-optlen, ffd)) {
205 fd->msglen = Mmsg(&fd->msg, "%s", buf);
206 if (!bnet_send(fd)) {
207 Jmsg(jcr, M_FATAL, 0, _(">filed: write error on socket\n"));
214 p++; /* skip over \ */
215 /* Note, fall through wanted */
218 pm_strcpy(&fd->msg, ie->opts_list[0]->opts);
219 pm_strcat(&fd->msg, " ");
221 pm_strcpy(&fd->msg, "0 ");
223 pm_strcat(&fd->msg, p);
224 Dmsg1(100, "Inc/Exc name=%s\n", fd->msg);
225 fd->msglen = strlen(fd->msg);
226 if (!bnet_send(fd)) {
227 Jmsg(jcr, M_FATAL, 0, _(">filed: write error on socket\n"));
234 bnet_sig(fd, BNET_EOD); /* end of data */
235 if (list == INC_LIST) {
236 if (!response(jcr, fd, OKinc, "Include", DISPLAY_ERROR)) {
239 } else if (!response(jcr, fd, OKexc, "Exclude", DISPLAY_ERROR)) {
245 set_jcr_job_status(jcr, JS_ErrorTerminated);
251 * Send include list to File daemon
253 int send_include_list(JCR *jcr)
255 BSOCK *fd = jcr->file_bsock;
256 fd->msglen = sprintf(fd->msg, inc);
258 return send_list(jcr, INC_LIST);
263 * Send exclude list to File daemon
265 int send_exclude_list(JCR *jcr)
267 BSOCK *fd = jcr->file_bsock;
268 fd->msglen = sprintf(fd->msg, exc);
270 return send_list(jcr, EXC_LIST);
275 * Read the attributes from the File daemon for
276 * a Verify job and store them in the catalog.
278 int get_attributes_and_put_in_catalog(JCR *jcr)
284 fd = jcr->file_bsock;
285 jcr->jr.FirstIndex = 1;
286 memset(&ar, 0, sizeof(ar));
289 Dmsg0(120, "bdird: waiting to receive file attributes\n");
290 /* Pickup file attributes and signature */
291 while (!fd->errors && (n = bget_dirmsg(fd)) > 0) {
293 /*****FIXME****** improve error handling to stop only on
294 * really fatal problems, or the number of errors is too
300 char Opts_SIG[MAXSTRING]; /* either Verify opts or MD5/SHA1 signature */
303 jcr->fname = check_pool_memory_size(jcr->fname, fd->msglen);
304 if ((len = sscanf(fd->msg, "%ld %d %s", &file_index, &stream, Opts_SIG)) != 3) {
305 Jmsg(jcr, M_FATAL, 0, _("<filed: bad attributes, expected 3 fields got %d\n\
306 msglen=%d msg=%s\n"), len, fd->msglen, fd->msg);
307 set_jcr_job_status(jcr, JS_ErrorTerminated);
311 skip_nonspaces(&p); /* skip FileIndex */
313 skip_nonspaces(&p); /* skip Stream */
315 skip_nonspaces(&p); /* skip Opts_SHA1 */
316 p++; /* skip space */
319 *fn++ = *p++; /* copy filename */
321 *fn = *p++; /* term filename and point to attribs */
324 if (stream == STREAM_UNIX_ATTRIBUTES || stream == STREAM_WIN32_ATTRIBUTES) {
326 jcr->FileIndex = file_index;
328 ar.fname = jcr->fname;
329 ar.FileIndex = file_index;
332 ar.JobId = jcr->JobId;
333 ar.ClientId = jcr->ClientId;
337 Dmsg2(111, "dird<filed: stream=%d %s\n", stream, jcr->fname);
338 Dmsg1(120, "dird<filed: attr=%s\n", attr);
340 if (!db_create_file_attributes_record(jcr, jcr->db, &ar)) {
341 Jmsg1(jcr, M_ERROR, 0, "%s", db_strerror(jcr->db));
342 set_jcr_job_status(jcr, JS_Error);
345 jcr->FileId = ar.FileId;
346 } else if (stream == STREAM_MD5_SIGNATURE || stream == STREAM_SHA1_SIGNATURE) {
347 if (jcr->FileIndex != (uint32_t)file_index) {
348 Jmsg2(jcr, M_ERROR, 0, _("MD5/SHA1 index %d not same as attributes %d\n"),
349 file_index, jcr->FileIndex);
350 set_jcr_job_status(jcr, JS_Error);
353 db_escape_string(SIG, Opts_SIG, strlen(Opts_SIG));
354 Dmsg2(120, "SIGlen=%d SIG=%s\n", strlen(SIG), SIG);
355 if (!db_add_SIG_to_file_record(jcr, jcr->db, jcr->FileId, SIG,
356 stream==STREAM_MD5_SIGNATURE?MD5_SIG:SHA1_SIG)) {
357 Jmsg1(jcr, M_ERROR, 0, "%s", db_strerror(jcr->db));
358 set_jcr_job_status(jcr, JS_Error);
361 jcr->jr.JobFiles = jcr->JobFiles = file_index;
362 jcr->jr.LastIndex = file_index;
364 if (is_bnet_error(fd)) {
365 Jmsg1(jcr, M_FATAL, 0, _("<filed: Network error getting attributes. ERR=%s\n"),
367 set_jcr_job_status(jcr, JS_ErrorTerminated);
371 set_jcr_job_status(jcr, JS_Terminated);