1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221
|
/*
* The contents of this file are subject to the AOLserver Public License
* Version 1.1 (the "License"); you may not use this file except in
* compliance with the License. You may obtain a copy of the License at
* http://aolserver.com/.
*
* Software distributed under the License is distributed on an "AS IS"
* basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
* the License for the specific language governing rights and limitations
* under the License.
*
* The Original Code is AOLserver Code and related documentation
* distributed by AOL.
*
* The Initial Developer of the Original Code is America Online,
* Inc. Portions created by AOL are Copyright (C) 1999 America Online,
* Inc. All Rights Reserved.
*
* Alternatively, the contents of this file may be used under the terms
* of the GNU General Public License (the "GPL"), in which case the
* provisions of GPL are applicable instead of those above. If you wish
* to allow use of your version of this file only under the terms of the
* GPL and not to allow others to use your version of this file under the
* License, indicate your decision by deleting the provisions above and
* replace them with the notice and other provisions required by the GPL.
* If you do not delete the provisions above, a recipient may use your
* version of this file under either the License or the GPL.
*/
/*
* auth.c --
*
* URL level HTTP authorization support.
*/
static const char *RCSID = "@(#) $Header: /cvsroot/aolserver/aolserver/nsd/auth.c,v 1.13 2005/08/01 20:27:35 jgdavidson Exp $, compiled: " __DATE__ " " __TIME__;
#include "nsd.h"
/*
* The following proc is used for simple user authorization. It
* could be useful for global modules (e.g., nscp).
*/
static Ns_UserAuthorizeProc *userProcPtr;
/*
*----------------------------------------------------------------------
*
* Ns_AuthorizeRequest --
*
* Check for proper HTTP authorization of a request.
*
* Results:
* User supplied routine is expected to return NS_OK if authorization
* is allowed, NS_UNAUTHORIZED if a correct username/passwd could
* allow authorization, NS_FORBIDDEN if no username/passwd would ever
* allow access, or NS_ERROR on error.
*
* Side effects:
* Depends on user supplied routine.
*
*----------------------------------------------------------------------
*/
int
Ns_AuthorizeRequest(char *server, char *method, char *url,
char *user, char *passwd, char *peer)
{
NsServer *servPtr = NsGetServer(server);
if (servPtr == NULL || servPtr->request.authProc == NULL) {
return NS_OK;
}
return (*servPtr->request.authProc)(server, method, url, user, passwd, peer);
}
/*
*----------------------------------------------------------------------
*
* Ns_SetRequestAuthorizeProc --
*
* Set the proc to call when authorizing requests.
*
* Results:
* None.
*
* Side effects:
* None.
*
*----------------------------------------------------------------------
*/
void
Ns_SetRequestAuthorizeProc(char *server, Ns_RequestAuthorizeProc *proc)
{
NsServer *servPtr = NsGetServer(server);
if (servPtr != NULL) {
servPtr->request.authProc = proc;
}
}
/*
*----------------------------------------------------------------------
*
* NsTclRequestAuthorizeObjCmd --
*
* Implements ns_requestauthorize as obj command.
*
* Results:
* Tcl result.
*
* Side effects:
* See docs.
*
*----------------------------------------------------------------------
*/
int
NsTclRequestAuthorizeObjCmd(ClientData arg, Tcl_Interp *interp, int objc,
Tcl_Obj *CONST objv[])
{
NsInterp *itPtr = arg;
char *server;
int status;
if ((objc != 5) && (objc != 6)) {
Tcl_WrongNumArgs(interp, 1, objv,
"method url authuser authpasswd ?ipaddr?");
return TCL_ERROR;
}
if (NsTclGetServer(itPtr, &server) != TCL_OK) {
return TCL_ERROR;
}
status = Ns_AuthorizeRequest(server,
Tcl_GetString(objv[1]),
Tcl_GetString(objv[2]),
Tcl_GetString(objv[3]),
Tcl_GetString(objv[4]),
objc < 6 ? NULL : Tcl_GetString(objv[5]));
switch (status) {
case NS_OK:
Tcl_SetResult(interp, "OK", TCL_STATIC);
break;
case NS_ERROR:
Tcl_SetResult(interp, "ERROR", TCL_STATIC);
break;
case NS_FORBIDDEN:
Tcl_SetResult(interp, "FORBIDDEN", TCL_STATIC);
break;
case NS_UNAUTHORIZED:
Tcl_SetResult(interp, "UNAUTHORIZED", TCL_STATIC);
break;
default:
Tcl_AppendResult(interp, "could not authorize \"",
Tcl_GetString(objv[1]), " ",
Tcl_GetString(objv[2]), "\"", NULL);
return TCL_ERROR;
}
return TCL_OK;
}
/*
*----------------------------------------------------------------------
*
* Ns_AuthorizeUser --
*
* Verify that a user's password matches his name.
* passwd is the unencrypted password.
*
* Results:
* NS_OK or NS_ERROR; if none registered, NS_ERROR.
*
* Side effects:
* Depends on the supplied routine.
*
*----------------------------------------------------------------------
*/
int
Ns_AuthorizeUser(char *user, char *passwd)
{
if (userProcPtr == NULL) {
return NS_ERROR;
}
return (*userProcPtr)(user, passwd);
}
/*
*----------------------------------------------------------------------
*
* Ns_SetUserAuthorizeProc --
*
* Set the proc to call when authorizing users.
*
* Results:
* None.
*
* Side effects:
* None.
*
*----------------------------------------------------------------------
*/
void
Ns_SetUserAuthorizeProc(Ns_UserAuthorizeProc *procPtr)
{
userProcPtr = procPtr;
}
|