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
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
/* $Id: ident.C,v 1.4 1999/12/03 14:53:22 dm Exp $ */
/*
*
* Copyright (C) 1999 David Mazieres (dm@uun.org)
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2, or (at
* your option) any later version.
*
* This program is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
* USA
*
*/
#include "rxx.h"
#include "async.h"
#include "dns.h"
#include "aios.h"
#define AUTH_PORT 113
static rxx identrx ("^([^:]*:){3}\\s*(.*?)\\s*$");
struct identstat {
ptr<aios> a;
int ncb;
int err;
str user;
str host;
callback<void, str, int>::ptr cb;
void cbdone ();
void identcb (str u, int e)
{ if (u && identrx.search (u)) user = identrx[2]; cbdone (); }
void dnscb (ptr<hostent> h, int e)
{ err = e; if (h) host = h->h_name; cbdone (); }
};
void
identstat::cbdone ()
{
if (--ncb)
return;
str res;
if (user)
res = user << "@" << host;
else
res = host;
(*cb) (res, err);
delete this;
}
void
ident (int fd, callback<void, str, int>::ref cb)
{
struct sockaddr_in la, ra;
socklen_t len;
len = sizeof (la);
bzero (&la, sizeof (la));
bzero (&ra, sizeof (ra));
errno = 0;
if (getsockname (fd, (struct sockaddr *) &la, &len) < 0
|| la.sin_family != AF_INET
|| getpeername (fd, (struct sockaddr *) &ra, &len) < 0
|| ra.sin_family != AF_INET
|| len != sizeof (la)) {
warn ("ident: getsockname/getpeername: %s\n", strerror (errno));
(*cb) ("*disconnected*", ARERR_CANTSEND);
return;
}
u_int lp = ntohs (la.sin_port);
la.sin_port = htons (0);
u_int rp = ntohs (ra.sin_port);
ra.sin_port = htons (AUTH_PORT);
int ifd = socket (AF_INET, SOCK_STREAM, 0);
if (ifd >= 0) {
make_async (ifd);
if (connect (ifd, (sockaddr *) &ra, sizeof (ra)) < 0
&& errno != EINPROGRESS) {
close (ifd);
ifd = -1;
}
}
identstat *is = New identstat;
is->err = 0;
is->cb = cb;
is->host = inet_ntoa (ra.sin_addr);
if (ifd >= 0) {
is->ncb = 2;
close_on_exec (ifd);
is->a = aios::alloc (ifd);
is->a << rp << ", " << lp << "\r\n";
is->a->settimeout (15);
is->a->readline (wrap (is, &identstat::identcb));
}
else
is->ncb = 1;
dns_hostbyaddr (ra.sin_addr, wrap (is, &identstat::dnscb));
}
|
