Roxen.git / server / modules / tags / sqltag.pike

version» Context lines:

Roxen.git/server/modules/tags/sqltag.pike:1:   // This is a roxen module. Copyright © 1997-2000, Roxen IS.   //   // A module for Roxen, which gives the tags   // <sqltable>, <sqlquery> and <sqloutput>.   //   // Henrik Grubbström 1997-01-12    - constant cvs_version="$Id: sqltag.pike,v 1.50 2000/03/25 02:28:11 nilsson Exp $"; + constant cvs_version="$Id: sqltag.pike,v 1.51 2000/03/25 03:05:02 nilsson Exp $";   constant thread_safe=1;   #include <module.h>      inherit "module";   inherit "roxenlib";      Configuration conf;         // Module interface functions
Roxen.git/server/modules/tags/sqltag.pike:134:       if( args["rowinfo"] )    id->variables[args->rowinfo]=sizeof(res);       return ret;    }       if (args["do-once"])    return do_output_tag( args, ({([])}), contents, id )+ "<true>";    -  if(args->quiet) { +     id->misc->defines[" _ok"] = 0; -  return ""; +    } -  RXML.run_error("No SQL return values."); - } +       class TagSqlplugin {    inherit RXML.Tag;    constant name = "emit";    constant plugin_name = "sql";       array get_dataset(mapping m, RequestID id) {    array|string res=do_sql_query("sqloutput", m, id);    if(m->rowinfo) id->variables[m->rowinfo] = sizeof(res);    return res;
Roxen.git/server/modules/tags/sqltag.pike:165:    NOCACHE();       array res=do_sql_query(tag, args, id);       if(args["mysql-insert-id"])    if(args->dbobj && args->dbobj->master_sql)    id->variables[args["mysql-insert-id"]] = args->dbobj->master_sql->insert_id();    else    RXML.parse_error("No insert_id present.");    -  return "<true />"; +  id->misc->defines[" _ok"] = 1;   }      string tag_sqltable(string tag, mapping args, RequestID id)   {    NOCACHE();       object res=do_sql_query(tag, args, id);       int ascii=!!args->ascii;    string ret="";
Roxen.git/server/modules/tags/sqltag.pike:208:    foreach(row, mixed value)    ret += "<td>"+(value==""?nullvalue:value)+"</td>";    ret += "</tr>\n";    }    }       if (!ascii)    ret=make_container("table", args-(["host":"", "database":"", "user":"", "password":"",    "query":"", "nullvalue":""]), ret);    -  return ret+"<true>"; +  id->misc->defines[" _ok"] = 1; +  return ret;    }    -  RXML.run_error("No SQL return values."); +  id->misc->defines[" _ok"] = 0;   }         // ------------------- Callback functions -------------------------      Sql.sql sql_object(void|string host)   {    string host = stringp(host)?host:query("hostname");    Sql.sql con;    function sql_connect = conf->sql_connect;