]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/dird/msgchan.c
cd00b7170a155efe9971e980a801acf1fc1511ed
[bacula/bacula] / bacula / src / dird / msgchan.c
1 /*
2  *
3  *   Bacula Director -- msgchan.c -- handles the message channel
4  *    to the Storage daemon and the File daemon.
5  *
6  *     Kern Sibbald, August MM
7  *
8  *    This routine runs as a thread and must be thread reentrant.
9  *
10  *  Basic tasks done here:
11  *    Open a message channel with the Storage daemon
12  *      to authenticate ourself and to pass the JobId.
13  *    Create a thread to interact with the Storage daemon
14  *      who returns a job status and requests Catalog services, etc.
15  *
16  *   Version $Id$
17  */
18 /*
19    Copyright (C) 2000-2005 Kern Sibbald
20
21    This program is free software; you can redistribute it and/or
22    modify it under the terms of the GNU General Public License as
23    published by the Free Software Foundation; either version 2 of
24    the License, or (at your option) any later version.
25
26    This program is distributed in the hope that it will be useful,
27    but WITHOUT ANY WARRANTY; without even the implied warranty of
28    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
29    General Public License for more details.
30
31    You should have received a copy of the GNU General Public
32    License along with this program; if not, write to the Free
33    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
34    MA 02111-1307, USA.
35
36  */
37
38 #include "bacula.h"
39 #include "dird.h"
40
41 /* Commands sent to Storage daemon */
42 static char jobcmd[]     = "JobId=%d job=%s job_name=%s client_name=%s "
43    "type=%d level=%d FileSet=%s NoAttr=%d SpoolAttr=%d FileSetMD5=%s "
44    "SpoolData=%d WritePartAfterJob=%d NewVol=%d\n";
45 static char use_storage[] = "use storage media_type=%s pool_name=%s "
46    "pool_type=%s append=%d\n";
47 static char use_device[] = "use device=%s\n";
48 //static char query_device[] = "query device=%s";
49
50 /* Response from Storage daemon */
51 static char OKjob[]      = "3000 OK Job SDid=%d SDtime=%d Authorization=%100s\n";
52 static char OK_device[]  = "3000 OK use device device=%s\n";
53
54 /* Storage Daemon requests */
55 static char Job_start[]  = "3010 Job %127s start\n";
56 static char Job_end[]    =
57    "3099 Job %127s end JobStatus=%d JobFiles=%d JobBytes=%" lld "\n";
58
59 /* Forward referenced functions */
60 extern "C" void *msg_thread(void *arg);
61
62 /*
63  * Establish a message channel connection with the Storage daemon
64  * and perform authentication.
65  */
66 bool connect_to_storage_daemon(JCR *jcr, int retry_interval,
67                               int max_retry_time, int verbose)
68 {
69    BSOCK *sd;
70    STORE *store;
71
72    if (jcr->store_bsock) {
73       return true;                    /* already connected */
74    }
75    store = (STORE *)jcr->storage->first();
76
77    /*
78     *  Open message channel with the Storage daemon
79     */
80    Dmsg2(100, "bnet_connect to Storage daemon %s:%d\n", store->address,
81       store->SDport);
82    sd = bnet_connect(jcr, retry_interval, max_retry_time,
83           _("Storage daemon"), store->address,
84           NULL, store->SDport, verbose);
85    if (sd == NULL) {
86       return false;
87    }
88    sd->res = (RES *)store;        /* save pointer to other end */
89    jcr->store_bsock = sd;
90
91    if (!authenticate_storage_daemon(jcr, store)) {
92       bnet_close(sd);
93       jcr->store_bsock = NULL;
94       return false;
95    }
96    return true;
97 }
98
99 /*
100  * Here we ask the SD to send us the info for a 
101  *  particular device resource.
102  */
103 #ifdef needed
104 bool update_device_res(JCR *jcr, DEVICE *dev)
105 {
106    POOL_MEM device_name; 
107    BSOCK *sd;
108    if (!connect_to_storage_daemon(jcr, 5, 30, 0)) {
109       return false;
110    }
111    sd = jcr->store_bsock;
112    pm_strcpy(device_name, dev->hdr.name);
113    bash_spaces(device_name);
114    bnet_fsend(sd, query_device, device_name.c_str());
115    Dmsg1(100, ">stored: %s\n", sd->msg);
116    /* The data is returned through Device_update */
117    if (bget_dirmsg(sd) <= 0) {
118       return false;
119    }
120    return true;
121 }
122 #endif
123
124 /*
125  * Start a job with the Storage daemon
126  */
127 int start_storage_daemon_job(JCR *jcr, alist *store, int append)
128 {
129    bool ok = false;
130    STORE *storage;
131    BSOCK *sd;
132    char auth_key[100];
133    POOL_MEM device_name, pool_name, pool_type, media_type;
134    char PoolId[50];
135
136    sd = jcr->store_bsock;
137    /*
138     * Now send JobId and permissions, and get back the authorization key.
139     */
140    bash_spaces(jcr->job->hdr.name);
141    bash_spaces(jcr->client->hdr.name);
142    bash_spaces(jcr->fileset->hdr.name);
143    if (jcr->fileset->MD5[0] == 0) {
144       bstrncpy(jcr->fileset->MD5, "**Dummy**", sizeof(jcr->fileset->MD5));
145    }
146    bnet_fsend(sd, jobcmd, jcr->JobId, jcr->Job, jcr->job->hdr.name,
147               jcr->client->hdr.name, jcr->JobType, jcr->JobLevel,
148               jcr->fileset->hdr.name, !jcr->pool->catalog_files,
149               jcr->job->SpoolAttributes, jcr->fileset->MD5, jcr->spool_data, 
150               jcr->write_part_after_job, jcr->job->NewVolEachJob);
151    Dmsg1(100, ">stored: %s\n", sd->msg);
152    unbash_spaces(jcr->job->hdr.name);
153    unbash_spaces(jcr->client->hdr.name);
154    unbash_spaces(jcr->fileset->hdr.name);
155    if (bget_dirmsg(sd) > 0) {
156        Dmsg1(100, "<stored: %s", sd->msg);
157        if (sscanf(sd->msg, OKjob, &jcr->VolSessionId,
158                   &jcr->VolSessionTime, &auth_key) != 3) {
159           Dmsg1(100, "BadJob=%s\n", sd->msg);
160           Jmsg(jcr, M_FATAL, 0, _("Storage daemon rejected Job command: %s\n"), sd->msg);
161           return 0;
162        } else {
163           jcr->sd_auth_key = bstrdup(auth_key);
164           Dmsg1(150, "sd_auth_key=%s\n", jcr->sd_auth_key);
165        }
166    } else {
167       Jmsg(jcr, M_FATAL, 0, _("<stored: bad response to Job command: %s\n"),
168          bnet_strerror(sd));
169       return 0;
170    }
171
172    pm_strcpy(pool_type, jcr->pool->pool_type);
173    pm_strcpy(pool_name, jcr->pool->hdr.name);
174    bash_spaces(pool_type);
175    bash_spaces(pool_name);
176    edit_int64(jcr->PoolId, PoolId);
177
178    /*
179     * We have two loops here. The first comes from the 
180     *  Storage = associated with the Job, and we need 
181     *  to attach to each one.
182     * The inner loop loops over all the alternative devices
183     *  associated with each Storage. It selects the first
184     *  available one.
185     *
186     * Note, the outer loop is not yet implemented.
187     */
188 // foreach_alist(storage, store) {
189       storage = (STORE *)store->first();
190       pm_strcpy(media_type, storage->media_type);
191       bash_spaces(media_type);
192       bnet_fsend(sd, use_storage, media_type.c_str(), pool_name.c_str(), 
193                  pool_type.c_str(), append);
194
195       DEVICE *dev;
196       /* Loop over alternative storage Devices until one is OK */
197       foreach_alist(dev, storage->device) {
198          pm_strcpy(device_name, dev->hdr.name);
199          bash_spaces(device_name);
200          bnet_fsend(sd, use_device, device_name.c_str());
201          Dmsg1(100, ">stored: %s", sd->msg);
202       }
203       bnet_sig(sd, BNET_EOD);
204       if (bget_dirmsg(sd) > 0) {
205          Dmsg1(100, "<stored: %s", sd->msg);
206          /* ****FIXME**** save actual device name */
207          ok = sscanf(sd->msg, OK_device, device_name.c_str()) == 1;
208       } else {
209          POOL_MEM err_msg;
210          pm_strcpy(err_msg, sd->msg); /* save message */
211          Jmsg(jcr, M_WARNING, 0, _("\n"
212             "     Storage daemon didn't accept Device \"%s\" because:\n     %s"),
213             device_name.c_str(), err_msg.c_str()/* sd->msg */);
214       }
215 //    if (!ok) {
216 //       break;
217 //    }
218 // }
219    if (ok) {
220       ok = bnet_fsend(sd, "run");
221       Dmsg1(100, ">stored: %s\n", sd->msg);
222    }
223    return ok;
224 }
225
226 /*
227  * Start a thread to handle Storage daemon messages and
228  *  Catalog requests.
229  */
230 int start_storage_daemon_message_thread(JCR *jcr)
231 {
232    int status;
233    pthread_t thid;
234
235    P(jcr->mutex);
236    jcr->use_count++;                  /* mark in use by msg thread */
237    jcr->sd_msg_thread_done = false;
238    jcr->SD_msg_chan = 0;
239    V(jcr->mutex);
240    Dmsg0(100, "Start SD msg_thread.\n");
241    if ((status=pthread_create(&thid, NULL, msg_thread, (void *)jcr)) != 0) {
242       berrno be;
243       Jmsg1(jcr, M_ABORT, 0, _("Cannot create message thread: %s\n"), be.strerror(status));
244    }
245    Dmsg0(100, "SD msg_thread started.\n");
246    /* Wait for thread to start */
247    while (jcr->SD_msg_chan == 0) {
248       bmicrosleep(0, 50);
249    }
250    return 1;
251 }
252
253 extern "C" void msg_thread_cleanup(void *arg)
254 {
255    JCR *jcr = (JCR *)arg;
256    Dmsg0(200, "End msg_thread\n");
257    db_end_transaction(jcr, jcr->db);       /* terminate any open transaction */
258    P(jcr->mutex);
259    jcr->sd_msg_thread_done = true;
260    pthread_cond_broadcast(&jcr->term_wait); /* wakeup any waiting threads */
261    jcr->SD_msg_chan = 0;
262    V(jcr->mutex);
263    free_jcr(jcr);                     /* release jcr */
264 }
265
266 /*
267  * Handle the message channel (i.e. requests from the
268  *  Storage daemon).
269  * Note, we are running in a separate thread.
270  */
271 extern "C" void *msg_thread(void *arg)
272 {
273    JCR *jcr = (JCR *)arg;
274    BSOCK *sd;
275    int JobStatus;
276    char Job[MAX_NAME_LENGTH];
277    uint32_t JobFiles;
278    uint64_t JobBytes;
279    int stat;
280
281    pthread_detach(pthread_self());
282    jcr->SD_msg_chan = pthread_self();
283    pthread_cleanup_push(msg_thread_cleanup, arg);
284    sd = jcr->store_bsock;
285
286    /* Read the Storage daemon's output.
287     */
288    Dmsg0(100, "Start msg_thread loop\n");
289    while ((stat=bget_dirmsg(sd)) >= 0) {
290       Dmsg1(200, "<stored: %s", sd->msg);
291       if (sscanf(sd->msg, Job_start, &Job) == 1) {
292          continue;
293       }
294       if (sscanf(sd->msg, Job_end, &Job, &JobStatus, &JobFiles,
295                  &JobBytes) == 4) {
296          jcr->SDJobStatus = JobStatus; /* termination status */
297          jcr->SDJobFiles = JobFiles;
298          jcr->SDJobBytes = JobBytes;
299          break;
300       }
301    }
302    if (is_bnet_error(sd)) {
303       jcr->SDJobStatus = JS_ErrorTerminated;
304    }
305    pthread_cleanup_pop(1);
306    return NULL;
307 }
308
309 void wait_for_storage_daemon_termination(JCR *jcr)
310 {
311    int cancel_count = 0;
312    /* Now wait for Storage daemon to terminate our message thread */
313    set_jcr_job_status(jcr, JS_WaitSD);
314    P(jcr->mutex);
315    while (!jcr->sd_msg_thread_done) {
316       struct timeval tv;
317       struct timezone tz;
318       struct timespec timeout;
319
320       gettimeofday(&tv, &tz);
321       timeout.tv_nsec = 0;
322       timeout.tv_sec = tv.tv_sec + 10; /* wait 10 seconds */
323       Dmsg0(300, "I'm waiting for message thread termination.\n");
324       pthread_cond_timedwait(&jcr->term_wait, &jcr->mutex, &timeout);
325       if (job_canceled(jcr)) {
326          cancel_count++;
327       }
328       /* Give SD 30 seconds to clean up after cancel */
329       if (cancel_count == 3) {
330          break;
331       }
332    }
333    V(jcr->mutex);
334    set_jcr_job_status(jcr, JS_Terminated);
335 }
336
337 #ifdef needed
338 #define MAX_TRIES 30
339 #define WAIT_TIME 2
340 extern "C" void *device_thread(void *arg)
341 {
342    int i;
343    JCR *jcr;
344    DEVICE *dev;
345
346
347    pthread_detach(pthread_self());
348    jcr = new_control_jcr("*DeviceInit*", JT_SYSTEM);
349    for (i=0; i < MAX_TRIES; i++) {
350       if (!connect_to_storage_daemon(jcr, 10, 30, 1)) {
351          Dmsg0(000, "Failed connecting to SD.\n");
352          continue;
353       }
354       LockRes();
355       foreach_res(dev, R_DEVICE) {
356          if (!update_device_res(jcr, dev)) {
357             Dmsg1(900, "Error updating device=%s\n", dev->hdr.name);
358          } else {
359             Dmsg1(900, "Updated Device=%s\n", dev->hdr.name);
360          }
361       }
362       UnlockRes();
363       bnet_close(jcr->store_bsock);
364       jcr->store_bsock = NULL;
365       break;
366
367    }
368    free_jcr(jcr);
369    return NULL;
370 }
371
372 /*
373  * Start a thread to handle getting Device resource information
374  *  from SD. This is called once at startup of the Director.
375  */
376 void init_device_resources()
377 {
378    int status;
379    pthread_t thid;
380
381    Dmsg0(100, "Start Device thread.\n");
382    if ((status=pthread_create(&thid, NULL, device_thread, NULL)) != 0) {
383       berrno be;
384       Jmsg1(NULL, M_ABORT, 0, _("Cannot create message thread: %s\n"), be.strerror(status));
385    }
386 }
387 #endif