/*  MasqMail
    Copyright (C) 1999-2001 Oliver Kurth

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/

#include <sys/stat.h>
#include <sys/wait.h>
#include "masqmail.h"
#include "mserver.h"
#include "peopen.h"

gchar *connection_name;

void
set_online_name(gchar * name)
{
	connection_name = g_strdup(name);
}

static gchar*
detect_online_pipe(const gchar * pipe)
{
	pid_t pid;
	void (*old_signal) (int);
	int status;
	FILE *in;
	gchar *name = NULL;

	old_signal = signal(SIGCHLD, SIG_DFL);

	in = peopen(pipe, "r", environ, &pid);
	if (in != NULL) {
		gchar output[256];
		if (fgets(output, 255, in)) {
			g_strchomp(output);
			name = g_strdup(output);
		}
		fclose(in);
		waitpid(pid, &status, 0);
		if (WEXITSTATUS(status) != EXIT_SUCCESS) {
			g_free(name);
			name = NULL;
		}
	} else
		logwrite(LOG_ALERT, "could not open pipe '%s': %s\n", pipe, strerror(errno));

	signal(SIGCHLD, old_signal);

	return name;
}

gchar*
detect_online()
{
	if (conf.online_detect != NULL) {
		if (strcmp(conf.online_detect, "file") == 0) {
			DEBUG(3) debugf("online detection method 'file'\n");
			if (conf.online_file != NULL) {
				struct stat st;
				if (stat(conf.online_file, &st) == 0) {
					FILE *fptr = fopen(conf.online_file, "r");
					if (fptr) {
						char buf[256];
						fgets(buf, 256, fptr);
						g_strchomp(buf);
						fclose(fptr);
						return g_strdup(buf);
					} else {
						logwrite(LOG_ALERT, "opening of %s failed: %s\n", conf.online_file, strerror(errno));
						return NULL;
					}
				} else if (errno == ENOENT) {
					logwrite(LOG_NOTICE, "not online.\n");
					return NULL;
				} else {
					logwrite(LOG_ALERT, "stat of %s failed: %s", conf.online_file, strerror(errno));
					return NULL;
				}
			} else
				logwrite(LOG_ALERT, "online detection mode is 'file', but online_file is undefined\n");
#ifdef ENABLE_MSERVER
		} else if (strcmp(conf.online_detect, "mserver") == 0) {
			DEBUG(3) debugf("connection method 'mserver'\n");
			return mserver_detect_online(conf.mserver_iface);
#endif
		} else if (strcmp(conf.online_detect, "pipe") == 0) {
			DEBUG(3) debugf("connection method 'pipe'\n");
			if (conf.online_pipe)
				return detect_online_pipe(conf.online_pipe);
			else {
				logwrite(LOG_ALERT, "online detection mode is 'pipe', but online_pipe is undefined\n");
				return NULL;
			}
		} else if (strcmp(conf.online_detect, "argument") == 0) {
			return connection_name;
		} else {
			DEBUG(3) debugf("no connection method selected\n");
		}
	}
	return NULL;
}