$Log$
+Revision 212.3 2000/06/12 03:28:44 ajc
+* added support for multi-line paging
+
Revision 212.2 2000/06/07 04:11:28 ajc
* HTML changes to room banner
1998-12-03 Nathan Bryant <bryant@cs.usm.maine.edu>
* webserver.c: warning fix
-
wprintf("<FORM METHOD=\"POST\" ACTION=\"/page_user\">\n");
+
+ wprintf("<TABLE border=0 width=100%%><TR><TD>\n");
+
wprintf("Select a user to send a message to: <BR>");
wprintf("<SELECT NAME=\"recp\" SIZE=10>\n");
}
}
wprintf("</SELECT>\n");
- wprintf("<BR>\n");
+
+ wprintf("</TD><TD>");
wprintf("Enter message text:<BR>");
- wprintf("<INPUT TYPE=\"text\" NAME=\"msgtext\" MAXLENGTH=80 SIZE=80>\n");
- wprintf("<BR><BR>\n");
+
+ wprintf("<TEXTAREA NAME=\"msgtext\" wrap=soft ROWS=5 COLS=40 "
+ "WIDTH=40></TEXTAREA><P>\n");
+
+ wprintf("</TD></TR></TABLE><BR>\n");
wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Send message\">");
wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\"><BR>\n");
void page_user(void)
{
char recp[256];
- char msgtext[256];
char sc[256];
char buf[256];
output_headers(1);
strcpy(recp, bstr("recp"));
- strcpy(msgtext, bstr("msgtext"));
strcpy(sc, bstr("sc"));
if (strcmp(sc, "Send message")) {
wprintf("<EM>Message was not sent.</EM><BR>\n");
} else {
- serv_printf("SEXP %s|%s", recp, msgtext);
+ serv_printf("SEXP %s|-", recp);
serv_gets(buf);
- if (buf[0] == '2') {
+ if (buf[0] == '4') {
+ text_to_server(bstr("msgtext"));
+ serv_puts("000");
wprintf("<EM>Message has been sent to ");
escputs(recp);
wprintf(".</EM><BR>\n");
- } else {
+ }
+ else {
wprintf("<EM>%s</EM><BR>\n", &buf[4]);
}
}
if ((strlen(WC->ugname) > 0) && (strcasecmp(WC->ugname, WC->wc_roomname))) {
wprintf("<TD VALIGN=TOP><A HREF=\"/ungoto\">");
wprintf("<IMG SRC=\"/static/back.gif\" BORDER=0>");
- wprintf("<BR><FONT SIZE=-3>Previous room</FONT></A></TD>");
+ wprintf("<BR><FONT SIZE=-2>Previous room</FONT></A></TD>");
}
- wprintf("<TD VALIGN=TOP BGCOLOR=666677>");
+ wprintf("<TD VALIGN=TOP BGCOLOR=444455>");
wprintf("<FONT SIZE=+2 COLOR=FFFFEE>%s</FONT><BR>", WC->wc_roomname);
wprintf("<FONT COLOR=DDDDCC>%d new of %d messages</FONT></TD>\n",
extract_int(&got[4], 1),
"<IMG SRC=\"/static/mail.gif\" border=0 "
"ALT=\"You have new mail\">"
"<BR><BLINK>%d</BLINK>", WC->new_mail);
- wprintf("<FONT SIZE=-3> new mail messages</FONT></TD>");
+ wprintf("<FONT SIZE=-2> new mail messages</FONT></TD>");
remember_new_mail = WC->new_mail;
}
wprintf("<TD VALIGN=TOP><A HREF=\"/gotonext\">");
wprintf("<IMG SRC=\"/static/forward.gif\" border=0>");
- wprintf("<BR><FONT SIZE=-3>Next room</FONT></A></TD>");
+ wprintf("<BR><FONT SIZE=-2>Next room</FONT></A></TD>");
wprintf("</TR></TABLE></CENTER>\n");
}