--- trunk/FlisServer/FlisServerDlg.cpp	2007/12/03 14:40:44	138
+++ trunk/FlisServer/FlisServerDlg.cpp	2007/12/10 07:25:35	209
@@ -6,6 +6,7 @@
 #include "FlisServerDlg.h"
 #include <vector>
 #include ".\flisserverdlg.h"
+#include <atlrx.h>
 
 #ifdef _DEBUG
 #define new DEBUG_NEW
@@ -65,7 +66,6 @@
 	ON_WM_QUERYDRAGICON()
 	//}}AFX_MSG_MAP
 	ON_BN_CLICKED(IDCLOSE, OnBnClickedClose)
-	ON_BN_CLICKED(IDC_GSMPIN, OnBnClickedGsmpin)
 	ON_BN_CLICKED(IDC_Start, OnBnClickedStart)
 END_MESSAGE_MAP()
 
@@ -224,8 +224,10 @@
 }
 void CFlisServerDlg::SetPin()
 {
+	bool ready = true;
 	CString tekst;
 	std::vector<unsigned char> data;
+
 	data.push_back('a');
 	data.push_back('t');
 	data.push_back('+');
@@ -233,13 +235,96 @@
 	data.push_back('p');
 	data.push_back('i');
 	data.push_back('n');
-	data.push_back('=');
-	data.push_back('2');
-	data.push_back('5');
-	data.push_back('9');
-	data.push_back('5');
+	data.push_back('?');
 
 	writeFrame(data);
+	Sleep(100);
+	if(Serial.getComstat().cbInQue > 0)
+	{
+		std::vector<unsigned char> answer = readFrame();
+		Sleep(50);
+
+		for (int i=0; i<answer.size(); i++)
+			{
+				if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
+				{
+					tekst.AppendChar(answer[i]);
+				}
+			}
+			AppendText(tekst);
+	}
+	Sleep(5);
+	tekst.MakeLower();
+	int pos = tekst.Find("+cpin: ",0);
+	if (pos != -1)
+	{
+		tekst = tekst.Right( tekst.GetLength() - pos -1);
+	}
+
+	if (tekst == "cpin: sim pin")
+	{
+		CString pin;
+		ConfigFile config;
+		try {
+			config.ReadSettings();
+		} catch(...) {
+			MessageBox("Could not open config file");
+		}
+		Sleep(50);
+
+		data.clear();
+		data.push_back('a');
+		data.push_back('t');
+		data.push_back('+');
+		data.push_back('c');
+		data.push_back('p');
+		data.push_back('i');
+		data.push_back('n');
+		data.push_back('=');
+		for (int i = 0; i<config.pincode.GetLength(); i++)
+		{
+		data.push_back(config.pincode[i]);
+		}
+
+		writeFrame(data);
+
+		Sleep(500);
+
+		while (ready == true)
+		{
+			if (Serial.getComstat().cbInQue > 120)
+			{
+				std::vector<unsigned char> answer = readFrame();
+				CString tekst;
+			
+				for (int i=0; i<answer.size(); i++)
+				{
+					if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
+					{
+						tekst.AppendChar(answer[i]);
+					}
+				}
+				int n = tekst.Find("WIND: 11",0);
+				if (n > -1)
+				{
+					ready = false;
+				}
+				else
+				{
+					AppendText(tekst);
+				}
+			}
+			Sleep(10); //Small delay to avoid busy wait
+		}
+	}
+	else if (tekst == "cpin: ready")
+	{
+		AppendText("No pincode needed");
+	}
+	else
+	{
+		AppendText("Error in set pin part of the code");
+	}
 }
 void CFlisServerDlg::SendSmsData(std::vector<unsigned char> data)
 {	
@@ -340,7 +425,7 @@
 }
 void CFlisServerDlg::ReadSms()
 {
-	CString tekst, oldtekst;
+	CString tekst;
 	Sleep(950);		//Holder en pause for at lade hele sms'en komme ind i serial køen.
 	if(Serial.getComstat().cbInQue > 0)
 	{
@@ -361,13 +446,33 @@
 }
 void CFlisServerDlg::SmsSplit(CString data)
 {
-	CString FyrData, TlfNr, SmsCount, Temper, Flamme, Flis, FremFejl, PowerFail, oldtekst;
-	char CharData[150];
-	strcpy(CharData,data);
+	CString FyrData, TlfNr, SmsCount, Temper, Flamme, Flis, FremFejl, PowerFail;
 	TlfNr = data.Mid(24,8);
 	FyrData = data.Mid(57,data.GetLength()-59);
 	FyrData.Append(":");
-	
+
+	if (FyrData.MakeLower() == "conf ok:")
+	{
+		HandleAcknowledge(TlfNr);
+		return;
+	}
+	CAtlRegExp<> regex;
+	if (regex.Parse("^{[0-9]+}:{[0-9]+}:[0-1]:[0-1]:[0-1]:[0-1]:$") == REPARSE_ERROR_OK)
+	{
+
+		CAtlREMatchContext<> pContext;
+
+		if (!regex.Match(FyrData, &pContext))
+		{
+			AppendText("Invalid SMS recieved");
+			return;
+		}
+	}
+	else
+	{
+		AppendText("Regex PARSE error!!!"); //Burde aldrig kunne ske !
+	}
+
 	SmsCount = Splitter(FyrData);
 	Temper = Splitter(FyrData);
 	Flamme = Splitter(FyrData);
@@ -415,6 +520,7 @@
 {
 	// TODO: Add your control notification handler code here
 	continueThread = 0;
+	Sleep(250);
 	DeleteSms();
 
 	Sleep(500);
@@ -431,22 +537,6 @@
 	OnOK();
 
 }
-
-void CFlisServerDlg::OnBnClickedGsmpin()
-{
-	// TODO: Add your control notification handler code here
-	m_Textwindow.SetWindowText("Indsætter Pinkode, efterfuldt af 60sec pause");
-	UpdateWindow();
-	SetPin();
-	Sleep(50000);
-
-	while (Serial.getComstat().cbInQue > 0)
-	{
-		Serial.readByte(); //Flush the incoming queue
-	}
-
-	OnBnClickedStart();
-}
 void CFlisServerDlg::DeleteSms()
 {
 	vector<unsigned char> atcommand;
@@ -481,18 +571,17 @@
 {
 	while (continueThread != 0) 
 	{
-		Reader();
+		MyMainThread();
 	}
 }
-void CFlisServerDlg::Reader()
+void CFlisServerDlg::MyMainThread()
 {
 	if(Serial.getComstat().cbInQue > 0)
 		{
 			Sleep(250);
 			std::vector<unsigned char> answer = readFrame();
 			Sleep(500);
-			CString tekst, oldtekst;
-			int lol;
+			CString tekst;
 		
 			for (int i=0; i<answer.size(); i++)
 			{
@@ -504,7 +593,7 @@
 			tekst.Append(":");
 
 			CString command;
-			bool plus;
+			bool plus = false;
 				int pos = tekst.Find('+',0);
 				if (pos != -1)
 				{
@@ -532,7 +621,7 @@
 			{
 				if (command.MakeLower() == "cmti")
 				{
-					CString smscount, oldteskst;
+					CString smscount;
 					int pos = tekst.Find(',',0);
 					if (pos != -1)
 					{
@@ -540,32 +629,25 @@
 						smscount.Remove(':');
 						ResetSms++;
 					}
-						////////////////Read sms ting//////////////////
-						std::vector<unsigned char> data;
-						data.push_back('a');
-						data.push_back('t');
-						data.push_back('+');
-						data.push_back('c');
-						data.push_back('m');
-						data.push_back('g');
-						data.push_back('r');
-						data.push_back('=');
-						
-						for (int i=0; i< smscount.GetLength(); i++)
-						{
-							data.push_back(smscount[i]);
-						}
-						m_Textwindow.GetWindowText(oldteskst);
-						oldteskst.Append("\r\n");
-						for (int i=0; i<data.size();i++)
-						{
-							oldteskst.AppendChar(data[i]);
-						}
-						m_Textwindow.SetWindowText(oldteskst);
-						writeFrame(data);
-						Sleep(200);
-						ReadSms();
-						ResetSms++;
+
+					std::vector<unsigned char> data;
+					data.push_back('a');
+					data.push_back('t');
+					data.push_back('+');
+					data.push_back('c');
+					data.push_back('m');
+					data.push_back('g');
+					data.push_back('r');
+					data.push_back('=');
+					
+					for (int i=0; i< smscount.GetLength(); i++)
+					{
+						data.push_back(smscount[i]);
+					}
+					AppendText(CString(&data[0]));
+					writeFrame(data);
+					Sleep(200);
+					ReadSms();
 
 				}
 				else if(command.MakeLower() == "wind")
@@ -580,11 +662,7 @@
 			}
 			else
 			{
-				CString send;
-				send.Append("Anden tekst end forventet");
-				send.Append("\r\n");
-				send.Append(tekst);
-				AppendText(send);
+				AppendText(tekst);
 			}
 			if(ResetSms == 20)
 			{
@@ -623,95 +701,119 @@
 			{
 				SendConfig(sIDnr,sCommandID,sInstallationsID);
 			}
+			Sleep(300);
+
+			CheckAcknowledges();
 			Sleep(500);
 		}
+		CTime now = CTime::GetCurrentTime();
+
+		CTimeSpan elapsed = now-Alive.tid;
+
+		if (elapsed.GetTotalSeconds() >= 900)
+		{
+			keepaliveandread();
+		}
 }
 void CFlisServerDlg::SendConfig(CString IDnr,CString CommandID,CString InstallationsID)
-{
-	CString ServerTlfNr;
-	int i = 0;
-	ServerTlfNr = "29860132";
-		
+{	
 	
 	std::vector<Installation> inst;
-	inst = DBReadPhone(InstallationsID);
-	while (i < inst.size())
+
+	if (CommandID == "1")
+		inst = DBReadPhone("0");
+	else
+		inst = DBReadPhone(InstallationsID);
+
+	for ( int j=0; j < inst.size(); j++)
 	{
 		CString TlfNr, Imei, updaterate;
 		TlfNr.Empty();
 		Imei.Empty();
 		updaterate.Empty();
 
-		CString dataen = inst[i].InstPhoneNr;
+		CString dataen = inst[j].InstPhoneNr;
 		TlfNr.Append(dataen);
-		CString Imeidata = inst[i].Imei;
+		CString Imeidata = inst[j].Imei;
 		Imei.Append(Imeidata);
-		CString updaterat = inst[i].Updaterate;
+		CString updaterat = inst[j].Updaterate;
 		updaterate.Append(updaterat);
-		i++;
-	
-	vector<unsigned char> tlfnr;
-	for (int i=0; i<TlfNr.GetLength(); i++)
-	{
-		tlfnr.push_back(TlfNr[i]);
-	}
 	
-	int calcimei; 
-	__int64 buf;
+		vector<unsigned char> tlfnr;
+		for (int i=0; i<TlfNr.GetLength(); i++)
+		{
+			tlfnr.push_back(TlfNr[i]);
+		}
+		
+		int calcimei; 
+		__int64 buf;
 
-	buf = atof(Imei);
-	
-	calcimei = tversum(buf);
-	
-	Imei.Format("%d",calcimei);
-	
-	SendSmsHead(tlfnr);
-	Sleep(250);
-	
-	vector<unsigned char> smsdata;
-	
-	for (int i=0; i<Imei.GetLength(); i++)
-	{
-		smsdata.push_back(Imei[i]);
-	}
-	smsdata.push_back(':');
-	for (int i=0; i<ServerTlfNr.GetLength(); i++)
-	{
-		smsdata.push_back(ServerTlfNr[i]);
-	}
-	smsdata.push_back(':');
-	for (int i=0; i<updaterate.GetLength(); i++)
-	{
-		smsdata.push_back(updaterate[i]);
-	}
+		buf = atof(Imei);
+		
+		calcimei = tversum(buf);
+		
+		Imei.Format("%d",calcimei);
+		
+		SendSmsHead(tlfnr);
+		Sleep(250);
+		
+		vector<unsigned char> smsdata;
+		
+		for (int i=0; i<Imei.GetLength(); i++)
+		{
+			smsdata.push_back(Imei[i]);
+		}
+		smsdata.push_back(':');
+		for (int i=0; i<Alive.Phonenr.GetLength(); i++)
+		{
+			smsdata.push_back(Alive.Phonenr[i]);
+		}
+		smsdata.push_back(':');
+		for (int i=0; i<updaterate.GetLength(); i++)
+		{
+			smsdata.push_back(updaterate[i]);
+		}
+
+		SendSmsData(smsdata);
+		Sleep(500);
+
+		if (IDnr != "0")
+		{
+			Acks.push_back( Acknowledge(inst[j].instID,TlfNr) );
+		}
 
-	SendSmsData(smsdata);
-	Sleep(500);
-	
 	}
+
+	if (IDnr != "0")
+	{
 		CString SQL, Textwindow;
 		SQL.Format("update command set executed=now() where id=%s",IDnr);
 		db.ExecuteSQL(SQL);
+		Sleep(100);
 		AppendText("Command executed");
-		Sleep(150);
+	}
+	Sleep(150);
+
+
+
 
 }
 vector<Installation> CFlisServerDlg::DBReadPhone(CString sInstallationsID)
 {
 	vector<Installation> buffer;
 
-	CString SQL, phonenr, imei, updaterate;
-	int installernull;
+	CString SQL, phonenr, imei, updaterate, id;
 	Installation Myinst;
-	installernull = atoi(sInstallationsID);
-	if (installernull > 1)
+
+	if (sInstallationsID != "0")
 	{
-		SQL.Format("select installationphonenr, imei, updaterate from installation WHERE id = %s", sInstallationsID);
+		SQL.Format("select installationphonenr, imei, updaterate, id from installation WHERE id = %s", sInstallationsID);
 	}
-	else if(installernull < 2)
+	else 
 	{
-		SQL.Format("select installationphonenr, imei, updaterate from installation");
+		SQL.Format("select installationphonenr, imei, updaterate, id from installation");
 	}
+
 	CRecordset rs(&db);
 	rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
 	if (rs.GetRecordCount()>0) 
@@ -723,10 +825,12 @@
 			rs.GetFieldValue((short)0,phonenr);
 			rs.GetFieldValue(1,imei);
 			rs.GetFieldValue(2,updaterate);
+			rs.GetFieldValue(3,id);
 
 			Myinst.InstPhoneNr = phonenr;
 			Myinst.Imei = imei;
 			Myinst.Updaterate = updaterate;
+			Myinst.instID = id;
 
 			buffer.push_back(Myinst);
 			rs.MoveNext();
@@ -749,17 +853,41 @@
 {
 // TODO: Add your control notification handler code here
 
+	AppendText("Indsætter Pinkode, og venter på modem bliver klar, hvis pinkode er nødvendig");
+	UpdateWindow();
+	SetPin();
+	
+	Sleep(100); //Give the modem a chance to send the last data
+	while(Serial.getComstat().cbInQue > 0)
+	{
+		Serial.readByte(); //Flush the incoming queue
+		Sleep(1);
+	}
+    Sleep(5);
+
 	continueThread = 1;
-	m_Textwindow.SetWindowText("Started");
+	keepaliveandread();
+	Sleep(150);
+	AppendText(CString("Server phonenr read from db: ") + Alive.Phonenr );
+	AppendText("Started");
 	AfxBeginThread(threadWrapper,AfxGetMainWnd());
 }
 void CFlisServerDlg::AppendText(CString s)
 {
+	CTime now = CTime::GetCurrentTime();
 	CString Tekst;
 	m_Textwindow.GetWindowText(Tekst);
-	Tekst.Append("\r\n");
+	Tekst.AppendFormat("%02d:%02d:%02d : ", now.GetHour(), now.GetMinute(), now.GetSecond());
 	Tekst.Append(s);
+	Tekst.Append("\r\n");
+
 	m_Textwindow.SetWindowText(Tekst);
+	Sleep(5);
+	int g = m_Textwindow.GetScrollLimit(SB_VERT);
+	if (g > 0)
+	{
+	m_Textwindow.SetSel(m_Textwindow.GetWindowTextLength() -1,m_Textwindow.GetWindowTextLength(),false);
+	}
 
 }
 void ConfigFile::ReadSettings()
@@ -791,9 +919,124 @@
 				database = value;
 			else if (key == "comport")
 				comport = value;
+			else if (key == "pincode")
+				pincode = value;
 		}
 
 	}
 
 	file.close();
-}
\ No newline at end of file
+}
+void CFlisServerDlg::HandleAcknowledge(CString tlfnr)
+{
+	for (std::list<Acknowledge>::iterator it = Acks.begin(); it != Acks.end(); ++it)
+	{
+		Acknowledge& current = (*it);
+		if (current.sTlfNr == tlfnr)
+		{
+			CString SQL;
+			SQL.Format("UPDATE installation SET commerror = false WHERE id = %s", current.sInstallationID);
+			db.ExecuteSQL(SQL);
+
+			Acks.erase(it);
+
+			return;
+		}
+	}
+}
+
+void CFlisServerDlg::CheckAcknowledges()
+{
+	CTime now = CTime::GetCurrentTime();
+	for (std::list<Acknowledge>::iterator it = Acks.begin(); it != Acks.end(); ++it)
+	{
+		Acknowledge& current = (*it);
+
+		CTimeSpan elapsed = now-current.cTime;
+
+		if (elapsed.GetTotalSeconds() >= 300)
+		{
+			DumpAckList();
+			if (current.iRetry >= 1)
+			{
+				CString SQL;
+				SQL.Format("UPDATE installation SET commerror = true WHERE id = %s", current.sInstallationID);
+				db.ExecuteSQL(SQL);
+				Acks.erase(it);
+				return; // the iterator is now invalidated, but the thread loop will make sure we are here soon again
+			}
+			else
+			{
+				SendConfig("0","2",current.sInstallationID);
+				current.iRetry++;
+				current.cTime = CTime::GetCurrentTime();
+				AppendText( CString("Retry send config to ") + current.sTlfNr );
+			}
+		}
+	}
+}
+
+void CFlisServerDlg::DumpAckList()	/* Debug tool */
+{
+	
+	CTime now = CTime::GetCurrentTime();
+	OutputDebugString("-------------------------------\n");
+	int count = 0;
+	for (std::list<Acknowledge>::iterator it = Acks.begin(); it != Acks.end(); ++it)
+	{
+		CString msg;
+		msg.Format("%d:%d:%d> %4d : %s\n", now.GetHour(), now.GetMinute(), now.GetSecond(), count, (*it).sTlfNr);
+		OutputDebugString(msg);
+		count++;
+	}
+}
+vector<keepalive> CFlisServerDlg::keepaliveandread(void)
+{
+	vector<keepalive> buffer;
+
+	CString SQL, name, value;
+	SQL = "select name, value from config;";
+	CRecordset rs(&db);
+	try
+	{
+		rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
+		if (rs.GetRecordCount()>0) 
+		{
+			rs.MoveFirst();
+			
+			rs.GetFieldValue((short)0, name);
+			rs.GetFieldValue(1,value);
+		
+			Alive.name = name;
+			Alive.value = value;
+			Alive.tid = CTime::GetCurrentTime();
+			if(Alive.name == "phonenr")
+			{
+				Alive.Phonenr = value;
+			}
+
+			buffer.push_back(Alive);
+			rs.MoveNext();
+
+		}
+		rs.Close();
+		return buffer;
+	}
+	catch (char * str)
+	{
+		AppendText("Keepalive failed, closing and opening the db connection again");
+		if(db.IsOpen())
+		{
+			db.Close();
+			AppendText("DB connection closed");
+		}
+		if(!db.IsOpen())
+		{
+			DBConnect();
+			AppendText("DB connection started again");
+		}
+		return buffer;
+	}
+
+	
+}