initial import

svn path=/trunk/; revision=1794
This commit is contained in:
allegreg
2001-12-10 18:55:17 +00:00
parent cf0170f83b
commit 3dc0b7a28d
7 changed files with 558 additions and 0 deletions

View File

@@ -0,0 +1,40 @@
<?xml version="1.0" encoding="iso-8859-1" ?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="en">
<head>
<title>FSF Europe - Boilerplate</title>
</head>
<body>
<div> <!-- The header will be inserted here -->
<center>
[
<!-- Please update as needed and keep it in alphabetical order -->
<a href="boilerplate.de.html">Deutsch</a> |
English |
<a href="boilerplate.fr.html">Fran<61>ais</a>
]
</center>
<!-- Begin page content -->
<p>This rocks</p>
<!-- End page content -->
</div> <!-- The footer will be inserted here -->
Last update:
<!-- timestamp start -->
$Date: 2001-12-10 18:55:17 $ $Author: allegreg $
<!-- timestamp end -->
</body>
</html>
<!--
Local Variables: ***
mode: xml ***
End: ***
-->

View File

@@ -0,0 +1,42 @@
<?xml version="1.0" encoding="iso-8859-1" ?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="pt">
<head>
<title>FSF Europe - Plantilla XHTML</title>
</head>
<body>
<div> <!-- El encabezado entrar<61> aqu<71> -->
<center>
[
<!-- Actualice seg<65>n sea necesario y mantenga el orden alfab<61>tico -->
<a href="boilerplate.de.html">Deutsch</a> |
<a href="boilerplate.en.html">English</a> |
Espa<70>ol
<a href="boilerplate.fr.html">Fran<61>ais</a>|
<a href="boilerplate.pt.html">Portugu<67>s</a>
]
</center>
<!-- Comienzo del contenido de la p<>gina -->
<p>Aqu<71> va el contenido</p>
<!-- Fin del contenido de la p<>gina -->
</div> <!-- La barra de abajo entrar<61> aqu<71> -->
Ultima actualizaci<63>n:
<!-- Marca de fecha (no tocarla!) -->
$Date: 2001-12-10 18:55:17 $ $Author: allegreg $
<!-- fin de la marca de fecha -->
</body>
</html>
<!--
Local Variables: ***
mode: xml ***
End: ***
-->

View File

@@ -0,0 +1,36 @@
<?xml version="1.0" encoding="iso-8859-1" ?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="fr">
<head>
<title>FSF Europe - Boilerplate</title>
</head>
<body>
<div> <!-- The header will be inserted here -->
<plang:langselection>
<!-- Begin page content -->
<p>Solide comme du roc !</p>
<p>Et voici un <plang:internallink href="test" name="lien"> vers une page.</p>
<p>Et le <plang:internallink href="test" lnlang="pt" fblang="fr" name="m<>me">
en plus exotique.</p>
<!-- End page content -->
</div> <!-- The footer will be inserted here -->
Mis <20> jour:
<!-- timestamp start -->
$Date: 2001-12-10 18:55:17 $ $Author: allegreg $
<!-- timestamp end -->
</body>
</html>
<!--
Local Variables: ***
mode: xml ***
End: ***
-->

View File

@@ -0,0 +1,33 @@
<?xml version="1.0" encoding="iso-8859-1" ?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="pt">
<head>
<title>FSF Europe - Boilerplate</title>
</head>
<body>
<div> <!-- The header will be inserted here -->
<plang:langselection>
<!-- Begin page content -->
<p>This rocks</p>
<!-- End page content -->
</div> <!-- The footer will be inserted here -->
Actualizado em:
<!-- timestamp start -->
$Date: 2001-12-10 18:55:17 $ $Author: allegreg $
<!-- timestamp end -->
</body>
</html>
<!--
Local Variables: ***
mode: xml ***
End: ***
-->

130
tools/preproc.pl Normal file
View File

