]> git.mxchange.org Git - friendica.git/blobdiff - include/auth_ejabberd.php
Merge pull request #3879 from zeroadam/Remove-Includes-#3873
[friendica.git] / include / auth_ejabberd.php
index 5d69f1de7fbea3081c5fa8346d3e4cbb05a36403..1307d578321a91b2efd85f897cda653194f689ed 100755 (executable)
@@ -32,6 +32,9 @@
  *
  */
 
+use Friendica\App;
+use Friendica\Core\Config;
+
 if (sizeof($_SERVER["argv"]) == 0)
        die();
 
@@ -45,181 +48,266 @@ $directory = realpath($directory."/..");
 chdir($directory);
 require_once("boot.php");
 
-global $a, $db;
+global $a;
 
-if(is_null($a)) {
-       $a = new App;
+if (empty($a)) {
+       $a = new App(dirname(__DIR__));
 }
 
-if(is_null($db)) {
-       @include(".htconfig.php");
-       require_once("include/dba.php");
-       $db = new dba($db_host, $db_user, $db_pass, $db_data);
-       unset($db_host, $db_user, $db_pass, $db_data);
-};
+@include(".htconfig.php");
+require_once("include/dba.php");
+dba::connect($db_host, $db_user, $db_pass, $db_data);
+unset($db_host, $db_user, $db_pass, $db_data);
 
-// the logfile to which to write, should be writeable by the user which is running the server
-$sLogFile = get_config('jabber','logfile');
+$oAuth = new exAuth();
 
-// set true to debug if needed
-$bDebug        = get_config('jabber','debug');
+class exAuth {
+       private $bDebug;
 
-$oAuth = new exAuth($sLogFile, $bDebug);
+       /**
+        * @brief Create the class and do the authentification studd
+        *
+        * @param boolean $bDebug Debug mode
+        */
+       public function __construct() {
+               // setter
+               $this->bDebug = (int)Config::get('jabber', 'debug');
 
-class exAuth
-{
-       private $sLogFile;
-       private $bDebug;
 
-       private $rLogFile;
+               openlog('auth_ejabberd', LOG_PID, LOG_USER);
 
-       public function __construct($sLogFile, $bDebug)
-       {
-               global $db;
+               $this->writeLog(LOG_NOTICE, "start");
 
-               // setter
-               $this->sLogFile         = $sLogFile;
-               $this->bDebug           = $bDebug;
+               // We are connected to the SQL server.
+               do {
+                       // Quit if the database connection went down
+                       if (!dba::connected()) {
+                               $this->writeLog(LOG_ERR, "the database connection went down");
+                               return;
+                       }
 
-               // ovo ne provjeravamo jer ako ne mozes kreirati log file, onda si u kvascu :)
-               if ($this->sLogFile != '')
-                       $this->rLogFile = fopen($this->sLogFile, "a") or die("Error opening log file: ". $this->sLogFile);
+                       $iHeader = fgets(STDIN, 3);
+                       $aLength = unpack("n", $iHeader);
+                       $iLength = $aLength["1"];
 
-               $this->writeLog("[exAuth] start");
+                       // No data? Then quit
+                       if ($iLength == 0) {
+                               $this->writeLog(LOG_ERR, "we got no data, quitting");
+                               return;
+                       }
 
-               // ovdje bi trebali biti spojeni na MySQL, imati otvoren log i zavrtit cekalicu
-               do {
-                       $iHeader        = fgets(STDIN, 3);
-                       $aLength        = unpack("n", $iHeader);
-                       $iLength        = $aLength["1"];
-                       if($iLength > 0) {
-                               // ovo znaci da smo nesto dobili
-                               $sData = fgets(STDIN, $iLength + 1);
-                               $this->writeDebugLog("[debug] received data: ". $sData);
-                               $aCommand = explode(":", $sData);
-                               if (is_array($aCommand)){
-                                       switch ($aCommand[0]){
-                                               case "isuser":
-                                                       // provjeravamo je li korisnik dobar
-                                                       if (!isset($aCommand[1])){
-                                                               $this->writeLog("[exAuth] invalid isuser command, no username given");
-                                                               fwrite(STDOUT, pack("nn", 2, 0));
-                                                       } else {
-                                                               // ovdje provjeri je li korisnik OK
-                                                               $sUser = str_replace(array("%20", "(a)"), array(" ", "@"), $aCommand[1]);
-                                                               $this->writeDebugLog("[debug] checking isuser for ". $sUser);
-                                                               $sQuery = "SELECT `uid` FROM `user` WHERE `nickname`='". $db->escape($sUser) ."'";
-                                                               $this->writeDebugLog("[debug] using query ". $sQuery);
-                                                               if ($oResult = q($sQuery)){
-                                                                       if ($oResult) {
-                                                                               // korisnik OK
-                                                                               $this->writeLog("[exAuth] valid user: ". $sUser);
-                                                                               fwrite(STDOUT, pack("nn", 2, 1));
-                                                                       } else {
-                                                                               // korisnik nije OK
-                                                                               $this->writeLog("[exAuth] invalid user: ". $sUser);
-                                                                               fwrite(STDOUT, pack("nn", 2, 0));
-                                                                       }
-                                                                       //$oResult->close();
-                                                               } else {
-                                                                       $this->writeLog("[MySQL] invalid query: ". $sQuery);
-                                                                       fwrite(STDOUT, pack("nn", 2, 0));
-                                                               }
-                                                       }
+                       // Fetching the data
+                       $sData = fgets(STDIN, $iLength + 1);
+                       $this->writeLog(LOG_DEBUG, "received data: ". $sData);
+                       $aCommand = explode(":", $sData);
+                       if (is_array($aCommand)) {
+                               switch ($aCommand[0]) {
+                                       case "isuser":
+                                               // Check the existance of a given username
+                                               $this->isuser($aCommand);
                                                break;
-                                               case "auth":
-                                                       // provjeravamo autentifikaciju korisnika
-                                                       if (sizeof($aCommand) != 4){
-                                                               $this->writeLog("[exAuth] invalid auth command, data missing");
-                                                               fwrite(STDOUT, pack("nn", 2, 0));
-                                                       } else {
-                                                               // ovdje provjeri prijavu
-                                                               $sUser = str_replace(array("%20", "(a)"), array(" ", "@"), $aCommand[1]);
-                                                               $this->writeDebugLog("[debug] doing auth for ". $sUser);
-                                                               //$sQuery = "SELECT `uid`, `password` FROM `user` WHERE `password`='".hash('whirlpool',$aCommand[3])."' AND `nickname`='". $db->escape($sUser) ."'";
-                                                               $sQuery = "SELECT `uid`, `password` FROM `user` WHERE `nickname`='". $db->escape($sUser) ."'";
-                                                               $this->writeDebugLog("[debug] using query ". $sQuery);
-                                                               if ($oResult = q($sQuery)){
-                                                                       $Error = ($oResult[0]["password"] != hash('whirlpool',$aCommand[3]));
-/*
-                                                                       if ($oResult[0]["password"] == hash('whirlpool',$aCommand[3])) {
-                                                                               // korisnik OK
-                                                                               $this->writeLog("[exAuth] authentificated user ". $sUser ."@". $aCommand[2]);
-                                                                               fwrite(STDOUT, pack("nn", 2, 1));
-                                                                       } else {
-                                                                               // korisnik nije OK
-                                                                               $this->writeLog("[exAuth] authentification failed for user ". $sUser ."@". $aCommand[2]);
-                                                                               fwrite(STDOUT, pack("nn", 2, 0));
-                                                                       }
-                                                                       $oResult->close();
-*/
-                                                               } else {
-                                                                       $this->writeLog("[MySQL] invalid query: ". $sQuery);
-                                                                       $Error = true;
-                                                               }
-                                                               if ($Error) {
-                                                                       $oConfig = q("SELECT `v` FROM `pconfig` WHERE `uid`=1 AND `cat` = 'xmpp' AND `k`='password' LIMIT 1;");
-                                                                       $this->writeLog("[exAuth] got password ".$oConfig[0]["v"]);
-                                                                       $Error = ($aCommand[3] != $oConfig[0]["v"]);
-                                                               }
-
-                                                               if ($Error) {
-                                                                       $this->writeLog("[exAuth] authentification failed for user ". $sUser ."@". $aCommand[2]);
-                                                                       fwrite(STDOUT, pack("nn", 2, 0));
-                                                               } else {
-                                                                       $this->writeLog("[exAuth] authentificated user ". $sUser ."@". $aCommand[2]);
-                                                                       fwrite(STDOUT, pack("nn", 2, 1));
-                                                               }
-                                                       }
+                                       case "auth":
+                                               // Check if the givven password is correct
+                                               $this->auth($aCommand);
                                                break;
-                                               case "setpass":
-                                                       // postavljanje zaporke, onemoguceno
-                                                       $this->writeLog("[exAuth] setpass command disabled");
-                                                       fwrite(STDOUT, pack("nn", 2, 0));
+                                       case "setpass":
+                                               // We don't accept the setting of passwords here
+                                               $this->writeLog(LOG_NOTICE, "setpass command disabled");
+                                               fwrite(STDOUT, pack("nn", 2, 0));
                                                break;
-                                               default:
-                                                       // ako je uhvaceno ista drugo
-                                                       $this->writeLog("[exAuth] unknown command ". $aCommand[0]);
-                                                       fwrite(STDOUT, pack("nn", 2, 0));
+                                       default:
+                                               // We don't know the given command
+                                               $this->writeLog(LOG_NOTICE, "unknown command ". $aCommand[0]);
+                                               fwrite(STDOUT, pack("nn", 2, 0));
                                                break;
-                                       }
-                               } else {
-                                       $this->writeDebugLog("[debug] invalid command string");
-                                       fwrite(STDOUT, pack("nn", 2, 0));
                                }
+                       } else {
+                               $this->writeLog(LOG_NOTICE, "invalid command string ".$sData);
+                               fwrite(STDOUT, pack("nn", 2, 0));
                        }
-                       unset ($iHeader);
-                       unset ($aLength);
-                       unset ($iLength);
-                       unset($aCommand);
                } while (true);
        }
 
-       public function __destruct()
-       {
-               // zatvori log file
-               $this->writeLog("[exAuth] stop");
+       /**
+        * @brief Check if the given username exists
+        *
+        * @param array $aCommand The command array
+        */
+       private function isuser($aCommand) {
+               $a = get_app();
 
-               if (is_resource($this->rLogFile)){
-                       fclose($this->rLogFile);
+               // Check if there is a username
+               if (!isset($aCommand[1])) {
+                       $this->writeLog(LOG_NOTICE, "invalid isuser command, no username given");
+                       fwrite(STDOUT, pack("nn", 2, 0));
+                       return;
                }
-       }
 
-       private function writeLog($sMessage)
-       {
-               if (is_resource($this->rLogFile)) {
-                       fwrite($this->rLogFile, date("r") ." ". $sMessage ."\n");
+               // Now we check if the given user is valid
+               $sUser = str_replace(array("%20", "(a)"), array(" ", "@"), $aCommand[1]);
+
+               // Does the hostname match? So we try directly
+               if ($a->get_hostname() == $aCommand[2]) {
+                       $this->writeLog(LOG_INFO, "internal user check for ". $sUser."@".$aCommand[2]);
+                       $sQuery = "SELECT `uid` FROM `user` WHERE `nickname`='".dbesc($sUser)."'";
+                       $this->writeLog(LOG_DEBUG, "using query ". $sQuery);
+                       $r = q($sQuery);
+                       $found = dbm::is_result($r);
+               } else {
+                       $found = false;
                }
+
+               // If the hostnames doesn't match or there is some failure, we try to check remotely
+               if (!$found) {
+                       $found = $this->check_user($aCommand[2], $aCommand[1], true);
+               }
+
+               if ($found) {
+                       // The user is okay
+                       $this->writeLog(LOG_NOTICE, "valid user: ". $sUser);
+                       fwrite(STDOUT, pack("nn", 2, 1));
+               } else {
+                       // The user isn't okay
+                       $this->writeLog(LOG_WARNING, "invalid user: ". $sUser);
+                       fwrite(STDOUT, pack("nn", 2, 0));
+               }
+       }
+
+       /**
+        * @brief Check remote user existance via HTTP(S)
+        *
+        * @param string $host The hostname
+        * @param string $user Username
+        * @param boolean $ssl Should the check be done via SSL?
+        *
+        * @return boolean Was the user found?
+        */
+       private function check_user($host, $user, $ssl) {
+
+               $this->writeLog(LOG_INFO, "external user check for ".$user."@".$host);
+
+               $url = ($ssl ? "https":"http")."://".$host."/noscrape/".$user;
+
+               $data = z_fetch_url($url);
+
+               if (!is_array($data))
+                       return(false);
+
+               if ($data["return_code"] != "200")
+                       return(false);
+
+               $json = @json_decode($data["body"]);
+               if (!is_object($json))
+                       return(false);
+
+               return($json->nick == $user);
        }
 
-       private function writeDebugLog($sMessage)
-       {
-               if ($this->bDebug){
-                       $this->writeLog($sMessage);
+       /**
+        * @brief Authenticate the givven user and password
+        *
+        * @param array $aCommand The command array
+        */
+       private function auth($aCommand) {
+               $a = get_app();
+
+               // check user authentication
+               if (sizeof($aCommand) != 4) {
+                       $this->writeLog(LOG_NOTICE, "invalid auth command, data missing");
+                       fwrite(STDOUT, pack("nn", 2, 0));
+                       return;
+               }
+
+               // We now check if the password match
+               $sUser = str_replace(array("%20", "(a)"), array(" ", "@"), $aCommand[1]);
+
+               // Does the hostname match? So we try directly
+               if ($a->get_hostname() == $aCommand[2]) {
+                       $this->writeLog(LOG_INFO, "internal auth for ".$sUser."@".$aCommand[2]);
+
+                       $sQuery = "SELECT `uid`, `password` FROM `user` WHERE `nickname`='".dbesc($sUser)."'";
+                       $this->writeLog(LOG_DEBUG, "using query ". $sQuery);
+                       if ($oResult = q($sQuery)) {
+                               $uid = $oResult[0]["uid"];
+                               $Error = ($oResult[0]["password"] != hash('whirlpool',$aCommand[3]));
+                       } else {
+                               $this->writeLog(LOG_WARNING, "invalid query: ". $sQuery);
+                               $Error = true;
+                               $uid = -1;
+                       }
+                       if ($Error) {
+                               $oConfig = q("SELECT `v` FROM `pconfig` WHERE `uid` = %d AND `cat` = 'xmpp' AND `k`='password' LIMIT 1;", intval($uid));
+                               $this->writeLog(LOG_INFO, "check against alternate password for ".$sUser."@".$aCommand[2]);
+                               $Error = ($aCommand[3] != $oConfig[0]["v"]);
+                       }
+               } else {
+                       $Error = true;
+               }
+
+               // If the hostnames doesn't match or there is some failure, we try to check remotely
+               if ($Error) {
+                       $Error = !$this->check_credentials($aCommand[2], $aCommand[1], $aCommand[3], true);
+               }
+
+               if ($Error) {
+                       $this->writeLog(LOG_WARNING, "authentification failed for user ".$sUser."@". $aCommand[2]);
+                       fwrite(STDOUT, pack("nn", 2, 0));
+               } else {
+                       $this->writeLog(LOG_NOTICE, "authentificated user ".$sUser."@".$aCommand[2]);
+                       fwrite(STDOUT, pack("nn", 2, 1));
                }
        }
 
-}
-?>
+       /**
+        * @brief Check remote credentials via HTTP(S)
+        *
+        * @param string $host The hostname
+        * @param string $user Username
+        * @param string $password Password
+        * @param boolean $ssl Should the check be done via SSL?
+        *
+        * @return boolean Are the credentials okay?
+        */
+       private function check_credentials($host, $user, $password, $ssl) {
+               $url = ($ssl ? "https":"http")."://".$host."/api/account/verify_credentials.json";
+
+               $ch = curl_init();
+               curl_setopt($ch, CURLOPT_URL, $url);
+               curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
+               curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 5);
+               curl_setopt($ch, CURLOPT_HEADER, true);
+               curl_setopt($ch, CURLOPT_NOBODY, true);
+               curl_setopt($ch, CURLOPT_HTTPAUTH, CURLAUTH_BASIC);
+               curl_setopt($ch, CURLOPT_USERPWD, $user.':'.$password);
 
+               $header = curl_exec($ch);
+               $curl_info = @curl_getinfo($ch);
+               $http_code = $curl_info["http_code"];
+               curl_close($ch);
+
+               $this->writeLog(LOG_INFO, "external auth for ".$user."@".$host." returned ".$http_code);
+
+               return ($http_code == 200);
+       }
 
+       /**
+        * @brief write data to the syslog
+        *
+        * @param integer $loglevel The syslog loglevel
+        * @param string $sMessage The syslog message
+        */
+       private function writeLog($loglevel, $sMessage) {
+               if (!$this->bDebug && ($loglevel >= LOG_DEBUG)) {
+                       return;
+               }
+               syslog($loglevel, $sMessage);
+       }
+
+       /**
+        * @brief destroy the class, close the syslog connection.
+        */
+       public function __destruct() {
+               $this->writeLog(LOG_NOTICE, "stop");
+               closelog();
+       }
+}