#include <string.h>
#include <unistd.h>
#include <pwd.h>
#include <misc.h>
#include <dialog.h>
#include "tlmpmail.h"
#include "keys.h"
#include "tlmpmail.m"

/*
	Return the default file carbon copy
*/
const char *prefs_getfcc()
{
	return linuxconf_getval (K_PREF,K_FCC);
}

static SSTRING charset;
/*
	Return the default charset
*/
const char *prefs_getcharset()
{
	if (charset.is_empty()){
		charset = linuxconf_getval (K_PREF,K_CHARSET,"us-ascii");
	}
	return charset.get();
}

/*
	Return the default inbox
*/
const char *prefs_getinbox()
{
	static SSTRING def;
	struct passwd *p = getpwuid (getuid());
	if (p != NULL){
		def.setfromf ("/var/spool/mail/%s",p->pw_name);
	}else{
		def.setfrom ("/var/spool/mail/unknown-user");
	}
	return linuxconf_getval (K_PREF,K_INBOX,def.get());
}

void prefs_getuserinfo(SSTRING &myname, SSTRING &myaddr)
{
	myname.setfrom (linuxconf_getval (K_PREF,K_MYNAME));
	myaddr.setfrom (linuxconf_getval (K_PREF,K_MYADDR));
	const char *id = "unknown";
	const char *gecos = "unknown user";
	struct passwd *p = getpwuid (getuid());
	if (p != NULL){
		id = p->pw_name;
		gecos = p->pw_gecos;
	}
	if (myname.is_empty()){
		myname.setfrom (gecos);
	}
	if (myaddr.is_empty()){
		char tmpaddr[1000];
		if (gethostname(tmpaddr,sizeof(tmpaddr))==-1){
			strcpy (tmpaddr,"Unknown.host.domain");
		}
		myaddr.setfromf ("%s@%s",id,tmpaddr);
	}
}
/*
	Get the email address of the user
*/
void prefs_getmyemail(SSTRING &s)
{
	SSTRING tmp;
	prefs_getuserinfo (tmp,s);
}


/*
	Get the name of the user
*/
void prefs_getmyname(SSTRING &s)
{
	SSTRING tmp;
	prefs_getuserinfo (s,tmp);
}

/*
	Get all the email addresses associated with me.
	This includes my address and all the aliases
*/
void prefs_getmyaddrs (SSTRINGS &addrs)
{
	addrs.remove_all();
	SSTRING *s = new SSTRING;
	prefs_getmyemail(*s);
	addrs.add (s);
	linuxconf_getall (K_PREF,K_MYALIASES,addrs,true);
}

void prefs_edit()
{
	DIALOG dia;
	dia.setcontext (NULL);
	dia.newf_title (MSG_U(T_IDS,"Ids"),1,"",MSG_R(T_IDS));
	SSTRING myname (linuxconf_getval(K_PREF,K_MYNAME));
	SSTRING myaddr (linuxconf_getval(K_PREF,K_MYADDR));
	SSTRINGS myaliases;
	linuxconf_getall(K_PREF,K_MYALIASES,myaliases,true);
	myaliases.add (new SSTRING);	// One extra field
	dia.newf_str (MSG_U(F_MYNAME,"My name"),myname);
	dia.newf_str (MSG_U(F_MYADDR,"My email address"),myaddr);
	int field_aliases = dia.getnb();
	for (int i=0; i<myaliases.getnb(); i++){
		dia.newf_str (i==0
			? MSG_U(F_MYALIASES,"Other email addresses") : ""
			,*myaliases.getitem(i));
	}
	PRIVATE_MESSAGE morealiases;
	dia.new_button (MSG_U(B_MOREALIASES,"More aliases"),MSG_R(B_MOREALIASES)
		,morealiases);
	dia.newf_title (MSG_U(T_SENDING,"Sending"),1,"",MSG_R(T_SENDING));
	SSTRING smtp (linuxconf_getval(K_PREF,K_SMTP));
	dia.newf_str (MSG_U(F_SMTPSERVER,"Mail server (SMTP)"),smtp);
	dia.newf_title (MSG_R(T_MISC),1,"",MSG_R(T_MISC));
	SSTRING fcc (prefs_getfcc());
	dia.newf_str (MSG_R(F_FCC),fcc);
	SSTRING inbox (prefs_getinbox());
	dia.newf_str (MSG_U(F_INBOX,"Default inbox"),inbox);
	SSTRING fcharset (prefs_getcharset());
	dia.newf_str (MSG_U(F_CHARSET,"Character set"),fcharset);
	int nof = 0;
	while (1){
		MENU_STATUS code = dia.edit (MSG_U(T_PREFERENCES,"Preferences")
			,"",help_nil,nof);
		if (code == MENU_CANCEL || code == MENU_ESCAPE){
			break;
		}else if (code == MENU_MESSAGE){
			if (dialog_testmessage(morealiases)){
				dia.set_nextfield (field_aliases+myaliases.getnb());
				SSTRING *s = new SSTRING;
				myaliases.add (s);
				dia.newf_str ("",*s);
			}
		}else{
			linuxconf_replace (K_PREF,K_MYNAME,myname);
			linuxconf_replace (K_PREF,K_MYADDR,myaddr);
			linuxconf_replace (K_PREF,K_FCC,fcc);
			linuxconf_replace (K_PREF,K_SMTP,smtp);
			myaliases.remove_empty();
			linuxconf_replace (K_PREF,K_MYALIASES,myaliases);
			linuxconf_replace (K_PREF,K_INBOX,inbox);
			linuxconf_replace (K_PREF,K_CHARSET,fcharset);
			charset = fcharset;
			linuxconf_save();
			break;
		}
	}
}