#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 };