本文整理汇总了PHP中clladp::hash_get_all_domains方法的典型用法代码示例。如果您正苦于以下问题：PHP clladp::hash_get_all_domains方法的具体用法？PHP clladp::hash_get_all_domains怎么用？PHP clladp::hash_get_all_domains使用的例子？那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类clladp的用法示例。
在下文中一共展示了clladp::hash_get_all_domains方法的15个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的PHP代码示例。
示例1: perform
function perform()
{
$domain = $_POST["domain"];
$ou = $_POST["ou"];
$tpl = new templates();
$ldap = new clladp();
$hashdoms = $ldap->hash_get_all_domains();
writelogs("hashdoms[{$domain}]={$hashdoms[$domain]}", __FUNCTION__, __FILE__);
if ($hashdoms[$domain] != null) {
echo $tpl->_ENGINE_parse_body('{error_domain_exists} ->`' . $domain . "`");
return;
}
if (!$ldap->AddDomainEntity($ou, $domain)) {
echo $ldap->ldap_last_error;
return;
}
}示例2: dhcp_form
function dhcp_form()
{
$ldap = new clladp();
$domains = $ldap->hash_get_all_domains();
$dhcp = new dhcpd_sub($_GET["nic"]);
$page = CurrentPageName();
$users = new usersMenus();
$t = time();
if (count($domains) == 0) {
$dom = Field_text("ddns_domainname-{$t}", $dhcp->ddns_domainname, "font-size:22px;");
} else {
$domains[null] = "{select}";
$dom = Field_array_Hash($domains, "ddns_domainname-{$t}", $dhcp->ddns_domainname, null, null, null, ";font-size:22px;padding:3px");
}
$EnableDHCPUseHostnameOnFixed = Field_checkbox_design("EnableDHCPUseHostnameOnFixed-{$t}", 1, $dhcp->EnableDHCPUseHostnameOnFixed);
$authoritative = Field_checkbox_design("authoritative-{$t}", 1, $dhcp->authoritative);
$ping_check = Field_checkbox_design("ping_check-{$t}", 1, $dhcp->ping_check);
$get_lease_hostnames = Field_checkbox_design("get_lease_hostnames-{$t}", 1, $dhcp->get_lease_hostnames);
$nicz = new system_nic($_GET["nic"]);
$ipaddrEX = explode(".", $nicz->IPADDR);
unset($ipaddrEX[3]);
if ($dhcp->subnet == null) {
$dhcp->subnet = @implode(".", $ipaddrEX) . ".0";
}
if ($dhcp->netmask == null) {
$dhcp->netmask = $nicz->NETMASK;
}
if ($dhcp->gateway == null) {
$dhcp->gateway = $nicz->GATEWAY;
}
if ($dhcp->range1 == null) {
$dhcp->range1 = @implode(".", $ipaddrEX) . ".50";
}
if ($dhcp->range2 == null) {
$dhcp->range2 = @implode(".", $ipaddrEX) . ".254";
}
if ($dhcp->broadcast == null) {
$dhcp->broadcast = @implode(".", $ipaddrEX) . ".255";
}
$html = "<div id='dhscpsettings' class=form>\n\t<div class='BodyContent'>\n\t<table style='width:98%'>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{enabled}:</td>\n\t\t<td>" . Field_checkbox_design("EnableDHCPServer-{$t}", 1, $dhcp->EnableDHCPServer) . "</td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{EnableDHCPUseHostnameOnFixed}:</td>\n\t\t<td>{$EnableDHCPUseHostnameOnFixed}</td>\n\t\t<td> </td>\n\t\t<td>" . help_icon('{EnableDHCPUseHostnameOnFixed_explain}') . "</td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{authoritative}:</td>\n\t\t<td>{$authoritative}</td>\n\t\t<td> </td>\n\t\t<td>" . help_icon('{authoritativeDHCP_explain}') . "</td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{DHCPPing_check}:</td>\n\t\t<td>{$ping_check}</td>\n\t\t<td> </td>\n\t\t<td>" . help_icon('{ping_check_explain}') . "</td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{get_lease_hostnames}:</td>\n\t\t<td>{$get_lease_hostnames}</td>\n\t\t<td> </td>\n\t\t<td>" . help_icon('{get_lease_hostnames_text}') . "</td>\n\t</tr>\n<tr>\n\t<td colspan=4>\n\t\t\t\t<div style='margin:10px;border:1px solid #CCCCCC;padding:10px'>\n\t\t\t\t<table style='width:100%'>\n\t\t\t\t<tr>\n\t\t\t\t\t<td class=legend style='font-size:22px;font-weight:bold;width:607px'>{ipfrom}:</td>\n\t\t\t\t\t<td>" . field_ipv4("range1-{$t}", $dhcp->range1, 'font-size:22px;padding:3px;font-weight:bold') . " </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t</tr>\n\t\t\t\t<tr>\n\t\t\t\t\t<td class=legend style='font-size:22px;font-weight:bold'>{ipto}:</td>\n\t\t\t\t\t<td>" . field_ipv4("range2-{$t}", $dhcp->range2, 'font-size:22px;padding:3px;font-weight:bold') . " </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t\t<td> </td>\n\t\t\t\t</tr>\n\t\t\t\t</table>\n\t\t\t\t</div>\t\t\t\t\t\n\t\t</td>\n</tr>\t\t\t\t\t\n\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{ddns_domainname}:</td>\n\t\t<td>{$dom}</td>\n\t\t<td> </td>\n\t\t<td width=1% nowrap>" . imgtootltip("plus-16.png", null, "Loadjs('domains.edit.domains.php?js-all-localdomains=yes')") . "</td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{max_lease_time}:</td>\n\t\t<td style='font-size:16px'>" . Field_text("max_lease_time-{$t}", $dhcp->max_lease_time, 'width:90px;font-size:22px;padding:3px') . " {seconds}</td>\n\t\t<td> </td>\n\t\t<td >" . help_icon('{max_lease_time_text}') . "</td>\n\t</tr>\n\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{wpad_label}:</td>\n\t\t<td>" . Field_text("local_pac_server-{$t}", $dhcp->local_pac_server, 'width:300px;font-size:22px;padding:3px', false) . "</td>\n\t\t<td> </td>\n\t\t<td>" . help_icon('{wpad_label_text}') . "</td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{subnet}:</td>\n\t\t<td>" . field_ipv4("subnet-{$t}", $dhcp->subnet, "font-size:22px;padding:3px;font-weight:bold", false) . "</td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{netmask}:</td>\n\t\t<td>" . field_ipv4("netmask-{$t}", $dhcp->netmask, 'font-size:22px;padding:3px;font-weight:bold') . " </td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{gateway}:</td>\n\t\t<td>" . field_ipv4("gateway-{$t}", $dhcp->gateway, 'font-size:22px;padding:3px;font-weight:bold') . " </td>\n\t\t<td> </td>\n\t</tr>\n\t\t\t\t\n\t\t\t\t\n\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{DNSServer} 1:</td>\n\t\t<td>" . field_ipv4("DNS_1-{$t}", $dhcp->DNS_1, 'font-size:22px;padding:3px;font-weight:bold') . " </td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{DNSServer} 2:</td>\n\t\t<td>" . field_ipv4("DNS_2-{$t}", $dhcp->DNS_2, 'font-size:22px;padding:3px;font-weight:bold') . " </td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{wins_server}:</td>\n\t\t<td>" . field_ipv4("WINS-{$t}", $dhcp->WINS, 'font-size:22px;padding:3px') . " </td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{ntp_server} <span style='font-size:10px'>({optional})</span>:</td>\n\t\t<td>" . Field_text("ntp_server-{$t}", $dhcp->ntp_server, 'width:228px;font-size:22px;padding:3px') . " </td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td class=legend style='font-size:22px'>{broadcast}:</td>\n\t\t<td>" . field_ipv4("broadcast-{$t}", $dhcp->broadcast, 'font-size:22px;padding:3px') . " </td>\n\t\t<td> </td>\n\t\t<td> </td>\n\t</tr>\n\t<tr>\n\t\t<td colspan=4 align='right'><hr>" . button("{apply}", "SaveDHCPSettings{$t}()", 40) . "</td>\n\t</tr>\n</table>\n</div>\n</div>\n<br>\n<script>\nvar x_SaveDHCPSettings{$t}= function (obj) {\n\tvar tempvalue=obj.responseText;\n\tif(tempvalue.length>3){alert(tempvalue);}\n\tLoadjs('dhcpd.progress.php');\n\t}\t\t\n\t\t\n\tfunction SaveDHCPSettings{$t}(){\n\t\tvar XHR = new XHRConnection();\n\t\tXHR.appendData('nic','{$_GET["nic"]}');\n\t\tXHR.appendData('range1',document.getElementById('range1-{$t}').value);\n\t\tXHR.appendData('range2',document.getElementById('range2-{$t}').value);\n\t\tXHR.appendData('gateway',document.getElementById('gateway-{$t}').value);\n\t\tXHR.appendData('netmask',document.getElementById('netmask').value);\n\t\tXHR.appendData('DNS_1',document.getElementById('DNS_1-{$t}').value);\n\t\tXHR.appendData('DNS_2',document.getElementById('DNS_2-{$t}').value);\n\t\tXHR.appendData('max_lease_time',document.getElementById('max_lease_time-{$t}').value);\n\t\tXHR.appendData('ntp_server',document.getElementById('ntp_server-{$t}').value);\n\t\tXHR.appendData('subnet',document.getElementById('subnet-{$t}').value);\n\t\tXHR.appendData('broadcast',document.getElementById('broadcast-{$t}').value);\n\t\tXHR.appendData('WINS',document.getElementById('WINS-{$t}').value);\n\t\tXHR.appendData('local_pac_server',document.getElementById('local_pac_server-{$t}').value);\n\t\t\n\t\tif(document.getElementById('EnableDHCPServer-{$t}').checked){\n\t\tXHR.appendData('EnableDHCPServer',1);}else{XHR.appendData('EnableDHCPServer',0);}\n\t\t\n\t\tif(document.getElementById('EnableDHCPUseHostnameOnFixed-{$t}').checked){XHR.appendData('EnableDHCPUseHostnameOnFixed',1);}else{XHR.appendData('EnableDHCPUseHostnameOnFixed',0);}\n\t\tif(document.getElementById('ping_check-{$t}').checked){XHR.appendData('ping_check',1);}else{XHR.appendData('ping_check',0);}\n\t\tif(document.getElementById('authoritative-{$t}').checked){XHR.appendData('authoritative',1);}else{XHR.appendData('authoritative',0);}\n\t\tXHR.appendData('ddns_domainname',document.getElementById('ddns_domainname-{$t}').value);\n\t\tXHR.sendAndLoad('{$page}', 'POST',x_SaveDHCPSettings{$t});\t\n\n\t}\n</script>\n";
$tpl = new templates();
echo $tpl->_ENGINE_parse_body($html);
}示例3: query
function query()
{
$ou = null;
$ldap = new clladp();
$users = new usersMenus();
if (!$users->AsArticaAdministrator) {
$ou = $_SESSION["ou"];
}
if ($ou == null) {
$domains = $ldap->hash_get_all_domains();
} else {
$domains = $ldap->hash_get_domains_ou($ou);
}
$data = array();
$data['page'] = 1;
$data['total'] = $total;
$data['rows'] = array();
$c = 0;
while (list($num, $ligne) = each($domains)) {
if ($num == null) {
continue;
}
if ($_POST["query"] != null) {
$qq = $_POST["query"];
$qq = str_replace(".", "\\.", $qq);
$qq = str_replace("*", ".*?", $qq);
if (!preg_match("#{$qq}#", $num)) {
continue;
}
}
$c++;
$href = "<a href=\"javascript:blur();\" OnClick=\"javascript:{$_GET["callback"]}('{$num}');WinORGHide();\" style='text-decoration:underline'>";
$data['rows'][] = array('id' => $num, 'cell' => array("<img src='img/domain-32.png'>", "<strong style='font-size:16px;style='color:black'>{$href}{$num}</a></strong>"));
}
$data['total'] = $c;
echo json_encode($data);
}示例4: QueryDNSForm
function QueryDNSForm()
{
$sock = new sockets();
$main = new main_cf(0);
$page = CurrentPageName();
$ldap = new clladp();
$tpl = new templates();
$domains = $ldap->hash_get_all_domains();
$myhostname = $sock->GET_INFO("myhostname");
$warn_disable_dns_lookups = $tpl->javascript_parse_text("{warn_disable_dns_lookups}");
$main = new maincf_multi("master", "master");
$domains["\$mydomain"] = "\$mydomain";
//$myorigin=Field_array_Hash($domains,"myorigin",$main->main_array["myorigin"]);
$myorigin = "<strong>\$mydomain</strong><input type='hidden' name='myorigin' value='\$mydomain' id='myorigin'>";
$styleadd = "style='font-size:26px;padding:4px'";
$html = "<div id='QueryDNSFormSaveid'>\n<span style='font-size:32px;'>{DNS_SETTINGS} & {hostname}</span>\n<div style='width:98%' class=form>\n\t<table style='width:100%'>\n\t<tr>\n\t<td align='right' valign='top' nowrap class=legend {$styleadd}>{myhostname} :</strong></td>\n\t<td align='left' width=1% {$styleadd}>" . Field_text('myhostname', $myhostname, 'width:500px;font-size:26px;padding:3px') . "</td>\n\t<td valign='top' width=1% {$styleadd}>" . help_icon('{myhostname_text}') . "</td>\n\t<tr>\n\t<tr>\n\t<td align='right' valign='top' nowrap class=legend {$styleadd}>{myorigin} :</strong></td>\n\t<td align='left' width=1% {$styleadd}> {$myorigin}</td>\n\t<td valign='top' width=1% {$styleadd}>" . help_icon('{myorigin_text}') . "</td>\n\t<tr>\t\n\t<td align='right' valign='top' nowrap class=legend {$styleadd}>{ignore_mx_lookup_error} :</strong></td>\n\t<td align='left' width=1% {$styleadd}>" . Field_checkbox_design('ignore_mx_lookup_error', '1', $main->GET("ignore_mx_lookup_error")) . "</td>\n\t<td valign='top' width=1% {$styleadd}>" . help_icon('{ignore_mx_lookup_error_text}') . "</td>\n\t</tr>\n\t<tr>\n\t\t<tr>\n\t<td align='right' valign='top' nowrap class=legend {$styleadd}>{disable_dns_lookups} :</strong></td>\n\t<td align='left' width=1% {$styleadd}>" . Field_checkbox_design('disable_dns_lookups', '1', $main->GET("disable_dns_lookups")) . "</td>\n\t<td valign='top' width=1% {$styleadd}>" . help_icon('{disable_dns_lookups_text}') . "</td>\n\t</tr>\n\t<tr><td colspan=3 align='right'><hr>" . button("{apply}", "QueryDNSFormSave()", 40) . "</td></tr>\n\t</table>\n\t</div>\n\t\n\t\n\t<script>\n\t\n\tvar x_QueryDNSFormSave= function (obj) {\n\t\tvar results=obj.responseText;\n\t\tif(results.length>3){alert('\"'+results+'\"'+results.length);}\n\t\tRefreshTab('main_config_postfix_net');\n\t\t}\n\t\t\n\t\n\t\tfunction QueryDNSFormSave(){\n\t\t\tvar XHR = new XHRConnection();\n\t\t\tXHR.appendData('myhostname',document.getElementById('myhostname').value);\n\t\t\t\n\t\t\t\n\t\t\tif(document.getElementById('ignore_mx_lookup_error').checked){XHR.appendData('ignore_mx_lookup_error','1');}else{\n\t\t\t\tXHR.appendData('ignore_mx_lookup_error','0');\n\t\t\t}\n\t\t\t\n\t\t\tif(document.getElementById('disable_dns_lookups').checked){\n\t\t\t\tif(!confirm('{$warn_disable_dns_lookups}')){return;}\n\t\t\t\tXHR.appendData('disable_dns_lookups','1');}else{\n\t\t\t\tXHR.appendData('disable_dns_lookups','0');\n\t\t\t}\t\t\t\n\t\t\tAnimateDiv('QueryDNSFormSaveid');\n\t\t\tXHR.sendAndLoad('{$page}', 'GET',x_QueryDNSFormSave);\t\n\t\t\t\n\t\t}\n\t</script>\n\t\n\t";
echo $tpl->_ENGINE_parse_body($html);
}示例5: ParseMimeDefangFilter
function ParseMimeDefangFilter()
{
$q = new mysql();
$sock = new sockets();
if (!$q->TestingConnection()) {
echo "Starting mimedefang: testing connection to MySQL failed, aborting configuration task...\n";
return;
}
$ldap = new clladp();
$tr = array();
$localdomains = $ldap->hash_get_all_domains();
$disclaimers_rules = disclaimers_rules();
$autocompress_rules = autocompress_rules();
$filehosting_rules = filehosting_rules();
if ($autocompress_rules != null) {
$EnableAutocompress = 1;
} else {
$EnableAutocompress = 0;
}
if ($filehosting_rules != null) {
$EnableFileHosting = 1;
} else {
$EnableFileHosting = 0;
}
$Param = unserialize(base64_decode($sock->GET_INFO("MimeDefangServiceOptions")));
if (!is_numeric($Param["DEBUG"])) {
$Param["DEBUG"] = 0;
}
$MySQL_server = $q->mysql_server;
$MySQL_user = $q->mysql_admin;
$MySQL_password = $q->mysql_password;
$MySQL_port = intval($q->mysql_port);
$main = new main_cf();
@file_put_contents("/etc/artica-postfix/settings/Daemons/MimeDefangPostFixNetwork", @implode("\n", $main->array_mynetworks));
if ($MySQL_server == null) {
$MySQL_server = "127.0.0.1";
}
if ($MySQL_server == "localhost") {
$MySQL_server = "127.0.0.1";
}
if ($MySQL_server == "127.0.0.1") {
$MySQL_server = null;
}
if ($MySQL_server == null) {
$DSN = "DBI:mysql:database=artica_backup;mysql_socket=/var/run/mysqld/mysqld.sock";
} else {
$DSN = "DBI:mysql:database=artica_backup;host={$MySQL_server};port={$MySQL_port}";
}
$sock->SET_INFO("MySQLPerlDSN", $DSN);
$sock->SET_INFO("MySQLPerlUsername", $MySQL_user);
$sock->SET_INFO("MySQLPerlPassword", $MySQL_password);
$TMPDIR = "/var/spool/MIMEDefang";
if (!is_dir($TMPDIR)) {
@mkdir($TMPDIR, 0755, true);
}
if (!is_dir("{$TMPDIR}/BACKUP")) {
@mkdir("{$TMPDIR}/BACKUP", 0755, true);
}
@chown($TMPDIR, "postfix");
@chgrp($TMPDIR, "postfix");
@chown("{$TMPDIR}/BACKUP", "postfix");
@chgrp("{$TMPDIR}/BACKUP", "postfix");
$QuarantineDir = "/var/spool/MD-Quarantine";
if (!is_dir($QuarantineDir)) {
@mkdir($QuarantineDir, 0755, true);
}
@chown($QuarantineDir, "postfix");
@chgrp($QuarantineDir, "postfix");
$TMPDIR_CAPTURED = "/var/spool/MIMEDefang_replaced";
if (!is_dir($TMPDIR_CAPTURED)) {
@mkdir($TMPDIR_CAPTURED, 0755, true);
}
@chown($TMPDIR_CAPTURED, "postfix");
@chgrp($TMPDIR_CAPTURED, "postfix");
@copy("/usr/share/artica-postfix/bin/install/mimedefang/mimedefang-filter.pl", "/etc/mail/mimedefang-filter");
while (list($dim, $line) = each($localdomains)) {
$tr[] = "'{$dim}'=>1";
}
if (count($tr) > 0) {
$hashlocaldomains = @implode(",", $tr);
}
$MimeDefangFileHostingSubjectPrepend = $sock->GET_INFO("MimeDefangFileHostingSubjectPrepend");
$MimeDefangFileHostingSubjectPrepend = str_replace('"', '\\"', $MimeDefangFileHostingSubjectPrepend);
$MimeDefangFileHostingLink = $sock->GET_INFO("MimeDefangFileHostingLink");
$MimeDefangFileHostingText = $sock->GET_INFO("MimeDefangFileHostingText");
$MimeDefangFileHostingExternMySQL = $sock->GET_INFO("MimeDefangFileHostingExternMySQL");
$MimeDefangFileHostingMySQLsrv = $sock->GET_INFO("MimeDefangFileHostingMySQLsrv");
$MimeDefangFileHostingMySQLusr = $sock->GET_INFO("MimeDefangFileHostingMySQLusr");
$MimeDefangFileHostingMySQLPass = $sock->GET_INFO("MimeDefangFileHostingMySQLPass");
$MimeDefangFileMaxDaysStore = $sock->GET_INFO("MimeDefangFileMaxDaysStore");
if (!is_numeric($MimeDefangFileMaxDaysStore)) {
$MimeDefangFileMaxDaysStore = 5;
}
$MimeDefangFileHostingText = stripslashes($MimeDefangFileHostingText);
if ($MimeDefangFileHostingText == null) {
$MimeDefangFileHostingText = "The %s file exceed the company's messaging rules.\nIt has been moved to our Web server.\nYou can download it by clicking on the link bellow.";
}
$MimeDefangFileHostingText = str_replace('"', '\\"', $MimeDefangFileHostingText);
$MimeDefangFileHostingText = str_replace("\n", "\\n", $MimeDefangFileHostingText);
$tb = explode("\n", @file_get_contents("/etc/mail/mimedefang-filter"));
//.........这里部分代码省略.........
示例6: SaveWhiteList
function SaveWhiteList()
{
$tpl = new templates();
$to = $_GET["recipient"];
$wbl = $_GET["wbl"];
$RcptDomain = $_GET["RcptDomain"];
$from = $_GET["whitelist"];
if ($to == null) {
$to = "*@{$RcptDomain}";
}
if ($from == null) {
echo $tpl->_ENGINE_parse_body('{from}: {error_miss_datas}');
return false;
}
if (substr($to, 0, 1) == '@') {
$domain = substr($to, 1, strlen($to));
} else {
if (strpos($to, '@') > 0) {
$tbl = explode('@', $to);
$domain = $tbl[1];
} else {
$domain = $to;
$to = "@{$to}";
}
}
$tbl[0] = str_replace("*", "", $tbl[0]);
$ldap = new clladp();
$domains = $ldap->hash_get_all_domains();
if ($domains[$domain] == null) {
echo $tpl->javascript_parse_text('{recipient}: {error_unknown_domain} ' . $domain);
return false;
}
if ($tbl[0] == null) {
$ldap->WhiteListsAddDomain($domain, $from, $wbl);
return true;
} else {
$uid = $ldap->uid_from_email($to);
if ($uid == null) {
echo $tpl->javascript_parse_text('{recipient}: {error_no_user_exists} ' . $to);
return false;
}
$ldap->WhiteListsAddUser($uid, $from, $wbl);
}
}示例7: popup_adddns
function popup_adddns()
{
$ldap = new clladp();
$domains = $ldap->hash_get_all_domains();
$DnsZoneName = Field_array_Hash($domains, "DnsZoneName", $computer->DnsZoneName, null, null, 0, null, $disabled);
$dnstypeTable = array("" => "{select}", "MX" => "{mail_exchanger}", "A" => "{dnstypea}");
$DnsType = Field_array_Hash($dnstypeTable, "DnsType", $computer->DnsType, null, null, 0, null, $disabled);
$html = "\t\t\n<H1>{ADD_DNS_ENTRY}</H1>\t\n<p class=caption>{ADD_DNS_ENTRY_TEXT}</p>\n<div id='SaveDNSEntry'>\n" . RoundedLightWhite("\n<table style='width:100%'>\n<tr>\n\t<td class=legend>{computer_name}:</strong></td>\n\t<td align=left>" . Field_text("computername", null, "width:120px") . "</strong></td>\n</tr>\n<tr>\n\t<td class=legend>{DnsZoneName}:</strong></td>\n\t<td align=left>{$DnsZoneName}</strong></td>\n</tr>\n<tr>\t\n\t<td class=legend>{computer_ip}:</strong></td>\n\t<td align=left>" . Field_text('ComputerIP', $computer->ComputerIP, 'width:120px') . "</strong></td>\n<tr>\n<tr>\t\n\t<td colspan=2 align='right'><hr><input type='button' OnClick=\"javascript:SaveDNSEntry();\" value='{add} »'></td>\n<tr>\n</table>") . "</div>";
$tpl = new templates();
echo $tpl->_ENGINE_parse_body($html, "domains.edit.user.php");
}示例8: LicenseDomain_Add
function LicenseDomain_Add()
{
$kav4mailservers = new kav4mailservers();
if ($kav4mailservers->error == true) {
return "{error_no_socks}";
}
if (!is_array($kav4mailservers->LicenseDomains)) {
$kav4mailservers->LicenseDomains[] = null;
}
while (list($num, $ligne) = each($kav4mailservers->LicenseDomains)) {
$licenceDomains[$ligne] = $ligne;
}
$ldap = new clladp();
$hash_domains = $ldap->hash_get_all_domains();
if (!is_array($hash_domains)) {
$body = "{ERROR_NO_DOMAINS_CREATED_FIRST}";
} else {
while (list($num, $ligne) = each($hash_domains)) {
if ($licenceDomains[$ligne] == null) {
if ($ligne != null) {
$hash[$ligne] = $ligne;
}
}
}
$hash[""] = "{input_select_list}";
$body = Field_array_Hash($hash, 'LicenseDomain', null);
}
$html = "<fieldset style='width:80%'><legend>{kav_add_protection_domain}</legend>\n\t<table>\n\t<tr class=rowA>\n\t\t<td align='right'>{kav_legend_protection_domain}:</td>\n\t\t<td>{$body}</td>\n\t</tr>\n\t<tr class=rowB>\n\t\t<td align='right' colspan=2><input type='button' OnClick=\"javascript:LicenseDomain_edit();\" value='{submit} »'></td>\n\t</tr>\t\n\t</table>\n\t</fieldset>";
$tpl = new templates();
echo DIV_SHADOW($tpl->_parse_body($html), 'windows');
}示例9: dhcp_form
function dhcp_form(){
$ldap=new clladp();
$domains=$ldap->hash_get_all_domains();
$dhcp=new dhcpd();
$page=CurrentPageName();
$users=new usersMenus();
$sock=new sockets();
$EnableDHCPServer=$sock->GET_INFO('EnableDHCPServer');
$EnableDHCPUseHostnameOnFixed=$sock->GET_INFO('EnableDHCPUseHostnameOnFixed');
if(count($domains)==0){$dom=Field_text('ddns_domainname',$dhcp->ddns_domainname,"font-size:13px;");}
else{
$domains[null]="{select}";
$dom=Field_array_Hash($domains,'ddns_domainname',$dhcp->ddns_domainname,null,null,null,";font-size:13px;padding:3px");}
$nic=$dhcp->array_tcp;
if($dhcp->listen_nic==null){$dhcp->listen_nic="eth0";
}
while (list ($num, $val) = each ($nic) ){
if($num==null){continue;}
if($num=="lo"){continue;}
$nics[$num]=$num;
}
if($dhcp->listen_nic<>null){
$nics[$dhcp->listen_nic]=$dhcp->listen_nic;
}
$nics[null]='{select}';
if(($users->BIND9_INSTALLED) OR ($users->POWER_DNS_INSTALLED) ){
$EnableArticaAsDNSFirst=Field_checkbox("EnableArticaAsDNSFirst",1,$dhcp->EnableArticaAsDNSFirst);
}else{
$EnableArticaAsDNSFirst=Field_numeric_checkbox_img_disabled('EnableArticaAsDNSFirst',0,'{enable_disable}');
}
$EnableDHCPUseHostnameOnFixed=Field_checkbox("EnableDHCPUseHostnameOnFixed",1,$EnableDHCPUseHostnameOnFixed);
$html="
<div id='dhscpsettings' class=form>
<input type='hidden' id='EnableDHCPServer' value='$EnableDHCPServer' name='EnableDHCPServer'>
<table style='width:98%'>
<tr>
<td class=legend style='font-size:13px'>{EnableArticaAsDNSFirst}:</td>
<td>$EnableArticaAsDNSFirst</td>
<td> </td>
<td>". help_icon('{EnableArticaAsDNSFirst_explain}')."</td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{EnableDHCPUseHostnameOnFixed}:</td>
<td>$EnableDHCPUseHostnameOnFixed</td>
<td> </td>
<td>". help_icon('{EnableDHCPUseHostnameOnFixed_explain}')."</td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{nic}:</td>
<td>".Field_array_Hash($nics,'dhcp_listen_nic',$dhcp->listen_nic,null,null,null,";font-size:13px;padding:3px")."</td>
<td> </td>
<td> </td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{ddns_domainname}:</td>
<td>$dom</td>
<td> </td>
<td> </td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{max_lease_time}:</td>
<td style='font-size:13px'>".Field_text('max_lease_time',$dhcp->max_lease_time,'width:60px;font-size:13px;padding:3px')." seconds</td>
<td> </td>
<td >".help_icon('{max_lease_time_text}')."</td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{subnet}:</td>
<td>".field_ipv4('subnet',$dhcp->subnet,null,true)."</td>
<td> </td>
<td> </td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{netmask}:</td>
<td>".field_ipv4('netmask',$dhcp->netmask,'font-size:13px;padding:3px')." </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{gateway}:</td>
<td>".field_ipv4('gateway',$dhcp->gateway,'font-size:13px;padding:3px')." </td>
<td> </td>
</tr>
<tr>
<td class=legend style='font-size:13px'>{only_use_this} ({gateway})</td>
//.........这里部分代码省略.........
示例10: ldap_domains
function ldap_domains()
{
$ldap = new clladp();
$sock = new sockets();
$build_hosts_array = unserialize(@file_get_contents("/etc/dnsmasq.hash.domains"));
$domains = $ldap->hash_get_all_domains();
while (list($num, $ligne) = each($domains)) {
$build_hosts_array[trim(strtolower($num))] = true;
}
@file_put_contents("/etc/dnsmasq.hash.domains", serialize($build_hosts_array));
if (isset($GLOBALS["BLACKLIST_DOMAINS"])) {
return $GLOBALS["BLACKLIST_DOMAINS"];
}
$q = new mysql_squid_builder();
$sql = "SELECT * FROM dnsmasq_blacklist";
$results = $q->QUERY_SQL($sql);
if (!$q->ok) {
if ($GLOBALS["OUTPUT"]) {
echo "Starting......: " . date("H:i:s") . " [INIT]: {$GLOBALS["TITLENAME"]} {$q->mysql_error}\n";
}
$GLOBALS["BLACKLIST_DOMAINS"] = unserialize(@file_get_contents("/etc/dnsmasq.hash.domains-blacklist"));
}
while ($ligne = mysql_fetch_assoc($results)) {
$domain = $ligne["hostname"];
$domain = trim(strtolower($domain));
if ($domain == null) {
continue;
}
$t[$domain] = true;
if ($GLOBALS["OUTPUT"]) {
echo "Starting......: " . date("H:i:s") . " [INIT]: {$GLOBALS["TITLENAME"]} blacklisted domain: {$domain}\n";
}
$GLOBALS["BLACKLIST_DOMAINS"][$domain] = true;
}
$ARTICA_ARRAY = unserialize(base64_decode($sock->GET_INFO("DNSMasqArticaParams")));
if (isset($ARTICA_ARRAY["LOCALNET"])) {
if (count($ARTICA_ARRAY["LOCALNET"]) > 0) {
while (list($domain, $enabled) = each($ARTICA_ARRAY["LOCALNET"])) {
$domain = trim(strtolower($domain));
if ($domain == null) {
continue;
}
if ($enabled == 1) {
continue;
}
$t[$domain] = true;
$GLOBALS["BLACKLIST_DOMAINS"][$domain] = true;
}
}
}
@file_put_contents("/etc/dnsmasq.hash.domains-blacklist", serialize($t));
}示例11: build_main
function build_main()
{
$conf_upd = new multi_config("kaspersky.updater");
$conf_scan = new multi_config("kaspersky.server");
$MilterTimeout = $conf_scan->GET("MilterTimeout");
if ($MilterTimeout == null) {
$MilterTimeout = 600;
}
$MaxScanRequests = $conf_scan->GET("MaxScanRequests");
if ($MaxScanRequests == null) {
$MaxScanRequests = 0;
}
$MaxScanTime = $conf_scan->GET("MaxScanTime");
if ($MaxScanTime == null) {
$MaxScanTime = 10;
}
$ScanPacked = $conf_scan->GET("ScanPacked");
if ($ScanPacked == null) {
$ScanPacked = "yes";
}
$ScanArchives = $conf_scan->GET("ScanArchives");
if ($ScanArchives == null) {
$ScanArchives = "yes";
}
$ScanCodeanalyzer = $conf_scan->GET("ScanCodeanalyzer");
if ($ScanCodeanalyzer == null) {
$ScanCodeanalyzer = "yes";
}
$UseAVBasesSet = $conf_scan->GET("UseAVBasesSet");
if ($UseAVBasesSet == null) {
$UseAVBasesSet = "extended";
}
$ldap = new clladp();
$hash = $ldap->hash_get_all_domains();
while (list($num, $val) = each($hash)) {
$doms[] = $num;
}
if (is_array($doms)) {
$domains = implode(",", $doms);
}
$conf[] = "[kav4lms:server.settings]";
$conf[] = "RunAsUser=postfix";
$conf[] = "RunAsGroup=postfix";
$conf[] = "ServiceSocket=local:/var/run/kav4lms/kavmd.sock";
$conf[] = "ServiceSocketPerms=0600";
$conf[] = "AdminSocket=local:/var/run/kav4lms/kavmdctl.sock";
$conf[] = "AdminSocketPerms=0600";
$conf[] = "MaxWatchdogRetries=10";
$conf[] = "MaxClientRequests=20";
$conf[] = "MaxScanRequests={$MaxScanRequests}";
$conf[] = "LicensedUsersDomains={$domains}";
$conf[] = "";
$conf[] = "[kav4lms:server.log]";
$conf[] = "";
$conf[] = "Options=all";
$conf[] = "Destination=syslog:kavmd@mail";
$conf[] = "Append=yes";
$conf[] = "RotateRounds=10";
$conf[] = "RotateSize=1M";
$conf[] = "";
$conf[] = "[kav4lms:server.statistics]";
$conf[] = "Options=all";
$conf[] = "Format=txt";
$conf[] = "Destination=file:/var/opt/kaspersky/kav4lms/stats/statistics.xml";
$conf[] = "RawDestination=file:/var/opt/kaspersky/kav4lms/stats/statistics.raw";
$conf[] = "";
$conf[] = "[kav4lms:server.notifications]";
$conf[] = "ProductAdmins=postmaster";
$conf[] = "ProductNotify=all";
$conf[] = "Subject=Anti-virus notification message";
$conf[] = "Charset=us-ascii";
$conf[] = "TransferEncoding=7bit";
$conf[] = "NotifierRelay=smtp:127.0.0.1:25";
$conf[] = "NotifierQueue=/var/opt/kaspersky/kav4lms/nqueue/";
$conf[] = "NotifierTimeout=5";
$conf[] = "NotifierPersistence=no";
$conf[] = "Templates=/etc/opt/kaspersky/kav4lms/templates-admin/en";
$conf[] = "";
$conf[] = "[kav4lms:server.snmp]";
$conf[] = "SNMPServices=none";
$conf[] = "SNMPTraps=none";
$conf[] = "AlertThreshold=10";
$conf[] = "Socket=inet:705@127.0.0.1";
$conf[] = "PingInterval=30";
$conf[] = "Timeout=5";
$conf[] = "Retries=10";
$conf[] = "";
$conf[] = "[kav4lms:filter]";
$conf[] = "";
$conf[] = "[kav4lms:filter.settings]";
$conf[] = "RunAsUser=postfix";
$conf[] = "RunAsGroup=postfix";
$conf[] = "FilterSocket=inet:1052@127.0.0.1";
$conf[] = "FilterSocketPerms=0600";
$conf[] = "ServiceSocket=local:/var/run/kav4lms/kavmd.sock";
$conf[] = "ForwardSocket=inet:10026@127.0.0.1";
$conf[] = "FilterTimeout=600";
$conf[] = "FilterThreads=10";
$conf[] = "MaxMilterThreads=0";
$conf[] = "AdminSocket=local:/var/run/kav4lms/filterctl.sock";
//.........这里部分代码省略.........
示例12: build
function build()
{
$sock = new sockets();
$EnableDKFilter = $sock->GET_INFO("EnableDkimMilter");
$DisconnectDKFilter = $sock->GET_INFO("DisconnectDKFilter");
if (!is_numeric($DisconnectDKFilter)) {
$DisconnectDKFilter = 0;
}
if ($DisconnectDKFilter == 1) {
return;
}
$conf = unserialize(base64_decode($sock->GET_INFO("DkimMilterConfig")));
if ($EnableDKFilter == null) {
$EnableDKFilter = 0;
}
if ($conf["On-BadSignature"] == null) {
$conf["On-BadSignature"] = "accept";
}
if ($conf["On-NoSignature"] == null) {
$conf["On-NoSignature"] = "accept";
}
if ($conf["On-DNSError"] == null) {
$conf["On-DNSError"] = "tempfail";
}
if ($conf["On-InternalError"] == null) {
$conf["On-InternalError"] = "accept";
}
if ($conf["On-Security"] == null) {
$conf["On-Security"] = "tempfail";
}
if ($conf["On-Default"] == null) {
$conf["On-Default"] = "accept";
}
if ($conf["ADSPDiscard"] == null) {
$conf["ADSPDiscard"] = "1";
}
if ($conf["ADSPNoSuchDomain"] == null) {
$conf["ADSPNoSuchDomain"] = "1";
}
if (trim($conf["SignOutgoing"]) == null) {
$conf["SignOutgoing"] = "1";
}
if (!is_numeric($conf["X-Header"])) {
$conf["X-Header"] = 1;
}
while (list($key, $value) = each($conf)) {
if ($value == "1") {
$conf[$key] = "yes";
}
if ($value == "0") {
$conf[$key] = "no";
}
}
if ($conf["SignOutgoing"] == "yes") {
$mode = "s";
echo "Starting......: " . date("H:i:s") . " milter-dkim sign outgoing mails\n";
}
if ($conf["VerifyIncoming"] == "yes") {
$mode = $mode . "v";
echo "Starting......: " . date("H:i:s") . " milter-dkim verify incoming mails\n";
}
$ldap = new clladp();
$domains = $ldap->hash_get_all_domains();
while (list($key, $value) = each($domains)) {
$dd[] = $key;
}
echo "Starting......: " . date("H:i:s") . " milter-dkim " . count($dd) . " local domains\n";
$Domain = @implode(",", $dd);
$f[] = "ADSPDiscard\t\t\t{$conf["ADSPDiscard"]}";
$f[] = "ADSPNoSuchDomain\t\t{$conf["ADSPNoSuchDomain"]}";
$f[] = "AllowSHA1Only\t\t\tno";
$f[] = "AlwaysAddARHeader\t\tno";
$f[] = "AutoRestart\t\t\tyes";
$f[] = "AutoRestartCount\t\t2";
$f[] = "AutoRestartRate\t\t10/1h";
$f[] = "Background\t\t\tYes";
$f[] = "BaseDirectory\t\t\t/var/run/dkim-filter";
$f[] = "BodyLengths\t\t\tNo";
$f[] = "Canonicalization\t\tsimple/simple";
$f[] = "ClockDrift\t\t\t300 ";
$f[] = "Diagnostics\t\t\tyes";
$f[] = "DNSTimeout\t\t\t10";
$f[] = "Domain\t\t\t\t{$Domain}";
$f[] = "EnableCoredumps\t\tno";
$f[] = "ExternalIgnoreList\t/etc/mail/dkim/trusted-hosts";
$f[] = "FixCRLF \t\t\t\tno";
$f[] = "InternalHosts\t\t\t/etc/mail/dkim/internal-hosts";
$f[] = "KeepTemporaryFiles\tno";
$f[] = "KeyList \t\t\t\t/etc/mail/dkim/keylist";
$f[] = "LogWhy\t\t\t\tyes";
$f[] = "MilterDebug\t\t\t0";
$f[] = "Mode\t\t\t\t\t{$mode}";
$f[] = "On-Default \t{$conf["On-Default"]}";
$f[] = "On-BadSignature \t{$conf["On-BadSignature"]}";
$f[] = "On-DNSError \t{$conf["On-DNSError"]}";
$f[] = "On-InternalError \t{$conf["On-InternalError"]}";
$f[] = "On-NoSignature \t{$conf["On-NoSignature"]}";
$f[] = "On-Security \t{$conf["On-Security"]}";
$f[] = "PeerList\t\t\t\t/etc/mail/dkim/trusted-hosts";
$f[] = "PidFile\t\t\t\t/var/run/dkim-milter/dkim-milter.pid";
//.........这里部分代码省略.........
示例13: events
if ($GLOBALS["VERBOSE"]) {
echo "O:{$argv[0]} 1:{$argv[1]} 2:{$argv[2]}\n";
}
$file = base64_decode($argv[1]);
$GLOBALS["OU"] = base64_decode($argv[2]);
$ou = $GLOBALS["OU"];
if ($GLOBALS["VERBOSE"]) {
echo "file:{$file} ou:{$ou}\n";
}
if (!is_file($file)) {
events("{$file}, no such file", 100);
die;
}
$tbl = @explode("\n", @file_get_contents($file));
$ldap = new clladp();
$hashdoms = $ldap->hash_get_all_domains();
$dn = "cn=relay_domains,ou={$ou},dc=organizations,{$ldap->suffix}";
if (!$ldap->ExistsDN($dn)) {
$upd['cn'][0] = "relay_domains";
$upd['objectClass'][0] = 'PostFixStructuralClass';
$upd['objectClass'][1] = 'top';
if (!$ldap->ldap_add($dn, $upd)) {
events("{$dn}: {$ldap->ldap_last_error}", 100);
die;
}
unset($upd);
}
$dn = "cn=relay_recipient_maps,ou={$ou},dc=organizations,{$ldap->suffix}";
if (!$ldap->ExistsDN($dn)) {
$upd['cn'][0] = "relay_recipient_maps";
$upd['objectClass'][0] = 'PostFixStructuralClass';示例14: AddNewRelayDomain
function AddNewRelayDomain()
{
$ou = $_GET["ou"];
$tpl = new templates();
$relayIP = $_GET["AddNewRelayDomainIP"];
if ($relayIP == "127.0.0.1") {
echo $tpl->javascript_parse_text("{NO_RELAY_TO_THIS_SERVER_EXPLAIN}");
return;
}
$tc = new networking();
$IPSAR = $tc->ALL_IPS_GET_ARRAY();
if (!preg_match("#[0-9]\\.[0-9]+\\.[0-9]+\\.[0-9]+#", $relayIP)) {
$ip = gethostbyname($relayIP);
while (list($ip1, $ip2) = each($IPSAR)) {
if ($relayIP == $ip1) {
echo $tpl->javascript_parse_text("{NO_RELAY_TO_THIS_SERVER_EXPLAIN}");
return;
}
}
} else {
while (list($ip1, $ip2) = each($IPSAR)) {
if ($relayIP == $ip1) {
echo $tpl->javascript_parse_text("{NO_RELAY_TO_THIS_SERVER_EXPLAIN}");
return;
}
}
}
$relayPort = $_GET["AddNewRelayDomainPort"];
$mx = $_GET["MX"];
$domain_name = trim(strtolower($_GET["AddNewRelayDomainName"]));
$ldap = new clladp();
if (!$ldap->UseLdap) {
$sqlite = new lib_sqlite();
$sqlite->AddRelayDomain($ou, $domain_name, $relayIP, $relayPort, $mx);
return;
}
$tpl = new templates();
$trusted_smtp_domain = $_GET["trusted_smtp_domain"];
$dn = "cn=relay_domains,ou={$ou},dc=organizations,{$ldap->suffix}";
$upd = array();
if (!$ldap->ExistsDN($dn)) {
$upd['cn'][0] = "relay_domains";
$upd['objectClass'][0] = 'PostFixStructuralClass';
$upd['objectClass'][1] = 'top';
$ldap->ldap_add($dn, $upd);
unset($upd);
}
$hashdoms = $ldap->hash_get_all_domains();
if ($hashdoms[$domain_name] != null) {
echo $tpl->_ENGINE_parse_body('{error_domain_exists}');
exit;
}
$dn = "cn={$domain_name},cn=relay_domains,ou={$ou},dc=organizations,{$ldap->suffix}";
$upd['cn'][0] = "{$domain_name}";
$upd['objectClass'][0] = 'PostFixRelayDomains';
$upd['objectClass'][1] = 'top';
$ldap->ldap_add($dn, $upd);
$dn = "cn=relay_recipient_maps,ou={$ou},dc=organizations,{$ldap->suffix}";
if (!$ldap->ExistsDN($dn)) {
$upd['cn'][0] = "relay_recipient_maps";
$upd['objectClass'][0] = 'PostFixStructuralClass';
$upd['objectClass'][1] = 'top';
$ldap->ldap_add($dn, $upd);
unset($upd);
}
if ($trusted_smtp_domain == 0) {
$dn = "cn=@{$domain_name},cn=relay_recipient_maps,ou={$ou},dc=organizations,{$ldap->suffix}";
$upd['cn'][0] = "@{$domain_name}";
$upd['objectClass'][0] = 'PostfixRelayRecipientMaps';
$upd['objectClass'][1] = 'top';
$ldap->ldap_add($dn, $upd);
}
$dn = "cn=transport_map,ou={$ou},dc=organizations,{$ldap->suffix}";
if (!$ldap->ExistsDN($dn)) {
$upd['cn'][0] = "transport_map";
$upd['objectClass'][0] = 'PostFixStructuralClass';
$upd['objectClass'][1] = 'top';
$ldap->ldap_add($dn, $upd);
unset($upd);
}
if ($relayIP != null) {
if ($mx == "no") {
$relayIP = "[{$relayIP}]";
}
$dn = "cn={$domain_name},cn=transport_map,ou={$ou},dc=organizations,{$ldap->suffix}";
$upd['cn'][0] = "{$domain_name}";
$upd['objectClass'][0] = 'transportTable';
$upd['objectClass'][1] = 'top';
$upd["transport"][] = "relay:{$relayIP}:{$relayPort}";
$ldap->ldap_add($dn, $upd);
}
}示例15: blacklist
function blacklist(){
$ldap=new clladp();
$domain=$ldap->hash_get_all_domains();
if(!is_array($domain)){return null;}
while (list ($num, $line) = each ($domain)){
$html=$html . blacklistdom($num);
}
$page=main_tabs () . "<br>" . RoundedLightGreen("
<table style='width:99%'>
<tr>
<td><strong>{from}:</td>
<td>" . Field_text('wlfrom',$_GET["whitelist"],'width:120px',
null,null,null,false,"AddblwformCheck(1,event)") ."</td>
<td><strong>{recipient}:</td>
<td>" . Field_text('wlto',$_GET["recipient"],'width:120px',
null,null,null,false,"AddblwformCheck(1,event)") ."</td>
<td align='right'><input type='button' OnClick=\"javascript:Addblwform(1);\" value='{add} »'></td>
</tr>
</table>")."
<br>
$html";
$tpl=new templates();
return $tpl->_ENGINE_parse_body($page);
}