0) {echo'Fehler in der Sprachdatei. keine Speicherung ';}
else {
echo "... raus
}
else { //UTF-8
$core=read_langpack($files_langpack[$i]); // langpack core -> $core
$core=remove_non_lp($core); // alles nicht ... raus
$core=convert_from_utf($core);
}
}
elseif ($files_langpack[$i] == "common.txt") {
$files=ereg_replace("(\.txt)$","",$files_langpack[$i]);
$flg_ok=$_POST[$files];
if(isset($flg_ok) or isset($_POST['alles']) or isset($flg_save)) {
$file_time=filectime($vars['path_wiki_data'].'/'.$files_langpack[$i]);
if (file_exists($vars['path_wiki_data'].'/'.$files_langpack[$i].'.asc')) { // ISO File
$common=read_langpack($files_langpack[$i].'.asc'); // langpack core -> $core
$common=remove_non_lp($common); // alles nicht ... raus
}
else {
$common=read_langpack($files_langpack[$i]); // langpack core -> $core
$common=remove_non_lp($common); // alles nicht ... raus
$common=convert_from_utf($common);
}
$common=array_merge("; start of langpack ASC: ".$files.", last update: ".gmdate("d.M.Y H:i:s", $file_time)." (".$file_time.")\r\n",$common);
$common=array_merge($common,"; ##############################################\r\n; end of langpack: ".$files."\r\n; ##############################################\r\n\r\n");
}
}
elseif (ereg("(\.txt)$",$files_langpack[$i])){
$files=ereg_replace("(\.txt)$","",$files_langpack[$i]);
$flg_ok=$_POST[$files];
if(isset($flg_ok) or isset($_POST['alles']) or isset($flg_save)) {
$file_time=filectime($vars['path_wiki_data'].'/'.$files_langpack[$i]);
if (file_exists($vars['path_wiki_data'].'/'.$files_langpack[$i].'.asc')) { // ISO File
$langpack=read_langpack($files_langpack[$i].'.asc');
$langpack=remove_non_lp($langpack);
if ($langpack != "") {
$langpack_french=array_merge($langpack_french,"; start of langpack ASC: ".$files.", last update: ".gmdate("d.M.Y H:i:s", $file_time)." (".$file_time.")\r\n");
$langpack_french=array_merge($langpack_french,$langpack); // langpack nach restl. lp hängen
$langpack_french=array_merge($langpack_french,"; ##############################################\r\n; end of langpack: ".$files."\r\n; ##############################################\r\n\r\n");
}
}
else { // UTF-8 file
$langpack=read_langpack($files_langpack[$i]);
$langpack=remove_non_lp($langpack);
if ($langpack != "") {
$langpack=convert_from_utf($langpack);
$langpack_french=array_merge($langpack_french,"; start of langpack: ".$files.", last update: ".gmdate("d.M.Y H:i:s", $file_time)." (".$file_time.")\r\n");
$langpack_french=array_merge($langpack_french,$langpack); // langpack nach restl. lp hängen
$langpack_french=array_merge($langpack_french,"; ##############################################\r\n; end of langpack: ".$files."\r\n; ##############################################\r\n\r\n");
}
}
}
}
}
$core=array_merge($core,$common); // common an core hängen
$langpack_french=array_merge($core,$langpack_french); // common an core hängen
// Header einfügen
$lp_header=array("Miranda Language Pack Version 1\r\n","Language: French (fr-FR)\r\n","Locale: 040c\r\n","Last-Modified-Using: Miranda IM 0.5\r\n","Authors: Dagobert_78, a7 et la comunautée miranda-fr.net\r\n","Author-email: dago.bert@wanadoo.fr & postmaster@miranda-fr.net\r\n","X-Langpack-creation-date: ".date("d M Y H:i:s")."\r\n","X-Langpack-creator: Langpack creator v".$version."\r\n");
$lp_flid=array("\r\n","; FLID: French Language Pack ".date("0.y.m.d")."\r\n");
$lp_hinweis=array("\r\n","; du texte ici :o \r\n","\r\n\r\n; ###########################\r\n; end of Header\r\n; ###########################\r\n\r\n");
$included_files="";
for ($i=0;$i < sizeof($files_langpack);$i++){
$files=ereg_replace("(\.txt)$","",$files_langpack[$i]);
$flg_ok=$_POST[$files];
if(isset($flg_ok) or isset($_POST['alles']) or isset($_GET['save_stable'])) {
$included_files=$included_files.' '.$files;
}
}
$lp_plugins=array("; Plugins-included:".$included_files."\r\n");
$langpack_french=array_merge($lp_hinweis,$langpack_french); // Hinweis vor lp hängen
$langpack_french=array_merge($lp_flid,$langpack_french); // flid vor lp hängen
$langpack_french=array_merge($lp_plugins,$langpack_french); // Pluginnamen vor lp hängen
$langpack_french=array_merge($lp_header,$langpack_french); // Header vor lp hängen
//
// Ausgabe der Datei
if ($flg_save) {
$datei=@fopen("/var/www/web29/files/langpack_french.txt", "w");
@flock($datei,2);
$zp = gzopen("/var/www/web29/files/langpack_french.txt.gz", "w9");
}
for ($i=0;$i < sizeof($langpack_french);$i++){
$langpack_french[$i]=preg_replace("(\r\r\n)", "\r\n", preg_replace("(\n)", "\r\n", $langpack_french[$i])); // DFYX :-)
if ($flg_save) {
@fputs($datei, $langpack_french[$i]);
// Schreibe den String in die Datei
gzwrite($zp, $langpack_french[$i]);
}
else {
echo $langpack_french[$i]; //'", $text[$i])) { $flg_lp=1;}
}
return($txt);
} // remove_non_lp
function convert_from_utf($text){
$conv = new ConvertCharset; // objekt der Klasse erstellen
$txt = $conv->Convert($text,'utf-8','windows-1252',false); // Zugriff auf Funktion in Objekt
return($txt);
} // convert_from_utf
function xhtml_head(){
global $version;
header('Content-Type: text/html; charset=windows-1252');
print '';
print '';
?>
Langpack Creator <?=$version?>
Okay, hier die gespeicherten Sprachdateien
Veuillez sélectionner les langpacks | Contrôler tout les langpacks
'.$files_langpack[$i].'';
if(ereg("^(core)",$files_langpack[$i])) {
$core=read_langpack($files_langpack[$i]); // langpack core -> $core
$core=remove_non_lp($core); // alles nicht ... raus
$flg_error=check_file($core, 0,$files_langpack[$i]);
if ($flg_error) {echo ''.$file.' - Erreur(s) trouvée(s) OK Erreur(s) trouvée(s) OK Retour au choix des Plugins ';}
if (isset($flg_error)){return($flg_error);}
} // end func
function check_file($lines, $start, $file){
$flg_error=0;
$flg_en=1;
for ($i=$start;$i < sizeof($lines);$i++){
$lines[$i]=chop($lines[$i]);
$zeile=$lines[$i];
$zeile=ereg_replace("\W","",$zeile);
$zeile=ereg_replace(" ","",$zeile);
$zeile=ereg_replace("(;*)$",";",$zeile);
$zeile=ereg_replace("(]*)$","]",$zeile);
if ($lines[$i]!="" and $zeile!="" and strlen($zeile)>1 and (!eregi("^(Plugins-included:)",$lines[$i])) and (!eregi("^(X-)",$lines[$i]))) {
if (ereg("^(;)", $zeile)) {
}
else {
if ($flg_en==1) {
if (!(ereg("^(\[)",$lines[$i]) and ereg("(\])$",$zeile))) {
$flg_error++;
if ($flg_error==1){
$file=ereg_replace("(\.txt)$","",$file);
echo ''.$file.' ';
}
echo " Fehler in Zeile $i: englische La ligne attend ->".$lines[$i].'<- ';
}
else{$flg_en=0;}
}
else {
if ((ereg("^(\[)",$lines[$i]) and ereg("(\])$",$zeile))) {
$flg_error++;
if ($flg_error==1){
$file=ereg_replace("(\.txt)$","",$file);
echo ''.$file.' ';
}
echo " Erreur dans la ligne $i: french la ligne attend ->".$lines[$i].'<- ';
}
else{$flg_en=1;}
} // else
}
}// end if
} // end for
if ($flg_error>0){echo ' ';}
return ($flg_error);
} // end func