// vim:noexpandtab:syntax=lpc // $Id: header.i,v 1.5 2007/10/08 11:00:31 lynx Exp $ #include volatile int headerDone = 0; http_ok(string prot, string type, string extra) { string h; // yes, this is compatible to pre-HTTP/1.0 browsers. sick, i know. if (!prot || headerDone++) return; h = type || extra ? htheaders(type, extra) +"\n" : "Content-type: " DEFAULT_CONTENT_TYPE "\n\n"; emit(HTTP_SVERS " 200 Sure\n"+ h); } varargs http_error(string prot, int code, string comment, string html) { string out; out = "\n"; if (html) out = sprintf("%s\n%s%s", comment, out, html); else out = sprintf("\ error %d\n\ %s\n\


\n\n\ %s\n\n\

\n\ ", code, out, comment ); // %s\n //, WEBMASTER_EMAIL, comment, WEBMASTER_EMAIL // yes, this is compatible to pre-HTTP/1.0 browsers. sick, i know. if (!headerDone++ && prot) { // I used to output the comment, but Id have to cut out the // newline from the db emit(sprintf(HTTP_SVERS " 200 Actually %03d but MSIE steals my error page\n%s\n%s", code, htheaders(), out)); } else emit(out); }