function autodoc($fichier, $paragraphe) { $fcontents = @file($fichier); if ($fcontents == '') { Access_Error(); } $pasfin = false; $meta = ''; dochead(); echo ' <table class="table table-striped"> <caption>Documentation</caption> <thead> <tr> <th>Fonction</th> <th>Documentation</th> </tr> </thead> <tbody>'; while (list($line_num, $line) = each($fcontents)) { if ($paragraphe != "") { if (strstr($line, "#autodoc:<{$paragraphe}>")) { $line = ''; $pasfin = true; } if (strstr($line, "#autodoc:</{$paragraphe}>")) { $line = ''; $pasfin = false; } } else { $pasfin = true; } $line = trim($line); if (strstr($line, "#autodoc") and $pasfin) { $posX = strpos($line, ':'); $morceau1 = trim(substr($line, strpos($line, "#autodoc") + 8, $posX - 8)); $morceau2 = rtrim(substr($line, $posX + 1)); // if ($morceau1=='' AND $morceau2=='') {$rowcolor="style=\"background-color: #FFFFFF;\"";} else {$rowcolor="style=\"background-color: #F0F0F0;\"";} $meta .= ' <tr> <td><code>' . $morceau1 . '<code></td> <td>' . $morceau2 . '</span></td> </tr>'; } else { if (strstr($line, "# autodoc") and $pasfin) { $posX = strpos($line, ':'); $morceau1 = ltrim(substr($line, strpos($line, "# autodoc") + 9, $posX - 9)); $morceau2 = rtrim(substr($line, $posX + 1)); // if ($morceau1=='' AND $morceau2=='') {$rowcolor="style=\"background-color: #FFFFFF;\"";} else {$rowcolor="style=\"background-color: #F0F0F0;\"";} $meta .= "\n <tr {$rowcolor}>\n <td nowrap=\"nowrap\" align=\"left\"><code>{$morceau1}<code></td>\n <td><span style=\"font-size: 10px; font-family: Tahoma, Arial;\">{$morceau2}</span> </td>\n </tr>"; } } } echo $meta; echo '</tbody</table> <p align="right" style="font-size: 10px; font-family: Tahoma, Arial;">AutoDoc pour <a href="http://www.npds.org">NPDS</a></p>'; }
function autodoc($fichier, $paragraphe) { $fcontents = @file($fichier); if ($fcontents == "") { Access_Error(); } $pasfin = false; $meta = ""; echo "<table cellspacing=\"2\" cellpadding=\"2\" border=\"0\" width=\"100%\">"; while (list($line_num, $line) = each($fcontents)) { if ($paragraphe != "") { if (strstr($line, "#autodoc:<{$paragraphe}>")) { $line = ""; $pasfin = true; } if (strstr($line, "#autodoc:</{$paragraphe}>")) { $line = ""; $pasfin = false; } } else { $pasfin = true; } $line = trim($line); if (strstr($line, "#autodoc") and $pasfin) { $posX = strpos($line, ":"); $morceau1 = trim(substr($line, strpos($line, "#autodoc") + 8, $posX - 8)); $morceau2 = rtrim(substr($line, $posX + 1)); if ($morceau1 == "" and $morceau2 == "") { $rowcolor = "style=\"background-color: #FFFFFF;\""; } else { $rowcolor = "style=\"background-color: #F0F0F0;\""; } if (cur_charset == "utf-8") { $morceau2 = utf8_encode($morceau2); } $meta .= "<tr {$rowcolor}><td nowrap=\"nowrap\" align=\"left\"><span style=\"font-size: 10px; font-family: Tahoma, Arial;\"><b>{$morceau1}</b></span> </td><td><span style=\"font-size: 10px; font-family: Tahoma, Arial;\">{$morceau2}</span> </td></tr>"; } else { if (strstr($line, "# autodoc") and $pasfin) { $posX = strpos($line, ":"); $morceau1 = ltrim(substr($line, strpos($line, "# autodoc") + 9, $posX - 9)); $morceau2 = rtrim(substr($line, $posX + 1)); if ($morceau1 == "" and $morceau2 == "") { $rowcolor = "style=\"background-color: #FFFFFF;\""; } else { $rowcolor = "style=\"background-color: #F0F0F0;\""; } if (cur_charset == "utf-8") { $morceau2 = utf8_encode($morceau2); } $meta .= "<tr {$rowcolor}><td nowrap=\"nowrap\" align=\"left\"><span style=\"font-size: 10px; font-family: Tahoma, Arial;\"><b>{$morceau1}</b></span> </td><td><span style=\"font-size: 10px; font-family: Tahoma, Arial;\">{$morceau2}</span> </td></tr>"; } } } echo $meta; echo "</table><p align=\"right\" style=\"font-size: 10px; font-family: Tahoma, Arial;\">AutoDoc pour <a href=\"http://www.npds.org\">NPDS</a></p>"; }
function filtre_module($strtmp) { if (strstr($strtmp, "..") || stristr($strtmp, "script") || stristr($strtmp, "cookie") || stristr($strtmp, "iframe") || stristr($strtmp, "applet") || stristr($strtmp, "object")) { Access_Error(); } else { if ($strtmp != "") { return true; } else { return false; } } }
function admindroits($aid, $f_meta_nom) { global $NPDS_Prefix, $radminsuper; $res = sql_query("SELECT fnom, radminsuper FROM " . $NPDS_Prefix . "authors a LEFT JOIN " . $NPDS_Prefix . "droits d ON a.aid = d.d_aut_aid LEFT JOIN " . $NPDS_Prefix . "fonctions f ON d.d_fon_fid = f.fid WHERE a.aid='{$aid}'"); $foncts = array(); $supers = array(); while ($data = sql_fetch_row($res)) { $foncts[] = $data[0]; $supers[] = $data[1]; } if (!in_array('1', $supers) and !in_array($f_meta_nom, $foncts)) { Access_Error(); } $radminsuper = $supers[0]; }
function File_Navigator($parm, $sort_filed = "N", $dir = "ASC", $DirSize = false) { if (!isset($parm)) { $parm = "."; } if (is_dir($parm)) { $this->CurDir = $parm; } else { Access_Error(); } $this->GetDirSz = $DirSize; if (@chdir($this->CurDir)) { $this->Handle = opendir("."); $this->LoadList(); closedir($this->Handle); $this->SortListF($sort_filed, $dir); $this->SortListD($sort_filed, $dir); $this->PointerPosF = 0; $this->PointerPosD = 0; return true; } else { return false; } }
/************************************************************************/ /************************************************************************/ /* Module-Install Version 1.1 - Mai 2005 */ /* -------------------------- */ /* Copyright (c) 2005 Boris L'Ordi-Dépanneur & Hotfirenet */ /* */ /* Version 1.2 - 22 Avril 2009 */ /* -------------------------- */ /* */ /* Modifié par jpb et phr pour le rendre compatible avec Evolution */ /* */ /* -------------------------- */ /* Version 2.0 - 30/08/2015 by jpb */ /************************************************************************/ if (!stristr($_SERVER['PHP_SELF'], "admin.php")) { Access_Error(); } $f_meta_nom = 'modules'; $f_titre = adm_translate("Gestion, Installation Modules"); //==> controle droit admindroits($aid, $f_meta_nom); //<== controle droit // ***************************** // * Fonctions de l'installeur * // ***************************** function nmig_copyright() { $clspin = ' text-success'; if ($ModInstall == "" && $ModDesinstall != "") { $clspin = ' text-danger'; }