pl.pm

老外写的linux下的文件备份软件

<br><br>

\${h2("Podsumowanie kolejki w tle")}
<p>
Nast臋puj膮ce kolejki b臋d膮ce w tle czekaj膮 na wykonanie :
</p>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td> Host </td>
    <td> Czas do </td>
    <td> uzytkownik </td></tr>
\$strBg
</table>
<br><br>
\${h2("Podsumowanie kolejki polece艅")}
<p>
Nast臋puj膮ce kolejki polece艅 czekaj膮 na wykonanie :
</p>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td> Host </td>
    <td> Czas do </td>
    <td> U偶ytkownik </td>
    <td> Polecenie </td></tr>
\$strCmd
</table>
EOF

# --------------------------------
$Lang{Backup_PC__Log_File__file} = "BackupPC: Plik \$file";
$Lang{Log_File__file__comment} = <<EOF;
\${h1("Plik \$file \$comment")}
<p>
EOF
# --------------------------------
$Lang{Contents_of_log_file} = <<EOF;
Komentarze do pliku <tt>\$file</tt>, zmodyfikowne \$mtimeStr \$comment
EOF

# --------------------------------
$Lang{skipped__skipped_lines} = "[ pomini臋to \$skipped linii ]\n";
# --------------------------------
$Lang{_pre___Can_t_open_log_file__file} = "<pre>\nNie mo偶na otworzyc dziennika \$file\n";

# --------------------------------
$Lang{BackupPC__Log_File_History} = "BackupPC: Historia Dziennika";
$Lang{Log_File_History__hdr} = <<EOF;
\${h1("Histria Dziennika \$hdr")}
<p>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td align="center"> Plik </td>
    <td align="center"> Rozmiar </td>
    <td align="center"> Czas Modyfikacji </td></tr>
\$str
</table>
EOF

# -------------------------------
$Lang{Recent_Email_Summary} = <<EOF;
\${h1("Podsumowanie Emaili (kojeno艣膰 odwrotna)")}
<p>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td align="center"> Adresat </td>
    <td align="center"> Nadawca </td>
    <td align="center"> Czas </td>
    <td align="center"> Temat </td></tr>
\$str
</table>
EOF
 

# ------------------------------
$Lang{Browse_backup__num_for__host} = "BackupPC: Przegl膮daj \$num dla \$host";

# ------------------------------
$Lang{Restore_Options_for__host} = "BackupPC: Przywr贸膰 opcje dla \$host";
$Lang{Restore_Options_for__host2} = <<EOF;
\${h1("Przywr贸膰 opcje dla \$host")}
<p>
Zaznaczy艂e艣 nast臋puj膮ce pliki/katalogi z
udzia艂u \$share, kopia numer #\$num:
<ul>
\$fileListStr
</ul>
</p><p>
Masz do wyboru trzy mo偶liwo艣膰i przywr贸cenia tych plik贸w/katalog贸w.
Prosz臋 wybra膰 jedna z nich.
</p>
\${h2("Opcja Pierwsza: Bezposrednie przywr贸cenie")}
<p>
EOF

$Lang{Restore_Options_for__host_Option1} = <<EOF;
Mo偶esz zacz膮膰 przywracanie bezpo艣rednio na 
<b>\$directHost</b>.
</p><p>
<b>Uwaga:</b> jakikolwiek plik pasuj膮cy do tych ktore masz
zaznaczone b臋dzie nadpisany !
</p>
<form action="\$MyURL" method="post" name="direct">
<input type="hidden" name="host" value="\${EscHTML(\$host)}">
<input type="hidden" name="num" value="\$num">
<input type="hidden" name="type" value="3">
\$hiddenStr
<input type="hidden" value="\$In{action}" name="action">
<table class="tableStnd" border="0">
<tr>
    <td>Przywr贸cenie plik贸w na host</td>
    <td><!--<input type="text" size="40" value="\${EscHTML(\$host)}"
	 name="hostDest">-->
	 <select name="hostDest" onChange="document.direct.shareDest.value=''">
	 \$hostDestSel
	 </select>
	 <script language="Javascript">
	 function myOpen(URL) {
		window.open(URL,'','width=500,height=400');
	 }
	 </script>
	 <!--<a href="javascript:myOpen('\$MyURL?action=findShares&host='+document.direct.hostDest.options.value)">Szukaj dost臋pnych udzia艂贸w (NIE ZAIMPLEMENTOWANE)</a>--></td>
