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