2 * ircd-ratbox: A slightly useful ircd.
3 * m_pass.c: Used to send a password for a server or client{} block.
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2005 ircd-ratbox development team
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
24 * $Id: m_pass.c 3550 2007-08-09 06:47:26Z nenolod $
28 #include "client.h" /* client struct */
30 #include "send.h" /* sendto_one */
31 #include "numeric.h" /* ERR_xxx */
32 #include "ircd.h" /* me */
40 static int mr_pass(struct Client
*, struct Client
*, int, const char **);
42 struct Message pass_msgtab
= {
43 "PASS", 0, 0, 0, MFLG_SLOW
| MFLG_UNREG
,
44 {{mr_pass
, 2}, mg_reg
, mg_ignore
, mg_ignore
, mg_ignore
, mg_reg
}
47 mapi_clist_av1 pass_clist
[] = { &pass_msgtab
, NULL
};
48 DECLARE_MODULE_AV1(pass
, NULL
, NULL
, pass_clist
, NULL
, NULL
, "$Revision: 3550 $");
51 * m_pass() - Added Sat, 4 March 1989
54 * mr_pass - PASS message handler
56 * parv[2] = "TS" if this server supports TS.
57 * parv[3] = optional TS version field -- needed for TS6
60 mr_pass(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
62 char *auth_user
, *pass
, *buf
;
63 buf
= LOCAL_COPY(parv
[1]);
65 if(client_p
->localClient
->passwd
)
67 memset(client_p
->localClient
->passwd
, 0,
68 strlen(client_p
->localClient
->passwd
));
69 rb_free(client_p
->localClient
->passwd
);
70 client_p
->localClient
->passwd
= NULL
;
73 if (client_p
->localClient
->auth_user
)
75 memset(client_p
->localClient
->auth_user
, 0,
76 strlen(client_p
->localClient
->auth_user
));
77 rb_free(client_p
->localClient
->auth_user
);
78 client_p
->localClient
->auth_user
= NULL
;
81 if ((pass
= strchr(buf
, ':')) != NULL
)
92 client_p
->localClient
->passwd
= *pass
? rb_strndup(pass
, PASSWDLEN
) : NULL
;
94 if(auth_user
&& *auth_user
)
95 client_p
->localClient
->auth_user
= rb_strndup(auth_user
, PASSWDLEN
);
97 /* These are for servers only */
98 if(parc
> 2 && client_p
->user
== NULL
)
101 * It looks to me as if orabidoo wanted to have more
102 * than one set of option strings possible here...
103 * i.e. ":AABBTS" as long as TS was the last two chars
104 * however, as we are now using CAPAB, I think we can
105 * safely assume if there is a ":TS" then its a TS server
108 if(irccmp(parv
[2], "TS") == 0 && client_p
->tsinfo
== 0)
109 client_p
->tsinfo
= TS_DOESTS
;
111 if(parc
== 5 && atoi(parv
[3]) >= 6)
113 /* only mark as TS6 if the SID is valid.. */
114 if(IsDigit(parv
[4][0]) && IsIdChar(parv
[4][1]) &&
115 IsIdChar(parv
[4][2]) && parv
[4][3] == '\0' &&
116 EmptyString(client_p
->id
))
118 client_p
->localClient
->caps
|= CAP_TS6
;
119 strcpy(client_p
->id
, parv
[4]);