This class manage awstats statistic sets. More...

Public Member Functions
	m_aws ()
	Constructor. More...

	hook_menu ()

	alternc_password_policy ()
	Password kind used in this class (hook for admin class) More...

	alternc_module_description ()
	Name of the module function. More...

	get_list ()
	Returns an array with all the statistics of a member. More...

	get_stats_details ($id)
	Return an array with the details for 1 statistic set. More...

	host_list ()
	Return the list of domains / subdomains allowed for this member with the type (MX,URL,...) More...

	prefix_list ()
	Returns the list of prefixes that can be used on current account. More...

	select_prefix_list ($current)
	Echoes <option> tags of all the domains hosted on the account + the login of the account They can be used as a root for the login that may have access to web statistics hosted on an account $current will be the selected value. More...

	select_host_list ($current)
	Draw options for a select html code with the list of allowed and availables domains for this member. More...

	check_host_available ($current)
	Check if hosts is already used by awstats of available for this member. More...

	get_hostaliases ($id)
	Return the hostaliases list with an id. More...

	put_stats_details ($id, $users, $hostaliases, $public)
	Edit a statistic set (change allowed user list) More...

	delete_stats ($id)
	Delete a statistic set. More...

	add_stats ($hostname, $users="", $hostaliases, $public)
	Create a new statistic set. More...

	list_login ()

	list_allowed_login ($id)

	get_view_public ($id)

	login_exists ($login, $exists=1)

	del_login ($login)

	add_login ($login, $pass)

	change_pass ($login, $pass)

	allow_login ($login, $id, $noconf=0)

	delete_allowed_login ($id, $noconf=0)

	deny_login ($login, $id, $noconf=0)

	alternc_del_member ()

	alternc_del_domain ($dom)
	This function is called on each class when a domain name is uninstalled. More...

	hook_quota_get ()
	This function is called when we are asked to compute the used quota for a service. More...

	_check ($login)

	_delconf ($hostname)
	Delete the awstats configuration file for a statistic set. More...

	_createconf ($id, $nochk=0)
	Create a configuration file for a statistic set. More...

	_createhtpasswd ()

	alternc_export ()
	Exports all the aws related information for an account. More...

	crypt_apr1_md5 ($plainpasswd)
	from http://php.net/crypt#73619 More...

Public Attributes
	$CONFDIR ="/etc/awstats"
	Where are the awstats configuration files : @access private. More...

	$HTAFILE ="/etc/alternc/awstats.htpasswd"

	$CACHEDIR ="/var/cache/awstats"

	$TEMPLATEFILE ="/etc/alternc/templates/awstats/awstats.template.conf"
	Where is the template for conf files : @access private. More...

Detailed Description

This class manage awstats statistic sets.

Copyleft AlternC Team

Copyright: AlternC-Team 2004-09-01 http://alternc.org/

Definition at line 33 of file m_aws.php.

Member Function Documentation

◆ _check()

m_aws::_check ( $login )

Definition at line 664 of file m_aws.php.

                           {
     global $msg,$mem;
     $login=trim($login); 
     $login=strtolower($login); 
     if ($c=strpos($login,"_")) {
    $prefix=substr($login,0,$c);
    $postfix=substr($login,$c+1);
     } else {
    $prefix=$login;
    $postfix="";
     }
     $r=$this->prefix_list();
     if (!in_array($prefix,$r)) { 
       $msg->raise('Error', "aws",_("prefix not allowed.")); // prefix not allowed. 
       return false;
     } 
    if (!preg_match('/^[0-9a-z_-]*$/', $postfix)){
       $msg->raise('Error', "aws", _("There are forbidden characters in the login (only A-Z 0-9 _ and - are allowed)"));
       return false;
     }
     return $login;
   }

References $c, $login, $mem, $msg, $r, and prefix_list().

Referenced by add_login(), allow_login(), change_pass(), and deny_login().

◆ _createconf()

m_aws::_createconf	(	$id,
		$nochk = `0`
	)

Create a configuration file for a statistic set.

if nochk==1, does not check the owner of the stat set (for admin only) @access private

