git.sur5r.net Git - bacula/bacula/blob - 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 = str_to_int64(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 = str_to_int64(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 = str_to_int64(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: false on failure
 534  *          true on success
 535  */
 536 bool db_get_pool_record(JCR *jcr, B_DB *mdb, POOL_DBR *pdbr)
 537 {
 538    SQL_ROW row;
 539    bool ok = false;
 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             ok = true;
 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    if (ok) {
 596       Mmsg(mdb->cmd, "SELECT count(*) from Pool");
 597       pdbr->NumVols = get_sql_record_max(jcr, mdb);
 598    }
 599    db_unlock(mdb);
 600    return ok;
 601 }
 602
 603 /* Get Client Record
 604  * If the ClientId is non-zero, we get its record,
 605  *  otherwise, we search on the Client Name
 606  *
 607  * Returns: 0 on failure
 608  *          1 on success
 609  */
 610 int db_get_client_record(JCR *jcr, B_DB *mdb, CLIENT_DBR *cdbr)
 611 {
 612    SQL_ROW row;
 613    int stat = 0;
 614    char ed1[50];
 615
 616    db_lock(mdb);
 617    if (cdbr->ClientId != 0) {               /* find by id */
 618       Mmsg(mdb->cmd,
 619 "SELECT ClientId,Name,Uname,AutoPrune,FileRetention,JobRetention "
 620 "FROM Client WHERE Client.ClientId=%s",
 621         edit_int64(cdbr->ClientId, ed1));
 622    } else {                           /* find by name */
 623       Mmsg(mdb->cmd,
 624 "SELECT ClientId,Name,Uname,AutoPrune,FileRetention,JobRetention "
 625 "FROM Client WHERE Client.Name='%s'", cdbr->Name);
 626    }
 627
 628    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
 629       mdb->num_rows = sql_num_rows(mdb);
 630       if (mdb->num_rows > 1) {
 631          Mmsg1(&mdb->errmsg, _("More than one Client!: %s\n"),
 632             edit_uint64(mdb->num_rows, ed1));
 633          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 634       } else if (mdb->num_rows == 1) {
 635          if ((row = sql_fetch_row(mdb)) == NULL) {
 636             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
 637             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 638          } else {
 639             cdbr->ClientId = str_to_int64(row[0]);
 640             bstrncpy(cdbr->Name, row[1]!=NULL?row[1]:"", sizeof(cdbr->Name));
 641             bstrncpy(cdbr->Uname, row[2]!=NULL?row[1]:"", sizeof(cdbr->Uname));
 642             cdbr->AutoPrune = str_to_int64(row[3]);
 643             cdbr->FileRetention = str_to_int64(row[4]);
 644             cdbr->JobRetention = str_to_int64(row[5]);
 645             stat = 1;
 646          }
 647       } else {
 648          Mmsg(mdb->errmsg, _("Client record not found in Catalog.\n"));
 649       }
 650       sql_free_result(mdb);
 651    } else {
 652       Mmsg(mdb->errmsg, _("Client record not found in Catalog.\n"));
 653    }
 654    db_unlock(mdb);
 655    return stat;
 656 }
 657
 658 /*
 659  * Get Counter Record
 660  *
 661  * Returns: 0 on failure
 662  *          1 on success
 663  */
 664 int db_get_counter_record(JCR *jcr, B_DB *mdb, COUNTER_DBR *cr)
 665 {
 666    SQL_ROW row;
 667
 668    db_lock(mdb);
 669    Mmsg(mdb->cmd, "SELECT MinValue,MaxValue,CurrentValue,WrapCounter "
 670       "FROM Counters WHERE Counter='%s'", cr->Counter);
 671
 672    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
 673       mdb->num_rows = sql_num_rows(mdb);
 674
 675       /* If more than one, report error, but return first row */
 676       if (mdb->num_rows > 1) {
 677          Mmsg1(&mdb->errmsg, _("More than one Counter!: %d\n"), (int)(mdb->num_rows));
 678          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 679       }
 680       if (mdb->num_rows >= 1) {
 681          if ((row = sql_fetch_row(mdb)) == NULL) {
 682             Mmsg1(&mdb->errmsg, _("error fetching Counter row: %s\n"), sql_strerror(mdb));
 683             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 684             sql_free_result(mdb);
 685             db_unlock(mdb);
 686             return 0;
 687          }
 688          cr->MinValue = str_to_int64(row[0]);
 689          cr->MaxValue = str_to_int64(row[1]);
 690          cr->CurrentValue = str_to_int64(row[2]);
 691          if (row[3]) {
 692             bstrncpy(cr->WrapCounter, row[3], sizeof(cr->WrapCounter));
 693          } else {
 694             cr->WrapCounter[0] = 0;
 695          }
 696          sql_free_result(mdb);
 697          db_unlock(mdb);
 698          return 1;
 699       }
 700       sql_free_result(mdb);
 701    } else {
 702       Mmsg(mdb->errmsg, _("Counter record: %s not found in Catalog.\n"), cr->Counter);
 703    }
 704    db_unlock(mdb);
 705    return 0;
 706 }
 707
 708
 709 /* Get FileSet Record
 710  * If the FileSetId is non-zero, we get its record,
 711  *  otherwise, we search on the name
 712  *
 713  * Returns: 0 on failure
 714  *          id on success
 715  */
 716 int db_get_fileset_record(JCR *jcr, B_DB *mdb, FILESET_DBR *fsr)
 717 {
 718    SQL_ROW row;
 719    int stat = 0;
 720    char ed1[50];
 721
 722    db_lock(mdb);
 723    if (fsr->FileSetId != 0) {               /* find by id */
 724       Mmsg(mdb->cmd,
 725            "SELECT FileSetId,FileSet,MD5,CreateTime FROM FileSet "
 726            "WHERE FileSetId=%s",
 727            edit_int64(fsr->FileSetId, ed1));
 728    } else {                           /* find by name */
 729       Mmsg(mdb->cmd,
 730            "SELECT FileSetId,FileSet,CreateTime,MD5 FROM FileSet "
 731            "WHERE FileSet='%s' ORDER BY CreateTime DESC LIMIT 1", fsr->FileSet);
 732    }
 733
 734    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
 735       mdb->num_rows = sql_num_rows(mdb);
 736       if (mdb->num_rows > 1) {
 737          char ed1[30];
 738          Mmsg1(&mdb->errmsg, _("Error got %s FileSets but expected only one!\n"),
 739             edit_uint64(mdb->num_rows, ed1));
 740          sql_data_seek(mdb, mdb->num_rows-1);
 741       }
 742       if ((row = sql_fetch_row(mdb)) == NULL) {
 743          Mmsg1(&mdb->errmsg, _("FileSet record \"%s\" not found.\n"), fsr->FileSet);
 744       } else {
 745          fsr->FileSetId = str_to_int64(row[0]);
 746          bstrncpy(fsr->FileSet, row[1]!=NULL?row[1]:"", sizeof(fsr->FileSet));
 747          bstrncpy(fsr->MD5, row[2]!=NULL?row[2]:"", sizeof(fsr->MD5));
 748          bstrncpy(fsr->cCreateTime, row[3]!=NULL?row[3]:"", sizeof(fsr->cCreateTime));
 749          stat = fsr->FileSetId;
 750       }
 751       sql_free_result(mdb);
 752    } else {
 753       Mmsg(mdb->errmsg, _("FileSet record not found in Catalog.\n"));
 754    }
 755    db_unlock(mdb);
 756    return stat;
 757 }
 758
 759
 760 /*
 761  * Get the number of Media records
 762  *
 763  * Returns: -1 on failure
 764  *          number on success
 765  */
 766 int db_get_num_media_records(JCR *jcr, B_DB *mdb)
 767 {
 768    int stat = 0;
 769
 770    db_lock(mdb);
 771    Mmsg(mdb->cmd, "SELECT count(*) from Media");
 772    stat = get_sql_record_max(jcr, mdb);
 773    db_unlock(mdb);
 774    return stat;
 775 }
 776
 777
 778 /*
 779  * This function returns a list of all the Media record ids for
 780  *     the current Pool.
 781  *  The caller must free ids if non-NULL.
 782  *
 783  *  Returns 0: on failure
 784  *          1: on success
 785  */
 786 int db_get_media_ids(JCR *jcr, B_DB *mdb, uint32_t PoolId, int *num_ids, uint32_t *ids[])
 787 {
 788    SQL_ROW row;
 789    int stat = 0;
 790    int i = 0;
 791    uint32_t *id;
 792    char ed1[50];
 793
 794    db_lock(mdb);
 795    *ids = NULL;
 796    Mmsg(mdb->cmd, "SELECT MediaId FROM Media WHERE PoolId=%s",
 797        edit_int64(PoolId, ed1));
 798    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
 799       *num_ids = sql_num_rows(mdb);
 800       if (*num_ids > 0) {
 801          id = (uint32_t *)malloc(*num_ids * sizeof(uint32_t));
 802          while ((row = sql_fetch_row(mdb)) != NULL) {
 803             id[i++] = str_to_uint64(row[0]);
 804          }
 805          *ids = id;
 806       }
 807       sql_free_result(mdb);
 808       stat = 1;
 809    } else {
 810       Mmsg(mdb->errmsg, _("Media id select failed: ERR=%s\n"), sql_strerror(mdb));
 811       Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 812       stat = 0;
 813    }
 814    db_unlock(mdb);
 815    return stat;
 816 }
 817
 818
 819 /* Get Media Record
 820  *
 821  * Returns: 0 on failure
 822  *          id on success
 823  */
 824 int db_get_media_record(JCR *jcr, B_DB *mdb, MEDIA_DBR *mr)
 825 {
 826    SQL_ROW row;
 827    int stat = 0;
 828    char ed1[50];
 829
 830    db_lock(mdb);
 831    if (mr->MediaId == 0 && mr->VolumeName[0] == 0) {
 832       Mmsg(mdb->cmd, "SELECT count(*) from Media");
 833       mr->MediaId = get_sql_record_max(jcr, mdb);
 834       db_unlock(mdb);
 835       return 1;
 836    }
 837    if (mr->MediaId != 0) {               /* find by id */
 838       Mmsg(mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
 839          "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
 840          "MediaType,VolStatus,PoolId,VolRetention,VolUseDuration,MaxVolJobs,"
 841          "MaxVolFiles,Recycle,Slot,FirstWritten,LastWritten,InChanger,"
 842          "EndFile,EndBlock,VolParts,LabelType,LabelDate,StorageId "
 843          "FROM Media WHERE MediaId=%s",
 844          edit_int64(mr->MediaId, ed1));
 845    } else {                           /* find by name */
 846       Mmsg(mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
 847          "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
 848          "MediaType,VolStatus,PoolId,VolRetention,VolUseDuration,MaxVolJobs,"
 849          "MaxVolFiles,Recycle,Slot,FirstWritten,LastWritten,InChanger,"
 850          "EndFile,EndBlock,VolParts,LabelType,LabelDate,StorageId "
 851          "FROM Media WHERE VolumeName='%s'", mr->VolumeName);
 852    }
 853
 854    if (QUERY_DB(jcr, mdb, mdb->cmd)) {
 855       char ed1[50];
 856       mdb->num_rows = sql_num_rows(mdb);
 857       if (mdb->num_rows > 1) {
 858          Mmsg1(&mdb->errmsg, _("More than one Volume!: %s\n"),
 859             edit_uint64(mdb->num_rows, ed1));
 860          Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 861       } else if (mdb->num_rows == 1) {
 862          if ((row = sql_fetch_row(mdb)) == NULL) {
 863             Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
 864             Jmsg(jcr, M_ERROR, 0, "%s", mdb->errmsg);
 865          } else {
 866             /* return values */
 867             mr->MediaId = str_to_int64(row[0]);
 868             bstrncpy(mr->VolumeName, row[1]!=NULL?row[1]:"", sizeof(mr->VolumeName));
 869             mr->VolJobs = str_to_int64(row[2]);
 870             mr->VolFiles = str_to_int64(row[3]);
 871             mr->VolBlocks = str_to_int64(row[4]);
 872             mr->VolBytes = str_to_uint64(row[5]);
 873             mr->VolMounts = str_to_int64(row[6]);
 874             mr->VolErrors = str_to_int64(row[7]);
 875             mr->VolWrites = str_to_int64(row[8]);
 876             mr->MaxVolBytes = str_to_uint64(row[9]);
 877             mr->VolCapacityBytes = str_to_uint64(row[10]);
 878             bstrncpy(mr->MediaType, row[11]!=NULL?row[11]:"", sizeof(mr->MediaType));
 879             bstrncpy(mr->VolStatus, row[12]!=NULL?row[12]:"", sizeof(mr->VolStatus));
 880             mr->PoolId = str_to_int64(row[13]);
 881             mr->VolRetention = str_to_uint64(row[14]);
 882             mr->VolUseDuration = str_to_uint64(row[15]);
 883             mr->MaxVolJobs = str_to_int64(row[16]);
 884             mr->MaxVolFiles = str_to_int64(row[17]);
 885             mr->Recycle = str_to_int64(row[18]);
 886             mr->Slot = str_to_int64(row[19]);
 887             bstrncpy(mr->cFirstWritten, row[20]!=NULL?row[20]:"", sizeof(mr->cFirstWritten));
 888             mr->FirstWritten = (time_t)str_to_utime(mr->cFirstWritten);
 889             bstrncpy(mr->cLastWritten, row[21]!=NULL?row[21]:"", sizeof(mr->cLastWritten));
 890             mr->LastWritten = (time_t)str_to_utime(mr->cLastWritten);
 891             mr->InChanger = str_to_uint64(row[22]);
 892             mr->EndFile = str_to_uint64(row[23]);
 893             mr->EndBlock = str_to_uint64(row[24]);
 894             mr->VolParts = str_to_int64(row[25]);
 895             mr->LabelType = str_to_int64(row[26]);
 896             bstrncpy(mr->cLabelDate, row[27]!=NULL?row[27]:"", sizeof(mr->cLabelDate));
 897             mr->LabelDate = (time_t)str_to_utime(mr->cLabelDate);
 898             mr->StorageId = str_to_int64(row[28]);
 899             stat = mr->MediaId;
 900          }
 901       } else {
 902          if (mr->MediaId != 0) {
 903             Mmsg1(&mdb->errmsg, _("Media record MediaId=%s not found.\n"),
 904                edit_int64(mr->MediaId, ed1));
 905          } else {
 906             Mmsg1(&mdb->errmsg, _("Media record for Volume \"%s\" not found.\n"),
 907                   mr->VolumeName);
 908          }
 909       }
 910       sql_free_result(mdb);
 911    } else {
 912       if (mr->MediaId != 0) {
 913          Mmsg(mdb->errmsg, _("Media record for MediaId=%u not found in Catalog.\n"),
 914             mr->MediaId);
 915        } else {
 916          Mmsg(mdb->errmsg, _("Media record for Vol=%s not found in Catalog.\n"),
 917             mr->VolumeName);
 918    }   }
 919    db_unlock(mdb);
 920    return stat;
 921 }
 922
 923
 924 #endif /* HAVE_SQLITE3 || HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL*/