/*
FILE
	tVUT source code of mysqlSendmail.cgi
	(built by mysqlRAD2.cgi (c) Gary Wallis 2001,2002 GPL Licensed)
	$Id: tvut.c 6 2005-11-24 00:02:59Z ggw $
	(tAuthorize.cPasswd template set member)
PURPOSE
*/

#include "mysqlrad.h"

//Table Variables
//uVUT: Primary Key
static unsigned uVUT=0;
//cDomain: FQ Domain Name
static char cDomain[65]={""};
//uServer: Server account is on
static unsigned uServer=0;
static char cuServerPullDown[256]={""};
//uOwner: Record owner
static unsigned uOwner=0;
//uCreatedBy: uClient for last insert
static unsigned uCreatedBy=0;
#define ISM3FIELDS
//uCreatedDate: Unix seconds date last insert
static long unsigned uCreatedDate=0;
//uModBy: uClient for last update
static unsigned uModBy=0;
//uModDate: Unix seconds date last update
static long unsigned uModDate=0;




#define VAR_LIST_tVUT "tVUT.uVUT,tVUT.cDomain,tVUT.uServer,tVUT.uOwner,tVUT.uCreatedBy,tVUT.uCreatedDate,tVUT.uModBy,tVUT.uModDate"

 //Local only
void Insert_tVUT(void);
void Update_tVUT(char *rowid);
int InsertUpdate_tVUT(char *cKey);
void ProcesstVUTListVars(pentry entries[], int x);

 //In tVUTfunc.h file included below
void ExtProcesstVUTVars(pentry entries[], int x);
void ExttVUTCommands(pentry entries[], int x);
void ExttVUTButtons(void);
void ExttVUTNavBar(void);
void ExttVUTGetHook(entry gentries[], int x);
void ExttVUTSelect(void);
void ExttVUTSelectRow(void);
void ExttVUTListSelect(void);
void ExttVUTListFilter(void);
void ExttVUTAuxTable(void);

#include "tvutfunc.h"

 //Table Variables Assignment Function
void ProcesstVUTVars(pentry entries[], int x)
{
	register int i;


	for(i=0;i<x;i++)
	{
		if(!strcmp(entries[i].name,"uVUT"))
			sscanf(entries[i].val,"%u",&uVUT);
		else if(!strcmp(entries[i].name,"cDomain"))
			sprintf(cDomain,"%.64s",FQDomainName(entries[i].val));
		else if(!strcmp(entries[i].name,"uServer"))
			sscanf(entries[i].val,"%u",&uServer);
		else if(!strcmp(entries[i].name,"cuServerPullDown"))
		{
			sprintf(cuServerPullDown,"%.255s",entries[i].val);
			uServer=ReadPullDown("tServer","cLabel",cuServerPullDown);
		}
		else if(!strcmp(entries[i].name,"uOwner"))
			sscanf(entries[i].val,"%u",&uOwner);
		else if(!strcmp(entries[i].name,"uCreatedBy"))
			sscanf(entries[i].val,"%u",&uCreatedBy);
		else if(!strcmp(entries[i].name,"uCreatedDate"))
			sscanf(entries[i].val,"%lu",&uCreatedDate);
		else if(!strcmp(entries[i].name,"uModBy"))
			sscanf(entries[i].val,"%u",&uModBy);
		else if(!strcmp(entries[i].name,"uModDate"))
			sscanf(entries[i].val,"%lu",&uModDate);

	}

	//After so we can overwrite form data if needed.
	ExtProcesstVUTVars(entries,x);

}//ProcesstVUTVars()


void ProcesstVUTListVars(pentry entries[], int x)
{
        register int i;

        for(i=0;i<x;i++)
        {
                if(!strncmp(entries[i].name,"ED",2))
                {
                        sscanf(entries[i].name+2,"%u",&uVUT);
                        mode=6;
                        tVUT("");
                }
        }
}//void ProcesstVUTListVars(pentry entries[], int x)


