Changeset 1819

Timestamp:

05/11/07 03:29:28 (2 years ago)

Author:

anarcat

Message:

renverser les commits 1799 et 1800, qui sont mal documentes et bourres de changements sans liens avec le commitlog (e.g. whitespace)

Files:

• alternc/trunk/bureau/class/m_admin.php (modified) (28 diffs)
• alternc/trunk/bureau/class/m_mail.php (modified) (14 diffs)

alternc/trunk/bureau/class/m_admin.php

@@ -73 +73 @@
-  /**
-   * Returns the known information about a hosted account
-
+ 
-   * Returns all what we know about an account (contents of the tables
-   *  <code>membres</code> et <code>local</code>)
@@ -82 +82 @@
-   * Returns FALSE if an error occurs.
-   *
-
+ 
-   * vérifie que le compte appelant est super-admin
-   * @param integer $uid Numéro de l'utilisateur dont on veut les informations.
-   * @return array Retourne un tableau associatif contenant l'ensemble des champs des tables 'membres'
-   *  et 'local' pour le membre demandé. Retourne FALSE si une erreur s'est produite.
-
+ 
-   */
-  function get($uid) {
@@ -116 +116 @@
-
-  /* ----------------------------------------------------------------- */
-
+ 
-   * @return TRUE if there's only ONE admin account
-   * Retourne true s'il n'existe qu'un seul compte administrateur
@@ -131 +131 @@
-   * Returns the list of the hosted accounts
-   * Retourne la liste des membres hébergés
-
+ 
-   * Returns all what we know about ALL the accounts (contents of the tables
-   *  <code>membres</code> et <code>local</code>)
@@ -142 +142 @@
-   * Retourne tout ce que l'on sait sur LES membres (contenu de membres et local)
-   * vérifie que le compte appelant est super-admin
-
-
+ 
+ 
-   *  produite.
-
+ 
-   */
-  function get_list($all=0) {
@@ -196 +196 @@
-  /**
-   * Creates a new hosted account
-
+  
-   * Creates a new hosted account (in the tables <code>membres</code>
-   * and <code>local</code>). Prevents any manipulation of the account if
@@ -212 +212 @@
-   *
-   * Crée un nouveau membre hébergé
-
+ 
-   * si le compte $mid n'est pas super-admin
-
+ 
-   * @param $login Nom d'utilisateur, de la forme [a-z][a-z0-9]*
-   * @param $pass Mot de passe, maxi 64 caractères
@@ -250 +250 @@
-      return false;
-    }
-
+ 
-    if ($login==$L_MYSQL_DATABASE || $login==$L_MYSQL_LOGIN || $login=="mysql" || $login=="root") {
-      $err->raise("admin",10);
@@ -292 +292 @@
-  /**
-   * Modifies an account
-
+  
-   * Modifies an account (in the tables <code>membres</code>
-   * and <code>local</code>). Prevents any manipulation of the account if
@@ -321 +321 @@
-   * @param $duration integer Durée du compte en mois
-   * @return boolean Retourne FALSE si une erreur s'est produite, TRUE sinon.
-
+ 
-   */
-  function update_mem($uid, $mail, $nom, $prenom, $pass, $enabled, $canpass, $type='default', $duration=0) {
@@ -334 +334 @@
-    $db=new DB_System();
-    if ($pass) {
-
+ 
-      $pass=_md5cr($pass);
-      $ssq=" ,pass='$pass' ";
@@ -420 +420 @@
-   *
-   * Efface un membre hébergé
-
+ 
-   * Supprime le membre spécifié. Refuse l'utilisation de l'objet si le compte $mid n'est pas super-admin
-   * @param $uid Numéro du membre à supprimer.
@@ -436 +436 @@
-    $db=new DB_System();
-    $tt=$this->get($uid);
-
-
+
+ 
-    $mem->su($uid);
-
@@ -443 +443 @@
-    $dom->alternc_del_member();
-
-
+ 
-      foreach($classes as $c) {
-        if (method_exists($GLOBALS[$c],"alternc_del_member")) {
@@ -588 +588 @@
-  }
-
-
+
-
-  /* ----------------------------------------------------------------- */
@@ -611 +611 @@
-      $err->raise("admin",2);
-      return false;
-
+ 
-    if ($db->Record["su"]!=0) {
-      $err->raise("admin",8);
@@ -632 +632 @@
-   * @param integer $uid Numéro du compte à transformer
-   * @return boolean Retourne FALSE si une erreur s'est produite.
-
+ 
-   */
-  function su2normal($uid) {
@@ -659 +659 @@
-   * server with the instructions to validate the installation of a
-   * domain for each TLD (if necessary).
-
+ 
-   * @return array An associative array like $r["tld"], $r["mode"] where tld
-   * is the tld and mode is the authorized mode.
-
-
-
-
-
-
-
-
-
+ 
+
+ 
+ 
+ 
+ 
+ 
+ 
+ 
-   * notre serveur, ou juste que le domaine existe etc.
-   * <p><b>Note</b> : Il faudrait pouvoir effectuer une requete DNS, et pouvoir juste vérifier les DNS
-   * via DIG et pas seulement via Whois</p>
-
-
+ 
+ 
-   *  TLD est le tld et MODE est le mode autorisé
-
+ 
-   */
-  function listtld() {
@@ -691 +691 @@
-  /**
-   * List the hosted domains on this server
-
+ 
-   * Return the list of hosted domains on this server, (an array of associative arrays)
-   * @return array $r[$i] / [domaine][member][noerase][gesdns][gesmx]
@@ -706 +706 @@
-  /* ----------------------------------------------------------------- */
-  /**
-
+ 
-   *
-   * Lock (or unlock) a domain, so that the member will be (not be) able to delete it
@@ -727 +727 @@
-  /* ----------------------------------------------------------------- */
-  /**
-
+ 
-   *
-   * @param $tld string top-level domain to add (org, com...)
@@ -735 +735 @@
-   *
-   * Ajoute un nouveau TLD autorisé à la liste des tld autorisés.
-
+ 
-   * @param $tld Top-Level Domain à ajouter (org, com ...)
-   * @param $mode Numéro du mode autorisé (0->5)
-   * @return boolean True si le tld a bien été ajouté, False sinon.
-
-
+ 
+ 
-  function gettld($tld) {
-    global $db,$err;
@@ -756 +756 @@
-   *
-   * @param $current integer Value to select in the list
-
-
-
+ 
+ 
+ 
-   * @param $current Valeur par défaut à sélectionner dans la liste
-
+ 
-   */
-  function selecttldmode($current=false) {
@@ -766 +766 @@
-      echo "<option value=\"$i\"";
-      if ($current==$i) echo " selected=\"selected\"";
-_($this->tldmode[$i])
+$this->tldmode[$i]
-    }
-  }
@@ -782 +782 @@
-   *
-   * Supprime le tld indiqué de la liste des TLD autorisés à l'installation
-
+ 
-   * <b>Note</b> : Cela ne supprime pas les domaines utilisant ce TLD !
-
+ 
-   * @param $tld TLD que l'on souhaite détruire
-   * @return boolean retourne true si le TLD a bien été effacé, false sinon
-
+ 
-   */
-  function deltld($tld) {
@@ -816 +816 @@
-   *
-   * Ajoute un TLD à la liste des TLD autorisés à l'installation
-
-
-
+ 
+ 
+ 
-   *  Si vous demandez le controle dans le Whois, assurez-vous que m_domains
-   *  connaisse bien comment appeler le whois du domaine correspondant !
-   * @return boolean retourne true si le TLD a bien été ajouté, false sinon
-
+ 
-   */
-  function addtld($tld,$mode) {
@@ -844 +844 @@
-  /* ----------------------------------------------------------------- */
-  /**
-
+ 
-   *
-   * @param $tld string TLD we want to modify
@@ -853 +853 @@
-   *
-   * Modifie un TLD autorisé de la liste des tld autorisés.
-
+ 
-   * @param $tld Top-Level Domain à modifier (org, com ...)
-   * @param $mode Numéro du mode autorisé (0->5)
-   * @return boolean True si le tld a bien été modifié, False sinon.
-
+ 
-   */
-  function edittld($tld,$mode) {

alternc/trunk/bureau/class/m_mail.php

@@ -107 +107 @@
-    $err->log("mail","enum_doms_mails",$dom);
-    if($letter == "@")
-               
+
-    else
-               $letter .= "%
+$letter = "%$letter
-    $db->query("SELECT mail,pop,alias FROM mail_domain WHERE mail LIKE '".addslashes($letter)."@".addslashes($dom)."' AND uid='$cuid' AND type=0;");
-    $res=array(); $i=0;
-    while ($db->next_record()) {
-
+ 
-        $size=0;
-        $r=mysql_query("SELECT size FROM size_mail WHERE alias='".str_replace("@","_",$db->f("mail"))."';");
@@ -121 +121 @@
-      if ($db->f("pop")) {
-        $login=str_replace("@","_",$db->f("mail"));
-
+ 
-      } else {
-        $account=$db->f("alias");
-      }
-
+ 
-                   "alias"=>$account,"size"=>$size);
-      $i++;
@@ -173 +173 @@
-    $err->log("mail","get_mail_details",$mail);
-    $db->query("SELECT mail,pop,alias FROM mail_domain WHERE mail='$mail' AND uid='$cuid';");
-
+ 
-      $err->raise("mail",3,$mail);
-      return false;
-    }
-
+ 
-    if ($pop) {
-      $login=str_replace("@","_",$db->f("mail"));
-
+ 
-    } else {
-      $account=$db->f("alias");
@@ -392 +392 @@
-      $err->raise("mail",6,$dom);
-      return false;
-
+    
-    $db->query("SELECT mail FROM mail_domain WHERE mail='".$mail."@".$dom."' AND uid='$cuid';");
-    if ($db->next_record()) {
-      $err->raise("mail",7,$mail."@".$dom);
-      return false;
-
+    
-
-    /* QuotaCheck */
@@ -428 +428 @@
-      $err->raise("mail",3,$dom);
-      return false;
-
+    
-    /* Ok, le mail existe, on le detruit donc... */
-    $t=explode("@",$mail);
-    $mdom=$t[0]; $dom=$t[1];
-    $pop=$db->f("pop");
-
+
-    $db->query("DELETE FROM mail_domain WHERE mail='$mail' AND uid='$cuid';");
-
@@ -452 +452 @@
-        global $db,$err;
-        $db->query("SELECT * FROM mxaccount WHERE login='$login' AND pass='$pass';");
-
+ 
-                return true;
-        }
@@ -460 +460 @@
-  /* ----------------------------------------------------------------- */
-  /**
-
+ 
-   */
-  function echo_domain_list() {
@@ -597 +597 @@
-      $err->raise("mail",6,$dom);
-      return false;
-
+    
-    */
-
@@ -612 +612 @@
-    }
-    /* Effacement du domaine himself */
-
-
-
+     
+     
+     
-    $db->query("DELETE FROM mail_domain WHERE mail='$dom';");
-    return true;
@@ -630 +630 @@
-    $err->log("mail","alternc_add_mx_domain",$dom);
-    $db->query("INSERT INTO mail_domain (mail,alias) VALUES ('$dom','$dom');");
-
+ 
-    $this->add_mail($dom,"postmaster",0,"",$mem->user["mail"]);
-    return true;
@@ -657 +657 @@
-   * Exports all the mail related information for an account.
-   * @access private
-
+ 
-   */
-  function alternc_export($tmpdir) {
@@ -692 +692 @@
-          $str.="    </address>\n";
-        }
-
+     
-      $str.="  </domain>\n";
-    }
@@ -698 +698 @@
-    fclose($f);
-    if ($onepop) {
-
-
+ 
+ 
-    }
-    @unlink($tmpfile);
@@ -708 +708 @@
-  /* ----------------------------------------------------------------- */
-  /**
-
+ 
-   * related to mail service. Each method is returned as an array
-   * containing the function name, function, signature and docstring.
-   * @access private
-
+ 
-   */
-  function alternc_xmlrpc_server() {