function wiz_set_LANGPACK()
{
$lcode = $_GET["language"];
//TRACE_error("lcode=".$lcode);
if ($lcode == "auto" || $lcode == "") {
$count = cut_count($_SERVER["HTTP_ACCEPT_LANGUAGE"], ',');
$i = 0;
while ($i < $count) {
$tag = cut($_SERVER["HTTP_ACCEPT_LANGUAGE"], $i, ',');
$pri = cut($tag, 0, '-');
$sub = cut($tag, 1, '-');
$lcode = convert_lcode($pri, $sub);
//The accept language for Japan from IE is ja-JP and the language code for our language pack is jp.
if ($lcode == "ja") {
$lcode = "jp";
}
if (wiz_load_slp($lcode) > 0) {
return $lcode;
}
$i++;
}
} else {
if (wiz_load_slp($lcode) > 0) {
return $lcode;
}
}
sealpac("/etc/sealpac/wizard/wiz_en.slp");
// Use system default language, en.
return "en";
}
function LANGPACK_setsealpac()
{
$lcode = query("/device/features/language");
if ($lcode == "auto" || $lcode == "") {
$count = cut_count($_SERVER["HTTP_ACCEPT_LANGUAGE"], ',');
$i = 0;
while ($i < $count) {
$tag = cut($_SERVER["HTTP_ACCEPT_LANGUAGE"], $i, ',');
$pri = cut($tag, 0, '-');
$sub = cut($tag, 1, '-');
if (load_slp(convert_lcode($pri, $sub)) > 0) {
return;
}
$i++;
}
} else {
if (load_slp($lcode) > 0) {
return;
}
}
sealpac("/etc/sealpac/en.slp");
// Use system default language, en.
}
<?php include "/htdocs/phplib/slp.php"; $langcode = sealpac($FILE); SLP_setlangcode($langcode); echo $langcode;
} else {
$langcode = sealpac($slp_tmp);
if ($langcode != "") {
if (fcopy($slp_tmp, $slp) != "1") {
$langcode = sealpac($slp);
$title = i18n("Language Pack Upload Fail");
$message = "'INTERNAL ERROR: fcopy() return error!'";
} else {
$title = i18n("Update Language Pack");
$message = "'" . i18n("You have installed the language pack (\$1) successfully.", $langcode) . "', " . "'<a href=\"" . $referer . "\">" . i18n("Click here to return to the previous page.") . "</a>'";
fwrite(w, "/var/sealpac/langcode", $langcode);
set("/runtime/device/langcode", $langcode);
event("SEALPAC.SAVE");
}
} else {
$langcode = sealpac($slp);
$title = i18n("Language Pack Upload Fail");
$message = "'" . I18N("j", "The language pack image is invalid.") . "', " . "'<a href=\"" . $referer . "\">" . i18n("Click here to return to the previous page.") . "</a>'";
}
unlink($slp_tmp);
}
}
} else {
if ($_POST["ACTION"] == "langclear") {
$title = i18n("Clear Language Pack");
$message = "'" . i18n("Clearing the language pack ...") . "', " . "'<a href=\"" . $referer . "\">" . i18n("Click here to return to the previous page.") . "</a>'";
set("/runtime/device/langcode", "en");
event("SEALPAC.CLEAR");
} else {
TRACE_debug("Unknown action - ACTION=" . $_POST["ACTION"]);
$title = i18n("Unknown ACTION!");