Definition at line 707 of file m_aws.php.

                                      {
     global $db,$msg,$cuid,$L_ALTERNC_LOGS;
     $s=@implode("",file($this->TEMPLATEFILE));
     if (!$s) {
       $msg->raise('Error', "aws",_("Problem to create the configuration"));
       return false;
     }
     if ($nochk) {
         $db->query("SELECT * FROM aws WHERE id='$id';");
     } else { 
         $db->query("SELECT * FROM aws WHERE id='$id' AND uid='$cuid';");
     }
     if (!$db->num_rows()) {
       $msg->raise('Error', "aws",_("This statistic does not exist")); 
       return false;
     }
     $db->next_record();
     $uid = $db->f('uid');
     $hostname=$db->f("hostname");
     $hostaliases=$db->f("hostaliases");
     $public=$db->f("public");
     $db->query("SELECT login FROM membres WHERE uid = '$uid'");
     $db->next_record();
     $username = $db->f('login');
     $db->query("SELECT login FROM aws_access WHERE id='$id';");
     $users="";
     while ($db->next_record()) {
         $users.=$db->f("login")." ";
     }
  
     $replace_vars = array(
         '%%UID%%' => $uid,
         '%%USER%%' => $username,
         '%%ALTERNC_LOGS%%' => $L_ALTERNC_LOGS,
         '%%PUBLIC%%' => $public,
         '%%HOSTNAME%%' => $hostname,
         '%%HOSTALIASES%%' => $hostaliases,
         '%%USERS%%' => $users,
     );
     foreach ($replace_vars as $k=>$v){
         $s=str_replace($k,$v,$s);
     }
  
     $f=fopen($this->CONFDIR."/awstats.".$hostname.".conf","wb");
     fputs($f,$s,strlen($s));
     fclose($f);
  
     return true;
   }

References $cuid, $db, $f, $msg, $uid, and $username.

Referenced by add_stats(), allow_login(), delete_allowed_login(), deny_login(), and put_stats_details().

◆ _createhtpasswd()

m_aws::_createhtpasswd ( )

Definition at line 759 of file m_aws.php.

                              {
     global $db, $msg;
     $f=@fopen($this->HTAFILE,"wb");
     if ($f) {
       $db->query("SELECT login,pass FROM aws_users;");
       while ($db->next_record()) {
         fputs($f,$db->f("login").":".$db->f("pass")."\n");
       }
       fclose($f);
       return true;
     } else {
       $msg->raise('Error', "aws", _("Problem to edit file %s"), $this->HTAFILE);
       return false;
     }
   }

References $db, $f, and $msg.

Referenced by add_login(), add_stats(), allow_login(), alternc_del_domain(), alternc_del_member(), change_pass(), del_login(), delete_allowed_login(), deny_login(), and put_stats_details().

◆ _delconf()

m_aws::_delconf ( $hostname )

Delete the awstats configuration file for a statistic set.

@access private

Definition at line 692 of file m_aws.php.

                                {
     global $msg,$action;
     if (!preg_match('/^[._a-z0-9-]*$/', $hostname)){
       $msg->raise('Error', "aws",_("Hostname is incorrect")); 
       return false;
     }
     $action->del($this->CONFDIR. DIRECTORY_SEPARATOR . "awstats.".$hostname.".conf");
   }

References $msg.

Referenced by alternc_del_domain(), alternc_del_member(), and delete_stats().

◆ add_login()

m_aws::add_login	(	$login,
		$pass
	)

Definition at line 468 of file m_aws.php.

                                    {
     global $db,$msg,$cuid,$admin;
     $msg->log("aws","add_login");
  
     if (!($login=$this->_check($login))) {
       return false;
     }
     if ($this->login_exists($login,1)) {
       $msg->raise('Error', "aws",_("Login already exist")); 
       return false;
     }
     // Check this password against the password policy using common API :
     if (is_callable(array($admin, "checkPolicy"))) {
       if (!$admin->checkPolicy("aws", $login, $pass)) {
    return false; // The error has been raised by checkPolicy()
       }
     }
     $pass=$this->crypt_apr1_md5($pass);
     // FIXME retourner une erreur l'insert se passe pas bien
     $db->query("INSERT INTO aws_users (uid,login,pass) VALUES ('$cuid','$login','$pass');");
     return $this->_createhtpasswd();
   }

References $cuid, $db, $login, $msg, _check(), _createhtpasswd(), crypt_apr1_md5(), and login_exists().

◆ add_stats()

m_aws::add_stats	(	$hostname,
		$users = `""`,
		$hostaliases,
		$public
	)

Create a new statistic set.

Parameters

string	$hostname	The domain name
	$uers	array the array of users that will be allowed
	$hostaliases	array an array of host aliases
	$public	boolean Shall this statistic set be public ?

