mirror of
git://git.psyced.org/git/psyced
synced 2024-08-15 03:25:10 +00:00
27 lines
1.1 KiB
C
27 lines
1.1 KiB
C
|
// $Id: wap.h,v 1.4 2006/09/29 08:51:40 lynx Exp $ // vim:syntax=lpc
|
||
|
|
//
|
||
|
|
#define HTOK htok3(prot, "text/vnd.wap.wml", "Cache-Control: no-cache\n")
|
||
|
|
|
||
|
|
// wml.textdb is the correct way to do this these days...
|
||
|
|
|
||
|
|
#define WML_START "<?xml version=\"1.0\"?>\
|
||
|
|
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\"\
|
||
|
|
\"http://www.wapforum.org/DTD/wml_1.1.xml\"><wml>\
|
||
|
|
<template><do type='prev' label='Back'><prev/></do></template>"
|
||
|
|
|
||
|
|
#define WML_END "</wml>"
|
||
|
|
|
||
|
|
#define LOGIN_WML write("User:<br/><input type='text' name='u' emptyok='false' /><br/>"); \
|
||
|
|
write("Pass:<br/><input type='password' name='p' emptyok='false' /><br/>"); \
|
||
|
|
write("<a href='login?u=$(u)&p=$(p)'>[login]</a>")
|
||
|
|
|
||
|
|
#define HEADER_WML(x) write(WML_START+"<card title='"+CHATNAME+" "+(x)+"'><p align='center'>")
|
||
|
|
|
||
|
|
#define NAV_WML write("<a href='inbox?u="+username+"&p="+password+"'>[inbox]</a><a href='send?u="+username+"&p="+password+"'>[send msg]</a><br/>");
|
||
|
|
|
||
|
|
#define SEND_PERSON(x) ("<a href='send?u="+username+"&p="+password+"&r="+(x)+"'>"+(x)+"</a>")
|
||
|
|
|
||
|
|
#define FOOTER_WML write("</p></card>\n" + WML_END)
|
||
|
|
|
||
|
|
|