ZG2100 Network interface source
lwip/netif/ppp/auth.c@0:b802fc31f1db, 2010-07-09 (annotated)
- Committer:
- donatien
- Date:
- Fri Jul 09 15:37:23 2010 +0000
- Revision:
- 0:b802fc31f1db
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
donatien | 0:b802fc31f1db | 1 | /***************************************************************************** |
donatien | 0:b802fc31f1db | 2 | * auth.c - Network Authentication and Phase Control program file. |
donatien | 0:b802fc31f1db | 3 | * |
donatien | 0:b802fc31f1db | 4 | * Copyright (c) 2003 by Marc Boucher, Services Informatiques (MBSI) inc. |
donatien | 0:b802fc31f1db | 5 | * Copyright (c) 1997 by Global Election Systems Inc. All rights reserved. |
donatien | 0:b802fc31f1db | 6 | * |
donatien | 0:b802fc31f1db | 7 | * The authors hereby grant permission to use, copy, modify, distribute, |
donatien | 0:b802fc31f1db | 8 | * and license this software and its documentation for any purpose, provided |
donatien | 0:b802fc31f1db | 9 | * that existing copyright notices are retained in all copies and that this |
donatien | 0:b802fc31f1db | 10 | * notice and the following disclaimer are included verbatim in any |
donatien | 0:b802fc31f1db | 11 | * distributions. No written agreement, license, or royalty fee is required |
donatien | 0:b802fc31f1db | 12 | * for any of the authorized uses. |
donatien | 0:b802fc31f1db | 13 | * |
donatien | 0:b802fc31f1db | 14 | * THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTORS *AS IS* AND ANY EXPRESS OR |
donatien | 0:b802fc31f1db | 15 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
donatien | 0:b802fc31f1db | 16 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
donatien | 0:b802fc31f1db | 17 | * IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, |
donatien | 0:b802fc31f1db | 18 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
donatien | 0:b802fc31f1db | 19 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
donatien | 0:b802fc31f1db | 20 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
donatien | 0:b802fc31f1db | 21 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
donatien | 0:b802fc31f1db | 22 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
donatien | 0:b802fc31f1db | 23 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
donatien | 0:b802fc31f1db | 24 | * |
donatien | 0:b802fc31f1db | 25 | ****************************************************************************** |
donatien | 0:b802fc31f1db | 26 | * REVISION HISTORY |
donatien | 0:b802fc31f1db | 27 | * |
donatien | 0:b802fc31f1db | 28 | * 03-01-01 Marc Boucher <marc@mbsi.ca> |
donatien | 0:b802fc31f1db | 29 | * Ported to lwIP. |
donatien | 0:b802fc31f1db | 30 | * 97-12-08 Guy Lancaster <lancasterg@acm.org>, Global Election Systems Inc. |
donatien | 0:b802fc31f1db | 31 | * Ported from public pppd code. |
donatien | 0:b802fc31f1db | 32 | *****************************************************************************/ |
donatien | 0:b802fc31f1db | 33 | /* |
donatien | 0:b802fc31f1db | 34 | * auth.c - PPP authentication and phase control. |
donatien | 0:b802fc31f1db | 35 | * |
donatien | 0:b802fc31f1db | 36 | * Copyright (c) 1993 The Australian National University. |
donatien | 0:b802fc31f1db | 37 | * All rights reserved. |
donatien | 0:b802fc31f1db | 38 | * |
donatien | 0:b802fc31f1db | 39 | * Redistribution and use in source and binary forms are permitted |
donatien | 0:b802fc31f1db | 40 | * provided that the above copyright notice and this paragraph are |
donatien | 0:b802fc31f1db | 41 | * duplicated in all such forms and that any documentation, |
donatien | 0:b802fc31f1db | 42 | * advertising materials, and other materials related to such |
donatien | 0:b802fc31f1db | 43 | * distribution and use acknowledge that the software was developed |
donatien | 0:b802fc31f1db | 44 | * by the Australian National University. The name of the University |
donatien | 0:b802fc31f1db | 45 | * may not be used to endorse or promote products derived from this |
donatien | 0:b802fc31f1db | 46 | * software without specific prior written permission. |
donatien | 0:b802fc31f1db | 47 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR |
donatien | 0:b802fc31f1db | 48 | * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED |
donatien | 0:b802fc31f1db | 49 | * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. |
donatien | 0:b802fc31f1db | 50 | * |
donatien | 0:b802fc31f1db | 51 | * Copyright (c) 1989 Carnegie Mellon University. |
donatien | 0:b802fc31f1db | 52 | * All rights reserved. |
donatien | 0:b802fc31f1db | 53 | * |
donatien | 0:b802fc31f1db | 54 | * Redistribution and use in source and binary forms are permitted |
donatien | 0:b802fc31f1db | 55 | * provided that the above copyright notice and this paragraph are |
donatien | 0:b802fc31f1db | 56 | * duplicated in all such forms and that any documentation, |
donatien | 0:b802fc31f1db | 57 | * advertising materials, and other materials related to such |
donatien | 0:b802fc31f1db | 58 | * distribution and use acknowledge that the software was developed |
donatien | 0:b802fc31f1db | 59 | * by Carnegie Mellon University. The name of the |
donatien | 0:b802fc31f1db | 60 | * University may not be used to endorse or promote products derived |
donatien | 0:b802fc31f1db | 61 | * from this software without specific prior written permission. |
donatien | 0:b802fc31f1db | 62 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR |
donatien | 0:b802fc31f1db | 63 | * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED |
donatien | 0:b802fc31f1db | 64 | * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. |
donatien | 0:b802fc31f1db | 65 | */ |
donatien | 0:b802fc31f1db | 66 | |
donatien | 0:b802fc31f1db | 67 | #include "lwip/opt.h" |
donatien | 0:b802fc31f1db | 68 | |
donatien | 0:b802fc31f1db | 69 | #if PPP_SUPPORT /* don't build if not configured for use in lwipopts.h */ |
donatien | 0:b802fc31f1db | 70 | |
donatien | 0:b802fc31f1db | 71 | #include "ppp.h" |
donatien | 0:b802fc31f1db | 72 | #include "pppdebug.h" |
donatien | 0:b802fc31f1db | 73 | |
donatien | 0:b802fc31f1db | 74 | #include "fsm.h" |
donatien | 0:b802fc31f1db | 75 | #include "lcp.h" |
donatien | 0:b802fc31f1db | 76 | #include "pap.h" |
donatien | 0:b802fc31f1db | 77 | #include "chap.h" |
donatien | 0:b802fc31f1db | 78 | #include "auth.h" |
donatien | 0:b802fc31f1db | 79 | #include "ipcp.h" |
donatien | 0:b802fc31f1db | 80 | |
donatien | 0:b802fc31f1db | 81 | #if CBCP_SUPPORT |
donatien | 0:b802fc31f1db | 82 | #include "cbcp.h" |
donatien | 0:b802fc31f1db | 83 | #endif /* CBCP_SUPPORT */ |
donatien | 0:b802fc31f1db | 84 | |
donatien | 0:b802fc31f1db | 85 | #include "lwip/inet.h" |
donatien | 0:b802fc31f1db | 86 | |
donatien | 0:b802fc31f1db | 87 | #include <string.h> |
donatien | 0:b802fc31f1db | 88 | |
donatien | 0:b802fc31f1db | 89 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 90 | /* Bits in scan_authfile return value */ |
donatien | 0:b802fc31f1db | 91 | #define NONWILD_SERVER 1 |
donatien | 0:b802fc31f1db | 92 | #define NONWILD_CLIENT 2 |
donatien | 0:b802fc31f1db | 93 | |
donatien | 0:b802fc31f1db | 94 | #define ISWILD(word) (word[0] == '*' && word[1] == 0) |
donatien | 0:b802fc31f1db | 95 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 96 | |
donatien | 0:b802fc31f1db | 97 | #if PAP_SUPPORT || CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 98 | /* The name by which the peer authenticated itself to us. */ |
donatien | 0:b802fc31f1db | 99 | static char peer_authname[MAXNAMELEN]; |
donatien | 0:b802fc31f1db | 100 | #endif /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 101 | |
donatien | 0:b802fc31f1db | 102 | /* Records which authentication operations haven't completed yet. */ |
donatien | 0:b802fc31f1db | 103 | static int auth_pending[NUM_PPP]; |
donatien | 0:b802fc31f1db | 104 | |
donatien | 0:b802fc31f1db | 105 | /* Set if we have successfully called plogin() */ |
donatien | 0:b802fc31f1db | 106 | static int logged_in; |
donatien | 0:b802fc31f1db | 107 | |
donatien | 0:b802fc31f1db | 108 | /* Set if we have run the /etc/ppp/auth-up script. */ |
donatien | 0:b802fc31f1db | 109 | static int did_authup; /* @todo, we don't need this in lwip*/ |
donatien | 0:b802fc31f1db | 110 | |
donatien | 0:b802fc31f1db | 111 | /* List of addresses which the peer may use. */ |
donatien | 0:b802fc31f1db | 112 | static struct wordlist *addresses[NUM_PPP]; |
donatien | 0:b802fc31f1db | 113 | |
donatien | 0:b802fc31f1db | 114 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 115 | /* Wordlist giving addresses which the peer may use |
donatien | 0:b802fc31f1db | 116 | without authenticating itself. */ |
donatien | 0:b802fc31f1db | 117 | static struct wordlist *noauth_addrs; |
donatien | 0:b802fc31f1db | 118 | |
donatien | 0:b802fc31f1db | 119 | /* Extra options to apply, from the secrets file entry for the peer. */ |
donatien | 0:b802fc31f1db | 120 | static struct wordlist *extra_options; |
donatien | 0:b802fc31f1db | 121 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 122 | |
donatien | 0:b802fc31f1db | 123 | /* Number of network protocols which we have opened. */ |
donatien | 0:b802fc31f1db | 124 | static int num_np_open; |
donatien | 0:b802fc31f1db | 125 | |
donatien | 0:b802fc31f1db | 126 | /* Number of network protocols which have come up. */ |
donatien | 0:b802fc31f1db | 127 | static int num_np_up; |
donatien | 0:b802fc31f1db | 128 | |
donatien | 0:b802fc31f1db | 129 | #if PAP_SUPPORT || CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 130 | /* Set if we got the contents of passwd[] from the pap-secrets file. */ |
donatien | 0:b802fc31f1db | 131 | static int passwd_from_file; |
donatien | 0:b802fc31f1db | 132 | #endif /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 133 | |
donatien | 0:b802fc31f1db | 134 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 135 | /* Set if we require authentication only because we have a default route. */ |
donatien | 0:b802fc31f1db | 136 | static bool default_auth; |
donatien | 0:b802fc31f1db | 137 | |
donatien | 0:b802fc31f1db | 138 | /* Hook to enable a plugin to control the idle time limit */ |
donatien | 0:b802fc31f1db | 139 | int (*idle_time_hook) __P((struct ppp_idle *)) = NULL; |
donatien | 0:b802fc31f1db | 140 | |
donatien | 0:b802fc31f1db | 141 | /* Hook for a plugin to say whether we can possibly authenticate any peer */ |
donatien | 0:b802fc31f1db | 142 | int (*pap_check_hook) __P((void)) = NULL; |
donatien | 0:b802fc31f1db | 143 | |
donatien | 0:b802fc31f1db | 144 | /* Hook for a plugin to check the PAP user and password */ |
donatien | 0:b802fc31f1db | 145 | int (*pap_auth_hook) __P((char *user, char *passwd, char **msgp, |
donatien | 0:b802fc31f1db | 146 | struct wordlist **paddrs, |
donatien | 0:b802fc31f1db | 147 | struct wordlist **popts)) = NULL; |
donatien | 0:b802fc31f1db | 148 | |
donatien | 0:b802fc31f1db | 149 | /* Hook for a plugin to know about the PAP user logout */ |
donatien | 0:b802fc31f1db | 150 | void (*pap_logout_hook) __P((void)) = NULL; |
donatien | 0:b802fc31f1db | 151 | |
donatien | 0:b802fc31f1db | 152 | /* Hook for a plugin to get the PAP password for authenticating us */ |
donatien | 0:b802fc31f1db | 153 | int (*pap_passwd_hook) __P((char *user, char *passwd)) = NULL; |
donatien | 0:b802fc31f1db | 154 | |
donatien | 0:b802fc31f1db | 155 | /* |
donatien | 0:b802fc31f1db | 156 | * This is used to ensure that we don't start an auth-up/down |
donatien | 0:b802fc31f1db | 157 | * script while one is already running. |
donatien | 0:b802fc31f1db | 158 | */ |
donatien | 0:b802fc31f1db | 159 | enum script_state { |
donatien | 0:b802fc31f1db | 160 | s_down, |
donatien | 0:b802fc31f1db | 161 | s_up |
donatien | 0:b802fc31f1db | 162 | }; |
donatien | 0:b802fc31f1db | 163 | |
donatien | 0:b802fc31f1db | 164 | static enum script_state auth_state = s_down; |
donatien | 0:b802fc31f1db | 165 | static enum script_state auth_script_state = s_down; |
donatien | 0:b802fc31f1db | 166 | static pid_t auth_script_pid = 0; |
donatien | 0:b802fc31f1db | 167 | |
donatien | 0:b802fc31f1db | 168 | /* |
donatien | 0:b802fc31f1db | 169 | * Option variables. |
donatien | 0:b802fc31f1db | 170 | * lwip: some of these are present in the ppp_settings structure |
donatien | 0:b802fc31f1db | 171 | */ |
donatien | 0:b802fc31f1db | 172 | bool uselogin = 0; /* Use /etc/passwd for checking PAP */ |
donatien | 0:b802fc31f1db | 173 | bool cryptpap = 0; /* Passwords in pap-secrets are encrypted */ |
donatien | 0:b802fc31f1db | 174 | bool refuse_pap = 0; /* Don't wanna auth. ourselves with PAP */ |
donatien | 0:b802fc31f1db | 175 | bool refuse_chap = 0; /* Don't wanna auth. ourselves with CHAP */ |
donatien | 0:b802fc31f1db | 176 | bool usehostname = 0; /* Use hostname for our_name */ |
donatien | 0:b802fc31f1db | 177 | bool auth_required = 0; /* Always require authentication from peer */ |
donatien | 0:b802fc31f1db | 178 | bool allow_any_ip = 0; /* Allow peer to use any IP address */ |
donatien | 0:b802fc31f1db | 179 | bool explicit_remote = 0; /* User specified explicit remote name */ |
donatien | 0:b802fc31f1db | 180 | char remote_name[MAXNAMELEN]; /* Peer's name for authentication */ |
donatien | 0:b802fc31f1db | 181 | |
donatien | 0:b802fc31f1db | 182 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 183 | |
donatien | 0:b802fc31f1db | 184 | /* Bits in auth_pending[] */ |
donatien | 0:b802fc31f1db | 185 | #define PAP_WITHPEER 1 |
donatien | 0:b802fc31f1db | 186 | #define PAP_PEER 2 |
donatien | 0:b802fc31f1db | 187 | #define CHAP_WITHPEER 4 |
donatien | 0:b802fc31f1db | 188 | #define CHAP_PEER 8 |
donatien | 0:b802fc31f1db | 189 | |
donatien | 0:b802fc31f1db | 190 | /* @todo, move this somewhere */ |
donatien | 0:b802fc31f1db | 191 | /* Used for storing a sequence of words. Usually malloced. */ |
donatien | 0:b802fc31f1db | 192 | struct wordlist { |
donatien | 0:b802fc31f1db | 193 | struct wordlist *next; |
donatien | 0:b802fc31f1db | 194 | char word[1]; |
donatien | 0:b802fc31f1db | 195 | }; |
donatien | 0:b802fc31f1db | 196 | |
donatien | 0:b802fc31f1db | 197 | |
donatien | 0:b802fc31f1db | 198 | extern char *crypt (const char *, const char *); |
donatien | 0:b802fc31f1db | 199 | |
donatien | 0:b802fc31f1db | 200 | /* Prototypes for procedures local to this file. */ |
donatien | 0:b802fc31f1db | 201 | |
donatien | 0:b802fc31f1db | 202 | static void network_phase (int); |
donatien | 0:b802fc31f1db | 203 | static void check_idle (void *); |
donatien | 0:b802fc31f1db | 204 | static void connect_time_expired (void *); |
donatien | 0:b802fc31f1db | 205 | #if 0 |
donatien | 0:b802fc31f1db | 206 | static int plogin (char *, char *, char **, int *); |
donatien | 0:b802fc31f1db | 207 | #endif |
donatien | 0:b802fc31f1db | 208 | static void plogout (void); |
donatien | 0:b802fc31f1db | 209 | static int null_login (int); |
donatien | 0:b802fc31f1db | 210 | static int get_pap_passwd (int, char *, char *); |
donatien | 0:b802fc31f1db | 211 | static int have_pap_secret (void); |
donatien | 0:b802fc31f1db | 212 | static int have_chap_secret (char *, char *, u32_t); |
donatien | 0:b802fc31f1db | 213 | static int ip_addr_check (u32_t, struct wordlist *); |
donatien | 0:b802fc31f1db | 214 | |
donatien | 0:b802fc31f1db | 215 | #if 0 /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 216 | static int scan_authfile (FILE *, char *, char *, char *, |
donatien | 0:b802fc31f1db | 217 | struct wordlist **, struct wordlist **, |
donatien | 0:b802fc31f1db | 218 | char *); |
donatien | 0:b802fc31f1db | 219 | static void free_wordlist (struct wordlist *); |
donatien | 0:b802fc31f1db | 220 | static void auth_script (char *); |
donatien | 0:b802fc31f1db | 221 | static void auth_script_done (void *); |
donatien | 0:b802fc31f1db | 222 | static void set_allowed_addrs (int unit, struct wordlist *addrs); |
donatien | 0:b802fc31f1db | 223 | static int some_ip_ok (struct wordlist *); |
donatien | 0:b802fc31f1db | 224 | static int setupapfile (char **); |
donatien | 0:b802fc31f1db | 225 | static int privgroup (char **); |
donatien | 0:b802fc31f1db | 226 | static int set_noauth_addr (char **); |
donatien | 0:b802fc31f1db | 227 | static void check_access (FILE *, char *); |
donatien | 0:b802fc31f1db | 228 | #endif /* 0 */ /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 229 | |
donatien | 0:b802fc31f1db | 230 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 231 | /* |
donatien | 0:b802fc31f1db | 232 | * Authentication-related options. |
donatien | 0:b802fc31f1db | 233 | */ |
donatien | 0:b802fc31f1db | 234 | option_t auth_options[] = { |
donatien | 0:b802fc31f1db | 235 | { "require-pap", o_bool, &lcp_wantoptions[0].neg_upap, |
donatien | 0:b802fc31f1db | 236 | "Require PAP authentication from peer", 1, &auth_required }, |
donatien | 0:b802fc31f1db | 237 | { "+pap", o_bool, &lcp_wantoptions[0].neg_upap, |
donatien | 0:b802fc31f1db | 238 | "Require PAP authentication from peer", 1, &auth_required }, |
donatien | 0:b802fc31f1db | 239 | { "refuse-pap", o_bool, &refuse_pap, |
donatien | 0:b802fc31f1db | 240 | "Don't agree to auth to peer with PAP", 1 }, |
donatien | 0:b802fc31f1db | 241 | { "-pap", o_bool, &refuse_pap, |
donatien | 0:b802fc31f1db | 242 | "Don't allow PAP authentication with peer", 1 }, |
donatien | 0:b802fc31f1db | 243 | { "require-chap", o_bool, &lcp_wantoptions[0].neg_chap, |
donatien | 0:b802fc31f1db | 244 | "Require CHAP authentication from peer", 1, &auth_required }, |
donatien | 0:b802fc31f1db | 245 | { "+chap", o_bool, &lcp_wantoptions[0].neg_chap, |
donatien | 0:b802fc31f1db | 246 | "Require CHAP authentication from peer", 1, &auth_required }, |
donatien | 0:b802fc31f1db | 247 | { "refuse-chap", o_bool, &refuse_chap, |
donatien | 0:b802fc31f1db | 248 | "Don't agree to auth to peer with CHAP", 1 }, |
donatien | 0:b802fc31f1db | 249 | { "-chap", o_bool, &refuse_chap, |
donatien | 0:b802fc31f1db | 250 | "Don't allow CHAP authentication with peer", 1 }, |
donatien | 0:b802fc31f1db | 251 | { "name", o_string, our_name, |
donatien | 0:b802fc31f1db | 252 | "Set local name for authentication", |
donatien | 0:b802fc31f1db | 253 | OPT_PRIV|OPT_STATIC, NULL, MAXNAMELEN }, |
donatien | 0:b802fc31f1db | 254 | { "user", o_string, user, |
donatien | 0:b802fc31f1db | 255 | "Set name for auth with peer", OPT_STATIC, NULL, MAXNAMELEN }, |
donatien | 0:b802fc31f1db | 256 | { "usehostname", o_bool, &usehostname, |
donatien | 0:b802fc31f1db | 257 | "Must use hostname for authentication", 1 }, |
donatien | 0:b802fc31f1db | 258 | { "remotename", o_string, remote_name, |
donatien | 0:b802fc31f1db | 259 | "Set remote name for authentication", OPT_STATIC, |
donatien | 0:b802fc31f1db | 260 | &explicit_remote, MAXNAMELEN }, |
donatien | 0:b802fc31f1db | 261 | { "auth", o_bool, &auth_required, |
donatien | 0:b802fc31f1db | 262 | "Require authentication from peer", 1 }, |
donatien | 0:b802fc31f1db | 263 | { "noauth", o_bool, &auth_required, |
donatien | 0:b802fc31f1db | 264 | "Don't require peer to authenticate", OPT_PRIV, &allow_any_ip }, |
donatien | 0:b802fc31f1db | 265 | { "login", o_bool, &uselogin, |
donatien | 0:b802fc31f1db | 266 | "Use system password database for PAP", 1 }, |
donatien | 0:b802fc31f1db | 267 | { "papcrypt", o_bool, &cryptpap, |
donatien | 0:b802fc31f1db | 268 | "PAP passwords are encrypted", 1 }, |
donatien | 0:b802fc31f1db | 269 | { "+ua", o_special, (void *)setupapfile, |
donatien | 0:b802fc31f1db | 270 | "Get PAP user and password from file" }, |
donatien | 0:b802fc31f1db | 271 | { "password", o_string, passwd, |
donatien | 0:b802fc31f1db | 272 | "Password for authenticating us to the peer", OPT_STATIC, |
donatien | 0:b802fc31f1db | 273 | NULL, MAXSECRETLEN }, |
donatien | 0:b802fc31f1db | 274 | { "privgroup", o_special, (void *)privgroup, |
donatien | 0:b802fc31f1db | 275 | "Allow group members to use privileged options", OPT_PRIV }, |
donatien | 0:b802fc31f1db | 276 | { "allow-ip", o_special, (void *)set_noauth_addr, |
donatien | 0:b802fc31f1db | 277 | "Set IP address(es) which can be used without authentication", |
donatien | 0:b802fc31f1db | 278 | OPT_PRIV }, |
donatien | 0:b802fc31f1db | 279 | { NULL } |
donatien | 0:b802fc31f1db | 280 | }; |
donatien | 0:b802fc31f1db | 281 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 282 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 283 | /* |
donatien | 0:b802fc31f1db | 284 | * setupapfile - specifies UPAP info for authenticating with peer. |
donatien | 0:b802fc31f1db | 285 | */ |
donatien | 0:b802fc31f1db | 286 | static int |
donatien | 0:b802fc31f1db | 287 | setupapfile(char **argv) |
donatien | 0:b802fc31f1db | 288 | { |
donatien | 0:b802fc31f1db | 289 | FILE * ufile; |
donatien | 0:b802fc31f1db | 290 | int l; |
donatien | 0:b802fc31f1db | 291 | |
donatien | 0:b802fc31f1db | 292 | lcp_allowoptions[0].neg_upap = 1; |
donatien | 0:b802fc31f1db | 293 | |
donatien | 0:b802fc31f1db | 294 | /* open user info file */ |
donatien | 0:b802fc31f1db | 295 | seteuid(getuid()); |
donatien | 0:b802fc31f1db | 296 | ufile = fopen(*argv, "r"); |
donatien | 0:b802fc31f1db | 297 | seteuid(0); |
donatien | 0:b802fc31f1db | 298 | if (ufile == NULL) { |
donatien | 0:b802fc31f1db | 299 | option_error("unable to open user login data file %s", *argv); |
donatien | 0:b802fc31f1db | 300 | return 0; |
donatien | 0:b802fc31f1db | 301 | } |
donatien | 0:b802fc31f1db | 302 | check_access(ufile, *argv); |
donatien | 0:b802fc31f1db | 303 | |
donatien | 0:b802fc31f1db | 304 | /* get username */ |
donatien | 0:b802fc31f1db | 305 | if (fgets(user, MAXNAMELEN - 1, ufile) == NULL |
donatien | 0:b802fc31f1db | 306 | || fgets(passwd, MAXSECRETLEN - 1, ufile) == NULL){ |
donatien | 0:b802fc31f1db | 307 | option_error("unable to read user login data file %s", *argv); |
donatien | 0:b802fc31f1db | 308 | return 0; |
donatien | 0:b802fc31f1db | 309 | } |
donatien | 0:b802fc31f1db | 310 | fclose(ufile); |
donatien | 0:b802fc31f1db | 311 | |
donatien | 0:b802fc31f1db | 312 | /* get rid of newlines */ |
donatien | 0:b802fc31f1db | 313 | l = strlen(user); |
donatien | 0:b802fc31f1db | 314 | if (l > 0 && user[l-1] == '\n') |
donatien | 0:b802fc31f1db | 315 | user[l-1] = 0; |
donatien | 0:b802fc31f1db | 316 | l = strlen(passwd); |
donatien | 0:b802fc31f1db | 317 | if (l > 0 && passwd[l-1] == '\n') |
donatien | 0:b802fc31f1db | 318 | passwd[l-1] = 0; |
donatien | 0:b802fc31f1db | 319 | |
donatien | 0:b802fc31f1db | 320 | return (1); |
donatien | 0:b802fc31f1db | 321 | } |
donatien | 0:b802fc31f1db | 322 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 323 | |
donatien | 0:b802fc31f1db | 324 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 325 | /* |
donatien | 0:b802fc31f1db | 326 | * privgroup - allow members of the group to have privileged access. |
donatien | 0:b802fc31f1db | 327 | */ |
donatien | 0:b802fc31f1db | 328 | static int |
donatien | 0:b802fc31f1db | 329 | privgroup(char **argv) |
donatien | 0:b802fc31f1db | 330 | { |
donatien | 0:b802fc31f1db | 331 | struct group *g; |
donatien | 0:b802fc31f1db | 332 | int i; |
donatien | 0:b802fc31f1db | 333 | |
donatien | 0:b802fc31f1db | 334 | g = getgrnam(*argv); |
donatien | 0:b802fc31f1db | 335 | if (g == 0) { |
donatien | 0:b802fc31f1db | 336 | option_error("group %s is unknown", *argv); |
donatien | 0:b802fc31f1db | 337 | return 0; |
donatien | 0:b802fc31f1db | 338 | } |
donatien | 0:b802fc31f1db | 339 | for (i = 0; i < ngroups; ++i) { |
donatien | 0:b802fc31f1db | 340 | if (groups[i] == g->gr_gid) { |
donatien | 0:b802fc31f1db | 341 | privileged = 1; |
donatien | 0:b802fc31f1db | 342 | break; |
donatien | 0:b802fc31f1db | 343 | } |
donatien | 0:b802fc31f1db | 344 | } |
donatien | 0:b802fc31f1db | 345 | return 1; |
donatien | 0:b802fc31f1db | 346 | } |
donatien | 0:b802fc31f1db | 347 | #endif |
donatien | 0:b802fc31f1db | 348 | |
donatien | 0:b802fc31f1db | 349 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 350 | /* |
donatien | 0:b802fc31f1db | 351 | * set_noauth_addr - set address(es) that can be used without authentication. |
donatien | 0:b802fc31f1db | 352 | * Equivalent to specifying an entry like `"" * "" addr' in pap-secrets. |
donatien | 0:b802fc31f1db | 353 | */ |
donatien | 0:b802fc31f1db | 354 | static int |
donatien | 0:b802fc31f1db | 355 | set_noauth_addr(char **argv) |
donatien | 0:b802fc31f1db | 356 | { |
donatien | 0:b802fc31f1db | 357 | char *addr = *argv; |
donatien | 0:b802fc31f1db | 358 | int l = strlen(addr); |
donatien | 0:b802fc31f1db | 359 | struct wordlist *wp; |
donatien | 0:b802fc31f1db | 360 | |
donatien | 0:b802fc31f1db | 361 | wp = (struct wordlist *) malloc(sizeof(struct wordlist) + l + 1); |
donatien | 0:b802fc31f1db | 362 | if (wp == NULL) |
donatien | 0:b802fc31f1db | 363 | novm("allow-ip argument"); |
donatien | 0:b802fc31f1db | 364 | wp->word = (char *) (wp + 1); |
donatien | 0:b802fc31f1db | 365 | wp->next = noauth_addrs; |
donatien | 0:b802fc31f1db | 366 | BCOPY(addr, wp->word, l); |
donatien | 0:b802fc31f1db | 367 | noauth_addrs = wp; |
donatien | 0:b802fc31f1db | 368 | return 1; |
donatien | 0:b802fc31f1db | 369 | } |
donatien | 0:b802fc31f1db | 370 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 371 | |
donatien | 0:b802fc31f1db | 372 | /* |
donatien | 0:b802fc31f1db | 373 | * An Open on LCP has requested a change from Dead to Establish phase. |
donatien | 0:b802fc31f1db | 374 | * Do what's necessary to bring the physical layer up. |
donatien | 0:b802fc31f1db | 375 | */ |
donatien | 0:b802fc31f1db | 376 | void |
donatien | 0:b802fc31f1db | 377 | link_required(int unit) |
donatien | 0:b802fc31f1db | 378 | { |
donatien | 0:b802fc31f1db | 379 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 380 | |
donatien | 0:b802fc31f1db | 381 | AUTHDEBUG(LOG_INFO, ("link_required: %d\n", unit)); |
donatien | 0:b802fc31f1db | 382 | } |
donatien | 0:b802fc31f1db | 383 | |
donatien | 0:b802fc31f1db | 384 | /* |
donatien | 0:b802fc31f1db | 385 | * LCP has terminated the link; go to the Dead phase and take the |
donatien | 0:b802fc31f1db | 386 | * physical layer down. |
donatien | 0:b802fc31f1db | 387 | */ |
donatien | 0:b802fc31f1db | 388 | void |
donatien | 0:b802fc31f1db | 389 | link_terminated(int unit) |
donatien | 0:b802fc31f1db | 390 | { |
donatien | 0:b802fc31f1db | 391 | AUTHDEBUG(LOG_INFO, ("link_terminated: %d\n", unit)); |
donatien | 0:b802fc31f1db | 392 | if (lcp_phase[unit] == PHASE_DEAD) { |
donatien | 0:b802fc31f1db | 393 | return; |
donatien | 0:b802fc31f1db | 394 | } |
donatien | 0:b802fc31f1db | 395 | if (logged_in) { |
donatien | 0:b802fc31f1db | 396 | plogout(); |
donatien | 0:b802fc31f1db | 397 | } |
donatien | 0:b802fc31f1db | 398 | lcp_phase[unit] = PHASE_DEAD; |
donatien | 0:b802fc31f1db | 399 | AUTHDEBUG(LOG_NOTICE, ("Connection terminated.\n")); |
donatien | 0:b802fc31f1db | 400 | pppLinkTerminated(unit); |
donatien | 0:b802fc31f1db | 401 | } |
donatien | 0:b802fc31f1db | 402 | |
donatien | 0:b802fc31f1db | 403 | /* |
donatien | 0:b802fc31f1db | 404 | * LCP has gone down; it will either die or try to re-establish. |
donatien | 0:b802fc31f1db | 405 | */ |
donatien | 0:b802fc31f1db | 406 | void |
donatien | 0:b802fc31f1db | 407 | link_down(int unit) |
donatien | 0:b802fc31f1db | 408 | { |
donatien | 0:b802fc31f1db | 409 | int i; |
donatien | 0:b802fc31f1db | 410 | struct protent *protp; |
donatien | 0:b802fc31f1db | 411 | |
donatien | 0:b802fc31f1db | 412 | AUTHDEBUG(LOG_INFO, ("link_down: %d\n", unit)); |
donatien | 0:b802fc31f1db | 413 | |
donatien | 0:b802fc31f1db | 414 | if (did_authup) { |
donatien | 0:b802fc31f1db | 415 | /* XXX Do link down processing. */ |
donatien | 0:b802fc31f1db | 416 | did_authup = 0; |
donatien | 0:b802fc31f1db | 417 | } |
donatien | 0:b802fc31f1db | 418 | for (i = 0; (protp = ppp_protocols[i]) != NULL; ++i) { |
donatien | 0:b802fc31f1db | 419 | if (!protp->enabled_flag) { |
donatien | 0:b802fc31f1db | 420 | continue; |
donatien | 0:b802fc31f1db | 421 | } |
donatien | 0:b802fc31f1db | 422 | if (protp->protocol != PPP_LCP && protp->lowerdown != NULL) { |
donatien | 0:b802fc31f1db | 423 | (*protp->lowerdown)(unit); |
donatien | 0:b802fc31f1db | 424 | } |
donatien | 0:b802fc31f1db | 425 | if (protp->protocol < 0xC000 && protp->close != NULL) { |
donatien | 0:b802fc31f1db | 426 | (*protp->close)(unit, "LCP down"); |
donatien | 0:b802fc31f1db | 427 | } |
donatien | 0:b802fc31f1db | 428 | } |
donatien | 0:b802fc31f1db | 429 | num_np_open = 0; /* number of network protocols we have opened */ |
donatien | 0:b802fc31f1db | 430 | num_np_up = 0; /* Number of network protocols which have come up */ |
donatien | 0:b802fc31f1db | 431 | |
donatien | 0:b802fc31f1db | 432 | if (lcp_phase[unit] != PHASE_DEAD) { |
donatien | 0:b802fc31f1db | 433 | lcp_phase[unit] = PHASE_TERMINATE; |
donatien | 0:b802fc31f1db | 434 | } |
donatien | 0:b802fc31f1db | 435 | pppLinkDown(unit); |
donatien | 0:b802fc31f1db | 436 | } |
donatien | 0:b802fc31f1db | 437 | |
donatien | 0:b802fc31f1db | 438 | /* |
donatien | 0:b802fc31f1db | 439 | * The link is established. |
donatien | 0:b802fc31f1db | 440 | * Proceed to the Dead, Authenticate or Network phase as appropriate. |
donatien | 0:b802fc31f1db | 441 | */ |
donatien | 0:b802fc31f1db | 442 | void |
donatien | 0:b802fc31f1db | 443 | link_established(int unit) |
donatien | 0:b802fc31f1db | 444 | { |
donatien | 0:b802fc31f1db | 445 | int auth; |
donatien | 0:b802fc31f1db | 446 | int i; |
donatien | 0:b802fc31f1db | 447 | struct protent *protp; |
donatien | 0:b802fc31f1db | 448 | lcp_options *wo = &lcp_wantoptions[unit]; |
donatien | 0:b802fc31f1db | 449 | lcp_options *go = &lcp_gotoptions[unit]; |
donatien | 0:b802fc31f1db | 450 | #if PAP_SUPPORT || CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 451 | lcp_options *ho = &lcp_hisoptions[unit]; |
donatien | 0:b802fc31f1db | 452 | #endif /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 453 | |
donatien | 0:b802fc31f1db | 454 | AUTHDEBUG(LOG_INFO, ("link_established: unit %d; Lowering up all protocols...\n", unit)); |
donatien | 0:b802fc31f1db | 455 | /* |
donatien | 0:b802fc31f1db | 456 | * Tell higher-level protocols that LCP is up. |
donatien | 0:b802fc31f1db | 457 | */ |
donatien | 0:b802fc31f1db | 458 | for (i = 0; (protp = ppp_protocols[i]) != NULL; ++i) { |
donatien | 0:b802fc31f1db | 459 | if (protp->protocol != PPP_LCP && protp->enabled_flag && protp->lowerup != NULL) { |
donatien | 0:b802fc31f1db | 460 | (*protp->lowerup)(unit); |
donatien | 0:b802fc31f1db | 461 | } |
donatien | 0:b802fc31f1db | 462 | } |
donatien | 0:b802fc31f1db | 463 | if (ppp_settings.auth_required && !(go->neg_chap || go->neg_upap)) { |
donatien | 0:b802fc31f1db | 464 | /* |
donatien | 0:b802fc31f1db | 465 | * We wanted the peer to authenticate itself, and it refused: |
donatien | 0:b802fc31f1db | 466 | * treat it as though it authenticated with PAP using a username |
donatien | 0:b802fc31f1db | 467 | * of "" and a password of "". If that's not OK, boot it out. |
donatien | 0:b802fc31f1db | 468 | */ |
donatien | 0:b802fc31f1db | 469 | if (!wo->neg_upap || !null_login(unit)) { |
donatien | 0:b802fc31f1db | 470 | AUTHDEBUG(LOG_WARNING, ("peer refused to authenticate\n")); |
donatien | 0:b802fc31f1db | 471 | lcp_close(unit, "peer refused to authenticate"); |
donatien | 0:b802fc31f1db | 472 | return; |
donatien | 0:b802fc31f1db | 473 | } |
donatien | 0:b802fc31f1db | 474 | } |
donatien | 0:b802fc31f1db | 475 | |
donatien | 0:b802fc31f1db | 476 | lcp_phase[unit] = PHASE_AUTHENTICATE; |
donatien | 0:b802fc31f1db | 477 | auth = 0; |
donatien | 0:b802fc31f1db | 478 | #if CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 479 | if (go->neg_chap) { |
donatien | 0:b802fc31f1db | 480 | ChapAuthPeer(unit, ppp_settings.our_name, go->chap_mdtype); |
donatien | 0:b802fc31f1db | 481 | auth |= CHAP_PEER; |
donatien | 0:b802fc31f1db | 482 | } |
donatien | 0:b802fc31f1db | 483 | #endif /* CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 484 | #if PAP_SUPPORT && CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 485 | else |
donatien | 0:b802fc31f1db | 486 | #endif /* PAP_SUPPORT && CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 487 | #if PAP_SUPPORT |
donatien | 0:b802fc31f1db | 488 | if (go->neg_upap) { |
donatien | 0:b802fc31f1db | 489 | upap_authpeer(unit); |
donatien | 0:b802fc31f1db | 490 | auth |= PAP_PEER; |
donatien | 0:b802fc31f1db | 491 | } |
donatien | 0:b802fc31f1db | 492 | #endif /* PAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 493 | #if CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 494 | if (ho->neg_chap) { |
donatien | 0:b802fc31f1db | 495 | ChapAuthWithPeer(unit, ppp_settings.user, ho->chap_mdtype); |
donatien | 0:b802fc31f1db | 496 | auth |= CHAP_WITHPEER; |
donatien | 0:b802fc31f1db | 497 | } |
donatien | 0:b802fc31f1db | 498 | #endif /* CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 499 | #if PAP_SUPPORT && CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 500 | else |
donatien | 0:b802fc31f1db | 501 | #endif /* PAP_SUPPORT && CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 502 | #if PAP_SUPPORT |
donatien | 0:b802fc31f1db | 503 | if (ho->neg_upap) { |
donatien | 0:b802fc31f1db | 504 | if (ppp_settings.passwd[0] == 0) { |
donatien | 0:b802fc31f1db | 505 | passwd_from_file = 1; |
donatien | 0:b802fc31f1db | 506 | if (!get_pap_passwd(unit, ppp_settings.user, ppp_settings.passwd)) { |
donatien | 0:b802fc31f1db | 507 | AUTHDEBUG(LOG_ERR, ("No secret found for PAP login\n")); |
donatien | 0:b802fc31f1db | 508 | } |
donatien | 0:b802fc31f1db | 509 | } |
donatien | 0:b802fc31f1db | 510 | upap_authwithpeer(unit, ppp_settings.user, ppp_settings.passwd); |
donatien | 0:b802fc31f1db | 511 | auth |= PAP_WITHPEER; |
donatien | 0:b802fc31f1db | 512 | } |
donatien | 0:b802fc31f1db | 513 | #endif /* PAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 514 | auth_pending[unit] = auth; |
donatien | 0:b802fc31f1db | 515 | |
donatien | 0:b802fc31f1db | 516 | if (!auth) { |
donatien | 0:b802fc31f1db | 517 | network_phase(unit); |
donatien | 0:b802fc31f1db | 518 | } |
donatien | 0:b802fc31f1db | 519 | } |
donatien | 0:b802fc31f1db | 520 | |
donatien | 0:b802fc31f1db | 521 | /* |
donatien | 0:b802fc31f1db | 522 | * Proceed to the network phase. |
donatien | 0:b802fc31f1db | 523 | */ |
donatien | 0:b802fc31f1db | 524 | static void |
donatien | 0:b802fc31f1db | 525 | network_phase(int unit) |
donatien | 0:b802fc31f1db | 526 | { |
donatien | 0:b802fc31f1db | 527 | int i; |
donatien | 0:b802fc31f1db | 528 | struct protent *protp; |
donatien | 0:b802fc31f1db | 529 | lcp_options *go = &lcp_gotoptions[unit]; |
donatien | 0:b802fc31f1db | 530 | |
donatien | 0:b802fc31f1db | 531 | /* |
donatien | 0:b802fc31f1db | 532 | * If the peer had to authenticate, run the auth-up script now. |
donatien | 0:b802fc31f1db | 533 | */ |
donatien | 0:b802fc31f1db | 534 | if ((go->neg_chap || go->neg_upap) && !did_authup) { |
donatien | 0:b802fc31f1db | 535 | /* XXX Do setup for peer authentication. */ |
donatien | 0:b802fc31f1db | 536 | did_authup = 1; |
donatien | 0:b802fc31f1db | 537 | } |
donatien | 0:b802fc31f1db | 538 | |
donatien | 0:b802fc31f1db | 539 | #if CBCP_SUPPORT |
donatien | 0:b802fc31f1db | 540 | /* |
donatien | 0:b802fc31f1db | 541 | * If we negotiated callback, do it now. |
donatien | 0:b802fc31f1db | 542 | */ |
donatien | 0:b802fc31f1db | 543 | if (go->neg_cbcp) { |
donatien | 0:b802fc31f1db | 544 | lcp_phase[unit] = PHASE_CALLBACK; |
donatien | 0:b802fc31f1db | 545 | (*cbcp_protent.open)(unit); |
donatien | 0:b802fc31f1db | 546 | return; |
donatien | 0:b802fc31f1db | 547 | } |
donatien | 0:b802fc31f1db | 548 | #endif /* CBCP_SUPPORT */ |
donatien | 0:b802fc31f1db | 549 | |
donatien | 0:b802fc31f1db | 550 | lcp_phase[unit] = PHASE_NETWORK; |
donatien | 0:b802fc31f1db | 551 | for (i = 0; (protp = ppp_protocols[i]) != NULL; ++i) { |
donatien | 0:b802fc31f1db | 552 | if (protp->protocol < 0xC000 && protp->enabled_flag && protp->open != NULL) { |
donatien | 0:b802fc31f1db | 553 | (*protp->open)(unit); |
donatien | 0:b802fc31f1db | 554 | if (protp->protocol != PPP_CCP) { |
donatien | 0:b802fc31f1db | 555 | ++num_np_open; |
donatien | 0:b802fc31f1db | 556 | } |
donatien | 0:b802fc31f1db | 557 | } |
donatien | 0:b802fc31f1db | 558 | } |
donatien | 0:b802fc31f1db | 559 | |
donatien | 0:b802fc31f1db | 560 | if (num_np_open == 0) { |
donatien | 0:b802fc31f1db | 561 | /* nothing to do */ |
donatien | 0:b802fc31f1db | 562 | lcp_close(0, "No network protocols running"); |
donatien | 0:b802fc31f1db | 563 | } |
donatien | 0:b802fc31f1db | 564 | } |
donatien | 0:b802fc31f1db | 565 | /* @todo: add void start_networks(void) here (pppd 2.3.11) */ |
donatien | 0:b802fc31f1db | 566 | |
donatien | 0:b802fc31f1db | 567 | /* |
donatien | 0:b802fc31f1db | 568 | * The peer has failed to authenticate himself using `protocol'. |
donatien | 0:b802fc31f1db | 569 | */ |
donatien | 0:b802fc31f1db | 570 | void |
donatien | 0:b802fc31f1db | 571 | auth_peer_fail(int unit, u16_t protocol) |
donatien | 0:b802fc31f1db | 572 | { |
donatien | 0:b802fc31f1db | 573 | LWIP_UNUSED_ARG(protocol); |
donatien | 0:b802fc31f1db | 574 | |
donatien | 0:b802fc31f1db | 575 | AUTHDEBUG(LOG_INFO, ("auth_peer_fail: %d proto=%X\n", unit, protocol)); |
donatien | 0:b802fc31f1db | 576 | /* |
donatien | 0:b802fc31f1db | 577 | * Authentication failure: take the link down |
donatien | 0:b802fc31f1db | 578 | */ |
donatien | 0:b802fc31f1db | 579 | lcp_close(unit, "Authentication failed"); |
donatien | 0:b802fc31f1db | 580 | } |
donatien | 0:b802fc31f1db | 581 | |
donatien | 0:b802fc31f1db | 582 | |
donatien | 0:b802fc31f1db | 583 | #if PAP_SUPPORT || CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 584 | /* |
donatien | 0:b802fc31f1db | 585 | * The peer has been successfully authenticated using `protocol'. |
donatien | 0:b802fc31f1db | 586 | */ |
donatien | 0:b802fc31f1db | 587 | void |
donatien | 0:b802fc31f1db | 588 | auth_peer_success(int unit, u16_t protocol, char *name, int namelen) |
donatien | 0:b802fc31f1db | 589 | { |
donatien | 0:b802fc31f1db | 590 | int pbit; |
donatien | 0:b802fc31f1db | 591 | |
donatien | 0:b802fc31f1db | 592 | AUTHDEBUG(LOG_INFO, ("auth_peer_success: %d proto=%X\n", unit, protocol)); |
donatien | 0:b802fc31f1db | 593 | switch (protocol) { |
donatien | 0:b802fc31f1db | 594 | case PPP_CHAP: |
donatien | 0:b802fc31f1db | 595 | pbit = CHAP_PEER; |
donatien | 0:b802fc31f1db | 596 | break; |
donatien | 0:b802fc31f1db | 597 | case PPP_PAP: |
donatien | 0:b802fc31f1db | 598 | pbit = PAP_PEER; |
donatien | 0:b802fc31f1db | 599 | break; |
donatien | 0:b802fc31f1db | 600 | default: |
donatien | 0:b802fc31f1db | 601 | AUTHDEBUG(LOG_WARNING, ("auth_peer_success: unknown protocol %x\n", protocol)); |
donatien | 0:b802fc31f1db | 602 | return; |
donatien | 0:b802fc31f1db | 603 | } |
donatien | 0:b802fc31f1db | 604 | |
donatien | 0:b802fc31f1db | 605 | /* |
donatien | 0:b802fc31f1db | 606 | * Save the authenticated name of the peer for later. |
donatien | 0:b802fc31f1db | 607 | */ |
donatien | 0:b802fc31f1db | 608 | if (namelen > (int)sizeof(peer_authname) - 1) { |
donatien | 0:b802fc31f1db | 609 | namelen = sizeof(peer_authname) - 1; |
donatien | 0:b802fc31f1db | 610 | } |
donatien | 0:b802fc31f1db | 611 | BCOPY(name, peer_authname, namelen); |
donatien | 0:b802fc31f1db | 612 | peer_authname[namelen] = 0; |
donatien | 0:b802fc31f1db | 613 | |
donatien | 0:b802fc31f1db | 614 | /* |
donatien | 0:b802fc31f1db | 615 | * If there is no more authentication still to be done, |
donatien | 0:b802fc31f1db | 616 | * proceed to the network (or callback) phase. |
donatien | 0:b802fc31f1db | 617 | */ |
donatien | 0:b802fc31f1db | 618 | if ((auth_pending[unit] &= ~pbit) == 0) { |
donatien | 0:b802fc31f1db | 619 | network_phase(unit); |
donatien | 0:b802fc31f1db | 620 | } |
donatien | 0:b802fc31f1db | 621 | } |
donatien | 0:b802fc31f1db | 622 | |
donatien | 0:b802fc31f1db | 623 | /* |
donatien | 0:b802fc31f1db | 624 | * We have failed to authenticate ourselves to the peer using `protocol'. |
donatien | 0:b802fc31f1db | 625 | */ |
donatien | 0:b802fc31f1db | 626 | void |
donatien | 0:b802fc31f1db | 627 | auth_withpeer_fail(int unit, u16_t protocol) |
donatien | 0:b802fc31f1db | 628 | { |
donatien | 0:b802fc31f1db | 629 | int errCode = PPPERR_AUTHFAIL; |
donatien | 0:b802fc31f1db | 630 | |
donatien | 0:b802fc31f1db | 631 | LWIP_UNUSED_ARG(protocol); |
donatien | 0:b802fc31f1db | 632 | |
donatien | 0:b802fc31f1db | 633 | AUTHDEBUG(LOG_INFO, ("auth_withpeer_fail: %d proto=%X\n", unit, protocol)); |
donatien | 0:b802fc31f1db | 634 | if (passwd_from_file) { |
donatien | 0:b802fc31f1db | 635 | BZERO(ppp_settings.passwd, MAXSECRETLEN); |
donatien | 0:b802fc31f1db | 636 | } |
donatien | 0:b802fc31f1db | 637 | |
donatien | 0:b802fc31f1db | 638 | /* |
donatien | 0:b802fc31f1db | 639 | * We've failed to authenticate ourselves to our peer. |
donatien | 0:b802fc31f1db | 640 | * He'll probably take the link down, and there's not much |
donatien | 0:b802fc31f1db | 641 | * we can do except wait for that. |
donatien | 0:b802fc31f1db | 642 | */ |
donatien | 0:b802fc31f1db | 643 | pppIOCtl(unit, PPPCTLS_ERRCODE, &errCode); |
donatien | 0:b802fc31f1db | 644 | lcp_close(unit, "Failed to authenticate ourselves to peer"); |
donatien | 0:b802fc31f1db | 645 | } |
donatien | 0:b802fc31f1db | 646 | |
donatien | 0:b802fc31f1db | 647 | /* |
donatien | 0:b802fc31f1db | 648 | * We have successfully authenticated ourselves with the peer using `protocol'. |
donatien | 0:b802fc31f1db | 649 | */ |
donatien | 0:b802fc31f1db | 650 | void |
donatien | 0:b802fc31f1db | 651 | auth_withpeer_success(int unit, u16_t protocol) |
donatien | 0:b802fc31f1db | 652 | { |
donatien | 0:b802fc31f1db | 653 | int pbit; |
donatien | 0:b802fc31f1db | 654 | |
donatien | 0:b802fc31f1db | 655 | AUTHDEBUG(LOG_INFO, ("auth_withpeer_success: %d proto=%X\n", unit, protocol)); |
donatien | 0:b802fc31f1db | 656 | switch (protocol) { |
donatien | 0:b802fc31f1db | 657 | case PPP_CHAP: |
donatien | 0:b802fc31f1db | 658 | pbit = CHAP_WITHPEER; |
donatien | 0:b802fc31f1db | 659 | break; |
donatien | 0:b802fc31f1db | 660 | case PPP_PAP: |
donatien | 0:b802fc31f1db | 661 | if (passwd_from_file) { |
donatien | 0:b802fc31f1db | 662 | BZERO(ppp_settings.passwd, MAXSECRETLEN); |
donatien | 0:b802fc31f1db | 663 | } |
donatien | 0:b802fc31f1db | 664 | pbit = PAP_WITHPEER; |
donatien | 0:b802fc31f1db | 665 | break; |
donatien | 0:b802fc31f1db | 666 | default: |
donatien | 0:b802fc31f1db | 667 | AUTHDEBUG(LOG_WARNING, ("auth_peer_success: unknown protocol %x\n", protocol)); |
donatien | 0:b802fc31f1db | 668 | pbit = 0; |
donatien | 0:b802fc31f1db | 669 | } |
donatien | 0:b802fc31f1db | 670 | |
donatien | 0:b802fc31f1db | 671 | /* |
donatien | 0:b802fc31f1db | 672 | * If there is no more authentication still being done, |
donatien | 0:b802fc31f1db | 673 | * proceed to the network (or callback) phase. |
donatien | 0:b802fc31f1db | 674 | */ |
donatien | 0:b802fc31f1db | 675 | if ((auth_pending[unit] &= ~pbit) == 0) { |
donatien | 0:b802fc31f1db | 676 | network_phase(unit); |
donatien | 0:b802fc31f1db | 677 | } |
donatien | 0:b802fc31f1db | 678 | } |
donatien | 0:b802fc31f1db | 679 | #endif /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 680 | |
donatien | 0:b802fc31f1db | 681 | |
donatien | 0:b802fc31f1db | 682 | /* |
donatien | 0:b802fc31f1db | 683 | * np_up - a network protocol has come up. |
donatien | 0:b802fc31f1db | 684 | */ |
donatien | 0:b802fc31f1db | 685 | void |
donatien | 0:b802fc31f1db | 686 | np_up(int unit, u16_t proto) |
donatien | 0:b802fc31f1db | 687 | { |
donatien | 0:b802fc31f1db | 688 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 689 | LWIP_UNUSED_ARG(proto); |
donatien | 0:b802fc31f1db | 690 | |
donatien | 0:b802fc31f1db | 691 | AUTHDEBUG(LOG_INFO, ("np_up: %d proto=%X\n", unit, proto)); |
donatien | 0:b802fc31f1db | 692 | if (num_np_up == 0) { |
donatien | 0:b802fc31f1db | 693 | AUTHDEBUG(LOG_INFO, ("np_up: maxconnect=%d idle_time_limit=%d\n",ppp_settings.maxconnect,ppp_settings.idle_time_limit)); |
donatien | 0:b802fc31f1db | 694 | /* |
donatien | 0:b802fc31f1db | 695 | * At this point we consider that the link has come up successfully. |
donatien | 0:b802fc31f1db | 696 | */ |
donatien | 0:b802fc31f1db | 697 | if (ppp_settings.idle_time_limit > 0) { |
donatien | 0:b802fc31f1db | 698 | TIMEOUT(check_idle, NULL, ppp_settings.idle_time_limit); |
donatien | 0:b802fc31f1db | 699 | } |
donatien | 0:b802fc31f1db | 700 | |
donatien | 0:b802fc31f1db | 701 | /* |
donatien | 0:b802fc31f1db | 702 | * Set a timeout to close the connection once the maximum |
donatien | 0:b802fc31f1db | 703 | * connect time has expired. |
donatien | 0:b802fc31f1db | 704 | */ |
donatien | 0:b802fc31f1db | 705 | if (ppp_settings.maxconnect > 0) { |
donatien | 0:b802fc31f1db | 706 | TIMEOUT(connect_time_expired, 0, ppp_settings.maxconnect); |
donatien | 0:b802fc31f1db | 707 | } |
donatien | 0:b802fc31f1db | 708 | } |
donatien | 0:b802fc31f1db | 709 | ++num_np_up; |
donatien | 0:b802fc31f1db | 710 | } |
donatien | 0:b802fc31f1db | 711 | |
donatien | 0:b802fc31f1db | 712 | /* |
donatien | 0:b802fc31f1db | 713 | * np_down - a network protocol has gone down. |
donatien | 0:b802fc31f1db | 714 | */ |
donatien | 0:b802fc31f1db | 715 | void |
donatien | 0:b802fc31f1db | 716 | np_down(int unit, u16_t proto) |
donatien | 0:b802fc31f1db | 717 | { |
donatien | 0:b802fc31f1db | 718 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 719 | LWIP_UNUSED_ARG(proto); |
donatien | 0:b802fc31f1db | 720 | |
donatien | 0:b802fc31f1db | 721 | AUTHDEBUG(LOG_INFO, ("np_down: %d proto=%X\n", unit, proto)); |
donatien | 0:b802fc31f1db | 722 | if (--num_np_up == 0 && ppp_settings.idle_time_limit > 0) { |
donatien | 0:b802fc31f1db | 723 | UNTIMEOUT(check_idle, NULL); |
donatien | 0:b802fc31f1db | 724 | } |
donatien | 0:b802fc31f1db | 725 | } |
donatien | 0:b802fc31f1db | 726 | |
donatien | 0:b802fc31f1db | 727 | /* |
donatien | 0:b802fc31f1db | 728 | * np_finished - a network protocol has finished using the link. |
donatien | 0:b802fc31f1db | 729 | */ |
donatien | 0:b802fc31f1db | 730 | void |
donatien | 0:b802fc31f1db | 731 | np_finished(int unit, u16_t proto) |
donatien | 0:b802fc31f1db | 732 | { |
donatien | 0:b802fc31f1db | 733 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 734 | LWIP_UNUSED_ARG(proto); |
donatien | 0:b802fc31f1db | 735 | |
donatien | 0:b802fc31f1db | 736 | AUTHDEBUG(LOG_INFO, ("np_finished: %d proto=%X\n", unit, proto)); |
donatien | 0:b802fc31f1db | 737 | if (--num_np_open <= 0) { |
donatien | 0:b802fc31f1db | 738 | /* no further use for the link: shut up shop. */ |
donatien | 0:b802fc31f1db | 739 | lcp_close(0, "No network protocols running"); |
donatien | 0:b802fc31f1db | 740 | } |
donatien | 0:b802fc31f1db | 741 | } |
donatien | 0:b802fc31f1db | 742 | |
donatien | 0:b802fc31f1db | 743 | /* |
donatien | 0:b802fc31f1db | 744 | * check_idle - check whether the link has been idle for long |
donatien | 0:b802fc31f1db | 745 | * enough that we can shut it down. |
donatien | 0:b802fc31f1db | 746 | */ |
donatien | 0:b802fc31f1db | 747 | static void |
donatien | 0:b802fc31f1db | 748 | check_idle(void *arg) |
donatien | 0:b802fc31f1db | 749 | { |
donatien | 0:b802fc31f1db | 750 | struct ppp_idle idle; |
donatien | 0:b802fc31f1db | 751 | u_short itime; |
donatien | 0:b802fc31f1db | 752 | |
donatien | 0:b802fc31f1db | 753 | LWIP_UNUSED_ARG(arg); |
donatien | 0:b802fc31f1db | 754 | if (!get_idle_time(0, &idle)) { |
donatien | 0:b802fc31f1db | 755 | return; |
donatien | 0:b802fc31f1db | 756 | } |
donatien | 0:b802fc31f1db | 757 | itime = LWIP_MIN(idle.xmit_idle, idle.recv_idle); |
donatien | 0:b802fc31f1db | 758 | if (itime >= ppp_settings.idle_time_limit) { |
donatien | 0:b802fc31f1db | 759 | /* link is idle: shut it down. */ |
donatien | 0:b802fc31f1db | 760 | AUTHDEBUG(LOG_INFO, ("Terminating connection due to lack of activity.\n")); |
donatien | 0:b802fc31f1db | 761 | lcp_close(0, "Link inactive"); |
donatien | 0:b802fc31f1db | 762 | } else { |
donatien | 0:b802fc31f1db | 763 | TIMEOUT(check_idle, NULL, ppp_settings.idle_time_limit - itime); |
donatien | 0:b802fc31f1db | 764 | } |
donatien | 0:b802fc31f1db | 765 | } |
donatien | 0:b802fc31f1db | 766 | |
donatien | 0:b802fc31f1db | 767 | /* |
donatien | 0:b802fc31f1db | 768 | * connect_time_expired - log a message and close the connection. |
donatien | 0:b802fc31f1db | 769 | */ |
donatien | 0:b802fc31f1db | 770 | static void |
donatien | 0:b802fc31f1db | 771 | connect_time_expired(void *arg) |
donatien | 0:b802fc31f1db | 772 | { |
donatien | 0:b802fc31f1db | 773 | LWIP_UNUSED_ARG(arg); |
donatien | 0:b802fc31f1db | 774 | |
donatien | 0:b802fc31f1db | 775 | AUTHDEBUG(LOG_INFO, ("Connect time expired\n")); |
donatien | 0:b802fc31f1db | 776 | lcp_close(0, "Connect time expired"); /* Close connection */ |
donatien | 0:b802fc31f1db | 777 | } |
donatien | 0:b802fc31f1db | 778 | |
donatien | 0:b802fc31f1db | 779 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 780 | /* |
donatien | 0:b802fc31f1db | 781 | * auth_check_options - called to check authentication options. |
donatien | 0:b802fc31f1db | 782 | */ |
donatien | 0:b802fc31f1db | 783 | void |
donatien | 0:b802fc31f1db | 784 | auth_check_options(void) |
donatien | 0:b802fc31f1db | 785 | { |
donatien | 0:b802fc31f1db | 786 | lcp_options *wo = &lcp_wantoptions[0]; |
donatien | 0:b802fc31f1db | 787 | int can_auth; |
donatien | 0:b802fc31f1db | 788 | ipcp_options *ipwo = &ipcp_wantoptions[0]; |
donatien | 0:b802fc31f1db | 789 | u32_t remote; |
donatien | 0:b802fc31f1db | 790 | |
donatien | 0:b802fc31f1db | 791 | /* Default our_name to hostname, and user to our_name */ |
donatien | 0:b802fc31f1db | 792 | if (ppp_settings.our_name[0] == 0 || ppp_settings.usehostname) { |
donatien | 0:b802fc31f1db | 793 | strcpy(ppp_settings.our_name, ppp_settings.hostname); |
donatien | 0:b802fc31f1db | 794 | } |
donatien | 0:b802fc31f1db | 795 | |
donatien | 0:b802fc31f1db | 796 | if (ppp_settings.user[0] == 0) { |
donatien | 0:b802fc31f1db | 797 | strcpy(ppp_settings.user, ppp_settings.our_name); |
donatien | 0:b802fc31f1db | 798 | } |
donatien | 0:b802fc31f1db | 799 | |
donatien | 0:b802fc31f1db | 800 | /* If authentication is required, ask peer for CHAP or PAP. */ |
donatien | 0:b802fc31f1db | 801 | if (ppp_settings.auth_required && !wo->neg_chap && !wo->neg_upap) { |
donatien | 0:b802fc31f1db | 802 | wo->neg_chap = 1; |
donatien | 0:b802fc31f1db | 803 | wo->neg_upap = 1; |
donatien | 0:b802fc31f1db | 804 | } |
donatien | 0:b802fc31f1db | 805 | |
donatien | 0:b802fc31f1db | 806 | /* |
donatien | 0:b802fc31f1db | 807 | * Check whether we have appropriate secrets to use |
donatien | 0:b802fc31f1db | 808 | * to authenticate the peer. |
donatien | 0:b802fc31f1db | 809 | */ |
donatien | 0:b802fc31f1db | 810 | can_auth = wo->neg_upap && have_pap_secret(); |
donatien | 0:b802fc31f1db | 811 | if (!can_auth && wo->neg_chap) { |
donatien | 0:b802fc31f1db | 812 | remote = ipwo->accept_remote? 0: ipwo->hisaddr; |
donatien | 0:b802fc31f1db | 813 | can_auth = have_chap_secret(ppp_settings.remote_name, ppp_settings.our_name, remote); |
donatien | 0:b802fc31f1db | 814 | } |
donatien | 0:b802fc31f1db | 815 | |
donatien | 0:b802fc31f1db | 816 | if (ppp_settings.auth_required && !can_auth) { |
donatien | 0:b802fc31f1db | 817 | ppp_panic("No auth secret"); |
donatien | 0:b802fc31f1db | 818 | } |
donatien | 0:b802fc31f1db | 819 | } |
donatien | 0:b802fc31f1db | 820 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 821 | |
donatien | 0:b802fc31f1db | 822 | /* |
donatien | 0:b802fc31f1db | 823 | * auth_reset - called when LCP is starting negotiations to recheck |
donatien | 0:b802fc31f1db | 824 | * authentication options, i.e. whether we have appropriate secrets |
donatien | 0:b802fc31f1db | 825 | * to use for authenticating ourselves and/or the peer. |
donatien | 0:b802fc31f1db | 826 | */ |
donatien | 0:b802fc31f1db | 827 | void |
donatien | 0:b802fc31f1db | 828 | auth_reset(int unit) |
donatien | 0:b802fc31f1db | 829 | { |
donatien | 0:b802fc31f1db | 830 | lcp_options *go = &lcp_gotoptions[unit]; |
donatien | 0:b802fc31f1db | 831 | lcp_options *ao = &lcp_allowoptions[0]; |
donatien | 0:b802fc31f1db | 832 | ipcp_options *ipwo = &ipcp_wantoptions[0]; |
donatien | 0:b802fc31f1db | 833 | u32_t remote; |
donatien | 0:b802fc31f1db | 834 | |
donatien | 0:b802fc31f1db | 835 | AUTHDEBUG(LOG_INFO, ("auth_reset: %d\n", unit)); |
donatien | 0:b802fc31f1db | 836 | ao->neg_upap = !ppp_settings.refuse_pap && (ppp_settings.passwd[0] != 0 || get_pap_passwd(unit, NULL, NULL)); |
donatien | 0:b802fc31f1db | 837 | ao->neg_chap = !ppp_settings.refuse_chap && ppp_settings.passwd[0] != 0 /*have_chap_secret(ppp_settings.user, ppp_settings.remote_name, (u32_t)0)*/; |
donatien | 0:b802fc31f1db | 838 | |
donatien | 0:b802fc31f1db | 839 | if (go->neg_upap && !have_pap_secret()) { |
donatien | 0:b802fc31f1db | 840 | go->neg_upap = 0; |
donatien | 0:b802fc31f1db | 841 | } |
donatien | 0:b802fc31f1db | 842 | if (go->neg_chap) { |
donatien | 0:b802fc31f1db | 843 | remote = ipwo->accept_remote? 0: ipwo->hisaddr; |
donatien | 0:b802fc31f1db | 844 | if (!have_chap_secret(ppp_settings.remote_name, ppp_settings.our_name, remote)) { |
donatien | 0:b802fc31f1db | 845 | go->neg_chap = 0; |
donatien | 0:b802fc31f1db | 846 | } |
donatien | 0:b802fc31f1db | 847 | } |
donatien | 0:b802fc31f1db | 848 | } |
donatien | 0:b802fc31f1db | 849 | |
donatien | 0:b802fc31f1db | 850 | #if PAP_SUPPORT |
donatien | 0:b802fc31f1db | 851 | /* |
donatien | 0:b802fc31f1db | 852 | * check_passwd - Check the user name and passwd against the PAP secrets |
donatien | 0:b802fc31f1db | 853 | * file. If requested, also check against the system password database, |
donatien | 0:b802fc31f1db | 854 | * and login the user if OK. |
donatien | 0:b802fc31f1db | 855 | * |
donatien | 0:b802fc31f1db | 856 | * returns: |
donatien | 0:b802fc31f1db | 857 | * UPAP_AUTHNAK: Authentication failed. |
donatien | 0:b802fc31f1db | 858 | * UPAP_AUTHACK: Authentication succeeded. |
donatien | 0:b802fc31f1db | 859 | * In either case, msg points to an appropriate message. |
donatien | 0:b802fc31f1db | 860 | */ |
donatien | 0:b802fc31f1db | 861 | u_char |
donatien | 0:b802fc31f1db | 862 | check_passwd( int unit, char *auser, int userlen, char *apasswd, int passwdlen, char **msg, int *msglen) |
donatien | 0:b802fc31f1db | 863 | { |
donatien | 0:b802fc31f1db | 864 | #if 1 /* XXX Assume all entries OK. */ |
donatien | 0:b802fc31f1db | 865 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 866 | LWIP_UNUSED_ARG(auser); |
donatien | 0:b802fc31f1db | 867 | LWIP_UNUSED_ARG(userlen); |
donatien | 0:b802fc31f1db | 868 | LWIP_UNUSED_ARG(apasswd); |
donatien | 0:b802fc31f1db | 869 | LWIP_UNUSED_ARG(passwdlen); |
donatien | 0:b802fc31f1db | 870 | LWIP_UNUSED_ARG(msglen); |
donatien | 0:b802fc31f1db | 871 | *msg = (char *) 0; |
donatien | 0:b802fc31f1db | 872 | return UPAP_AUTHACK; /* XXX Assume all entries OK. */ |
donatien | 0:b802fc31f1db | 873 | #else |
donatien | 0:b802fc31f1db | 874 | u_char ret = 0; |
donatien | 0:b802fc31f1db | 875 | struct wordlist *addrs = NULL; |
donatien | 0:b802fc31f1db | 876 | char passwd[256], user[256]; |
donatien | 0:b802fc31f1db | 877 | char secret[MAXWORDLEN]; |
donatien | 0:b802fc31f1db | 878 | static u_short attempts = 0; |
donatien | 0:b802fc31f1db | 879 | |
donatien | 0:b802fc31f1db | 880 | /* |
donatien | 0:b802fc31f1db | 881 | * Make copies of apasswd and auser, then null-terminate them. |
donatien | 0:b802fc31f1db | 882 | */ |
donatien | 0:b802fc31f1db | 883 | BCOPY(apasswd, passwd, passwdlen); |
donatien | 0:b802fc31f1db | 884 | passwd[passwdlen] = '\0'; |
donatien | 0:b802fc31f1db | 885 | BCOPY(auser, user, userlen); |
donatien | 0:b802fc31f1db | 886 | user[userlen] = '\0'; |
donatien | 0:b802fc31f1db | 887 | *msg = (char *) 0; |
donatien | 0:b802fc31f1db | 888 | |
donatien | 0:b802fc31f1db | 889 | /* XXX Validate user name and password. */ |
donatien | 0:b802fc31f1db | 890 | ret = UPAP_AUTHACK; /* XXX Assume all entries OK. */ |
donatien | 0:b802fc31f1db | 891 | |
donatien | 0:b802fc31f1db | 892 | if (ret == UPAP_AUTHNAK) { |
donatien | 0:b802fc31f1db | 893 | if (*msg == (char *) 0) { |
donatien | 0:b802fc31f1db | 894 | *msg = "Login incorrect"; |
donatien | 0:b802fc31f1db | 895 | } |
donatien | 0:b802fc31f1db | 896 | *msglen = strlen(*msg); |
donatien | 0:b802fc31f1db | 897 | /* |
donatien | 0:b802fc31f1db | 898 | * Frustrate passwd stealer programs. |
donatien | 0:b802fc31f1db | 899 | * Allow 10 tries, but start backing off after 3 (stolen from login). |
donatien | 0:b802fc31f1db | 900 | * On 10'th, drop the connection. |
donatien | 0:b802fc31f1db | 901 | */ |
donatien | 0:b802fc31f1db | 902 | if (attempts++ >= 10) { |
donatien | 0:b802fc31f1db | 903 | AUTHDEBUG(LOG_WARNING, ("%d LOGIN FAILURES BY %s\n", attempts, user)); |
donatien | 0:b802fc31f1db | 904 | /*ppp_panic("Excess Bad Logins");*/ |
donatien | 0:b802fc31f1db | 905 | } |
donatien | 0:b802fc31f1db | 906 | if (attempts > 3) { |
donatien | 0:b802fc31f1db | 907 | /* @todo: this was sleep(), i.e. seconds, not milliseconds |
donatien | 0:b802fc31f1db | 908 | * I don't think we really need this in lwIP - we would block tcpip_thread! |
donatien | 0:b802fc31f1db | 909 | */ |
donatien | 0:b802fc31f1db | 910 | /*sys_msleep((attempts - 3) * 5);*/ |
donatien | 0:b802fc31f1db | 911 | } |
donatien | 0:b802fc31f1db | 912 | if (addrs != NULL) { |
donatien | 0:b802fc31f1db | 913 | free_wordlist(addrs); |
donatien | 0:b802fc31f1db | 914 | } |
donatien | 0:b802fc31f1db | 915 | } else { |
donatien | 0:b802fc31f1db | 916 | attempts = 0; /* Reset count */ |
donatien | 0:b802fc31f1db | 917 | if (*msg == (char *) 0) { |
donatien | 0:b802fc31f1db | 918 | *msg = "Login ok"; |
donatien | 0:b802fc31f1db | 919 | } |
donatien | 0:b802fc31f1db | 920 | *msglen = strlen(*msg); |
donatien | 0:b802fc31f1db | 921 | set_allowed_addrs(unit, addrs); |
donatien | 0:b802fc31f1db | 922 | } |
donatien | 0:b802fc31f1db | 923 | |
donatien | 0:b802fc31f1db | 924 | BZERO(passwd, sizeof(passwd)); |
donatien | 0:b802fc31f1db | 925 | BZERO(secret, sizeof(secret)); |
donatien | 0:b802fc31f1db | 926 | |
donatien | 0:b802fc31f1db | 927 | return ret; |
donatien | 0:b802fc31f1db | 928 | #endif |
donatien | 0:b802fc31f1db | 929 | } |
donatien | 0:b802fc31f1db | 930 | #endif /* PAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 931 | |
donatien | 0:b802fc31f1db | 932 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 933 | /* |
donatien | 0:b802fc31f1db | 934 | * This function is needed for PAM. |
donatien | 0:b802fc31f1db | 935 | */ |
donatien | 0:b802fc31f1db | 936 | |
donatien | 0:b802fc31f1db | 937 | #ifdef USE_PAM |
donatien | 0:b802fc31f1db | 938 | |
donatien | 0:b802fc31f1db | 939 | /* lwip does not support PAM*/ |
donatien | 0:b802fc31f1db | 940 | |
donatien | 0:b802fc31f1db | 941 | #endif /* USE_PAM */ |
donatien | 0:b802fc31f1db | 942 | |
donatien | 0:b802fc31f1db | 943 | #endif /* UNUSED */ |
donatien | 0:b802fc31f1db | 944 | |
donatien | 0:b802fc31f1db | 945 | |
donatien | 0:b802fc31f1db | 946 | #if 0 /* UNUSED */ |
donatien | 0:b802fc31f1db | 947 | /* |
donatien | 0:b802fc31f1db | 948 | * plogin - Check the user name and password against the system |
donatien | 0:b802fc31f1db | 949 | * password database, and login the user if OK. |
donatien | 0:b802fc31f1db | 950 | * |
donatien | 0:b802fc31f1db | 951 | * returns: |
donatien | 0:b802fc31f1db | 952 | * UPAP_AUTHNAK: Login failed. |
donatien | 0:b802fc31f1db | 953 | * UPAP_AUTHACK: Login succeeded. |
donatien | 0:b802fc31f1db | 954 | * In either case, msg points to an appropriate message. |
donatien | 0:b802fc31f1db | 955 | */ |
donatien | 0:b802fc31f1db | 956 | static int |
donatien | 0:b802fc31f1db | 957 | plogin(char *user, char *passwd, char **msg, int *msglen) |
donatien | 0:b802fc31f1db | 958 | { |
donatien | 0:b802fc31f1db | 959 | |
donatien | 0:b802fc31f1db | 960 | LWIP_UNUSED_ARG(user); |
donatien | 0:b802fc31f1db | 961 | LWIP_UNUSED_ARG(passwd); |
donatien | 0:b802fc31f1db | 962 | LWIP_UNUSED_ARG(msg); |
donatien | 0:b802fc31f1db | 963 | LWIP_UNUSED_ARG(msglen); |
donatien | 0:b802fc31f1db | 964 | |
donatien | 0:b802fc31f1db | 965 | |
donatien | 0:b802fc31f1db | 966 | /* The new lines are here align the file when |
donatien | 0:b802fc31f1db | 967 | * compared against the pppd 2.3.11 code */ |
donatien | 0:b802fc31f1db | 968 | |
donatien | 0:b802fc31f1db | 969 | |
donatien | 0:b802fc31f1db | 970 | |
donatien | 0:b802fc31f1db | 971 | |
donatien | 0:b802fc31f1db | 972 | |
donatien | 0:b802fc31f1db | 973 | |
donatien | 0:b802fc31f1db | 974 | |
donatien | 0:b802fc31f1db | 975 | |
donatien | 0:b802fc31f1db | 976 | |
donatien | 0:b802fc31f1db | 977 | |
donatien | 0:b802fc31f1db | 978 | |
donatien | 0:b802fc31f1db | 979 | |
donatien | 0:b802fc31f1db | 980 | |
donatien | 0:b802fc31f1db | 981 | |
donatien | 0:b802fc31f1db | 982 | |
donatien | 0:b802fc31f1db | 983 | |
donatien | 0:b802fc31f1db | 984 | /* XXX Fail until we decide that we want to support logins. */ |
donatien | 0:b802fc31f1db | 985 | return (UPAP_AUTHNAK); |
donatien | 0:b802fc31f1db | 986 | } |
donatien | 0:b802fc31f1db | 987 | #endif |
donatien | 0:b802fc31f1db | 988 | |
donatien | 0:b802fc31f1db | 989 | |
donatien | 0:b802fc31f1db | 990 | |
donatien | 0:b802fc31f1db | 991 | /* |
donatien | 0:b802fc31f1db | 992 | * plogout - Logout the user. |
donatien | 0:b802fc31f1db | 993 | */ |
donatien | 0:b802fc31f1db | 994 | static void |
donatien | 0:b802fc31f1db | 995 | plogout(void) |
donatien | 0:b802fc31f1db | 996 | { |
donatien | 0:b802fc31f1db | 997 | logged_in = 0; |
donatien | 0:b802fc31f1db | 998 | } |
donatien | 0:b802fc31f1db | 999 | |
donatien | 0:b802fc31f1db | 1000 | /* |
donatien | 0:b802fc31f1db | 1001 | * null_login - Check if a username of "" and a password of "" are |
donatien | 0:b802fc31f1db | 1002 | * acceptable, and iff so, set the list of acceptable IP addresses |
donatien | 0:b802fc31f1db | 1003 | * and return 1. |
donatien | 0:b802fc31f1db | 1004 | */ |
donatien | 0:b802fc31f1db | 1005 | static int |
donatien | 0:b802fc31f1db | 1006 | null_login(int unit) |
donatien | 0:b802fc31f1db | 1007 | { |
donatien | 0:b802fc31f1db | 1008 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 1009 | /* XXX Fail until we decide that we want to support logins. */ |
donatien | 0:b802fc31f1db | 1010 | return 0; |
donatien | 0:b802fc31f1db | 1011 | } |
donatien | 0:b802fc31f1db | 1012 | |
donatien | 0:b802fc31f1db | 1013 | |
donatien | 0:b802fc31f1db | 1014 | /* |
donatien | 0:b802fc31f1db | 1015 | * get_pap_passwd - get a password for authenticating ourselves with |
donatien | 0:b802fc31f1db | 1016 | * our peer using PAP. Returns 1 on success, 0 if no suitable password |
donatien | 0:b802fc31f1db | 1017 | * could be found. |
donatien | 0:b802fc31f1db | 1018 | */ |
donatien | 0:b802fc31f1db | 1019 | static int |
donatien | 0:b802fc31f1db | 1020 | get_pap_passwd(int unit, char *user, char *passwd) |
donatien | 0:b802fc31f1db | 1021 | { |
donatien | 0:b802fc31f1db | 1022 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 1023 | /* normally we would reject PAP if no password is provided, |
donatien | 0:b802fc31f1db | 1024 | but this causes problems with some providers (like CHT in Taiwan) |
donatien | 0:b802fc31f1db | 1025 | who incorrectly request PAP and expect a bogus/empty password, so |
donatien | 0:b802fc31f1db | 1026 | always provide a default user/passwd of "none"/"none" |
donatien | 0:b802fc31f1db | 1027 | |
donatien | 0:b802fc31f1db | 1028 | @todo: This should be configured by the user, instead of being hardcoded here! |
donatien | 0:b802fc31f1db | 1029 | */ |
donatien | 0:b802fc31f1db | 1030 | if(user) { |
donatien | 0:b802fc31f1db | 1031 | strcpy(user, "none"); |
donatien | 0:b802fc31f1db | 1032 | } |
donatien | 0:b802fc31f1db | 1033 | if(passwd) { |
donatien | 0:b802fc31f1db | 1034 | strcpy(passwd, "none"); |
donatien | 0:b802fc31f1db | 1035 | } |
donatien | 0:b802fc31f1db | 1036 | return 1; |
donatien | 0:b802fc31f1db | 1037 | } |
donatien | 0:b802fc31f1db | 1038 | |
donatien | 0:b802fc31f1db | 1039 | /* |
donatien | 0:b802fc31f1db | 1040 | * have_pap_secret - check whether we have a PAP file with any |
donatien | 0:b802fc31f1db | 1041 | * secrets that we could possibly use for authenticating the peer. |
donatien | 0:b802fc31f1db | 1042 | */ |
donatien | 0:b802fc31f1db | 1043 | static int |
donatien | 0:b802fc31f1db | 1044 | have_pap_secret(void) |
donatien | 0:b802fc31f1db | 1045 | { |
donatien | 0:b802fc31f1db | 1046 | /* XXX Fail until we set up our passwords. */ |
donatien | 0:b802fc31f1db | 1047 | return 0; |
donatien | 0:b802fc31f1db | 1048 | } |
donatien | 0:b802fc31f1db | 1049 | |
donatien | 0:b802fc31f1db | 1050 | /* |
donatien | 0:b802fc31f1db | 1051 | * have_chap_secret - check whether we have a CHAP file with a |
donatien | 0:b802fc31f1db | 1052 | * secret that we could possibly use for authenticating `client' |
donatien | 0:b802fc31f1db | 1053 | * on `server'. Either can be the null string, meaning we don't |
donatien | 0:b802fc31f1db | 1054 | * know the identity yet. |
donatien | 0:b802fc31f1db | 1055 | */ |
donatien | 0:b802fc31f1db | 1056 | static int |
donatien | 0:b802fc31f1db | 1057 | have_chap_secret(char *client, char *server, u32_t remote) |
donatien | 0:b802fc31f1db | 1058 | { |
donatien | 0:b802fc31f1db | 1059 | LWIP_UNUSED_ARG(client); |
donatien | 0:b802fc31f1db | 1060 | LWIP_UNUSED_ARG(server); |
donatien | 0:b802fc31f1db | 1061 | LWIP_UNUSED_ARG(remote); |
donatien | 0:b802fc31f1db | 1062 | |
donatien | 0:b802fc31f1db | 1063 | /* XXX Fail until we set up our passwords. */ |
donatien | 0:b802fc31f1db | 1064 | return 0; |
donatien | 0:b802fc31f1db | 1065 | } |
donatien | 0:b802fc31f1db | 1066 | #if CHAP_SUPPORT |
donatien | 0:b802fc31f1db | 1067 | |
donatien | 0:b802fc31f1db | 1068 | /* |
donatien | 0:b802fc31f1db | 1069 | * get_secret - open the CHAP secret file and return the secret |
donatien | 0:b802fc31f1db | 1070 | * for authenticating the given client on the given server. |
donatien | 0:b802fc31f1db | 1071 | * (We could be either client or server). |
donatien | 0:b802fc31f1db | 1072 | */ |
donatien | 0:b802fc31f1db | 1073 | int |
donatien | 0:b802fc31f1db | 1074 | get_secret(int unit, char *client, char *server, char *secret, int *secret_len, int save_addrs) |
donatien | 0:b802fc31f1db | 1075 | { |
donatien | 0:b802fc31f1db | 1076 | #if 1 |
donatien | 0:b802fc31f1db | 1077 | int len; |
donatien | 0:b802fc31f1db | 1078 | struct wordlist *addrs; |
donatien | 0:b802fc31f1db | 1079 | |
donatien | 0:b802fc31f1db | 1080 | LWIP_UNUSED_ARG(unit); |
donatien | 0:b802fc31f1db | 1081 | LWIP_UNUSED_ARG(server); |
donatien | 0:b802fc31f1db | 1082 | LWIP_UNUSED_ARG(save_addrs); |
donatien | 0:b802fc31f1db | 1083 | |
donatien | 0:b802fc31f1db | 1084 | addrs = NULL; |
donatien | 0:b802fc31f1db | 1085 | |
donatien | 0:b802fc31f1db | 1086 | if(!client || !client[0] || strcmp(client, ppp_settings.user)) { |
donatien | 0:b802fc31f1db | 1087 | return 0; |
donatien | 0:b802fc31f1db | 1088 | } |
donatien | 0:b802fc31f1db | 1089 | |
donatien | 0:b802fc31f1db | 1090 | len = (int)strlen(ppp_settings.passwd); |
donatien | 0:b802fc31f1db | 1091 | if (len > MAXSECRETLEN) { |
donatien | 0:b802fc31f1db | 1092 | AUTHDEBUG(LOG_ERR, ("Secret for %s on %s is too long\n", client, server)); |
donatien | 0:b802fc31f1db | 1093 | len = MAXSECRETLEN; |
donatien | 0:b802fc31f1db | 1094 | } |
donatien | 0:b802fc31f1db | 1095 | |
donatien | 0:b802fc31f1db | 1096 | BCOPY(ppp_settings.passwd, secret, len); |
donatien | 0:b802fc31f1db | 1097 | *secret_len = len; |
donatien | 0:b802fc31f1db | 1098 | |
donatien | 0:b802fc31f1db | 1099 | return 1; |
donatien | 0:b802fc31f1db | 1100 | #else |
donatien | 0:b802fc31f1db | 1101 | int ret = 0, len; |
donatien | 0:b802fc31f1db | 1102 | struct wordlist *addrs; |
donatien | 0:b802fc31f1db | 1103 | char secbuf[MAXWORDLEN]; |
donatien | 0:b802fc31f1db | 1104 | |
donatien | 0:b802fc31f1db | 1105 | addrs = NULL; |
donatien | 0:b802fc31f1db | 1106 | secbuf[0] = 0; |
donatien | 0:b802fc31f1db | 1107 | |
donatien | 0:b802fc31f1db | 1108 | /* XXX Find secret. */ |
donatien | 0:b802fc31f1db | 1109 | if (ret < 0) { |
donatien | 0:b802fc31f1db | 1110 | return 0; |
donatien | 0:b802fc31f1db | 1111 | } |
donatien | 0:b802fc31f1db | 1112 | |
donatien | 0:b802fc31f1db | 1113 | if (save_addrs) { |
donatien | 0:b802fc31f1db | 1114 | set_allowed_addrs(unit, addrs); |
donatien | 0:b802fc31f1db | 1115 | } |
donatien | 0:b802fc31f1db | 1116 | |
donatien | 0:b802fc31f1db | 1117 | len = strlen(secbuf); |
donatien | 0:b802fc31f1db | 1118 | if (len > MAXSECRETLEN) { |
donatien | 0:b802fc31f1db | 1119 | AUTHDEBUG(LOG_ERR, ("Secret for %s on %s is too long\n", client, server)); |
donatien | 0:b802fc31f1db | 1120 | len = MAXSECRETLEN; |
donatien | 0:b802fc31f1db | 1121 | } |
donatien | 0:b802fc31f1db | 1122 | |
donatien | 0:b802fc31f1db | 1123 | BCOPY(secbuf, secret, len); |
donatien | 0:b802fc31f1db | 1124 | BZERO(secbuf, sizeof(secbuf)); |
donatien | 0:b802fc31f1db | 1125 | *secret_len = len; |
donatien | 0:b802fc31f1db | 1126 | |
donatien | 0:b802fc31f1db | 1127 | return 1; |
donatien | 0:b802fc31f1db | 1128 | #endif |
donatien | 0:b802fc31f1db | 1129 | } |
donatien | 0:b802fc31f1db | 1130 | #endif /* CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 1131 | |
donatien | 0:b802fc31f1db | 1132 | |
donatien | 0:b802fc31f1db | 1133 | #if 0 /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 1134 | /* |
donatien | 0:b802fc31f1db | 1135 | * set_allowed_addrs() - set the list of allowed addresses. |
donatien | 0:b802fc31f1db | 1136 | */ |
donatien | 0:b802fc31f1db | 1137 | static void |
donatien | 0:b802fc31f1db | 1138 | set_allowed_addrs(int unit, struct wordlist *addrs) |
donatien | 0:b802fc31f1db | 1139 | { |
donatien | 0:b802fc31f1db | 1140 | if (addresses[unit] != NULL) { |
donatien | 0:b802fc31f1db | 1141 | free_wordlist(addresses[unit]); |
donatien | 0:b802fc31f1db | 1142 | } |
donatien | 0:b802fc31f1db | 1143 | addresses[unit] = addrs; |
donatien | 0:b802fc31f1db | 1144 | |
donatien | 0:b802fc31f1db | 1145 | #if 0 |
donatien | 0:b802fc31f1db | 1146 | /* |
donatien | 0:b802fc31f1db | 1147 | * If there's only one authorized address we might as well |
donatien | 0:b802fc31f1db | 1148 | * ask our peer for that one right away |
donatien | 0:b802fc31f1db | 1149 | */ |
donatien | 0:b802fc31f1db | 1150 | if (addrs != NULL && addrs->next == NULL) { |
donatien | 0:b802fc31f1db | 1151 | char *p = addrs->word; |
donatien | 0:b802fc31f1db | 1152 | struct ipcp_options *wo = &ipcp_wantoptions[unit]; |
donatien | 0:b802fc31f1db | 1153 | u32_t a; |
donatien | 0:b802fc31f1db | 1154 | struct hostent *hp; |
donatien | 0:b802fc31f1db | 1155 | |
donatien | 0:b802fc31f1db | 1156 | if (wo->hisaddr == 0 && *p != '!' && *p != '-' && strchr(p, '/') == NULL) { |
donatien | 0:b802fc31f1db | 1157 | hp = gethostbyname(p); |
donatien | 0:b802fc31f1db | 1158 | if (hp != NULL && hp->h_addrtype == AF_INET) { |
donatien | 0:b802fc31f1db | 1159 | a = *(u32_t *)hp->h_addr; |
donatien | 0:b802fc31f1db | 1160 | } else { |
donatien | 0:b802fc31f1db | 1161 | a = inet_addr(p); |
donatien | 0:b802fc31f1db | 1162 | } |
donatien | 0:b802fc31f1db | 1163 | if (a != (u32_t) -1) { |
donatien | 0:b802fc31f1db | 1164 | wo->hisaddr = a; |
donatien | 0:b802fc31f1db | 1165 | } |
donatien | 0:b802fc31f1db | 1166 | } |
donatien | 0:b802fc31f1db | 1167 | } |
donatien | 0:b802fc31f1db | 1168 | #endif |
donatien | 0:b802fc31f1db | 1169 | } |
donatien | 0:b802fc31f1db | 1170 | #endif /* 0 */ /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 1171 | |
donatien | 0:b802fc31f1db | 1172 | /* |
donatien | 0:b802fc31f1db | 1173 | * auth_ip_addr - check whether the peer is authorized to use |
donatien | 0:b802fc31f1db | 1174 | * a given IP address. Returns 1 if authorized, 0 otherwise. |
donatien | 0:b802fc31f1db | 1175 | */ |
donatien | 0:b802fc31f1db | 1176 | int |
donatien | 0:b802fc31f1db | 1177 | auth_ip_addr(int unit, u32_t addr) |
donatien | 0:b802fc31f1db | 1178 | { |
donatien | 0:b802fc31f1db | 1179 | return ip_addr_check(addr, addresses[unit]); |
donatien | 0:b802fc31f1db | 1180 | } |
donatien | 0:b802fc31f1db | 1181 | |
donatien | 0:b802fc31f1db | 1182 | static int /* @todo: integrate this funtion into auth_ip_addr()*/ |
donatien | 0:b802fc31f1db | 1183 | ip_addr_check(u32_t addr, struct wordlist *addrs) |
donatien | 0:b802fc31f1db | 1184 | { |
donatien | 0:b802fc31f1db | 1185 | /* don't allow loopback or multicast address */ |
donatien | 0:b802fc31f1db | 1186 | if (bad_ip_adrs(addr)) { |
donatien | 0:b802fc31f1db | 1187 | return 0; |
donatien | 0:b802fc31f1db | 1188 | } |
donatien | 0:b802fc31f1db | 1189 | |
donatien | 0:b802fc31f1db | 1190 | if (addrs == NULL) { |
donatien | 0:b802fc31f1db | 1191 | return !ppp_settings.auth_required; /* no addresses authorized */ |
donatien | 0:b802fc31f1db | 1192 | } |
donatien | 0:b802fc31f1db | 1193 | |
donatien | 0:b802fc31f1db | 1194 | /* XXX All other addresses allowed. */ |
donatien | 0:b802fc31f1db | 1195 | return 1; |
donatien | 0:b802fc31f1db | 1196 | } |
donatien | 0:b802fc31f1db | 1197 | |
donatien | 0:b802fc31f1db | 1198 | /* |
donatien | 0:b802fc31f1db | 1199 | * bad_ip_adrs - return 1 if the IP address is one we don't want |
donatien | 0:b802fc31f1db | 1200 | * to use, such as an address in the loopback net or a multicast address. |
donatien | 0:b802fc31f1db | 1201 | * addr is in network byte order. |
donatien | 0:b802fc31f1db | 1202 | */ |
donatien | 0:b802fc31f1db | 1203 | int |
donatien | 0:b802fc31f1db | 1204 | bad_ip_adrs(u32_t addr) |
donatien | 0:b802fc31f1db | 1205 | { |
donatien | 0:b802fc31f1db | 1206 | addr = ntohl(addr); |
donatien | 0:b802fc31f1db | 1207 | return (addr >> IN_CLASSA_NSHIFT) == IN_LOOPBACKNET |
donatien | 0:b802fc31f1db | 1208 | || IN_MULTICAST(addr) || IN_BADCLASS(addr); |
donatien | 0:b802fc31f1db | 1209 | } |
donatien | 0:b802fc31f1db | 1210 | |
donatien | 0:b802fc31f1db | 1211 | #if 0 /* UNUSED */ /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 1212 | /* |
donatien | 0:b802fc31f1db | 1213 | * some_ip_ok - check a wordlist to see if it authorizes any |
donatien | 0:b802fc31f1db | 1214 | * IP address(es). |
donatien | 0:b802fc31f1db | 1215 | */ |
donatien | 0:b802fc31f1db | 1216 | static int |
donatien | 0:b802fc31f1db | 1217 | some_ip_ok(struct wordlist *addrs) |
donatien | 0:b802fc31f1db | 1218 | { |
donatien | 0:b802fc31f1db | 1219 | for (; addrs != 0; addrs = addrs->next) { |
donatien | 0:b802fc31f1db | 1220 | if (addrs->word[0] == '-') |
donatien | 0:b802fc31f1db | 1221 | break; |
donatien | 0:b802fc31f1db | 1222 | if (addrs->word[0] != '!') |
donatien | 0:b802fc31f1db | 1223 | return 1; /* some IP address is allowed */ |
donatien | 0:b802fc31f1db | 1224 | } |
donatien | 0:b802fc31f1db | 1225 | return 0; |
donatien | 0:b802fc31f1db | 1226 | } |
donatien | 0:b802fc31f1db | 1227 | |
donatien | 0:b802fc31f1db | 1228 | /* |
donatien | 0:b802fc31f1db | 1229 | * check_access - complain if a secret file has too-liberal permissions. |
donatien | 0:b802fc31f1db | 1230 | */ |
donatien | 0:b802fc31f1db | 1231 | static void |
donatien | 0:b802fc31f1db | 1232 | check_access(FILE *f, char *filename) |
donatien | 0:b802fc31f1db | 1233 | { |
donatien | 0:b802fc31f1db | 1234 | struct stat sbuf; |
donatien | 0:b802fc31f1db | 1235 | |
donatien | 0:b802fc31f1db | 1236 | if (fstat(fileno(f), &sbuf) < 0) { |
donatien | 0:b802fc31f1db | 1237 | warn("cannot stat secret file %s: %m", filename); |
donatien | 0:b802fc31f1db | 1238 | } else if ((sbuf.st_mode & (S_IRWXG | S_IRWXO)) != 0) { |
donatien | 0:b802fc31f1db | 1239 | warn("Warning - secret file %s has world and/or group access", |
donatien | 0:b802fc31f1db | 1240 | filename); |
donatien | 0:b802fc31f1db | 1241 | } |
donatien | 0:b802fc31f1db | 1242 | } |
donatien | 0:b802fc31f1db | 1243 | |
donatien | 0:b802fc31f1db | 1244 | |
donatien | 0:b802fc31f1db | 1245 | /* |
donatien | 0:b802fc31f1db | 1246 | * scan_authfile - Scan an authorization file for a secret suitable |
donatien | 0:b802fc31f1db | 1247 | * for authenticating `client' on `server'. The return value is -1 |
donatien | 0:b802fc31f1db | 1248 | * if no secret is found, otherwise >= 0. The return value has |
donatien | 0:b802fc31f1db | 1249 | * NONWILD_CLIENT set if the secret didn't have "*" for the client, and |
donatien | 0:b802fc31f1db | 1250 | * NONWILD_SERVER set if the secret didn't have "*" for the server. |
donatien | 0:b802fc31f1db | 1251 | * Any following words on the line up to a "--" (i.e. address authorization |
donatien | 0:b802fc31f1db | 1252 | * info) are placed in a wordlist and returned in *addrs. Any |
donatien | 0:b802fc31f1db | 1253 | * following words (extra options) are placed in a wordlist and |
donatien | 0:b802fc31f1db | 1254 | * returned in *opts. |
donatien | 0:b802fc31f1db | 1255 | * We assume secret is NULL or points to MAXWORDLEN bytes of space. |
donatien | 0:b802fc31f1db | 1256 | */ |
donatien | 0:b802fc31f1db | 1257 | static int |
donatien | 0:b802fc31f1db | 1258 | scan_authfile(FILE *f, char *client, char *server, char *secret, struct wordlist **addrs, struct wordlist **opts, char *filename) |
donatien | 0:b802fc31f1db | 1259 | { |
donatien | 0:b802fc31f1db | 1260 | /* We do not (currently) need this in lwip */ |
donatien | 0:b802fc31f1db | 1261 | return 0; /* dummy */ |
donatien | 0:b802fc31f1db | 1262 | } |
donatien | 0:b802fc31f1db | 1263 | /* |
donatien | 0:b802fc31f1db | 1264 | * free_wordlist - release memory allocated for a wordlist. |
donatien | 0:b802fc31f1db | 1265 | */ |
donatien | 0:b802fc31f1db | 1266 | static void |
donatien | 0:b802fc31f1db | 1267 | free_wordlist(struct wordlist *wp) |
donatien | 0:b802fc31f1db | 1268 | { |
donatien | 0:b802fc31f1db | 1269 | struct wordlist *next; |
donatien | 0:b802fc31f1db | 1270 | |
donatien | 0:b802fc31f1db | 1271 | while (wp != NULL) { |
donatien | 0:b802fc31f1db | 1272 | next = wp->next; |
donatien | 0:b802fc31f1db | 1273 | free(wp); |
donatien | 0:b802fc31f1db | 1274 | wp = next; |
donatien | 0:b802fc31f1db | 1275 | } |
donatien | 0:b802fc31f1db | 1276 | } |
donatien | 0:b802fc31f1db | 1277 | |
donatien | 0:b802fc31f1db | 1278 | /* |
donatien | 0:b802fc31f1db | 1279 | * auth_script_done - called when the auth-up or auth-down script |
donatien | 0:b802fc31f1db | 1280 | * has finished. |
donatien | 0:b802fc31f1db | 1281 | */ |
donatien | 0:b802fc31f1db | 1282 | static void |
donatien | 0:b802fc31f1db | 1283 | auth_script_done(void *arg) |
donatien | 0:b802fc31f1db | 1284 | { |
donatien | 0:b802fc31f1db | 1285 | auth_script_pid = 0; |
donatien | 0:b802fc31f1db | 1286 | switch (auth_script_state) { |
donatien | 0:b802fc31f1db | 1287 | case s_up: |
donatien | 0:b802fc31f1db | 1288 | if (auth_state == s_down) { |
donatien | 0:b802fc31f1db | 1289 | auth_script_state = s_down; |
donatien | 0:b802fc31f1db | 1290 | auth_script(_PATH_AUTHDOWN); |
donatien | 0:b802fc31f1db | 1291 | } |
donatien | 0:b802fc31f1db | 1292 | break; |
donatien | 0:b802fc31f1db | 1293 | case s_down: |
donatien | 0:b802fc31f1db | 1294 | if (auth_state == s_up) { |
donatien | 0:b802fc31f1db | 1295 | auth_script_state = s_up; |
donatien | 0:b802fc31f1db | 1296 | auth_script(_PATH_AUTHUP); |
donatien | 0:b802fc31f1db | 1297 | } |
donatien | 0:b802fc31f1db | 1298 | break; |
donatien | 0:b802fc31f1db | 1299 | } |
donatien | 0:b802fc31f1db | 1300 | } |
donatien | 0:b802fc31f1db | 1301 | |
donatien | 0:b802fc31f1db | 1302 | /* |
donatien | 0:b802fc31f1db | 1303 | * auth_script - execute a script with arguments |
donatien | 0:b802fc31f1db | 1304 | * interface-name peer-name real-user tty speed |
donatien | 0:b802fc31f1db | 1305 | */ |
donatien | 0:b802fc31f1db | 1306 | static void |
donatien | 0:b802fc31f1db | 1307 | auth_script(char *script) |
donatien | 0:b802fc31f1db | 1308 | { |
donatien | 0:b802fc31f1db | 1309 | char strspeed[32]; |
donatien | 0:b802fc31f1db | 1310 | struct passwd *pw; |
donatien | 0:b802fc31f1db | 1311 | char struid[32]; |
donatien | 0:b802fc31f1db | 1312 | char *user_name; |
donatien | 0:b802fc31f1db | 1313 | char *argv[8]; |
donatien | 0:b802fc31f1db | 1314 | |
donatien | 0:b802fc31f1db | 1315 | if ((pw = getpwuid(getuid())) != NULL && pw->pw_name != NULL) |
donatien | 0:b802fc31f1db | 1316 | user_name = pw->pw_name; |
donatien | 0:b802fc31f1db | 1317 | else { |
donatien | 0:b802fc31f1db | 1318 | slprintf(struid, sizeof(struid), "%d", getuid()); |
donatien | 0:b802fc31f1db | 1319 | user_name = struid; |
donatien | 0:b802fc31f1db | 1320 | } |
donatien | 0:b802fc31f1db | 1321 | slprintf(strspeed, sizeof(strspeed), "%d", baud_rate); |
donatien | 0:b802fc31f1db | 1322 | |
donatien | 0:b802fc31f1db | 1323 | argv[0] = script; |
donatien | 0:b802fc31f1db | 1324 | argv[1] = ifname; |
donatien | 0:b802fc31f1db | 1325 | argv[2] = peer_authname; |
donatien | 0:b802fc31f1db | 1326 | argv[3] = user_name; |
donatien | 0:b802fc31f1db | 1327 | argv[4] = devnam; |
donatien | 0:b802fc31f1db | 1328 | argv[5] = strspeed; |
donatien | 0:b802fc31f1db | 1329 | argv[6] = NULL; |
donatien | 0:b802fc31f1db | 1330 | |
donatien | 0:b802fc31f1db | 1331 | auth_script_pid = run_program(script, argv, 0, auth_script_done, NULL); |
donatien | 0:b802fc31f1db | 1332 | } |
donatien | 0:b802fc31f1db | 1333 | #endif /* 0 */ /* PAP_SUPPORT || CHAP_SUPPORT */ |
donatien | 0:b802fc31f1db | 1334 | #endif /* PPP_SUPPORT */ |