Subversion Repositories ALCASAR

Rev

Rev 697 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 697 Rev 698
Line 17... Line 17...
17
 *   along with this program; if not, write to the                         *
17
 *   along with this program; if not, write to the                         *
18
 *   Free Software Foundation, Inc.,                                       *
18
 *   Free Software Foundation, Inc.,                                       *
19
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
19
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
20
 ***************************************************************************/
20
 ***************************************************************************/
21
 
21
 
22
// $Id: portail.php 697 2011-08-16 15:27:36Z franck $
22
// $Id: portail.php 698 2011-08-22 20:10:37Z franck $
23
 
23
 
24
// xml_utilisateur()
24
// xml_utilisateur()
25
 
25
 
26
function request ($texte) {
26
function request ($texte) {
27
		$strResult = 0;
27
		$strResult = 0;
Line 65... Line 65...
65
	if (! $sock = @fsockopen($host, $port, $num, $error, 2)) {
65
	if (! $sock = @fsockopen($host, $port, $num, $error, 2)) {
66
		return false; } # Internet access is down
66
		return false; } # Internet access is down
67
	else 	{   
67
	else 	{   
68
		fclose($sock);
68
		fclose($sock);
69
		if ($sock = @fsockopen($host2, $port, $num, $error, 2))	{
69
		if ($sock = @fsockopen($host2, $port, $num, $error, 2))	{
70
                	fputs($sock,"GET http://$host2/images/M_images/weblink.png HTTP/1.0\n\n");
70
                	fputs($sock,"GET http://$host2/images/M_images/weblink3.png HTTP/1.0\n\n");
71
                	fclose($sock); }
71
                	fclose($sock); }
72
		return true;
72
		return true;
73
		}
73
		}
74
	}
74
	}
75
// Fonction de test du filtrage
75
// Fonction de test du filtrage