[Libreoffice-commits] .: Branch 'feature/killsdf' - l10ntools/scripts nlpsolver/help sdext/source swext/mediawiki
Libreoffice Gerrit user
logerrit at kemper.freedesktop.org
Wed Nov 7 14:19:30 PST 2012
l10ntools/scripts/update_tree.pl | 394 ----------
nlpsolver/help/en/com.sun.star.comp.Calc.NLPSolver/tree_strings.xhp | 29
sdext/source/presenter/help/en-US/com.sun.PresenterScreen/tree_strings.xhp | 29
swext/mediawiki/help/tree_strings.xhp | 29
4 files changed, 481 deletions(-)
New commits:
commit 428d9e15f98630df9a652be2b2f5064ac1bc7a89
Author: Zolnai Tamás <zolnaitamas2000 at gmail.com>
Date: Wed Nov 7 22:50:56 2012 +0100
Delete unused files
Belong to extensions which become
unneeded because of treex
Change-Id: I86ca7494a9022c1e72d64b2ec5cbd41d6e292a00
diff --git a/l10ntools/scripts/update_tree.pl b/l10ntools/scripts/update_tree.pl
deleted file mode 100644
index 02faf6a..0000000
--- a/l10ntools/scripts/update_tree.pl
+++ /dev/null
@@ -1,394 +0,0 @@
-:
-eval 'exec perl -wS $0 ${1+"$@"}'
- if 0;
-#*************************************************************************
-#
-# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
-#
-# Copyright 2000, 2010 Oracle and/or its affiliates.
-#
-# OpenOffice.org - a multi-platform office productivity suite
-#
-# This file is part of OpenOffice.org.
-#
-# OpenOffice.org is free software: you can redistribute it and/or modify
-# it under the terms of the GNU Lesser General Public License version 3
-# only, as published by the Free Software Foundation.
-#
-# OpenOffice.org 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 Lesser General Public License version 3 for more details
-# (a copy is included in the LICENSE file that accompanied this code).
-#
-# You should have received a copy of the GNU Lesser General Public License
-# version 3 along with OpenOffice.org. If not, see
-# <http://www.openoffice.org/license.html>
-# for a copy of the LGPLv3 License.
-#
-#*************************************************************************
-
-use Cwd 'abs_path';
-use File::Find;
-use File::Copy qw/cp mv/;
-use File::Basename;
-
-# update the tree files in <platform>/misc/*
-
-$| = 1;
-
-my $prj = $ENV{PWD};
-
-my $inpath = $ENV{WORKDIR};
-terminate() if ( ! defined $inpath );
-
-my $destpath = $inpath;
-my $with_lang = $ARGV[1];
-my $xmllint = $ENV{XMLLINT} || "$ENV{OUTDIR_FOR_BUILD}/bin/xmllint";
-
-$tree_target_prefix = $ARGV[4];
-
-# Always use / directory separators
-$prj =~ s/\\/\//g if defined($prj);
-$inpath =~ s/\\/\//g;
-$destpath =~ s/\\/\//g;
-
-if ( ! defined $prj ) {
-# do someting that works for manual call
- ($scriptname = `pwd`) =~ s/\n/\/$0/;
- ($tree_src = $scriptname) =~ s/\/update_tree.pl/\/..\/source\/auxiliary/;
- ($tree_dest = $scriptname) =~ s/\/update_tree.pl/\/..\/$destpath\/misc/;
- ($source_dir = $scriptname) =~ s/\/update_tree.pl/\/..\/source/;
- ($source_dir_xhp = $scriptname) =~ s/\/update_tree.pl/\/..\/source/;
-
- if ( defined $ENV{TRYSDF} || defined $ENV{LOCALIZESDF} )
- {
- if( defined $ENV{LOCALIZATION_FOUND} && $ENV{LOCALIZATION_FOUND} eq "YES" )
- {
- $source_dir = $ENV{TRYSDF};
- }
- elsif( defined $ENV{LOCALIZESDF} && $ENV{LOCALIZESDF} ne "" )
- {
- $source_dir = $ENV{LOCALIZESDF};
- }
- $source_dir =~ s/\/auxiliary\/localize.sdf$// ;
- }
- $treestrings = "$ARGV[0]";
- $treestrings=~ s/\/*.tree//g;
-} else {
- $source_dir_xhp = "$prj/source/presenter/help";
- $tree_src = "$ARGV[0]";
- $tree_src =~ s/\/help.tree//g;
- $tree_dest = "$ARGV[3]";
- $tree_dest =~ s/\/help.tree//g;
- $source_dir = "$ARGV[2]";
- $source_dir =~ s/\/localize.sdf//g;
- $treestrings = "$ARGV[0]";
- $treestrings=~ s/\/help.tree/\/tree_strings.xhp/g;
-
- if( defined $ENV{LOCALIZATION_FOUND} && $ENV{LOCALIZATION_FOUND} eq "YES" )
- {
- $source_dir = $ENV{TRYSDF};
- }
- elsif ( defined $ENV{LOCALIZESDF} && $ENV{LOCALIZESDF} ne "" )
- {
- $source_dir = $ENV{LOCALIZESDF};
- }
- $source_dir =~ s/\/auxiliary\/localize.sdf$// ;
-}
-
-# Get the English tree files as master
-#-------------------------------
-# Update English from xhp
-#-------------------------------
-&do_english;
-#-------------------------------
-# Update localizations from sdf
-#-------------------------------
-
-if( defined $with_lang && $with_lang ne "" )
-{
- @langs = split /\s+/, $with_lang;
- &read_loc;
- for $l(@langs)
- {
- #if ($l ne "en-US") {
- &do_lang($l);
- #}
- }
-}
-else
-{
- print "\nNo WITH_LANG set, skipping l10n\n";
-}
-#-------------------------------
-#
-
-####################
-# SUBS
-####################
-sub terminate {
- $err = shift;
- print "$err\n\n";
- $msg = <<"MSG";
-
-update_tree.pl
- all languages in WITH_LANG are processed. WITH_LANG=ALL is
- not supported in manual calls.
-
- Updates the *.tree files.
- At first, the English file is updated based on the English
- help topic titles as read from the help files. Then, the
- localized tree files are written based on the English tree
- file and the localized help topic titles.
-
- Requires a valid LibreOffice build environment.
-MSG
- print "$msg\n";
- exit( -1 );
- # die "$msg\n";
-}
-
-#---------------------------------------------------
-
-sub do_english {
- undef %helpsection; undef %node;
- &readtreestrings;
- &gettreefiles;
-}
-
-#---------------------------------------------------
-sub do_lang {
- $lng = shift;
- print "Processing $lng\n";
- &processtreefiles($lng);
-}
-
-#---------------------------------------------------
-sub readtreestrings {
- if (open TREE, $treestrings) {
- print "Processing readtreestrings\n";
- while (<TREE>) {
- chomp;
- s/<\/*help:productname>//gis;
- if (/help_section/) {
- s/^\s*<.*help_section//;
- s/<\/.*$//;
- ($id = $_) =~ s/^.*id="(\d+)".*$/$1/;
- ($title = $_) =~ s/^.*title="(.*)".*$/$1/;
- $helpsection{$id} = $title;
- }
-
- if (/node id=/) {
- s/^\s*<.*node //;
- s/<\/.*$//;
- ($id = $_) =~ s/^.*id="(\d+)".*$/$1/;
- ($title = $_) =~ s/^.*title="(.*)".*$/$1/;
- $node{$id} = $title;
- }
- }
- close TREE;
- } else {
- &terminate("Error opening $treestrings");
- }
-}
-
-#------------------------------------
-sub gettreefiles {
- # Read the tree files from the directory
- # this list is also used for all foreign languages
- if (opendir ENUS, "$tree_src") {
- @treeviews = grep /\.tree/, readdir ENUS;
- closedir ENUS;
- } else {
- &terminate("Cannot open directory $tree_src");
- }
-}
-
-#------------------------------------
-sub processtreefiles {
- $lng = shift;
- use File::Temp qw/ tempfile /;
- use File::Spec;
-
- for $tv(@treeviews) {
- @lines = &readtv("$tree_src/$tv");
- for $l(@lines) {
- if ($l =~ /topic/) {
- ($id = $l) =~ s/^.*id="([^"]*)".*$/$1/gis;
- ($module = $id) =~ s/^([^\/]*).*$/$1/;
- $id =~ s/^.*?\///;
- $file = "$source_dir_xhp/$lng/$id";
-
- if ($lng eq 'en-US') { # english comes from the file
- $temp = $l;
- $temp =~ s/^.*<topic[^>]+id=".*"[^>]*>([^<]*)<\/topic>.*$/$1/gis;
- $temp =~ s/'/\'/gis; $temp=~ s/&/+/gis;
- $temp =~ s/"/\'/gis; $temp =~ s/&/+/gis;
-
- $id =~s/^.*\/(.*.xhp)/$1/;
- $l = "<topic id=\"$module/$tree_target_prefix/$id\">$temp</topic>\n";
- } else { # localized comes from the localize sdf
- if (defined($loc_title{$lng}->{$id})) {
- $xhpname = $id;
- $xhpname =~s/^.*\/(.*.xhp)/$1/;
- $l = "<topic id=\"$module/$tree_target_prefix/$xhpname\">$loc_title{$lng}->{$id}</topic>\n";
- } else {
- }
- }
- }
-
- if ($l =~/<node/) {
- ($id = $l) =~ s/^.*id="(\d+)".*$/$1/gis;
- if ($lng eq 'en-US') {
- if (defined($node{$id})) {
- $l =~ s/title="(.*)"/title="$node{$id}"/;
- } else {
- $l =~ s/title="(.*)"/title="NOTFOUND:$id"/;
- }
- } else {
- if (defined($node{$lng}->{$id})) {
- $l =~ s/title="(.*)"/title="$node{$lng}->{$id}"/;
- }
- }
- }
-
- if ($l =~/<help_section/) {
- ($id = $l) =~ s/^.*id="(\d+)".*$/$1/gis;
- if ($lng eq 'en-US') {
- if (defined($helpsection{$id})) {
- $l =~ s/title="(.*)"/title="$helpsection{$id}"/;
- } else {
- $l =~ s/title="(.*)"/title="NOTFOUND:$id"/;
- }
- } else {
- if (defined($helpsection{$lng}->{$id})) {
- $l =~ s/title="(.*)"/title="$helpsection{$lng}->{$id}"/;
- }
- }
- }
- }
-
-
- my $treeoutdir = "$tree_dest";
- my $tmpname_template=$tv."_XXXXX";
- my ( $treetmpfilehandle, $treetmpfile ) = tempfile($tmpname_template , DIR => File::Spec->tmpdir() );
- close $treetmpfilehandle ;
-
- if (open TV, ">$treetmpfile") {
- for $line(@lines) {
- $line =~ s/\$\[officename\]/%PRODUCTNAME/g;
- $line =~ s/\$\[officeversion\]/%PRODUCTVERSION/g;
- print TV $line;
- }
- close TV;
- chmod 0664, $treetmpfile or &terminate("Cannot change rights on $treetmpfile");
- if( $^O eq 'MSWin32' )
- {
- $tree_dest =~ s/\//\\/g ;
- unlink "$tree_dest\\$tv" ;
- mv $treetmpfile , "$tree_dest\\$tv" or &terminate("Cannot mv $treetmpfile to $tree_dest\\$tv" );
- }
- else
- {
- unlink "$tree_dest/$tv" ;
- my $ret=mv $treetmpfile , "$tree_dest/$tv" or &terminate("Cannot write to $tree_dest/$tv - Error $!");
- my $ret=mv "$tree_dest/$tv" , "$tree_dest/$tv" or &terminate("Cannot write to $tree_dest/$tv - Error $!");
- #xmllint is crashing on windows, fixme
- if( $^O ne 'cygwin' )
- {
- system("$xmllint --noout --noent $tree_dest/$tv") == 0 or &terminate("$tree_dest/$tv is illformed xml ($xmllint on $^O)" );
- }
- }
- } else {
- &terminate("Cannot write to $tvout");
- }
- }
-}
-
-#------------------------------------
-sub readtv {
- my $f = shift;
- if (open TV, $f) {
- $/ = "\n";
- my @l = <TV>;
- close TV;
- return @l;
- } else {
- &terminate("Error opening $f");
- }
-}
-
-#-------------------------------------
-# read entries from localize.sdf files
-#-------------------------------------
-sub read_loc {
- $/ = "\n";
- my $path = "$source_dir";
- @files = `find $source_dir -name localize.sdf`;
- for my $fname (@files) {
- $FS = '\t';
- open(LOCALIZE_SDF, $fname) || die 'Cannot open "localize.sdf".'."$fname";
- while (<LOCALIZE_SDF>) {
- my $sdf_line = $_;
- my ($Fld1,$file,$Fld3,$Fld4,$id,$Fld6,$Fld7,$Fld8,$Fld9,$lang,$text) = split($FS, $sdf_line , 12);
- next if ( $Fld1 =~ /^#/);
- if ($id eq 'tit') {
- #strip filename
- $file =~ s/.*text\\/text\\/g;
- #convert \ to / in filename
- $file =~ s/\\/\//g;
- $file =~ s/^.*\/(.*)\/(.*)$/$1\/$2/;
- #fpe: i46823 - need to encode &s, added encoding
- $text =~ s/&(?!amp;)/&/g;
- #help xml tags are not allowed in .tree files
- $text =~ s/\\<.*?\\>//g;
- # add entry to the hash
-
- $loc_title{$lang}->{$file} = $text;
- }
- if ($file =~ /tree_strings.xhp/) {
- #strip filename
- $file =~ s/.*text/text/g;
- #convert \ to / in filename
- $file =~ s/\\/\//g;
- if ($text =~ /^<help_section/) {
- #example: <help_section application="scalc" id="08" title="表計算ドã‚ュメント">
- my ($fld1,$app,$fld3,$id,$fld5,$sec_title) = split('"', $text, 7);
- #fpe: i46823 - need to encode &s, added encoding
- if( defined $sec_title )
- {
- $sec_title =~ s/&(?!amp;)/&/g;
- #help xml tags are not allowed in .tree files
- $sec_title =~ s/\\<.*?\\>//g;
- #unquot \<item ... /\>
- terminate( "\n\nERROR: Bad string in file '$fname' will cause invalid xml tree file \n---\n'$sdf_line'\n---\nPlease remove or replace < = '<' and > = '>' within the title attribute '$sec_title'\n") , if( $sec_title =~ /[\<\>]/ );
- $helpsection{$lang}->{$id} = $sec_title;
- }
- } elsif ($text =~/<node id=/) {
- # example: <node id="0205" title="Tabelas em documentos de texto">
- # BEWARE: title may contain escaped '"' so only match " not preceded by \
- # using a zeroâ€width negative lookâ€behind assertion.
- my ($fld1,$id,$fld3,$node_title,$Fld5) = split(/(?<!\\)"/, $text, 5);
- #fpe: i46823 - need to encode &s, added encoding
- if( defined $node_title )
- {
- $node_title =~ s/&(?!amp;)/&/g;
- #help xml tags are not allowed in .tree files
- $node_title =~ s/\\<.*?\\>//g;
- terminate( "\n\nERROR: Bad string in '$fname' will cause invalid xml tree file \n---\n'$sdf_line'\n---\nPlease remove or replace < = '<' and > = '>' within the title attribute '$node_title'\n") , if( $node_title =~ /[\<\>]/ );
- }
- $node{$lang}->{$id} = $node_title;
- }
- }
- }
- close LOCALIZE_SDF;
- }
- # statistics
- $total_elements=0;
- foreach $lang (keys %loc_title) {
- $no_elements = scalar(keys(%{$loc_title{$lang}}));
- push(@langstat, "$lang:\t ".$no_elements." matches\n");
- $total_elements += $no_elements;
- }
-}
diff --git a/nlpsolver/help/en/com.sun.star.comp.Calc.NLPSolver/tree_strings.xhp b/nlpsolver/help/en/com.sun.star.comp.Calc.NLPSolver/tree_strings.xhp
deleted file mode 100644
index f6403c4..0000000
--- a/nlpsolver/help/en/com.sun.star.comp.Calc.NLPSolver/tree_strings.xhp
+++ /dev/null
@@ -1,29 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<helpdocument version="1.0">
-
-<!--
- * This file is part of the LibreOffice project.
- *
- * This Source Code Form is subject to the terms of the Mozilla Public
- * License, v. 2.0. If a copy of the MPL was not distributed with this
- * file, You can obtain one at http://mozilla.org/MPL/2.0/.
- *
--->
-
-<meta>
- <topic id="tree_stringsxml" indexer="include" status="PUBLISH">
- <title xml-lang="en-US" id="tit" localize="false">Note to translators:</title>
- <filename>/help/en/com.sun.star.comp.Calc.NLPSolver/tree_strings.xhp</filename>
- </topic>
-</meta>
-
-<body>
- <comment>This file contains extra strings for the contents (*.tree) files. No indexing!</comment>
- <switch select="sys"> <case select="OS2">
- <paragraph role="heading" level="1" id="hd_id3150150" xml-lang="en-US" localize="false">File: help.tree</paragraph>
- <paragraph role="paragraph" id="par_id3160160" xml-lang="en-US"><help_section application="scalc" id="08" title="Solver for Nonlinear Problems"></paragraph>
- <paragraph role="paragraph" id="par_id3170170" xml-lang="en-US"><node id="0816" title="Solver for Nonlinear Problems"></paragraph>
- </case> </switch>
-</body>
-
-</helpdocument>
diff --git a/sdext/source/presenter/help/en-US/com.sun.PresenterScreen/tree_strings.xhp b/sdext/source/presenter/help/en-US/com.sun.PresenterScreen/tree_strings.xhp
deleted file mode 100644
index 322cd69..0000000
--- a/sdext/source/presenter/help/en-US/com.sun.PresenterScreen/tree_strings.xhp
+++ /dev/null
@@ -1,29 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<helpdocument version="1.0">
-
-<!--
- * This file is part of the LibreOffice project.
- *
- * This Source Code Form is subject to the terms of the Mozilla Public
- * License, v. 2.0. If a copy of the MPL was not distributed with this
- * file, You can obtain one at http://mozilla.org/MPL/2.0/.
- *
--->
-
-<meta>
- <topic id="tree_stringsxml" indexer="include" status="PUBLISH">
- <title xml-lang="en-US" id="tit" localize="false">Note to translators:</title>
- <filename>/source/presenter/help/en-US/com.sun.PresenterScreen/tree_strings.xhp</filename>
- </topic>
-</meta>
-
-<body>
- <comment>This file contains extra strings for the contents (*.tree) files. No indexing!</comment>
- <switch select="sys"> <case select="OS2">
- <paragraph role="heading" level="1" id="hd_id3150150" xml-lang="en-US" localize="false">File: help.tree</paragraph>
- <paragraph role="paragraph" id="par_id3160160" xml-lang="en-US"><help_section application="simpress" id="04" title="Presenter Console Keyboard Shortcuts"></paragraph>
- <paragraph role="paragraph" id="par_id3170170" xml-lang="en-US"><node id="0411" title="Presenter Console Keyboard Shortcuts"></paragraph>
- </case> </switch>
-</body>
-
-</helpdocument>
diff --git a/swext/mediawiki/help/tree_strings.xhp b/swext/mediawiki/help/tree_strings.xhp
deleted file mode 100644
index 2ccabc7..0000000
--- a/swext/mediawiki/help/tree_strings.xhp
+++ /dev/null
@@ -1,29 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<helpdocument version="1.0">
-
-<!--
- * This file is part of the LibreOffice project.
- *
- * This Source Code Form is subject to the terms of the Mozilla Public
- * License, v. 2.0. If a copy of the MPL was not distributed with this
- * file, You can obtain one at http://mozilla.org/MPL/2.0/.
- *
--->
-
-<meta>
- <topic id="tree_stringsxml" indexer="include" status="PUBLISH">
- <title xml-lang="en-US" id="tit" localize="false">Note to translators:</title>
- <filename>/mediawiki/help/treestrings.xhp</filename>
- </topic>
-</meta>
-
-<body>
- <comment>This file contains extra strings for the contents (*.tree) files. No indexing!</comment>
- <switch select="sys"> <case select="OS2">
- <paragraph role="heading" level="1" id="hd_id3150150" xml-lang="en-US" localize="false">File: help.tree</paragraph>
- <paragraph role="paragraph" id="par_id3160160" xml-lang="en-US"><help_section application="swriter" id="02" title="MediaWiki"></paragraph>
- <paragraph role="paragraph" id="par_id3170170" xml-lang="en-US"><node id="0224" title="MediaWiki"></paragraph>
- </case> </switch>
-</body>
-
-</helpdocument>
More information about the Libreoffice-commits
mailing list