Sous-dossier app entre old4 et old5

1 files changed, 0 insertions, 78 deletions

diff --git a/appli_3_alpha_old/include/ludo/auth.inc.php b/appli_3_alpha_old/include/ludo/auth.inc.php
deleted file mode 100644
index 18b339d..0000000
--- a/appli_3_alpha_old/include/ludo/auth.inc.php
+++ /dev/null
@@ -1,78 +0,0 @@
-<?php
-/*
- * Collection de fonctions pour une authentification externe POP3
- */
-
-// Constantes d'erreur
-define("ERR_POP3_AUTH_BADSOCK", -1);
-define("ERR_POP3_AUTH_SERVERNACK", -2);
-define("ERR_POP3_AUTH_BADUSER", -3);
-define("ERR_POP3_AUTH_BADPASS", -4);
-define("ERR_BAD_PARAMS", -100);
-
-// Fonction d'authentification pop3
-function pop3_auth_simple($mail, $upw)
-{
-	if ( ($ret = ereg ( "(^.*)@([[:alnum:]]+\.[[:alnum:]]+)", $mail, $re_tokens ) ) )
-	{
-		/* $re_tokens	[]
-		 *			[0] : email complet
-		 *			[1] : nom_mail
-		 *			[2] : serveur_mail
-		 */
-		require_once('config.inc.php');
-		$srv_conf = $CONFIG['AUTH']['POP']['SERVERS'][strtolower($re_tokens[2])];
-		if ( is_array($srv_conf) )
-		{
-			$server=$srv_conf['subdomain'];
-			$port=$srv_conf['port'];
-			if ( $srv_conf['username_is_full_mail'] )
-				{ $user = $mail; } else { $user = $re_tokens[1]; }
-			return pop3_auth ($server, $port, $user, $upw);
-		}
-	}
-	/* DEBUG
-	echo $mail . "\n" . $ret . "\n";;
-	print_r($re_tokens);
-	*/
-	return ERR_BAD_PARAMS;
-}
-
-function pop3_auth ($server, $port, $user, $upw)
-{
-	//echo "DEBUG : fsockopen($server, $port, $errno, $errstr, 10);";
-	$sock = @fsockopen($server, $port, $errno, $errstr, 10);
-	if ( $sock === false)
-	{
-		return ERR_POP3_AUTH_BADSOCK;
-	}
-
-	//stream_set_timeout ( $sock, 1, 0 );
-	
-	fputs($sock, "user $user\r\n");
-
-	if ( pop3_GetAndTestReply($sock) === false )
-	{
-		return ERR_POP3_AUTH_BADUSER;
-	}
-
-	fputs($sock, "pass $upw\r\n");
-
-	if ( pop3_GetAndTestReply($sock) === false )
-	{
-		return ERR_POP3_AUTH_BADPASS;
-	}
-
-	fputs($sock, "quit\r\n");
-	
-	return 0;
-}
-
-// Fonction interne testant les réponses du serveur POP3
-function pop3_GetAndTestReply($sock)
-{
-	$reply = fgets($sock, 128);
-	echo $reply . "\n";
-	return ( substr($reply, 0, 4) == "+OK " );
-}
-?>
\ No newline at end of file