Roxen.git/
server/
base_server/
roxen.pike
Branch:
Tag:
Non-build tags
All tags
No tags
1999-12-19
1999-12-19 16:06:11 by Martin Nilsson <mani@lysator.liu.se>
43665dbfa7d4e8a26a31d3975ae2e1af92ed2989 (
11
lines) (+
6
/-
5
)
[
Show
|
Annotate
]
Branch:
5.2
Typefixes
Rev: server/base_server/roxen.pike:1.371
1:
/*
-
* $Id: roxen.pike,v 1.
370
1999/12/
15
07
:
59
:
52
per
Exp $
+
* $Id: roxen.pike,v 1.
371
1999/12/
19
16
:
06
:
11
nilsson
Exp $
* * The Roxen Challenger main program. *
7:
*/ // ABS and suicide systems contributed freely by Francesco Chemolli
-
constant cvs_version="$Id: roxen.pike,v 1.
370
1999/12/
15
07
:
59
:
52
per
Exp $";
+
constant cvs_version="$Id: roxen.pike,v 1.
371
1999/12/
19
16
:
06
:
11
nilsson
Exp $";
object backend_thread; ArgCache argcache;
2189:
static string name; static string path; static int is_db;
-
static
object
db;
+
static
Sql.sql
db;
#define CACHE_VALUE 0 #define CACHE_SKEY 1
2249:
{ if( is_db ) {
-
mapping
res = db->query("select contents from "+name+" where id='"+id+"'");
+
array
res = db->query("select contents from "+name+" where id='"+id+"'");
if( sizeof(res) ) { db->query("update "+name+" set atime='"+
2268:
{ if( is_db ) {
-
mapping
data = db->query(sprintf("select id,contents from %s where lkey='%s'",
+
array
data = db->query(sprintf("select id,contents from %s where lkey='%s'",
name,long_key[..79])); foreach( data, mapping m ) if( m->contents == long_key )