]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/cats/sql_get.c
- Fix Media LabelDate and FirstWritten to be correctly set.
[bacula/bacula] / bacula / src / cats / sql_get.c
1 /*
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
5  *        should be in find.c
6  *
7  *    Kern Sibbald, March 2000
8  *
9  *    Version $Id$
10  */
11
12 /*
13    Copyright (C) 2000-2005 Kern Sibbald
14
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.
19
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.
24
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,
28    MA 02111-1307, USA.
29
30  */
31
32
33 /* The following is necessary so that we do not include
34  * the dummy external definition of DB.
35  */
36 #define __SQL_C                       /* indicate that this is sql.c */
37
38 #include "bacula.h"
39 #include "cats.h"
40
41 #if    HAVE_SQLITE3 || HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL
42
43 /* -----------------------------------------------------------------------
44  *
45  *   Generic Routines (or almost generic)
46  *
47  * -----------------------------------------------------------------------
48  */
49
50 /* Forward referenced functions */
51 static int db_get_file_record(JCR *jcr, B_DB *mdb, JOB_DBR *jr, FILE_DBR *fdbr);
52 static int db_get_filename_record(JCR *jcr, B_DB *mdb);
53 static int db_get_path_record(JCR *jcr, B_DB *mdb);
54
55
56 /* Imported subroutines */
57 extern void print_result(B_DB *mdb);
58 extern int QueryDB(const char *file, int line, JCR *jcr, B_DB *db, char *select_cmd);
59 extern void split_path_and_file(JCR *jcr, B_DB *mdb, const char *fname);
60
61
62
63 /*
64  * Given a full filename (with path), look up the File record
65  * (with attributes) in the database.
66  *
67  *  Returns: 0 on failure
68  *           1 on success with the File record in FILE_DBR
69  */
70 int db_get_file_attributes_record(JCR *jcr, B_DB *mdb, char *fname, JOB_DBR *jr, FILE_DBR *fdbr)
71 {
72    int stat;
73    Dmsg1(100, "db_get_file_att_record fname=%s \n", fname);
74
75    db_lock(mdb);
76    split_path_and_file(jcr, mdb, fname);
77
78    fdbr->FilenameId = db_get_filename_record(jcr, mdb);
79
80    fdbr->PathId = db_get_path_record(jcr, mdb);
81
82    stat = db_get_file_record(jcr, mdb, jr, fdbr);
83
84    db_unlock(mdb);
85
86    return stat;
87 }
88
89
90 /*
91  * Get a File record
92  * Returns: 0 on failure
93  *          1 on success
94  *
95  *  DO NOT use Jmsg in this routine.
96  *
97  *  Note in this routine, we do not use Jmsg because it may be
98  *    called to get attributes of a non-existent file, which is
99  *    "normal" if a new file is found during Verify.
100  */
101 static
102 int db_get_file_record(JCR *jcr, B_DB *mdb, JOB_DBR *jr, FILE_DBR *fdbr)
103 {
104    SQL_ROW row;
105    int stat = 0;
106    char ed1[50], ed2[50], ed3[50];
107
108    if (jcr->JobLevel == L_VERIFY_DISK_TO_CATALOG) {
109    Mmsg(mdb->cmd,
110 "SELECT FileId, LStat, MD5 FROM File,Job WHERE "
111 "File.JobId=Job.JobId AND File.PathId=%s AND "
112 "File.FilenameId=%s AND Job.Type='B' AND Job.JobSTATUS='T' AND "
113 "ClientId=%s ORDER BY StartTime DESC LIMIT 1",
114       edit_int64(fdbr->PathId, ed1), 
115       edit_int64(fdbr->FilenameId, ed2), 
116       edit_int64(jr->ClientId,ed3));
117
118    } else {
119       Mmsg(mdb->cmd,
120 "SELECT FileId, LStat, MD5 FROM File WHERE File.JobId=%s AND File.PathId=%s AND "
121 "File.FilenameId=%s", 
122       edit_int64(fdbr->JobId, ed1), 
123       edit_int64(fdbr->PathId, ed2), 
124       edit_int64(fdbr->FilenameId,ed3));
125    }
126    Dmsg3(050, "Get_file_record JobId=%u FilenameId=%u PathId=%u\n",
127       fdbr->JobId, fdbr->FilenameId, fdbr->PathId);
128
129    Dmsg1(100, "Query=%s\n", mdb->cmd);
130
131    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
132       mdb->num_rows = sql_num_rows(mdb);
133       Dmsg1(050, "get_file_record num_rows=%d\n", (int)mdb->num_rows);
134       if (mdb->num_rows > 1) {
135          Mmsg1(&mdb->errmsg, _("get_file_record want 1 got rows=%d\n"),
136             mdb->num_rows);
137       }
138       if (mdb->num_rows >= 1) {
139          if ((row = sql_fetch_row(mdb)) == NULL) {
140             Mmsg1(&mdb->errmsg, _("Error fetching row: %s\n"), sql_strerror(mdb));
141          } else {
142             fdbr->FileId = (FileId_t)str_to_int64(row[0]);
143             bstrncpy(fdbr->LStat, row[1], sizeof(fdbr->LStat));
144             bstrncpy(fdbr->SIG, row[2], sizeof(fdbr->SIG));
145             stat = 1;
146          }
147       } else {
148          Mmsg2(&mdb->errmsg, _("File record for PathId=%s FilenameId=%s not found.\n"),
149             edit_int64(fdbr->PathId, ed1), 
150             edit_int64(fdbr->FilenameId, ed2));
151       }
152       sql_free_result(mdb);
153    } else {
154       Mmsg(mdb->errmsg, _("File record not found in Catalog.\n"));
155    }
156    return stat;
157
158 }
159
160 /* Get Filename record
161  * Returns: 0 on failure
162  *          FilenameId on success
163  *
164  *   DO NOT use Jmsg in this routine (see notes for get_file_record)
165  */
166 static int db_get_filename_record(JCR *jcr, B_DB *mdb)
167 {
168    SQL_ROW row;
169    int FilenameId = 0;
170
171    mdb->esc_name = check_pool_memory_size(mdb->esc_name, 2*mdb->fnl+2);
172    db_escape_string(mdb->esc_name, mdb->fname, mdb->fnl);
173
174    Mmsg(mdb->cmd, "SELECT FilenameId FROM Filename WHERE Name='%s'", mdb->esc_name);
175    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
176       char ed1[30];
177       mdb->num_rows = sql_num_rows(mdb);
178       if (mdb->num_rows > 1) {
179          Mmsg2(&mdb->errmsg, _("More than one Filename!: %s for file: %s\n"),
180             edit_uint64(mdb->num_rows, ed1), mdb->fname);
181          Jmsg(jcr, M_WARNING, 0, "%s", mdb->errmsg);
182       }
183       if (mdb->num_rows >= 1) {
184          if ((row = sql_fetch_row(mdb)) == NULL) {
185             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
186          } else {
187             FilenameId = atoi(row[0]);
188             if (FilenameId <= 0) {
189                Mmsg2(&mdb->errmsg, _("Get DB Filename record %s found bad record: %d\n"),
190                   mdb->cmd, FilenameId);
191                FilenameId = 0;
192             }
193          }
194       } else {
195          Mmsg1(&mdb->errmsg, _("Filename record: %s not found.\n"), mdb->fname);
196       }
197       sql_free_result(mdb);
198    } else {
199       Mmsg(mdb->errmsg, _("Filename record: %s not found in Catalog.\n"), mdb->fname);
200    }
201    return FilenameId;
202 }
203
204 /* Get path record
205  * Returns: 0 on failure
206  *          PathId on success
207  *
208  *   DO NOT use Jmsg in this routine (see notes for get_file_record)
209  */
210 static int db_get_path_record(JCR *jcr, B_DB *mdb)
211 {
212    SQL_ROW row;
213    uint32_t PathId = 0;
214
215    mdb->esc_name = check_pool_memory_size(mdb->esc_name, 2*mdb->pnl+2);
216    db_escape_string(mdb->esc_name, mdb->path, mdb->pnl);
217
218    if (mdb->cached_path_id != 0 && mdb->cached_path_len == mdb->pnl &&
219        strcmp(mdb->cached_path, mdb->path) == 0) {
220       return mdb->cached_path_id;
221    }
222
223    Mmsg(mdb->cmd, "SELECT PathId FROM Path WHERE Path='%s'", mdb->esc_name);
224
225    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
226       char ed1[30];
227       mdb->num_rows = sql_num_rows(mdb);
228       if (mdb->num_rows > 1) {
229          Mmsg2(&mdb->errmsg, _("More than one Path!: %s for path: %s\n"),
230             edit_uint64(mdb->num_rows, ed1), mdb->path);
231          Jmsg(jcr, M_WARNING, 0, "%s", mdb->errmsg);
232       }
233       /* Even if there are multiple paths, take the first one */
234       if (mdb->num_rows >= 1) {
235          if ((row = sql_fetch_row(mdb)) == NULL) {
236             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
237          } else {
238             PathId = atoi(row[0]);
239             if (PathId <= 0) {
240                Mmsg2(&mdb->errmsg, _("Get DB path record %s found bad record: %s\n"),
241                   mdb->cmd, edit_int64(PathId, ed1));
242                PathId = 0;
243             } else {
244                /* Cache path */
245                if (PathId != mdb->cached_path_id) {
246                   mdb->cached_path_id = PathId;
247                   mdb->cached_path_len = mdb->pnl;
248                   pm_strcpy(&mdb->cached_path, mdb->path);
249                }
250             }
251          }
252       } else {
253          Mmsg1(&mdb->errmsg, _("Path record: %s not found.\n"), mdb->path);
254       }
255       sql_free_result(mdb);
256    } else {
257       Mmsg(mdb->errmsg, _("Path record: %s not found in Catalog.\n"), mdb->path);
258    }
259    return PathId;
260 }
261
262
263 /*
264  * Get Job record for given JobId or Job name
265  * Returns: 0 on failure
266  *          1 on success
267  */
268 int db_get_job_record(JCR *jcr, B_DB *mdb, JOB_DBR *jr)
269 {
270    SQL_ROW row;
271    char ed1[50];
272
273    db_lock(mdb);
274    if (jr->JobId == 0) {
275       Mmsg(mdb->cmd, "SELECT VolSessionId,VolSessionTime,"
276 "PoolId,StartTime,EndTime,JobFiles,JobBytes,JobTDate,Job,JobStatus,"
277 "Type,Level,ClientId "
278 "FROM Job WHERE Job='%s'", jr->Job);
279     } else {
280       Mmsg(mdb->cmd, "SELECT VolSessionId,VolSessionTime,"
281 "PoolId,StartTime,EndTime,JobFiles,JobBytes,JobTDate,Job,JobStatus,"
282 "Type,Level,ClientId "
283 "FROM Job WHERE JobId=%s", 
284           edit_int64(jr->JobId, ed1));
285     }
286
287    if (!QUERY_DB(jcr, mdb, mdb->cmd)) {
288       db_unlock(mdb);
289       return 0;                       /* failed */
290    }
291    if ((row = sql_fetch_row(mdb)) == NULL) {
292       Mmsg1(&mdb->errmsg, _("No Job found for JobId %s\n"), edit_int64(jr->JobId, ed1));
293       sql_free_result(mdb);
294       db_unlock(mdb);
295       return 0;                       /* failed */
296    }
297
298    jr->VolSessionId = str_to_uint64(row[0]);
299    jr->VolSessionTime = str_to_uint64(row[1]);
300    jr->PoolId = str_to_int64(row[2]);
301    bstrncpy(jr->cStartTime, row[3]!=NULL?row[3]:"", sizeof(jr->cStartTime));
302    bstrncpy(jr->cEndTime, row[4]!=NULL?row[4]:"", sizeof(jr->cEndTime));
303    jr->JobFiles = atol(row[5]);
304    jr->JobBytes = str_to_int64(row[6]);
305    jr->JobTDate = str_to_int64(row[7]);
306    bstrncpy(jr->Job, row[8]!=NULL?row[8]:"", sizeof(jr->Job));
307    jr->JobStatus = (int)*row[9];
308    jr->JobType = (int)*row[10];
309    jr->JobLevel = (int)*row[11];
310    jr->ClientId = str_to_uint64(row[12]!=NULL?row[12]:(char *)"");
311    sql_free_result(mdb);
312
313    db_unlock(mdb);
314    return 1;
315 }
316
317 /*
318  * Find VolumeNames for a given JobId
319  *  Returns: 0 on error or no Volumes found
320  *           number of volumes on success
321  *              Volumes are concatenated in VolumeNames
322  *              separated by a vertical bar (|) in the order
323  *              that they were written.
324  *
325  *  Returns: number of volumes on success
326  */
327 int db_get_job_volume_names(JCR *jcr, B_DB *mdb, JobId_t JobId, POOLMEM **VolumeNames)
328 {
329    SQL_ROW row;
330    char ed1[50];
331    int stat = 0;
332    int i;
333
334    db_lock(mdb);
335    /* Get one entry per VolumeName, but "sort" by VolIndex */
336    Mmsg(mdb->cmd,
337         "SELECT VolumeName,MAX(VolIndex) FROM JobMedia,Media WHERE "
338         "JobMedia.JobId=%s AND JobMedia.MediaId=Media.MediaId "
339         "GROUP BY VolumeName "
340         "ORDER BY 2 ASC", edit_int64(JobId,ed1));
341
342    Dmsg1(130, "VolNam=%s\n", mdb->cmd);
343    *VolumeNames[0] = 0;
344    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
345       mdb->num_rows = sql_num_rows(mdb);
346       Dmsg1(130, "Num rows=%d\n", mdb->num_rows);
347       if (mdb->num_rows <= 0) {
348          Mmsg1(&mdb->errmsg, _("No volumes found for JobId=%d\n"), JobId);
349          stat = 0;
350       } else {
351          stat = mdb->num_rows;
352          for (i=0; i < stat; i++) {
353             if ((row = sql_fetch_row(mdb)) == NULL) {
354                Mmsg2(&mdb->errmsg, _("Error fetching row %d: ERR=%s\n"), i, sql_strerror(mdb));
355                Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
356                stat = 0;
357                break;
358             } else {
359                if (*VolumeNames[0] != 0) {
360                   pm_strcat(VolumeNames, "|");
361                }
362                pm_strcat(VolumeNames, row[0]);
363             }
364          }
365       }
366       sql_free_result(mdb);
367    } else {
368       Mmsg(mdb->errmsg, _("No Volume for JobId %d found in Catalog.\n"), JobId);
369    }
370    db_unlock(mdb);
371    return stat;
372 }
373
374 /*
375  * Find Volume parameters for a give JobId
376  *  Returns: 0 on error or no Volumes found
377  *           number of volumes on success
378  *           List of Volumes and start/end file/blocks (malloced structure!)
379  *
380  *  Returns: number of volumes on success
381  */
382 int db_get_job_volume_parameters(JCR *jcr, B_DB *mdb, JobId_t JobId, VOL_PARAMS **VolParams)
383 {
384    SQL_ROW row;
385    char ed1[50];
386    int stat = 0;
387    int i;
388    VOL_PARAMS *Vols = NULL;
389
390    db_lock(mdb);
391    Mmsg(mdb->cmd,
392 "SELECT VolumeName,MediaType,FirstIndex,LastIndex,StartFile,"
393 "JobMedia.EndFile,StartBlock,JobMedia.EndBlock"
394 " FROM JobMedia,Media WHERE JobMedia.JobId=%s"
395 " AND JobMedia.MediaId=Media.MediaId ORDER BY VolIndex,JobMediaId",
396         edit_int64(JobId, ed1));
397
398    Dmsg1(130, "VolNam=%s\n", mdb->cmd);
399    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
400       mdb->num_rows = sql_num_rows(mdb);
401       Dmsg1(130, "Num rows=%d\n", mdb->num_rows);
402       if (mdb->num_rows <= 0) {
403          Mmsg1(&mdb->errmsg, _("No volumes found for JobId=%d\n"), JobId);
404          stat = 0;
405       } else {
406          stat = mdb->num_rows;
407          if (stat > 0) {
408             *VolParams = Vols = (VOL_PARAMS *)malloc(stat * sizeof(VOL_PARAMS));
409          }
410          for (i=0; i < stat; i++) {
411             if ((row = sql_fetch_row(mdb)) == NULL) {
412                Mmsg2(&mdb->errmsg, _("Error fetching row %d: ERR=%s\n"), i, sql_strerror(mdb));
413                Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
414                stat = 0;
415                break;
416             } else {
417                bstrncpy(Vols[i].VolumeName, row[0], MAX_NAME_LENGTH);
418                bstrncpy(Vols[i].MediaType, row[1], MAX_NAME_LENGTH);
419                Vols[i].FirstIndex = str_to_uint64(row[2]);
420                Vols[i].LastIndex = str_to_uint64(row[3]);
421                Vols[i].StartFile = str_to_uint64(row[4]);
422                Vols[i].EndFile = str_to_uint64(row[5]);
423                Vols[i].StartBlock = str_to_uint64(row[6]);
424                Vols[i].EndBlock = str_to_uint64(row[7]);
425             }
426          }
427       }
428       sql_free_result(mdb);
429    }
430    db_unlock(mdb);
431    return stat;
432 }
433
434
435
436 /*
437  * Get the number of pool records
438  *
439  * Returns: -1 on failure
440  *          number on success
441  */
442 int db_get_num_pool_records(JCR *jcr, B_DB *mdb)
443 {
444    int stat = 0;
445
446    db_lock(mdb);
447    Mmsg(mdb->cmd, "SELECT count(*) from Pool");
448    stat = get_sql_record_max(jcr, mdb);
449    db_unlock(mdb);
450    return stat;
451 }
452
453 /*
454  * This function returns a list of all the Pool record ids.
455  *  The caller must free ids if non-NULL.
456  *
457  *  Returns 0: on failure
458  *          1: on success
459  */
460 int db_get_pool_ids(JCR *jcr, B_DB *mdb, int *num_ids, uint32_t *ids[])
461 {
462    SQL_ROW row;
463    int stat = 0;
464    int i = 0;
465    uint32_t *id;
466
467    db_lock(mdb);
468    *ids = NULL;
469    Mmsg(mdb->cmd, "SELECT PoolId FROM Pool");
470    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
471       *num_ids = sql_num_rows(mdb);
472       if (*num_ids > 0) {
473          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
474          while ((row = sql_fetch_row(mdb)) != NULL) {
475             id[i++] = str_to_uint64(row[0]);
476          }
477          *ids = id;
478       }
479       sql_free_result(mdb);
480       stat = 1;
481    } else {
482       Mmsg(mdb->errmsg, _("Pool id select failed: ERR=%s\n"), sql_strerror(mdb));
483       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
484       stat = 0;
485    }
486    db_unlock(mdb);
487    return stat;
488 }
489
490 /*
491  * This function returns a list of all the Client record ids.
492  *  The caller must free ids if non-NULL.
493  *
494  *  Returns 0: on failure
495  *          1: on success
496  */
497 int db_get_client_ids(JCR *jcr, B_DB *mdb, int *num_ids, uint32_t *ids[])
498 {
499    SQL_ROW row;
500    int stat = 0;
501    int i = 0;
502    uint32_t *id;
503
504    db_lock(mdb);
505    *ids = NULL;
506    Mmsg(mdb->cmd, "SELECT ClientId FROM Client");
507    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
508       *num_ids = sql_num_rows(mdb);
509       if (*num_ids > 0) {
510          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
511          while ((row = sql_fetch_row(mdb)) != NULL) {
512             id[i++] = str_to_uint64(row[0]);
513          }
514          *ids = id;
515       }
516       sql_free_result(mdb);
517       stat = 1;
518    } else {
519       Mmsg(mdb->errmsg, _("Client id select failed: ERR=%s\n"), sql_strerror(mdb));
520       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
521       stat = 0;
522    }
523    db_unlock(mdb);
524    return stat;
525 }
526
527
528
529 /* Get Pool Record
530  * If the PoolId is non-zero, we get its record,
531  *  otherwise, we search on the PoolName
532  *
533  * Returns: 0 on failure
534  *          id on success
535  */
536 int db_get_pool_record(JCR *jcr, B_DB *mdb, POOL_DBR *pdbr)
537 {
538    SQL_ROW row;
539    int stat = 0;
540    char ed1[50];
541
542    db_lock(mdb);
543    if (pdbr->PoolId != 0) {               /* find by id */
544       Mmsg(mdb->cmd,
545 "SELECT PoolId,Name,NumVols,MaxVols,UseOnce,UseCatalog,AcceptAnyVolume,"
546 "AutoPrune,Recycle,VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,"
547 "MaxVolBytes,PoolType,LabelType,LabelFormat FROM Pool WHERE Pool.PoolId=%s", 
548          edit_int64(pdbr->PoolId, ed1));
549    } else {                           /* find by name */
550       Mmsg(mdb->cmd,
551 "SELECT PoolId,Name,NumVols,MaxVols,UseOnce,UseCatalog,AcceptAnyVolume,"
552 "AutoPrune,Recycle,VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,"
553 "MaxVolBytes,PoolType,LabelType,LabelFormat FROM Pool WHERE Pool.Name='%s'", 
554          pdbr->Name);
555    }
556
557    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
558       mdb->num_rows = sql_num_rows(mdb);
559       if (mdb->num_rows > 1) {
560          char ed1[30];
561          Mmsg1(&mdb->errmsg, _("More than one Pool!: %s\n"),
562             edit_uint64(mdb->num_rows, ed1));
563          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
564       } else if (mdb->num_rows == 1) {
565          if ((row = sql_fetch_row(mdb)) == NULL) {
566             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
567             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
568          } else {
569             pdbr->PoolId = str_to_int64(row[0]);
570             bstrncpy(pdbr->Name, row[1]!=NULL?row[1]:"", sizeof(pdbr->Name));
571             pdbr->NumVols = str_to_int64(row[2]);
572             pdbr->MaxVols = str_to_int64(row[3]);
573             pdbr->UseOnce = str_to_int64(row[4]);
574             pdbr->UseCatalog = str_to_int64(row[5]);
575             pdbr->AcceptAnyVolume = str_to_int64(row[6]);
576             pdbr->AutoPrune = str_to_int64(row[7]);
577             pdbr->Recycle = str_to_int64(row[8]);
578             pdbr->VolRetention = str_to_int64(row[9]);
579             pdbr->VolUseDuration = str_to_int64(row[10]);
580             pdbr->MaxVolJobs = str_to_int64(row[11]);
581             pdbr->MaxVolFiles = str_to_int64(row[12]);
582             pdbr->MaxVolBytes = str_to_uint64(row[13]);
583             bstrncpy(pdbr->PoolType, row[14]!=NULL?row[14]:"", sizeof(pdbr->PoolType));
584             pdbr->LabelType = str_to_int64(row[15]);
585             bstrncpy(pdbr->LabelFormat, row[16]!=NULL?row[16]:"", sizeof(pdbr->LabelFormat));
586             stat = pdbr->PoolId;
587          }
588       } else {
589          Mmsg(mdb->errmsg, _("Pool record not found in Catalog.\n"));
590       }
591       sql_free_result(mdb);
592    } else {
593       Mmsg(mdb->errmsg, _("Pool record not found in Catalog.\n"));
594    }
595    db_unlock(mdb);
596    return stat;
597 }
598
599 /* Get Client Record
600  * If the ClientId is non-zero, we get its record,
601  *  otherwise, we search on the Client Name
602  *
603  * Returns: 0 on failure
604  *          1 on success
605  */
606 int db_get_client_record(JCR *jcr, B_DB *mdb, CLIENT_DBR *cdbr)
607 {
608    SQL_ROW row;
609    int stat = 0;
610    char ed1[50];
611
612    db_lock(mdb);
613    if (cdbr->ClientId != 0) {               /* find by id */
614       Mmsg(mdb->cmd,
615 "SELECT ClientId,Name,Uname,AutoPrune,FileRetention,JobRetention "
616 "FROM Client WHERE Client.ClientId=%s", 
617         edit_int64(cdbr->ClientId, ed1));
618    } else {                           /* find by name */
619       Mmsg(mdb->cmd,
620 "SELECT ClientId,Name,Uname,AutoPrune,FileRetention,JobRetention "
621 "FROM Client WHERE Client.Name='%s'", cdbr->Name);
622    }
623
624    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
625       mdb->num_rows = sql_num_rows(mdb);
626       if (mdb->num_rows > 1) {
627          Mmsg1(&mdb->errmsg, _("More than one Client!: %s\n"),
628             edit_uint64(mdb->num_rows, ed1));
629          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
630       } else if (mdb->num_rows == 1) {
631          if ((row = sql_fetch_row(mdb)) == NULL) {
632             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
633             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
634          } else {
635             cdbr->ClientId = str_to_int64(row[0]);
636             bstrncpy(cdbr->Name, row[1]!=NULL?row[1]:"", sizeof(cdbr->Name));
637             bstrncpy(cdbr->Uname, row[2]!=NULL?row[1]:"", sizeof(cdbr->Uname));
638             cdbr->AutoPrune = str_to_int64(row[3]);
639             cdbr->FileRetention = str_to_int64(row[4]);
640             cdbr->JobRetention = str_to_int64(row[5]);
641             stat = 1;
642          }
643       } else {
644          Mmsg(mdb->errmsg, _("Client record not found in Catalog.\n"));
645       }
646       sql_free_result(mdb);
647    } else {
648       Mmsg(mdb->errmsg, _("Client record not found in Catalog.\n"));
649    }
650    db_unlock(mdb);
651    return stat;
652 }
653
654 /*
655  * Get Counter Record
656  *
657  * Returns: 0 on failure
658  *          1 on success
659  */
660 int db_get_counter_record(JCR *jcr, B_DB *mdb, COUNTER_DBR *cr)
661 {
662    SQL_ROW row;
663
664    db_lock(mdb);
665    Mmsg(mdb->cmd, "SELECT MinValue,MaxValue,CurrentValue,WrapCounter "
666       "FROM Counters WHERE Counter='%s'", cr->Counter);
667
668    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
669       mdb->num_rows = sql_num_rows(mdb);
670
671       /* If more than one, report error, but return first row */
672       if (mdb->num_rows > 1) {
673          Mmsg1(&mdb->errmsg, _("More than one Counter!: %d\n"), (int)(mdb->num_rows));
674          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
675       }
676       if (mdb->num_rows >= 1) {
677          if ((row = sql_fetch_row(mdb)) == NULL) {
678             Mmsg1(&mdb->errmsg, _("error fetching Counter row: %s\n"), sql_strerror(mdb));
679             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
680             sql_free_result(mdb);
681             db_unlock(mdb);
682             return 0;
683          }
684          cr->MinValue = atoi(row[0]);
685          cr->MaxValue = atoi(row[1]);
686          cr->CurrentValue = atoi(row[2]);
687          if (row[3]) {
688             bstrncpy(cr->WrapCounter, row[3], sizeof(cr->WrapCounter));
689          } else {
690             cr->WrapCounter[0] = 0;
691          }
692          sql_free_result(mdb);
693          db_unlock(mdb);
694          return 1;
695       }
696       sql_free_result(mdb);
697    } else {
698       Mmsg(mdb->errmsg, _("Counter record: %s not found in Catalog.\n"), cr->Counter);
699    }
700    db_unlock(mdb);
701    return 0;
702 }
703
704
705 /* Get FileSet Record
706  * If the FileSetId is non-zero, we get its record,
707  *  otherwise, we search on the name
708  *
709  * Returns: 0 on failure
710  *          id on success
711  */
712 int db_get_fileset_record(JCR *jcr, B_DB *mdb, FILESET_DBR *fsr)
713 {
714    SQL_ROW row;
715    int stat = 0;
716    char ed1[50];
717
718    db_lock(mdb);
719    if (fsr->FileSetId != 0) {               /* find by id */
720       Mmsg(mdb->cmd,
721            "SELECT FileSetId,FileSet,MD5,CreateTime FROM FileSet "
722            "WHERE FileSetId=%s", 
723            edit_int64(fsr->FileSetId, ed1));
724    } else {                           /* find by name */
725       Mmsg(mdb->cmd,
726            "SELECT FileSetId,FileSet,CreateTime,MD5 FROM FileSet "
727            "WHERE FileSet='%s' ORDER BY CreateTime DESC LIMIT 1", fsr->FileSet);
728    }
729
730    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
731       mdb->num_rows = sql_num_rows(mdb);
732       if (mdb->num_rows > 1) {
733          char ed1[30];
734          Mmsg1(&mdb->errmsg, _("Error got %s FileSets but expected only one!\n"),
735             edit_uint64(mdb->num_rows, ed1));
736          sql_data_seek(mdb, mdb->num_rows-1);
737       }
738       if ((row = sql_fetch_row(mdb)) == NULL) {
739          Mmsg1(&mdb->errmsg, _("FileSet record \"%s\" not found.\n"), fsr->FileSet);
740       } else {
741          fsr->FileSetId = str_to_int64(row[0]);
742          bstrncpy(fsr->FileSet, row[1]!=NULL?row[1]:"", sizeof(fsr->FileSet));
743          bstrncpy(fsr->MD5, row[2]!=NULL?row[2]:"", sizeof(fsr->MD5));
744          bstrncpy(fsr->cCreateTime, row[3]!=NULL?row[3]:"", sizeof(fsr->cCreateTime));
745          stat = fsr->FileSetId;
746       }
747       sql_free_result(mdb);
748    } else {
749       Mmsg(mdb->errmsg, _("FileSet record not found in Catalog.\n"));
750    }
751    db_unlock(mdb);
752    return stat;
753 }
754
755
756 /*
757  * Get the number of Media records
758  *
759  * Returns: -1 on failure
760  *          number on success
761  */
762 int db_get_num_media_records(JCR *jcr, B_DB *mdb)
763 {
764    int stat = 0;
765
766    db_lock(mdb);
767    Mmsg(mdb->cmd, "SELECT count(*) from Media");
768    stat = get_sql_record_max(jcr, mdb);
769    db_unlock(mdb);
770    return stat;
771 }
772
773
774 /*
775  * This function returns a list of all the Media record ids for
776  *     the current Pool.
777  *  The caller must free ids if non-NULL.
778  *
779  *  Returns 0: on failure
780  *          1: on success
781  */
782 int db_get_media_ids(JCR *jcr, B_DB *mdb, uint32_t PoolId, int *num_ids, uint32_t *ids[])
783 {
784    SQL_ROW row;
785    int stat = 0;
786    int i = 0;
787    uint32_t *id;
788    char ed1[50];
789
790    db_lock(mdb);
791    *ids = NULL;
792    Mmsg(mdb->cmd, "SELECT MediaId FROM Media WHERE PoolId=%s", 
793        edit_int64(PoolId, ed1));
794    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
795       *num_ids = sql_num_rows(mdb);
796       if (*num_ids > 0) {
797          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
798          while ((row = sql_fetch_row(mdb)) != NULL) {
799             id[i++] = (uint32_t)atoi(row[0]);
800          }
801          *ids = id;
802       }
803       sql_free_result(mdb);
804       stat = 1;
805    } else {
806       Mmsg(mdb->errmsg, _("Media id select failed: ERR=%s\n"), sql_strerror(mdb));
807       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
808       stat = 0;
809    }
810    db_unlock(mdb);
811    return stat;
812 }
813
814
815 /* Get Media Record
816  *
817  * Returns: 0 on failure
818  *          id on success
819  */
820 int db_get_media_record(JCR *jcr, B_DB *mdb, MEDIA_DBR *mr)
821 {
822    SQL_ROW row;
823    int stat = 0;
824    char ed1[50];
825
826    db_lock(mdb);
827    if (mr->MediaId == 0 && mr->VolumeName[0] == 0) {
828       Mmsg(mdb->cmd, "SELECT count(*) from Media");
829       mr->MediaId = get_sql_record_max(jcr, mdb);
830       db_unlock(mdb);
831       return 1;
832    }
833    if (mr->MediaId != 0) {               /* find by id */
834       Mmsg(mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
835          "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
836          "MediaType,VolStatus,PoolId,VolRetention,VolUseDuration,MaxVolJobs,"
837          "MaxVolFiles,Recycle,Slot,FirstWritten,LastWritten,InChanger,"
838          "EndFile,EndBlock,VolParts,LabelType,LabelDate "
839          "FROM Media WHERE MediaId=%s", 
840          edit_int64(mr->MediaId, ed1));
841    } else {                           /* find by name */
842       Mmsg(mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
843          "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
844          "MediaType,VolStatus,PoolId,VolRetention,VolUseDuration,MaxVolJobs,"
845          "MaxVolFiles,Recycle,Slot,FirstWritten,LastWritten,InChanger,"
846          "EndFile,EndBlock,VolParts,LabelType,LabelDate "
847          "FROM Media WHERE VolumeName='%s'", mr->VolumeName);
848    }
849
850    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
851       char ed1[50];
852       mdb->num_rows = sql_num_rows(mdb);
853       if (mdb->num_rows > 1) {
854          Mmsg1(&mdb->errmsg, _("More than one Volume!: %s\n"),
855             edit_uint64(mdb->num_rows, ed1));
856          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
857       } else if (mdb->num_rows == 1) {
858          if ((row = sql_fetch_row(mdb)) == NULL) {
859             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
860             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
861          } else {
862             /* return values */
863             mr->MediaId = str_to_int64(row[0]);
864             bstrncpy(mr->VolumeName, row[1]!=NULL?row[1]:"", sizeof(mr->VolumeName));
865             mr->VolJobs = str_to_int64(row[2]);
866             mr->VolFiles = str_to_int64(row[3]);
867             mr->VolBlocks = str_to_int64(row[4]);
868             mr->VolBytes = str_to_uint64(row[5]);
869             mr->VolMounts = str_to_int64(row[6]);
870             mr->VolErrors = str_to_int64(row[7]);
871             mr->VolWrites = str_to_int64(row[8]);
872             mr->MaxVolBytes = str_to_uint64(row[9]);
873             mr->VolCapacityBytes = str_to_uint64(row[10]);
874             bstrncpy(mr->MediaType, row[11]!=NULL?row[11]:"", sizeof(mr->MediaType));
875             bstrncpy(mr->VolStatus, row[12]!=NULL?row[12]:"", sizeof(mr->VolStatus));
876             mr->PoolId = str_to_int64(row[13]);
877             mr->VolRetention = str_to_uint64(row[14]);
878             mr->VolUseDuration = str_to_uint64(row[15]);
879             mr->MaxVolJobs = str_to_int64(row[16]);
880             mr->MaxVolFiles = str_to_int64(row[17]);
881             mr->Recycle = str_to_int64(row[18]);
882             mr->Slot = str_to_int64(row[19]);
883             bstrncpy(mr->cFirstWritten, row[20]!=NULL?row[20]:"", sizeof(mr->cFirstWritten));
884             mr->FirstWritten = (time_t)str_to_utime(mr->cFirstWritten);
885             bstrncpy(mr->cLastWritten, row[21]!=NULL?row[21]:"", sizeof(mr->cLastWritten));
886             mr->LastWritten = (time_t)str_to_utime(mr->cLastWritten);
887             mr->InChanger = str_to_uint64(row[22]);
888             mr->EndFile = str_to_uint64(row[23]);
889             mr->EndBlock = str_to_uint64(row[24]);
890             mr->VolParts = str_to_int64(row[25]);
891             mr->LabelType = str_to_int64(row[26]);
892             bstrncpy(mr->cLabelDate, row[27]!=NULL?row[27]:"", sizeof(mr->cLabelDate));
893             mr->LabelDate = (time_t)str_to_utime(mr->cLabelDate);
894             stat = mr->MediaId;
895          }
896       } else {
897          if (mr->MediaId != 0) {
898             Mmsg1(&mdb->errmsg, _("Media record MediaId=%s not found.\n"), 
899                edit_int64(mr->MediaId, ed1));
900          } else {
901             Mmsg1(&mdb->errmsg, _("Media record for Volume \"%s\" not found.\n"),
902                   mr->VolumeName);
903          }
904       }
905       sql_free_result(mdb);
906    } else {
907       if (mr->MediaId != 0) {
908          Mmsg(mdb->errmsg, _("Media record for MediaId=%u not found in Catalog.\n"),
909             mr->MediaId);
910        } else {
911          Mmsg(mdb->errmsg, _("Media record for Vol=%s not found in Catalog.\n"),
912             mr->VolumeName);
913    }   }
914    db_unlock(mdb);
915    return stat;
916 }
917
918
919 #endif /* HAVE_SQLITE3 || HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL*/