48 lines
1.4 KiB
Plaintext
Executable File
48 lines
1.4 KiB
Plaintext
Executable File
#!/mod/bin/jimsh
|
|
|
|
package require cgi
|
|
source /mod/webif/lib/setup
|
|
require settings.class
|
|
|
|
httpheader
|
|
|
|
set auto [cgi_get detectads_auto no ]
|
|
set crop [cgi_get detectads_crop no ]
|
|
set bmend [cgi_get detectads_bmend no ]
|
|
set delorig [cgi_get detectads_delorig no ]
|
|
set cpulimit [cgi_get detectads_cpulimit 1]
|
|
set tgtpath [cgi_get detectads_tgtpath ""]
|
|
set otheropts [cgi_get detectads_otheropts ""]
|
|
set tgtchoice [cgi_get detectads_tgtchoice 1]
|
|
set queue_time [cgi_get detectads_queue_time 0]
|
|
set cpulimit [cgi_get detectads_cpulimit 0]
|
|
|
|
set val 1
|
|
if {$auto ne "detwrec"} { set val 0 }
|
|
[settings new] _nval_setting "detectads_detwrec" $val
|
|
|
|
set val 1
|
|
if {$auto ne "auto"} { set val 0 }
|
|
[settings new] _nval_setting "detectads_auto" $val
|
|
|
|
set val 1
|
|
if {$crop ne "yes"} { set val 0 }
|
|
[settings new] _nval_setting "detectads_crop" $val
|
|
|
|
set val 1
|
|
if {$bmend ne "yes"} { set val 0 }
|
|
[settings new] _nval_setting "detectads_bmend" $val
|
|
|
|
set val 1
|
|
if {$delorig ne "yes"} { set val 0 }
|
|
[settings new] _nval_setting "detectads_delorig" $val
|
|
|
|
[settings new] _nval_setting "detectads_cpulimit" $cpulimit
|
|
[settings new] _nval_setting "detectads_tgtchoice" $tgtchoice
|
|
[settings new] _tval_setting "detectads_tgtpath" $tgtpath
|
|
[settings new] _tval_setting "detectads_otheropts" $otheropts
|
|
[settings new] _tval_setting "detectads_queue_time" $queue_time
|
|
[settings new] _nval_setting "detectads_cpulimit" $cpulimit
|
|
|
|
puts "Settings saved."
|