* Copyright (C) 2004-2008 Laurent Destailleur * Copyright (C) 2005-2007 Regis Houssin * * 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. * * 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. * * $Id$ */ /** \file htdocs/docsoc.php \brief Fichier onglet documents li�s � la soci�t� \ingroup societe \version $Revision$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/lib/company.lib.php"); require_once(DOL_DOCUMENT_ROOT."/html.formfile.class.php"); $langs->load("companies"); $langs->load('other'); $mesg = ""; $socid = isset($_GET["socid"])?$_GET["socid"]:''; $sortorder=$_GET["sortorder"]; $sortfield=$_GET["sortfield"]; if (! $sortorder) $sortorder="ASC"; if (! $sortfield) $sortfield="name"; // S�curit� d'acc�s client et commerciaux $socid = restrictedArea($user, 'societe', $socid); /* * Actions */ $upload_dir = $conf->societe->dir_output . "/" . $socid ; $courrier_dir = $conf->societe->dir_output . "/courrier/" . get_exdir($socid) ; // Envoie fichier if ( $_POST["sendit"] && $conf->upload != 0) { if (! is_dir($upload_dir)) create_exdir($upload_dir); if (is_dir($upload_dir)) { $result = doliMoveFileUpload($_FILES['userfile']['tmp_name'], $upload_dir . "/" . $_FILES['userfile']['name']); if ($result == 1) { $mesg = '

'.$langs->trans("FileTransferComplete").'

'; //print_r($_FILES); } else if (!$result) { // Echec transfert (fichier d�passant la limite ?) $mesg = '

'.$langs->trans("ErrorFileNotUploaded").'

'; // print_r($_FILES); } else { // Fichier infect� par un virus $mesg = '

'.$langs->trans("ErrorFileIsInfectedWith",$result).'

'; } } } // Suppression fichier if ($_POST['action'] == 'confirm_deletefile' && $_POST['confirm'] == 'yes') { $file = $upload_dir . "/" . urldecode($_GET["urlfile"]); dol_delete_file($file); $mesg = '

'.$langs->trans("FileWasRemoved").'

'; } /* * Affichage liste */ llxHeader(); if ($socid > 0) { $societe = new Societe($db); if ($societe->fetch($socid)) { /* * Affichage onglets */ $head = societe_prepare_head($societe); $html=new Form($db); dolibarr_fiche_head($head, 'document', $societe->nom); /* * Confirmation de la suppression d'une ligne produit */ if ($_GET['action'] == 'delete_file') { $html->form_confirm($_SERVER["PHP_SELF"].'?socid='.$socid.'&urlfile='.urldecode($_GET["urlfile"]), $langs->trans('DeleteFile'), $langs->trans('ConfirmDeleteFile'), 'confirm_deletefile'); print '
'; } // Construit liste des fichiers clearstatcache(); $totalsize=0; $filearray=array(); $errorlevel=error_reporting(); error_reporting(0); $handle=opendir($upload_dir); error_reporting($errorlevel); if ($handle) { $i=0; while (($file = readdir($handle))!==false) { if (!is_dir($dir.$file) && substr($file, 0, 1) <> '.' && substr($file, 0, 3) <> 'CVS') { $filearray[$i]->name=$file; $filearray[$i]->size=filesize($upload_dir."/".$file); $filearray[$i]->date=filemtime($upload_dir."/".$file); $totalsize+=$filearray[$i]->size; $i++; } } closedir($handle); } else { // print '

'.$langs->trans("ErrorCanNotReadDir",$upload_dir).'

'; } print ''; // Ref print ''; // Prefix print ''; // Nbre fichiers print ''; //Total taille print ''; print '

'.$langs->trans("Name").'	'.$societe->nom.'
'.$langs->trans('Prefix').'	'.$societe->prefix_comm.'
'.$langs->trans("NbOfAttachedFiles").'	'.sizeof($filearray).'
'.$langs->trans("TotalSizeOfAttachedFiles").'	'.$totalsize.' '.$langs->trans("bytes").'

'; print ''; if ($mesg) { print "$mesg
"; } // Affiche formulaire upload $formfile=new FormFile($db); $formfile->form_attach_new_file(DOL_URL_ROOT.'/docsoc.php?socid='.$socid); // Affiche liste des documents existant print_titre($langs->trans("AttachedFiles")); /** * TODO Mettre cette section dans une zone AJAX */ $prefix=$socid.'/'; $modulepart='societe'; $url=$_SERVER["PHP_SELF"]; print ''; print ''; $param='&socid='.$socid; print_liste_field_titre($langs->trans("Document"),$_SERVER["PHP_SELF"],"name","",$param,'align="left"',$sortfield,$sortorder); print_liste_field_titre($langs->trans("Size"),$_SERVER["PHP_SELF"],"size","",$param,'align="right"',$sortfield,$sortorder); print_liste_field_titre($langs->trans("Date"),$_SERVER["PHP_SELF"],"date","",$param,'align="center"',$sortfield,$sortorder); print ''; print ''; function compare_file($a, $b) { global $sortorder; global $sortfield; $sortorder=strtoupper($sortorder); if ($sortorder == 'ASC') { $retup=-1; $retdown=1; } else { $retup=1; $retdown=-1; } if ($sortfield == 'name') { if ($a->name == $b->name) return 0; return ($a->name < $b->name) ? $retup : $retdown; } if ($sortfield == 'date') { if ($a->date == $b->date) return 0; return ($a->date < $b->date) ? $retup : $retdown; } if ($sortfield == 'size') { if ($a->size == $b->size) return 0; return ($a->size < $b->size) ? $retup : $retdown; } } usort($filearray,"compare_file"); $var=true; foreach($filearray as $key => $file) { if (!is_dir($dir.$file->name) && substr($file->name, 0, 1) <> '.' && substr($file->name, 0, 3) <> 'CVS') { $var=!$var; print "\n"; print ''; print ''; print '\n"; } } print "


"; echo ''.$file->name.''; print "	'.$file->size.' '.$langs->trans("bytes").'	'.dolibarr_print_date($file->date,"dayhour").'	'; echo ''.img_delete().''; print "

"; // Fin de zone Ajax print "

"; // Courriers // Les courriers sont des documents speciaux generes par des scripts // situes dans scripts/courrier. // Voir Rodo if ($conf->global->MAIN_MODULE_EDITEUR) { $filearray=array(); $errorlevel=error_reporting(); error_reporting(0); $handle=opendir($courrier_dir); error_reporting($errorlevel); if ($handle) { $i=0; while (($file = readdir($handle))!==false) { if (!is_dir($dir.$file) && substr($file, 0, 1) <> '.' && substr($file, 0, 3) <> 'CVS') { $filearray[$i]=$file; $i++; } } closedir($handle); } print ''; print ''; $var=true; foreach($filearray as $key => $file) { if (!is_dir($dir.$file) && substr($file, 0, 1) <> '.' && substr($file, 0, 3) <> 'CVS') { $var=!$var; print "\n"; print ''; print ''; print "\n"; } } print "

'.$langs->trans("Courriers").'	'.$langs->trans("Size").'	'.$langs->trans("Date").'
"; $loc = "courrier/".get_exdir($socid); echo ''.$file.''; print "	'.filesize($courrier_dir."/".$file). ' '.$langs->trans("bytes").'	'.dolibarr_print_date(filemtime($courrier_dir."/".$file),"dayhour").'

"; } } else { dolibarr_print_error($db); } } else { dolibarr_print_error(); } $db->close(); llxFooter('$Date$ - $Revision$'); ?>