Check for missing arg to pg_sqlite info -db

flightaware · Mar 19, 2018 · 9f33b49 · 9f33b49
1 parent ebc6cf0
commit 9f33b49
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/generic/pgtclSqlite.c b/generic/pgtclSqlite.c
@@ -1269,6 +1269,8 @@ Pg_sqlite(ClientData clientdata, Tcl_Interp *interp, int objc, Tcl_Obj *CONST ob
 				}
 
 				if (strcmp(optName, "-db") == 0) {
+					if(optIndex >= objc)
+						goto info_wrong_num_args;
 					dbName = Tcl_GetString(objv[optIndex]);
 					optIndex++;
 				} else if (strcmp(optName, "-busy") == 0) {