@@ -0,0 +1,130 @@
#! /usr/bin/perl -w
# Guillaume All<6C>gre <gallegre@april.org>, dec. 2001
# use File::Find;
my $InFmt="pxhtml";
my $OutFmt="xhtml";
my $FinalFmt="html";
my $InFile="", $OutFile="", $FinalFile="";
my $preproc="preproc";
my $usage_text="$preproc <file>.$InFmt \n Generate .$OutFmt file from .$InFmt, managing language selection.\n\n";
my %language=( de=>"Deutsch",
en=>"English",
es=>"Espa<70>ol",
fr=>"Fran<61>ais",
it=>"Italiano",
# nl=>"Netherlands",
pt=>"Portugu<67>s" );
# Main
my $langcodes = join(" ",sort(keys(%language)));
# ************** Checkings
if ($#ARGV < 0 ) {
die ($usage_text);
}
$FinalFile = $OutFile = $InFile = $ARGV[0];
if ( $InFile =~ /\w+\.(\w\w)\.$InFmt$/ ) # checks if filename respects foo.la.$InFmt
{ if (! exists ($language{$1}) )
{ die ("$1 : unknown language. Choose among <$langcodes>.\n" );}
}
else
{ die ("$InFile : incorrect filename format. Must be <smth>.<lang>.pxhtml"); }
my $lang=$1;
open (INFILE, $InFile) || die ("Impossible to read $InFile : $!\n");
@lines=<INFILE>;
@htmllines=grep(/<html lang=/, @lines); # checks if lang in filename = lang in <html> tag
if (@htmllines != 1) { die "No <html lang=...> declaration.\n";}
if ($htmllines[0] !~ /<html lang="(\w\w)"/ )
{ die "Inconsistent declaration : $htmllines[0].\n";}
$htmllang=$1;
if ( $htmllang ne $lang) {die ("<html> language $htmllang differs from filename language $lang.\n"); }
print ("$1 : $language{$1} : OK \n"); # all is correct ; we can process
# ***************** Parsing special tags
$OutFile =~ s/$InFmt/$OutFmt/; # post- preprocessor format (.xhtml ?)
$FinalFile =~ s/$InFmt/$FinalFmt/; # final format (html)
open (OUTFILE, ">$OutFile");
my $count=0;
foreach $line (@lines) # loop on the lines
{
$count++;
# **** process <plang:langselection> tag
if ($line =~ /(.*)<plang:langselection>(.*)/)
{ print OUTFILE "$1 \n";
print OUTFILE "<!-- Autogenerated by $preproc from $InFile -->\n";
print OUTFILE "\t<center>\n";
print OUTFILE "\t[\n";
$sep="";
foreach $otherlang (sort(keys(%language)))
{ $otherfile_h=$FinalFile; $otherfile_h =~ s/$lang/$otherlang/;
$otherfile_p=$InFile; $otherfile_p =~ s/$lang/$otherlang/;
if ($otherlang ne $lang && -f $otherfile_p)
{ $stag="<a href=\"$otherfile_h\">";
$etag="</a>";
}
else {$stag=""; $etag="";}
print OUTFILE "\t$sep$stag$language{$otherlang}$etag\n";
$sep="| ";
}
print OUTFILE "\t]\n";
print OUTFILE "\t</center>\n";
print OUTFILE "$2";
}
# **** process <plang:internallink href="" lnlang="" fblang="" name=""> tag
elsif ($line =~ /(.*)<plang:internallink(.*?)>(.*)/)
{ print OUTFILE "$1";
$arguments=$2; $remaining=$3;
# print "ARGUMENTS : $arguments\n";
if ( $arguments =~ /href=\"(.*?)\"/ ) # argument href="..." (mandatory)
{ $href=$1; }
else
{ die "argument href is mandatory in <plang:internallink> tag, $InFile, line $count\n";}
if ( $arguments =~ /name=\"(.*?)\"/ ) # argument name="..." (mandatory)
{ $name=$1; }
else
{ die "argument name is mandatory in <plang:internallink> tag, $InFile, line $count\n";}
if ( $arguments =~ /lnlang=\"(.*?)\"/ ) # argument lnlang="..."
{ $lnlang=$1; }
else
{ $lnlang=$lang;}
if ( $arguments =~ /fblang=\"(.*?)\"/ ) # argument fnlang="..."
{ $fblang=$1; }
else
{ $fblang="en";}
$otherfile_h=$href . "." . $lnlang . "." . $FinalFmt;
$otherfile_p=$href . "." . $lnlang . "." . $InFmt;
if (-f $otherfile_h || -f $otherfile_p) # the lnlang version exists
{ $stag="<a href=\"$otherfile_h\">";
$etag=" ($lnlang)</a>";
}
else
{ $otherfile_h=$href . "." . $fblang . "." . $FinalFmt;
$otherfile_p=$href . "." . $fblang . "." . $InFmt;
if (-f $otherfile_h || -f $otherfile_p) # the fallback lang version exists
{ $stag="<a href=\"$otherfile_h\">";
$etag=" ($fblang)</a>";
}
else
{ $stag=$etag="";}
}
print OUTFILE "$stag$name$etag <!-- preproc req=$lnlang fb=$fblang -->";
print OUTFILE "$remaining \n";
}
# **** normal line
else
{ print OUTFILE $line; }
}
close (OUTFILE);

137
tools/test.en.pxhtml Normal file
View File

@@ -0,0 +1,137 @@
<?xml version="1.0" encoding="iso-8859-1" ?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="fr">
<!-- Traduction gallegre@april.org -->
<head>
<title>Free Software Foundation Europe</title>
</head>
<body>
<div> <!-- The header will be inserted here -->
<plang:langselection>
<!-- Begin page content -->
<center>
<h1>Free Software Foundation Europe</h1>
<table width="80%">
<tr><td><ul>
<li><a href="documents/whyweexist.html">Pourquoi existons-nous?</a></li>
<li><a href="help/help.html">Comment pouvez vous nous aider?</a></li>
<li><a href="documents/freesoftware.html">Qu'est ce que le Logiciel Libre?</a></li>
</ul></td>
<td><ul>
<li><a href="documents/whatwedo.html">Que faisons nous?</a></li>
<li><a href="help/thankgnus.html">Qui aimerions nous remercier?</a></li>
<li><a href="documents/gnuproject.html">Qu'est-ce que le projet GNU?</a></li>
</ul></td>
</tr></table>
</center>
<p> Bienvenue sur le site officiel de la <b>FSF Europe</b>,
organisation dont le r<>le est de promouvoir le
Logiciel Libre (Free Software) en Europe. En tant
qu'organisation soeur officielle de la <b>Free Software
Foundation</b> aux <20>tats-Unis, son activit<69> sera
centr<74>e sur le <a href="http://www.gnu.org/">
Projet GNU</a>, sans y <20>tre toutefois
limit<69>e.
Elle fournit aussi un centre de comp<6D>tences aux politiciens, juristes,
et journalistes, dans le but d'assurer l'avenir l<>gal, politique
et social du Logiciel Libre.</p>
<p> Les activit<69>s de la <b>FSF Europe</b> ont d<>but<75> le
10 mars 2001. Vous trouverez des informations g<>n<EFBFBD>rales
sur le logiciel libre, la "Free Software Foundation" et la
FSF Europe dans la <a href="background.fr.html">section contexte</a>
</p>
<h3>Actualit<69>s</h3>
<dl>
<dt>28 Novembre 2001</dt>
<dd>
<p>Jonas Oberg a <20>t<EFBFBD> nomm<6D> nouveau Vice-Pr<50>sident de la FSF
Europe : "l'avenir du Logiciel Libre d<>pend grandement de ce
que nous faisons aujourd'hui. J'ai l'intention de travailler <20>
pr<70>server les possibilit<69>s d'utilisation et de d<>veloppement du
Logiciel Libre sous toutes ses formes, par exemple en encourageant
les efforts en cours de lutte contre les brevets logiciels, et
en aidant les m<>dias, les gouvernements et les soci<63>t<EFBFBD>s commerciales
<20> comprendre les concepts sous-jacents au Logiciel Libre."
[<a
href="http://mailman.fsfeurope.org/pipermail/announce/2001-November/000030.html">Communiqu<71> de presse (en anglais)
</a>]
</p>
</dd>
<dt>19 Novembre 2001</dt>
<dd>
<p> Lancement de la campagne <b>&quot;Nous parlons de Logiciel
Libre&quot;</b> : il y a de tr<74>s bonnes raisons pour parler et
penser en termes de Logiciel Libre et de sa philosophie.
Il est assez commun<75>ment admis que le Logiciel Libre profite <20> la
soci<63>t<EFBFBD> en g<>n<EFBFBD>ral, mais il n'est pas encore bien compris en quoi
il b<>n<EFBFBD>ficie aussi aux entreprises.
C'est pourquoi la FSF Europe lance cette campagne avec la participation
et le soutien de plusieurs soci<63>t<EFBFBD>s de Logiciel Libre. [<a
href="documents/whyfs.fr.html">Toute l'info</a>]
</p>
</dd>
<dt>11 Novembre 2001</dt>
<dd>
<p>Ces derniers mois, la plateforme de d<>veloppement <a
href="http://www.sourceforge.net/">SourceForge</a>, qui h<>berge un
grand nombre de projets <a
href="http://www.gnu.org/philosophy/free-sw.fr.html">Logiciels
Libres</a>, a chang<6E> de politique. Des fonctionalit<69>s permettant
d'extraire des projets de SourceForge ont <20>t<EFBFBD>
supprim<69>es. L'impl<70>mentation reposait auparavant exclusivement sur
du Logiciel Libre&nbsp;; elle <a
href="http://www.google.com/search?q=cache:WxA5jbBHLMQ:sourceforge.net/docman/display_doc.php%3Fdocid%3D6267%26group_id%3D1+larry+augustin+site:sourceforge.net&amp;hl=en">s'appuie
d<>sormais sur du logiciel non libre</a>. Enfin, VA Linux a pris
des mesures plut<75>t d<>tourn<72>es pour s'approprier le travail des
contributeurs. SourceForge a beaucoup apport<72> <20> la communaut<75> du
Logiciel Libre mais il est temps maintenant de s'en <20>loigner. [<a
href="news/article2001-10-20-01.fr.html">Lire l'article</a>]
</p>
</dd>
<dt>7 Novembre 2001</dt>
<dd>
<p>Communiqu<71> de presse d'EuroLinux, <a
href="http://petition.eurolinux.org/pr/fr/pr14.html">Putsch
juridique <20> l'Office Europ<6F>en des Brevets</a>: EuroLinux exige le
limogeage de la direction de l'OEB par les gouvernements europ<6F>ens
et le renforcement de son contr<74>le d<>mocratique.
</p>
</dd>
</dl>
<p>La FSF Europe est pr<70>sente dans chaque pays <20> travers les
chapitres locaux. Pour plus de d<>tails sur l'action de la
FSF Europe en France, consultez le site de la <a
href="http://france.fsfeurope.org">FSF Europe, chapitre
France</a>.</p>
<!-- End page content -->
</div> <!-- The footer will be inserted here -->
Mis <20> jour:
<!-- timestamp start -->
$Date: 2001-12-10 18:55:17 $ $Author: allegreg $
<!-- timestamp end -->
</body>
</html>
<!--
Local Variables: ***
mode: xml ***
End: ***
-->

140
tools/test.fr.pxhtml Normal file
View File

@@ -0,0 +1,140 @@
<?xml version="1.0" encoding="iso-8859-1" ?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="fr">
<!-- Traduction gallegre@april.org -->
<head>
<title>Free Software Foundation Europe</title>
</head>
<body>
<div> <!-- The header will be inserted here -->
toto <plang:langselection> bar
<!-- Begin page content -->
<center>
<h1>Free Software Foundation Europe</h1>
<table width="80%">
<tr><td><ul>
<li><a href="documents/whyweexist.html">Pourquoi existons-nous?</a></li>
<li><a href="help/help.html">Comment pouvez vous nous aider?</a></li>
<li><a href="documents/freesoftware.html">Qu'est ce que le Logiciel Libre?</a></li>
</ul></td>
<td><ul>
<li><a href="documents/whatwedo.html">Que faisons nous?</a></li>
<li><a href="help/thankgnus.html">Qui aimerions nous remercier?</a></li>
<li><a href="documents/gnuproject.html">Qu'est-ce que le projet GNU?</a></li>
</ul></td>
</tr></table>
</center>
<p> Bienvenue sur le site officiel de la <b>FSF Europe</b>,
organisation dont le r<>le est de promouvoir le
Logiciel Libre (Free Software) en Europe. En tant
qu'organisation soeur officielle de la <b>Free Software
Foundation</b> aux <20>tats-Unis, son activit<69> sera
centr<74>e sur le <a href="http://www.gnu.org/">
Projet GNU</a>, sans y <20>tre toutefois
limit<69>e.
Elle fournit aussi un centre de comp<6D>tences aux politiciens, juristes,
et journalistes, dans le but d'assurer l'avenir l<>gal, politique
et social du Logiciel Libre.</p>
<p> Les activit<69>s de la <b>FSF Europe</b> ont d<>but<75> le
10 mars 2001. Vous trouverez des informations g<>n<EFBFBD>rales
sur le logiciel libre, la "Free Software Foundation" et la
FSF Europe dans la <a href="background.fr.html">section contexte</a>
</p>
<h3>Actualit<69>s</h3>
<dl>
<dt>28 Novembre 2001</dt>
<dd>
<p>Jonas Oberg a <20>t<EFBFBD> nomm<6D> nouveau Vice-Pr<50>sident de la FSF
Europe : "l'avenir du Logiciel Libre d<>pend grandement de ce
que nous faisons aujourd'hui. J'ai l'intention de travailler <20>
pr<70>server les possibilit<69>s d'utilisation et de d<>veloppement du
Logiciel Libre sous toutes ses formes, par exemple en encourageant
les efforts en cours de lutte contre les brevets logiciels, et
en aidant les m<>dias, les gouvernements et les soci<63>t<EFBFBD>s commerciales
<20> comprendre les concepts sous-jacents au Logiciel Libre."
[<a
href="http://mailman.fsfeurope.org/pipermail/announce/2001-November/000030.html">Communiqu<71> de presse (en anglais)
</a>]
</p>
</dd>
<dt>19 Novembre 2001</dt>
<dd>
<p> Lancement de la campagne <b>&quot;Nous parlons de Logiciel
Libre&quot;</b> : il y a de tr<74>s bonnes raisons pour parler et
penser en termes de Logiciel Libre et de sa philosophie.
Il est assez commun<75>ment admis que le Logiciel Libre profite <20> la
soci<63>t<EFBFBD> en g<>n<EFBFBD>ral, mais il n'est pas encore bien compris en quoi
il b<>n<EFBFBD>ficie aussi aux entreprises.
C'est pourquoi la FSF Europe lance cette campagne avec la participation
et le soutien de plusieurs soci<63>t<EFBFBD>s de Logiciel Libre.
<plang:internallink href="documents/whyfs" lnlang="fr" fblang="en" name="[Toute l'info]">
[<a
href="documents/whyfs.fr.html">Toute l'info</a>]
</p>
</dd>
<dt>11 Novembre 2001</dt>
<dd>
<p>Ces derniers mois, la plateforme de d<>veloppement <a
href="http://www.sourceforge.net/">SourceForge</a>, qui h<>berge un
grand nombre de projets <a
href="http://www.gnu.org/philosophy/free-sw.fr.html">Logiciels
Libres</a>, a chang<6E> de politique. Des fonctionalit<69>s permettant
d'extraire des projets de SourceForge ont <20>t<EFBFBD>
supprim<69>es. L'impl<70>mentation reposait auparavant exclusivement sur
du Logiciel Libre&nbsp;; elle <a
href="http://www.google.com/search?q=cache:WxA5jbBHLMQ:sourceforge.net/docman/display_doc.php%3Fdocid%3D6267%26group_id%3D1+larry+augustin+site:sourceforge.net&amp;hl=en">s'appuie
d<>sormais sur du logiciel non libre</a>. Enfin, VA Linux a pris
des mesures plut<75>t d<>tourn<72>es pour s'approprier le travail des
contributeurs. SourceForge a beaucoup apport<72> <20> la communaut<75> du
Logiciel Libre mais il est temps maintenant de s'en <20>loigner. [<a
href="news/article2001-10-20-01.fr.html">Lire l'article</a>]
</p>
</dd>
<dt>7 Novembre 2001</dt>
<dd>
<p>Communiqu<71> de presse d'EuroLinux, <a
href="http://petition.eurolinux.org/pr/fr/pr14.html">Putsch
juridique <20> l'Office Europ<6F>en des Brevets</a>: EuroLinux exige le
limogeage de la direction de l'OEB par les gouvernements europ<6F>ens
et le renforcement de son contr<74>le d<>mocratique.
</p>
</dd>
</dl>
<p>La FSF Europe est pr<70>sente dans chaque pays <20> travers les
chapitres locaux. Pour plus de d<>tails sur l'action de la
FSF Europe en France, consultez le site de la <a
href="http://france.fsfeurope.org">FSF Europe, chapitre
France</a>.</p>
<!-- End page content -->
</div> <!-- The footer will be inserted here -->
Mis <20> jour:
<!-- timestamp start -->
$Date: 2001-12-10 18:55:17 $ $Author: allegreg $
<!-- timestamp end -->
</body>
</html>
<!--
Local Variables: ***
mode: xml ***
End: ***
-->