]> code.citadel.org Git - citadel.git/blobdiff - ctdlphp/postmsg.php
* Implemented SEND_LISTING mode in the session proxy
[citadel.git] / ctdlphp / postmsg.php
diff --git a/ctdlphp/postmsg.php b/ctdlphp/postmsg.php
new file mode 100644 (file)
index 0000000..70111a7
--- /dev/null
@@ -0,0 +1,24 @@
+<?PHP
+
+       include "ctdlheader.php";
+       bbs_page_header();
+
+       serv_puts("ENT0 1");
+       $response = serv_gets();
+
+       if (substr($response, 0, 1) != '4') {
+               echo htmlspecialchars(substr($response, 3)) . '<br>' ;
+       }
+       else {
+               echo 'Sending: ' . $_REQUEST["msgtext"] . '<BR>' ;
+               flush();
+               serv_puts($_REQUEST["msgtext"]);
+               echo 'Sending: 000<BR>' ;
+               flush();
+               serv_puts("000");
+       }
+
+       echo "Message has been posted.<BR>\n" ;
+
+       bbs_page_footer();
+?>