X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=citadel%2Fsupport.c;h=af155d31df92298178ab5e9c03a742be304fa133;hb=HEAD;hp=896797617c43b0f8c832621718d6d6cc627ea7f9;hpb=acfea2084c5b599e967ecbfdddd88e762b3b3179;p=citadel.git

diff --git a/citadel/support.c b/citadel/support.c
deleted file mode 100644
index 896797617..000000000
--- a/citadel/support.c
+++ /dev/null
@@ -1,225 +0,0 @@
-#include <stdlib.h>
-#include <unistd.h>
-#include <ctype.h>
-#include <stdio.h>
-#include <pthread.h>
-#include "citadel.h"
-#include "server.h"
-#include "proto.h"
-
-/*
- * struncmp()  -  case-insensitive version of strncmp()
- *                citadel.h will #define a strucmp() based on this
- */
-int struncmp(char *lstr, char *rstr, int len)
-{
-	int pos = 0;
-	char lc,rc;
-	while (pos<len) {
-		lc=tolower(lstr[pos]);
-		rc=tolower(rstr[pos]);
-		if ((lc==0)&&(rc==0)) return(0);
-		if (lc<rc) return(-1);
-		if (lc>rc) return(1);
-		pos=pos+1;
-		}
-	return(0);
-	}
-
-
-/*
- * strproc()  -  make a string 'nice'
- */
-void strproc(char *string)
-{
-	int a;
-
-	if (strlen(string)==0) return;
-
-	/* Convert non-printable characters to blanks */
-	for (a=0; a<strlen(string); ++a) {
-		if (string[a]<32) string[a]=32;
-		if (string[a]>126) string[a]=32;
-		}
-
-	/* Remove leading and trailing blanks */
-	while( (string[0]<33) && (strlen(string)>0) )
-		strcpy(string,&string[1]);
-	while( (string[strlen(string)-1]<33) && (strlen(string)>0) )
-		string[strlen(string)-1]=0;
-
-	/* Remove double blanks */
-	for (a=0; a<strlen(string); ++a) {
-		if ((string[a]==32)&&(string[a+1]==32)) {
-			strcpy(&string[a],&string[a+1]);
-			a=0;
-			}
-		}
-
-	/* remove characters which would interfere with the network */
-	for (a=0; a<strlen(string); ++a) {
-		while (string[a]=='!') strcpy(&string[a],&string[a+1]);
-		while (string[a]=='@') strcpy(&string[a],&string[a+1]);
-		while (string[a]=='_') strcpy(&string[a],&string[a+1]);
-		while (string[a]==',') strcpy(&string[a],&string[a+1]);
-		while (string[a]=='%') strcpy(&string[a],&string[a+1]);
-		while (string[a]=='|') strcpy(&string[a],&string[a+1]);
-		}
-
-	}
-
-
-
-/*
- * num_parms()  -  discover number of parameters...
- */
-int num_parms(char *source)
-{
-	int a;
-	int count = 1;
-
-	for (a=0; a<strlen(source); ++a) 
-		if (source[a]=='|') ++count;
-	return(count);
-	}
-
-/*
- * extract()  -  extract a parameter from a series of "|" separated...
- */
-void extract(char *dest, char *source, int parmnum)
-{
-	char buf[256];
-	int count = 0;
-	int n;
-
-	if (strlen(source)==0) {
-		strcpy(dest,"");
-		return;
-		}
-
-	n = num_parms(source);
-
-	if (parmnum >= n) {
-		strcpy(dest,"");
-		return;
-		}
-	strcpy(buf,source);
-	if ( (parmnum == 0) && (n == 1) ) {
-		strcpy(dest,buf);
-		for (n=0; n<strlen(dest); ++n)
-			if (dest[n]=='|') dest[n] = 0;
-		return;
-		}
-
-	while (count++ < parmnum) do {
-		strcpy(buf,&buf[1]);
-		} while( (strlen(buf)>0) && (buf[0]!='|') );
-	if (buf[0]=='|') strcpy(buf,&buf[1]);
-	for (count = 0; count<strlen(buf); ++count)
-		if (buf[count] == '|') buf[count] = 0;
-	strcpy(dest,buf);
-	}
-
-/*
- * extract_int()  -  extract an int parm w/o supplying a buffer
- */
-int extract_int(char *source, int parmnum)
-{
-	char buf[256];
-	
-	extract(buf,source,parmnum);
-	return(atoi(buf));
-	}
-
-/*
- * extract_long()  -  extract an long parm w/o supplying a buffer
- */
-long extract_long(char *source, long int parmnum)
-{
-	char buf[256];
-	
-	extract(buf,source,parmnum);
-	return(atol(buf));
-	}
-
-
-
-/*
- * get a line of text from a file
- * ignores lines starting with #
- */
-int getstring(FILE *fp, char *string)
-{
-	int a,c;
-	do {
-		strcpy(string,"");
-		a=0;
-		do {
-			c=getc(fp);
-			if (c<0) {
-				string[a]=0;
-				return(-1);
-				}
-			string[a++]=c;
-			} while(c!=10);
-			string[a-1]=0;
-		} while(string[0]=='#');
-	return(strlen(string));
-	}
-
-
-/*
- * pattern2()  -  searches for patn within search string, returns pos 
- */ 
-int pattern2(char *search, char *patn)
-{
-	int a;
-	for (a=0; a<strlen(search); ++a) {
-		if (!struncmp(&search[a],patn,strlen(patn))) return(a);
-		}
-	return(-1);
-	}
-
-
-/*
- * mesg_locate()  -  locate a message or help file, case insensitive
- */
-void mesg_locate(char *targ, char *searchfor, int numdirs, char **dirs)
-{
-	int a;
-	char buf[256];
-	FILE *ls;
-
-	for (a=0; a<numdirs; ++a) {
-		sprintf(buf,"cd %s; exec ls",dirs[a]);
-		ls = (FILE *) popen(buf,"r");
-		if (ls != NULL) {
-			while(fgets(buf,255,ls)!=NULL) {
-				while (isspace(buf[strlen(buf)-1]))
-					buf[strlen(buf)-1] = 0;
-				if (!strucmp(buf,searchfor)) {
-					pclose(ls);
-					sprintf(targ,"%s/%s",dirs[a],buf);
-					return;
-					}
-				}
-			pclose(ls);
-			}
-		}
-	strcpy(targ,"");
-	}
-
-
-#ifdef NO_STRERROR
-/*
- * replacement strerror() for systems that don't have it
- */
-char *strerror(e)
-int e; {
-	static char buf[32];
-
-	sprintf(buf,"errno = %d",e);
-	return(buf);
-	}
-#endif
-