3 * Utility routines for "tool" programs such as bscan, bls,
4 * bextract, ... Some routines also used by Bacula.
6 * Normally nothing in this file is called by the Storage
7 * daemon because we interact more directly with the user
13 Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
15 This program is free software; you can redistribute it and/or
16 modify it under the terms of the GNU General Public License as
17 published by the Free Software Foundation; either version 2 of
18 the License, or (at your option) any later version.
20 This program is distributed in the hope that it will be useful,
21 but WITHOUT ANY WARRANTY; without even the implied warranty of
22 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
23 General Public License for more details.
25 You should have received a copy of the GNU General Public
26 License along with this program; if not, write to the Free
27 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
35 /* Imported variables -- eliminate some day */
36 extern char *configfile;
39 char *rec_state_to_str(DEV_RECORD *rec)
43 if (rec->state & REC_NO_HEADER) {
44 strcat(buf, "Nohdr,");
46 if (is_partial_record(rec)) {
47 strcat(buf, "partial,");
49 if (rec->state & REC_BLOCK_EMPTY) {
50 strcat(buf, "empty,");
52 if (rec->state & REC_NO_MATCH) {
53 strcat(buf, "Nomatch,");
55 if (rec->state & REC_CONTINUATION) {
59 buf[strlen(buf)-1] = 0;
67 * Setup device, jcr, and prepare to access device.
68 * If the caller wants read access, acquire the device, otherwise,
69 * the caller will do it.
71 DEVICE *setup_to_access_device(JCR *jcr, int read_access)
78 * If no volume name already given and no bsr, and it is a file,
79 * try getting name from Filename
81 if (!jcr->bsr && jcr->VolumeName[0] == 0) {
82 if (strncmp(jcr->dev_name, "/dev/", 5) != 0) {
83 /* Try stripping file part */
84 p = jcr->dev_name + strlen(jcr->dev_name);
85 while (p >= jcr->dev_name && *p != '/')
88 pm_strcpy(&jcr->VolumeName, p+1);
94 if ((device=find_device_res(jcr->dev_name, read_access)) == NULL) {
95 Jmsg2(jcr, M_FATAL, 0, _("Cannot find device %s in config file %s.\n"),
96 jcr->dev_name, configfile);
101 dev = init_dev(NULL, device);
102 jcr->device->dev = dev;
104 if (!dev || !first_open_device(dev)) {
105 Jmsg1(jcr, M_FATAL, 0, _("Cannot open %s\n"), jcr->dev_name);
108 Dmsg0(90, "Device opened for read.\n");
110 create_vol_list(jcr);
113 if (!acquire_device_for_read(jcr)) {
122 * Search for device resource that corresponds to
123 * device name on command line (or default).
125 * Returns: NULL on failure
126 * Device resource pointer on success
128 DEVRES *find_device_res(char *device_name, int read_access)
134 for (device=NULL; (device=(DEVRES *)GetNextRes(R_DEVICE, (RES *)device)); ) {
135 if (strcmp(device->device_name, device_name) == 0) {
142 Pmsg2(0, _("Could not find device %s in config file %s.\n"), device_name,
146 Pmsg2(0, _("Using device: %s for %s.\n"), device_name,
147 read_access?"reading":"writing");
154 * Called here when freeing JCR so that we can get rid
155 * of "daemon" specific memory allocated.
157 static void my_free_jcr(JCR *jcr)
159 if (jcr->pool_name) {
160 free_pool_memory(jcr->pool_name);
161 jcr->pool_name = NULL;
163 if (jcr->pool_type) {
164 free_pool_memory(jcr->pool_type);
165 jcr->pool_type = NULL;
168 free_pool_memory(jcr->job_name);
169 jcr->job_name = NULL;
171 if (jcr->client_name) {
172 free_pool_memory(jcr->client_name);
173 jcr->client_name = NULL;
175 if (jcr->fileset_name) {
176 free_pool_memory(jcr->fileset_name);
177 jcr->fileset_name = NULL;
179 if (jcr->fileset_md5) {
180 free_pool_memory(jcr->fileset_md5);
181 jcr->fileset_md5 = NULL;
184 free_pool_memory(jcr->dev_name);
185 jcr->dev_name = NULL;
199 * Setup a "daemon" JCR for the various standalone
200 * tools (e.g. bls, bextract, bscan, ...)
202 JCR *setup_jcr(char *name, char *device, BSR *bsr, char *VolumeName)
204 JCR *jcr = new_jcr(sizeof(JCR), my_free_jcr);
205 jcr->VolSessionId = 1;
206 jcr->VolSessionTime = (uint32_t)time(NULL);
209 jcr->pool_name = get_pool_memory(PM_FNAME);
210 strcpy(jcr->pool_name, "Default");
211 jcr->pool_type = get_pool_memory(PM_FNAME);
212 strcpy(jcr->pool_type, "Backup");
213 jcr->job_name = get_pool_memory(PM_FNAME);
214 pm_strcpy(&jcr->job_name, "Dummy.Job.Name");
215 jcr->client_name = get_pool_memory(PM_FNAME);
216 pm_strcpy(&jcr->client_name, "Dummy.Client.Name");
217 bstrncpy(jcr->Job, name, sizeof(jcr->Job));
218 jcr->fileset_name = get_pool_memory(PM_FNAME);
219 pm_strcpy(&jcr->fileset_name, "Dummy.fileset.name");
220 jcr->fileset_md5 = get_pool_memory(PM_FNAME);
221 pm_strcpy(&jcr->fileset_md5, "Dummy.fileset.md5");
223 jcr->JobType = JT_CONSOLE;
224 jcr->JobLevel = L_FULL;
225 jcr->JobStatus = JS_Terminated;
226 jcr->dev_name = get_pool_memory(PM_FNAME);
227 pm_strcpy(&jcr->dev_name, device);
228 if (!bsr && VolumeName) {
229 pm_strcpy(&jcr->VolumeName, VolumeName);
231 jcr->where = bstrdup("");
237 * Device got an error, attempt to analyse it
239 void display_tape_error_status(JCR *jcr, DEVICE *dev)
243 status = status_dev(dev);
244 Dmsg1(20, "Device status: %x\n", status);
245 if (status & BMT_EOD)
246 Jmsg(jcr, M_ERROR, 0, _("Unexpected End of Data\n"));
247 else if (status & BMT_EOT)
248 Jmsg(jcr, M_ERROR, 0, _("Unexpected End of Tape\n"));
249 else if (status & BMT_EOF)
250 Jmsg(jcr, M_ERROR, 0, _("Unexpected End of File\n"));
251 else if (status & BMT_DR_OPEN)
252 Jmsg(jcr, M_ERROR, 0, _("Tape Door is Open\n"));
253 else if (!(status & BMT_ONLINE))
254 Jmsg(jcr, M_ERROR, 0, _("Unexpected Tape is Off-line\n"));