3 This program is free software; you can redistribute it and/or modify
4 it under the terms of the Revised BSD License.
6 This program is distributed in the hope that it will be useful,
7 but WITHOUT ANY WARRANTY; without even the implied warranty of
8 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
9 Revised BSD License for more details.
11 Copyright 2004-2019 iDB Support - https://idb.osdn.jp/support/category.php?act=view&id=1
12 Copyright 2004-2019 Game Maker 2k - https://idb.osdn.jp/support/category.php?act=view&id=2
14 $FileInfo: sqlite.php - Last Update: 08/02/2019 SVN 905 - Author: cooldude2k $
16 $File3Name = basename($_SERVER['SCRIPT_NAME']);
17 if ($File3Name=="sqlite.php"||
$File3Name=="/sqlite.php") {
18 @header
('Location: index.php');
21 function sql_error($link=null) {
24 $result = sqlite_error_string(sqlite_last_error($link)); }
26 $result = sqlite_error_string(sqlite_last_error($SQLStat)); }
30 function sql_errno($link=null) {
33 $result = sqlite_last_error($link); }
35 $result = sqlite_last_error($SQLStat); }
39 function sql_errorno($link=null) {
42 $result = sqlite_last_error($link).": ".sqlite_error_string(sqlite_last_error($link)); }
44 $result = sqlite_last_error($SQLStat).": ".sqlite_error_string(sqlite_last_error($SQLStat)); }
50 function sql_query($query,$link=null) {
51 global $NumQueries,$SQLStat;
53 $result = sqlite_query($link,$query); }
55 $result = sqlite_query($SQLStat,$query); }
56 if ($result===false) {
57 output_error("SQL Error: ".sql_error(),E_USER_ERROR
);
59 if ($result!==false) {
62 //Fetch Number of Rows
63 function sql_num_rows($result) {
64 $num = sqlite_num_rows($result);
66 output_error("SQL Error: ".sql_error(),E_USER_ERROR
);
69 // Connect to sqlite database
70 function sql_connect_db($server,$username,$password,$database=null,$new_link=false) {
71 if($new_link!==true) { $new_link = false; }
72 if($database===null) {
74 if($database!==null) {
75 $link = sqlite_open($database,0666,$sqliteerror); }
77 output_error("Not connected: ".$sqliteerror,E_USER_ERROR
);
80 function sql_disconnect_db($link=null) {
81 return sqlite_close($link); }
83 function sql_result($result,$row,$field=0) {
84 $check = sqlite_seek($result,$row);
86 output_error("SQL Error: ".sql_error(),E_USER_ERROR
);
88 $trow = sqlite_fetch_array($result);
89 if(!isset($trow[$field])) { $trow[$field] = null; }
90 $retval = $trow[$field];
93 function sql_free_result($result) {
95 //Fetch Results to Array
96 function sql_fetch_array($result,$result_type=SQLITE_BOTH
) {
97 $row = sqlite_fetch_array($result,$result_type);
99 //Fetch Results to Associative Array
100 function sql_fetch_assoc($result) {
101 $row = sqlite_fetch_array($result,SQLITE_ASSOC
);
104 function sql_fetch_row($result) {
105 $row = sqlite_fetch_array($result,SQLITE_NUM
);
108 function sql_server_info($link=null) {
109 $result = sqlite_libversion();
112 function sql_client_info($link=null) {
114 function sql_escape_string($string,$link=null) {
115 $string = sqlite_escape_string($string);
116 if ($string===false) {
117 output_error("SQL Error: ".sql_error(),E_USER_ERROR
);
120 // SafeSQL Lite Source Code by Cool Dude 2k
121 // Make SQL Query's safe
122 function sql_pre_query($query_string,$query_vars) {
123 $query_array = array(array("%i","%I","%F","%S"),array("%d","%d","%f","%s"));
124 $query_string = str_replace($query_array[0], $query_array[1], $query_string);
125 if (get_magic_quotes_gpc()) {
126 $query_vars = array_map("stripslashes", $query_vars); }
127 $query_vars = array_map("sql_escape_string", $query_vars);
128 $query_val = $query_vars;
129 $query_num = count($query_val);
131 while ($query_i < $query_num) {
132 $query_is = $query_i+
1;
133 $query_val[$query_is] = $query_vars[$query_i];
135 $query_val[0] = $query_string;
136 return call_user_func_array("sprintf",$query_val); }
137 function sql_set_charset($charset,$link=null) {
140 function sql_set_charset($charset,$link=null) {
141 if(function_exists('mysql_set_charset')===false) {
143 $result = sql_query("SET CHARACTER SET '".$charset."'"); }
145 $result = sql_query("SET CHARACTER SET '".$charset."'",$link); }
146 if ($result===false) {
147 output_error("SQL Error: ".sql_error(),E_USER_ERROR);
150 $result = sql_query("SET NAMES '".$charset."'"); }
152 $result = sql_query("SET NAMES '".$charset."'",$link); }
153 if ($result===false) {
154 output_error("SQL Error: ".sql_error(),E_USER_ERROR);
157 if(function_exists('mysql_set_charset')===true) {
159 $result = mysql_set_charset($charset,$link); }
161 $result = mysql_set_charset($charset); }
162 if ($result===false) {
163 output_error("SQL Error: ".sql_error(),E_USER_ERROR);
166 if(function_exists('mysql_set_charset')===false) {
167 function mysql_set_charset($charset,$link) {
169 $result = sql_set_charset($charset,$link); }
171 $result = sql_set_charset($charset); }
172 if ($result===false) {
173 output_error("SQL Error: ".sql_error(),E_USER_ERROR);
177 // Get next id for stuff
178 function sql_get_next_id($tablepre,$table,$link=null) {
179 $nid = sqlite_last_insert_rowid($link);
181 // Get number of rows for table
182 function sql_get_num_rows($tablepre,$table,$link=null) {
183 $getnextidq = sql_pre_query("SHOW TABLE STATUS LIKE '".$tablepre.$table."'", array());
185 $getnextidr = sql_query($getnextidq); }
187 $getnextidr = sql_query($getnextidq,$link); }
188 $getnextid = sql_fetch_assoc($getnextidr);
189 return $getnextid['Rows'];
190 @sql_free_result
($getnextidr); }