Returns: boolean TRUE if the set has been created

Definition at line 347 of file m_aws.php.

                                                                 {
     global $db,$msg,$quota,$mem,$cuid;
     $msg->log("aws","add_stats",$hostname);
     $ha="";
     $r=$this->host_list();
     $hosts=array();
     foreach ($r as $key=>$val) {
         $hosts[]=$val["hostname"];
     }
     reset($hosts);
     if (!in_array($hostname,$hosts) || $hostname=="") {
       $msg->raise('Error', "aws",_("This hostname does not exist (Domain name)"));
       return false;
     }
  
     // Parse the hostaliases array (it should contains valid domains)
    if (is_array($hostaliases)) {
       foreach($hostaliases as $ho) {
          if (!in_array($ho,$hosts) || $hostname=="") {
             $msg->raise('Error', "aws",_("This hostname does not exist (Hostaliases)"));
             return false;
          }
          $ha .= "$ho ";
       }
     }
  
     if ($quota->cancreate("aws")) {
       $db->query("INSERT INTO aws (hostname,uid,hostaliases,public) VALUES ('$hostname','$cuid','$ha','$public')");
       $id=$db->lastid();
       if (is_array($users)) {
         foreach($users as $v) {
           $this->allow_login($v,$id, 1);
         }
       }
       if (!$this->_createconf($id) ) return false;
       if (!$this->_createhtpasswd() ) return false;
       mkdir($this->CACHEDIR."/".$hostname,0777);
       return true;
     } else {
       $msg->raise('Alert', "aws",_("Your stat quota is over..."));
       return false;
     }
   }

References $cuid, $db, $id, $key, $mem, $msg, $r, $val, _createconf(), _createhtpasswd(), allow_login(), and host_list().

◆ allow_login()

m_aws::allow_login	(	$login,
		$id,
		$noconf = `0`
	)

Definition at line 518 of file m_aws.php.

                                              { // allow user $login to access stats $id.
     global $db,$msg,$cuid;
     $msg->log("aws","allow_login");
  
     if (!($login=$this->_check($login))) {
       $msg->raise('Error', "aws",_("Login incorrect"));
       return false;      
     }
     if (!$this->login_exists($login)) {
       $msg->raise('Error', "aws",_("Login does not exist"));
       return false;
     }
     $db->query("SELECT id FROM aws WHERE id='$id' AND uid='$cuid'");
     if (!$db->next_record()) {
       $msg->raise('Error', "aws",_("The requested statistic does not exist.")); 
       return false;
     }
     $db->query("SELECT login FROM aws_access WHERE id='$id' AND login='$login'");
     if ($db->next_record()) {
       $msg->raise('Error', "aws",_("This login is already allowed for this statistics."));
       return false;
     }
     $db->query("INSERT INTO aws_access (uid,id,login) VALUES ('$cuid','$id','$login');");
     if (!$noconf) { 
       $this->_createconf($id); 
       $this->_createhtpasswd();
     }
     return true;
   }

References $cuid, $db, $id, $login, $msg, _check(), _createconf(), _createhtpasswd(), and login_exists().

Referenced by add_stats(), and put_stats_details().

◆ alternc_del_domain()

m_aws::alternc_del_domain ( $dom )

This function is called on each class when a domain name is uninstalled.

Parameters

string $dom the domain to uninstall

Definition at line 628 of file m_aws.php.

                                     {
     global $msg,$cuid;
     $msg->log("aws","alternc_del_domain",$dom);
     $db=new DB_System();
     $db->query("SELECT id,hostname FROM aws WHERE uid='$cuid' AND (hostname='$dom' OR hostname like '%.$dom')");
     $t=array();
     while ($db->next_record()) {
       $t[]=array($db->f("hostname"),$db->f("id"));
     }
     foreach ($t as $i) {
       $db->query("DELETE FROM aws WHERE uid='$cuid' AND hostname='".$i[0]."';");
       $db->query("DELETE FROM aws_access WHERE uid='$cuid' AND id='".$i[1]."';");
       $this->_delconf($i[0]);
     }
     return $this->_createhtpasswd();
   }

References $cuid, $db, $dom, $i, $msg, $t, _createhtpasswd(), and _delconf().

◆ alternc_del_member()

m_aws::alternc_del_member ( )

