web/privatedoc/includes/functions.php
author cavaliet@caf4f556-3d62-0410-8435-a86758001935
Wed, 06 Jan 2010 11:13:30 +0000
changeset 113 9e94174a09c1
parent 7 7a5d38af0e65
permissions -rw-r--r--
change news and modify museology program
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     1
<?php
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     2
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     3
/* liste des dossiers */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     4
function list_dir($base, $cur, $level=0) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     5
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     6
	global $PHP_SELF, $BASE;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     7
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     8
	if ($dir = opendir($base)) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
     9
    $tab = array();
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    10
    while($entry = readdir($dir)) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    11
      if(is_dir($base."/".$entry) && !in_array($entry, array(".",".."))) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    12
        $tab[] = $entry;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    13
      }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    14
    }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    15
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    16
   	if(ereg("([0-9]{1,2})[_]([0-9]{1,2})[_]([0-9]{4})",$tab[0])){
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    17
   		$timestamp=array();
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    18
   		foreach($tab as $val):
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    19
   			list($day, $month, $year) = explode('_',$val);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    20
   			$timestamp[] = mktime(0,0,0,$month, $day, $year);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    21
   		endforeach;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    22
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    23
   		sort($timestamp,SORT_NUMERIC);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    24
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    25
   		$tab=array();
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    26
   		foreach($timestamp as $ts):
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    27
   			$tab[] = date('d_m_Y', $ts);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    28
   		endforeach;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    29
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    30
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    31
   	}else{
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    32
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    33
	    natcasesort($tab);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    34
   	}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    35
    //natsort($tab);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    36
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    37
    foreach($tab as $entry) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    38
      /* chemin relatif � la racine */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    39
      $file = $base."/".$entry;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    40
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    41
      /* marge gauche
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    42
      for($i=1; $i<=(4*$level); $i++) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    43
        echo "&nbsp;";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    44
      }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    45
      */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    46
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    47
      /* l'entr�e est-elle le dossier courant */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    48
      if($file == $cur) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    49
        echo "<img src=\"http://www.iri.centrepompidou.fr/privatedoc/img/folder.png\" />&nbsp;".strtoupper($entry)."<br />\n";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    50
      } else {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    51
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    52
      	$display = deInterCaps($entry);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    53
        $display = UtoWS($display);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    54
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    55
      	echo "<img src=\"http://www.iri.centrepompidou.fr/privatedoc/img/folder.png\" />&nbsp; <a href=\"$PHP_SELF?dir=".rawurlencode($file)."\">".trim(strtoupper($display))."</a><br/>\n";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    56
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    57
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    58
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    59
      }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    60
      /* l'entr�e est-elle dans la branche dont le dossier courant est la feuille */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    61
      if(ereg($file."/",$cur."/")) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    62
        list_dir($file, $cur, $level+1);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    63
      }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    64
    }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    65
    closedir($dir);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    66
  }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    67
}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    68
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    69
/* liste des fichiers */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    70
function list_file($cur) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    71
global $PHP_SELF, $BASE;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    72
  if ($dir = opendir($cur)) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    73
    /* tableaux */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    74
    $tab_dir = array();
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    75
    $tab_file = array();
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    76
    /* extraction */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    77
    while($file = readdir($dir)) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    78
      if(is_dir($cur."/".$file)) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    79
          $tab_dir[] = $file;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    80
      } else {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    81
          $tab_file[] = $file;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    82
      }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    83
    }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    84
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    85
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    86
    /* tri */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    87
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    88
    sort($tab_dir);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    89
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    90
    sort($tab_file);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    91
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    92
    /* affichage */
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    93
    if(!empty($tab_file)):
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    94
    foreach($tab_dir as $elem) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    95
     if($elem == ".." && isset($_GET['dir'])):
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    96
        echo "<img src=\"http://www.iri.centrepompidou.fr/privatedoc/img/folder.png\" />&nbsp;<a href='javascript:history.back()' title='retour'>".$elem."</a><br />\n";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    97
     else:
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    98
        //echo "<img src=\"dir-close.gif\" />&nbsp;".$elem."<br />\n";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
    99
     endif;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   100
    }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   101
    endif;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   102
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   103
    $i=0;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   104
    $tab=array();
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   105
    $path='';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   106
    $tab = explode("/",$BASE);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   107
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   108
    echo '<table width="100%" cellspacing="0" cellpadding="0">';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   109
    foreach($tab_file as $elem) {
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   110
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   111
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   112
        $path='';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   113
        for($j=5;$j<count($tab);$j++){
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   114
            $path .= $tab[$j]."/";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   115
        }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   116
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   117
        $path .= $elem;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   118
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   119
        $temppath = substr($BASE,26);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   120
      	$temppath .= "/";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   121
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   122
        $displayElem = UtoWS($elem);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   123
      	$iconeInfo = (strstr(strtolower($BASE),"regards"))?'<a href="javascript:void(0)" onclick="document.getElementById(\'moreinfo\').style.display=\'block\'"><img src="http://www.iri.centrepompidou.fr/privatedoc/img/information.png" alt="information" title="plus d\'information" class="image"/></a>&nbsp;&nbsp;':'';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   124
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   125
      	//gestion du type de fichier
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   126
      	//si mp3 : affichage lien download et ecoute
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   127
      	//si pdf : uniquement download
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   128
      	//si zip : uniquement download
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   129
      	list($filename, $ext) = explode('.',$elem);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   130
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   131
      	if($ext == 'mp3'){
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   132
	      	echo "<tr>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   133
	     	echo "<td width='80%'><img src=\"http://www.iri.centrepompidou.fr/privatedoc/img/page_white_cd.png\" border='0'/>&nbsp;<a href=\"javascript:void(0)\" onclick=\"switchMedia('".trim($temppath.$elem)."')\" >".$displayElem."</a></td>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   134
	      	echo "<td>".$iconeInfo."<a href=\"javascript:void(0)\" onclick=\"switchMedia('".trim($temppath.$elem)."')\">&nbsp;&nbsp;<img src='http://www.iri.centrepompidou.fr/privatedoc/img/sound.png' border='0' title='ecouter' alt='ecouter' class='image'/></a>&nbsp;&nbsp;";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   135
            echo "<a href=\"http://www.iri.centrepompidou.fr/documents/audio/".$path."\">&nbsp;&nbsp;<img src='http://www.iri.centrepompidou.fr/privatedoc/img/disk.png' border='0' title='t�l�charger' alt='t�l�charger' class='image'></a><br/></td>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   136
	      	echo '</tr>';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   137
      	}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   138
      	elseif($ext == 'pdf' || $ext == 'zip'){
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   139
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   140
      		echo "<tr>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   141
	      	echo "<td width='80%'>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   142
	      	echo "<img src=\"http://www.iri.centrepompidou.fr/privatedoc/img/$ext.png\" border='0'/>&nbsp;<a href=\"http://www.iri.centrepompidou.fr/documents/audio/$path\" >".$displayElem."</a></td>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   143
	      	echo "<td>".$iconeInfo."<a href=\"http://www.iri.centrepompidou.fr/documents/audio/".$path."\">&nbsp;&nbsp;<img src='http://www.iri.centrepompidou.fr/privatedoc/img/disk.png' border='0' title='t�l�charger' alt='t�l�charger' class='image'></a><br/></td>";
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   144
	      	echo '</tr>';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   145
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   146
      	}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   147
    $i++;
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   148
    }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   149
    echo '</table>';
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   150
    closedir($dir);
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   151
  }
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   152
}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   153
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   154
/*remplace une majuscule par un espace*/
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   155
function deInterCaps($var){
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   156
   return ucfirst(strtolower(ereg_replace("[A-Z]"," \\0",$var)));
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   157
}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   158
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   159
/*remplace un underscore par un espace*/
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   160
function UtoWS($text){
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   161
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   162
	return ucfirst(strtolower(ereg_replace("[_]"," ",$text)));
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   163
}
7a5d38af0e65 add privtae docs to site
ymh@caf4f556-3d62-0410-8435-a86758001935
parents:
diff changeset
   164
?>