]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/cats/sql_get.c
Fix conio.h problem on Solaris
[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-2003 Kern Sibbald and John Walker
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_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, uint32_t JobId, POOLMEM **VolumeNames)
318 {
319    SQL_ROW row;
320    int stat = 0;
321    int i;
322
323    db_lock(mdb);
324    /* Get one entry per VolumeName, but "sort" by VolIndex */
325    Mmsg(mdb->cmd, 
326         "SELECT VolumeName,MAX(VolIndex) FROM JobMedia,Media WHERE "
327         "JobMedia.JobId=%u AND JobMedia.MediaId=Media.MediaId "
328         "GROUP BY VolumeName "
329         "ORDER BY 2 ASC", JobId);
330
331    Dmsg1(130, "VolNam=%s\n", mdb->cmd);
332    *VolumeNames[0] = 0;
333    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
334       mdb->num_rows = sql_num_rows(mdb);
335       Dmsg1(130, "Num rows=%d\n", mdb->num_rows);
336       if (mdb->num_rows <= 0) {
337          Mmsg1(&mdb->errmsg, _("No volumes found for JobId=%d\n"), JobId);
338          stat = 0;
339       } else {
340          stat = mdb->num_rows;
341          for (i=0; i < stat; i++) {
342             if ((row = sql_fetch_row(mdb)) == NULL) {
343                Mmsg2(&mdb->errmsg, _("Error fetching row %d: ERR=%s\n"), i, sql_strerror(mdb));
344                Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
345                stat = 0;
346                break;
347             } else {
348                if (*VolumeNames[0] != 0) {
349                   pm_strcat(VolumeNames, "|");
350                }
351                pm_strcat(VolumeNames, row[0]);
352             }
353          }
354       }
355       sql_free_result(mdb);
356    } else {
357       Mmsg(mdb->errmsg, _("No Volume for JobId %d found in Catalog.\n"), JobId);
358    }
359    db_unlock(mdb);
360    return stat;
361 }
362
363 /*
364  * Find Volume parameters for a give JobId
365  *  Returns: 0 on error or no Volumes found
366  *           number of volumes on success
367  *           List of Volumes and start/end file/blocks (malloced structure!)
368  *
369  *  Returns: number of volumes on success
370  */
371 int db_get_job_volume_parameters(JCR *jcr, B_DB *mdb, uint32_t JobId, VOL_PARAMS **VolParams)
372 {
373    SQL_ROW row;
374    int stat = 0;
375    int i;
376    VOL_PARAMS *Vols = NULL;
377
378    db_lock(mdb);
379    Mmsg(mdb->cmd, 
380 "SELECT VolumeName,FirstIndex,LastIndex,StartFile,EndFile,StartBlock,EndBlock"
381 " FROM JobMedia,Media WHERE JobMedia.JobId=%u"
382 " AND JobMedia.MediaId=Media.MediaId ORDER BY VolIndex,JobMediaId", JobId);
383
384    Dmsg1(130, "VolNam=%s\n", mdb->cmd);
385    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
386       mdb->num_rows = sql_num_rows(mdb);
387       Dmsg1(130, "Num rows=%d\n", mdb->num_rows);
388       if (mdb->num_rows <= 0) {
389          Mmsg1(&mdb->errmsg, _("No volumes found for JobId=%d\n"), JobId);
390          stat = 0;
391       } else {
392          stat = mdb->num_rows;
393          if (stat > 0) {
394             *VolParams = Vols = (VOL_PARAMS *)malloc(stat * sizeof(VOL_PARAMS));
395          }
396          for (i=0; i < stat; i++) {
397             if ((row = sql_fetch_row(mdb)) == NULL) {
398                Mmsg2(&mdb->errmsg, _("Error fetching row %d: ERR=%s\n"), i, sql_strerror(mdb));
399                Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
400                stat = 0;
401                break;
402             } else {
403                bstrncpy(Vols[i].VolumeName, row[0], MAX_NAME_LENGTH);
404                Vols[i].FirstIndex = atoi(row[1]);
405                Vols[i].LastIndex = atoi(row[2]);
406                Vols[i].StartFile = atoi(row[3]);
407                Vols[i].EndFile = atoi(row[4]);
408                Vols[i].StartBlock = atoi(row[5]);
409                Vols[i].EndBlock = atoi(row[6]);
410             }
411          }
412       }
413       sql_free_result(mdb);
414    }
415    db_unlock(mdb);
416    return stat;
417 }
418
419
420
421 /* 
422  * Get the number of pool records
423  *
424  * Returns: -1 on failure
425  *          number on success
426  */
427 int db_get_num_pool_records(JCR *jcr, B_DB *mdb)
428 {
429    int stat = 0;
430
431    db_lock(mdb);
432    Mmsg(mdb->cmd, "SELECT count(*) from Pool");
433    stat = get_sql_record_max(jcr, mdb);
434    db_unlock(mdb);
435    return stat;
436 }
437
438 /*
439  * This function returns a list of all the Pool record ids.
440  *  The caller must free ids if non-NULL.
441  *
442  *  Returns 0: on failure
443  *          1: on success
444  */
445 int db_get_pool_ids(JCR *jcr, B_DB *mdb, int *num_ids, uint32_t *ids[])
446 {
447    SQL_ROW row;
448    int stat = 0;
449    int i = 0;
450    uint32_t *id;
451
452    db_lock(mdb);
453    *ids = NULL;
454    Mmsg(mdb->cmd, "SELECT PoolId FROM Pool");
455    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
456       *num_ids = sql_num_rows(mdb);
457       if (*num_ids > 0) {
458          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
459          while ((row = sql_fetch_row(mdb)) != NULL) {
460             id[i++] = str_to_uint64(row[0]);
461          }
462          *ids = id;
463       }
464       sql_free_result(mdb);
465       stat = 1;
466    } else {
467       Mmsg(mdb->errmsg, _("Pool id select failed: ERR=%s\n"), sql_strerror(mdb));
468       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
469       stat = 0;
470    }
471    db_unlock(mdb);
472    return stat;
473 }
474
475 /*
476  * This function returns a list of all the Client record ids.
477  *  The caller must free ids if non-NULL.
478  *
479  *  Returns 0: on failure
480  *          1: on success
481  */
482 int db_get_client_ids(JCR *jcr, B_DB *mdb, int *num_ids, uint32_t *ids[])
483 {
484    SQL_ROW row;
485    int stat = 0;
486    int i = 0;
487    uint32_t *id;
488
489    db_lock(mdb);
490    *ids = NULL;
491    Mmsg(mdb->cmd, "SELECT ClientId FROM Client");
492    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
493       *num_ids = sql_num_rows(mdb);
494       if (*num_ids > 0) {
495          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
496          while ((row = sql_fetch_row(mdb)) != NULL) {
497             id[i++] = (uint32_t)atoi(row[0]);
498          }
499          *ids = id;
500       }
501       sql_free_result(mdb);
502       stat = 1;
503    } else {
504       Mmsg(mdb->errmsg, _("Client id select failed: ERR=%s\n"), sql_strerror(mdb));
505       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
506       stat = 0;
507    }
508    db_unlock(mdb);
509    return stat;
510 }
511
512
513
514 /* Get Pool Record   
515  * If the PoolId is non-zero, we get its record,
516  *  otherwise, we search on the PoolName
517  *
518  * Returns: 0 on failure
519  *          id on success 
520  */
521 int db_get_pool_record(JCR *jcr, B_DB *mdb, POOL_DBR *pdbr)
522 {
523    SQL_ROW row;
524    int stat = 0;
525
526    db_lock(mdb);
527    if (pdbr->PoolId != 0) {               /* find by id */
528       Mmsg(mdb->cmd, 
529 "SELECT PoolId,Name,NumVols,MaxVols,UseOnce,UseCatalog,AcceptAnyVolume,\
530 AutoPrune,Recycle,VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,\
531 MaxVolBytes,PoolType,LabelFormat FROM Pool WHERE Pool.PoolId=%u", pdbr->PoolId);
532    } else {                           /* find by name */
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.Name='%s'", pdbr->Name);
537    }  
538
539    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
540       mdb->num_rows = sql_num_rows(mdb);
541       if (mdb->num_rows > 1) {
542          char ed1[30];
543          Mmsg1(&mdb->errmsg, _("More than one Pool!: %s\n"), 
544             edit_uint64(mdb->num_rows, ed1));
545          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
546       } else if (mdb->num_rows == 1) {
547          if ((row = sql_fetch_row(mdb)) == NULL) {
548             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
549             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
550          } else {
551             pdbr->PoolId = str_to_int64(row[0]);
552             bstrncpy(pdbr->Name, row[1]!=NULL?row[1]:"", sizeof(pdbr->Name));
553             pdbr->NumVols = str_to_int64(row[2]);
554             pdbr->MaxVols = str_to_int64(row[3]);
555             pdbr->UseOnce = str_to_int64(row[4]);
556             pdbr->UseCatalog = str_to_int64(row[5]);
557             pdbr->AcceptAnyVolume = str_to_int64(row[6]);
558             pdbr->AutoPrune = str_to_int64(row[7]);
559             pdbr->Recycle = str_to_int64(row[8]);
560             pdbr->VolRetention = str_to_int64(row[9]);
561             pdbr->VolUseDuration = str_to_int64(row[10]);
562             pdbr->MaxVolJobs = str_to_int64(row[11]);
563             pdbr->MaxVolFiles = str_to_int64(row[12]);
564             pdbr->MaxVolBytes = str_to_uint64(row[13]);
565             bstrncpy(pdbr->PoolType, row[13]!=NULL?row[14]:"", sizeof(pdbr->PoolType));
566             bstrncpy(pdbr->LabelFormat, row[14]!=NULL?row[15]:"", sizeof(pdbr->LabelFormat));
567             stat = pdbr->PoolId;
568          }
569       } else {
570          Mmsg(mdb->errmsg, _("Pool record not found in Catalog.\n"));
571       }
572       sql_free_result(mdb);
573    } else {
574       Mmsg(mdb->errmsg, _("Pool record not found in Catalog.\n"));
575    }
576    db_unlock(mdb);
577    return stat;
578 }
579
580 /* Get Client Record   
581  * If the ClientId is non-zero, we get its record,
582  *  otherwise, we search on the Client Name
583  *
584  * Returns: 0 on failure
585  *          1 on success 
586  */
587 int db_get_client_record(JCR *jcr, B_DB *mdb, CLIENT_DBR *cdbr)
588 {
589    SQL_ROW row;
590    int stat = 0;
591
592    db_lock(mdb);
593    if (cdbr->ClientId != 0) {               /* find by id */
594       Mmsg(mdb->cmd, 
595 "SELECT ClientId,Name,Uname,AutoPrune,FileRetention,JobRetention "
596 "FROM Client WHERE Client.ClientId=%u", cdbr->ClientId);
597    } else {                           /* find by name */
598       Mmsg(mdb->cmd, 
599 "SELECT ClientId,Name,Uname,AutoPrune,FileRetention,JobRetention "
600 "FROM Client WHERE Client.Name='%s'", cdbr->Name);
601    }  
602
603    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
604       mdb->num_rows = sql_num_rows(mdb);
605       if (mdb->num_rows > 1) {
606          char ed1[30];
607          Mmsg1(&mdb->errmsg, _("More than one Client!: %s\n"), 
608             edit_uint64(mdb->num_rows, ed1));
609          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
610       } else if (mdb->num_rows == 1) {
611          if ((row = sql_fetch_row(mdb)) == NULL) {
612             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
613             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
614          } else {
615             cdbr->ClientId = str_to_int64(row[0]);
616             bstrncpy(cdbr->Name, row[1]!=NULL?row[1]:"", sizeof(cdbr->Name));
617             bstrncpy(cdbr->Uname, row[2]!=NULL?row[1]:"", sizeof(cdbr->Uname));
618             cdbr->AutoPrune = str_to_int64(row[3]);
619             cdbr->FileRetention = str_to_int64(row[4]);
620             cdbr->JobRetention = str_to_int64(row[5]);
621             stat = 1;
622          }
623       } else {
624          Mmsg(mdb->errmsg, _("Client record not found in Catalog.\n"));
625       }
626       sql_free_result(mdb);
627    } else {
628       Mmsg(mdb->errmsg, _("Client record not found in Catalog.\n"));
629    }
630    db_unlock(mdb);
631    return stat;
632 }
633
634 /*
635  * Get Counter Record
636  *
637  * Returns: 0 on failure
638  *          1 on success
639  */
640 int db_get_counter_record(JCR *jcr, B_DB *mdb, COUNTER_DBR *cr)
641 {
642    SQL_ROW row;
643
644    db_lock(mdb);
645    Mmsg(mdb->cmd, "SELECT MinValue,MaxValue,CurrentValue,WrapCounter "
646       "FROM Counters WHERE Counter='%s'", cr->Counter);
647
648    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
649       mdb->num_rows = sql_num_rows(mdb);
650       
651       /* If more than one, report error, but return first row */
652       if (mdb->num_rows > 1) {
653          Mmsg1(&mdb->errmsg, _("More than one Counter!: %d\n"), (int)(mdb->num_rows));
654          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
655       }
656       if (mdb->num_rows >= 1) {
657          if ((row = sql_fetch_row(mdb)) == NULL) {
658             Mmsg1(&mdb->errmsg, _("error fetching Counter row: %s\n"), sql_strerror(mdb));
659             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
660             sql_free_result(mdb);
661             db_unlock(mdb);
662             return 0;
663          }
664          cr->MinValue = atoi(row[0]);
665          cr->MaxValue = atoi(row[1]);
666          cr->CurrentValue = atoi(row[2]);
667          if (row[3]) {
668             bstrncpy(cr->WrapCounter, row[3], sizeof(cr->WrapCounter));
669          } else {
670             cr->WrapCounter[0] = 0;
671          }
672          sql_free_result(mdb);
673          db_unlock(mdb);
674          return 1;
675       }
676       sql_free_result(mdb);
677    } else {
678       Mmsg(mdb->errmsg, _("Counter record: %s not found in Catalog.\n"), cr->Counter);
679    }  
680    db_unlock(mdb);
681    return 0;
682 }
683
684
685 /* Get FileSet Record   
686  * If the FileSetId is non-zero, we get its record,
687  *  otherwise, we search on the name
688  *
689  * Returns: 0 on failure
690  *          id on success 
691  */
692 int db_get_fileset_record(JCR *jcr, B_DB *mdb, FILESET_DBR *fsr)
693 {
694    SQL_ROW row;
695    int stat = 0;
696
697    db_lock(mdb);
698    if (fsr->FileSetId != 0) {               /* find by id */
699       Mmsg(mdb->cmd, 
700            "SELECT FileSetId,FileSet,MD5,CreateTime FROM FileSet "
701            "WHERE FileSetId=%u", fsr->FileSetId);
702    } else {                           /* find by name */
703       Mmsg(mdb->cmd, 
704            "SELECT FileSetId,FileSet,CreateTime,MD5 FROM FileSet "
705            "WHERE FileSet='%s'", fsr->FileSet);
706    }  
707
708    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
709       mdb->num_rows = sql_num_rows(mdb);
710       if (mdb->num_rows > 1) {
711          char ed1[30];
712          Mmsg1(&mdb->errmsg, _("Error got %s FileSets but expected only one!\n"), 
713             edit_uint64(mdb->num_rows, ed1));
714          sql_data_seek(mdb, mdb->num_rows-1);
715       }
716       if ((row = sql_fetch_row(mdb)) == NULL) {
717          Mmsg1(&mdb->errmsg, _("FileSet record \"%s\" not found.\n"), fsr->FileSet);
718       } else {
719          fsr->FileSetId = atoi(row[0]);
720          bstrncpy(fsr->FileSet, row[1]!=NULL?row[1]:"", sizeof(fsr->FileSet));
721          bstrncpy(fsr->MD5, row[2]!=NULL?row[2]:"", sizeof(fsr->MD5));
722          bstrncpy(fsr->cCreateTime, row[3]!=NULL?row[3]:"", sizeof(fsr->cCreateTime));
723          stat = fsr->FileSetId;
724       }
725       sql_free_result(mdb);
726    } else {
727       Mmsg(mdb->errmsg, _("FileSet record not found in Catalog.\n"));
728    }
729    db_unlock(mdb);
730    return stat;
731 }
732
733
734 /* 
735  * Get the number of Media records
736  *
737  * Returns: -1 on failure
738  *          number on success
739  */
740 int db_get_num_media_records(JCR *jcr, B_DB *mdb)
741 {
742    int stat = 0;
743
744    db_lock(mdb);
745    Mmsg(mdb->cmd, "SELECT count(*) from Media");
746    stat = get_sql_record_max(jcr, mdb);
747    db_unlock(mdb);
748    return stat;
749 }
750
751
752 /*
753  * This function returns a list of all the Media record ids for
754  *     the current Pool.
755  *  The caller must free ids if non-NULL.
756  *
757  *  Returns 0: on failure
758  *          1: on success
759  */
760 int db_get_media_ids(JCR *jcr, B_DB *mdb, uint32_t PoolId, int *num_ids, uint32_t *ids[])
761 {
762    SQL_ROW row;
763    int stat = 0;
764    int i = 0;
765    uint32_t *id;
766
767    db_lock(mdb);
768    *ids = NULL;
769    Mmsg(mdb->cmd, "SELECT MediaId FROM Media WHERE PoolId=%u", PoolId);
770    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
771       *num_ids = sql_num_rows(mdb);
772       if (*num_ids > 0) {
773          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
774          while ((row = sql_fetch_row(mdb)) != NULL) {
775             id[i++] = (uint32_t)atoi(row[0]);
776          }
777          *ids = id;
778       }
779       sql_free_result(mdb);
780       stat = 1;
781    } else {
782       Mmsg(mdb->errmsg, _("Media id select failed: ERR=%s\n"), sql_strerror(mdb));
783       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
784       stat = 0;
785    }
786    db_unlock(mdb);
787    return stat;
788 }
789
790
791 /* Get Media Record   
792  *
793  * Returns: 0 on failure
794  *          id on success 
795  */
796 int db_get_media_record(JCR *jcr, B_DB *mdb, MEDIA_DBR *mr)
797 {
798    SQL_ROW row;
799    int stat = 0;
800
801    db_lock(mdb);
802    if (mr->MediaId == 0 && mr->VolumeName[0] == 0) {
803       Mmsg(mdb->cmd, "SELECT count(*) from Media");
804       mr->MediaId = get_sql_record_max(jcr, mdb);
805       db_unlock(mdb);
806       return 1;
807    }
808    if (mr->MediaId != 0) {               /* find by id */
809       Mmsg(mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
810          "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
811          "MediaType,VolStatus,PoolId,VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,"
812          "Recycle,Slot,FirstWritten,LastWritten,InChanger "
813          "FROM Media WHERE MediaId=%d", mr->MediaId);
814    } else {                           /* find by name */
815       Mmsg(mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
816          "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
817          "MediaType,VolStatus,PoolId,VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,"
818          "Recycle,Slot,FirstWritten,LastWritten,InChanger "
819          "FROM Media WHERE VolumeName='%s'", mr->VolumeName);
820    }  
821
822    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
823       mdb->num_rows = sql_num_rows(mdb);
824       if (mdb->num_rows > 1) {
825          char ed1[30];
826          Mmsg1(&mdb->errmsg, _("More than one Volume!: %s\n"), 
827             edit_uint64(mdb->num_rows, ed1));
828          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
829       } else if (mdb->num_rows == 1) {
830          if ((row = sql_fetch_row(mdb)) == NULL) {
831             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
832             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
833          } else {
834             /* return values */
835             mr->MediaId = str_to_int64(row[0]);
836             bstrncpy(mr->VolumeName, row[1]!=NULL?row[1]:"", sizeof(mr->VolumeName));
837             mr->VolJobs = str_to_int64(row[2]);
838             mr->VolFiles = str_to_int64(row[3]);
839             mr->VolBlocks = str_to_int64(row[4]);
840             mr->VolBytes = str_to_uint64(row[5]);
841             mr->VolMounts = str_to_int64(row[6]);
842             mr->VolErrors = str_to_int64(row[7]);
843             mr->VolWrites = str_to_int64(row[8]);
844             mr->MaxVolBytes = str_to_uint64(row[9]);
845             mr->VolCapacityBytes = str_to_uint64(row[10]);
846             bstrncpy(mr->MediaType, row[11]!=NULL?row[11]:"", sizeof(mr->MediaType));
847             bstrncpy(mr->VolStatus, row[12]!=NULL?row[12]:"", sizeof(mr->VolStatus));
848             mr->PoolId = str_to_int64(row[13]);
849             mr->VolRetention = str_to_uint64(row[14]);
850             mr->VolUseDuration = str_to_uint64(row[15]);
851             mr->MaxVolJobs = str_to_int64(row[16]);
852             mr->MaxVolFiles = str_to_int64(row[17]);
853             mr->Recycle = str_to_int64(row[18]);
854             mr->Slot = str_to_int64(row[19]);
855             bstrncpy(mr->cFirstWritten, row[20]!=NULL?row[20]:"", sizeof(mr->cFirstWritten));
856             mr->FirstWritten = (time_t)str_to_utime(mr->cFirstWritten);
857             bstrncpy(mr->cLastWritten, row[21]!=NULL?row[21]:"", sizeof(mr->cLastWritten));
858             mr->LastWritten = (time_t)str_to_utime(mr->cLastWritten);
859             mr->InChanger = str_to_uint64(row[22]);
860             stat = mr->MediaId;
861          }
862       } else {
863          if (mr->MediaId != 0) {
864             Mmsg1(&mdb->errmsg, _("Media record MediaId=%u not found.\n"), mr->MediaId);
865          } else {
866             Mmsg1(&mdb->errmsg, _("Media record for Volume \"%s\" not found.\n"), 
867                   mr->VolumeName);
868          }
869       }
870       sql_free_result(mdb);
871    } else {
872       Mmsg(mdb->errmsg, _("Media record not found in Catalog.\n"));
873    }
874    db_unlock(mdb);
875    return stat;
876 }
877
878
879 #endif /* HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL */