"browse" => \&Action_Browse,
$Lang->{Restore} => \&Action_Restore,
"RestoreFile" => \&Action_RestoreFile,
- $Lang->{hostInfo} => \&Action_HostInfo,
+ "hostInfo" => \&Action_HostInfo,
"generalInfo" => \&Action_GeneralInfo,
"restoreInfo" => \&Action_RestoreInfo,
);
#
# Set default actions, then call sub handler
#
-$In{action} ||= $Lang->{hostInfo} if ( defined($In{host}) );
+$In{action} ||= "hostInfo" if ( defined($In{host}) );
$In{action} = "generalInfo" if ( !defined($ActionDispatch{$In{action}}) );
$ActionDispatch{$In{action}}();
exit(0);
<tr><td>$Lang->{Host_or_User_name}</td>
<tr><td><form action="$MyURL" method="get"><small>
<input type="text" name="host" size="10" maxlength="64">
- <input type="hidden" name="action" value="$Lang->{hostInfo}"><input type="submit" value="$Lang->{Go}" name="ignore">
+ <input type="hidden" name="action" value="hostInfo"><input type="submit" value="$Lang->{Go}" name="ignore">
</small></form></td></tr>
</table>
EOF
$Lang{Only_privileged_users_can_browse_backup_files} = "Only privileged users can browse backup files"
. " for host \${EscapeHTML(\$In{host})}.";
$Lang{Empty_host_name} = "Empty host name.";
-$Lang{Can_t_browse_bad_directory_name} = "Can\'t browse bad directory name"
- . " \${EscapeHTML(\"\$TopDir/pc/\$host/\$num\")}";
$Lang{Directory___EscapeHTML} = "Directory \${EscapeHTML(\"\$TopDir/pc/\$host/\$num\")}"
. " is empty";
$Lang{Can_t_browse_bad_directory_name2} = "Can\'t browse bad directory name"
$Lang{Only_privileged_users_can_restore_backup_files2} = "Only privileged users can restore backup files"
. " for host \${EscapeHTML(\$host)}.";
$Lang{Empty_host_name} = "Empty host name";
-$Lang{Can_t_restore_bad_file} = "Can\'t restore bad file \${EscapeHTML(\$fullPath)}";
$Lang{Unknown_host_or_user} = "Unknown host or user \${EscapeHTML(\$host)}";
$Lang{Only_privileged_users_can_view_information_about} = "Only privileged users can view information about"
. " host \${EscapeHTML(\$host)}." ;
. " configuration error. Please report this to your Sys Admin.";
$Lang{Can_t_find_IP_address_for} = "Can\'t find IP address for \${EscapeHTML(\$host)}";
-
$Lang{host_is_a_DHCP_host} = <<EOF;
\$host is a DHCP host, and I don\'t know its IP address. I checked the
netbios name of \$ENV{REMOTE_ADDR}\$tryIP, and found that that machine
$Lang{Only_privileged_users_can_view_email_summaries} = "Seuls les utilisateurs privilégiés peuvent voir les compte-rendu des courriels.";
$Lang{Only_privileged_users_can_browse_backup_files} = "Seuls les utilisateurs privilégiés peuvent parcourir les fichiers de sauvegarde pour l'hôte \${EscapeHTML(\$In{host})}.";
$Lang{Empty_host_name} = "Nom d\'hôte vide.";
-$Lang{Can_t_browse_bad_directory_name} = "Ne peut pas parcourir "
- . " \${EscapeHTML(\"\$TopDir/pc/\$host/\$num\")}:"
- . " mauvais nom de répertoire";
$Lang{Directory___EscapeHTML} = "Le répertoire \${EscapeHTML(\"\$TopDir/pc/\$host/\$num\")}"
. " est vide";
$Lang{Can_t_browse_bad_directory_name2} = "Ne peut pas parcourir "
. " des fichiers de sauvegarde"
. " pour l\'hôte \${EscapeHTML(\$host)}.";
$Lang{Empty_host_name} = "Nom d\'hôte vide";
-$Lang{Can_t_restore_bad_file} = "Ne peut pas restaurer le fichier corrompu \${EscapeHTML(\$fullPath)}";
$Lang{Unknown_host_or_user} = "\${EscapeHTML(\$host)}, hôte ou utilisateur inconnu.";
$Lang{Only_privileged_users_can_view_information_about} = "Seuls les utilisateurs privilégiés peuvent accéder aux "
. " informations sur l\'hôte \${EscapeHTML(\$host)}." ;
. " de configuration. Veuillez faire suivre ce message à votre administrateur système.";
$Lang{Can_t_find_IP_address_for} = "Ne peut pas trouver d\'adresse IP pour \${EscapeHTML(\$host)}";
-
$Lang{host_is_a_DHCP_host} = <<EOF;
L\'hôte est un serveur DHCP, et je ne connais pas son adresse IP. J\'ai
vérifié le nom netbios de \$ENV{REMOTE_ADDR}\$tryIP, et j\'ai trouvé que