Roxen.git
/
server
/
base_server
/
module.pike
version
»
Context lines:
10
20
40
80
file
none
3
Roxen.git/server/base_server/module.pike:1:
-
/* $Id: module.pike,v 1.
58
1999/
11
/
29
22
:
09
:
05
per
Exp $ */
+
/* $Id: module.pike,v 1.
59
1999/
12
/
07
12
:
10
:
16
nilsson
Exp $ */
#include <module.h> #include <request_trace.h> mapping (string:mixed *) variables=([]); RoxenModule this = this_object(); mapping(string:array(int)) error_log=([]); constant is_module = 1; constant module_type = MODULE_PARSER; constant module_name = "Unnamed module";
Roxen.git/server/base_server/module.pike:631:
mapping query_if_callers() { mapping m = ([]); foreach(glob("if_*", indices( this_object())), string q) if(functionp( this_object()[q] )) m[replace(q[3..], "_", "-")] = this_object()[q]; return m; }
-
mixed get_
commented_
value(string path,
int
start
)
+
mixed get_
value
_
from_file
(string path,
string
index, void|string pre
)
{ Stdio.File file=Stdio.File(); if(!file->open(path,"r")) return 0;
-
string in,comment;
-
in=file->read();
-
if(
sscanf
(
(in/"\n"
)
[start
..]
*
"
\n
"
,"%*s/*%s*/",comment
)
!=2)
return 0;
-
return compile_string(
"mixed f
(
){ return
"
+comment+
"
; }"
)()-
>f
();
+
if(
index[sizeof
(
index
)
-2
..
sizeof(index)-1
]
==
"
()
")
{
+
return compile_string((
pre||
"")
+file->read
()
)[index[..sizeof(index)
-
3]]
();
}
-
+
return compile_string((pre||"")+file->read())[index];
+
}