Definition at line 605 of file m_aws.php.

                                 {
     global $db,$msg,$cuid;
     $msg->log("aws","del_member");
     $db->query("SELECT * FROM aws WHERE uid='$cuid';");
     $t=array();
     while ($db->next_record()) {
       $t[]=$db->f("hostname");
     }
     $db->query("DELETE FROM aws WHERE uid='$cuid';");
     foreach ($t as $i) {
       $this->_delconf($i);
     }
     $db->query("DELETE FROM aws_access WHERE uid='$cuid'");
     $db->query("DELETE FROM aws_users WHERE uid='$cuid';");
     return $this->_createhtpasswd();
   }

References $cuid, $db, $i, $msg, $t, _createhtpasswd(), and _delconf().

◆ alternc_export()

m_aws::alternc_export ( )

Exports all the aws related information for an account.

@access private EXPERIMENTAL 'sid' function ;)

Definition at line 782 of file m_aws.php.

                             {
     global $db,$msg,$cuid;
     $msg->log("aws","export");
     $str="<aws>\n";
     $db->query("SELECT login,pass FROM aws_users WHERE uid='$cuid';");
     while ($db->next_record()) {
       $str.="  <user><login>".$db->Record["login"]."</login><pass hash=\"des\">".$db->Record["pass"]."</pass></user>\n";
     }
     $r=array();
     $db->query("SELECT id, hostname FROM aws WHERE uid='$cuid' ORDER BY hostname;");
     while ($db->next_record()) {
       $r[$db->Record["id"]]=$db->Record["hostname"];
     }
     foreach($r as $id=>$host) {
       $str.="  <domain>\n    <name>".$host."</name>\n";
       $db->query("SELECT login FROM aws_access WHERE id='$id';");
       while ($db->next_record()) {
         $str.="    <user>".$db->Record["login"]."</user>\n";
       }
       $str.="  </domain>\n";
     }
     $str.="</aws>\n";
     return $str;
   }

References $cuid, $db, $host, $id, $msg, and $r.

◆ alternc_module_description()

m_aws::alternc_module_description ( )

Name of the module function.

Definition at line 81 of file m_aws.php.

                                         {
     return array("aws"=>_("The stats module allows any user to ask for statistics about his web site. Statistics are web pages generated daily based on the visits of the day before. Awstats is the soft used to produce those stats. The statistics are then protected by a login and a password."));
   } 

◆ alternc_password_policy()

m_aws::alternc_password_policy ( )

Password kind used in this class (hook for admin class)

Definition at line 72 of file m_aws.php.

                                      {
     return array("aws"=>"Awstats Web Statistics");
   }

◆ change_pass()

m_aws::change_pass	(	$login,
		$pass
	)

Definition at line 493 of file m_aws.php.

                                      {
     global $db,$msg,$cuid,$admin;
     $msg->log("aws","change_pass");
  
     if (!($login=$this->_check($login))) {
       $msg->raise('Error', "aws",_("Login incorrect")); // Login incorrect 
       return false;
     }
     if (!($this->login_exists($login))) {
       $msg->raise('Error', "aws",_("Login does not exists")); // Login does not exists
       return false;
     }
     // Check this password against the password policy using common API :
     if (is_callable(array($admin, "checkPolicy"))) {
       if (!$admin->checkPolicy("aws", $login, $pass)) {
         return false; // The error has been raised by checkPolicy()
       }
     }
     $pass=$this->crypt_apr1_md5($pass);
     $db->query("UPDATE aws_users SET pass='$pass' WHERE login='$login';");
     return $this->_createhtpasswd();
   }

References $cuid, $db, $login, $msg, _check(), _createhtpasswd(), crypt_apr1_md5(), and login_exists().

◆ check_host_available()

m_aws::check_host_available ( $current )

Check if hosts is already used by awstats of available for this member.

Definition at line 253 of file m_aws.php.

                                           {
     global $msg;
     $msg->log("aws","check_host_available",$current);
     $r=$this->get_list();
     if(is_array($r)){
         reset($r);
         while (list($key,$val)=each($r)) {
           if ($current==$val["hostname"]) {
               $msg->raise('Alert', "aws",_("Host already managed by awstats!"));
               return false;
           }
         }
     }
     return true;
   }

References $key, $msg, $r, $val, and get_list().

Referenced by select_host_list().

◆ crypt_apr1_md5()

m_aws::crypt_apr1_md5 ( $plainpasswd )

from http://php.net/crypt#73619

