Gecko [ www.thearyasamaj.org ]

Name	Size	Permission
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
backup_config.pl	923 B	-rwxr-xr-x
config	63 B	-rw-r--r--
config.info	109 B	-rw-r--r--
config.info.ca	131 B	-rw-r--r--
config.info.cs	124 B	-rw-r--r--
config.info.de	119 B	-rw-r--r--
config.info.es	131 B	-rw-r--r--
config.info.hu	127 B	-rw-r--r--
config.info.ms	111 B	-rw-r--r--
config.info.nl	113 B	-rw-r--r--
config.info.no	108 B	-rw-r--r--
config.info.pl	133 B	-rw-r--r--
config.info.ru	169 B	-rw-r--r--
config.info.uk	172 B	-rw-r--r--
delete.cgi	1.32 KB	-rwxr-xr-x
edit_options.cgi	4.86 KB	-rwxr-xr-x
edit_vgetty.cgi	2.78 KB	-rwxr-xr-x
email.pl	1018 B	-rwxr-xr-x
index.cgi	1.41 KB	-rwxr-xr-x
install_check.pl	387 B	-rwxr-xr-x
list_messages.cgi	2.49 KB	-rwxr-xr-x
list_received.cgi	1.87 KB	-rwxr-xr-x
list_vgetty.cgi	1.18 KB	-rwxr-xr-x
listen.cgi	511 B	-rwxr-xr-x
log_parser.pl	749 B	-rwxr-xr-x
module.info	172 B	-rw-r--r--
module.info.af	0 B	-rw-r--r--
module.info.af.auto	113 B	-rw-r--r--
module.info.ar	0 B	-rw-r--r--
module.info.ar.auto	187 B	-rw-r--r--
module.info.be	0 B	-rw-r--r--
module.info.be.auto	192 B	-rw-r--r--
module.info.bg	0 B	-rw-r--r--
module.info.bg.auto	199 B	-rw-r--r--
module.info.ca	116 B	-rw-r--r--
module.info.ca.auto	15 B	-rw-r--r--
module.info.cs	25 B	-rw-r--r--
module.info.cs.auto	82 B	-rw-r--r--
module.info.da	0 B	-rw-r--r--
module.info.da.auto	112 B	-rw-r--r--
module.info.de	91 B	-rw-r--r--
module.info.de.auto	15 B	-rw-r--r--
module.info.el	0 B	-rw-r--r--
module.info.el.auto	225 B	-rw-r--r--
module.info.es	41 B	-rw-r--r--
module.info.es.auto	95 B	-rw-r--r--
module.info.eu	0 B	-rw-r--r--
module.info.eu.auto	122 B	-rw-r--r--
module.info.fa	0 B	-rw-r--r--
module.info.fa.auto	182 B	-rw-r--r--
module.info.fi	0 B	-rw-r--r--
module.info.fi.auto	117 B	-rw-r--r--
module.info.fr	0 B	-rw-r--r--
module.info.fr.auto	127 B	-rw-r--r--
module.info.he	0 B	-rw-r--r--
module.info.he.auto	133 B	-rw-r--r--
module.info.hr	0 B	-rw-r--r--
module.info.hr.auto	116 B	-rw-r--r--
module.info.hu	28 B	-rw-r--r--
module.info.hu.auto	100 B	-rw-r--r--
module.info.it	0 B	-rw-r--r--
module.info.it.auto	118 B	-rw-r--r--
module.info.ja	0 B	-rw-r--r--
module.info.ja.auto	145 B	-rw-r--r--
module.info.ko	0 B	-rw-r--r--
module.info.ko.auto	119 B	-rw-r--r--
module.info.lt	0 B	-rw-r--r--
module.info.lt.auto	122 B	-rw-r--r--
module.info.lv	0 B	-rw-r--r--
module.info.lv.auto	125 B	-rw-r--r--
module.info.ms	120 B	-rw-r--r--
module.info.ms.auto	15 B	-rw-r--r--
module.info.mt	0 B	-rw-r--r--
module.info.mt.auto	115 B	-rw-r--r--
module.info.nl	25 B	-rw-r--r--
module.info.nl.auto	78 B	-rw-r--r--
module.info.no	25 B	-rw-r--r--
module.info.no.auto	86 B	-rw-r--r--
module.info.pl	32 B	-rw-r--r--
module.info.pl.auto	95 B	-rw-r--r--
module.info.pt	0 B	-rw-r--r--
module.info.pt.auto	131 B	-rw-r--r--
module.info.pt_BR	0 B	-rw-r--r--
module.info.pt_BR.auto	140 B	-rw-r--r--
module.info.ro	0 B	-rw-r--r--
module.info.ro.auto	124 B	-rw-r--r--
module.info.ru	51 B	-rw-r--r--
module.info.ru.auto	142 B	-rw-r--r--
module.info.sk	0 B	-rw-r--r--
module.info.sk.auto	108 B	-rw-r--r--
module.info.sl	0 B	-rw-r--r--
module.info.sl.auto	100 B	-rw-r--r--
module.info.sv	0 B	-rw-r--r--
module.info.sv.auto	112 B	-rw-r--r--
module.info.th	0 B	-rw-r--r--
module.info.th.auto	260 B	-rw-r--r--
module.info.tr	0 B	-rw-r--r--
module.info.tr.auto	116 B	-rw-r--r--
module.info.uk	0 B	-rw-r--r--
module.info.uk.auto	185 B	-rw-r--r--
module.info.ur	0 B	-rw-r--r--
module.info.ur.auto	211 B	-rw-r--r--
module.info.vi	0 B	-rw-r--r--
module.info.vi.auto	140 B	-rw-r--r--
module.info.zh	0 B	-rw-r--r--
module.info.zh.auto	97 B	-rw-r--r--
module.info.zh_TW	0 B	-rw-r--r--
module.info.zh_TW.auto	106 B	-rw-r--r--
save_options.cgi	3.9 KB	-rwxr-xr-x
save_vgetty.cgi	3.09 KB	-rwxr-xr-x
upload.cgi	1.79 KB	-rwxr-xr-x
vgetty-lib.pl	4.31 KB	-rwxr-xr-x
vgetty_apply.cgi	228 B	-rwxr-xr-x

