Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(73)

Side by Side Diff: third_party/sqlite/sqlite-src-3100200/src/test_osinst.c

Issue 1610543003: [sql] Import reference version of SQLite 3.10.2. (Closed) Base URL: https://chromium.googlesource.com/chromium/src.git@master
Patch Set: Created 4 years, 11 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View unified diff | Download patch
OLDNEW
1 /* 1 /*
2 ** 2008 April 10 2 ** 2008 April 10
3 ** 3 **
4 ** The author disclaims copyright to this source code. In place of 4 ** The author disclaims copyright to this source code. In place of
5 ** a legal notice, here is a blessing: 5 ** a legal notice, here is a blessing:
6 ** 6 **
7 ** May you do good and not evil. 7 ** May you do good and not evil.
8 ** May you find forgiveness for yourself and forgive others. 8 ** May you find forgiveness for yourself and forgive others.
9 ** May you share freely, never taking more than you give. 9 ** May you share freely, never taking more than you give.
10 ** 10 **
(...skipping 1113 matching lines...) Expand 10 before | Expand all | Expand 10 after
1124 if( objc<2 ){ 1124 if( objc<2 ){
1125 Tcl_WrongNumArgs(interp, 1, objv, "SUB-COMMAND ..."); 1125 Tcl_WrongNumArgs(interp, 1, objv, "SUB-COMMAND ...");
1126 return TCL_ERROR; 1126 return TCL_ERROR;
1127 } 1127 }
1128 if( Tcl_GetIndexFromObj(interp, objv[1], strs, "sub-command", 0, &iSub) ){ 1128 if( Tcl_GetIndexFromObj(interp, objv[1], strs, "sub-command", 0, &iSub) ){
1129 return TCL_ERROR; 1129 return TCL_ERROR;
1130 } 1130 }
1131 1131
1132 switch( (enum VL_enum)iSub ){ 1132 switch( (enum VL_enum)iSub ){
1133 case VL_ANNOTATE: { 1133 case VL_ANNOTATE: {
1134 int rc;
1135 char *zVfs; 1134 char *zVfs;
1136 char *zMsg; 1135 char *zMsg;
1137 if( objc!=4 ){ 1136 if( objc!=4 ){
1138 Tcl_WrongNumArgs(interp, 3, objv, "VFS"); 1137 Tcl_WrongNumArgs(interp, 3, objv, "VFS");
1139 return TCL_ERROR; 1138 return TCL_ERROR;
1140 } 1139 }
1141 zVfs = Tcl_GetString(objv[2]); 1140 zVfs = Tcl_GetString(objv[2]);
1142 zMsg = Tcl_GetString(objv[3]); 1141 zMsg = Tcl_GetString(objv[3]);
1143 rc = sqlite3_vfslog_annotate(zVfs, zMsg); 1142 rc = sqlite3_vfslog_annotate(zVfs, zMsg);
1144 if( rc!=SQLITE_OK ){ 1143 if( rc!=SQLITE_OK ){
1145 Tcl_AppendResult(interp, "failed", 0); 1144 Tcl_AppendResult(interp, "failed", 0);
1146 return TCL_ERROR; 1145 return TCL_ERROR;
1147 } 1146 }
1148 break; 1147 break;
1149 } 1148 }
1150 case VL_FINALIZE: { 1149 case VL_FINALIZE: {
1151 int rc;
1152 char *zVfs; 1150 char *zVfs;
1153 if( objc!=3 ){ 1151 if( objc!=3 ){
1154 Tcl_WrongNumArgs(interp, 2, objv, "VFS"); 1152 Tcl_WrongNumArgs(interp, 2, objv, "VFS");
1155 return TCL_ERROR; 1153 return TCL_ERROR;
1156 } 1154 }
1157 zVfs = Tcl_GetString(objv[2]); 1155 zVfs = Tcl_GetString(objv[2]);
1158 rc = sqlite3_vfslog_finalize(zVfs); 1156 rc = sqlite3_vfslog_finalize(zVfs);
1159 if( rc!=SQLITE_OK ){ 1157 if( rc!=SQLITE_OK ){
1160 Tcl_AppendResult(interp, "failed", 0); 1158 Tcl_AppendResult(interp, "failed", 0);
1161 return TCL_ERROR; 1159 return TCL_ERROR;
1162 } 1160 }
1163 break; 1161 break;
1164 }; 1162 };
1165 1163
1166 case VL_NEW: { 1164 case VL_NEW: {
1167 int rc;
1168 char *zVfs; 1165 char *zVfs;
1169 char *zParent; 1166 char *zParent;
1170 char *zLog; 1167 char *zLog;
1171 if( objc!=5 ){ 1168 if( objc!=5 ){
1172 Tcl_WrongNumArgs(interp, 2, objv, "VFS PARENT LOGFILE"); 1169 Tcl_WrongNumArgs(interp, 2, objv, "VFS PARENT LOGFILE");
1173 return TCL_ERROR; 1170 return TCL_ERROR;
1174 } 1171 }
1175 zVfs = Tcl_GetString(objv[2]); 1172 zVfs = Tcl_GetString(objv[2]);
1176 zParent = Tcl_GetString(objv[3]); 1173 zParent = Tcl_GetString(objv[3]);
1177 zLog = Tcl_GetString(objv[4]); 1174 zLog = Tcl_GetString(objv[4]);
(...skipping 33 matching lines...) Expand 10 before | Expand all | Expand 10 after
1211 1208
1212 return TCL_OK; 1209 return TCL_OK;
1213 } 1210 }
1214 1211
1215 int SqlitetestOsinst_Init(Tcl_Interp *interp){ 1212 int SqlitetestOsinst_Init(Tcl_Interp *interp){
1216 Tcl_CreateObjCommand(interp, "vfslog", test_vfslog, 0, 0); 1213 Tcl_CreateObjCommand(interp, "vfslog", test_vfslog, 0, 0);
1217 return TCL_OK; 1214 return TCL_OK;
1218 } 1215 }
1219 1216
1220 #endif /* SQLITE_TEST */ 1217 #endif /* SQLITE_TEST */
OLDNEW
« no previous file with comments | « third_party/sqlite/sqlite-src-3100200/src/test_onefile.c ('k') | third_party/sqlite/sqlite-src-3100200/src/test_pcache.c » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698