Definition at line 812 of file m_aws.php.

                                         {
     $salt = substr(str_shuffle("abcdefghijklmnopqrstuvwxyz0123456789"), 0, 8);
     $len = strlen($plainpasswd);
     $text = $plainpasswd.'$apr1$'.$salt;
     $bin = pack("H32", md5($plainpasswd.$salt.$plainpasswd));
     for($i = $len; $i > 0; $i -= 16) { $text .= substr($bin, 0, min(16, $i)); }
     for($i = $len; $i > 0; $i >>= 1) { $text .= ($i & 1) ? chr(0) : $plainpasswd{0}; }
     $bin = pack("H32", md5($text));
     for($i = 0; $i < 1000; $i++) {
       $new = ($i & 1) ? $plainpasswd : $bin;
       if ($i % 3) $new .= $salt;
       if ($i % 7) $new .= $plainpasswd;
       $new .= ($i & 1) ? $bin : $plainpasswd;
       $bin = pack("H32", md5($new));
     }
     for ($i = 0; $i < 5; $i++) {
       $k = $i + 6;
       $j = $i + 12;
       if ($j == 16) $j = 5;
       $tmp = $bin[$i].$bin[$k].$bin[$j].$tmp;
     }
     $tmp = chr(0).chr(0).$bin[11].$tmp;
     $tmp = strtr(strrev(substr(base64_encode($tmp), 2)),
        "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/",
        "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz");
     return "$"."apr1"."$".$salt."$".$tmp;
   }

References $i, and $len.

Referenced by add_login(), and change_pass().

◆ del_login()

m_aws::del_login ( $login )

Definition at line 453 of file m_aws.php.

                              {
     global $db,$msg,$cuid;
     $msg->log("aws","del_login");
     if (!$this->login_exists($login,1)) {
       $msg->raise('Error', "aws",_("Login does not exist")); 
       return false;
     }
     $db->query("DELETE FROM aws_users WHERE uid='$cuid' AND login='$login';");
     $db->query("DELETE FROM aws_access WHERE uid='$cuid' AND login='$login';");
     $this->_createhtpasswd();
     return true;
   }

References $cuid, $db, $login, $msg, _createhtpasswd(), and login_exists().

◆ delete_allowed_login()

m_aws::delete_allowed_login	(	$id,
		$noconf = `0`
	)

Parameters

integer $id

Definition at line 554 of file m_aws.php.

                                                {
     global $db,$msg,$cuid;
     $msg->log("aws","delete_allowed_login");
  
     $db->query("SELECT id FROM aws WHERE id='$id' AND uid='$cuid'");
     if (!$db->next_record()) {
       $msg->raise('Error', "aws",_("The requested statistic does not exist.")); 
       return false;
     }
     $db->query("DELETE FROM aws_access WHERE id='$id';");
     if (!$noconf) { 
       $this->_createconf($id); 
       $this->_createhtpasswd();
     }
     return true;
   }

References $cuid, $db, $id, $msg, _createconf(), and _createhtpasswd().

Referenced by delete_stats(), and put_stats_details().

◆ delete_stats()

m_aws::delete_stats ( $id )

Delete a statistic set.

Parameters

integer $id The statistic set ID

Returns: string the domain name of the deleted statistic set, or FALSE if an error occurred

Definition at line 319 of file m_aws.php.

                              {
     global $db,$msg,$cuid,$action;
     $msg->log("aws","delete_stats",$id);
     $db->query("SELECT hostname FROM aws WHERE id='$id' and uid='$cuid';");
     if (!$db->num_rows()) {
       $msg->raise('Error', "aws",_("This statistic does not exist"));
       return false;
     }
     $db->next_record();
     $hostname=$db->f("hostname");
     $this->delete_allowed_login($id,1);
     $this->_delconf($hostname);
     $db->query("DELETE FROM aws WHERE id='$id'");
     $action->del($this->CACHEDIR. DIRECTORY_SEPARATOR . $hostname . DIRECTORY_SEPARATOR);
     return $hostname;
  
   }

References $cuid, $db, $id, $msg, _delconf(), and delete_allowed_login().

◆ deny_login()

m_aws::deny_login	(	$login,
		$id,
		$noconf = `0`
	)

