admin/cron_paintweb.php

   1 <?php
   2
   3 /**
   4  * Perform the cleanup task for removing any obsolete images saved by PaintWeb.
   5  *
   6  * @uses $CFG
   7  */
   8 function paintweb_cron_cleanup () {
   9     global $CFG;
  10
  11     if (empty($CFG->paintwebImagesFolder)) {
  12         $CFG->paintwebImagesFolder = 'paintweb_images';
  13     }
  14
  15     $pwtable = 'paintweb_images';
  16     $pwfolder = $CFG->dataroot . '/' . $CFG->paintwebImagesFolder;
  17
  18     // Get the list of tables being tracked, known to have records with images
  19     // saved by PaintWeb.
  20     $tables = get_fieldset_select($pwtable, 'DISTINCT(tbl)');
  21     if (!$tables) {
  22         $tables = array();
  23     }
  24
  25     // Delete obsolete images in the PaintWeb table.
  26     foreach ($tables as $tbl) {
  27         delete_records_select($pwtable, "NOT EXISTS (SELECT b.id FROM
  28     {$CFG->prefix}$tbl AS b WHERE {$CFG->prefix}$pwtable.tbl='$tbl' AND
  29     {$CFG->prefix}$pwtable.rid=b.id)");
  30     }
  31
  32     // Get the list of image file names being tracked in the PaintWeb table.
  33     $tblimages = get_fieldset_select($pwtable, 'DISTINCT(img)');
  34     if (!$tblimages) {
  35         $tblimages = array();
  36     }
  37
  38     $cwd = getcwd();
  39     chdir($pwfolder);
  40
  41     // Get the list of image file names inside the physical folder of PaintWeb.
  42     $images = glob("*.{png,jpg}", GLOB_BRACE);
  43     if (!$images) {
  44         $images = array();
  45     }
  46
  47     // Remove any file which is not in the database.
  48     foreach ($images as $img) {
  49         if (!in_array($img, $tblimages)) {
  50             unlink($img);
  51         }
  52     }
  53
  54     chdir($cwd);
  55 }
  56
  57
  58 // vim:set spell spl=en fo=tanqrowcb tw=80 ts=4 sw=4 sts=4 sta et noai nocin fenc=utf-8 ff=unix:
  59