ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/auth.c
Revision: 4859
Committed: Fri Nov 7 17:19:38 2014 UTC (9 years, 4 months ago) by michael
Content type: text/x-csrc
File size: 14074 byte(s)
Log Message:
- auth.c:auth_connect_callback(): decreased size of 'authbuf'

File Contents

# User Rev Content
1 adx 30 /*
2 michael 2916 * ircd-hybrid: an advanced, lightweight Internet Relay Chat Daemon (ircd)
3 adx 30 *
4 michael 2916 * Copyright (c) 1997-2014 ircd-hybrid development team
5 adx 30 *
6     * This program is free software; you can redistribute it and/or modify
7     * it under the terms of the GNU General Public License as published by
8     * the Free Software Foundation; either version 2 of the License, or
9     * (at your option) any later version.
10     *
11     * This program is distributed in the hope that it will be useful,
12     * but WITHOUT ANY WARRANTY; without even the implied warranty of
13     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14     * GNU General Public License for more details.
15     *
16     * You should have received a copy of the GNU General Public License
17     * along with this program; if not, write to the Free Software
18 michael 4565 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
19 adx 30 * USA
20     */
21    
22 michael 3324 /*! \file auth.c
23 michael 2916 * \brief Functions for querying a users ident.
24     * \version $Id$
25     */
26    
27 adx 30 /*
28     * Changes:
29     * July 6, 1999 - Rewrote most of the code here. When a client connects
30     * to the server and passes initial socket validation checks, it
31     * is owned by this module (auth) which returns it to the rest of the
32     * server when dns and auth queries are finished. Until the client is
33     * released, the server does not know it exists and does not process
34     * any messages from it.
35     * --Bleep Thomas Helvey <tomh@inxpress.net>
36     */
37 michael 1309
38 adx 30 #include "stdinc.h"
39     #include "list.h"
40 michael 1011 #include "ircd_defs.h"
41     #include "fdlist.h"
42 michael 3324 #include "auth.h"
43 michael 1309 #include "conf.h"
44 adx 30 #include "client.h"
45     #include "event.h"
46     #include "irc_string.h"
47     #include "ircd.h"
48     #include "packet.h"
49 michael 3322 #include "res.h"
50 adx 30 #include "s_bsd.h"
51 michael 1309 #include "log.h"
52 adx 30 #include "send.h"
53 michael 1654 #include "mempool.h"
54 adx 30
55 michael 1011
56 michael 3563 static const char *const HeaderMessages[] =
57 michael 2916 {
58 michael 4309 ":*** Looking up your hostname",
59 michael 3168 ":*** Found your hostname",
60     ":*** Couldn't look up your hostname",
61     ":*** Checking Ident",
62     ":*** Got Ident response",
63     ":*** No Ident response",
64 michael 4309 ":*** Your forward and reverse DNS do not match, ignoring hostname",
65 michael 3168 ":*** Your hostname is too long, ignoring hostname"
66 adx 30 };
67    
68 michael 2916 enum
69     {
70 adx 30 REPORT_DO_DNS,
71     REPORT_FIN_DNS,
72     REPORT_FAIL_DNS,
73     REPORT_DO_ID,
74     REPORT_FIN_ID,
75     REPORT_FAIL_ID,
76     REPORT_IP_MISMATCH,
77     REPORT_HOST_TOOLONG
78     };
79    
80 michael 3168 #define sendheader(c, i) sendto_one_notice((c), &me, HeaderMessages[(i)])
81 adx 30
82 michael 4309 static dlink_list auth_pending_list;
83 michael 4461 static void read_auth_reply(fde_t *, void *);
84 michael 4464 static void auth_connect_callback(fde_t *, int, void *);
85 adx 30
86 michael 4094
87 adx 30 /*
88     * make_auth_request - allocate a new auth request
89     */
90     static struct AuthRequest *
91     make_auth_request(struct Client *client)
92     {
93 michael 4854 struct AuthRequest *const request = &client->connection->auth;
94 adx 30
95 michael 1654 memset(request, 0, sizeof(*request));
96 adx 30
97 michael 2181 request->client = client;
98     request->timeout = CurrentTime + CONNECTTIMEOUT;
99    
100 michael 650 return request;
101 adx 30 }
102    
103     /*
104     * release_auth_client - release auth client from auth system
105     * this adds the client into the local client lists so it can be read by
106     * the main io processing loop
107     */
108     void
109 michael 992 release_auth_client(struct AuthRequest *auth)
110 adx 30 {
111 michael 4854 struct Client *const client = auth->client;
112 michael 992
113     if (IsDoingAuth(auth) || IsDNSPending(auth))
114     return;
115    
116 michael 2929 if (IsInAuth(auth))
117     {
118 michael 4309 dlinkDelete(&auth->node, &auth_pending_list);
119 michael 2929 ClearInAuth(auth);
120     }
121 michael 992
122 adx 30 /*
123     * When a client has auth'ed, we want to start reading what it sends
124     * us. This is what read_packet() does.
125     * -- adrian
126     */
127 michael 4588 client->connection->allow_read = MAX_FLOOD;
128     comm_setflush(&client->connection->fd, 1000, flood_recalc, client);
129 michael 650
130 michael 4588 client->connection->since = CurrentTime;
131     client->connection->lasttime = CurrentTime;
132     client->connection->firsttime = CurrentTime;
133 michael 664 client->flags |= FLAGS_FINISHED_AUTH;
134 michael 650
135 michael 4588 read_packet(&client->connection->fd, client);
136 adx 30 }
137 michael 2916
138 adx 30 /*
139     * auth_dns_callback - called when resolver query finishes
140 michael 998 * if the query resulted in a successful search, name will contain
141     * a non-NULL pointer, otherwise name will be NULL.
142 adx 30 * set the client on it's way to a connection completion, regardless
143     * of success of failure
144     */
145     static void
146 michael 4408 auth_dns_callback(void *vptr, const struct irc_ssaddr *addr, const char *name, size_t namelength)
147 adx 30 {
148 michael 4854 struct AuthRequest *const auth = vptr;
149 adx 30
150     ClearDNSPending(auth);
151    
152 michael 4408 if (!EmptyString(name))
153 adx 30 {
154 michael 4588 if (auth->client->connection->ip.ss.ss_family == AF_INET6)
155 adx 30 {
156 michael 4858 const struct sockaddr_in6 *const v6 = (const struct sockaddr_in6 *)&auth->client->connection->ip;
157     const struct sockaddr_in6 *const v6dns = (const struct sockaddr_in6 *)addr;
158 michael 3250
159 adx 30 if (memcmp(&v6->sin6_addr, &v6dns->sin6_addr, sizeof(struct in6_addr)) != 0)
160     {
161     sendheader(auth->client, REPORT_IP_MISMATCH);
162 michael 4408 release_auth_client(auth);
163     return;
164 adx 30 }
165     }
166     else
167     {
168 michael 4858 const struct sockaddr_in *const v4 = (const struct sockaddr_in *)&auth->client->connection->ip;
169     const struct sockaddr_in *const v4dns = (const struct sockaddr_in *)addr;
170 michael 3250
171     if (v4->sin_addr.s_addr != v4dns->sin_addr.s_addr)
172 adx 30 {
173     sendheader(auth->client, REPORT_IP_MISMATCH);
174 michael 4408 release_auth_client(auth);
175     return;
176 adx 30 }
177     }
178 michael 3250
179 michael 4408 if (namelength > HOSTLEN)
180     sendheader(auth->client, REPORT_HOST_TOOLONG);
181     else
182 adx 30 {
183 michael 4408 strlcpy(auth->client->host, name, sizeof(auth->client->host));
184 adx 30 sendheader(auth->client, REPORT_FIN_DNS);
185     }
186     }
187     else
188 michael 992 sendheader(auth->client, REPORT_FAIL_DNS);
189 adx 30
190 michael 992 release_auth_client(auth);
191 adx 30 }
192    
193     /*
194     * authsenderr - handle auth send errors
195     */
196     static void
197     auth_error(struct AuthRequest *auth)
198     {
199 michael 896 ++ServerStats.is_abad;
200 adx 30
201     fd_close(&auth->fd);
202    
203     ClearAuth(auth);
204    
205     sendheader(auth->client, REPORT_FAIL_ID);
206    
207 michael 992 release_auth_client(auth);
208 adx 30 }
209    
210     /*
211 michael 2916 * start_auth_query - Flag the client to show that an attempt to
212 adx 30 * contact the ident server on
213     * the client's host. The connect and subsequently the socket are all put
214     * into 'non-blocking' mode. Should the connect or any later phase of the
215     * identifing process fail, it is aborted and the user is given a username
216     * of "unknown".
217     */
218     static int
219     start_auth_query(struct AuthRequest *auth)
220     {
221     struct irc_ssaddr localaddr;
222     socklen_t locallen = sizeof(struct irc_ssaddr);
223     struct sockaddr_in6 *v6;
224    
225     /* open a socket of the same type as the client socket */
226 michael 4588 if (comm_open(&auth->fd, auth->client->connection->ip.ss.ss_family,
227 adx 30 SOCK_STREAM, 0, "ident") == -1)
228     {
229 michael 2916 report_error(L_ALL, "creating auth stream socket %s:%s",
230     get_client_name(auth->client, SHOW_IP), errno);
231 michael 896 ++ServerStats.is_abad;
232 adx 30 return 0;
233     }
234    
235     sendheader(auth->client, REPORT_DO_ID);
236    
237 michael 2916 /*
238 adx 30 * get the local address of the client and bind to that to
239     * make the auth request. This used to be done only for
240     * ifdef VIRTUAL_HOST, but needs to be done for all clients
241     * since the ident request must originate from that same address--
242     * and machines with multiple IP addresses are common now
243     */
244     memset(&localaddr, 0, locallen);
245 michael 4588 getsockname(auth->client->connection->fd.fd, (struct sockaddr*)&localaddr,
246 adx 30 &locallen);
247    
248     remove_ipv6_mapping(&localaddr);
249     v6 = (struct sockaddr_in6 *)&localaddr;
250     v6->sin6_port = htons(0);
251     localaddr.ss_port = htons(0);
252    
253 michael 4309 comm_connect_tcp(&auth->fd, auth->client->sockhost, RFC1413_PORT,
254 michael 2916 (struct sockaddr *)&localaddr, localaddr.ss_len, auth_connect_callback,
255 michael 4588 auth, auth->client->connection->ip.ss.ss_family,
256 adx 30 GlobalSetOptions.ident_timeout);
257     return 1; /* We suceed here for now */
258     }
259    
260     /*
261 michael 2916 * start_auth
262 adx 30 *
263     * inputs - pointer to client to auth
264     * output - NONE
265     * side effects - starts auth (identd) and dns queries for a client
266     */
267 michael 2916 void
268 michael 3250 start_auth(struct Client *client_p)
269 adx 30 {
270 michael 4854 struct AuthRequest *const auth = make_auth_request(client_p);
271 adx 30
272 michael 2929 SetInAuth(auth);
273 michael 4309 dlinkAddTail(auth, &auth->node, &auth_pending_list);
274 adx 30
275 michael 3250 sendheader(client_p, REPORT_DO_DNS);
276 adx 30
277 michael 992 SetDNSPending(auth);
278    
279 michael 4340 if (ConfigGeneral.disable_auth == 0)
280 michael 992 {
281     SetDoingAuth(auth);
282 adx 30 start_auth_query(auth);
283 michael 992 }
284 adx 30
285 michael 4588 gethost_byaddr(auth_dns_callback, auth, &client_p->connection->ip);
286 adx 30 }
287    
288     /*
289     * timeout_auth_queries - timeout resolver and identd requests
290     * allow clients through if requests failed
291     */
292     static void
293     timeout_auth_queries_event(void *notused)
294     {
295 michael 4815 dlink_node *node = NULL, *node_next = NULL;
296 adx 30
297 michael 4815 DLINK_FOREACH_SAFE(node, node_next, auth_pending_list.head)
298 adx 30 {
299 michael 4815 struct AuthRequest *auth = node->data;
300 adx 30
301 michael 992 if (auth->timeout > CurrentTime)
302 michael 2929 break;
303 adx 30
304 michael 992 if (IsDoingAuth(auth))
305 michael 2916 {
306 michael 896 ++ServerStats.is_abad;
307 michael 1000 fd_close(&auth->fd);
308 michael 998 ClearAuth(auth);
309 adx 30 sendheader(auth->client, REPORT_FAIL_ID);
310 michael 992 }
311 adx 30
312 michael 992 if (IsDNSPending(auth))
313     {
314     delete_resolver_queries(auth);
315 michael 998 ClearDNSPending(auth);
316 michael 992 sendheader(auth->client, REPORT_FAIL_DNS);
317     }
318 adx 30
319 michael 992 release_auth_client(auth);
320 adx 30 }
321     }
322    
323     /*
324     * auth_connect_callback() - deal with the result of comm_connect_tcp()
325     *
326     * If the connection failed, we simply close the auth fd and report
327     * a failure. If the connection suceeded send the ident server a query
328     * giving "theirport , ourport". The write is only attempted *once* so
329     * it is deemed to be a fail if the entire write doesn't write all the
330     * data given. This shouldnt be a problem since the socket should have
331     * a write buffer far greater than this message to store it in should
332     * problems arise. -avalon
333     */
334     static void
335     auth_connect_callback(fde_t *fd, int error, void *data)
336     {
337     struct AuthRequest *auth = data;
338     struct irc_ssaddr us;
339     struct irc_ssaddr them;
340 michael 4859 char authbuf[16];
341 adx 30 socklen_t ulen = sizeof(struct irc_ssaddr);
342     socklen_t tlen = sizeof(struct irc_ssaddr);
343 michael 1032 uint16_t uport, tport;
344 adx 30 struct sockaddr_in6 *v6;
345    
346     if (error != COMM_OK)
347     {
348     auth_error(auth);
349     return;
350     }
351    
352 michael 4588 if (getsockname(auth->client->connection->fd.fd, (struct sockaddr *)&us, &ulen) ||
353     getpeername(auth->client->connection->fd.fd, (struct sockaddr *)&them, &tlen))
354 adx 30 {
355 michael 1247 ilog(LOG_TYPE_IRCD, "auth get{sock,peer}name error for %s",
356 michael 3250 get_client_name(auth->client, SHOW_IP));
357 adx 30 auth_error(auth);
358     return;
359     }
360    
361     v6 = (struct sockaddr_in6 *)&us;
362     uport = ntohs(v6->sin6_port);
363     v6 = (struct sockaddr_in6 *)&them;
364     tport = ntohs(v6->sin6_port);
365     remove_ipv6_mapping(&us);
366     remove_ipv6_mapping(&them);
367 michael 2916
368 michael 4309 snprintf(authbuf, sizeof(authbuf), "%u, %u\r\n", tport, uport);
369 adx 30
370     if (send(fd->fd, authbuf, strlen(authbuf), 0) == -1)
371     {
372     auth_error(auth);
373     return;
374     }
375 michael 696
376 michael 4309 comm_setselect(fd, COMM_SELECT_READ, read_auth_reply, auth, 0);
377 adx 30 }
378    
379 michael 4309 /** Enum used to index ident reply fields in a human-readable way. */
380     enum IdentReplyFields
381     {
382     IDENT_PORT_NUMBERS,
383     IDENT_REPLY_TYPE,
384     IDENT_OS_TYPE,
385     IDENT_INFO,
386     USERID_TOKEN_COUNT
387     };
388    
389     /** Parse an ident reply line and extract the userid from it.
390     * \param reply The ident reply line.
391     * \return The userid, or NULL on parse failure.
392     */
393     static const char *
394     check_ident_reply(char *reply)
395     {
396     char *token = NULL, *end = NULL;
397     char *vector[USERID_TOKEN_COUNT];
398     int count = token_vector(reply, ':', vector, USERID_TOKEN_COUNT);
399    
400     if (USERID_TOKEN_COUNT != count)
401     return NULL;
402    
403     /*
404     * Second token is the reply type
405     */
406     token = vector[IDENT_REPLY_TYPE];
407    
408     if (EmptyString(token))
409     return NULL;
410    
411     while (IsSpace(*token))
412     ++token;
413    
414     if (strncmp(token, "USERID", 6))
415     return NULL;
416    
417     /*
418     * Third token is the os type
419     */
420     token = vector[IDENT_OS_TYPE];
421    
422     if (EmptyString(token))
423     return NULL;
424    
425     while (IsSpace(*token))
426     ++token;
427    
428     /*
429     * Unless "OTHER" is specified as the operating system type, the server
430     * is expected to return the "normal" user identification of the owner
431     * of this connection. "Normal" in this context may be taken to mean a
432     * string of characters which uniquely identifies the connection owner
433     * such as a user identifier assigned by the system administrator and
434     * used by such user as a mail identifier, or as the "user" part of a
435     * user/password pair used to gain access to system resources. When an
436     * operating system is specified (e.g., anything but "OTHER"), the user
437     * identifier is expected to be in a more or less immediately useful
438     * form - e.g., something that could be used as an argument to "finger"
439     * or as a mail address.
440     */
441     if (!strncmp(token, "OTHER", 5))
442     return NULL;
443    
444     /*
445     * Fourth token is the username
446     */
447     token = vector[IDENT_INFO];
448    
449     if (EmptyString(token))
450     return NULL;
451    
452     while (IsSpace(*token))
453     ++token;
454    
455     while (*token == '~' || *token == '^')
456     ++token;
457    
458     /*
459     * Look for the end of the username, terminators are '\0, @, <SPACE>, :'
460     */
461     for (end = token; *end; ++end)
462     if (IsSpace(*end) || '@' == *end || ':' == *end)
463     break;
464     *end = '\0';
465    
466     return token;
467     }
468    
469 adx 30 /*
470 michael 2916 * read_auth_reply - read the reply (if any) from the ident server
471 adx 30 * we connected to.
472     * We only give it one shot, if the reply isn't good the first time
473     * fail the authentication entirely. --Bleep
474     */
475     static void
476     read_auth_reply(fde_t *fd, void *data)
477     {
478 michael 4854 struct AuthRequest *const auth = data;
479 michael 4309 const char *username = NULL;
480     ssize_t len = 0;
481     char buf[RFC1413_BUFSIZ + 1];
482 adx 30
483 michael 4309 if ((len = recv(fd->fd, buf, RFC1413_BUFSIZ, 0)) > 0)
484 adx 30 {
485     buf[len] = '\0';
486 michael 4309 username = check_ident_reply(buf);
487 adx 30 }
488    
489     fd_close(fd);
490    
491     ClearAuth(auth);
492    
493 michael 4309 if (EmptyString(username))
494 adx 30 {
495     sendheader(auth->client, REPORT_FAIL_ID);
496 michael 896 ++ServerStats.is_abad;
497 adx 30 }
498     else
499     {
500 michael 4309 strlcpy(auth->client->username, username, sizeof(auth->client->username));
501 adx 30 sendheader(auth->client, REPORT_FIN_ID);
502 michael 896 ++ServerStats.is_asuc;
503 adx 30 SetGotId(auth->client);
504     }
505    
506 michael 992 release_auth_client(auth);
507 adx 30 }
508    
509     /*
510     * delete_auth()
511     */
512 michael 2916 void
513 michael 992 delete_auth(struct AuthRequest *auth)
514 adx 30 {
515 michael 992 if (IsDNSPending(auth))
516     delete_resolver_queries(auth);
517 adx 30
518 michael 1000 if (IsDoingAuth(auth))
519     fd_close(&auth->fd);
520    
521 michael 2929 if (IsInAuth(auth))
522     {
523 michael 4309 dlinkDelete(&auth->node, &auth_pending_list);
524 michael 2929 ClearInAuth(auth);
525     }
526 adx 30 }
527 michael 4309
528     /* auth_init
529     *
530     * Initialise the auth code
531     */
532     void
533     auth_init(void)
534     {
535     static struct event timeout_auth_queries =
536     {
537     .name = "timeout_auth_queries_event",
538     .handler = timeout_auth_queries_event,
539     .when = 1
540     };
541    
542     event_add(&timeout_auth_queries, NULL);
543     }

Properties

Name Value
svn:eol-style native
svn:keywords Id Revision