]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/dird/ua_purge.c
kes Add job report indication of whether or not VSS and Encryption were
[bacula/bacula] / bacula / src / dird / ua_purge.c
index 3cba6c85573973d814a06f6ab4511687beb2eed7..1b7e9661af21153d140b7af660f831c441f1e34a 100644 (file)
@@ -2,34 +2,41 @@
  *
  *   Bacula Director -- User Agent Database Purge Command
  *
- *     Purges Files from specific JobIds
+ *      Purges Files from specific JobIds
  * or
- *     Purges Jobs from Volumes
+ *      Purges Jobs from Volumes
  *
  *     Kern Sibbald, February MMII
  *
  *   Version $Id$
  */
-
 /*
-   Copyright (C) 2002-2004 Kern Sibbald and John Walker
+   Bacula® - The Network Backup Solution
+
+   Copyright (C) 2002-2006 Free Software Foundation Europe e.V.
 
-   This program is free software; you can redistribute it and/or
-   modify it under the terms of the GNU General Public License as
-   published by the Free Software Foundation; either version 2 of
-   the License, or (at your option) any later version.
+   The main author of Bacula is Kern Sibbald, with contributions from
+   many others, a complete list can be found in the file AUTHORS.
+   This program is Free Software; you can redistribute it and/or
+   modify it under the terms of version two of the GNU General Public
+   License as published by the Free Software Foundation plus additions
+   that are listed in the file LICENSE.
 
-   This program is distributed in the hope that it will be useful,
-   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   This program is distributed in the hope that it will be useful, but
+   WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    General Public License for more details.
 
-   You should have received a copy of the GNU General Public
-   License along with this program; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
-   MA 02111-1307, USA.
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
 
- */
+   Bacula® is a registered trademark of John Walker.
+   The licensor of Bacula is the Free Software Foundation Europe
+   (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
+   Switzerland, email:ftf@fsfeurope.org.
+*/
 
 #include "bacula.h"
 #include "dird.h"
 static int purge_files_from_client(UAContext *ua, CLIENT *client);
 static int purge_jobs_from_client(UAContext *ua, CLIENT *client);
 
-void purge_files_from_volume(UAContext *ua, MEDIA_DBR *mr );
-int purge_jobs_from_volume(UAContext *ua, MEDIA_DBR *mr);
-void purge_files_from_job(UAContext *ua, JOB_DBR *jr);
-int mark_media_purged(UAContext *ua, MEDIA_DBR *mr);
-
 #define MAX_DEL_LIST_LEN 1000000
 
-
-static char *select_jobsfiles_from_client =
+static const char *select_jobsfiles_from_client =
    "SELECT JobId FROM Job "
-   "WHERE ClientId=%d "
+   "WHERE ClientId=%s "
    "AND PurgedFiles=0";
 
-static char *select_jobs_from_client =
+static const char *select_jobs_from_client =
    "SELECT JobId, PurgedFiles FROM Job "
-   "WHERE ClientId=%d";
+   "WHERE ClientId=%s";
 
 
 /* In memory list of JobIds */
 struct s_file_del_ctx {
    JobId_t *JobId;
-   int num_ids;                      /* ids stored */
-   int max_ids;                      /* size of array */
-   int num_del;                      /* number deleted */
-   int tot_ids;                      /* total to process */
+   int num_ids;                       /* ids stored */
+   int max_ids;                       /* size of array */
+   int num_del;                       /* number deleted */
+   int tot_ids;                       /* total to process */
 };
 
 struct s_job_del_ctx {
-   JobId_t *JobId;                   /* array of JobIds */
-   char *PurgedFiles;                /* Array of PurgedFile flags */
-   int num_ids;                      /* ids stored */
-   int max_ids;                      /* size of array */
-   int num_del;                      /* number deleted */
-   int tot_ids;                      /* total to process */
+   JobId_t *JobId;                    /* array of JobIds */
+   char *PurgedFiles;                 /* Array of PurgedFile flags */
+   int num_ids;                       /* ids stored */
+   int max_ids;                       /* size of array */
+   int num_del;                       /* number deleted */
+   int tot_ids;                       /* total to process */
 };
 
 struct s_count_ctx {
@@ -79,14 +80,14 @@ struct s_count_ctx {
 };
 
 /*
- * Called here to count entries to be deleted 
+ * Called here to count entries to be deleted
  */
 static int count_handler(void *ctx, int num_fields, char **row)
 {
    struct s_count_ctx *cnt = (struct s_count_ctx *)ctx;
 
    if (row[0]) {
-      cnt->count = atoi(row[0]);
+      cnt->count = str_to_int64(row[0]);
    } else {
       cnt->count = 0;
    }
@@ -94,7 +95,7 @@ static int count_handler(void *ctx, int num_fields, char **row)
 }
 
 /*
- * Called here to count entries to be deleted 
+ * Called here to count entries to be deleted
  */
 static int file_count_handler(void *ctx, int num_fields, char **row)
 {
@@ -124,7 +125,7 @@ static int job_delete_handler(void *ctx, int num_fields, char **row)
 {
    struct s_job_del_ctx *del = (struct s_job_del_ctx *)ctx;
 
-   if (del->num_ids == MAX_DEL_LIST_LEN) {  
+   if (del->num_ids == MAX_DEL_LIST_LEN) {
       return 1;
    }
    if (del->num_ids == del->max_ids) {
@@ -133,7 +134,7 @@ static int job_delete_handler(void *ctx, int num_fields, char **row)
       del->PurgedFiles = (char *)brealloc(del->PurgedFiles, del->max_ids);
    }
    del->JobId[del->num_ids] = (JobId_t)str_to_int64(row[0]);
-   del->PurgedFiles[del->num_ids++] = (char)str_to_int64(row[0]);
+   del->PurgedFiles[del->num_ids++] = (char)str_to_int64(row[1]);
    return 0;
 }
 
@@ -141,13 +142,13 @@ static int file_delete_handler(void *ctx, int num_fields, char **row)
 {
    struct s_file_del_ctx *del = (struct s_file_del_ctx *)ctx;
 
-   if (del->num_ids == MAX_DEL_LIST_LEN) {  
+   if (del->num_ids == MAX_DEL_LIST_LEN) {
       return 1;
    }
    if (del->num_ids == del->max_ids) {
       del->max_ids = (del->max_ids * 3) / 2;
       del->JobId = (JobId_t *)brealloc(del->JobId, sizeof(JobId_t) *
-        del->max_ids);
+         del->max_ids);
    }
    del->JobId[del->num_ids++] = (JobId_t)str_to_int64(row[0]);
    return 0;
@@ -161,36 +162,36 @@ static int file_delete_handler(void *ctx, int num_fields, char **row)
  *
  *  N.B. Not all above is implemented yet.
  */
-int purgecmd(UAContext *ua, char *cmd)
+int purgecmd(UAContext *ua, const char *cmd)
 {
    int i;
    CLIENT *client;
    MEDIA_DBR mr;
    JOB_DBR  jr;
-   static char *keywords[] = {
-      N_("files"),
-      N_("jobs"),
-      N_("volume"),
+   static const char *keywords[] = {
+      NT_("files"),
+      NT_("jobs"),
+      NT_("volume"),
       NULL};
 
-   static char *files_keywords[] = {
-      N_("Job"),
-      N_("JobId"),
-      N_("Client"),
-      N_("Volume"),
+   static const char *files_keywords[] = {
+      NT_("Job"),
+      NT_("JobId"),
+      NT_("Client"),
+      NT_("Volume"),
       NULL};
 
-   static char *jobs_keywords[] = {
-      N_("Client"),
-      N_("Volume"),
+   static const char *jobs_keywords[] = {
+      NT_("Client"),
+      NT_("Volume"),
       NULL};
-      
+
    bsendmsg(ua, _(
       "\nThis command is can be DANGEROUS!!!\n\n"
       "It purges (deletes) all Files from a Job,\n"
       "JobId, Client or Volume; or it purges (deletes)\n"
       "all Jobs from a Client or Volume without regard\n"
-      "for retention periods. Normally you should use the\n" 
+      "for retention periods. Normally you should use the\n"
       "PRUNE command, which respects retention periods.\n"));
 
    if (!open_db(ua)) {
@@ -200,46 +201,46 @@ int purgecmd(UAContext *ua, char *cmd)
    /* Files */
    case 0:
       switch(find_arg_keyword(ua, files_keywords)) {
-      case 0:                        /* Job */
-      case 1:                        /* JobId */
-        if (get_job_dbr(ua, &jr)) {
-           purge_files_from_job(ua, &jr);
-        }
-        return 1;
-      case 2:                        /* client */
-        client = get_client_resource(ua);
-        if (client) {
-           purge_files_from_client(ua, client);
-        }
-        return 1;
-      case 3:                        /* Volume */
-        if (select_media_dbr(ua, &mr)) {
-           purge_files_from_volume(ua, &mr);
-        }
-        return 1;
+      case 0:                         /* Job */
+      case 1:                         /* JobId */
+         if (get_job_dbr(ua, &jr)) {
+            purge_files_from_job(ua, jr.JobId);
+         }
+         return 1;
+      case 2:                         /* client */
+         client = get_client_resource(ua);
+         if (client) {
+            purge_files_from_client(ua, client);
+         }
+         return 1;
+      case 3:                         /* Volume */
+         if (select_media_dbr(ua, &mr)) {
+            purge_files_from_volume(ua, &mr);
+         }
+         return 1;
       }
    /* Jobs */
    case 1:
       switch(find_arg_keyword(ua, jobs_keywords)) {
-      case 0:                        /* client */
-        client = get_client_resource(ua);
-        if (client) {
-           purge_jobs_from_client(ua, client);
-        }
-        return 1;
-      case 1:                        /* Volume */
-        if (select_media_dbr(ua, &mr)) {
-           purge_jobs_from_volume(ua, &mr);
-        }
-        return 1;
+      case 0:                         /* client */
+         client = get_client_resource(ua);
+         if (client) {
+            purge_jobs_from_client(ua, client);
+         }
+         return 1;
+      case 1:                         /* Volume */
+         if (select_media_dbr(ua, &mr)) {
+            purge_jobs_from_volume(ua, &mr);
+         }
+         return 1;
       }
    /* Volume */
    case 2:
-      while ((i=find_arg(ua, _("volume"))) >= 0) {
-        if (select_media_dbr(ua, &mr)) {
-           purge_jobs_from_volume(ua, &mr);
-        }
-        *ua->argk[i] = 0;            /* zap keyword already seen */
+      while ((i=find_arg(ua, NT_("volume"))) >= 0) {
+         if (select_media_dbr(ua, &mr)) {
+            purge_jobs_from_volume(ua, &mr);
+         }
+         *ua->argk[i] = 0;            /* zap keyword already seen */
          bsendmsg(ua, "\n");
       }
       return 1;
@@ -247,21 +248,21 @@ int purgecmd(UAContext *ua, char *cmd)
       break;
    }
    switch (do_keyword_prompt(ua, _("Choose item to purge"), keywords)) {
-   case 0:                           /* files */
+   case 0:                            /* files */
       client = get_client_resource(ua);
       if (client) {
-        purge_files_from_client(ua, client);
+         purge_files_from_client(ua, client);
       }
       break;
-   case 1:                           /* jobs */
+   case 1:                            /* jobs */
       client = get_client_resource(ua);
       if (client) {
-        purge_jobs_from_client(ua, client);
+         purge_jobs_from_client(ua, client);
       }
       break;
-   case 2:                           /* Volume */
+   case 2:                            /* Volume */
       if (select_media_dbr(ua, &mr)) {
-        purge_jobs_from_volume(ua, &mr);
+         purge_jobs_from_volume(ua, &mr);
       }
       break;
    }
@@ -279,9 +280,10 @@ int purgecmd(UAContext *ua, char *cmd)
 static int purge_files_from_client(UAContext *ua, CLIENT *client)
 {
    struct s_file_del_ctx del;
-   char *query = (char *)get_pool_memory(PM_MESSAGE);
+   POOLMEM *query = get_pool_memory(PM_MESSAGE);
    int i;
    CLIENT_DBR cr;
+   char ed1[50];
 
    memset(&cr, 0, sizeof(cr));
    memset(&del, 0, sizeof(del));
@@ -291,26 +293,26 @@ static int purge_files_from_client(UAContext *ua, CLIENT *client)
       return 0;
    }
    bsendmsg(ua, _("Begin purging files for Client \"%s\"\n"), cr.Name);
-   Mmsg(&query, select_jobsfiles_from_client, cr.ClientId);
+   Mmsg(query, select_jobsfiles_from_client, edit_int64(cr.ClientId, ed1));
 
    Dmsg1(050, "select sql=%s\n", query);
+
    if (!db_sql_query(ua->db, query, file_count_handler, (void *)&del)) {
       bsendmsg(ua, "%s", db_strerror(ua->db));
       Dmsg0(050, "Count failed\n");
       goto bail_out;
    }
-      
+
    if (del.tot_ids == 0) {
       bsendmsg(ua, _("No Files found for client %s to purge from %s catalog.\n"),
-        client->hdr.name, client->catalog->hdr.name);
+         client->hdr.name, client->catalog->hdr.name);
       goto bail_out;
    }
 
    if (del.tot_ids < MAX_DEL_LIST_LEN) {
       del.max_ids = del.tot_ids + 1;
    } else {
-      del.max_ids = MAX_DEL_LIST_LEN; 
+      del.max_ids = MAX_DEL_LIST_LEN;
    }
    del.tot_ids = 0;
 
@@ -319,22 +321,11 @@ static int purge_files_from_client(UAContext *ua, CLIENT *client)
    db_sql_query(ua->db, query, file_delete_handler, (void *)&del);
 
    for (i=0; i < del.num_ids; i++) {
-      Dmsg1(050, "Delete JobId=%d\n", del.JobId[i]);
-      Mmsg(&query, "DELETE FROM File WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      /* 
-       * Now mark Job as having files purged. This is necessary to
-       * avoid having too many Jobs to process in future prunings. If
-       * we don't do this, the number of JobId's in our in memory list
-       * will grow very large.
-       */
-      Mmsg(&query, "UPDATE Job Set PurgedFiles=1 WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      Dmsg1(050, "Del sql=%s\n", query);
+      purge_files_from_job(ua, del.JobId[i]);
    }
    bsendmsg(ua, _("%d Files for client \"%s\" purged from %s catalog.\n"), del.num_ids,
       client->hdr.name, client->catalog->hdr.name);
-   
+
 bail_out:
    if (del.JobId) {
       free(del.JobId);
@@ -350,15 +341,15 @@ bail_out:
  * is older than the retention period, we unconditionally delete
  * it and all File records for that Job.  This is simple enough that no
  * temporary tables are needed. We simply make an in memory list of
- * the JobIds meeting the prune conditions, then delete the Job,
- * Files, and JobMedia records in that list.
+ * the JobIds then delete the Job, Files, and JobMedia records in that list.
  */
 static int purge_jobs_from_client(UAContext *ua, CLIENT *client)
 {
    struct s_job_del_ctx del;
-   char *query = (char *)get_pool_memory(PM_MESSAGE);
+   POOLMEM *query = get_pool_memory(PM_MESSAGE);
    int i;
    CLIENT_DBR cr;
+   char ed1[50];
 
    memset(&cr, 0, sizeof(cr));
    memset(&del, 0, sizeof(del));
@@ -369,10 +360,10 @@ static int purge_jobs_from_client(UAContext *ua, CLIENT *client)
    }
 
    bsendmsg(ua, _("Begin purging jobs from Client \"%s\"\n"), cr.Name);
-   Mmsg(&query, select_jobs_from_client, cr.ClientId);
+   Mmsg(query, select_jobs_from_client, edit_int64(cr.ClientId, ed1));
 
    Dmsg1(050, "select sql=%s\n", query);
+
    if (!db_sql_query(ua->db, query, job_count_handler, (void *)&del)) {
       bsendmsg(ua, "%s", db_strerror(ua->db));
       Dmsg0(050, "Count failed\n");
@@ -380,14 +371,14 @@ static int purge_jobs_from_client(UAContext *ua, CLIENT *client)
    }
    if (del.tot_ids == 0) {
       bsendmsg(ua, _("No Jobs found for client %s to purge from %s catalog.\n"),
-        client->hdr.name, client->catalog->hdr.name);
+         client->hdr.name, client->catalog->hdr.name);
       goto bail_out;
    }
 
    if (del.tot_ids < MAX_DEL_LIST_LEN) {
       del.max_ids = del.tot_ids + 1;
    } else {
-      del.max_ids = MAX_DEL_LIST_LEN; 
+      del.max_ids = MAX_DEL_LIST_LEN;
    }
 
    del.tot_ids = 0;
@@ -397,30 +388,21 @@ static int purge_jobs_from_client(UAContext *ua, CLIENT *client)
 
    db_sql_query(ua->db, query, job_delete_handler, (void *)&del);
 
-   /* 
+   /*
     * OK, now we have the list of JobId's to be purged, first check
     * if the Files have been purged, if not, purge (delete) them.
     * Then delete the Job entry, and finally and JobMedia records.
     */
    for (i=0; i < del.num_ids; i++) {
-      Dmsg1(050, "Delete JobId=%d\n", del.JobId[i]);
+      Dmsg1(050, "Delete Files JobId=%s\n", ed1); 
       if (!del.PurgedFiles[i]) {
-         Mmsg(&query, "DELETE FROM File WHERE JobId=%d", del.JobId[i]);
-        db_sql_query(ua->db, query, NULL, (void *)NULL);
-         Dmsg1(050, "Del sql=%s\n", query);
+         purge_files_from_job(ua, del.JobId[i]);
       }
-
-      Mmsg(&query, "DELETE FROM Job WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      Dmsg1(050, "Del sql=%s\n", query);
-
-      Mmsg(&query, "DELETE FROM JobMedia WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      Dmsg1(050, "Del sql=%s\n", query);
+      purge_job_from_catalog(ua, del.JobId[i]);
    }
    bsendmsg(ua, _("%d Jobs for client %s purged from %s catalog.\n"), del.num_ids,
       client->hdr.name, client->catalog->hdr.name);
-   
+
 bail_out:
    if (del.JobId) {
       free(del.JobId);
@@ -432,62 +414,112 @@ bail_out:
    return 1;
 }
 
-void purge_files_from_job(UAContext *ua, JOB_DBR *jr)
+void purge_job_from_catalog(UAContext *ua, JobId_t JobId)
 {
-   char *query = (char *)get_pool_memory(PM_MESSAGE);
-   
-   Mmsg(&query, "DELETE FROM File WHERE JobId=%u", jr->JobId);
-   db_sql_query(ua->db, query, NULL, (void *)NULL);
+   POOL_MEM query(PM_MESSAGE);
+   char ed1[50];
 
-   Mmsg(&query, "UPDATE Job Set PurgedFiles=1 WHERE JobId=%u", jr->JobId);
-   db_sql_query(ua->db, query, NULL, (void *)NULL);
+   /* Remove job records */
+   purge_job_records_from_catalog(ua, JobId);
 
-   free_pool_memory(query);
+   /* Now remove the Job record itself */
+   edit_int64(JobId, ed1);
+   Mmsg(query, "DELETE FROM Job WHERE JobId=%s", ed1);
+   db_sql_query(ua->db, query.c_str(), NULL, (void *)NULL);
+   Dmsg1(050, "Delete Job sql=%s\n", query.c_str());
 }
 
-void purge_files_from_volume(UAContext *ua, MEDIA_DBR *mr ) 
+/*
+ * This removes all the records associated with a Job from
+ *  the catalog (i.e. prunes it) without removing the Job
+ *  record itself.
+ */
+void purge_job_records_from_catalog(UAContext *ua, JobId_t JobId)
+{
+   POOL_MEM query(PM_MESSAGE);
+   char ed1[50];
+
+   purge_files_from_job(ua, JobId);
+
+   edit_int64(JobId, ed1);
+   Mmsg(query, "DELETE FROM JobMedia WHERE JobId=%s", ed1);
+   db_sql_query(ua->db, query.c_str(), NULL, (void *)NULL);
+   Dmsg1(050, "Delete JobMedia sql=%s\n", query.c_str());
+
+   Mmsg(query, "DELETE FROM Log WHERE JobId=%s", ed1);
+   db_sql_query(ua->db, query.c_str(), NULL, (void *)NULL);
+   Dmsg1(050, "Delete Log sql=%s\n", query.c_str());
+
+}
+
+
+/*
+ * Remove File records for a particular Job.
+ */
+void purge_files_from_job(UAContext *ua, JobId_t JobId)
+{
+   POOL_MEM query(PM_MESSAGE);
+   char ed1[50];
+
+   edit_int64(JobId, ed1);
+   Mmsg(query, del_File, ed1);
+   db_sql_query(ua->db, query.c_str(), NULL, (void *)NULL);
+
+   /*
+    * Now mark Job as having files purged. This is necessary to
+    * avoid having too many Jobs to process in future prunings. If
+    * we don't do this, the number of JobId's in our in memory list
+    * could grow very large.
+    */
+   Mmsg(query, upd_Purged, ed1);
+   db_sql_query(ua->db, query.c_str(), NULL, (void *)NULL);
+}
+
+void purge_files_from_volume(UAContext *ua, MEDIA_DBR *mr )
 {} /* ***FIXME*** implement */
 
 /*
  * Returns: 1 if Volume purged
- *         0 if Volume not purged
+ *          0 if Volume not purged
  */
-int purge_jobs_from_volume(UAContext *ua, MEDIA_DBR *mr) 
+int purge_jobs_from_volume(UAContext *ua, MEDIA_DBR *mr)
 {
-   char *query = (char *)get_pool_memory(PM_MESSAGE);
+   POOLMEM *query = get_pool_memory(PM_MESSAGE);
    struct s_count_ctx cnt;
    struct s_file_del_ctx del;
    int i, stat = 0;
    JOB_DBR jr;
+   char ed1[50];
 
-   stat = strcmp(mr->VolStatus, "Append") == 0 || 
+   stat = strcmp(mr->VolStatus, "Append") == 0 ||
           strcmp(mr->VolStatus, "Full")   == 0 ||
-          strcmp(mr->VolStatus, "Used")   == 0 || 
-          strcmp(mr->VolStatus, "Error")  == 0; 
+          strcmp(mr->VolStatus, "Used")   == 0 ||
+          strcmp(mr->VolStatus, "Error")  == 0;
    if (!stat) {
       bsendmsg(ua, "\n");
       bsendmsg(ua, _("Volume \"%s\" has VolStatus \"%s\" and cannot be purged.\n"
                      "The VolStatus must be: Append, Full, Used, or Error to be purged.\n"),
-                    mr->VolumeName, mr->VolStatus);
+                     mr->VolumeName, mr->VolStatus);
       goto bail_out;
    }
-   
+
    memset(&jr, 0, sizeof(jr));
    memset(&del, 0, sizeof(del));
    cnt.count = 0;
-   Mmsg(&query, "SELECT count(*) FROM JobMedia WHERE MediaId=%d", mr->MediaId);
+   Mmsg(query, "SELECT count(*) FROM JobMedia WHERE MediaId=%s", 
+        edit_int64(mr->MediaId, ed1));
    if (!db_sql_query(ua->db, query, count_handler, (void *)&cnt)) {
       bsendmsg(ua, "%s", db_strerror(ua->db));
       Dmsg0(050, "Count failed\n");
       goto bail_out;
    }
-      
+
    if (cnt.count == 0) {
-      bsendmsg(ua, "There are no Jobs associated with Volume \"%s\". Marking it purged.\n",
-        mr->VolumeName);
+      bsendmsg(ua, _("There are no Jobs associated with Volume \"%s\". Marking it purged.\n"),
+         mr->VolumeName);
       if (!mark_media_purged(ua, mr)) {
          bsendmsg(ua, "%s", db_strerror(ua->db));
-        goto bail_out;
+         goto bail_out;
       }
       goto bail_out;
    }
@@ -495,11 +527,11 @@ int purge_jobs_from_volume(UAContext *ua, MEDIA_DBR *mr)
    if (cnt.count < MAX_DEL_LIST_LEN) {
       del.max_ids = cnt.count + 1;
    } else {
-      del.max_ids = MAX_DEL_LIST_LEN; 
+      del.max_ids = MAX_DEL_LIST_LEN;
    }
 
    /*
-    * Check if he wants to purge a single jobid 
+    * Check if he wants to purge a single jobid
     */
    i = find_arg_with_value(ua, "jobid");
    if (i >= 0) {
@@ -507,28 +539,23 @@ int purge_jobs_from_volume(UAContext *ua, MEDIA_DBR *mr)
       del.num_ids = 1;
       del.JobId[0] = str_to_int64(ua->argv[i]);
    } else {
-      /* 
-       * Purge ALL JobIds 
+      /*
+       * Purge ALL JobIds
        */
       del.JobId = (JobId_t *)malloc(sizeof(JobId_t) * del.max_ids);
 
-      Mmsg(&query, "SELECT JobId FROM JobMedia WHERE MediaId=%d", mr->MediaId);
+      Mmsg(query, "SELECT JobId FROM JobMedia WHERE MediaId=%s", 
+           edit_int64(mr->MediaId, ed1));
       if (!db_sql_query(ua->db, query, file_delete_handler, (void *)&del)) {
          bsendmsg(ua, "%s", db_strerror(ua->db));
          Dmsg0(050, "Count failed\n");
-        goto bail_out;
+         goto bail_out;
       }
    }
 
    for (i=0; i < del.num_ids; i++) {
-      Dmsg1(050, "Delete JobId=%d\n", del.JobId[i]);
-      Mmsg(&query, "DELETE FROM File WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      Mmsg(&query, "DELETE FROM Job WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      Mmsg(&query, "DELETE FROM JobMedia WHERE JobId=%d", del.JobId[i]);
-      db_sql_query(ua->db, query, NULL, (void *)NULL);
-      Dmsg1(050, "Del sql=%s\n", query);
+      purge_files_from_job(ua, del.JobId[i]);
+      purge_job_from_catalog(ua, del.JobId[i]);
       del.num_del++;
    }
    if (del.JobId) {
@@ -539,23 +566,24 @@ int purge_jobs_from_volume(UAContext *ua, MEDIA_DBR *mr)
 
    /* If purged, mark it so */
    cnt.count = 0;
-   Mmsg(&query, "SELECT count(*) FROM JobMedia WHERE MediaId=%d", mr->MediaId);
+   Mmsg(query, "SELECT count(*) FROM JobMedia WHERE MediaId=%s", 
+        edit_int64(mr->MediaId, ed1));
    if (!db_sql_query(ua->db, query, count_handler, (void *)&cnt)) {
       bsendmsg(ua, "%s", db_strerror(ua->db));
       Dmsg0(050, "Count failed\n");
       goto bail_out;
    }
-      
+
    if (cnt.count == 0) {
-      bsendmsg(ua, "There are no more Jobs associated with Volume \"%s\". Marking it purged.\n",
-        mr->VolumeName);
+      bsendmsg(ua, _("There are no more Jobs associated with Volume \"%s\". Marking it purged.\n"),
+         mr->VolumeName);
       if (!(stat = mark_media_purged(ua, mr))) {
          bsendmsg(ua, "%s", db_strerror(ua->db));
-        goto bail_out;
+         goto bail_out;
       }
    }
 
-bail_out:   
+bail_out:
    free_pool_memory(query);
    return stat;
 }
@@ -564,19 +592,27 @@ bail_out:
  * IF volume status is Append, Full, Used, or Error, mark it Purged
  *   Purged volumes can then be recycled (if enabled).
  */
-int mark_media_purged(UAContext *ua, MEDIA_DBR *mr)
+bool mark_media_purged(UAContext *ua, MEDIA_DBR *mr)
 {
-   if (strcmp(mr->VolStatus, "Append") == 0 || 
+   JCR *jcr = ua->jcr;
+   if (strcmp(mr->VolStatus, "Append") == 0 ||
        strcmp(mr->VolStatus, "Full")   == 0 ||
-       strcmp(mr->VolStatus, "Used")   == 0 || 
+       strcmp(mr->VolStatus, "Used")   == 0 ||
        strcmp(mr->VolStatus, "Error")  == 0) {
       bstrncpy(mr->VolStatus, "Purged", sizeof(mr->VolStatus));
-      if (!db_update_media_record(ua->jcr, ua->db, mr)) {
-        return 0;
+      if (!db_update_media_record(jcr, ua->db, mr)) {
+         return false;
       }
-      return 1;
+      pm_strcpy(jcr->VolumeName, mr->VolumeName);
+      generate_job_event(jcr, "VolumePurged");
+      /* Send message to Job report, if it is a *real* job */           
+      if (jcr && jcr->JobId > 0) {
+         Jmsg1(jcr, M_INFO, 0, _("All records pruned from Volume \"%s\"; marking it \"Purged\"\n"),
+            mr->VolumeName); 
+      }
+      return true;
    } else {
       bsendmsg(ua, _("Cannot purge Volume with VolStatus=%s\n"), mr->VolStatus);
    }
-   return strcpy(mr->VolStatus, "Purged") == 0;
+   return strcmp(mr->VolStatus, "Purged") == 0;
 }