Code Editor : edit_options.cgi

#!/usr/bin/perl
# edit_options.cgi
# Display options for the entire voicemail server

require './vgetty-lib.pl';
&ui_print_header(undef, $text{'options_title'}, "");
@conf = &get_config();

print "<form action=save_options.cgi method=post>\n";
print "<table border width=100%>\n";
print "<tr $tb> <td><b>$text{'options_header'}</b></td> </tr>\n";
print "<tr $cb> <td><table width=100%>\n";

$rings = &find_value("rings", \@conf);
if ($rings =~ /^\//) {
	open(TF, "<$rings");
	chop($rc = <TF>);
	close(TF);
	}
else { $rc = $rings; }
print "<tr> <td><b>$text{'options_rings'}</b></td>\n";
print "<td nowrap><input name=rings size=5 value='$rc'></td>\n";
printf "<td colspan=2><input type=checkbox name=rings_port value=1 %s> %s\n",
	$rings =~ /^\// ? "checked" : "", $text{'options_perport'};
print "</td> </tr>\n";

$ans = &find_value("answer_mode", \@conf);
if ($ans =~ /^\//) {
	open(TF, "<$ans");
	chop($rc = <TF>);
	close(TF);
	}
else { $rc = $ans; }
print "<tr> <td><b>$text{'options_ans'}</b></td>\n";
print "<td nowrap>",&answer_mode_input($rc, "ans"),"</td>\n";
printf "<td colspan=2><input type=checkbox name=ans_port value=1 %s> %s\n",
	$ans =~ /^\// ? "checked" : "", $text{'options_perport'};
print "</td> </tr>\n";

print "<tr> <td><b>$text{'options_maxlen'}</b></td>\n";
printf "<td><input name=maxlen size=8 value='%s'> %s</td>\n",
	&find_value("rec_max_len", \@conf), $text{'options_secs'};

print "<td><b>$text{'options_minlen'}</b></td>\n";
printf "<td><input name=minlen size=8 value='%s'> %s</td> </tr>\n",
	&find_value("rec_min_len", \@conf), $text{'options_secs'};

