From: Stephen D. <sd...@us...> - 2005-07-12 07:32:39
|
Update of /cvsroot/naviserver/naviserver/nsperm In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20670/nsperm Modified Files: nsperm.c Log Message: 2005-07-11 Stephen Deasey <sd...@us...> * include/ns.h: * nsd/nsd.h: * nsd/nsmain.c: * nsd/queue.c: * nsd/tclcmds.c: * nsd/proc.c: * nsd/tclinit.c: Add generalised interp tracing mechanism which replaces Ns_TclInitInterps, Ns_TclRegisterDeferred etc. Restructured code for clarity. * nsd/tclset.c: * nsd/tclshare.c: * nsd/tclthread.c: * nsd/adprequest.c: s/NsGetInterp/NsGetInterpData/g * nsd/Makefile: * nsd/connio.c: * nsd/tclatclose.c: Moved at-close traces into tclinit.c. * nsd/tclmisc.c: Move Ns_TclPrintfResult into misc. * nsdb/db.h: * nsdb/nsdb.h: * nslog/nslog.c: * nsperm/nsperm.c: Remove usage of deprecated functions. Index: nsperm.c =================================================================== RCS file: /cvsroot/naviserver/naviserver/nsperm/nsperm.c,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** nsperm.c 10 Jun 2005 17:58:57 -0000 1.2 --- nsperm.c 12 Jul 2005 07:31:40 -0000 1.3 *************** *** 98,102 **** static Tcl_CmdProc PermCmd; ! static int AddCmds(Tcl_Interp *interp, void *arg); static int AddUserCmd(Server *servPtr, Tcl_Interp *interp, int argc, char **argv); --- 98,102 ---- static Tcl_CmdProc PermCmd; ! static Ns_TclTraceProc AddCmds; static int AddUserCmd(Server *servPtr, Tcl_Interp *interp, int argc, char **argv); *************** *** 153,157 **** Ns_RWLockInit(&servPtr->lock); Ns_SetRequestAuthorizeProc(server, AuthProc); ! Ns_TclInitInterps(server, AddCmds, servPtr); hPtr = Tcl_CreateHashEntry(&serversTable, server, &new); Tcl_SetHashValue(hPtr, servPtr); --- 153,157 ---- Ns_RWLockInit(&servPtr->lock); Ns_SetRequestAuthorizeProc(server, AuthProc); ! Ns_TclRegisterTrace(server, AddCmds, servPtr, NS_TCL_TRACE_CREATE); hPtr = Tcl_CreateHashEntry(&serversTable, server, &new); Tcl_SetHashValue(hPtr, servPtr); |