git.sur5r.net Git - bacula/bacula/blob - bacula/src/cats/sql_find.c

   1 /*
   2  * Bacula Catalog Database Find record interface routines
   3  *
   4  *  Note, generally, these routines are more complicated
   5  *        that a simple search by name or id. Such simple
   6  *        request are in get.c
   7  *
   8  *    Kern Sibbald, December 2000
   9  *
  10  *    Version $Id$
  11  */
  12
  13 /*
  14    Copyright (C) 2000-2003 Kern Sibbald and John Walker
  15
  16    This program is free software; you can redistribute it and/or
  17    modify it under the terms of the GNU General Public License as
  18    published by the Free Software Foundation; either version 2 of
  19    the License, or (at your option) any later version.
  20
  21    This program is distributed in the hope that it will be useful,
  22    but WITHOUT ANY WARRANTY; without even the implied warranty of
  23    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  24    General Public License for more details.
  25
  26    You should have received a copy of the GNU General Public
  27    License along with this program; if not, write to the Free
  28    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  29    MA 02111-1307, USA.
  30
  31  */
  32
  33
  34 /* The following is necessary so that we do not include
  35  * the dummy external definition of DB.
  36  */
  37 #define __SQL_C                       /* indicate that this is sql.c */
  38
  39 #include "bacula.h"
  40 #include "cats.h"
  41
  42 #if    HAVE_MYSQL || HAVE_SQLITE
  43
  44 /* -----------------------------------------------------------------------
  45  *
  46  *   Generic Routines (or almost generic)
  47  *
  48  * -----------------------------------------------------------------------
  49  */
  50
  51 /* Imported subroutines */
  52 extern void print_result(B_DB *mdb);
  53 extern int QueryDB(char *file, int line, JCR *jcr, B_DB *db, char *select_cmd);
  54
  55 /*
  56  * Find job start time if JobId specified, otherwise
  57  * find last full save for Incremental and Differential saves.
  58  *
  59  *  StartTime is returned in stime
  60  *
  61  * Returns: 0 on failure
  62  *          1 on success, jr is unchanged, but stime is set
  63  */
  64 int
  65 db_find_job_start_time(JCR *jcr, B_DB *mdb, JOB_DBR *jr, POOLMEM **stime)
  66 {
  67    SQL_ROW row;
  68
  69    db_lock(mdb);
  70
  71    pm_strcpy(stime, "0000-00-00 00:00:00");   /* default */
  72    /* If no Id given, we must find corresponding job */
  73    if (jr->JobId == 0) {
  74       /* Differential is since last Full backup */
  75          Mmsg(&mdb->cmd,
  76 "SELECT StartTime FROM Job WHERE JobStatus='T' AND Type='%c' AND "
  77 "Level='%c' AND Name='%s' AND ClientId=%u AND FileSetId=%u "
  78 "ORDER BY StartTime DESC LIMIT 1",
  79            jr->Type, L_FULL, jr->Name, jr->ClientId, jr->FileSetId);
  80
  81       if (jr->Level == L_DIFFERENTIAL) {
  82          /* SQL cmd for Differential backup already edited above */
  83
  84       /* Incremental is since last Full, Incremental, or Differential */
  85       } else if (jr->Level == L_INCREMENTAL) {
  86          /*
  87           * For an Incremental job, we must first ensure
  88           *  that a Full backup was done (cmd edited above)
  89           *  then we do a second look to find the most recent
  90           *  backup
  91           */
  92       if (!QUERY_DB(jcr, mdb, mdb->cmd)) {
  93          Mmsg2(&mdb->errmsg, _("Query error for start time request: ERR=%s\nCMD=%s\n"),
  94             sql_strerror(mdb), mdb->cmd);
  95          db_unlock(mdb);
  96          return 0;
  97       }
  98       if ((row = sql_fetch_row(mdb)) == NULL) {
  99          sql_free_result(mdb);
 100             Mmsg(&mdb->errmsg, _("No prior Full backup Job record found.\n"));
 101          db_unlock(mdb);
 102          return 0;
 103       }
 104       sql_free_result(mdb);
 105          /* Now edit SQL command for Incremental Job */
 106          Mmsg(&mdb->cmd,
 107 "SELECT StartTime FROM Job WHERE JobStatus='T' AND Type='%c' AND "
 108 "Level IN ('%c','%c','%c') AND Name='%s' AND ClientId=%u "
 109 "AND FileSetId=%u ORDER BY StartTime DESC LIMIT 1",
 110            jr->Type, L_INCREMENTAL, L_DIFFERENTIAL, L_FULL, jr->Name,
 111             jr->ClientId, jr->FileSetId);
 112    } else {
 113          Mmsg1(&mdb->errmsg, _("Unknown level=%d\n"), jr->Level);
 114          db_unlock(mdb);
 115          return 0;
 116    }
 117    } else {
 118    Dmsg1(100, "Submitting: %s\n", mdb->cmd);
 119       Mmsg(&mdb->cmd, "SELECT StartTime FROM Job WHERE Job.JobId=%u", jr->JobId);
 120    }
 121
 122    if (!QUERY_DB(jcr, mdb, mdb->cmd)) {
 123       pm_strcpy(stime, "");                   /* set EOS */
 124       Mmsg2(&mdb->errmsg, _("Query error for start time request: ERR=%s\nCMD=%s\n"),
 125          sql_strerror(mdb),  mdb->cmd);
 126       db_unlock(mdb);
 127       return 0;
 128    }
 129
 130    if ((row = sql_fetch_row(mdb)) == NULL) {
 131       Mmsg1(&mdb->errmsg, _("No Job record found: ERR=%s\n"), sql_strerror(mdb));
 132       sql_free_result(mdb);
 133       db_unlock(mdb);
 134       return 0;
 135    }
 136    Dmsg1(100, "Got start time: %s\n", row[0]);
 137    pm_strcpy(stime, row[0]);
 138
 139    sql_free_result(mdb);
 140
 141    db_unlock(mdb);
 142    return 1;
 143 }
 144
 145 /*
 146  * Find JobId of last job that ran.  E.g. for
 147  *   VERIFY_CATALOG we want the JobId of the last INIT.
 148  *   For VERIFY_VOLUME_TO_CATALOG, we want the JobId of the last Job.
 149  *
 150  * Returns: 1 on success
 151  *          0 on failure
 152  */
 153 int
 154 db_find_last_jobid(JCR *jcr, B_DB *mdb, char *Name, JOB_DBR *jr)
 155 {
 156    SQL_ROW row;
 157
 158    /* Find last full */
 159    db_lock(mdb);
 160    if (jr->Level == L_VERIFY_CATALOG) {
 161       Mmsg(&mdb->cmd,
 162 "SELECT JobId FROM Job WHERE Type='V' AND Level='%c' AND "
 163 " JobStatus='T' AND Name='%s' AND "
 164 "ClientId=%u ORDER BY StartTime DESC LIMIT 1",
 165            L_VERIFY_INIT, jr->Name, jr->ClientId);
 166    } else if (jr->Level == L_VERIFY_VOLUME_TO_CATALOG ||
 167               jr->Level == L_VERIFY_DISK_TO_CATALOG) {
 168       if (Name) {
 169          Mmsg(&mdb->cmd,
 170 "SELECT JobId FROM Job WHERE Type='B' AND JobStatus='T' AND "
 171 "Name='%s' ORDER BY StartTime DESC LIMIT 1", Name);
 172       } else {
 173       Mmsg(&mdb->cmd,
 174 "SELECT JobId FROM Job WHERE Type='B' AND JobStatus='T' AND "
 175 "ClientId=%u ORDER BY StartTime DESC LIMIT 1", jr->ClientId);
 176       }
 177    } else {
 178       Mmsg1(&mdb->errmsg, _("Unknown Job level=%c\n"), jr->Level);
 179       db_unlock(mdb);
 180       return 0;
 181    }
 182    Dmsg1(100, "Query: %s\n", mdb->cmd);
 183    if (!QUERY_DB(jcr, mdb, mdb->cmd)) {
 184       db_unlock(mdb);
 185       return 0;
 186    }
 187    if ((row = sql_fetch_row(mdb)) == NULL) {
 188       Mmsg1(&mdb->errmsg, _("No Job found for: %s.\n"), mdb->cmd);
 189       sql_free_result(mdb);
 190       db_unlock(mdb);
 191       return 0;
 192    }
 193
 194    jr->JobId = atoi(row[0]);
 195    sql_free_result(mdb);
 196
 197    Dmsg1(100, "db_get_last_jobid: got JobId=%d\n", jr->JobId);
 198    if (jr->JobId <= 0) {
 199       Mmsg1(&mdb->errmsg, _("No Job found for: %s\n"), mdb->cmd);
 200       db_unlock(mdb);
 201       return 0;
 202    }
 203
 204    db_unlock(mdb);
 205    return 1;
 206 }
 207
 208 /*
 209  * Find Available Media (Volume) for Pool
 210  *
 211  * Find a Volume for a given PoolId, MediaType, and Status.
 212  *
 213  * Returns: 0 on failure
 214  *          numrows on success
 215  */
 216 int
 217 db_find_next_volume(JCR *jcr, B_DB *mdb, int item, MEDIA_DBR *mr)
 218 {
 219    SQL_ROW row;
 220    int numrows;
 221    char *order;
 222
 223    db_lock(mdb);
 224    if (item == -1) {       /* find oldest volume */
 225       /* Find oldest volume */
 226       Mmsg(&mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
 227 "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
 228 "VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,Recycle,Slot,"
 229 "FirstWritten,LastWritten,VolStatus "
 230 "FROM Media WHERE PoolId=%u AND MediaType='%s' AND VolStatus IN ('Full',"
 231 "'Recycle','Purged','Used','Append') "
 232 "ORDER BY LastWritten LIMIT 1", mr->PoolId, mr->MediaType);
 233      item = 1;
 234    } else {
 235       /* Find next available volume */
 236       if (strcmp(mr->VolStatus, "Recycled") == 0 ||
 237           strcmp(mr->VolStatus, "Purged") == 0) {
 238          order = "ORDER BY LastWritten ASC,MediaId";  /* take oldest */
 239       } else {
 240          order = "ORDER BY LastWritten DESC,MediaId";   /* take most recently written */
 241       }
 242       Mmsg(&mdb->cmd, "SELECT MediaId,VolumeName,VolJobs,VolFiles,VolBlocks,"
 243           "VolBytes,VolMounts,VolErrors,VolWrites,MaxVolBytes,VolCapacityBytes,"
 244           "VolRetention,VolUseDuration,MaxVolJobs,MaxVolFiles,Recycle,Slot,"
 245           "FirstWritten,LastWritten,VolStatus "
 246           "FROM Media WHERE PoolId=%u AND MediaType='%s' AND VolStatus='%s' "
 247           "%s LIMIT 1",
 248           mr->PoolId, mr->MediaType, mr->VolStatus, order);
 249    }
 250    if (!QUERY_DB(jcr, mdb, mdb->cmd)) {
 251       db_unlock(mdb);
 252       return 0;
 253    }
 254
 255    numrows = sql_num_rows(mdb);
 256    if (item > numrows) {
 257       Mmsg2(&mdb->errmsg, _("Request for Volume item %d greater than max %d\n"),
 258          item, numrows);
 259       db_unlock(mdb);
 260       return 0;
 261    }
 262
 263    /* Seek to desired item
 264     * Note, we use base 1; SQL uses base 0
 265     */
 266    sql_data_seek(mdb, item-1);
 267
 268    if ((row = sql_fetch_row(mdb)) == NULL) {
 269       Mmsg1(&mdb->errmsg, _("No Volume record found for item %d.\n"), item);
 270       sql_free_result(mdb);
 271       db_unlock(mdb);
 272       return 0;
 273    }
 274
 275    /* Return fields in Media Record */
 276    mr->MediaId = str_to_int64(row[0]);
 277    bstrncpy(mr->VolumeName, row[1], sizeof(mr->VolumeName));
 278    mr->VolJobs = str_to_int64(row[2]);
 279    mr->VolFiles = str_to_int64(row[3]);
 280    mr->VolBlocks = str_to_int64(row[4]);
 281    mr->VolBytes = str_to_uint64(row[5]);
 282    mr->VolMounts = str_to_int64(row[6]);
 283    mr->VolErrors = str_to_int64(row[7]);
 284    mr->VolWrites = str_to_int64(row[8]);
 285    mr->MaxVolBytes = str_to_uint64(row[9]);
 286    mr->VolCapacityBytes = str_to_uint64(row[10]);
 287    mr->VolRetention = str_to_uint64(row[11]);
 288    mr->VolUseDuration = str_to_uint64(row[12]);
 289    mr->MaxVolJobs = str_to_int64(row[13]);
 290    mr->MaxVolFiles = str_to_int64(row[14]);
 291    mr->Recycle = str_to_int64(row[15]);
 292    mr->Slot = str_to_int64(row[16]);
 293    bstrncpy(mr->cFirstWritten, row[17]!=NULL?row[17]:"", sizeof(mr->cFirstWritten));
 294    mr->FirstWritten = (time_t)str_to_utime(mr->cFirstWritten);
 295    bstrncpy(mr->cLastWritten, row[18]!=NULL?row[18]:"", sizeof(mr->cLastWritten));
 296    mr->LastWritten = (time_t)str_to_utime(mr->cLastWritten);
 297    bstrncpy(mr->VolStatus, row[19], sizeof(mr->VolStatus));
 298
 299    sql_free_result(mdb);
 300
 301    db_unlock(mdb);
 302    return numrows;
 303 }
 304
 305
 306 #endif /* HAVE_MYSQL || HAVE_SQLITE */