Listing du fichier analysedtd.php
00001 <?php
|
Retour à la page principale de
(gH)
Listing du fichier analysedtd.php
00001 <?php
00002 # (gH) -_- analysedtd.php ; TimeStamp (unix) : 15 Août 2012 vers 14:34
00003
00004 error_reporting(E_ALL) ;
00005 include("../std.php") ;
00006 include("analysedtd_inc.php") ;
00007
00008 #############################################################################
00009
00010 $host = getenv("HTTP_HOST") ;
00011 $newUrl = "http://forge.info.univ-angers.fr/~gh/internet/Webrd/analysedtd.php" ;
00012
00013 if ($host=="www.info.univ-angers.fr") {
00014 debutPageRedir("redirection",0,$newUrl) ;
00015 finPage() ;
00016 exit(-1) ;
00017 } # fin si
00018
00019 #######################################################################
00020
00021
00022 debutPage("Eléments et attributs","strict") ;
00023 debutSection() ;
00024
00025 #############################################################################
00026
00027 if ( (!isset($_GET["url"])) or (strlen(trim($_GET["url"]))==0) ) {
00028
00029 h1("Aucune URL fournie, rien à faire !") ;
00030
00031 } else {
00032
00033 $url = $_GET["url"] ;
00034 h1("Analyse des éléments et attributs de la grammaire ") ;
00035 blockquote() ;
00036 h1(href($url)) ;
00037 finblockquote() ;
00038
00039 $tabres = analyseGrammaireDTD($url) ;
00040
00041 $idr = -1 ;
00042 $idr++ ; $codret = $tabres[$idr] ;
00043 $idr++ ; $nbelt = $tabres[$idr] ;
00044 $idr++ ; $nbatt = $tabres[$idr] ;
00045 $idr++ ; $nbcmt = $tabres[$idr] ;
00046 $idr++ ; $nbfds = $tabres[$idr] ;
00047 $idr++ ; $nbfjs = $tabres[$idr] ;
00048 $idr++ ; $nbent = $tabres[$idr] ;
00049 $idr++ ; $tabdet = $tabres[$idr] ;
00050 $idr++ ; $tabatr = $tabres[$idr] ;
00051 $idr++ ; $tabent = $tabres[$idr] ;
00052
00053 if ($codret==0) {
00054
00055 h2("En bref") ;
00056
00057 blockquote() ;
00058 p() ;
00059 echo " $nbelt élément(s), $nbatt attribut(s), $nbcmt commentaire(s) et $nbent entité(s)." ;
00060 finp() ;
00061 finblockquote() ;
00062
00063 h2("En détail") ;
00064
00065 blockquote() ;
00066
00067 table(0,15) ; tr() ;
00068
00069 td("C") ; p("bleu_pastel") ; nbsp() ; br() ; echo b("Tableau des éléments et attributs") ; br() ; nbsp() ; finp() ; fintd() ;
00070 td("C") ;
00071 if ($nbent>0) {
00072 p("bleu_pastel") ; nbsp() ; br() ; echo b("Tableau des entités") ; br() ; nbsp() ; finp() ;
00073 } ; # fin si
00074 fintd() ;
00075
00076 fintr() ; tr() ;
00077
00078 # --------------------
00079
00080 td("C","valigntop") ; table(1,15,"collapse") ;
00081 tr() ;
00082 th("C","jaune_pastel") ;
00083 echo " Numéro " ;
00084 finth() ;
00085 th("C","jaune_pastel") ;
00086 echo " Elément " ;
00087 finth() ;
00088 th("C","jaune_pastel") ;
00089 echo " Nb attributs" ;
00090 finth() ;
00091 th("L","jaune_pastel") ;
00092 nbsp(3) ;
00093 echo "Attributs éventuels" ;
00094 finth() ;
00095 fintr() ;
00096
00097 $numElt = 0 ;
00098 foreach ($tabdet as $cle=>$valeur) {
00099 $numElt++ ;
00100 tr() ;
00101 td("R") ;
00102 echo s_span(" ".$numElt." ","gvert") ;
00103 fintd() ;
00104 td() ;
00105 $clef = preg_replace("/</","<",$cle) ;
00106 $clef = preg_replace("/>/",">",$clef) ;
00107 echo s_span($clef,"gbleu") ;
00108 fintd() ;
00109 td("R") ;
00110 echo $valeur ;
00111 nbsp(3) ;
00112 fintd() ;
00113 td() ;
00114 $vat = $tabatr[$cle] ;
00115 $vat = preg_replace("/</","<",$vat) ;
00116 $vat = preg_replace("/>/",">",$vat) ;
00117 echo $vat ;
00118 fintd() ;
00119 fintr() ;
00120 } ; # fin pour
00121
00122 fintable() ; fintd() ;
00123
00124 # --------------------
00125
00126
00127 td("C","valigntop") ;
00128
00129 if ($nbent>0) {
00130 table(1,15,"collapse") ;
00131 tr() ;
00132 th("C","jaune_pastel") ;
00133 echo " Numéro " ;
00134 finth() ;
00135 th("C","jaune_pastel") ;
00136 echo " Entité " ;
00137 finth() ;
00138 th("C","jaune_pastel") ;
00139 echo " Nb composants" ;
00140 finth() ;
00141 th("L","jaune_pastel") ;
00142 nbsp(3) ;
00143 echo "Contenu (partiel)" ;
00144 finth() ;
00145 fintr() ;
00146
00147 $numEnt = 0 ;
00148 foreach ($tabent as $cle=>$valeur) {
00149 $numEnt++ ;
00150 tr() ;
00151 td("R") ;
00152 echo s_span(" ".$numEnt." ","gvert") ;
00153 fintd() ;
00154 td() ;
00155 $clef = preg_replace("/</","<",$cle) ;
00156 $clef = preg_replace("/>/",">",$clef) ;
00157 echo s_span($clef,"gbleu") ;
00158 fintd() ;
00159 td("R") ;
00160 $tvaleurs = preg_split("/\|/",$valeur) ;
00161 if (strpos($valeur,"%")>-1) { echo "% " ; } ;
00162 if (strpos($valeur,"*")>-1) { echo "* " ; } ;
00163 echo count($tvaleurs) ;
00164 nbsp(3) ;
00165 fintd() ;
00166 td() ;
00167 $vat = $valeur ;
00168 $vat = preg_replace("/</","<",$vat) ;
00169 $vat = preg_replace("/>/",">",$vat) ;
00170 echo $vat ;
00171 fintd() ;
00172 fintr() ;
00173 } ; # fin pour
00174
00175 fintable() ;
00176
00177 } ; # fin si
00178
00179 fintd() ;
00180
00181 # --------------------
00182
00183 fintr() ; fintable() ;
00184
00185 finblockquote() ;
00186
00187 h2("Texte analysé") ;
00188
00189 codeHtml($url) ;
00190
00191 } ; # fin si sur coderet
00192
00193 } ; # fin si sur url
00194 #############################################################################
00195
00196 p() ;
00197 echo href("montresource.php?nomfic=analysedtd.php","Code-source de cette page","orange_stim nou")."." ;
00198 finp() ;
00199
00200
00201 finSection() ;
00202 finPage() ;
00203 ?>