</tr><tr>
    <td>Przywr贸cenie plik贸w do udzia艂u</td>
    <td><input type="text" size="40" value="\${EscHTML(\$share)}"
	 name="shareDest"></td>
</tr><tr>
    <td>Przywr贸膰 pliki poni偶ej<br>(podobne do udzia艂u)</td>
    <td valign="top"><input type="text" size="40" maxlength="256"
	value="\${EscHTML(\$pathHdr)}" name="pathHdr"></td>
</tr><tr>
    <td><input type="submit" value="Start Restore" name="ignore"></td>
</table>
</form>
EOF

$Lang{Restore_Options_for__host_Option1_disabled} = <<EOF;
Bezpo艣rednie przywr贸cenie na host zosta艂o wy艂膮czone \${EscHTML(\$hostDest)}.
Prosz臋 wybrac inna opcj臋 przywracania.
EOF

# ------------------------------
$Lang{Option_2__Download_Zip_archive} = <<EOF;
<p>
\${h2("Opcja Druga: 艢ci膮gnij Archiwum Zip")}
<p>
Mo偶esz 艣ci膮gn膮c archiwum Zip zawieaj膮ce wszystkie pliki/katalogi kt贸re
zaznaczy艂e艣.  Mo偶esz wtedy u偶y膰 lokalnej aplikacji, Takiej jak 7Zip,
do przegl膮dania czy wypakowania danych.
</p><p>
<b>Uwaga:</b> zale偶nie od wybranych plik贸w/katalog贸w ,
to archiwum mo偶e by膰 bardzo du偶e.  Mo偶e zaja膰 du偶o czasu do
stworzenia i przes艂ania go, tak偶e b臋dziesz potrzebowa艂 odpowiedniej ilo艣ci miejsca na dysku
do przechowania.
</p>
<form action="\$MyURL" method="post">
<input type="hidden" name="host" value="\${EscHTML(\$host)}">
<input type="hidden" name="num" value="\$num">
<input type="hidden" name="type" value="2">
\$hiddenStr
<input type="hidden" value="\$In{action}" name="action">
<input type="checkbox" value="1" name="relative" checked> Stworzy膰 archiwum powi膮zane
z \${EscHTML(\$pathHdr eq "" ? "/" : \$pathHdr)}
(inaczej bedzie zawierac pe艂ne scie偶ki do plik贸w).
<br>
Kompresja (0=off, 1=fast,...,9=best)
<input type="text" size="6" value="5" name="compressLevel">
<br>
<input type="submit" value="Sci膮gnij plik Zip" name="ignore">
</form>
EOF

# ------------------------------

$Lang{Option_2__Download_Zip_archive2} = <<EOF;
<p>
\${h2("Opcja Druga: 艢ci膮gnij Archiwum Zip")}
<p>
Archive::Zip nie jest zainstalowane wi臋c nie mo偶esz 艣ci膮gn膮膰 archiwum Zip.
Prosz臋 poprosi膰 swojego Administratora aby zainstalowa艂 Archive::Zip z
<a href="http://www.cpan.org">www.cpan.org</a>.
</p>
EOF


