vault_clean.php

Go to the documentation of this file.

<?php
/*
 * @author Anakeen
 * @license http://creativecommons.org/licenses/by-nc-sa/2.0/fr/ Anakeen - licence CC
 * @package FDL
*/
/**
 * Increase size of vault file system
 *
 * @author Anakeen 2006
 * @version $Id: vault_clean.php,v 1.1 2006/12/08 17:53:48 eric Exp $
 * @license http://creativecommons.org/licenses/by-nc-sa/2.0/fr/ Anakeen - licence CC
 * @package FDL
 * @subpackage
 */
/**
 */

include_once ("VAULT/Class.VaultDiskStorage.php");
include_once ("VAULT/Class.VaultDiskFsStorage.php");
include_once ("FDL/Class.DocVaultIndex.php");
// -----------------------------------
function vault_clean(&$action)
{
    // GetAllParameters
    $idfs = GetHttpVars("idfs");
    $clean = GetHttpVars("clean", "orphan");
    // Set the globals elements
    $dbaccess = $action->GetParam("FREEDOM_DB");
    $fs = new VaultDiskFsStorage($dbaccess, $idfs);
    
    if ($fs->isAffected()) {
        
        $q = new QueryDb($dbaccess, "VaultDiskFsStorage");
        
        $no = $q->Query(0, 0, "TABLE", "SELECT * from vaultdiskstorage where $sqlfs id_file not in (select vaultid from docvaultindex)"); //Orphean
        //print_r2($no);
        $wsh = getWshCmd(true);
        $cmd = $wsh . " --api=VaultExamine --cmd=clean-unref";
        
        $cmd.= " >/dev/null";
        
        system($cmd, $status);
        if ($status == 0) AddWarningMsg(sprintf(_("Orphan Cleaned in %s directory") , $fs->r_path));
        else AddWarningMsg(sprintf(_("Error : Cleaning %s  status %d") , $fs->r_path, $status));
    }
    redirect($action, "VAULT", "VAULT_VIEW", $action->GetParam("CORE_STANDURL"));
}
?>