diff options
Diffstat (limited to 'web/mod_ptt.c')
| -rw-r--r-- | web/mod_ptt.c | 284 |
1 files changed, 284 insertions, 0 deletions
diff --git a/web/mod_ptt.c b/web/mod_ptt.c new file mode 100644 index 00000000..3c4309ed --- /dev/null +++ b/web/mod_ptt.c @@ -0,0 +1,284 @@ +#include "mod_ptt.h" +extern SHM_t *SHM; +extern int *GLOBALVAR; + +extern int numboards; +extern boardheader_t *bcache; +typedef struct excfg { + int cmode; /* Environment to which record applies (directory, + * server, or combination). + */ +#define CONFIG_MODE_SERVER 1 +#define CONFIG_MODE_DIRECTORY 2 +#define CONFIG_MODE_COMBO 3 /* Shouldn't ever happen. */ + int local; /* Boolean: "Example" directive declared here? */ + int congenital; /* Boolean: did we inherit an "Example"? */ + char *trace; /* Pointer to trace string. */ + char *loc; /* Location to which this record applies. */ +} excfg; + +static const char *trace = NULL; +static table *static_calls_made = NULL; + +static pool *ptt_pool = NULL; +static pool *ptt_subpool = NULL; + + +module MODULE_VAR_EXPORT ptt_module; +excfg * our_dconfig(request_rec *r) +{ + + return (excfg *) ap_get_module_config(r->per_dir_config, &ptt_module); +} + +static void setup_module_cells() +{ + if (ptt_pool == NULL) { + ptt_pool = ap_make_sub_pool(NULL); + }; + if (static_calls_made == NULL) { + static_calls_made = ap_make_table(ptt_pool, 16); + }; +} + + +static int xml_header(request_rec *r) +{ + r->content_type = "text/xml"; + ap_send_http_header(r); + ap_rputs("<?xml version=\"1.0\" encoding=\"Big5\"?> \n", r); + ap_rprintf(r, "<!-- HTTP-Server-version=\"%s\"\n", + ap_get_server_version()); + ap_rprintf(r," r-filename=\"%s\"\n",r->filename); + ap_rprintf(r," r-request_time=\"%s\"\n",ctime(&r->request_time)); + ap_rprintf(r," r-method=\"%s\"\n",r->method); + ap_rprintf(r," r-method_number=\"%d\"\n",r->method_number); + ap_rprintf(r," r-path_info=\"%s\"\n",r->path_info); + ap_rprintf(r," r-args=\"%s\"\n",r->args); + ap_rprintf(r," r-unparsed_uri=\"%s\"\n",r->unparsed_uri); + ap_rprintf(r," r-handler=\"%s\"\n",r->handler); + ap_rprintf(r," r-content_type=\"%s\"\n",r->content_type); + ap_rprintf(r, " Serverbuilt=\"%s\" \n", ap_get_server_built()); + ap_rprintf(r, " numboards=\"%d\" \n", numboards); + ap_rprintf(r, " shm=\"%d\" \n", SHM->loaded ); + ap_rprintf(r, " max_user=\"%d\" -->", SHM->max_user ); +} +static int userlist(request_rec *r) +{ + int i,offset=0; + userinfo_t *ptr; + xml_header(r); + if (r->header_only) { + return OK; + } + if(r->args) offset=atoi(r->args); + if(offset<0 || offset>SHM->UTMPnumber)offset=0; + + ap_rprintf(r,"<userlist>"); + for(i=offset;i<SHM->UTMPnumber && i<50+offset;i++) + { + ptr= (userinfo_t *)SHM->sorted[SHM->currsorted][0][i]; + if(!ptr || ptr->userid[0]==0 || ptr->invisible ) continue; + ap_rprintf(r,"<user>\n"); + ap_rprintf(r," <id>%d</id>\n",i+1); + ap_rprintf(r," <total>%d</total>\n",SHM->UTMPnumber); + ap_rprintf(r," <uid>%d</uid>\n",ptr->uid); + ap_rprintf(r," <userid>%s</userid>\n",ptr->userid); + ap_rprintf(r," <username>%s</username>\n", + ap_escape_html(r->pool,ptr->username)); + ap_rprintf(r," <from>%s</from>\n",ptr->from); + ap_rprintf(r," <from_alias>%d</from_alias>\n",ptr->from_alias); + ap_rprintf(r," <mailalert>%d</mailalert>\n",ptr->mailalert); + ap_rprintf(r," <mind>%s</mind>\n",ap_escape_html(r->pool,ptr->mind)); + ap_rprintf(r,"</user>"); + } + ap_rprintf(r,"</userlist>"); +} +static int showboard(request_rec *r, int id) +{ + int i; + boardheader_t *bptr=NULL; + id=id-1; + ap_rprintf(r,"<brdlist>"); + bptr = (boardheader_t *)bcache[id].firstchild[0]; + for(; bptr!= (boardheader_t*)~0; ) + { + if((bcache[id].brdattr&BRD_HIDE)|| + bcache[id].level&& !(bcache[id].brdattr & BRD_POSTMASK )) continue; + ap_rprintf(r,"<brd>\n"); + i=(bptr-bcache); + ap_rprintf(r," <bid>%d</bid>",i+1); + ap_rprintf(r," <brdname>%s</brdname>\n",bptr->brdname); + ap_rprintf(r," <title>%s</title>\n",ap_escape_html(r->pool,bptr->title)); + ap_rprintf(r," <nuser>%d</nuser>\n",bptr->nuser); + ap_rprintf(r," <gid>%d</gid>\n",bptr->gid); + ap_rprintf(r," <childcount>%d</childcount>\n",bptr->childcount); + ap_rprintf(r," <BM>%s</BM>\n",bptr->BM); + ap_rprintf(r," <brdattr>%d</brdattr>\n",bptr->brdattr); + ap_rprintf(r," <total>%d</total>\n",SHM->total[i]); + ap_rprintf(r,"</brd>\n"); + bptr=(boardheader_t*)bptr->next[0]; + } + + ap_rprintf(r,"</brdlist>"); +} + + +static int showpost(request_rec *r,int bid,int id, int num) +{ + int i; + num=256; + id=1; + char path[512]; + fileheader_t headers[256]; + memset(headers,0, sizeof(fileheader_t)*256); + sprintf(path,BBSHOME"/boards/%c/%s/.DIR", + bcache[bid-1].brdname[0],bcache[bid-1].brdname); + get_records(path, headers, sizeof(fileheader_t)*256, id,num); + + ap_rprintf(r,"<postlist>"); + + for(i=0;i<256;i++) + { + ap_rprintf(r,"<post>\n"); + ap_rprintf(r," <id>%d</id>",i+1); + ap_rprintf(r," <filename>%s</filename>\n",headers[i].filename); + ap_rprintf(r," <owner>%s</owner>\n",headers[i].owner); + ap_rprintf(r," <date>%s</date>\n",headers[i].date); + ap_rprintf(r," <title>%s</title>\n", + ap_escape_html(r->pool,headers[i].title)); + ap_rprintf(r," <money>%d</money>\n",headers[i].money); + ap_rprintf(r," <filemode>%c</filemode>\n",headers[i].filemode); + ap_rprintf(r," <recommend>%d</recommend>\n",headers[i].recommend); + ap_rprintf(r,"</post>\n"); + } + ap_rprintf(r,"</postlist>"); +} +static int showmenujs(request_rec *r) +{ + int i; + boardheader_t *bptr; + r->content_type = "text/text"; + ap_send_http_header(r); + ap_rputs("d=new dTree('d');\n",r); + ap_rputs("d.add(0,-1,'Class','');\n",r); + for(i=1;i<=numboards;i++) + { + bptr=&bcache[i-1]; + if(!isalpha(bptr->brdname[0]))continue; + + ap_rprintf(r,"d.add(%d,%d,\"%s %s..\",'/boards?%s');\n", + i,bptr->gid-1, + bptr->gid==1?"":bptr->brdname, + ap_escape_quotes(r->pool, + ap_escape_html(r->pool,bptr->title+7)),i); + } + ap_rputs("d.draw()\n",r); + return OK; +} + +static int showxml(request_rec *r) +{ + int bid=1; + xml_header(r); + if (r->header_only) { + return OK; + } + if(r->args) bid=atoi(r->args); + if(bid<1 || bid>numboards)bid=1; + + if( + !(bcache[bid-1].brdattr&BRD_HIDE)&& + !(bcache[bid-1].level&&!(bcache[bid-1].brdattr & BRD_POSTMASK))) + if( bid==1||bcache[bid-1].brdattr&BRD_GROUPBOARD) + showboard(r,bid); + else + showpost(r,bid,0,0); + return OK; +} +static int ptt_handler(request_rec *r) +{ + excfg *dcfg; + + dcfg = our_dconfig(r); + + ap_soft_timeout("send ptt call trace", r); + + if(!strncmp(r->unparsed_uri,"/menu",5)) + showmenujs(r); + else if(!strncmp(r->unparsed_uri,"/userlist",9)) + userlist(r); + else + showxml(r); + + ap_kill_timeout(r); + return OK; +} + +/* OK Handler accepted the request and did its thing with it. */ +/* DECLINED Handler took no action. */ +/* HTTP_mumble Handler looked at request and found it wanting. */ + +static void ptt_child_init(server_rec *s, pool *p) +{ + + char *note; + char *sname = s->server_hostname; + attach_SHM(); + + + setup_module_cells(); + sname = (sname != NULL) ? sname : ""; + note = ap_pstrcat(p, "ptt_child_init(", sname, ")", NULL); +} + +static void ptt_child_exit(server_rec *s, pool *p) +{ + + char *note; + char *sname = s->server_hostname; + + /* + * The arbitrary text we add to our trace entry indicates for which server + * we're being called. + */ + sname = (sname != NULL) ? sname : ""; + note = ap_pstrcat(p, "ptt_child_exit(", sname, ")", NULL); +} + +static const handler_rec ptt_handlers[] = +{ + {"ptt_h", ptt_handler}, + {NULL} +}; + +module MODULE_VAR_EXPORT ptt_module = +{ + STANDARD_MODULE_STUFF, + NULL, /* module initializer */ + NULL, /* per-directory config creator */ + NULL, /* dir config merger */ + NULL, /* server config creator */ + NULL, /* server config merger */ + NULL, /* command table */ + ptt_handlers, /* [9] list of handlers */ + NULL, /* [2] filename-to-URI translation */ + NULL, /* [5] check/validate user_id */ + NULL, /* [6] check user_id is valid *here* */ + NULL, /* [4] check access by host address */ + NULL, /* [7] MIME type checker/setter */ + NULL, /* [8] fixups */ + NULL, /* [10] logger */ +#if MODULE_MAGIC_NUMBER >= 19970103 + NULL, /* [3] header parser */ +#endif +#if MODULE_MAGIC_NUMBER >= 19970719 + ptt_child_init, /* process initializer */ +#endif +#if MODULE_MAGIC_NUMBER >= 19970728 + ptt_child_exit, /* process exit/cleanup */ +#endif +#if MODULE_MAGIC_NUMBER >= 19970902 + NULL +#endif +}; |