# ------------------------------
$Lang{Option_3__Download_Zip_archive} = <<EOF;
\${h2("Opcja trzecia : 艢ci膮gnij archiwum Tar")}
<p>
Mo偶esz 艣ci膮gn膮c archiwum Tar zawieaj膮ce wszystkie pliki/katalogi kt贸re
zaznaczy艂e艣.  Mo偶esz wtedy u偶y膰 lokalnej aplikacji, Takiej jak 7Zip,
do przegl膮dania czy wypakowania danych.
</p><p>
<b>Uwaga:</b> zale偶nie od wybranych plik贸w/katalog贸w ,
to archiwum mo偶e by膰 bardzo du偶e.  Mo偶e zaja膰 du偶o czasu do
stworzenia i przes艂ania go, tak偶e b臋dziesz potrzebowa艂 odpowiedniej ilo艣ci miejsca na dysku
do przechowania.
</p>
<form action="\$MyURL" method="post">
<input type="hidden" name="host" value="\${EscHTML(\$host)}">
<input type="hidden" name="num" value="\$num">
<input type="hidden" name="type" value="1">
\$hiddenStr
<input type="hidden" value="\$In{action}" name="action">
<input type="checkbox" value="1" name="relative" checked> Stworzy膰 archiwum powi膮zane
z\${EscHTML(\$pathHdr eq "" ? "/" : \$pathHdr)}
(inaczej bedzie zawierac pe艂ne scie偶ki do plik贸w).
<br>
<input type="submit" value="Sci膮gnij plik Tar" name="ignore">
</form>
EOF


# ------------------------------
$Lang{Restore_Confirm_on__host} = "BackupPC: Potwied藕 przywr贸cenie na \$host";

$Lang{Are_you_sure} = <<EOF;
\${h1("Czy jeste艣 pewien ?")}
<p>
Zaczynasz przywracanie bezpo艣rednio na maszyn臋 \$In{hostDest}.
Nast臋puj膮ce pliki zostan膮 przywr贸cene na udzia艂 \$In{shareDest}, z
kopii numer \$num:
<p>
<table class="tableStnd" border>
<tr class="tableheader"><td>Orginalny plik/katalog</td><td>B臋dzie przywr贸cony na</td></tr>
\$fileListStr
</table>

<form name="RestoreForm" action="\$MyURL" method="post">
<input type="hidden" name="host" value="\${EscHTML(\$host)}">
<input type="hidden" name="hostDest" value="\${EscHTML(\$In{hostDest})}">
<input type="hidden" name="shareDest" value="\${EscHTML(\$In{shareDest})}">
<input type="hidden" name="pathHdr" value="\${EscHTML(\$In{pathHdr})}">
<input type="hidden" name="num" value="\$num">
<input type="hidden" name="type" value="4">
<input type="hidden" name="action" value="">
\$hiddenStr
Czy napewno chcesz tego ?
<input type="button" value="\$Lang->{Restore}"
 onClick="document.RestoreForm.action.value='Restore';
          document.RestoreForm.submit();">
<input type="submit" value="No" name="ignore">
</form>
EOF


# --------------------------
$Lang{Restore_Requested_on__hostDest} = "BackupPC: Rz膮danie przywr贸cenie na \$hostDest";
$Lang{Reply_from_server_was___reply} = <<EOF;
\${h1(\$str)}
<p>
Odpowied藕 serwera : \$reply
<p>
Wr贸膰 <a href="\$MyURL?host=\$hostDest">stron臋 domow膮 \$hostDest</a>.
EOF

$Lang{BackupPC_Archive_Reply_from_server} = <<EOF;
\${h1(\$str)}
<p>
Odpowied藕 serwera : \$reply
EOF


# -------------------------
$Lang{Host__host_Backup_Summary} = "BackupPC: Podsumowanie kopii bezpiecze艅stwa hosta \$host";

