diff options
| author | drh <drh@noemail.net> | 2003-06-06 19:00:42 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2003-06-06 19:00:42 +0000 |
| commit | 81e293b4b20430af25d00f5538808b8f8fe44444 (patch) | |
| tree | e65e08019520ede0eb02cf30e10d021ca6cdd1ae /src/tclsqlite.c | |
| parent | 70dc85a4c21d7f02a4ec6ad314fd9bbab74d2076 (diff) | |
| download | sqlite-81e293b4b20430af25d00f5538808b8f8fe44444.tar.gz sqlite-81e293b4b20430af25d00f5538808b8f8fe44444.zip | |
Extend the authorization mechanism to disallow the ATTACH and DETACH commands.
Ticket #340. (CVS 1010)
FossilOrigin-Name: a97dca73aed0b42d8dcf944360667ae93c5324fd
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index ed4eb6c47..20d7499f0 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -11,7 +11,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.48 2003/04/23 12:25:24 drh Exp $ +** $Id: tclsqlite.c,v 1.49 2003/06/06 19:00:42 drh Exp $ */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ @@ -380,6 +380,8 @@ static int auth_callback( case SQLITE_SELECT : zCode="SQLITE_SELECT"; break; case SQLITE_TRANSACTION : zCode="SQLITE_TRANSACTION"; break; case SQLITE_UPDATE : zCode="SQLITE_UPDATE"; break; + case SQLITE_ATTACH : zCode="SQLITE_ATTACH"; break; + case SQLITE_DETACH : zCode="SQLITE_DETACH"; break; default : zCode="????"; break; } Tcl_DStringInit(&str); |