#include <fcntl.h>
#include <sys/stat.h>
#include <errno.h>
+#include <ctype.h>
#include <string.h>
#include <sys/stat.h>
#include <limits.h>
#include "citadel.h"
#include "server.h"
-#include "dynloader.h"
+#include "serv_extensions.h"
#include "config.h"
#include "file_ops.h"
#include "sysdep_decls.h"
#include "tools.h"
#include "citserver.h"
+#ifndef HAVE_SNPRINTF
+#include "snprintf.h"
+#endif
+
+/*
+ * network_talking_to() -- concurrency checker
+ */
+int network_talking_to(char *nodename, int operation) {
+
+ static char *nttlist = NULL;
+ char *ptr = NULL;
+ int i;
+ char buf[SIZ];
+ int retval = 0;
+
+ begin_critical_section(S_NTTLIST);
+
+ switch(operation) {
+
+ case NTT_ADD:
+ if (nttlist == NULL) nttlist = strdup("");
+ if (nttlist == NULL) break;
+ nttlist = (char *)realloc(nttlist,
+ (strlen(nttlist) + strlen(nodename) + 3) );
+ strcat(nttlist, "|");
+ strcat(nttlist, nodename);
+ break;
+
+ case NTT_REMOVE:
+ if (nttlist == NULL) break;
+ if (strlen(nttlist) == 0) break;
+ ptr = malloc(strlen(nttlist));
+ if (ptr == NULL) break;
+ strcpy(ptr, "");
+ for (i = 0; i < num_tokens(nttlist, '|'); ++i) {
+ extract_token(buf, nttlist, i, '|', sizeof buf);
+ if ( (strlen(buf) > 0)
+ && (strcasecmp(buf, nodename)) ) {
+ strcat(ptr, buf);
+ strcat(ptr, "|");
+ }
+ }
+ free(nttlist);
+ nttlist = ptr;
+ break;
+
+ case NTT_CHECK:
+ if (nttlist == NULL) break;
+ if (strlen(nttlist) == 0) break;
+ for (i = 0; i < num_tokens(nttlist, '|'); ++i) {
+ extract_token(buf, nttlist, i, '|', sizeof buf);
+ if (!strcasecmp(buf, nodename)) ++retval;
+ }
+ break;
+ }
+
+ if (nttlist != NULL) lprintf(CTDL_DEBUG, "nttlist=<%s>\n", nttlist);
+ end_critical_section(S_NTTLIST);
+ return(retval);
+}
+
+
+
/*
* Server command to delete a file from a room's directory
if (CtdlAccessCheck(ac_room_aide))
return;
- if ((CC->quickroom.QRflags & QR_DIRECTORY) == 0) {
+ if ((CC->room.QRflags & QR_DIRECTORY) == 0) {
cprintf("%d No directory in this room.\n",
ERROR + NOT_HERE);
return;
}
}
snprintf(pathname, sizeof pathname, "./files/%s/%s",
- CC->quickroom.QRdirname, filename);
+ CC->room.QRdirname, filename);
a = unlink(pathname);
if (a == 0) {
- cprintf("%d File '%s' deleted.\n", OK, pathname);
+ cprintf("%d File '%s' deleted.\n", CIT_OK, pathname);
}
else {
cprintf("%d File '%s' not found.\n",
*/
void cmd_movf(char *cmdbuf)
{
- char filename[SIZ];
- char pathname[SIZ];
- char newpath[SIZ];
- char newroom[SIZ];
- char buf[SIZ];
+ char filename[PATH_MAX];
+ char pathname[PATH_MAX];
+ char newpath[PATH_MAX];
+ char newroom[ROOMNAMELEN];
+ char buf[PATH_MAX];
int a;
- struct quickroom qrbuf;
+ struct ctdlroom qrbuf;
- extract(filename, cmdbuf, 0);
- extract(newroom, cmdbuf, 1);
+ extract_token(filename, cmdbuf, 0, '|', sizeof filename);
+ extract_token(newroom, cmdbuf, 1, '|', sizeof newroom);
if (CtdlAccessCheck(ac_room_aide)) return;
- if ((CC->quickroom.QRflags & QR_DIRECTORY) == 0) {
+ if ((CC->room.QRflags & QR_DIRECTORY) == 0) {
cprintf("%d No directory in this room.\n",
ERROR + NOT_HERE);
return;
}
}
snprintf(pathname, sizeof pathname, "./files/%s/%s",
- CC->quickroom.QRdirname, filename);
+ CC->room.QRdirname, filename);
if (access(pathname, 0) != 0) {
cprintf("%d File '%s' not found.\n",
ERROR + FILE_NOT_FOUND, pathname);
}
if (getroom(&qrbuf, newroom) != 0) {
- cprintf("%d '%s' does not exist.\n", ERROR, newroom);
+ cprintf("%d '%s' does not exist.\n", ERROR + ROOM_NOT_FOUND, newroom);
return;
}
if ((qrbuf.QRflags & QR_DIRECTORY) == 0) {
snprintf(newpath, sizeof newpath, "./files/%s/%s", qrbuf.QRdirname,
filename);
if (link(pathname, newpath) != 0) {
- cprintf("%d Couldn't move file: %s\n", ERROR,
+ cprintf("%d Couldn't move file: %s\n", ERROR + INTERNAL_ERROR,
strerror(errno));
return;
}
/* this is a crude method of copying the file description */
snprintf(buf, sizeof buf,
"cat ./files/%s/filedir |grep %s >>./files/%s/filedir",
- CC->quickroom.QRdirname, filename, qrbuf.QRdirname);
+ CC->room.QRdirname, filename, qrbuf.QRdirname);
system(buf);
- cprintf("%d File '%s' has been moved.\n", OK, filename);
+ cprintf("%d File '%s' has been moved.\n", CIT_OK, filename);
}
*/
void cmd_netf(char *cmdbuf)
{
- char pathname[SIZ], filename[SIZ], destsys[SIZ], buf[SIZ];
- char outfile[SIZ];
+ char pathname[256], filename[256], destsys[256], buf[256];
+ char outfile[256];
int a, e;
time_t now;
FILE *ofp;
static int seq = 1;
- extract(filename, cmdbuf, 0);
- extract(destsys, cmdbuf, 1);
+ extract_token(filename, cmdbuf, 0, '|', sizeof filename);
+ extract_token(destsys, cmdbuf, 1, '|', sizeof destsys);
if (CtdlAccessCheck(ac_room_aide)) return;
- if ((CC->quickroom.QRflags & QR_DIRECTORY) == 0) {
+ if ((CC->room.QRflags & QR_DIRECTORY) == 0) {
cprintf("%d No directory in this room.\n",
ERROR + NOT_HERE);
return;
}
}
snprintf(pathname, sizeof pathname, "./files/%s/%s",
- CC->quickroom.QRdirname, filename);
+ CC->room.QRdirname, filename);
if (access(pathname, 0) != 0) {
cprintf("%d File '%s' not found.\n",
ERROR + FILE_NOT_FOUND, pathname);
}
snprintf(buf, sizeof buf, "sysop@%s", destsys);
e = alias(buf);
- if (e != MES_BINARY) {
+ if (e != MES_IGNET) {
cprintf("%d No such system: '%s'\n",
ERROR + NO_SUCH_SYSTEM, destsys);
return;
}
snprintf(outfile, sizeof outfile,
- "%s/network/spoolin/nsf.%04x.%04x",
- BBSDIR, getpid(), ++seq);
+ "%s/network/spoolin/nsf.%04lx.%04x",
+ CTDLDIR, (long)getpid(), ++seq);
ofp = fopen(outfile, "a");
if (ofp == NULL) {
- cprintf("%d internal error\n", ERROR);
+ cprintf("%d internal error\n", ERROR + INTERNAL_ERROR);
return;
}
putc(255, ofp);
putc(MES_NORMAL, ofp);
putc(0, ofp);
- fprintf(ofp, "Pcit%ld", CC->usersupp.usernum);
+ fprintf(ofp, "Pcit%ld", CC->user.usernum);
putc(0, ofp);
time(&now);
fprintf(ofp, "T%ld", (long) now);
putc(0, ofp);
- fprintf(ofp, "A%s", CC->usersupp.fullname);
+ fprintf(ofp, "A%s", CC->user.fullname);
putc(0, ofp);
- fprintf(ofp, "O%s", CC->quickroom.QRname);
+ fprintf(ofp, "O%s", CC->room.QRname);
putc(0, ofp);
fprintf(ofp, "N%s", NODENAME);
putc(0, ofp);
snprintf(buf, sizeof buf,
"cd ./files/%s; uuencode %s <%s 2>/dev/null >>%s",
- CC->quickroom.QRdirname, filename, filename, outfile);
+ CC->room.QRdirname, filename, filename, outfile);
system(buf);
ofp = fopen(outfile, "a");
putc(0, ofp);
fclose(ofp);
- cprintf("%d File '%s' has been sent to %s.\n", OK, filename,
+ cprintf("%d File '%s' has been sent to %s.\n", CIT_OK, filename,
destsys);
- system("nohup ./netproc -i >/dev/null 2>&1 &");
+ /* FIXME start a network run here. */
return;
}
modtime = (time_t) statbuf.st_mtime;
cprintf("%d %ld|%ld|%s|%s\n",
- OK, filesize, modtime, filename, mime_type);
+ CIT_OK, filesize, (long)modtime, filename, mime_type);
}
*/
void cmd_open(char *cmdbuf)
{
- char filename[SIZ];
- char pathname[SIZ];
+ char filename[256];
+ char pathname[PATH_MAX];
int a;
- extract(filename, cmdbuf, 0);
+ extract_token(filename, cmdbuf, 0, '|', sizeof filename);
if (CtdlAccessCheck(ac_logged_in)) return;
- if ((CC->quickroom.QRflags & QR_DIRECTORY) == 0) {
+ if ((CC->room.QRflags & QR_DIRECTORY) == 0) {
cprintf("%d No directory in this room.\n",
ERROR + NOT_HERE);
return;
if (CC->download_fp != NULL) {
cprintf("%d You already have a download file open.\n",
- ERROR);
+ ERROR + RESOURCE_BUSY);
return;
}
}
snprintf(pathname, sizeof pathname,
- "./files/%s/%s", CC->quickroom.QRdirname, filename);
+ "./files/%s/%s", CC->room.QRdirname, filename);
CC->download_fp = fopen(pathname, "r");
if (CC->download_fp == NULL) {
cprintf("%d cannot open %s: %s\n",
- ERROR, pathname, strerror(errno));
+ ERROR + INTERNAL_ERROR, pathname, strerror(errno));
return;
}
*/
void cmd_oimg(char *cmdbuf)
{
- char filename[SIZ];
- char pathname[SIZ];
- struct usersupp usbuf;
- char which_user[32];
+ char filename[256];
+ char pathname[PATH_MAX];
+ struct ctdluser usbuf;
+ char which_user[USERNAME_SIZE];
int which_floor;
int a;
- extract(filename, cmdbuf, 0);
+ extract_token(filename, cmdbuf, 0, '|', sizeof filename);
if (strlen(filename) == 0) {
cprintf("%d You must specify a file name.\n",
if (CC->download_fp != NULL) {
cprintf("%d You already have a download file open.\n",
- ERROR);
+ ERROR + RESOURCE_BUSY);
return;
}
if (!strcasecmp(filename, "_userpic_")) {
- extract(which_user, cmdbuf, 1);
+ extract_token(which_user, cmdbuf, 1, '|', sizeof which_user);
if (getuser(&usbuf, which_user) != 0) {
cprintf("%d No such user.\n",
ERROR + NO_SUCH_USER);
snprintf(pathname, sizeof pathname,
"./images/floor.%d.gif", which_floor);
} else if (!strcasecmp(filename, "_roompic_")) {
- assoc_file_name(pathname, &CC->quickroom, "images");
+ assoc_file_name(pathname, sizeof pathname, &CC->room, "images");
} else {
for (a = 0; a < strlen(filename); ++a) {
filename[a] = tolower(filename[a]);
{
int a;
- extract(CC->upl_file, cmdbuf, 0);
- extract(CC->upl_comment, cmdbuf, 1);
+ extract_token(CC->upl_file, cmdbuf, 0, '|', sizeof CC->upl_file);
+ extract_token(CC->upl_comment, cmdbuf, 1, '|', sizeof CC->upl_comment);
if (CtdlAccessCheck(ac_logged_in)) return;
- if ((CC->quickroom.QRflags & QR_DIRECTORY) == 0) {
+ if ((CC->room.QRflags & QR_DIRECTORY) == 0) {
cprintf("%d No directory in this room.\n",
ERROR + NOT_HERE);
return;
if (CC->upload_fp != NULL) {
cprintf("%d You already have a upload file open.\n",
- ERROR);
+ ERROR + RESOURCE_BUSY);
return;
}
}
}
snprintf(CC->upl_path, sizeof CC->upl_path, "./files/%s/%s",
- CC->quickroom.QRdirname, CC->upl_file);
+ CC->room.QRdirname, CC->upl_file);
snprintf(CC->upl_filedir, sizeof CC->upl_filedir,
- "./files/%s/filedir", CC->quickroom.QRdirname);
+ "./files/%s/filedir", CC->room.QRdirname);
CC->upload_fp = fopen(CC->upl_path, "r");
if (CC->upload_fp != NULL) {
CC->upload_fp = fopen(CC->upl_path, "wb");
if (CC->upload_fp == NULL) {
cprintf("%d Cannot open %s: %s\n",
- ERROR, CC->upl_path, strerror(errno));
+ ERROR + INTERNAL_ERROR, CC->upl_path, strerror(errno));
return;
}
- cprintf("%d Ok\n", OK);
+ cprintf("%d Ok\n", CIT_OK);
}
void cmd_uimg(char *cmdbuf)
{
int is_this_for_real;
- char basenm[SIZ];
+ char basenm[256];
int which_floor;
int a;
if (num_parms(cmdbuf) < 2) {
- cprintf("%d Usage error.\n", ERROR);
+ cprintf("%d Usage error.\n", ERROR + ILLEGAL_VALUE);
return;
}
is_this_for_real = extract_int(cmdbuf, 0);
- extract(basenm, cmdbuf, 1);
+ extract_token(basenm, cmdbuf, 1, '|', sizeof basenm);
if (CC->upload_fp != NULL) {
cprintf("%d You already have an upload file open.\n",
- ERROR);
+ ERROR + RESOURCE_BUSY);
return;
}
}
}
- if (CC->usersupp.axlevel >= 6) {
+ if (CC->user.axlevel >= 6) {
snprintf(CC->upl_path, sizeof CC->upl_path, "./images/%s",
basenm);
}
if (!strcasecmp(basenm, "_userpic_")) {
snprintf(CC->upl_path, sizeof CC->upl_path,
- "./userpics/%ld.gif", CC->usersupp.usernum);
+ "./userpics/%ld.gif", CC->user.usernum);
}
if ((!strcasecmp(basenm, "_floorpic_"))
- && (CC->usersupp.axlevel >= 6)) {
+ && (CC->user.axlevel >= 6)) {
which_floor = extract_int(cmdbuf, 2);
snprintf(CC->upl_path, sizeof CC->upl_path,
"./images/floor.%d.gif", which_floor);
}
if ((!strcasecmp(basenm, "_roompic_")) && (is_room_aide())) {
- assoc_file_name(CC->upl_path, &CC->quickroom, "images");
+ assoc_file_name(CC->upl_path, sizeof CC->upl_path, &CC->room, "images");
}
if (strlen(CC->upl_path) == 0) {
}
if (is_this_for_real == 0) {
- cprintf("%d Ok to send image\n", OK);
+ cprintf("%d Ok to send image\n", CIT_OK);
return;
}
CC->upload_fp = fopen(CC->upl_path, "wb");
if (CC->upload_fp == NULL) {
cprintf("%d Cannot open %s: %s\n",
- ERROR, CC->upl_path, strerror(errno));
+ ERROR + INTERNAL_ERROR, CC->upl_path, strerror(errno));
return;
}
- cprintf("%d Ok\n", OK);
+ cprintf("%d Ok\n", CIT_OK);
CC->upload_type = UPL_IMAGE;
}
*/
void cmd_clos(void)
{
- char buf[SIZ];
+ char buf[256];
if (CC->download_fp == NULL) {
cprintf("%d You don't have a download file open.\n",
- ERROR);
+ ERROR + RESOURCE_NOT_OPEN);
return;
}
if (CC->dl_is_net == 1) {
CC->dl_is_net = 0;
- snprintf(buf, sizeof buf, "%s/network/spoolout/%s", BBSDIR,
+ snprintf(buf, sizeof buf, "%s/network/spoolout/%s", CTDLDIR,
CC->net_node);
unlink(buf);
}
- cprintf("%d Ok\n", OK);
+ cprintf("%d Ok\n", CIT_OK);
}
char upload_notice[512];
if (CC->upload_fp == NULL) {
- cprintf("%d You don't have an upload file open.\n", ERROR);
+ cprintf("%d You don't have an upload file open.\n", ERROR + RESOURCE_NOT_OPEN);
return;
}
if ((!strcasecmp(cmd, "1")) && (CC->upload_type != UPL_FILE)) {
CC->upload_type = UPL_FILE;
- cprintf("%d Upload completed.\n", OK);
+ cprintf("%d Upload completed.\n", CIT_OK);
/* FIXME ... here we need to trigger a network run */
}
if (!strcasecmp(cmd, "1")) {
- cprintf("%d File '%s' saved.\n", OK, CC->upl_path);
+ cprintf("%d File '%s' saved.\n", CIT_OK, CC->upl_path);
fp = fopen(CC->upl_filedir, "a");
if (fp == NULL) {
fp = fopen(CC->upl_filedir, "w");
}
/* put together an upload notice */
- sprintf(upload_notice,
+ snprintf(upload_notice, sizeof upload_notice,
"NEW UPLOAD: '%s'\n %s\n",
CC->upl_file, CC->upl_comment);
- quickie_message(CC->curr_user, NULL, CC->quickroom.QRname,
- upload_notice);
+ quickie_message(CC->curr_user, NULL, CC->room.QRname,
+ upload_notice, 0, NULL);
} else {
abort_upl(CC);
- cprintf("%d File '%s' aborted.\n", OK, CC->upl_path);
+ cprintf("%d File '%s' aborted.\n", CIT_OK, CC->upl_path);
}
}
void cmd_read(char *cmdbuf)
{
long start_pos;
- int bytes;
- char buf[4096];
+ size_t bytes;
+ size_t actual_bytes;
+ char *buf = NULL;
start_pos = extract_long(cmdbuf, 0);
bytes = extract_int(cmdbuf, 1);
if (CC->download_fp == NULL) {
cprintf("%d You don't have a download file open.\n",
- ERROR);
+ ERROR + RESOURCE_NOT_OPEN);
return;
}
- if (bytes > 4096) {
- cprintf("%d You may not read more than 4096 bytes.\n",
- ERROR);
- return;
- }
+ if (bytes > 100000) bytes = 100000;
+ buf = malloc(bytes + 1);
fseek(CC->download_fp, start_pos, 0);
- fread(buf, bytes, 1, CC->download_fp);
- cprintf("%d %d\n", BINARY_FOLLOWS, bytes);
- client_write(buf, bytes);
+ actual_bytes = fread(buf, 1, bytes, CC->download_fp);
+ cprintf("%d %d\n", BINARY_FOLLOWS, (int)actual_bytes);
+ client_write(buf, actual_bytes);
+ free(buf);
}
void cmd_writ(char *cmdbuf)
{
int bytes;
- char buf[4096];
+ char *buf;
+
+ unbuffer_output();
bytes = extract_int(cmdbuf, 0);
if (CC->upload_fp == NULL) {
- cprintf("%d You don't have an upload file open.\n", ERROR);
+ cprintf("%d You don't have an upload file open.\n", ERROR + RESOURCE_NOT_OPEN);
return;
}
- if (bytes > 4096) {
- cprintf("%d You may not write more than 4096 bytes.\n",
- ERROR);
+ if (bytes > 100000) {
+ cprintf("%d You may not write more than 100000 bytes.\n",
+ ERROR + TOO_BIG);
return;
}
cprintf("%d %d\n", SEND_BINARY, bytes);
+ buf = malloc(bytes + 1);
client_read(buf, bytes);
fwrite(buf, bytes, 1, CC->upload_fp);
+ free(buf);
}
*/
void cmd_ndop(char *cmdbuf)
{
- char pathname[SIZ];
+ char pathname[256];
struct stat statbuf;
if (strlen(CC->net_node) == 0) {
if (CC->download_fp != NULL) {
cprintf("%d You already have a download file open.\n",
- ERROR);
+ ERROR + RESOURCE_BUSY);
return;
}
snprintf(pathname, sizeof pathname, "%s/network/spoolout/%s",
- BBSDIR, CC->net_node);
+ CTDLDIR, CC->net_node);
/* first open the file in append mode in order to create a
* zero-length file if it doesn't already exist
CC->download_fp = fopen(pathname, "r");
if (CC->download_fp == NULL) {
cprintf("%d cannot open %s: %s\n",
- ERROR, pathname, strerror(errno));
+ ERROR + INTERNAL_ERROR, pathname, strerror(errno));
return;
}
CC->dl_is_net = 1;
stat(pathname, &statbuf);
- cprintf("%d %ld\n", OK, statbuf.st_size);
+ cprintf("%d %ld\n", CIT_OK, (long)statbuf.st_size);
}
/*
if (CC->upload_fp != NULL) {
cprintf("%d You already have an upload file open.\n",
- ERROR);
+ ERROR + RESOURCE_BUSY);
return;
}
snprintf(CC->upl_path, sizeof CC->upl_path,
- "%s/network/spoolin/%s.%04x.%04x",
- BBSDIR, CC->net_node, getpid(), ++seq);
+ "%s/network/spoolin/%s.%04lx.%04x",
+ CTDLDIR, CC->net_node, (long)getpid(), ++seq);
CC->upload_fp = fopen(CC->upl_path, "r");
if (CC->upload_fp != NULL) {
CC->upload_fp = fopen(CC->upl_path, "w");
if (CC->upload_fp == NULL) {
cprintf("%d Cannot open %s: %s\n",
- ERROR, CC->upl_path, strerror(errno));
+ ERROR + INTERNAL_ERROR, CC->upl_path, strerror(errno));
return;
}
CC->upload_type = UPL_NET;
- cprintf("%d Ok\n", OK);
+ cprintf("%d Ok\n", CIT_OK);
}
projects / citadel.git / blobdiff