$Lang{Host__host_Backup_Summary2} = <<EOF;
\${h1("Podsumowanie kopii bezpiecze艅stwa hosta \$host")}
<p>
\$warnStr
<ul>
\$statusStr
</ul>
</p>
\${h2("Dzia艂ania u偶ytwkonika")}
<p>
<form name="StartStopForm" action="\$MyURL" method="get">
<input type="hidden" name="host"   value="\$host">
<input type="hidden" name="action" value="">
\$startIncrStr
<input type="button" value="\$Lang->{Start_Full_Backup}"
 onClick="document.StartStopForm.action.value='Start_Full_Backup';
          document.StartStopForm.submit();">
<input type="button" value="\$Lang->{Stop_Dequeue_Backup}"
 onClick="document.StartStopForm.action.value='Stop_Dequeue_Backup';
          document.StartStopForm.submit();">
</form>
</p>
\${h2("Podsumowanie Kopii Bezpiecze艅stwa")}
<p>
Kliknij na numer kopii aby przegl膮da膰 i przywraca膰 wybrane pliki/katalogi.
</p>
<table class="tableStnd" border cellspacing="1" cellpadding="3">
<tr class="tableheader"><td align="center"> Backup# </td>
    <td align="center"> Typ </td>
    <td align="center"> Wype艂niony </td>
    <td align="center"> Poziom </td>
    <td align="center"> Pocz膮tek </td>
    <td align="center"> Czas trwania w min. </td>
    <td align="center"> Wiek/dni </td>
    <td align="center"> 艢cie偶ka serwera kopii </td>
</tr>
\$str
</table>
<p>

\$restoreStr
</p>
<br><br>
\${h2("Podsumowanie b艂臋d贸w Xfer")}
<br><br>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td align="center"> Backup# </td>
    <td align="center"> Typ </td>
    <td align="center"> Widok </td>
    <td align="center"> #Xfer  b艂臋d贸</td>
    <td align="center"> #bad plik贸w </td>
    <td align="center"> #bad udzia艂贸w </td>
    <td align="center"> #tar b艂臋d贸w </td>
</tr>
\$errStr
</table>
<br><br>

\${h2("Ilo艣膰/wielko艣膰 u偶ytych ponownie plik贸w")}
<p>
Istniej膮ce pliki to te b臋d膮ce aktualnie w puli; nowe pliki to te dodane
do puli.
Puste pliki i b艂臋dy SMB nie s膮 liczone.
</p>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td colspan="2" bgcolor="#ffffff"></td>
    <td align="center" colspan="3"> 艁膮cznie </td>
    <td align="center" colspan="2"> Istniej膮cych plik贸w </td>
    <td align="center" colspan="2"> Nowych plik贸w </td>
</tr>
<tr class="tableheader">
    <td align="center"> Kopia nr </td>
    <td align="center"> Typ </td>
    <td align="center"> Plik贸w </td>
    <td align="center"> Rozmiar/MB </td>
    <td align="center"> MB/sek </td>
    <td align="center"> Plik贸w </td>
    <td align="center"> Rozmiar/MB </td>
    <td align="center"> Plik贸w </td>
    <td align="center"> Rozmiar/MB </td>
</tr>
\$sizeStr
</table>
<br><br>

\${h2("Podsumowanie Kompresji")}
<p>
Wydajno艣膰 kompresji dla plik贸w b臋d膮cych w puli oraz tych 艣wie偶o skompresowanych.
</p>
<table class="tableStnd" border cellspacing="1" cellpadding="3" width="80%">
<tr class="tableheader"><td colspan="3" bgcolor="#ffffff"></td>
    <td align="center" colspan="3"> Istniej膮ce Pliki </td>
    <td align="center" colspan="3"> Nowe Pliki </td>
</tr>
<tr class="tableheader"><td align="center"> Kopia nr </td>
    <td align="center"> Typ </td>
    <td align="center"> Poziom Kompresji </td>
    <td align="center"> Rozmiar/MB </td>
    <td align="center"> Kompresja/MB </td>
    <td align="center"> Kompresja </td>
    <td align="center"> Rozmiar/MB </td>
    <td align="center"> Kompresja/MB </td>
    <td align="center"> Kompresja </td>
</tr>
\$compStr