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.
55
1999/11/
21
04
:
01
:
52
nilsson Exp $ */
+
/* $Id: module.pike,v 1.
56
1999/11/
22
18
:
45
:
07
nilsson Exp $ */
#include <module.h> #include <request_trace.h> mapping (string:mixed *) variables=([]); object 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:677:
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
, int stop
)
+
mixed get_commented_value(string path, int start)
{ object file=Stdio.File(); if(!file->open(path,"r")) return 0;
-
string
junk,
in,comment;
+
string in,comment;
in=file->read();
-
if(sscanf(in,"%s/*%s*/
%s
",
junk,
comment
,junk
)!=
3
) return 0;
+
if(sscanf(
(
in
/"\n")[start..]*"\n"
,"%
*
s/*%s*/",comment)!=
2
) return 0;
return compile_string( "mixed f(){ return "+comment+"; }" )()->f(); }