Definition at line 573 of file m_aws.php.

                                             { // deny user $login to access stats $id.
     global $db,$msg,$cuid;
     $msg->log("aws","deny_login");
  
     if (!($login=$this->_check($login))) {
       $msg->raise('Error', "aws",_("Login incorrect")); // Login incorrect 
       return false;
     }
     if (!$this->login_exists($login,0)) {
       $msg->raise('Error', "aws",_("Login does not exists")); // Login does not exists
       return false;
     }
     $db->query("SELECT id FROM aws WHERE id='$id' AND uid='$cuid'");
     if (!$db->next_record()) {
       $msg->raise('Error', "aws",_("The requested statistic does not exist."));
       return false;
     }
     $db->query("SELECT login FROM aws_access WHERE id='$id' AND login='$login'");
     if (!$db->next_record()) {
       $msg->raise('Error', "aws",_("This login is already denied for this statistics."));
       return false;
     }
     $db->query("DELETE FROM aws_access WHERE id='$id' AND login='$login';");
     if (!$noconf) { 
       $this->_createconf($id); 
       $this->_createhtpasswd();
     }
     return true;
   }

References $cuid, $db, $id, $login, $msg, _check(), _createconf(), _createhtpasswd(), and login_exists().

◆ get_hostaliases()

m_aws::get_hostaliases ( $id )

Return the hostaliases list with an id.

Definition at line 274 of file m_aws.php.

                                 {
     global $db,$msg,$cuid;
     $r=array();
     if ($id == NULL)  
       return $r; 
     $db->query("SELECT hostaliases FROM aws WHERE uid='$cuid' and id='$id' ORDER by hostaliases;");
     while ($db->next_record()) {
       $r[]=$db->f("hostaliases");
     }
     
     return $r;
   }

References $cuid, $db, $id, $msg, and $r.

◆ get_list()

m_aws::get_list ( )

Returns an array with all the statistics of a member.

Returns: array Returns an indexed array of associative arrays like that : $r[0-n]["id"] = Id of the stat set $r[0-n]["hostname"]= domain $r[0-n]["users"]= list of allowed users separated with ' '

Definition at line 96 of file m_aws.php.

                       {
     global $db,$msg,$cuid;
     $msg->log("aws","get_list");
     $r=array();
     $db->query("SELECT id, hostname FROM aws WHERE uid='$cuid' ORDER BY hostname;");
     if ($db->num_rows()) {
       while ($db->next_record()) {
    $r[]=array(
          "id"=>$db->f("id"),
          "hostname"=>$db->f("hostname")
          );
       }
       $t=array();
       foreach ($r as $v) {
    $db->query("SELECT login FROM aws_access WHERE id='".$v["id"]."';");
    $u="";
    while ($db->next_record()) {
       $u.=$db->f("login")." ";
    }
    $t[]=array(
         "id"=>$v["id"],
         "hostname"=>$v["hostname"],
         "users"=>$u
     );
       }
       return $t;
     } else {
       return false;
     }
   }

References $cuid, $db, $msg, $r, and $t.

Referenced by check_host_available().

◆ get_stats_details()

m_aws::get_stats_details ( $id )

Return an array with the details for 1 statistic set.

Parameters

integer $id ID of the set we want.

Returns: array Returns an associative array as follow : $r["id"] = Id $r["hostname"]= domain $r["users"] = List of allowed users, separated by ' '

Definition at line 138 of file m_aws.php.

                                   {
     global $db,$msg,$cuid;
     $msg->log("aws","get_stats_details",$id);
     $db->query("SELECT id, hostname, hostaliases, public FROM aws WHERE uid='$cuid' AND id='$id';");
     if ($db->num_rows()) {
       $db->next_record();
       $id=$db->f("id");
       $hostname=$db->f("hostname");
       $hostaliases=$db->f("hostaliases");
       $public=$db->f("public");
       $db->query("SELECT login FROM aws_access WHERE id='$id';");
       $u="";
       while ($db->next_record()) {
    $u.=$db->f("login")." ";
       }
       return array(
       "id"=>$id,
       "hostname"=>$hostname,
       "users"=>$u,
                 "hostaliases"=>$hostaliases,
                 "public"=>$public
          );
     } else {
       $msg->raise('Error', "aws",_("This statistic does not exist"));
       return false;
     }
   }

References $cuid, $db, $id, and $msg.

Referenced by put_stats_details().

◆ get_view_public()

m_aws::get_view_public ( $id )

Definition at line 425 of file m_aws.php.

                                 {
     global $db,$msg,$cuid;
     $db->query("SELECT public FROM aws WHERE id='$id' and uid='$cuid';");
     if ($db->num_rows()) {
       $db->next_record();
       $pub=$db->f("public");
     } else {
      $pub=1;
    }
     return $pub;
   }