$silence = &find_value("rec_remove_silence", \@conf);
print "<tr> <td><b>$text{'options_silence'}</b></td>\n";
printf "<td nowrap><input type=radio name=silence value=1 %s> %s\n",
	$silence =~ /true/i ? "checked" : "", $text{'yes'};
printf "<input type=radio name=silence value=0 %s> %s</td>\n",
	$silence =~ /true/i ? "" : "checked", $text{'no'};

print "<td><b>$text{'options_thresh'}</b></td>\n";
printf "<td><input name=thresh size=3 value='%s'> %%</td> </tr>\n",
	&find_value("rec_silence_threshold", \@conf);

$rgain = &find_value("receive_gain", \@conf);
print "<tr> <td><b>$text{'options_rgain'}</b></td>\n";
printf "<td nowrap><input type=radio name=rgain_def value=1 %s> %s\n",
	$rgain == -1 ? "checked" : "", $text{'default'};
printf "<input type=radio name=rgain_def value=0 %s>\n",
	$rgain == -1 ? "" : "checked";
printf "<input name=rgain size=4 value='%s'> %%</td>\n",
	$rgain == -1 ? "" : $rgain;

$tgain = &find_value("transmit_gain", \@conf);
print "<td><b>$text{'options_tgain'}</b></td>\n";
printf "<td nowrap><input type=radio name=tgain_def value=1 %s> %s\n",
	$tgain == -1 ? "checked" : "", $text{'default'};
printf "<input type=radio name=tgain_def value=0 %s>\n",
	$tgain == -1 ? "" : "checked";
printf "<input name=tgain size=4 value='%s'> %%</td> </tr>\n",
	$tgain == -1 ? "" : $tgain;

$keep = &find_value("rec_always_keep", \@conf);
print "<tr> <td><b>$text{'options_keep'}</b></td>\n";
printf "<td nowrap><input type=radio name=keep value=1 %s> %s\n",
	$keep =~ /true/i ? "checked" : "", $text{'yes'};
printf "<input type=radio name=keep value=0 %s> %s</td>\n",
	$keep =~ /true/i ? "" : "checked", $text{'no'};

$light = &find_value("do_message_light", \@conf);
print "<td><b>$text{'options_light'}</b></td>\n";
printf "<td nowrap><input type=radio name=light value=1 %s> %s\n",
	$light =~ /true/i ? "checked" : "", $text{'yes'};
printf "<input type=radio name=light value=0 %s> %s</td> </tr>\n",
	$light =~ /true/i ? "" : "checked", $text{'no'};

print "<tr> <td><b>$text{'options_owner'}</b></td>\n";
printf "<td><input name=owner size=8 value='%s'> %s</td>\n",
	&find_value("phone_owner", \@conf), &user_chooser_button("owner");

print "<td><b>$text{'options_group'}</b></td>\n";
printf "<td><input name=group size=8 value='%s'> %s</td> </tr>\n",
	&find_value("phone_group", \@conf), &user_chooser_button("group");

print "<tr> <td><b>$text{'options_mode'}</b></td>\n";
printf "<td><input name=mode size=4 value='%s'></td>\n",
	&find_value("phone_mode", \@conf);

$prog = &find_value("message_program", \@conf);
$mode = !$prog ? 0 : $prog eq "$module_config_directory/email.pl" ? 1 : 2;
print "<tr> <td valign=top><b>$text{'options_prog'}</b></td> <td colspan=3>\n";
printf "<input type=radio name=prog_mode value=0 %s> %s<br>\n",
	$mode == 0 ? "checked" : "", $text{'options_prog0'};
printf "<input type=radio name=prog_mode value=1 %s> %s\n",
	$mode == 1 ? "checked" : "", $text{'options_prog1'};
printf "<input name=email size=30 value='%s'><br>\n",
	$mode == 1 ? $config{'email_to'} : "";
printf "<input type=radio name=prog_mode value=2 %s> %s\n",
	$mode == 2 ? "checked" : "", $text{'options_prog2'};
printf "<input name=prog size=30 value='%s'></td> </tr>\n",
	$mode == 2 ? $prog : "";

print "</tr>\n";

print "</table></td></tr></table>\n";
print "<input type=submit value='$text{'save'}'></form>\n";

&ui_print_footer("", $text{'index_return'});

${this.title}

Code Editor : edit_options.cgi