From ab318ee69e36544ab91d765316d3e91d1697584b Mon Sep 17 00:00:00 2001 From: x2000habouzit Date: Mon, 2 Feb 2004 11:48:34 +0000 Subject: [PATCH] =?utf8?q?xhtml-isation=20...=20ajout=20d'un=20script=20ge?= =?utf8?q?t=5Fclasses=20qui=20sert=20=E0=20d=E9tecter=20qqs=20fautes=20cla?= =?utf8?q?ssiques=20de=20xhtml,=20liste=20les=20classes=20css=20utilis=E9e?= =?utf8?q?s,=20et=20liste=20les=20styles=3D..=20utilis=E9s.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit ce script _est_ à utiliser, à compléter, etc, etc. usage : get_classes.pl dir1 [dir2 [dir3 [...]]] --- htdocs/css/default.css | 4 +- include/valid_aliases.inc.php | 10 +- include/valid_emploi.inc.php | 6 +- include/valid_epouses.inc.php | 10 +- include/valid_evts.inc.php | 6 +- include/valid_ml.inc.php | 14 +-- include/valid_photos.inc.php | 10 +- include/valid_sondages.inc.php | 20 ++-- include/validations.inc.php | 8 +- scripts/xhtml/get_classes.pl | 115 ++++++++++++++++++++--- templates/acces_smtp.tpl | 12 +-- templates/alias.tpl | 7 +- templates/antispam.tpl | 14 +-- templates/carva_redirect.tpl | 10 +- templates/form_naissance.tpl | 6 +- templates/index.tpl | 4 +- templates/motdepassemd5.tpl | 10 +- templates/password_prompt.tpl | 10 +- templates/password_prompt_logged.tpl | 14 +-- templates/preferences.tpl | 173 +++++++++++++++++------------------ templates/skins.tpl | 6 +- 21 files changed, 279 insertions(+), 190 deletions(-) diff --git a/htdocs/css/default.css b/htdocs/css/default.css index d42bce9..115c51d 100644 --- a/htdocs/css/default.css +++ b/htdocs/css/default.css @@ -22,7 +22,7 @@ body { a:link, a:visited, a:active, a:hover { color: #003399; background: inherit; } a img { border: 0px; } td { vertical-align: top; } -li { padding-left: 3px; padding-right: 3px; } +li { padding-left: 3px; padding-right: 3px; text-align: justify; } hr { width: 90%; text-align: center } .center { text-align: center; } @@ -238,4 +238,4 @@ table.tinybicol td.info, table.bicol td.info { font-size: 95%; } /* vim: set et ts=4 sts=4 sw=4: */ -/* $Id: default.css,v 1.11 2004-01-31 10:20:15 x2000habouzit Exp $ */ +/* $Id: default.css,v 1.12 2004-02-02 11:48:34 x2000habouzit Exp $ */ diff --git a/include/valid_aliases.inc.php b/include/valid_aliases.inc.php index d89f96a..50ca85d 100644 --- a/include/valid_aliases.inc.php +++ b/include/valid_aliases.inc.php @@ -30,9 +30,9 @@ class AliasReq extends Validate { $raison = nl2br(stripslashes(htmlentities($this->raison))); return <<<________EOF
- - - + + +
Demandeur : @@ -53,9 +53,9 @@ class AliasReq extends Validate {
- +

- +

Raison du refus:

diff --git a/include/valid_emploi.inc.php b/include/valid_emploi.inc.php index f1df165..30726c5 100644 --- a/include/valid_emploi.inc.php +++ b/include/valid_emploi.inc.php @@ -25,9 +25,9 @@ class EmploiReq extends Validate { $texte = wordwrap($this->text, 80); return <<<________EOF - - - + + + diff --git a/include/valid_epouses.inc.php b/include/valid_epouses.inc.php index cb5b227..954819d 100644 --- a/include/valid_epouses.inc.php +++ b/include/valid_epouses.inc.php @@ -54,9 +54,9 @@ ________EOF; return <<<________EOF - - - + + +
@@ -77,9 +77,9 @@ ________EOF; $homonyme @@ -60,7 +60,7 @@ Si tu n'es pas {insert name="getName" script="insert.password.inc.php"}, change Mot de passe: @@ -90,7 +90,7 @@ Probl - + diff --git a/templates/password_prompt_logged.tpl b/templates/password_prompt_logged.tpl index 08f8de6..df344e3 100644 --- a/templates/password_prompt_logged.tpl +++ b/templates/password_prompt_logged.tpl @@ -1,6 +1,6 @@ -{* $Id: password_prompt_logged.tpl,v 1.6 2004-01-31 10:20:16 x2000habouzit Exp $ *} +{* $Id: password_prompt_logged.tpl,v 1.7 2004-02-02 11:48:35 x2000habouzit Exp $ *} -
+
Demandeur :
- +

- +

Raison du refus:

diff --git a/include/valid_evts.inc.php b/include/valid_evts.inc.php index e935129..6f44e1e 100644 --- a/include/valid_evts.inc.php +++ b/include/valid_evts.inc.php @@ -38,9 +38,9 @@ class EvtReq extends Validate { function formu() { return <<<________EOF - - - + + + diff --git a/include/valid_ml.inc.php b/include/valid_ml.inc.php index 3d08b20..a1322aa 100644 --- a/include/valid_ml.inc.php +++ b/include/valid_ml.inc.php @@ -63,9 +63,9 @@ class MListReq extends Validate { return <<<________EOF - - - + + +
@@ -84,12 +84,12 @@ class MListReq extends Validate { Alias : - @@ -111,9 +111,9 @@ class MListReq extends Validate { @@ -34,19 +34,19 @@ Retape-le une fois :
Demandeur : - @polytechnique.org + @polytechnique.org
Topic : +
- +

- +

Explication complémentaire (refus ou changement de config, ...)

diff --git a/include/valid_photos.inc.php b/include/valid_photos.inc.php index 862920b..15c0375 100644 --- a/include/valid_photos.inc.php +++ b/include/valid_photos.inc.php @@ -57,9 +57,9 @@ class PhotoReq extends Validate { $url_app = isset($_COOKIE[session_name()]) ? "" : "&".SID; return <<<________EOF - - - + + + @@ -76,9 +76,9 @@ class PhotoReq extends Validate { {if $carva} {else} {/if} diff --git a/templates/form_naissance.tpl b/templates/form_naissance.tpl index 96c19f8..932e2de 100644 --- a/templates/form_naissance.tpl +++ b/templates/form_naissance.tpl @@ -1,4 +1,4 @@ -{* $Id: form_naissance.tpl,v 1.2 2004-01-29 16:21:53 x2000habouzit Exp $ *} +{* $Id: form_naissance.tpl,v 1.3 2004-02-02 11:48:35 x2000habouzit Exp $ *}
Date de naissance
@@ -24,12 +24,12 @@ Date (JJMMAAAA)
Demandeur :
- +

- +

Raison du refus:

diff --git a/include/valid_sondages.inc.php b/include/valid_sondages.inc.php index 72f21f8..67a9c32 100644 --- a/include/valid_sondages.inc.php +++ b/include/valid_sondages.inc.php @@ -33,9 +33,9 @@ class SondageReq extends Validate { $url = "$baseurl/sondage/questionnaire.php?SID=".$this->sid; return <<<________EOF - - - + + + - @@ -70,15 +70,15 @@ Retape-le une fois (pour vérification): diff --git a/templates/alias.tpl b/templates/alias.tpl index 7db83af..b34b8c9 100644 --- a/templates/alias.tpl +++ b/templates/alias.tpl @@ -1,4 +1,4 @@ -{* $Id: alias.tpl,v 1.3 2004-01-29 16:21:53 x2000habouzit Exp $ *} +{* $Id: alias.tpl,v 1.4 2004-02-02 11:48:35 x2000habouzit Exp $ *} {if $success}

@@ -52,7 +52,7 @@

- + @@ -61,8 +61,7 @@ - +
Demandeur : @@ -56,14 +56,14 @@ class SondageReq extends Validate {
Alias du sondage : (ne doit +  (ne doit pas contenir le caractère ')
- +

- +

Raison du refus:

@@ -86,23 +86,23 @@ ________EOF; if ($_REQUEST['submit']!="Refuser") { $alias = stripslashes($_REQUEST['alias']); if ($alias=="") { - echo "
Il faut entrer un alias pour valider ce sondage."; + echo "
Il faut entrer un alias pour valider ce sondage."; return false; } else { if (strlen($alias)>15) { - echo "
L'alias est trop long."; + echo "
L'alias est trop long."; return false; } else if (strpos($alias,"'")) { - echo "
L'alias ne doit pas contenir le caractère '"; + echo "
L'alias ne doit pas contenir le caractère '"; return false; } else {//on vérifie que l'alias n'existe pas déjà $resultat = mysql_query("select alias from sondage.description_generale ". "where alias='$alias'"); if (mysql_num_rows($resultat)>0) { - echo "
Cet alias est déjà utilisé."; + echo "
Cet alias est déjà utilisé."; return false; } } diff --git a/include/validations.inc.php b/include/validations.inc.php index c4212f0..b039604 100644 --- a/include/validations.inc.php +++ b/include/validations.inc.php @@ -1,6 +1,6 @@ unique
+ * à utiliser uniquement pour récupérer un objet unique */ function get_unique_request($uid,$type) { $sql = mysql_query("SELECT data,stamp FROM requests WHERE user_id='$uid' and type='$type'"); if(list($result,$stamp) = mysql_fetch_row($sql)) { $result = unserialize($result); - // on ne fait jamais confiance au timestamp de l'objet, + // on ne fait jamais confiance au timestamp de l'objet, $result->stamp = $stamp; if(!$result->unique) // on vérifie que c'est tout de même bien un objet unique $result = false; @@ -82,7 +82,7 @@ class Validate { ." WHERE user_id='$uid' and type = '$type' and stamp='$stamp'"); if(list($result,$stamp) = mysql_fetch_row($sql)) { $result = unserialize($result); - // on ne fait jamais confiance au timestamp de l'objet, + // on ne fait jamais confiance au timestamp de l'objet, $result->stamp = $stamp; } else $result = false; diff --git a/scripts/xhtml/get_classes.pl b/scripts/xhtml/get_classes.pl index 85d6beb..39a0104 100755 --- a/scripts/xhtml/get_classes.pl +++ b/scripts/xhtml/get_classes.pl @@ -1,19 +1,110 @@ #! /usr/bin/perl -w use strict; -my $dir = $ARGV[0]; my %classes; +my %styles; -open LINES,"grep -r 'class=[^ ]*' $dir |"; -while() { - my @sub = split /]*class=['"]?([^ '">]*).*/) { - my $index = lc("$1.$2"); - $classes{$index} = 1; - } - } +my $red=""; +my $yel=""; +my $blu=""; +my $whi=""; +my $gra=""; + + +sub parse_dir($) { + my $dir = shift; + opendir DIR,$dir; + while(my $a = readdir DIR) { + if(-d $a) { + &parse_dir($dir."/".$a) unless($a eq '.' or $a eq '..' or $a eq 'CVS'); + } else { + &parse_file($dir."/".$a) if($a =~ /\.(php|tpl|htm[l]?)$/i); + } + } + closedir DIR; +} + +sub parse_file($) { + my $file = shift; + open FILE,"<$file"; + my $text = join '',(); + $text =~ s/[\s\t\n]+/ /g; + &get_classes($file,$text); + close FILE; +} + +sub get_classes($$) { + my $file = shift; + my $text = shift; + while ($text =~ /<( *[^\/](?:->|[^>])*) *>(.*)$/) { + &parse_tag($file,$1); + $text = $2; + } +} + +sub class_add($$) { + my $file = shift; + my $tag = shift; + my $class = shift; + if (defined($classes{"$tag.$class"})) { + $classes{"$tag.$class"} .= " $file"; + } else { + $classes{"$tag.$class"} = $file; + } } -close LINES; -print join "\n",sort(keys(%classes)); +sub parse_tag($$) { + my $file = shift; + my $tag = shift; + + # tag interdits en xhtml + print STDERR "${red}XHTML error: ${yel}<$1> ${blu}($file)${gra}\n" + if($tag =~ /^(b|i|u|center)( |$)/); + print STDERR "${red}XHTML error: ${yel}<$1> sans '/' ${blu}($file)${gra}\n" + if($tag =~ /^(br|hr|img|link|input)( [^\/]*)?$/); + + # récupération des classes utilisées ... + if($tag =~ /^(\w+).* class=('{[^}]*}'|"{[^}]*}"|'[^{}']*'|"[^{}"]*")/) { + my $t = lc($1); + $2 =~ /^['"](.*)['"]$/; + my $c = lc($1); + if($c =~ /^{ ?cycle.* values=('[^']*'|"[^"]*")/) { + my @cycle = split /['",]/,$1; + foreach my $cl (@cycle) { + &class_add($file,$t,$cl) if($cl); + } + } else { + &class_add($file,$t,$c); + } + } + + #récupération des styles utilisés ... + if($tag =~ /^(\w+).* style=('{[^}]*}'|"{[^}]*}"|'[^{}']*'|"[^{}"]*")/) { + my $t = lc($1); + $2 =~ /^['"](.*)['"]$/; + my $s = lc($1); + if (defined($styles{"$t => $s"})) { + $styles{"$t => $s"} .= " $file"; + } else { + $styles{"$t => $s"} = $file; + } + } +} + +foreach my $dir (@ARGV) { + &parse_dir($dir); +} + +print "\n$blu..:: Classes ::..$gra\n\n"; +foreach my $key (sort(keys(%classes))) { + print $key,"\n"; +} + +print "\n$blu..:: Styles ::..$gra\n\n"; +foreach my $key (sort(keys(%styles))) { + print $key,"\t",$whi,$styles{$key},$gra,"\n"; +} + +print "\n"; + +# vim:set et ts=4 sts=4 sw=4: diff --git a/templates/acces_smtp.tpl b/templates/acces_smtp.tpl index a43f8b2..cd4360b 100644 --- a/templates/acces_smtp.tpl +++ b/templates/acces_smtp.tpl @@ -1,4 +1,4 @@ -{* $Id: acces_smtp.tpl,v 1.1 2004-01-27 11:04:55 x2000habouzit Exp $ *} +{* $Id: acces_smtp.tpl,v 1.2 2004-02-02 11:48:35 x2000habouzit Exp $ *} {dynamic on="0$message"}

@@ -62,7 +62,7 @@ Mot de passe :

- +
- +
- - + + {if $actif} -    +    {/if}
Alias demandé :
@melix.net et @melix.org@melix.net et @melix.org
Brève explication :
diff --git a/templates/antispam.tpl b/templates/antispam.tpl index 37d7caa..69adba1 100644 --- a/templates/antispam.tpl +++ b/templates/antispam.tpl @@ -1,4 +1,4 @@ -{* $Id: antispam.tpl,v 1.1 2004-01-29 13:57:56 x2000habouzit Exp $ *} +{* $Id: antispam.tpl,v 1.2 2004-02-02 11:48:35 x2000habouzit Exp $ *}
Ton filtre anti-spam @@ -9,7 +9,7 @@

Un spam est un courrier électronique non sollicité. Ce peut-être un message de publicité, une proposition commerciale, etc... qui t'est envoyé -par une personne que tu ne connais pas.
+par une personne que tu ne connais pas.
Notre logiciel antispam tente de déterminer, parmi les courriers électroniques que tu reçois, lesquels sont des spams, et lesquels n'en sont pas. Trois réglages sont possibles : @@ -27,7 +27,7 @@ Trois r
- Choisis ton propre réglage :
+ Choisis ton propre réglage :
{dynamic} (1) le filtre anti-spam est coupé
@@ -40,7 +40,7 @@ Trois r
- +
@@ -54,7 +54,7 @@ recevoir. Aussi, nous te conseillons, au moins dans un premier temps, d'utiliser l'option (2), qui elle n'efface aucun message, et te donne juste une indication visuelle des messages qui semblent être des spams. -
+
Si après quelques temps d'utilisation de l'option (2), tu en es satisfait, tu peux envisager d'opter pour l'option (3).

@@ -66,10 +66,10 @@ tu peux envisager d'opter pour l'option (3). Pour que le logiciel fonctionne bien, il est préférable de lui indiquer, lorsqu'il s'est trompé, qu'il a fait une erreur ! Il est plutôt intelligent, et en tirera une leçon si on lui signale ses fautes, pour moins se tromper -par la suite. L'aide de tous est donc la bienvenue.
+par la suite. L'aide de tous est donc la bienvenue.
Si un courriel qui est un spam n'est pas détecté comme tel, réexpédie-le à l'adresse spam@polytechnique.org -sous forme de pièce jointe.
+sous forme de pièce jointe.
Inversement, si un message est considéré comme un spam alors que ce n'en est pas un, il faut le réexpédier à l'adresse nonspam@polytechnique.org diff --git a/templates/carva_redirect.tpl b/templates/carva_redirect.tpl index 91de94d..6e1ef4b 100644 --- a/templates/carva_redirect.tpl +++ b/templates/carva_redirect.tpl @@ -1,4 +1,4 @@ -{* $Id: carva_redirect.tpl,v 1.2 2004-01-29 16:21:53 x2000habouzit Exp $ *} +{* $Id: carva_redirect.tpl,v 1.3 2004-02-02 11:48:35 x2000habouzit Exp $ *} {dynamic on="0$message"}
@@ -77,20 +77,20 @@
http://  + value="{$smarty.post.url|default:$carva}" />
- + - + - +
- +
- +
diff --git a/templates/index.tpl b/templates/index.tpl index 31efd98..194a1ec 100644 --- a/templates/index.tpl +++ b/templates/index.tpl @@ -1,4 +1,4 @@ -{* $Id: index.tpl,v 1.2 2004-01-26 12:36:32 x2000habouzit Exp $ *} +{* $Id: index.tpl,v 1.3 2004-02-02 11:48:35 x2000habouzit Exp $ *}
Bienvenue sur le portail des élèves et anciens élèves de l'X ! @@ -22,7 +22,7 @@ Dans tous les cas, vous pouvez :

diff --git a/templates/motdepassemd5.tpl b/templates/motdepassemd5.tpl index 8a8c7c2..870f7b6 100644 --- a/templates/motdepassemd5.tpl +++ b/templates/motdepassemd5.tpl @@ -1,4 +1,4 @@ -{* $Id: motdepassemd5.tpl,v 1.1 2004-01-27 10:41:50 x2000habouzit Exp $ *} +{* $Id: motdepassemd5.tpl,v 1.2 2004-02-02 11:48:35 x2000habouzit Exp $ *}

Changer de mot de passe @@ -26,7 +26,7 @@ Nouveau mot de passe :
- +
- +
- +
- +
{* vim:set et sw=2 sts=2 sws=2: *} diff --git a/templates/password_prompt.tpl b/templates/password_prompt.tpl index 0b2d031..8353f23 100644 --- a/templates/password_prompt.tpl +++ b/templates/password_prompt.tpl @@ -1,4 +1,4 @@ -{* $Id: password_prompt.tpl,v 1.8 2004-01-31 19:56:19 x2000habouzit Exp $ *} +{* $Id: password_prompt.tpl,v 1.9 2004-02-02 11:48:35 x2000habouzit Exp $ *}
+ value="{insert name="getUserName" script="insert.password.inc.php"}" />
- +
@@ -34,7 +34,7 @@ J'ai perdu mon mot de passe
@@ -25,7 +25,7 @@ Mot de passe: - +
- +
@@ -49,9 +49,9 @@
- - - + + +
{literal} diff --git a/templates/preferences.tpl b/templates/preferences.tpl index 1197111..d6125b7 100644 --- a/templates/preferences.tpl +++ b/templates/preferences.tpl @@ -1,98 +1,97 @@ -{* $Id: preferences.tpl,v 1.3 2004-01-31 10:20:16 x2000habouzit Exp $ *} +{* $Id: preferences.tpl,v 1.4 2004-02-02 11:48:35 x2000habouzit Exp $ *}
Préférences
-
- - - - - - - - - - - - -
Configuration des différents services du site -
-
- Tu peux configurer tes différentes redirections de mails ici. -
-
-
- Pour choisir un alias @melix.net et @melix.org (en choisir un nouveau annule l'ancien). -
-
-
- Tu peux configurer ta redirection WEB http://www.carva.org/{dyn s=$smarty.session.username} -
-
-
- Tu peux changer les couleurs et les images du site. -
-
+ + + + + + + + + + + + +
Configuration des différents services du site +
+
+ Tu peux configurer tes différentes redirections de mails ici. +
+
+
+ Pour choisir un alias @melix.net et @melix.org (en choisir un nouveau annule l'ancien). +
+
+
+ Tu peux configurer ta redirection WEB http://www.carva.org/{dyn s=$smarty.session.username} +
+
+
+ Tu peux changer les couleurs et les images du site. +
+
-
+
- - - - - - - - - - - - + +
Mots de passe et accès au site
-
- permet de changer ton mot de passe pour accéder au site Polytechnique.org -
-
-
- Pour activer ton compte sur le serveur SMTP et NNTP de Polytechnique.org. - Cela te permet d'envoyer tes mails plus souplement (SMTP), et de consulter - les forums directement depuis ton logiciel habituel de courrier électronique. -
-
+ + + + + + + + + + + + - -
Mots de passe et accès au site
+
+ permet de changer ton mot de passe pour accéder au site Polytechnique.org +
+
+
+ Pour activer ton compte sur le serveur SMTP et NNTP de Polytechnique.org. + Cela te permet d'envoyer tes mails plus souplement (SMTP), et de consulter + les forums directement depuis ton logiciel habituel de courrier électronique. +
+
{if $has_cookie} - -
- Clique sur le lien ci-dessus pour retirer l'accès sans mot de passe au site. Après avoir - cliqué, tu devras à nouveau entrer ton mot de passe pour accéder aux différentes pages - comme initialement. -
+ +
+ Clique sur le lien ci-dessus pour retirer l'accès sans mot de passe au site. Après avoir + cliqué, tu devras à nouveau entrer ton mot de passe pour accéder aux différentes pages + comme initialement. +
{else} - -
- Cette option te permet de ne plus avoir à entrer ton mot de passe pour la majorité des pages - du site. Ce dernier reste cependant nécessaire pour le profil ou le changement de mot de - passe. Il s'agit d'une option destinée aux utilisateurs fréquents du site, plutôt à l'aise - avec l'informatique, et pour un ordinateur non partagé. -
+ +
+ Cette option te permet de ne plus avoir à entrer ton mot de passe pour la majorité des pages + du site. Ce dernier reste cependant nécessaire pour le profil ou le changement de mot de + passe. Il s'agit d'une option destinée aux utilisateurs fréquents du site, plutôt à l'aise + avec l'informatique, et pour un ordinateur non partagé. +
{/if} -
+
{* vim:set et sw=2 sts=2 sws=2: *} diff --git a/templates/skins.tpl b/templates/skins.tpl index 9427d85..d86eebd 100644 --- a/templates/skins.tpl +++ b/templates/skins.tpl @@ -1,4 +1,4 @@ -{* $Id: skins.tpl,v 1.2 2004-01-28 17:19:47 x2000habouzit Exp $ *} +{* $Id: skins.tpl,v 1.3 2004-02-02 11:48:35 x2000habouzit Exp $ *}
Skins Polytechnique.org @@ -22,7 +22,7 @@ Pour toute information compl
- +
{dynamic} @@ -48,7 +48,7 @@ Pour toute information compl {/dynamic}
- +
-- 2.1.4