References $cuid, $db, and $msg.

◆ hook_menu()

m_aws::hook_menu ( )

Definition at line 57 of file m_aws.php.

                        {
     $obj = array(
       'title'       => _("Web Statistics"),
       'ico'         => 'images/stat.png',
       'link'        => 'aws_list.php',
       'pos'         => 80,
      ) ;
  
      return $obj;
   }

◆ hook_quota_get()

m_aws::hook_quota_get ( )

This function is called when we are asked to compute the used quota for a service.

Definition at line 651 of file m_aws.php.

                             {
     global $db,$msg,$cuid;
     $msg->log("aws","get_quota");
     $db->query("SELECT COUNT(*) AS cnt FROM aws WHERE uid='$cuid'");
     $q=Array("name"=>"aws", "description"=>_("Awstats"), "used"=>0);
     if ($db->next_record()) {
       $q['used']=$db->f("cnt");
     }
     return $q; 
   }

References $cuid, $db, $msg, and $q.

◆ host_list()

m_aws::host_list ( )

Return the list of domains / subdomains allowed for this member with the type (MX,URL,...)

Returns: array an array of allowed domains / subdomains.

Definition at line 172 of file m_aws.php.

                        {
     global $db,$msg,$cuid;
     $r=array();
     $db->query("SELECT sd.domaine, sd.sub, dt.name, dt.description FROM sub_domaines sd, domaines_type dt WHERE compte='$cuid' AND lower(sd.type) = lower(dt.name) AND dt.only_dns = false ORDER BY domaine,sub;");
     while ($db->next_record()) {
       if ($db->f("sub")) {
         $r[]=array(
             "hostname"=>$db->f("sub").".".$db->f("domaine"),
             "type"=>$db->f("name"),
             "desc"=>$db->f("description")
         );
       } else {
         $r[]=array(
             "hostname"=>$db->f("domaine"),
             "type"=>$db->f("name"),
             "desc"=>$db->f("description")
         );
       }
     }
     return $r;
   }

References $cuid, $db, $msg, and $r.

Referenced by add_stats(), and select_host_list().

◆ list_allowed_login()

m_aws::list_allowed_login ( $id )

Definition at line 410 of file m_aws.php.

                                    {
     global $db,$msg,$cuid;
     $msg->log("aws","list_allowed_login");
     $db->query("SELECT u.login,a.id FROM aws_users u LEFT JOIN aws_access a ON a.id='$id' AND a.login=u.login WHERE u.uid='$cuid';");
     $res=array();
     if (!$db->next_record()) {
       return false;
     }
     do { 
       $res[]=array("login"=>$db->f("login"),"selected"=>($db->f("id")));
     } while ($db->next_record());
     return $res;
   }

References $cuid, $db, $msg, and $res.

◆ list_login()

m_aws::list_login ( )

Definition at line 393 of file m_aws.php.

                         {
     global $db,$msg,$cuid;
     $msg->log("aws","list_login");
     $db->query("SELECT login FROM aws_users WHERE uid='$cuid';");
     $res=array();
     if (!$db->next_record()) {
    $msg->raise('Info', "aws",_("No user currently defined"));
       return false;
     }
     do { 
       $res[]=$db->f("login");
     } while ($db->next_record());
     return $res;
   }

References $cuid, $db, $msg, and $res.

◆ login_exists()

m_aws::login_exists	(	$login,
		$exists = `1`
	)

Definition at line 440 of file m_aws.php.

                                           {
     global $db,$msg,$cuid;
     $msg->log("aws","list_login");
     $db->query("SELECT login FROM aws_users WHERE uid='$cuid' AND login='$login';");
     if (!$db->next_record()) {
       return ($exists==0);
     } else {
       return ($exists==1);
     }
   }

References $cuid, $db, and $msg.

Referenced by add_login(), allow_login(), change_pass(), del_login(), and deny_login().

◆ m_aws()

m_aws::m_aws ( )

Constructor.

Definition at line 54 of file m_aws.php.

54 {

55 }

◆ prefix_list()

m_aws::prefix_list ( )

Returns the list of prefixes that can be used on current account.

Returns: array an arry with the list of domains + the login of the account