int tVUTCommands(pentry entries[], int x)
{
	ProcessControlVars(entries,x);

	ExttVUTCommands(entries,x);

	if(!strcmp(function,"tVUTTools"))
	{
		if(!strcmp(find,LANG_NB_LIST))
		{
			tVUTList();
		}

		//Default
		ProcesstVUTVars(entries,x);
		tVUT("");
	}
	else if(!strcmp(function,"tVUTList"))
	{
		ProcessControlVars(entries,x);
		ProcesstVUTListVars(entries,x);
		tVUTList();
	}

	return(0);

}//tVUTCommands()


void tVUT(const char *result)
{
	MYSQL_RES *res;
	MYSQL_RES *res2;
	MYSQL_ROW field;

	//Internal skip reloading
	if(!result[0])
	{
		if(mode)
			ExttVUTSelectRow();
		else
			ExttVUTSelect();

		mysql_query(&mysql,query);
		if(mysql_errno(&mysql))
        	{
			if(strstr(mysql_error(&mysql)," doesn't exist"))
                	{
				CreatetVUT();
				mysqlSendmail("New tVUT table created");
                	}
			else
			{
				mysqlSendmail(mysql_error(&mysql));
			}
        	}

		res=mysql_store_result(&mysql);
		if((i=mysql_num_rows(res)))
		{
			if(mode==6)
			{
			sprintf(query,"SELECT _rowid FROM tVUT WHERE uVUT=%u"
						,uVUT);
			mysql_query(&mysql,query);
			res2=mysql_store_result(&mysql);
			field=mysql_fetch_row(res2);
			sscanf(field[0],"%lu",&rowid);
			rowid++;
			}
			PageMachine("",0,"");
			if(!mode) mysql_data_seek(res,rowid-1);
			field=mysql_fetch_row(res);
		sscanf(field[0],"%u",&uVUT);
		sprintf(cDomain,"%.64s",field[1]);
		sscanf(field[2],"%u",&uServer);
		sscanf(field[3],"%u",&uOwner);
		sscanf(field[4],"%u",&uCreatedBy);
		sscanf(field[5],"%lu",&uCreatedDate);
		sscanf(field[6],"%u",&uModBy);
		sscanf(field[7],"%lu",&uModDate);

		}

	}//Internal Skip

	Header_ism3(":: tVUT",0);
	printf("<form action=mysqlSendmail.cgi method=post >\n");
	printf("<table width=900 border=0 bgcolor=#A9BEC0 valign=center>\n");
	printf("<tr><td colspan=2><font face=Arial,Helvetica size=2>");


	ExttVUTNavBar();

	printf("<input type=hidden name=function value=tVUTTools>");
	printf("<input type=hidden name=rowid value=%lu>",rowid);
	if(i)
	{
		printf(" <font color=blue >");
		if(mode==6)
			//printf(" Found");
			printf(LANG_NBR_FOUND);
		else if(mode==5)
			//printf(" Modified");
			printf(LANG_NBR_MODIFIED);
		else if(mode==4)
			//printf(" New");
			printf(LANG_NBR_NEW);
		printf(LANG_NBRF_SHOWING,rowid,i);
	}
	else
	{
		if(!result[0])
		//printf(" No records found");
		printf(LANG_NBR_NORECS);
	}
	if(result[0]) printf(" <b> %s",result);
	printf("</td></tr>");
	printf("<tr><td valign=top>");

        ExttVUTButtons();

        printf("</td><td valign=top>");
	printf("<table width=630 border=0 bgcolor=#9BC1B3 valign=center>\n");

	if(mode==2000 || mode==2002)
		tVUTInputContent();
	else
		tVUTContent();

	printf("</table>\n");
	printf("</table>\n");

	//Bottom table
        ExttVUTAuxTable();

	printf("</font></form>\n");
	Footer_ism3();

}//end of tVUT();


