#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <proto/dos.h>
#include <proto/exec.h>



#define VERSION "1.8"
static char *version = "\0$VER: news2eazy " VERSION " " __AMIGADATE__ "";
/* static char *version = "\0$VER: news2eazy " VERSION " (" __DATE__ ")"; */



void space2under(char *s)
{
	while (s && *s) {
		if (*s == ' ')
			*s = '_';
		s++;
	}
}



void kill_quotes(char *s)
{
	while (s && *s) {
		if (*s == '\"')
			*s = '\'';
		s++;
	}
}



char *DOS_escape(char *str)
/* put * (escape char) before " and * */
{
	if (str) {
		char *s = str;
		while (*s) {
			if (*s == '"' || *s == '*') {
				strins(s, "*");
				s++;
			}
			s++;
		}
		/* strins(str,"\""); */
		/* strcat(str,"\""); */
	}
	return (str);
}


int main(int argc, char *argv[])
{
	if (argc == 3) {
		char tmp[80];
		FILE *fp;

		sprintf(tmp, "%s%ld", "MB_TMP:News2Eazy.tmp", (long) FindTask(NULL));

		if (fp = fopen(tmp, "w")) {
			register int c = 0;
			char username[256];
			char uucpadr[256];
			char *board1 = argv[1];
			char *board2 = argv[2];
			char subject[256];
			char exec[256];
			char str[1024];
			BOOL ende = FALSE;

			strcpy(username, "unknown");
			strcpy(subject, "none");
			strcpy(uucpadr, "");

			while (!ende && fgets(str, 1023, stdin)) {
				if (strlen(str) == 0 || strcmp(str, "\n") == 0)
					ende = TRUE;
				else if ((strnicmp(str, "From: ", 6) == 0 && strlen(uucpadr) == 0) || strnicmp(str, "Reply-To: ", 10) == 0) {
					char *p;
					char *str2;
					str2 = strstr(str, ": ") + 2;

					strcpy(uucpadr, str2);
					kill_quotes(uucpadr);
					if (strchr(uucpadr, '\n'))
						*strchr(uucpadr, '\n') = 0;

#if 0
					strcpy(username, str2);
					p = username;
					while (*p && *p != '@') {
						p++;
					}
					if (*p == '@')
						*p = 0;
#endif
					if (p = strchr(str2, '@')) {
						int pos;
						for (pos = 0, p--; p >= str2 && *p != ' ' && *p != '\t' && *p != '<'; p--)
							username[pos++] = *p;
						username[pos] = 0;
						strrev(username);
					}

					if (strchr(username, '\n'))
						*strchr(username, '\n') = 0;
					username[15] = 0;
					kill_quotes(username);
				}
				else if (strnicmp(str, "Subject: ", 9) == 0) {
					strcpy(subject, str + 9);
					kill_quotes(subject);
					if (strchr(subject, '\n'))
						*strchr(subject, '\n') = 0;
					subject[40] = 0;
				}
			}

			while ((c = fgetc(stdin)) != EOF) {
				if (c == '\\')
					fputc('\\', fp);
				fputc(c, fp);
			}
			fprintf(fp, "\n");

			fclose(fp);

#if 0
			DOS_escape(username);
			DOS_escape(uucpadr);
			DOS_escape(subject);
#endif

			sprintf(exec, "MB:C/ImportMessage \"%s\" \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"", board1, board2, username, uucpadr, subject, tmp);
			System(exec, NULL);
			DeleteFile(tmp);
		}
	}
	else {
		fprintf(stderr, "\033[1;33mEazyBBS\033[0m © 1988-1995 Andreas M. Kirchwitz\n"
		"Usage: news2eazy \033[3m<board1> <board2> \033[0m <text\n");
	}

	exit(0);
}