Change store_bit() to store_bool() for the Spooling in

[bacula/bacula] / bacula / src / dird / autoprune.c

diff --git a/bacula/src/dird/autoprune.c b/bacula/src/dird/autoprune.c
index 483e796cc434aa973d1e8c32a2c0771d91632850..e0214080d93d2f46c993b1d90c8b18bc7ed70666 100644 (file)
--- a/bacula/src/dird/autoprune.c
+++ b/bacula/src/dird/autoprune.c
@@ -1,7 +1,7 @@
 /*
  *
- *   Bacula Director -- Automatic Pruning 
- *     Applies retention periods
+ *   Bacula Director -- Automatic Pruning
+ *      Applies retention periods
  *
  *     Kern Sibbald, May MMII
  *
@@ -9,7 +9,7 @@
  */
 
 /*
-   Copyright (C) 2002 Kern Sibbald and John Walker
+   Copyright (C) 2002-2004 Kern Sibbald and John Walker
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License as
@@ -34,70 +34,53 @@
 
 /* Forward referenced functions */
 
-void create_ua_context(JCR *jcr, UAContext *ua)
-{
-   memset(ua, 0, sizeof(UAContext));
-   ua->jcr = jcr;
-   ua->db = jcr->db;
-   ua->cmd = get_pool_memory(PM_FNAME);
-   ua->args = get_pool_memory(PM_FNAME);
-   ua->verbose = 1;
-}
-
-void free_ua_context(UAContext *ua)
-{
-   if (ua->cmd) {
-      free_pool_memory(ua->cmd);
-   }
-   if (ua->args) {
-      free_pool_memory(ua->args);
-   }
-}
 
 /*
- * Auto Prune Jobs and Files
- *   Volumes are done separately
+ * Auto Prune Jobs and Files. This is called at the end of every
+ *   Job.  We do not prune volumes here.
  */
 int do_autoprune(JCR *jcr)
 {
-   UAContext ua;
+   UAContext *ua;
    CLIENT *client;
-   int pruned;
+   bool pruned;
 
-   if (!jcr->client) {               /* temp -- remove me */
+   if (!jcr->client) {                /* temp -- remove me */
       return 1;
    }
 
-   create_ua_context(jcr, &ua);
+   ua = new_ua_context(jcr);
 
    client = jcr->client;
 
    if (jcr->job->PruneJobs || jcr->client->AutoPrune) {
       Jmsg(jcr, M_INFO, 0, _("Begin pruning Jobs.\n"));
-      prune_jobs(&ua, client, jcr->JobType);
-      pruned = TRUE;
+      prune_jobs(ua, client, jcr->JobType);
+      pruned = true;
    } else {
-      pruned = FALSE;
+      pruned = false;
    }
-  
+
    if (jcr->job->PruneFiles || jcr->client->AutoPrune) {
       Jmsg(jcr, M_INFO, 0, _("Begin pruning Files.\n"));
-      prune_files(&ua, client);
-      pruned = TRUE;
+      prune_files(ua, client);
+      pruned = true;
    }
    if (pruned) {
       Jmsg(jcr, M_INFO, 0, _("End auto prune.\n\n"));
    }
 
-   free_ua_context(&ua);
-   return 1;   
+   free_ua_context(ua);
+   return 1;
 }
 
 /*
- * Prune all volumes in current Pool.
+ * Prune all volumes in current Pool. This is called from
+ *   catreq.c when the Storage daemon is asking for another
+ *   volume and no appendable volumes are available.
  *
  *  Return 0: on error
- *        number of Volumes Purged
+ *         number of Volumes Purged
  */
 int prune_volumes(JCR *jcr)
 {
@@ -106,47 +89,46 @@ int prune_volumes(JCR *jcr)
    uint32_t *ids = NULL;
    int num_ids = 0;
    MEDIA_DBR mr;
-   POOL_DBR pr;
-   UAContext ua;
+   UAContext *ua;
 
    if (!jcr->job->PruneVolumes && !jcr->pool->AutoPrune) {
       Dmsg0(100, "AutoPrune not set in Pool.\n");
       return 0;
    }
    memset(&mr, 0, sizeof(mr));
-   memset(&pr, 0, sizeof(pr));
-   create_ua_context(jcr, &ua);
+   ua = new_ua_context(jcr);
 
    db_lock(jcr->db);
 
-   pr.PoolId = jcr->PoolId;
-   if (!db_get_pool_record(jcr->db, &pr) || !db_get_media_ids(jcr->db, &num_ids, &ids)) {
+   /* Get the List of all media ids in the current Pool */
+   if (!db_get_media_ids(jcr, jcr->db, jcr->jr.PoolId, &num_ids, &ids)) {
       Jmsg(jcr, M_ERROR, 0, "%s", db_strerror(jcr->db));
       goto bail_out;
    }
 
-
+   /* Visit each Volume and Prune it */
    for (i=0; i<num_ids; i++) {
       mr.MediaId = ids[i];
-      if (!db_get_media_record(jcr->db, &mr)) {
+      if (!db_get_media_record(jcr, jcr->db, &mr)) {
          Jmsg(jcr, M_ERROR, 0, "%s", db_strerror(jcr->db));
-        continue;
+         continue;
       }
       /* Prune only Volumes from current Pool */
-      if (pr.PoolId != mr.PoolId) {
-        continue;
+      if (jcr->jr.PoolId != mr.PoolId) {
+         continue;
       }
-      /* Prune only Volumes with status "Full"  or "Used" */
-      if (strcmp(mr.VolStatus, "Full") == 0 || strcmp(mr.VolStatus, "Used") == 0) {
+      /* Prune only Volumes with status "Full", or "Used" */
+      if (strcmp(mr.VolStatus, "Full")   == 0 ||
+          strcmp(mr.VolStatus, "Used")   == 0) {
          Dmsg1(200, "Prune Volume %s\n", mr.VolumeName);
-        stat += prune_volume(&ua, &pr, &mr); 
+         stat += prune_volume(ua, &mr);
          Dmsg1(200, "Num pruned = %d\n", stat);
       }
-   }   
+   }
 
 bail_out:
    db_unlock(jcr->db);
-   free_ua_context(&ua);
+   free_ua_context(ua);
    if (ids) {
       free(ids);
    }