void tVUTContent(void)
{

	OpenRow(LANG_FL_tVUT_uVUT,"white");
	printf("%u<input type=hidden name=uVUT value=%u >\n",uVUT,uVUT);
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_cDomain,EmptyString(cDomain));
	printf("%s<input type=hidden name=cDomain value=\"%s\">",cDomain,EncodeDoubleQuotes(cDomain));
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_uServer,IsZero(uServer));
	tTablePullDownReadOnly("tServer;cuServerPullDown","cLabel","cLabel",uServer);
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_uOwner,"white");
	printf("%s<input type=hidden name=uOwner value=%u >\n",ForeignKey("tClient","cLabel",uOwner),uOwner);
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_uCreatedBy,"white");
	printf("%s<input type=hidden name=uCreatedBy value=%u >\n",ForeignKey("tClient","cLabel",uCreatedBy),uCreatedBy);
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_uCreatedDate,"white");
	if(uCreatedDate)
		printf("%s\n\n",ctime((time_t *)&uCreatedDate));
	else
		printf("---\n\n");
	printf("<input type=hidden name=uCreatedDate value=%lu >\n",uCreatedDate);
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_uModBy,"white");
	printf("%s<input type=hidden name=uModBy value=%u >\n",ForeignKey("tClient","cLabel",uModBy),uModBy);
	printf("&nbsp;&nbsp;");
	OpenRow(LANG_FL_tVUT_uModDate,"white");
	if(uModDate)
		printf("%s\n\n",ctime((time_t *)&uModDate));
	else
		printf("---\n\n");
	printf("<input type=hidden name=uModDate value=%lu >\n",uModDate);
	printf("&nbsp;&nbsp;");
	printf("</tr>\n");



}//tVUTContent()


void tVUTInputContent(void)
{

	OpenRow(LANG_FL_tVUT_uVUT,"white");
	if(uPermLevel>=20)
		printf("<input title='%s' type=text name=uVUT value=%u size=16 maxlength=10>\n",LANG_FT_tVUT_uVUT,uVUT);
	else
		printf("%u<input type=hidden name=uVUT value=%u >\n",uVUT,uVUT);
	OpenRow(LANG_FL_tVUT_cDomain,EmptyString(cDomain));
	if(uPermLevel>=10 || (uPermLevel>=8 && mode!=2000))
		printf("<input title='%s' type=text name=cDomain value=\"%s\" size=40 maxlength=64>\n",LANG_FT_tVUT_cDomain,EncodeDoubleQuotes(cDomain));
	else
		printf("%s<input type=hidden name=cDomain value=\"%s\">",cDomain,EncodeDoubleQuotes(cDomain));
	OpenRow(LANG_FL_tVUT_uServer,IsZero(uServer));
	if(uPermLevel>=10)
		tTablePullDown("tServer;cuServerPullDown","cLabel","cLabel",uServer);
	else
	{
		tTablePullDownReadOnly("tServer;cuServerPullDown","cLabel","cLabel",uServer);
	}
	OpenRow(LANG_FL_tVUT_uOwner,"white");
	printf("%s<input type=hidden name=uOwner value=%u >\n",ForeignKey("tClient","cLabel",uOwner),uOwner);
	OpenRow(LANG_FL_tVUT_uCreatedBy,"white");
	printf("%s<input type=hidden name=uCreatedBy value=%u >\n",ForeignKey("tClient","cLabel",uCreatedBy),uCreatedBy);
	OpenRow(LANG_FL_tVUT_uCreatedDate,"white");
	if(uCreatedDate)
		printf("%s\n\n",ctime((time_t *)&uCreatedDate));
	else
		printf("---\n\n");
	printf("<input type=hidden name=uCreatedDate value=%lu >\n",uCreatedDate);
	OpenRow(LANG_FL_tVUT_uModBy,"white");
	printf("%s<input type=hidden name=uModBy value=%u >\n",ForeignKey("tClient","cLabel",uModBy),uModBy);
	OpenRow(LANG_FL_tVUT_uModDate,"white");
	if(uModDate)
		printf("%s\n\n",ctime((time_t *)&uModDate));
	else
		printf("---\n\n");
	printf("<input type=hidden name=uModDate value=%lu >\n",uModDate);
	printf("</tr>\n");



}//void tVUTInputContent(void)


