forked from hummypkg/webif
51 lines
1.4 KiB
Plaintext
51 lines
1.4 KiB
Plaintext
|
|
if {[cgi_get act] eq "xtelnet"} {
|
|
set val [cgi_get val off]
|
|
if {$val in {0 off}} {
|
|
file delete /mod/boot/xtelnet
|
|
puts "Telnet server expert mode will be disabled after next reboot."
|
|
} else {
|
|
exec /mod/bin/busybox/touch /mod/boot/xtelnet
|
|
puts "Telnet server expert mode will be enabled after next reboot."
|
|
}
|
|
exit
|
|
}
|
|
|
|
if {[cgi_get act] eq "cryptokey"} {
|
|
set val [cgi_get cryptokey ""]
|
|
if {$val eq ""} {
|
|
set val [system encryptionkey]
|
|
puts "Using native encryption key.<br>"
|
|
} elseif {[string length $val] != 32} {
|
|
puts "Encryption key is too short."
|
|
exit
|
|
}
|
|
if {[system customencryptionkey $val] ne ""} {
|
|
system nugget cryptokey -init
|
|
puts "Installed new encryption key."
|
|
} else {
|
|
puts "Failed to install encryption key $val"
|
|
}
|
|
exit
|
|
}
|
|
|
|
set pkgdev [$settings pkgdev]
|
|
set rtschedule [$settings rtschedule]
|
|
set noautoremove [$settings noautoremove]
|
|
set logsize [$settings logsize]
|
|
set logkeep [$settings logkeep]
|
|
set logage [$settings logage]
|
|
|
|
set cryptokey [system encryptionkey]
|
|
if {[set customkey [system customencryptionkey]] ne ""} {
|
|
set cryptokey $customkey
|
|
}
|
|
|
|
handle_int_update pkgdev $pkgdev "Development Package Display"
|
|
handle_int_update rtschedule $rtschedule "Real-time scheduling"
|
|
handle_int_update noautoremove $noautoremove "Package auto-remove"
|
|
handle_int_update logsize $logsize "Log rotation size"
|
|
handle_int_update logkeep $logkeep "Logs to keep"
|
|
handle_int_update logage $logage "Rotated log max age"
|
|
|