"; echo " $deftext"; foreach ($vars as $var) { if($var[3]=="U") echo " $var[1]@$var[0]"; } echo ""; } function sag_quota_domain($domain){ $q="select quota from quota WHERE domain='$domain'"; $r=mysql_db_query($GLOBALS["MS_db"], $q); $s=mysql_fetch_array($r); return $s[0]; } function sag_mxquota_domain($domain){ $q="select mailboxen from quota WHERE domain='$domain'"; $r=mysql_db_query($GLOBALS["MS_db"], $q); $s=mysql_fetch_array($r); return $s[0]; } function sag_used_quota_user($user, $domain){ $stat = uservars($domain, $user); foreach($stat as $st) { list($a, $b) = $st; if($a=="MaxMBSize") return $b; } } function sag_used_quota_domain($domain){ $summe = 0; $stat = userlist($domain); foreach($stat as $st) { list($a, $b, $c, $d) = $st; $summe += sag_used_quota_user($b, $a); } return $summe; } function sag_used_mxquota_domain($domain){ $summe = 0; $stat = userlist($domain); foreach($stat as $st) { $summe += 1; } return $summe; } function useradd($domain, $username, $password, $usertype) { $cmd = "useradd\t$domain\t$username\t$password\t$usertype"; $q="replace into language values ('$username@$domain','".$GLOBALS["DISP_LANGUAGE"]."')"; $r=mysql_db_query($GLOBALS["MS_db"], $q); return (execute($cmd, 0)); } //end function function userpasswd($domain, $username, $password) { $cmd = "userpasswd\t$domain\t$username\t$password"; return (execute($cmd, 0)); } //end function function cfgfileget($file) { $cmd = "cfgfileget\t$file"; return (execute($cmd, 1)); } //end function // Save a config file (relative of Mailroot) function cfgfileset($file, $vars) { $cmd = "cfgfileset\t$file"; $tmp = ''; foreach($vars as $var) { $tmp .= implode("\t", $var) . "\n"; } return (execute($cmd, 2, $tmp)); } //end function function userauth($domain, $username, $password) { $cmd = "userauth\t\"$domain\"\t\"$username\"\t\"$password\""; // echo $cmd; return (execute($cmd, 0)); } //end function function usergetmproc($domain, $username) { $cmd = "usergetmproc\t$domain\t$username"; return (execute($cmd, 1)); } //end function function usersetmproc($domain, $username, $vars) { $vars .= ".\n"; $cmd = "usersetmproc\t$domain\t$username"; return (execute($cmd, 2, $vars)); } //end function function userdel($domain, $username) { $cmd = "userdel\t$domain\t$username"; $q0="delete from language where user='$username@$domain'"; $r0=mysql_db_query($GLOBALS["MS_db"], $q0); $q1="delete from kontakte where user='$username@$domain'"; $r1=mysql_db_query($GLOBALS["MS_db"], $q1); $q2="delete from signaturen where user='$username@$domain'"; $r2=mysql_db_query($GLOBALS["MS_db"], $q2); $q3="delete from spammers where user='$username@$domain'"; $r3=mysql_db_query($GLOBALS["MS_db"], $q3); return (execute($cmd, 0)); } //end function //////////////////// //// functions // Add user alias function aliasadd($domain, $alias, $username) { $cmd = "aliasadd\t$domain\t$alias\t$username"; return (execute($cmd, 0)); } //end function // Delete a user alias function aliasdel($domain, $alias) { $cmd = "aliasdel\t$domain\t$alias"; return (execute($cmd, 0)); } //end function // List handled aliases function aliaslist($domain="", $alias="*", $username="") { $cmd = "aliaslist\t$domain\t$alias\t$username"; return (execute($cmd, 1)); } //end function function aliaslist_drop($domain, $size, $name, $select=0, $deftext="", $defval=0, $class="", $user=""){ $cmd = "aliaslist\t$domain\t*\t$user"; $vars = execute($cmd, 1); echo ""; echo " $deftext"; foreach ($vars as $var) { echo " $var[1]@$var[0] -> $var[2]"; } echo ""; } function js_box($text){ ?>subtype) { return $primary_mime_type[(int) $structure->type] . '/' . $structure->subtype; } return "TEXT/PLAIN"; } function get_part($stream, $msg_number, $mime_type, $structure = false, $part_number = false) { if(!$structure) { $structure = imap_fetchstructure($stream, $msg_number); } if($structure) { if($mime_type == get_mime_type($structure)) { if(!$part_number) { $part_number = "1"; } $text = imap_fetchbody($stream, $msg_number, $part_number); if($structure->encoding == 3) { return base64_decode($text); } else if($structure->encoding == 4) { return imap_qprint($text); } else { return $text; } } if($structure->type == 1) /* multipart */ { while(list($index, $sub_structure) = each($structure->parts)) { if($part_number) { $prefix = $part_number . '.'; } $data = get_part($stream, $msg_number, $mime_type, $sub_structure, $prefix . ($index + 1)); if($data) { return $data; } } } } return false; } function mk_tmpfile($inhalt,$typ="html"){ srand((double)microtime()*123199); $gen = substr(md5(rand(0,getrandmax())), 0, 32); $pfad = "tmp/".$gen.".".$typ; $handle = fopen($pfad,'a'); fputs($handle, $inhalt); fclose($handle); return ("tmp/".$gen.".".$typ); } function rm_tmpfiles(){ unlink_wc($GLOBALS["DOCUMENT_ROOT"]."/tmp/", "*"); } function spam_list($user){ $q = "SELECT addr FROM spammers WHERE user='$user' ORDER BY addr"; $r = mysql_db_query($GLOBALS["db"], $q); while($g = mysql_fetch_array($r)){ $ret[].= $g[0]; } return ($ret); } function spam_add($user, $addr){ $q = "INSERT INTO spammers (user, addr) VALUES ('$user', '$addr')"; return (mysql_db_query($GLOBALS["db"], $q)); } function spam_del($user, $addr){ $q = "DELETE FROM spammers WHERE user='$user' AND addr='$addr'"; return (mysql_db_query($GLOBALS["db"], $q)); } function col($i){ if($i%2==1){ return "#ffffff"; } else { return "#efefef"; } } function realdomain($domainname){ /* checks if $domainname is an aliasdomain and returns the realdomain. 2003-08-19 */ $cmd = "aliasdomainlist\t$domainname"; $retval = execute($cmd, 1); if(count($retval)==1){ return ($retval[0][1]); } else { return "$domainname"; } } function ascii_encode($string) { /* utf-encode non ascii-chars inside string 2003-11-01 schmidt@waaf.net */ $_ret=""; for($i=0; $i 127){ $_ret.="&#".ord(substr($string,$i,1)).";"; } else { $_ret.=substr($string,$i,1); } } return($_ret); } function WN_tabelle($kopfvals, $zeilen, $link1="", $link2="", $link3=""){ echo "\n\t\n"; foreach ($kopfvals as $_v) { echo ""; } echo "\t\n"; if(count($zeilen)>0){ foreach ($zeilen as $_k => $_v) { if($_k % 2 == 1) { echo ""; } else { echo ""; } $cc=count($_v); $i = 0; // spalten-counter $i0 = $i1 = $i2 = ""; // vals der ersten drei spalten, zur verwendung in den links if($cc==1){ // nur ein wert if($i==0) $i0=$_z; echo "\n"; if($i==0) $i0=$_v; $i++; } elseif(count($_v) >= 1) { foreach ($_v as $_z) { if($i==0) $i0=$_z; if($i==1) $i1=$_z; if($i==2) $i2=$_z; echo "\n"; $i++; } } if($link1!="") { echo "\n";} if($link2!="") { echo "\n";} if($link3!="") { echo "\n";} echo "\n\n"; } } echo "