void NewtVUT(unsigned uMode)
{
	register int i=0;
	MYSQL_RES *res;

	//New select
	sprintf(query,"SELECT uVUT FROM tVUT\
				WHERE uVUT=%u"
							,uVUT);
	mysql_query(&mysql,query);
	if(mysql_errno(&mysql)) mysqlSendmail(mysql_error(&mysql));
	res=mysql_store_result(&mysql);
	i=mysql_num_rows(res);

	if(i) 
		//tVUT("<blink>Record already exists");
		tVUT(LANG_NBR_RECEXISTS);

	//insert query
	Insert_tVUT();
	if(mysql_errno(&mysql)) mysqlSendmail(mysql_error(&mysql));
	//sprintf(query,"New record %u added");
	uVUT=mysql_insert_id(&mysql);

	if(!uMode)
	{
	sprintf(query,LANG_NBR_NEWRECADDED,uVUT);
	tVUT(query);
	}

}//NewtVUT(unsigned uMode)


void DeletetVUT(void)
{
#ifdef ISM3FIELDS
	sprintf(query,"DELETE FROM tVUT WHERE uVUT=%u AND ( uOwner=%u OR %u>9 )"
					,uVUT,uLoginClient,uPermLevel);
#else
	sprintf(query,"DELETE FROM tVUT WHERE uVUT=%u"
					,uVUT);
#endif
	mysql_query(&mysql,query);
	if(mysql_errno(&mysql)) mysqlSendmail(mysql_error(&mysql));

	//tVUT("Record Deleted");
	if(mysql_affected_rows(&mysql)>0)
		tVUT(LANG_NBR_RECDELETED);
	else
		tVUT(LANG_NBR_RECNOTDELETED);

}//void DeletetVUT(void)


void Insert_tVUT(void)
{

#ifdef ISM3FIELDS
	time_t clock;

        time(&clock);
#endif

	//insert query

	//insert query
	sprintf(query,"INSERT INTO tVUT SET  uVUT=%u, cDomain='%s', uServer=%u, uOwner=%u, uCreatedBy=%u, uCreatedDate=%lu, uModBy=%u, uModDate=0",
			uVUT
			,TextAreaSave(cDomain)
			,uServer
			,uOwner
			,uCreatedBy
			,(long unsigned)clock
			,uModBy
			);


	mysql_query(&mysql,query);
#ifdef ISM3FIELDS
	uCreatedDate=clock;
#endif

}//void Insert_tVUT(void)


void Update_tVUT(char *rowid)
{
#ifdef ISM3FIELDS
	time_t clock;

        time(&clock);
#endif

	//update query

	//update query
	sprintf(query,"UPDATE tVUT SET uVUT=%u,cDomain='%s',uServer=%u,uModBy=%u,uModDate=%lu WHERE _rowid=%s",
			uVUT
			,TextAreaSave(cDomain)
			,uServer
			,uModBy
			,(long unsigned)clock
			,rowid);


	mysql_query(&mysql,query);

#ifdef ISM3FIELDS
	uModDate=clock;
#endif

}//void Update_tVUT(void)


