#!/usr/bin/php -q
<?php
-
+include "config_ctdlclient.php";
// $Id$
//
// This is the session proxy that binds a unix domain socket to a Citadel
// Copyright (c) 2003 by Art Cancro <ajc@uncensored.citadel.org>
// This program is released under the terms of the GNU General Public License.
+global $msgsock;
// sock_gets() -- reads one line of text from a socket
//
+if (CITADEL_DEBUG_PROXY)
+{
+ define_syslog_variables();
+ openlog("sessionproxylog", LOG_PID | LOG_PERROR, LOG_LOCAL0);
+}
function sock_gets($sock) {
+ global $msgsock;
+ socket_clear_error($msgsock);
$buf = socket_read($sock, 4096, PHP_NORMAL_READ);
- if ($buf == false) return false;
+ if (CITADEL_DEBUG_PROXY)
+ {
+ syslog(LOG_DEBUG, "gets Read: ".$buf);
+ }
+ if (socket_last_error($sock)) return false;
if (preg_match("'\n$'s", $buf)) {
$buf = substr($buf, 0, strpos($buf, "\n"));
-
// *** Start of main program ***
error_reporting(E_ALL);
// We need to get a connection to the Citadel server going now.
-$ctdlsock = fsockopen("uncensored.citadel.org", 504, $errno, $errstr, 30);
-//$ctdlsock = fsockopen("/appl/citadel/citadel.socket", 0, $errno, $errstr, 30);
+$ctdlsock = fsockopen(CITADEL_HOSTNAME, CITADEL_TCP_PORTNO, $errno, $errstr, 30);
if (!$ctdlsock) {
socket_close ($sock);
system("/bin/rm -f " . $sockname);
if ($msgsock >= 0) do {
$buf = sock_gets($msgsock);
if ($buf !== false) {
+// fwrite($logfd, ">>");
+// fwride($logfd, $buf);
if (!fwrite($ctdlsock, $buf . "\n")) {
fclose($ctdlsock);
socket_close($sock);
exit(9);
}
$talkback = fgets($ctdlsock, 4096);
+ if (CITADEL_DEBUG_PROXY)
+ {
+ syslog(LOG_DEBUG, "talkback: ".$talkback);
+ }
if (!$talkback) {
+ if (CITADEL_DEBUG_PROXY)
+ {
+ syslog(LOG_ERROR, "closing socket.");
+ }
fclose($ctdlsock);
socket_close($sock);
system("/bin/rm -f " . $sockname);
}
socket_write($msgsock, $talkback, strlen($talkback));
+ // BINARY_FOLLOWS mode
+ if (substr($talkback, 0, 1) == "6") {
+ $bytes = intval(substr($talkback, 4));
+ if (CITADEL_DEBUG_PROXY)
+ {
+ syslog(LOG_DEBUG, "reading ".$bytes." bytes from server");
+ }
+ $buf = fread($ctdlsock, $bytes);
+ if (CITADEL_DEBUG_PROXY)
+ {
+ syslog(LOG_DEBUG, "Read: ".$buf);
+ }
+ socket_write($msgsock, $buf, $bytes);
+ }
+
// LISTING_FOLLOWS mode
if (substr($talkback, 0, 1) == "1") do {
$buf = fgets($ctdlsock, 4096);
// SEND_LISTING mode
if (substr($talkback, 0, 1) == "4") do {
+ socket_clear_error($msgsock);
$buf = sock_gets($msgsock);
- if (!$buf) {
+ if (socket_last_error($msgsock)) {
$buf = "000" ;
}
if (!fwrite($ctdlsock, $buf . "\n")) {