".$_v."
".htmlentities($_v)."	".htmlentities($_z)."	".str_replace("§2§","$i2", str_replace("§1§","$i1", str_replace("§0§","$i0",$link1)))."	".str_replace("§2§","$i2", str_replace("§1§","$i1", str_replace("§0§","$i0",$link2)))."	".str_replace("§2§","$i2", str_replace("§1§","$i1", str_replace("§0§","$i0",$link3)))."

\n"; } function unlink_wc($dir, $pattern){ /* wmon@terra.com.br - http://de.php.net/manual/de/function.unlink.php */ /* * @Name: unlink_wc($dir,$pattern) * @Description: A unlink function that support wildcards ( * and ? ) * (based on code taked from php.net manual comments) * @Author: Pablo Rosciani [ pabloATnkstudiosDOTnet ] [ http://pi.nks.com.ar ] * @Date: 15/10/03 * @param string $dir Directory to search files * @param string $pattern Pattern to find. * */ if ($dh = opendir($dir)) { while (false !== ($file = readdir($dh))){ if ($file != "." && $file != "..") { $files[] = $file; } } closedir($dh); if(strpos($pattern,".")) { $baseexp=substr($pattern,0,strpos($pattern,".")); $typeexp=substr($pattern,strpos($pattern,".")+1,strlen($pattern)); }else{ $baseexp=$pattern; $typeexp=""; } $baseexp=preg_quote($baseexp); $typeexp=preg_quote($typeexp); $baseexp=str_replace(array("\*","\?"), array(".*","."), $baseexp); $typeexp=str_replace(array("\*","\?"), array(".*","."), $typeexp); $i=0; if($files){ foreach($files as $file) { $filename=basename($file); if(strpos($filename,".")) { $base=substr($filename,0,strpos($filename,".")); $type=substr($filename,strpos($filename,".")+1,strlen($filename)); }else{ $base=$filename; $type=""; } if(preg_match("/^".$baseexp."$/i",$base) && preg_match("/^".$typeexp."$/i",$type)) { $matches[$i]=$file; $i++; } } } if (count($matches) > 0){ while(list($idx,$val) = each($matches)){ if (substr($dir,-1) == "/"){ unlink($dir.$val); }else{ unlink($dir."/".$val); } } } } } include("./inc/seite.class.php"); include("./inc/kontakte.class.php"); include("./inc/signatur.class.php"); include("./inc/pop3.class.php"); include("./inc/DecodeMessage.php"); include("./inc/hildegard.class.php"); include("./inc/email_message.php"); ?>