2 * Bacula Catalog Database Get record interface routines
3 * Note, these routines generally get a record by id or
4 * by name. If more logic is involved, the routine
7 * Kern Sibbald, March 2000
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,
32 /* *****FIXME**** fix fixed length of select_cmd[] and insert_cmd[] */
34 /* The following is necessary so that we do not include
35 * the dummy external definition of DB.
37 #define __SQL_C /* indicate that this is sql.c */
42 #if HAVE_MYSQL || HAVE_SQLITE
44 /* -----------------------------------------------------------------------
46 * Generic Routines (or almost generic)
48 * -----------------------------------------------------------------------
51 /* Forward referenced functions */
52 static int db_get_file_record(B_DB *mdb, FILE_DBR *fdbr);
53 static int db_get_filename_record(B_DB *mdb, char *fname);
54 static int db_get_path_record(B_DB *mdb, char *path);
57 /* Imported subroutines */
58 extern void print_result(B_DB *mdb);
59 extern int QueryDB(char *file, int line, B_DB *db, char *select_cmd);
63 * Given a full filename (with path), look up the File record
64 * (with attributes) in the database.
66 * Returns: 0 on failure
67 * 1 on success with the File record in FILE_DBR
69 int db_get_file_attributes_record(B_DB *mdb, char *fname, FILE_DBR *fdbr)
75 char spath[MAXSTRING];
77 Dmsg1(20, "Enter get_file_from_catalog fname=%s \n", fname);
79 /* Find path without the filename.
80 * I.e. everything after the last / is a "filename".
81 * OK, maybe it is a directory name, but we treat it like
82 * a filename. If we don't find a / then the whole name
83 * must be a path name (e.g. c:).
85 for (p=l=fname; *p; p++) {
90 if (*l == '/') { /* did we find a slash? */
91 l++; /* yes, point to filename */
92 } else { /* no, whole thing must be path name */
96 /* If filename doesn't exist (i.e. root directory), we
97 * simply create a blank name consisting of a single
98 * space. This makes handling zero length filenames
103 Emsg1(M_WARNING, 0, _("Filename truncated to 255 chars: %s\n"), l);
107 strncpy(file, l, fnl); /* copy filename */
110 file[0] = ' '; /* blank filename */
117 Emsg1(M_WARNING, 0, _("Path name truncated to 255 chars: %s\n"), fname);
120 strncpy(spath, fname, pnl);
124 Mmsg1(&mdb->errmsg, _("Path length is zero. File=%s\n"), fname);
125 Emsg0(M_ERROR, 0, mdb->errmsg);
131 Dmsg1(100, "spath=%s\n", spath);
132 Dmsg1(100, "file=%s\n", file);
134 db_escape_string(buf, file, fnl);
135 fdbr->FilenameId = db_get_filename_record(mdb, buf);
136 Dmsg1(50, "db_get_filename_record FilenameId=%d\n", fdbr->FilenameId);
138 db_escape_string(buf, spath, pnl);
139 fdbr->PathId = db_get_path_record(mdb, buf);
140 Dmsg2(50, "db_get_path_record PathId=%d path=%s\n", fdbr->PathId, buf);
142 id = db_get_file_record(mdb, fdbr);
150 * Returns: 0 on failure
154 int db_get_file_record(B_DB *mdb, FILE_DBR *fdbr)
161 "SELECT FileId, LStat, MD5 from File where File.JobId=%d and File.PathId=%d and \
162 File.FilenameId=%d", fdbr->JobId, fdbr->PathId, fdbr->FilenameId);
164 Dmsg3(050, "Get_file_record JobId=%d FilenameId=%d PathId=%d\n",
165 fdbr->JobId, fdbr->FilenameId, fdbr->PathId);
167 Dmsg1(100, "Query=%s\n", mdb->cmd);
169 if (QUERY_DB(mdb, mdb->cmd)) {
171 mdb->num_rows = sql_num_rows(mdb);
172 Dmsg1(050, "get_file_record num_rows=%d\n", (int)mdb->num_rows);
175 * Note, we can find more than one File record with the same
176 * filename if the file is linked. ????????
178 if (mdb->num_rows > 1) {
179 Emsg1(M_WARNING, 0, _("get_file_record want 1 got rows=%d\n"), mdb->num_rows);
180 Emsg1(M_ERROR, 0, "%s", mdb->cmd);
182 if (mdb->num_rows >= 1) {
183 if ((row = sql_fetch_row(mdb)) == NULL) {
184 Mmsg1(&mdb->errmsg, "Error fetching row: %s\n", sql_strerror(mdb));
186 fdbr->FileId = (FileId_t)strtod(row[0], NULL);
187 strncpy(fdbr->LStat, row[1], sizeof(fdbr->LStat));
188 fdbr->LStat[sizeof(fdbr->LStat)] = 0;
189 strncpy(fdbr->MD5, row[2], sizeof(fdbr->MD5));
190 fdbr->MD5[sizeof(fdbr->MD5)] = 0;
194 sql_free_result(mdb);
201 /* Get Filename record
202 * Returns: 0 on failure
203 * FilenameId on success
205 static int db_get_filename_record(B_DB *mdb, char *fname)
211 Mmsg0(&mdb->errmsg, _("Null name given to db_get_filename_record\n"));
212 Emsg0(M_ABORT, 0, mdb->errmsg);
216 Mmsg(&mdb->cmd, "SELECT FilenameId FROM Filename WHERE Name='%s'", fname);
217 if (QUERY_DB(mdb, mdb->cmd)) {
219 mdb->num_rows = sql_num_rows(mdb);
221 if (mdb->num_rows > 1) {
222 Mmsg1(&mdb->errmsg, _("More than one Filename!: %d\n"), (int)(mdb->num_rows));
223 Emsg1(M_WARNING, 0, _("get_filename_record want 1 got rows=%d\n"), mdb->num_rows);
224 Emsg1(M_ERROR, 0, "%s", mdb->errmsg);
226 if (mdb->num_rows >= 1) {
227 if ((row = sql_fetch_row(mdb)) == NULL) {
228 Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
229 Emsg1(M_ERROR, 0, "%s", mdb->errmsg);
231 FilenameId = atoi(row[0]);
232 if (FilenameId <= 0) {
233 Mmsg2(&mdb->errmsg, _("Get DB Filename record %s found bad record: %d\n"),
234 mdb->cmd, FilenameId);
235 Emsg1(M_ERROR, 0, "%s", mdb->errmsg);
240 sql_free_result(mdb);
247 * Returns: 0 on failure
250 static int db_get_path_record(B_DB *mdb, char *path)
256 Emsg0(M_ABORT, 0, _("Null path given to db_get_path_record\n"));
261 if (mdb->cached_path_id != 0 && strcmp(mdb->cached_path, path) == 0) {
263 return mdb->cached_path_id;
266 Mmsg(&mdb->cmd, "SELECT PathId FROM Path WHERE Path='%s'", path);
268 if (QUERY_DB(mdb, mdb->cmd)) {
270 mdb->num_rows = sql_num_rows(mdb);
272 if (mdb->num_rows > 1) {
273 Mmsg1(&mdb->errmsg, _("More than one Path!: %s\n"),
274 edit_uint64(mdb->num_rows, ed1));
275 } else if (mdb->num_rows == 1) {
276 if ((row = sql_fetch_row(mdb)) == NULL) {
277 Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
279 PathId = atoi(row[0]);
281 Mmsg2(&mdb->errmsg, _("Get DB path record %s found bad record: %d\n"),
286 if (PathId != mdb->cached_path_id) {
287 mdb->cached_path_id = PathId;
288 mdb->cached_path = check_pool_memory_size(mdb->cached_path,
290 strcpy(mdb->cached_path, path);
295 sql_free_result(mdb);
303 * Get Job record for given JobId or Job name
304 * Returns: 0 on failure
307 int db_get_job_record(B_DB *mdb, JOB_DBR *jr)
312 if (jr->JobId == 0) {
313 Mmsg(&mdb->cmd, "SELECT VolSessionId, VolSessionTime, \
314 PoolId, StartTime, EndTime, JobFiles, JobBytes, JobTDate, Job, JobStatus \
315 FROM Job WHERE Job='%s'", jr->Job);
317 Mmsg(&mdb->cmd, "SELECT VolSessionId, VolSessionTime, \
318 PoolId, StartTime, EndTime, JobFiles, JobBytes, JobTDate, Job, JobStatus \
319 FROM Job WHERE JobId=%d", jr->JobId);
322 if (!QUERY_DB(mdb, mdb->cmd)) {
324 return 0; /* failed */
326 if ((row = sql_fetch_row(mdb)) == NULL) {
327 Mmsg1(&mdb->errmsg, _("No Job found for JobId %d\n"), jr->JobId);
328 sql_free_result(mdb);
330 return 0; /* failed */
333 jr->VolSessionId = atol(row[0]);
334 jr->VolSessionTime = atol(row[1]);
335 jr->PoolId = atoi(row[2]);
336 strcpy(jr->cStartTime, row[3]);
337 strcpy(jr->cEndTime, row[4]);
338 jr->JobFiles = atol(row[5]);
339 jr->JobBytes = (uint64_t)strtod(row[6], NULL);
340 jr->JobTDate = (btime_t)strtod(row[7], NULL);
341 strcpy(jr->Job, row[8]);
342 jr->JobStatus = (int)*row[9];
343 sql_free_result(mdb);
350 * Find VolumeNames for a give JobId
351 * Returns: 0 on error or no Volumes found
352 * number of volumes on success
353 * Volumes are concatenated in VolumeNames
354 * separated by a vertical bar (|).
356 int db_get_job_volume_names(B_DB *mdb, uint32_t JobId, POOLMEM **VolumeNames)
364 "SELECT VolumeName FROM JobMedia,Media WHERE JobMedia.JobId=%d \
365 AND JobMedia.MediaId=Media.MediaId", JobId);
367 Dmsg1(130, "VolNam=%s\n", mdb->cmd);
369 if (QUERY_DB(mdb, mdb->cmd)) {
370 mdb->num_rows = sql_num_rows(mdb);
371 Dmsg1(130, "Num rows=%d\n", mdb->num_rows);
372 if (mdb->num_rows <= 0) {
373 Mmsg1(&mdb->errmsg, _("No volumes found for JobId=%d"), JobId);
376 stat = mdb->num_rows;
377 for (i=0; i < stat; i++) {
378 if ((row = sql_fetch_row(mdb)) == NULL) {
379 Mmsg2(&mdb->errmsg, _("Error fetching row %d: ERR=%s\n"), i, sql_strerror(mdb));
383 if (*VolumeNames[0] != 0) {
384 pm_strcat(VolumeNames, "|");
386 pm_strcat(VolumeNames, row[0]);
390 sql_free_result(mdb);
398 * Get the number of pool records
400 * Returns: -1 on failure
403 int db_get_num_pool_records(B_DB *mdb)
408 Mmsg(&mdb->cmd, "SELECT count(*) from Pool");
409 stat = get_sql_record_max(mdb);
415 * This function returns a list of all the Pool record ids.
416 * The caller must free ids if non-NULL.
418 * Returns 0: on failure
421 int db_get_pool_ids(B_DB *mdb, int *num_ids, uint32_t *ids[])
430 Mmsg(&mdb->cmd, "SELECT PoolId FROM Pool");
431 if (QUERY_DB(mdb, mdb->cmd)) {
432 *num_ids = sql_num_rows(mdb);
434 id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
435 while ((row = sql_fetch_row(mdb)) != NULL) {
436 id[i++] = (uint32_t)atoi(row[0]);
440 sql_free_result(mdb);
443 Mmsg(&mdb->errmsg, _("Pool id select failed: ERR=%s\n"), sql_strerror(mdb));
452 * If the PoolId is non-zero, we get its record,
453 * otherwise, we search on the PoolName
455 * Returns: 0 on failure
458 int db_get_pool_record(B_DB *mdb, POOL_DBR *pdbr)
464 if (pdbr->PoolId != 0) { /* find by id */
466 "SELECT PoolId, Name, NumVols, MaxVols, UseOnce, UseCatalog, AcceptAnyVolume, \
467 AutoPrune, Recycle, VolRetention, \
468 PoolType, LabelFormat FROM Pool WHERE Pool.PoolId=%d", pdbr->PoolId);
469 } else { /* find by name */
471 "SELECT PoolId, Name, NumVols, MaxVols, UseOnce, UseCatalog, AcceptAnyVolume, \
472 AutoPrune, Recycle, VolRetention, \
473 PoolType, LabelFormat FROM Pool WHERE Pool.Name='%s'", pdbr->Name);
476 if (QUERY_DB(mdb, mdb->cmd)) {
477 mdb->num_rows = sql_num_rows(mdb);
478 if (mdb->num_rows > 1) {
480 Mmsg1(&mdb->errmsg, _("More than one Pool!: %s\n"),
481 edit_uint64(mdb->num_rows, ed1));
482 } else if (mdb->num_rows == 1) {
483 if ((row = sql_fetch_row(mdb)) == NULL) {
484 Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
486 pdbr->PoolId = atoi(row[0]);
487 strcpy(pdbr->Name, row[1]);
488 pdbr->NumVols = atoi(row[2]);
489 pdbr->MaxVols = atoi(row[3]);
490 pdbr->UseOnce = atoi(row[4]);
491 pdbr->UseCatalog = atoi(row[5]);
492 pdbr->AcceptAnyVolume = atoi(row[6]);
493 pdbr->AutoPrune = atoi(row[7]);
494 pdbr->Recycle = atoi(row[8]);
495 pdbr->VolRetention = (btime_t)strtod(row[9], NULL);
496 strcpy(pdbr->PoolType, row[10]);
498 strcpy(pdbr->LabelFormat, row[11]);
500 pdbr->LabelFormat[0] = 0;
505 sql_free_result(mdb);
513 * Get the number of Media records
515 * Returns: -1 on failure
518 int db_get_num_media_records(B_DB *mdb)
523 Mmsg(&mdb->cmd, "SELECT count(*) from Media");
524 stat = get_sql_record_max(mdb);
531 * This function returns a list of all the Media record ids.
532 * The caller must free ids if non-NULL.
534 * Returns 0: on failure
537 int db_get_media_ids(B_DB *mdb, int *num_ids, uint32_t *ids[])
546 Mmsg(&mdb->cmd, "SELECT MediaId FROM Media");
547 if (QUERY_DB(mdb, mdb->cmd)) {
548 *num_ids = sql_num_rows(mdb);
550 id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
551 while ((row = sql_fetch_row(mdb)) != NULL) {
552 id[i++] = (uint32_t)atoi(row[0]);
556 sql_free_result(mdb);
559 Mmsg(&mdb->errmsg, _("Media id select failed: ERR=%s\n"), sql_strerror(mdb));
569 * Returns: 0 on failure
572 int db_get_media_record(B_DB *mdb, MEDIA_DBR *mr)
578 if (mr->MediaId == 0 && mr->VolumeName[0] == 0) {
579 Mmsg(&mdb->cmd, "SELECT count(*) from Media");
580 mr->MediaId = get_sql_record_max(mdb);
584 if (mr->MediaId != 0) { /* find by id */
585 Mmsg(&mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,\
586 VolBytes,VolMounts,VolErrors,VolWrites,VolMaxBytes,VolCapacityBytes,\
587 MediaType,VolStatus,PoolId,VolRetention,Recycle,Slot \
588 FROM Media WHERE MediaId=%d", mr->MediaId);
589 } else { /* find by name */
590 Mmsg(&mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,\
591 VolBytes,VolMounts,VolErrors,VolWrites,VolMaxBytes,VolCapacityBytes,\
592 MediaType,VolStatus,PoolId,VolRetention,Recycle,Slot \
593 FROM Media WHERE VolumeName='%s'", mr->VolumeName);
596 if (QUERY_DB(mdb, mdb->cmd)) {
597 mdb->num_rows = sql_num_rows(mdb);
598 if (mdb->num_rows > 1) {
600 Mmsg1(&mdb->errmsg, _("More than one Volume!: %s\n"),
601 edit_uint64(mdb->num_rows, ed1));
602 } else if (mdb->num_rows == 1) {
603 if ((row = sql_fetch_row(mdb)) == NULL) {
604 Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
607 mr->MediaId = atoi(row[0]);
608 strcpy(mr->VolumeName, row[1]);
609 mr->VolJobs = atoi(row[2]);
610 mr->VolFiles = atoi(row[3]);
611 mr->VolBlocks = atoi(row[4]);
612 mr->VolBytes = (uint64_t)strtod(row[5], NULL);
613 mr->VolMounts = atoi(row[6]);
614 mr->VolErrors = atoi(row[7]);
615 mr->VolWrites = atoi(row[8]);
616 mr->VolMaxBytes = (uint64_t)strtod(row[9], NULL);
617 mr->VolCapacityBytes = (uint64_t)strtod(row[10], NULL);
618 strcpy(mr->MediaType, row[11]);
619 strcpy(mr->VolStatus, row[12]);
620 mr->PoolId = atoi(row[13]);
621 mr->VolRetention = (btime_t)strtod(row[14], NULL);
622 mr->Recycle = atoi(row[15]);
623 mr->Slot = atoi(row[16]);
627 Mmsg0(&mdb->errmsg, _("Media record not found.\n"));
629 sql_free_result(mdb);
636 #endif /* HAVE_MYSQL || HAVE_SQLITE */