void ModtVUT(void)
{
	register int i=0;
	MYSQL_RES *res;
	MYSQL_ROW field;
#ifdef ISM3FIELDS
	unsigned uPreModDate=0;

	//Mod select query
	if(uPermLevel<10)
	sprintf(query,"SELECT tVUT.uVUT,\
				tVUT.uModDate\
				FROM tVUT,tClient\
				WHERE tVUT.uVUT=%u\
				AND tVUT.uOwner=tClient.uClient\
				AND (tClient.uOwner=%u OR tClient.uClient=%u)"
			,uVUT,uLoginClient,uLoginClient);
	else
	sprintf(query,"SELECT uVUT,uModDate FROM tVUT\
				WHERE uVUT=%u"
						,uVUT);
#else
	sprintf(query,"SELECT uVUT FROM tVUT\
				WHERE uVUT=%u"
						,uVUT);
#endif

	mysql_query(&mysql,query);
	if(mysql_errno(&mysql)) mysqlSendmail(mysql_error(&mysql));
	res=mysql_store_result(&mysql);
	i=mysql_num_rows(res);

	//if(i<1) tVUT("<blink>Record does not exist");
	if(i<1) tVUT(LANG_NBR_RECNOTEXIST);
	//if(i>1) tVUT("<blink>Multiple rows!");
	if(i>1) tVUT(LANG_NBR_MULTRECS);

	field=mysql_fetch_row(res);
#ifdef ISM3FIELDS
	sscanf(field[1],"%u",&uPreModDate);
	if(uPreModDate!=uModDate) tVUT(LANG_NBR_EXTMOD);
#endif

	Update_tVUT(field[0]);
	if(mysql_errno(&mysql)) mysqlSendmail(mysql_error(&mysql));
	//sprintf(query,"record %s modified",field[0]);
	sprintf(query,LANG_NBRF_REC_MODIFIED,field[0]);
	tVUT(query);

}//ModtVUT(void)


void tVUTList(void)
{
	MYSQL_RES *res;
	MYSQL_ROW field;

	ExttVUTListSelect();

	mysql_query(&mysql,query);
	if(mysql_error(&mysql)[0]) mysqlSendmail(mysql_error(&mysql));
	res=mysql_store_result(&mysql);
	i=mysql_num_rows(res);

	PageMachine("tVUTList",1,"");//1 is auto header list mode. Opens table!

	//Filter select drop down
	ExttVUTListFilter();

	printf("<input type=text size=16 name=command maxlength=98 value=\"%s\" >",command);

	printf("</table>\n");

	printf("<table bgcolor=#9BC1B3 border=0 width=900>\n");
	printf("<tr bgcolor=black><td><font face=arial,helvetica color=white>uVUT<td><font face=arial,helvetica color=white>cDomain<td><font face=arial,helvetica color=white>uServer<td><font face=arial,helvetica color=white>uOwner<td><font face=arial,helvetica color=white>uCreatedBy<td><font face=arial,helvetica color=white>uCreatedDate<td><font face=arial,helvetica color=white>uModBy<td><font face=arial,helvetica color=white>uModDate</tr>");



	mysql_data_seek(res,start-1);

	for(n=0;n<(end-start+1);n++)
	{
		field=mysql_fetch_row(res);
		if(!field)
		{
			printf("<tr><td><font face=arial,helvetica>End of data</table>");
			Footer_ism3();
		}
			if(n % 2)
				printf("<tr bgcolor=#BBE1D3>");
			else
				printf("<tr>");
		printf("<td><font face=arial,helvetica size=1><input type=submit name=ED%s value=Edit></font> %s<td>%s<td>%s<td>%s<td>%s<td>%s<td>%s<td>%s</tr>"
			,field[0]
			,field[0]
			,field[1]
			,field[2]
			,field[3]
			,field[4]
			,field[5]
			,field[6]
			,field[7]
				);

	}

	printf("</table></form>\n");
	Footer_ism3();

}//tVUTList()


void CreatetVUT(void)
{
	sprintf(query,"CREATE TABLE tVUT ( uVUT int unsigned PRIMARY KEY AUTO_INCREMENT, uOwner int unsigned NOT NULL DEFAULT 0,index (uOwner), uCreatedBy int unsigned NOT NULL DEFAULT 0, uCreatedDate int unsigned NOT NULL DEFAULT 0, uModBy int unsigned NOT NULL DEFAULT 0, uModDate int unsigned NOT NULL DEFAULT 0, uServer int unsigned NOT NULL DEFAULT 0,index (uServer), cDomain varchar(64) NOT NULL DEFAULT '',unique (cDomain,uServer) )");
	mysql_query(&mysql,qstr);
	if(mysql_errno(&mysql))
		mysqlSendmail(mysql_error(&mysql));
}//CreatetVUT()

//sedall patch1