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