Finger.php
2.3 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
<?php
//
// +----------------------------------------------------------------------+
// | PHP Version 4 |
// +----------------------------------------------------------------------+
// | Copyright (c) 1997-2003 The PHP Group |
// +----------------------------------------------------------------------+
// | This source file is subject to version 2.02 of the PHP license, |
// | that is bundled with this package in the file LICENSE, and is |
// | available at through the world-wide-web at |
// | http://www.php.net/license/2_02.txt. |
// | If you did not receive a copy of the PHP license and are unable to |
// | obtain it through the world-wide-web, please send a note to |
// | license@php.net so we can mail you a copy immediately. |
// +----------------------------------------------------------------------+
// | Authors: Sebastian Nohn <sebastian@nohn.net> |
// +----------------------------------------------------------------------+
//
// $Id$
//
require_once 'PEAR.php';
require_once 'Net/Socket.php';
/**
* PEAR's Net_Finger:: interface.
*
* Provides functions useful for Finger-Queries.
*
* @version $Revision$
* @author Sebastian Nohn <sebastian@nohn.net>
* @package Net
*/
class Net_Finger
{
/**
* Implements Net_Finger::query() function using PEAR's socket functions
*
* @param string $server The finger-server to query
* @param string $query The finger database object to lookup
* @return mixed The data returned from the finger-server as string
* or a PEAR_Error ( see Net_Socket for error codes)
*/
function query($server, $query)
{
$socket = new Net_Socket;
if( PEAR::isError( $sockerror = $socket->connect($server, 79))) {
$data = new PEAR_Error( "Error connecting to $server ( Net_Socket says: ".
$sockerror->getMessage().")", $sockerror->getCode());
} else {
$query .= "\n";
$socket->write($query);
$data = $socket->read(16384);
$socket->disconnect();
}
return $data;
}
}
?>