The great word of blessendness
and a feeling of ease a cup of the well of freedom and life we joyfully drink Inside, all was new, but outwards nothing had changed an escapade, then to the alter to evaluate all parts, of the great mystery but all remains on the same spot, no signs of a new season In my hand is a new word, but the word is still without a body a hidden life-stream that swells in the deep will soon give the word a second face. (In Flames; The New World) svn path=/trunk/; revision=2955
This commit is contained in:
parent
668b65d159
commit
46195ced36
|
|
@ -0,0 +1,76 @@
|
||||||
|
BODY { font-family: Helvetica, Verdana, sans-serif;
|
||||||
|
font-size: 13px;
|
||||||
|
background: #ffffff;
|
||||||
|
color: #000000;
|
||||||
|
margin-left: 0px;
|
||||||
|
margin-right: 0px;
|
||||||
|
margin-top: 0px;
|
||||||
|
margin-bottom: 0px;
|
||||||
|
margin: 0;
|
||||||
|
padding: 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
TD.focus-top-hinge {
|
||||||
|
background: #00389a;
|
||||||
|
text-align: left;
|
||||||
|
padding: 4px;
|
||||||
|
font-size: 11px;
|
||||||
|
font-weight: bold;
|
||||||
|
color: #ffffff;
|
||||||
|
}
|
||||||
|
|
||||||
|
TD.focus-box {
|
||||||
|
background: #00389a;
|
||||||
|
border-top: solid #00389a;
|
||||||
|
border-left: solid #00389a;
|
||||||
|
border-right: solid #00389a;
|
||||||
|
border-width: thin;
|
||||||
|
font-size: 11px;
|
||||||
|
}
|
||||||
|
|
||||||
|
TABLE.focus {
|
||||||
|
background: #00389a;
|
||||||
|
}
|
||||||
|
|
||||||
|
TD.line {
|
||||||
|
border-top: solid #00389a;
|
||||||
|
border-bottom: solid #00389a;
|
||||||
|
border-width: thin;
|
||||||
|
}
|
||||||
|
|
||||||
|
TD.focus {
|
||||||
|
background: #00389a;
|
||||||
|
width: 150px;
|
||||||
|
}
|
||||||
|
|
||||||
|
TD.menu {
|
||||||
|
padding: 10px;
|
||||||
|
background: #00389a;
|
||||||
|
width: 150px;
|
||||||
|
vertical-align: top;
|
||||||
|
}
|
||||||
|
|
||||||
|
h3.menu {
|
||||||
|
color: #ffffff;
|
||||||
|
border-bottom: solid white;
|
||||||
|
border-width: thin;
|
||||||
|
font-size: 15px;
|
||||||
|
}
|
||||||
|
A,P,DIV {
|
||||||
|
font-size: 13px;
|
||||||
|
}
|
||||||
|
a.menu {
|
||||||
|
color: #ffffff;
|
||||||
|
text-decoration: none;
|
||||||
|
font-size: 15px;
|
||||||
|
font-weight: bold;
|
||||||
|
}
|
||||||
|
a.menu:visited {
|
||||||
|
color: #eeeeee;
|
||||||
|
text-decoration: none;
|
||||||
|
}
|
||||||
|
a.menu:hover {
|
||||||
|
background-color: #ffffff;
|
||||||
|
color: #00389a;
|
||||||
|
text-decoration: underline;
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,131 @@
|
||||||
|
<?xml version="1.0" encoding="ISO-8859-1"?>
|
||||||
|
|
||||||
|
<xsl:stylesheet version="1.0"
|
||||||
|
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
|
||||||
|
|
||||||
|
<xsl:output method="html"
|
||||||
|
encoding="ISO-8859-1"
|
||||||
|
doctype-public="-//W3C//DTD HTML 4.0 Transitional//EN"
|
||||||
|
doctype-system="http://www.w3.org/TR/REC-html40/loose.dtd"
|
||||||
|
indent="yes"
|
||||||
|
/>
|
||||||
|
|
||||||
|
<xsl:template match="buildinfo">
|
||||||
|
<xsl:apply-templates select="node()" />
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="buildinfo/document">
|
||||||
|
<html>
|
||||||
|
<xsl:apply-templates select="node()" />
|
||||||
|
</html>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="body">
|
||||||
|
<body>
|
||||||
|
<xsl:comment>
|
||||||
|
|
||||||
|
DO NOT MODIFY THIS DOCUMENT. IT WAS GENERATED BY XSLT PROCESSING
|
||||||
|
AND YOUR MODIFICATIONS WILL BE LOST. THE SOURCE OF THE DOCUMENT
|
||||||
|
IS IN THE .xml FILE USE make all TO REGENERATE
|
||||||
|
|
||||||
|
</xsl:comment>
|
||||||
|
<table width="100%">
|
||||||
|
<tr>
|
||||||
|
<td>
|
||||||
|
<img src="/graphics/global/logo.png" />
|
||||||
|
</td>
|
||||||
|
<td class="focus">
|
||||||
|
<table class="focus">
|
||||||
|
<tr>
|
||||||
|
<td class="focus-top-hinge">
|
||||||
|
<xsl:value-of select="/buildinfo/textset/text[@id='focus']" />
|
||||||
|
</td>
|
||||||
|
<td class="focus-box">
|
||||||
|
<form action="/cgi-bin/nph-redirect.cgi" method="get">
|
||||||
|
<select name="address" onchange="window.location.href=this.options[this.selectedIndex].value">
|
||||||
|
<option value="#"> - <xsl:value-of select="/buildinfo/textset/text[@id='select']" /> -</option>
|
||||||
|
<option><xsl:attribute name="value">http://www.new.fsfeurope.org<xsl:value-of select="/buildinfo/@filename" />.<xsl:value-of select="/buildinfo/@language" />.html</xsl:attribute>Global</option>
|
||||||
|
<option><xsl:attribute name="value">http://france.new.fsfeurope.org<xsl:value-of select="/buildinfo/@filename" />.<xsl:value-of select="/buildinfo/@language" />.html</xsl:attribute>France</option>
|
||||||
|
|
||||||
|
<option><xsl:attribute name="value">http://germany.new.fsfeurope.org<xsl:value-of select="/buildinfo/@filename" />.<xsl:value-of select="/buildinfo/@language" />.html</xsl:attribute>Germany</option>
|
||||||
|
<option><xsl:attribute name="value">http://sweden.new.fsfeurope.org<xsl:value-of select="/buildinfo/@filename" />.<xsl:value-of select="/buildinfo/@language" />.html</xsl:attribute>Sweden</option>
|
||||||
|
</select>
|
||||||
|
</form>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
<tr>
|
||||||
|
<td class="focus-top-hinge">
|
||||||
|
<xsl:value-of select="/buildinfo/textset/text[@id='find']" />
|
||||||
|
</td>
|
||||||
|
<td class="focus-box">
|
||||||
|
<form method="post" action="/search.cgi">
|
||||||
|
<input type="text" size="10" name="var" />
|
||||||
|
</form>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
</table>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
<tr>
|
||||||
|
<td class="line" colspan="2">
|
||||||
|
<div align="center">
|
||||||
|
<xsl:for-each select="/buildinfo/trlist/tr">
|
||||||
|
<xsl:sort select="@id" />
|
||||||
|
<xsl:choose>
|
||||||
|
<xsl:when test="@id=/buildinfo/@language">
|
||||||
|
<xsl:value-of select="." />
|
||||||
|
</xsl:when>
|
||||||
|
<xsl:otherwise>
|
||||||
|
<xsl:element name="a">
|
||||||
|
<xsl:attribute name="href"><xsl:value-of select="/buildinfo/@filename" />.<xsl:value-of select="@id" />.html</xsl:attribute>
|
||||||
|
<xsl:value-of select="." disable-output-escaping="yes" />
|
||||||
|
</xsl:element>
|
||||||
|
</xsl:otherwise>
|
||||||
|
</xsl:choose>
|
||||||
|
<xsl:text> </xsl:text>
|
||||||
|
</xsl:for-each>
|
||||||
|
</div>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
<tr>
|
||||||
|
<td valign="top">
|
||||||
|
<xsl:apply-templates select="node()"/>
|
||||||
|
</td>
|
||||||
|
<td class="menu">
|
||||||
|
<xsl:for-each select="/buildinfo/menuset/menu">
|
||||||
|
<xsl:sort select="@id" />
|
||||||
|
<a class="menu" href="{.}">
|
||||||
|
<xsl:variable name="id"><xsl:value-of select="@id" /></xsl:variable>
|
||||||
|
<xsl:value-of select="/buildinfo/textset/text[@id=$id]" />
|
||||||
|
</a> <br />
|
||||||
|
</xsl:for-each>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
<tr>
|
||||||
|
<td class="line" colspan="2">
|
||||||
|
<div align="center">
|
||||||
|
<xsl:apply-templates select="/buildinfo/textset/text[@id='copyright']" />
|
||||||
|
</div>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
</table>
|
||||||
|
</body>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="head">
|
||||||
|
<head>
|
||||||
|
<link rel="stylesheet" type="text/css" href="/blue-new.css" />
|
||||||
|
<xsl:apply-templates select="@*|node()"/>
|
||||||
|
</head>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="buildinfo/set|buildinfo/textset|buildinfo/menuset|buildinfo/trlist">
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="@*|node()" priority="-1">
|
||||||
|
<xsl:copy>
|
||||||
|
<xsl:apply-templates select="@*|node()"/>
|
||||||
|
</xsl:copy>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
</xsl:stylesheet>
|
||||||
|
|
@ -0,0 +1,17 @@
|
||||||
|
<?xml version="1.0" encoding="iso-8859-1" ?>
|
||||||
|
|
||||||
|
<projectset>
|
||||||
|
<project type="technical">
|
||||||
|
<title>A GNU/Linux Audio distribution</title>
|
||||||
|
<description>
|
||||||
|
AGNULA's main task will be the development of two reference
|
||||||
|
distributions for the GNU/Linux operating system completely based on
|
||||||
|
Free Software (i.e. under a FSF approved Free Software license) and
|
||||||
|
completely devoted to professional and consumer audio applications and
|
||||||
|
multimedia development. One distribution will be Debian-based (DeMuDi)
|
||||||
|
and the other will be Red Hat-based (ReHMuDi). Both will be available
|
||||||
|
on the network for download and on CD.
|
||||||
|
</description>
|
||||||
|
<link>/projects/agnula/agnula.html</link>
|
||||||
|
</project>
|
||||||
|
</projectset>
|
||||||
|
|
@ -0,0 +1,12 @@
|
||||||
|
<?xml version="1.0" encoding="iso-8859-1" ?>
|
||||||
|
|
||||||
|
<html>
|
||||||
|
<head>
|
||||||
|
<title>Free Software Foundation Europe</title>
|
||||||
|
</head>
|
||||||
|
<body>
|
||||||
|
A list of projects.
|
||||||
|
|
||||||
|
</body>
|
||||||
|
</html>
|
||||||
|
|
||||||
|
|
@ -0,0 +1,2 @@
|
||||||
|
projects/*/project:global
|
||||||
|
de/projects/*/project:de
|
||||||
|
|
@ -0,0 +1,63 @@
|
||||||
|
<?xml version="1.0" encoding="ISO-8859-1"?>
|
||||||
|
|
||||||
|
<xsl:stylesheet version="1.0"
|
||||||
|
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
|
||||||
|
|
||||||
|
<xsl:output method="xml"
|
||||||
|
encoding="ISO-8859-1"
|
||||||
|
indent="yes"
|
||||||
|
/>
|
||||||
|
|
||||||
|
<xsl:template match="/">
|
||||||
|
<xsl:copy>
|
||||||
|
<xsl:apply-templates select="@*|node()" />
|
||||||
|
</xsl:copy>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="/html/body">
|
||||||
|
<body>
|
||||||
|
<xsl:apply-templates />
|
||||||
|
<table>
|
||||||
|
<tr>
|
||||||
|
<th>Technical</th><th>Legal</th><th>Sociological</th><th>Other</th>
|
||||||
|
</tr>
|
||||||
|
<tr>
|
||||||
|
<td>
|
||||||
|
<xsl:for-each select="/html/set/project[@type='technical']">
|
||||||
|
<p><a href="{link}"><xsl:value-of select="title" /></a><br />
|
||||||
|
<xsl:value-of select="description" /></p>
|
||||||
|
</xsl:for-each>
|
||||||
|
</td>
|
||||||
|
<td>
|
||||||
|
<xsl:for-each select="/html/set/project[@type='legal']">
|
||||||
|
<p><a href="{link}"><xsl:value-of select="title" /></a><br />
|
||||||
|
<xsl:value-of select="description" /></p>
|
||||||
|
</xsl:for-each>
|
||||||
|
</td>
|
||||||
|
<td>
|
||||||
|
<xsl:for-each select="/html/set/project[@type='awareness']">
|
||||||
|
<p><a href="{link}"><xsl:value-of select="title" /></a><br />
|
||||||
|
<xsl:value-of select="description" /></p>
|
||||||
|
</xsl:for-each>
|
||||||
|
</td>
|
||||||
|
<td>
|
||||||
|
<xsl:for-each select="/html/set/project[@type='other']">
|
||||||
|
<p><a href="{link}"><xsl:value-of select="title" /></a><br />
|
||||||
|
<xsl:value-of select="description" /></p>
|
||||||
|
</xsl:for-each>
|
||||||
|
</td>
|
||||||
|
</tr>
|
||||||
|
</table>
|
||||||
|
</body>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="@*|node()" priority="-1">
|
||||||
|
<xsl:copy>
|
||||||
|
<xsl:apply-templates select="@*|node()"/>
|
||||||
|
</xsl:copy>
|
||||||
|
</xsl:template>
|
||||||
|
|
||||||
|
<xsl:template match="set">
|
||||||
|
</xsl:template>
|
||||||
|
</xsl:stylesheet>
|
||||||
|
|
||||||
|
|
@ -0,0 +1,10 @@
|
||||||
|
Files in this directory:
|
||||||
|
|
||||||
|
boilerplate* ?
|
||||||
|
preproc.pl ?
|
||||||
|
test.* ?
|
||||||
|
translate.sh Creates list of translations for a page
|
||||||
|
build.pl The all might build script
|
||||||
|
menu-*.xml Menues for all focuses ("inherits" from global)
|
||||||
|
texts-*.xml Static texts for all languages.
|
||||||
|
|
||||||
|
|
@ -0,0 +1,438 @@
|
||||||
|
#! /usr/bin/perl
|
||||||
|
#
|
||||||
|
# build.pl - a tool for building FSF Europe web pages
|
||||||
|
#
|
||||||
|
# Copyright (C) 2003 Jonas Öberg
|
||||||
|
#
|
||||||
|
# This program is free software; you can redistribute it and/or modify
|
||||||
|
# it under the terms of the GNU General Public License as published by
|
||||||
|
# the Free Software Foundation; either version 2 of the License, or
|
||||||
|
# (at your option) any later version.
|
||||||
|
#
|
||||||
|
# This program is distributed in the hope that it will be useful, but
|
||||||
|
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
# General Public License for more details.
|
||||||
|
#
|
||||||
|
# You should have received a copy of the GNU General Public License
|
||||||
|
# along with this program; if not, write to the Free Software
|
||||||
|
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
|
||||||
|
# 02111-1307, USA.
|
||||||
|
#
|
||||||
|
use File::Find::Rule;
|
||||||
|
use Getopt::Std;
|
||||||
|
use File::Path;
|
||||||
|
use File::Basename;
|
||||||
|
use XML::LibXSLT;
|
||||||
|
use XML::LibXML;
|
||||||
|
use File::Copy;
|
||||||
|
|
||||||
|
# This defines the focuses and their respective preferred / original
|
||||||
|
# language. For example, it says that we should have a focus called
|
||||||
|
# "se" (Sweden) which has the preferred language "sv" (Swedish).
|
||||||
|
#
|
||||||
|
# This also says that documents in the directory /se should be considered
|
||||||
|
# as having the Swedish version as the original, and so on.
|
||||||
|
#
|
||||||
|
our %countries = (
|
||||||
|
global => 'en',
|
||||||
|
se => 'sv',
|
||||||
|
de => 'de',
|
||||||
|
fr => 'fr' );
|
||||||
|
|
||||||
|
#
|
||||||
|
# This is a hash of all the languages that we have translations into, and their
|
||||||
|
# respective names in the local language. Make sure that one entry exists
|
||||||
|
# here for every language, or it won't be rendered.
|
||||||
|
#
|
||||||
|
our %languages = (
|
||||||
|
cs => 'Cesky',
|
||||||
|
de => 'Deutsch',
|
||||||
|
en => 'English',
|
||||||
|
es => 'Español',
|
||||||
|
fr => 'Français',
|
||||||
|
it => 'Italiano',
|
||||||
|
pt => 'Português',
|
||||||
|
sv => 'Svenska',
|
||||||
|
);
|
||||||
|
|
||||||
|
#
|
||||||
|
# Parse the command line options. We need two; where to put the finished
|
||||||
|
# pages and what to use as base for the input.
|
||||||
|
#
|
||||||
|
getopts('o:i:', \%opts);
|
||||||
|
unless ($opts{o} && $opts{i}) {
|
||||||
|
print STDERR "Usage: $0 -o <output directory> -i <input directory>\n";
|
||||||
|
exit 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# First topic of today: create all directories we need. Instead of creating
|
||||||
|
# these as they are used, we create them in a batch at the beginning of each
|
||||||
|
# run, so we won't have to worry about them later.
|
||||||
|
# Note though that this also REMOVES the previous paths. You don't want to
|
||||||
|
# build directly into the production web tree.
|
||||||
|
#
|
||||||
|
my @dirs = File::Find::Rule->directory()
|
||||||
|
->in($opts{i});
|
||||||
|
|
||||||
|
while (my ($path, undef) = each %countries) {
|
||||||
|
print STDERR "Reseting path for $path\n";
|
||||||
|
rmtree($opts{o}.'/'.$path);
|
||||||
|
my @paths = map { $opts{o}."/$path/".$_ } grep(!/^\.\.?$/, @dirs);
|
||||||
|
foreach (@paths) {
|
||||||
|
mkpath($_);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# Here starts our real work. First we get ourselves a list of all files
|
||||||
|
# that we need to worry about and then single out the XHTML files. We
|
||||||
|
# create a hash of hashes, %bases, which contains the basename of each
|
||||||
|
# file, together with the translations that it exists in.
|
||||||
|
#
|
||||||
|
my @files = File::Find::Rule->file()
|
||||||
|
->in($opts{i});
|
||||||
|
|
||||||
|
my %bases;
|
||||||
|
foreach (grep(/\.xhtml$/, @files)) {
|
||||||
|
my ($lang) = ($_ =~ /\.([a-z][a-z])\.xhtml$/);
|
||||||
|
unless ($lang) { $lang = "en"; }
|
||||||
|
$_ =~ s/\.[a-z][a-z]\.xhtml//;
|
||||||
|
$bases{$_}{$lang} = 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
$| = 1;
|
||||||
|
|
||||||
|
#
|
||||||
|
# For each file, translation and focus, we create a new XML file. This will
|
||||||
|
# contain all information that the XSL needs to produce a finished page.
|
||||||
|
# The XML file will look like this:
|
||||||
|
#
|
||||||
|
# <buildinfo>
|
||||||
|
# <trlist> <!-- All translations that this page exists in -->
|
||||||
|
# <tr id="sv">Svenska</tr>
|
||||||
|
# ...
|
||||||
|
# </trlist>
|
||||||
|
# <menuset> <!-- The menu items for the right hand bar -->
|
||||||
|
# ...
|
||||||
|
# </menuset>
|
||||||
|
# <textset> <!-- The static text set for this language -->
|
||||||
|
# ...
|
||||||
|
# </textset>
|
||||||
|
# <document> <!-- The actual document, as read from the XHTML -->
|
||||||
|
# <head>
|
||||||
|
# <title>...</title>
|
||||||
|
# <body>...</body>
|
||||||
|
# </head>
|
||||||
|
# </document>
|
||||||
|
# </buildinfo>
|
||||||
|
#
|
||||||
|
# In addition to this, the buildinfo and document root will be equipped with
|
||||||
|
# the following attributes:
|
||||||
|
#
|
||||||
|
# buildinfo/@original The language code of the original document
|
||||||
|
# buildinfo/@filename The filename without language or trailing .html
|
||||||
|
# buildinfo/@language The language that we're building into
|
||||||
|
# buildinfo/@outdated Set to "yes" if the original is newer than this page
|
||||||
|
# document/@language The language that this documents is in
|
||||||
|
#
|
||||||
|
while (my ($file, $langs) = each %bases) {
|
||||||
|
print STDERR "Building $file.. ";
|
||||||
|
|
||||||
|
#
|
||||||
|
# Create XML and XSLT parser contexts. Also create the root note for the
|
||||||
|
# above mentioned XML file (used to feed the XSL transformation).
|
||||||
|
#
|
||||||
|
my $parser = XML::LibXML->new();
|
||||||
|
my $xslt_parser = XML::LibXSLT->new();
|
||||||
|
|
||||||
|
my $dom = XML::LibXML::Document->new("1.0", "iso-8859-1");
|
||||||
|
my $root = $dom->createElement("buildinfo");
|
||||||
|
$dom->setDocumentElement($root);
|
||||||
|
|
||||||
|
#
|
||||||
|
# Find original language. It's en, unless we're in the country specific
|
||||||
|
# se/, fr/, de/ and so on, directories.
|
||||||
|
#
|
||||||
|
$root->setAttribute("original", "en");
|
||||||
|
if ($file =~ /^([a-z][a-z])\//) {
|
||||||
|
$root->setAttribute("original", $countries{$1});
|
||||||
|
}
|
||||||
|
|
||||||
|
$root->setAttribute("filename", "/$file");
|
||||||
|
|
||||||
|
#
|
||||||
|
# Find all translations for this document, and create the trlist set
|
||||||
|
# for them.
|
||||||
|
#
|
||||||
|
my $trlist = $dom->createElement("trlist");
|
||||||
|
while (my ($lang, undef) = each %{ $langs }) {
|
||||||
|
my $tr = $dom->createElement("tr");
|
||||||
|
$tr->setAttribute("id", $lang);
|
||||||
|
$tr->appendText($languages{$lang});
|
||||||
|
$trlist->appendChild($tr);
|
||||||
|
}
|
||||||
|
$root->appendChild($trlist);
|
||||||
|
|
||||||
|
#
|
||||||
|
# Transform it, once for every focus!
|
||||||
|
#
|
||||||
|
while (my ($dir, undef) = each %countries) {
|
||||||
|
print STDERR "$dir ";
|
||||||
|
|
||||||
|
#
|
||||||
|
# And once for every language!
|
||||||
|
#
|
||||||
|
while (my ($lang, undef) = each %languages) {
|
||||||
|
$root->setAttribute("language", $lang);
|
||||||
|
|
||||||
|
#
|
||||||
|
# This finds the source file to use. If we can't find a translation
|
||||||
|
# into the language, it uses the english version instead, or that in
|
||||||
|
# the local language. Or the first version it finds. This should be
|
||||||
|
# made prettier.
|
||||||
|
#
|
||||||
|
my $document = $dom->createElement("document");
|
||||||
|
$document->setAttribute("language", $lang);
|
||||||
|
$root->appendChild($document);
|
||||||
|
|
||||||
|
my $source = $opts{i}."/$file.$lang.xhtml";
|
||||||
|
unless (-f $source) {
|
||||||
|
if ($lang eq "en" && -f $opts{i}."/$file.xhtml") {
|
||||||
|
$document->setAttribute("language", "en");
|
||||||
|
$source = $opts{i}."/$file.xhtml";
|
||||||
|
} elsif (-f $opts{i}."/$file.en.xhtml") {
|
||||||
|
$document->setAttribute("language", "en");
|
||||||
|
$source = $opts{i}."/$file.en.xhtml";
|
||||||
|
} elsif (-f $opts{i}."/$file.".$root->getAttribute("original").".xhtml") {
|
||||||
|
$document->setAttribute("language", $root->getAttribute("original"));
|
||||||
|
$source = $opts{i}."/$file.".$root->getAttribute("original").".xhtml";
|
||||||
|
} else {
|
||||||
|
my $l = (keys %{$bases{$file}})[0];
|
||||||
|
$document->setAttribute("language", $l);
|
||||||
|
$source = $opts{i}."/$file.$l.xhtml";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# Here begins automated magic for those pages which we need to
|
||||||
|
# assemble other sets of informations for first (automatically
|
||||||
|
# updated pages).
|
||||||
|
#
|
||||||
|
if (-f $opts{i}."/$file.xsl") {
|
||||||
|
#
|
||||||
|
# Settle down please, children. First we remove all previous
|
||||||
|
# document leftovers.
|
||||||
|
#
|
||||||
|
foreach ($root->getElementsByTagName("document")) {
|
||||||
|
$root->removeChild($_);
|
||||||
|
}
|
||||||
|
$root->appendChild($document);
|
||||||
|
|
||||||
|
#
|
||||||
|
# Get the list of sources and create the files hash. The files
|
||||||
|
# hash contains the base name for each file we want to use, and
|
||||||
|
# then the language for it as a value. It prefers a file in the
|
||||||
|
# language we're building into, but will accept an English file as
|
||||||
|
# a substitute.
|
||||||
|
#
|
||||||
|
# "Learn all that is learnable and return that information
|
||||||
|
# to the Creator."
|
||||||
|
#
|
||||||
|
open(IN, '<', $opts{i}."/$file.sources");
|
||||||
|
my @auto_sources = <IN>;
|
||||||
|
close IN;
|
||||||
|
my %files;
|
||||||
|
foreach (@auto_sources) {
|
||||||
|
if (/(.*):[a-z,]*global/ || /(.*):[a-z,]*$dir/) {
|
||||||
|
foreach my $f (glob("$1*")) {
|
||||||
|
if ($f =~ /(.*)\.([a-z][a-z])\.xml$/) {
|
||||||
|
if ($2 eq "en" && !exists $files{$1}) {
|
||||||
|
$files{$1} = $2;
|
||||||
|
} elsif ($2 eq $lang) {
|
||||||
|
$files{$1} = $2;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# With that information, we load the source document and create
|
||||||
|
# a new element in it, called <set>, which will hold the combined
|
||||||
|
# knowledge of all the sets in the source files.
|
||||||
|
#
|
||||||
|
my $sourcedoc = $parser->parse_file($source);
|
||||||
|
my $auto_data = $sourcedoc->createElement("set");
|
||||||
|
|
||||||
|
while (my ($base, $l) = each %files) {
|
||||||
|
my $source_data = $parser->parse_file($opts{i}."/$base.$l.xml");
|
||||||
|
foreach ($source_data->documentElement->childNodes) {
|
||||||
|
my $c = $_->cloneNode(1);
|
||||||
|
$auto_data->appendChild($c);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
$sourcedoc->documentElement->appendChild($auto_data);
|
||||||
|
|
||||||
|
#
|
||||||
|
# Transform the document using the XSL file and then push the
|
||||||
|
# result into the <document> element of the document we're building.
|
||||||
|
#
|
||||||
|
my $style_doc = $parser->parse_file($opts{i}."/$file.xsl");
|
||||||
|
my $stylesheet = $xslt_parser->parse_stylesheet($style_doc);
|
||||||
|
my $results = $stylesheet->transform($sourcedoc);
|
||||||
|
|
||||||
|
foreach ($results->documentElement->childNodes) {
|
||||||
|
my $c = $_->cloneNode(1);
|
||||||
|
$document->appendChild($c);
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
#
|
||||||
|
# If this wasn't an automatically updating document, we simply
|
||||||
|
# clone the contents of the source file into the document.
|
||||||
|
#
|
||||||
|
clone_document($document, $source);
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# Find out if this translation is to be regarded as outdated or not.
|
||||||
|
# Make allowances for files called either file.en.xhtml or file.xhtml.
|
||||||
|
#
|
||||||
|
if ((stat($opts{i}."/$file.".$root->getAttribute("original").".xhtml"))[9] >
|
||||||
|
(stat($source))[9]) {
|
||||||
|
$root->setAttribute("outdated", "yes");
|
||||||
|
} else {
|
||||||
|
$root->setAttribute("outdated", "no");
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($lang eq "en" && -f $opts{i}."/$file.xhtml") {
|
||||||
|
if ((stat($opts{i}."/$file.xhtml"))[9] >
|
||||||
|
(stat($source))[9]) {
|
||||||
|
$root->setAttribute("outdated", "yes");
|
||||||
|
} else {
|
||||||
|
$root->setAttribute("outdated", "no");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# Get the appropriate textset for this language. If one can't be
|
||||||
|
# found, use the English. (I hope this never happens)
|
||||||
|
#
|
||||||
|
my $textlang = $lang;
|
||||||
|
unless (-f $opts{i}."/tools/texts-$textlang.xml") {
|
||||||
|
$textlang = "en";
|
||||||
|
}
|
||||||
|
|
||||||
|
my $textdoc = $dom->createElement("textset");
|
||||||
|
$root->appendChild($textdoc);
|
||||||
|
clone_document($textdoc, $opts{i}."/tools/texts-$textlang.xml");
|
||||||
|
|
||||||
|
#
|
||||||
|
# And then we do the same thing for the menues. But first we take the
|
||||||
|
# global menu here, then we add any information that is specific to
|
||||||
|
# the focus.
|
||||||
|
#
|
||||||
|
# FIXME: Allow for headings and subitems.
|
||||||
|
foreach ($root->getElementsByTagName("menuset")) {
|
||||||
|
$root->removeChild($_);
|
||||||
|
}
|
||||||
|
|
||||||
|
my %menu;
|
||||||
|
foreach ('global', $dir) {
|
||||||
|
if (-f $opts{i}."/tools/menu-$_.xml") {
|
||||||
|
my $menudoc = $parser->parse_file($opts{i}."/tools/menu-$_.xml");
|
||||||
|
foreach my $n ($menudoc->documentElement->getElementsByTagName("menu")) {
|
||||||
|
$menu{$n->getAttribute("id")} = $n->textContent;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
my $menuroot = $dom->createElement("menuset");
|
||||||
|
while (my ($id, $href) = each %menu) {
|
||||||
|
my $m = $dom->createElement("menu");
|
||||||
|
$m->setAttribute("id", $id);
|
||||||
|
$m->appendText($href);
|
||||||
|
$menuroot->appendChild($m);
|
||||||
|
}
|
||||||
|
$root->appendChild($menuroot);
|
||||||
|
|
||||||
|
|
||||||
|
#
|
||||||
|
# Do the actual transformation.
|
||||||
|
#
|
||||||
|
my $style_doc = $parser->parse_file("fsfe-new.xsl");
|
||||||
|
my $stylesheet = $xslt_parser->parse_stylesheet($style_doc);
|
||||||
|
my $results = $stylesheet->transform($dom);
|
||||||
|
|
||||||
|
#
|
||||||
|
# In post-processing, we replace links pointing back to ourselves
|
||||||
|
# so that they point to the correct language.
|
||||||
|
#
|
||||||
|
foreach ($results->documentElement->getElementsByTagName("a")) {
|
||||||
|
if ($_->getAttribute("href") !~ /^http/) {
|
||||||
|
my $href = $_->getAttribute("href");
|
||||||
|
if ($href !~ /\.html$/) {
|
||||||
|
if (-d $opts{i}."/$href") {
|
||||||
|
$href =~ s/\/?$/\/index.$lang.html/;
|
||||||
|
} else {
|
||||||
|
$href .= ".$lang.html";
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
$href =~ s/([^\.][a-z][a-z])\.html/$1.$lang.html/;
|
||||||
|
}
|
||||||
|
$_->setAttribute("href", $href);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
$stylesheet->output_file($results, "$opts{o}/$dir/$file.$lang.html");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
print STDERR "\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# For all files that are not XHTML source files, we copy them verbatim to
|
||||||
|
# the final location, for each focus. These should be links instead to
|
||||||
|
# prevent us from vasting disk space.
|
||||||
|
#
|
||||||
|
print STDERR "Copying misc files\n";
|
||||||
|
foreach (grep(!/\.xhtml$/, @files)) {
|
||||||
|
while (my ($dir, undef) = each %countries) {
|
||||||
|
copy("$opts{i}/$_", "$opts{o}/$dir/$_") if -f "$opts{i}/$_";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
#
|
||||||
|
# Helper function that clones a document. It accepts an XML node and
|
||||||
|
# a filename as parameters. Using this, it loads the source file into
|
||||||
|
# the XML node.
|
||||||
|
#
|
||||||
|
sub clone_document {
|
||||||
|
my ($doc, $source) = @_;
|
||||||
|
my $root = $doc->parentNode;
|
||||||
|
|
||||||
|
foreach ($root->getElementsByTagName($doc->nodeName)) {
|
||||||
|
$root->removeChild($_);
|
||||||
|
}
|
||||||
|
$root->appendChild($doc);
|
||||||
|
|
||||||
|
my $parser = XML::LibXML->new();
|
||||||
|
|
||||||
|
open(IN, '<', $source);
|
||||||
|
$textsource = join('', <IN>);
|
||||||
|
|
||||||
|
#
|
||||||
|
# This requires an explanation. I had bad luck with some versions of
|
||||||
|
# XML::LibXML wanting to validate the DTD. So just to be extra safe
|
||||||
|
# we maintain a local copy of it, so it doesn't need to go browsing
|
||||||
|
# www.w3.org for -every- parsing.
|
||||||
|
#
|
||||||
|
$textsource =~ s|http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd|tools/xhtml1-transitional.dtd|g;
|
||||||
|
|
||||||
|
my $sourcedoc = $parser->parse_string($textsource);
|
||||||
|
foreach ($sourcedoc->documentElement->childNodes) {
|
||||||
|
$_->unbindNode();
|
||||||
|
my $n = $_->cloneNode(1);
|
||||||
|
$doc->appendChild($n);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,13 @@
|
||||||
|
<?xml version="1.0" encoding="ISO-8859-1"?>
|
||||||
|
|
||||||
|
<menuset>
|
||||||
|
<menu id="menu/about">/about/about.html</menu>
|
||||||
|
<menu id="menu/projects">/projects/projects.html</menu>
|
||||||
|
<menu id="menu/documents">/documents/documents.html</menu>
|
||||||
|
<menu id="menu/events">/events/events.html</menu>
|
||||||
|
<menu id="menu/help">/help/help.html</menu>
|
||||||
|
<menu id="menu/donate">/donate/donate.html</menu>
|
||||||
|
<menu id="menu/order">/order/order.html</menu>
|
||||||
|
<menu id="menu/contact">/contact/contact.html</menu>
|
||||||
|
</menuset>
|
||||||
|
|
||||||
|
|
@ -0,0 +1,44 @@
|
||||||
|
<?xml version="1.0" encoding="ISO-8859-1"?>
|
||||||
|
|
||||||
|
<textset>
|
||||||
|
<text id="copyright">
|
||||||
|
Copyright (C) 2003 FSF Europe<br />
|
||||||
|
Verbatim copying and distribution of this entire article is permitted
|
||||||
|
in any medium, provided this notice is preserved.
|
||||||
|
</text>
|
||||||
|
<text id="focus">Focus</text>
|
||||||
|
<text id="find">Find</text>
|
||||||
|
<text id="select">Select focus</text>
|
||||||
|
<text id="outdated">
|
||||||
|
<p><strong>Warning: </strong>
|
||||||
|
This page may be out of date with the original. Please use
|
||||||
|
<a href="/help/help.html">this page</a> to see how you can help
|
||||||
|
with translations, and other things.
|
||||||
|
</p>
|
||||||
|
</text>
|
||||||
|
<text id="notranslation">
|
||||||
|
<p><strong>Warning: </strong>
|
||||||
|
This page has not been translated yet. What you're seeing below
|
||||||
|
is the original version of the page. Please use
|
||||||
|
<a href="/help/help.html">tihs page</a> to see how you can help
|
||||||
|
with translations, and other things.
|
||||||
|
</p>
|
||||||
|
</text>
|
||||||
|
<text id="menu/about">About</text>
|
||||||
|
<text id="menu/projects">Projects</text>
|
||||||
|
<text id="menu/projects/technical">Technical</text>
|
||||||
|
<text id="menu/projects/other">Other</text>
|
||||||
|
<text id="menu/projects/legal">Legal</text>
|
||||||
|
<text id="menu/projects/awareness">Awareness</text>
|
||||||
|
<text id="menu/documents">Documents</text>
|
||||||
|
<text id="menu/events">Events</text>
|
||||||
|
<text id="menu/help">Help</text>
|
||||||
|
<text id="menu/donate">Donate</text>
|
||||||
|
<text id="menu/order">Order</text>
|
||||||
|
<text id="menu/contact">Contact</text>
|
||||||
|
<text id="menu/associates">Associates</text>
|
||||||
|
<text id="menu/lists">Mailing Lists</text>
|
||||||
|
<text id="menu/thankgnus">ThankGNUs</text>
|
||||||
|
<text id="menu/news">News</text>
|
||||||
|
<text id="menu/press">Press Information</text>
|
||||||
|
</textset>
|
||||||
Loading…
Reference in New Issue