Definition at line 199 of file m_aws.php.

                          {
     global $db,$mem,$cuid;
     $r=array();
     $r[]=$mem->user["login"];
     $db->query("SELECT domaine FROM domaines WHERE compte='$cuid' ORDER BY domaine;");
     while ($db->next_record()) {
       $r[]=$db->f("domaine");
     }
     return $r;
   }

References $cuid, $db, $mem, and $r.

Referenced by _check(), and select_prefix_list().

◆ put_stats_details()

m_aws::put_stats_details	(	$id,
		$users,
		$hostaliases,
		$public
	)

Edit a statistic set (change allowed user list)

Parameters

integer	$id	the stat number we change
array	$users	the list of allowed users

Definition at line 294 of file m_aws.php.

                                                               {
     global $msg,$db,$cuid;
     if ($this->get_stats_details($id)) {
       $this->delete_allowed_login($id, 1);
       if (is_array($users)) {
         foreach($users as $v) {
           $this->allow_login($v,$id,1);
    }
       }
       $db->query("UPDATE aws SET hostaliases='$hostaliases', public='$public' where id='$id';");
       $this->_createconf($id);
       $this->_createhtpasswd();
       return true;
     } else {
       return false;
     }
   }

References $cuid, $db, $id, $msg, _createconf(), _createhtpasswd(), allow_login(), delete_allowed_login(), and get_stats_details().

◆ select_host_list()

m_aws::select_host_list ( $current )

Draw options for a select html code with the list of allowed and availables domains for this member.

Definition at line 235 of file m_aws.php.

                                       {
     $r=$this->host_list();
     reset($r);
     while (list($key,$val)=each($r)) {
       $ho=$val["hostname"];
       $ty=$val["desc"];
       if ($current==$ho) $c=" selected=\"selected\""; else $c="";
       if ($this->check_host_available($ho)) echo "<option value=\"$ho\"$c>$ho ("._($ty).")</option>";
     }
     return true;
   }

References $c, $key, $r, $val, check_host_available(), and host_list().

◆ select_prefix_list()

m_aws::select_prefix_list ( $current )

Echoes <option> tags of all the domains hosted on the account + the login of the account They can be used as a root for the login that may have access to web statistics hosted on an account $current will be the selected value.

Parameters

string $current The default selected value

Returns: boolean TRUE.

Definition at line 219 of file m_aws.php.

                                         {
     $r=$this->prefix_list();
     reset($r);
     while (list($key,$val)=each($r)) {
       if ($current==$val) $c=" selected=\"selected\""; else $c="";
       echo "<option$c>$val</option>";
     }
     return true;
   }

References $c, $key, $r, $val, and prefix_list().

Member Data Documentation

◆ $CACHEDIR

m_aws::$CACHEDIR ="/var/cache/awstats"

Definition at line 41 of file m_aws.php.

◆ $CONFDIR

m_aws::$CONFDIR ="/etc/awstats"

Where are the awstats configuration files : @access private.

Definition at line 39 of file m_aws.php.

◆ $HTAFILE

m_aws::$HTAFILE ="/etc/alternc/awstats.htpasswd"

Definition at line 40 of file m_aws.php.

◆ $TEMPLATEFILE

m_aws::$TEMPLATEFILE ="/etc/alternc/templates/awstats/awstats.template.conf"

Where is the template for conf files : @access private.

Definition at line 47 of file m_aws.php.

The documentation for this class was generated from the following file:

awstats/bureau/class/m_aws.php

Public Member Functions

Public Attributes

Detailed Description

Member Function Documentation

◆ _check()

◆ _createconf()

◆ _createhtpasswd()

◆ _delconf()

◆ add_login()

◆ add_stats()

◆ allow_login()

◆ alternc_del_domain()

◆ alternc_del_member()

◆ alternc_export()

◆ alternc_module_description()

◆ alternc_password_policy()

◆ change_pass()

◆ check_host_available()

◆ crypt_apr1_md5()

◆ del_login()

◆ delete_allowed_login()

◆ delete_stats()

◆ deny_login()

◆ get_hostaliases()

◆ get_list()

◆ get_stats_details()

◆ get_view_public()

◆ hook_menu()

◆ hook_quota_get()

◆ host_list()

◆ list_allowed_login()

◆ list_login()

◆ login_exists()

◆ m_aws()

◆ prefix_list()

◆ put_stats_details()

◆ select_host_list()

◆ select_prefix_list()

Member Data Documentation

◆ $CACHEDIR

◆ $CONFDIR

◆ $HTAFILE

◆ $TEMPLATEFILE