trunk/FlisServer/FlisServerDlg.cpp

// FlisServerDlg.cpp : implementation file
//

#include "stdafx.h"
#include "FlisServer.h"
#include "FlisServerDlg.h"
#include <vector>
#include ".\flisserverdlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
        CAboutDlg();

// Dialog Data
        enum { IDD = IDD_ABOUTBOX };

        protected:
        virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support

// Implementation
protected:
        DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
        CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()


// CFlisServerDlg dialog


CFlisServerDlg::CFlisServerDlg(CWnd* pParent /*=NULL*/)
        : CDialog(CFlisServerDlg::IDD, pParent)
{
        m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CFlisServerDlg::DoDataExchange(CDataExchange* pDX)
{
        CDialog::DoDataExchange(pDX);
        DDX_Control(pDX, IDC_Textwindow, m_Textwindow);
}

BEGIN_MESSAGE_MAP(CFlisServerDlg, CDialog)
        ON_WM_SYSCOMMAND()
        ON_WM_PAINT()
        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()


// CFlisServerDlg message handlers

BOOL CFlisServerDlg::OnInitDialog()
{
        CDialog::OnInitDialog();

        // Add "About..." menu item to system menu.

        // IDM_ABOUTBOX must be in the system command range.
        ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
        ASSERT(IDM_ABOUTBOX < 0xF000);

        CMenu* pSysMenu = GetSystemMenu(FALSE);
        if (pSysMenu != NULL)
        {
                CString strAboutMenu;
                strAboutMenu.LoadString(IDS_ABOUTBOX);
                if (!strAboutMenu.IsEmpty())
                {
                        pSysMenu->AppendMenu(MF_SEPARATOR);
                        pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
                }
        }

        // Set the icon for this dialog.  The framework does this automatically
        //  when the application's main window is not a dialog
        SetIcon(m_hIcon, TRUE);                 // Set big icon
        SetIcon(m_hIcon, FALSE);                // Set small icon

        // TODO: Add extra initialization here
        StartSerial();
        DBConnect();
        ResetSms = 0;
        
        return TRUE;  // return TRUE  unless you set the focus to a control
}

void CFlisServerDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
        if ((nID & 0xFFF0) == IDM_ABOUTBOX)
        {
                CAboutDlg dlgAbout;
                dlgAbout.DoModal();
        }
        else
        {
                CDialog::OnSysCommand(nID, lParam);
        }
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CFlisServerDlg::OnPaint() 
{
        if (IsIconic())
        {
                CPaintDC dc(this); // device context for painting

                SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

                // Center icon in client rectangle
                int cxIcon = GetSystemMetrics(SM_CXICON);
                int cyIcon = GetSystemMetrics(SM_CYICON);
                CRect rect;
                GetClientRect(&rect);
                int x = (rect.Width() - cxIcon + 1) / 2;
                int y = (rect.Height() - cyIcon + 1) / 2;

                // Draw the icon
                dc.DrawIcon(x, y, m_hIcon);
        }
        else
        {
                CDialog::OnPaint();
        }
}

// The system calls this function to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CFlisServerDlg::OnQueryDragIcon()
{
        return static_cast<HCURSOR>(m_hIcon);
}
int CFlisServerDlg::StartSerial(void)
{
        
        int Baud;

        ConfigFile config;
        try {
                config.ReadSettings();
        } catch(...) {
                MessageBox("Could not open config file");
                OnOK();
                return true;
        }
        
        Baud = 1200;
        if( Serial.isOpen() )
        {
                try
                {
                        Serial.close();
                        Serial.open( config.comport, Baud );
                }
                catch (exception* e)
                {
                        MessageBox( "Serial.open() exception" );
                        return 0;
                }
        }
        else
        {
                try
                {
                        Serial.open( config.comport, Baud );
                }
                catch (exception* e)
                {
                        MessageBox( "Serial.open() exception 2" );
                        return 0;
                }
        }
        
                
return 0;
}
std::vector<unsigned char> CFlisServerDlg::readFrame()
{
        std::vector<unsigned char> buf;
        while(Serial.getComstat().cbInQue > 0)
        {
                unsigned char data = Serial.readByte();

                buf.push_back(data);
        }
        return buf;
}

void CFlisServerDlg::writeFrame(std::vector<unsigned char> data)
{
        for (int i=0; i<data.size(); i++)
        {
                Serial.writeByte( data[i] );
                Sleep(5);
        }
        Serial.writeByte(0x0D);
        Sleep(100);

}
void CFlisServerDlg::SetPin()
{
        CString tekst;
        std::vector<unsigned char> data;
        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('=');
        data.push_back('2');
        data.push_back('5');
        data.push_back('9');
        data.push_back('5');

        writeFrame(data);
}
void CFlisServerDlg::SendSmsData(std::vector<unsigned char> data)
{       
        
        for (int i=0; i<data.size(); i++)
        {
                Serial.writeByte( data[i] );
                Sleep(5);
        }
        Serial.writeByte(0x1A);
        Sleep(3000);
        if(Serial.getComstat().cbInQue > 0)
        {
                CString tekst;
                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);
        }

}
void CFlisServerDlg::SendSmsHead(std::vector<unsigned char> tlfnr)
{
        vector<unsigned char> atcommand;
        atcommand.push_back('a');
        atcommand.push_back('t');
        atcommand.push_back('+');
        atcommand.push_back('c');
        atcommand.push_back('m');
        atcommand.push_back('g');
        atcommand.push_back('s');
        atcommand.push_back('=');
        atcommand.push_back('"');
        int s = (atcommand.size() -1 );
        
        for (int i=0; i<(atcommand.size()); i++)
        {
                Serial.writeByte( atcommand[i] );
                Sleep(5);
        }
        
        for (int i=0; i<tlfnr.size(); i++)
        {
                Serial.writeByte( tlfnr[i] );
                Sleep(5);
        }
        Serial.writeByte(atcommand[s]);
        Serial.writeByte(0x0D);
        Sleep(250);
}
void CFlisServerDlg::DBConnect()
{
        CString dsn;
        ConfigFile config;
        try {
                config.ReadSettings();
        } catch(...) {
                MessageBox("Could not open config file");
        }
        
        dsn.Format("ODBC;Description=asd;DRIVER=PostgreSQL ANSI;SERVER=%s; uid=%s;password=%s;database=%s;sslmode=prefer",config.host,config.username, config.password, config.database);
        db.OpenEx(dsn, CDatabase::noOdbcDialog);
}
vector<Commands> CFlisServerDlg::DBReadCommands(void)
{
        vector<Commands> buffer;

        CString SQL, IDnr, CommandID, InstallationsID;
        SQL = "select id,date_trunc('second', created) as created,executed,commandid,installationid from command WHERE executed IS NULL ORDER BY created ASC LIMIT 1;";
        CRecordset rs(&db);
        rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
        if (rs.GetRecordCount()>0) 
        {
                rs.MoveFirst();
                        
                Commands Mycom;
                rs.GetFieldValue((short)0, IDnr);
                rs.GetFieldValue(3, CommandID);
                rs.GetFieldValue(4, InstallationsID);
                
                Mycom.IDnr = IDnr;
                Mycom.CommandID = CommandID;
                Mycom.InstallationsID = InstallationsID;

                buffer.push_back(Mycom);
                rs.MoveNext();

        }
        rs.Close();
        return buffer;
}
void CFlisServerDlg::ReadSms()
{
        CString tekst, oldtekst;
        Sleep(950);             //Holder en pause for at lade hele sms'en komme ind i serial k�en.
        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);
                        SmsSplit(tekst);
        }
}
void CFlisServerDlg::SmsSplit(CString data)
{
        CString FyrData, TlfNr, SmsCount, Temper, Flamme, Flis, FremFejl, PowerFail, oldtekst;
        char CharData[150];
        strcpy(CharData,data);
        TlfNr = data.Mid(24,8);
        FyrData = data.Mid(57,data.GetLength()-59);
        FyrData.Append(":");
        
        SmsCount = Splitter(FyrData);
        Temper = Splitter(FyrData);
        Flamme = Splitter(FyrData);
        Flis = Splitter(FyrData);
        FremFejl = Splitter(FyrData);
        PowerFail = Splitter(FyrData);
                
                CString SQL, Textwindow, InstallNR;
                SQL.Format("select ID from installation where installationphonenr=%s",TlfNr);
        
                CRecordset rs(&db);
                rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
                if (rs.GetRecordCount()>0)
                {
                        rs.MoveFirst();         
                        rs.GetFieldValue((short)0,InstallNR);
                }
                rs.Close();

                SQL.Format("insert into logtable (logtime,temperature,flamedetector,solidfuelempty,conveyorerror,powerfailure,messagenr,installationnr) Values (now(),%s,'%s','%s','%s','%s',%s,%s)",Temper, Flamme, Flis, FremFejl, PowerFail, SmsCount,InstallNR);
                try
                {
                db.ExecuteSQL(SQL);
                }
                catch(CDBException* e)
                {
                        MessageBox(e->m_strError);
                }
                AppendText("Sms added to Log");
                Sleep(150);
}
CString CFlisServerDlg::Splitter(CString& fyrdata)
{
        CString Output;

        int pos = fyrdata.Find(':',0);
        if (pos != -1)
                {
                        Output = fyrdata.Left(pos);
                        fyrdata = fyrdata.Right( fyrdata.GetLength() - pos -1);
                }
        return Output;
}
void CFlisServerDlg::OnBnClickedClose()
{
        // TODO: Add your control notification handler code here
        continueThread = 0;
        DeleteSms();

        Sleep(500);
        if( Serial.isOpen() )
        {
                Serial.close();
        }
        
        if(db.IsOpen())
        {
                db.Close();
        }
        
        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;
        atcommand.push_back('a');
        atcommand.push_back('t');
        atcommand.push_back('+');
        atcommand.push_back('c');
        atcommand.push_back('m');
        atcommand.push_back('g');
        atcommand.push_back('d');
        atcommand.push_back('=');
        atcommand.push_back('1');
        atcommand.push_back(',');
        atcommand.push_back('3');

        writeFrame(atcommand);
        Sleep(500);
}
UINT threadWrapper(LPVOID thread)
{
        CFlisServerDlg *t = (CFlisServerDlg*) thread;
        t->runthread();
        return 0;
}

void CFlisServerDlg::startthread()
{
        AfxBeginThread(threadWrapper, (LPVOID) this);
}

void CFlisServerDlg::runthread()
{
        while (continueThread != 0) 
        {
                Reader();
        }
}
void CFlisServerDlg::Reader()
{
        if(Serial.getComstat().cbInQue > 0)
                {
                        Sleep(250);
                        std::vector<unsigned char> answer = readFrame();
                        Sleep(500);
                        CString tekst, oldtekst;
                        int lol;
                
                        for (int i=0; i<answer.size(); i++)
                        {
                                if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
                                {
                                        tekst.AppendChar(answer[i]);
                                }
                        }
                        tekst.Append(":");

                        CString command;
                        bool plus;
                                int pos = tekst.Find('+',0);
                                if (pos != -1)
                                {
                                        plus = true;
                                        tekst = tekst.Right( tekst.GetLength() - pos -1);
                                        pos = tekst.Find(':');
                                        command = tekst.Left(pos);
                                        tekst = tekst.Right( tekst.GetLength() - pos -1);
                                }
                        
                        
                        if(tekst.MakeLower() == "ok")
                        {       
                                AppendText("OK tekst modtaget");
                        }
                        else if (tekst.MakeLower() == "error")
                        {
                                CString send;
                                send.Append("error tekst");
                                send.Append("\r\n");
                                send.Append(tekst);
                                AppendText(send);
                        }
                        else if (plus == true)
                        {
                                if (command.MakeLower() == "cmti")
                                {
                                        CString smscount, oldteskst;
                                        int pos = tekst.Find(',',0);
                                        if (pos != -1)
                                        {
                                                smscount = tekst.Right( tekst.GetLength() - pos -1);
                                                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++;

                                }
                                else if(command.MakeLower() == "wind")
                                {

                                        CString send;
                                        send.Append("Wind modtaget");
                                        send.Append("\r\n");
                                        send.Append(tekst);
                                        AppendText(send);
                                }
                        }
                        else
                        {
                                CString send;
                                send.Append("Anden tekst end forventet");
                                send.Append("\r\n");
                                send.Append(tekst);
                                AppendText(send);
                        }
                        if(ResetSms == 20)
                        {
                                DeleteSms();
                                AppendText("Sms'er slettet da vi n�ede gr�nsen");
                        }

                }
                if (continueThread == 1)
                {
                        
                        CString testdata, dataframe,testprint, sIDnr, sCommandID, sInstallationsID, sImei;
                        int commandtest = 0;
                        int iAll = 1;
                        std::vector<Commands> data;
                        data = DBReadCommands();
                        for (int i=0; i<data.size(); i++)
                        {
                                sIDnr = data[i].IDnr;
                                sCommandID = data[i].CommandID;
                                commandtest = atoi(data[i].CommandID);
                                sInstallationsID = "0";

                                if(commandtest > 1)
                                {
                                        sInstallationsID = data[i].InstallationsID;
                                }
                        }
                        
                        if (commandtest > 1)
                        {
                                iAll = 0;
                        }

                        if (sIDnr.GetLength() > 0)
                        {
                                SendConfig(sIDnr,sCommandID,sInstallationsID);
                        }
                        Sleep(500);
                }
}
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())
        {
                CString TlfNr, Imei, updaterate;
                TlfNr.Empty();
                Imei.Empty();
                updaterate.Empty();

                CString dataen = inst[i].InstPhoneNr;
                TlfNr.Append(dataen);
                CString Imeidata = inst[i].Imei;
                Imei.Append(Imeidata);
                CString updaterat = inst[i].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;

        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]);
        }

        SendSmsData(smsdata);
        Sleep(500);
        
        }
                CString SQL, Textwindow;
                SQL.Format("update command set executed=now() where id=%s",IDnr);
                db.ExecuteSQL(SQL);
                AppendText("Command executed");
                Sleep(150);

}
vector<Installation> CFlisServerDlg::DBReadPhone(CString sInstallationsID)
{
        vector<Installation> buffer;

        CString SQL, phonenr, imei, updaterate;
        int installernull;
        Installation Myinst;
        installernull = atoi(sInstallationsID);
        if (installernull > 1)
        {
                SQL.Format("select installationphonenr, imei, updaterate from installation WHERE id = %s", sInstallationsID);
        }
        else if(installernull < 2)
        {
                SQL.Format("select installationphonenr, imei, updaterate from installation");
        }
        CRecordset rs(&db);
        rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
        if (rs.GetRecordCount()>0) 
        {
                rs.MoveFirst();
                while(!rs.IsEOF())
                {
                
                        rs.GetFieldValue((short)0,phonenr);
                        rs.GetFieldValue(1,imei);
                        rs.GetFieldValue(2,updaterate);

                        Myinst.InstPhoneNr = phonenr;
                        Myinst.Imei = imei;
                        Myinst.Updaterate = updaterate;

                        buffer.push_back(Myinst);
                        rs.MoveNext();
                }
        }
        rs.Close();
        return buffer;
}
int CFlisServerDlg::tversum(__int64 input)
{
        int sum = 0;
        while (input > 0)
        {
                sum += (input %10);
                input /= 10;
        }
        return sum;
}
void CFlisServerDlg::OnBnClickedStart()
{
// TODO: Add your control notification handler code here

        continueThread = 1;
        m_Textwindow.SetWindowText("Started");
        AfxBeginThread(threadWrapper,AfxGetMainWnd());
}
void CFlisServerDlg::AppendText(CString s)
{
        CString Tekst;
        m_Textwindow.GetWindowText(Tekst);
        Tekst.Append("\r\n");
        Tekst.Append(s);
        m_Textwindow.SetWindowText(Tekst);

}
void ConfigFile::ReadSettings()
{
        ifstream file("Server-Settings.ini");
        if (!file.is_open())
                throw("Could not open file");

        char buf[200];
        while (!file.eof() ) {
                file.getline(buf,200);
                CString tmp(buf);

                if (tmp.GetAt(0) == '#')
                        continue;

                int pos = tmp.Find('=');
                if (pos>0) {
                        CString key = tmp.Left(pos).Trim().MakeLower();;
                        CString value = tmp.Right(tmp.GetLength()-pos-1).Trim();

                        if (key == "host")
                                host = value;
                        else if (key == "username")
                                username = value;
                        else if (key == "password")
                                password = value;
                        else if (key == "database")
                                database = value;
                        else if (key == "comport")
                                comport = value;
                }

        }

        file.close();
}
1	// FlisServerDlg.cpp : implementation file
2	//
3
4	#include "stdafx.h"
5	#include "FlisServer.h"
6	#include "FlisServerDlg.h"
7	#include <vector>
8	#include ".\flisserverdlg.h"
9
10	#ifdef _DEBUG
11	#define new DEBUG_NEW
12	#endif
13
14
15	// CAboutDlg dialog used for App About
16
17	class CAboutDlg : public CDialog
18	{
19	public:
20	CAboutDlg();
21
22	// Dialog Data
23	enum { IDD = IDD_ABOUTBOX };
24
25	protected:
26	virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support
27
28	// Implementation
29	protected:
30	DECLARE_MESSAGE_MAP()
31	};
32
33	CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
34	{
35	}
36
37	void CAboutDlg::DoDataExchange(CDataExchange* pDX)
38	{
39	CDialog::DoDataExchange(pDX);
40	}
41
42	BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
43	END_MESSAGE_MAP()
44
45
46	// CFlisServerDlg dialog
47
48
49
50	CFlisServerDlg::CFlisServerDlg(CWnd* pParent /=NULL/)
51	: CDialog(CFlisServerDlg::IDD, pParent)
52	{
53	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
54	}
55
56	void CFlisServerDlg::DoDataExchange(CDataExchange* pDX)
57	{
58	CDialog::DoDataExchange(pDX);
59	DDX_Control(pDX, IDC_Textwindow, m_Textwindow);
60	}
61
62	BEGIN_MESSAGE_MAP(CFlisServerDlg, CDialog)
63	ON_WM_SYSCOMMAND()
64	ON_WM_PAINT()
65	ON_WM_QUERYDRAGICON()
66	//}}AFX_MSG_MAP
67	ON_BN_CLICKED(IDCLOSE, OnBnClickedClose)
68	ON_BN_CLICKED(IDC_GSMPIN, OnBnClickedGsmpin)
69	ON_BN_CLICKED(IDC_Start, OnBnClickedStart)
70	END_MESSAGE_MAP()
71
72
73	// CFlisServerDlg message handlers
74
75	BOOL CFlisServerDlg::OnInitDialog()
76	{
77	CDialog::OnInitDialog();
78
79	// Add "About..." menu item to system menu.
80
81	// IDM_ABOUTBOX must be in the system command range.
82	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
83	ASSERT(IDM_ABOUTBOX < 0xF000);
84
85	CMenu* pSysMenu = GetSystemMenu(FALSE);
86	if (pSysMenu != NULL)
87	{
88	CString strAboutMenu;
89	strAboutMenu.LoadString(IDS_ABOUTBOX);
90	if (!strAboutMenu.IsEmpty())
91	{
92	pSysMenu->AppendMenu(MF_SEPARATOR);
93	pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
94	}
95	}
96
97	// Set the icon for this dialog. The framework does this automatically
98	// when the application's main window is not a dialog
99	SetIcon(m_hIcon, TRUE); // Set big icon
100	SetIcon(m_hIcon, FALSE); // Set small icon
101
102	// TODO: Add extra initialization here
103	StartSerial();
104	DBConnect();
105	ResetSms = 0;
106
107	return TRUE; // return TRUE unless you set the focus to a control
108	}
109
110	void CFlisServerDlg::OnSysCommand(UINT nID, LPARAM lParam)
111	{
112	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
113	{
114	CAboutDlg dlgAbout;
115	dlgAbout.DoModal();
116	}
117	else
118	{
119	CDialog::OnSysCommand(nID, lParam);
120	}
121	}
122
123	// If you add a minimize button to your dialog, you will need the code below
124	// to draw the icon. For MFC applications using the document/view model,
125	// this is automatically done for you by the framework.
126
127	void CFlisServerDlg::OnPaint()
128	{
129	if (IsIconic())
130	{
131	CPaintDC dc(this); // device context for painting
132
133	SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);
134
135	// Center icon in client rectangle
136	int cxIcon = GetSystemMetrics(SM_CXICON);
137	int cyIcon = GetSystemMetrics(SM_CYICON);
138	CRect rect;
139	GetClientRect(&rect);
140	int x = (rect.Width() - cxIcon + 1) / 2;
141	int y = (rect.Height() - cyIcon + 1) / 2;
142
143	// Draw the icon
144	dc.DrawIcon(x, y, m_hIcon);
145	}
146	else
147	{
148	CDialog::OnPaint();
149	}
150	}
151
152	// The system calls this function to obtain the cursor to display while the user drags
153	// the minimized window.
154	HCURSOR CFlisServerDlg::OnQueryDragIcon()
155	{
156	return static_cast<HCURSOR>(m_hIcon);
157	}
158	int CFlisServerDlg::StartSerial(void)
159	{
160
161	int Baud;
162
163	ConfigFile config;
164	try {
165	config.ReadSettings();
166	} catch(...) {
167	MessageBox("Could not open config file");
168	OnOK();
169	return true;
170	}
171
172	Baud = 1200;
173	if( Serial.isOpen() )
174	{
175	try
176	{
177	Serial.close();
178	Serial.open( config.comport, Baud );
179	}
180	catch (exception* e)
181	{
182	MessageBox( "Serial.open() exception" );
183	return 0;
184	}
185	}
186	else
187	{
188	try
189	{
190	Serial.open( config.comport, Baud );
191	}
192	catch (exception* e)
193	{
194	MessageBox( "Serial.open() exception 2" );
195	return 0;
196	}
197	}
198
199
200	return 0;
201	}
202	std::vector<unsigned char> CFlisServerDlg::readFrame()
203	{
204	std::vector<unsigned char> buf;
205	while(Serial.getComstat().cbInQue > 0)
206	{
207	unsigned char data = Serial.readByte();
208
209	buf.push_back(data);
210	}
211	return buf;
212	}
213
214	void CFlisServerDlg::writeFrame(std::vector<unsigned char> data)
215	{
216	for (int i=0; i<data.size(); i++)
217	{
218	Serial.writeByte( data[i] );
219	Sleep(5);
220	}
221	Serial.writeByte(0x0D);
222	Sleep(100);
223
224	}
225	void CFlisServerDlg::SetPin()
226	{
227	CString tekst;
228	std::vector<unsigned char> data;
229	data.push_back('a');
230	data.push_back('t');
231	data.push_back('+');
232	data.push_back('c');
233	data.push_back('p');
234	data.push_back('i');
235	data.push_back('n');
236	data.push_back('=');
237	data.push_back('2');
238	data.push_back('5');
239	data.push_back('9');
240	data.push_back('5');
241
242	writeFrame(data);
243	}
244	void CFlisServerDlg::SendSmsData(std::vector<unsigned char> data)
245	{
246
247	for (int i=0; i<data.size(); i++)
248	{
249	Serial.writeByte( data[i] );
250	Sleep(5);
251	}
252	Serial.writeByte(0x1A);
253	Sleep(3000);
254	if(Serial.getComstat().cbInQue > 0)
255	{
256	CString tekst;
257	std::vector<unsigned char> answer = readFrame();
258	Sleep(50);
259
260	for (int i=0; i<answer.size(); i++)
261	{
262	if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
263	{
264	tekst.AppendChar(answer[i]);
265	}
266	}
267	AppendText(tekst);
268	}
269
270	}
271	void CFlisServerDlg::SendSmsHead(std::vector<unsigned char> tlfnr)
272	{
273	vector<unsigned char> atcommand;
274	atcommand.push_back('a');
275	atcommand.push_back('t');
276	atcommand.push_back('+');
277	atcommand.push_back('c');
278	atcommand.push_back('m');
279	atcommand.push_back('g');
280	atcommand.push_back('s');
281	atcommand.push_back('=');
282	atcommand.push_back('"');
283	int s = (atcommand.size() -1 );
284
285	for (int i=0; i<(atcommand.size()); i++)
286	{
287	Serial.writeByte( atcommand[i] );
288	Sleep(5);
289	}
290
291	for (int i=0; i<tlfnr.size(); i++)
292	{
293	Serial.writeByte( tlfnr[i] );
294	Sleep(5);
295	}
296	Serial.writeByte(atcommand[s]);
297	Serial.writeByte(0x0D);
298	Sleep(250);
299	}
300	void CFlisServerDlg::DBConnect()
301	{
302	CString dsn;
303	ConfigFile config;
304	try {
305	config.ReadSettings();
306	} catch(...) {
307	MessageBox("Could not open config file");
308	}
309
310	dsn.Format("ODBC;Description=asd;DRIVER=PostgreSQL ANSI;SERVER=%s; uid=%s;password=%s;database=%s;sslmode=prefer",config.host,config.username, config.password, config.database);
311	db.OpenEx(dsn, CDatabase::noOdbcDialog);
312	}
313	vector<Commands> CFlisServerDlg::DBReadCommands(void)
314	{
315	vector<Commands> buffer;
316
317	CString SQL, IDnr, CommandID, InstallationsID;
318	SQL = "select id,date_trunc('second', created) as created,executed,commandid,installationid from command WHERE executed IS NULL ORDER BY created ASC LIMIT 1;";
319	CRecordset rs(&db);
320	rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
321	if (rs.GetRecordCount()>0)
322	{
323	rs.MoveFirst();
324
325	Commands Mycom;
326	rs.GetFieldValue((short)0, IDnr);
327	rs.GetFieldValue(3, CommandID);
328	rs.GetFieldValue(4, InstallationsID);
329
330	Mycom.IDnr = IDnr;
331	Mycom.CommandID = CommandID;
332	Mycom.InstallationsID = InstallationsID;
333
334	buffer.push_back(Mycom);
335	rs.MoveNext();
336
337	}
338	rs.Close();
339	return buffer;
340	}
341	void CFlisServerDlg::ReadSms()
342	{
343	CString tekst, oldtekst;
344	Sleep(950); //Holder en pause for at lade hele sms'en komme ind i serial k�en.
345	if(Serial.getComstat().cbInQue > 0)
346	{
347	std::vector<unsigned char> answer = readFrame();
348	Sleep(50);
349
350	for (int i=0; i<answer.size(); i++)
351	{
352	if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
353	{
354	tekst.AppendChar(answer[i]);
355	}
356	}
357
358	AppendText(tekst);
359	SmsSplit(tekst);
360	}
361	}
362	void CFlisServerDlg::SmsSplit(CString data)
363	{
364	CString FyrData, TlfNr, SmsCount, Temper, Flamme, Flis, FremFejl, PowerFail, oldtekst;
365	char CharData[150];
366	strcpy(CharData,data);
367	TlfNr = data.Mid(24,8);
368	FyrData = data.Mid(57,data.GetLength()-59);
369	FyrData.Append(":");
370
371	SmsCount = Splitter(FyrData);
372	Temper = Splitter(FyrData);
373	Flamme = Splitter(FyrData);
374	Flis = Splitter(FyrData);
375	FremFejl = Splitter(FyrData);
376	PowerFail = Splitter(FyrData);
377
378	CString SQL, Textwindow, InstallNR;
379	SQL.Format("select ID from installation where installationphonenr=%s",TlfNr);
380
381	CRecordset rs(&db);
382	rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
383	if (rs.GetRecordCount()>0)
384	{
385	rs.MoveFirst();
386	rs.GetFieldValue((short)0,InstallNR);
387	}
388	rs.Close();
389
390	SQL.Format("insert into logtable (logtime,temperature,flamedetector,solidfuelempty,conveyorerror,powerfailure,messagenr,installationnr) Values (now(),%s,'%s','%s','%s','%s',%s,%s)",Temper, Flamme, Flis, FremFejl, PowerFail, SmsCount,InstallNR);
391	try
392	{
393	db.ExecuteSQL(SQL);
394	}
395	catch(CDBException* e)
396	{
397	MessageBox(e->m_strError);
398	}
399	AppendText("Sms added to Log");
400	Sleep(150);
401	}
402	CString CFlisServerDlg::Splitter(CString& fyrdata)
403	{
404	CString Output;
405
406	int pos = fyrdata.Find(':',0);
407	if (pos != -1)
408	{
409	Output = fyrdata.Left(pos);
410	fyrdata = fyrdata.Right( fyrdata.GetLength() - pos -1);
411	}
412	return Output;
413	}
414	void CFlisServerDlg::OnBnClickedClose()
415	{
416	// TODO: Add your control notification handler code here
417	continueThread = 0;
418	DeleteSms();
419
420	Sleep(500);
421	if( Serial.isOpen() )
422	{
423	Serial.close();
424	}
425
426	if(db.IsOpen())
427	{
428	db.Close();
429	}
430
431	OnOK();
432
433	}
434
435	void CFlisServerDlg::OnBnClickedGsmpin()
436	{
437	// TODO: Add your control notification handler code here
438	m_Textwindow.SetWindowText("Inds�tter Pinkode, efterfuldt af 60sec pause");
439	UpdateWindow();
440	SetPin();
441	Sleep(50000);
442
443	while (Serial.getComstat().cbInQue > 0)
444	{
445	Serial.readByte(); //Flush the incoming queue
446	}
447
448	OnBnClickedStart();
449	}
450	void CFlisServerDlg::DeleteSms()
451	{
452	vector<unsigned char> atcommand;
453	atcommand.push_back('a');
454	atcommand.push_back('t');
455	atcommand.push_back('+');
456	atcommand.push_back('c');
457	atcommand.push_back('m');
458	atcommand.push_back('g');
459	atcommand.push_back('d');
460	atcommand.push_back('=');
461	atcommand.push_back('1');
462	atcommand.push_back(',');
463	atcommand.push_back('3');
464
465	writeFrame(atcommand);
466	Sleep(500);
467	}
468	UINT threadWrapper(LPVOID thread)
469	{
470	CFlisServerDlg t = (CFlisServerDlg) thread;
471	t->runthread();
472	return 0;
473	}
474
475	void CFlisServerDlg::startthread()
476	{
477	AfxBeginThread(threadWrapper, (LPVOID) this);
478	}
479
480	void CFlisServerDlg::runthread()
481	{
482	while (continueThread != 0)
483	{
484	Reader();
485	}
486	}
487	void CFlisServerDlg::Reader()
488	{
489	if(Serial.getComstat().cbInQue > 0)
490	{
491	Sleep(250);
492	std::vector<unsigned char> answer = readFrame();
493	Sleep(500);
494	CString tekst, oldtekst;
495	int lol;
496
497	for (int i=0; i<answer.size(); i++)
498	{
499	if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
500	{
501	tekst.AppendChar(answer[i]);
502	}
503	}
504	tekst.Append(":");
505
506	CString command;
507	bool plus;
508	int pos = tekst.Find('+',0);
509	if (pos != -1)
510	{
511	plus = true;
512	tekst = tekst.Right( tekst.GetLength() - pos -1);
513	pos = tekst.Find(':');
514	command = tekst.Left(pos);
515	tekst = tekst.Right( tekst.GetLength() - pos -1);
516	}
517
518
519	if(tekst.MakeLower() == "ok")
520	{
521	AppendText("OK tekst modtaget");
522	}
523	else if (tekst.MakeLower() == "error")
524	{
525	CString send;
526	send.Append("error tekst");
527	send.Append("\r\n");
528	send.Append(tekst);
529	AppendText(send);
530	}
531	else if (plus == true)
532	{
533	if (command.MakeLower() == "cmti")
534	{
535	CString smscount, oldteskst;
536	int pos = tekst.Find(',',0);
537	if (pos != -1)
538	{
539	smscount = tekst.Right( tekst.GetLength() - pos -1);
540	smscount.Remove(':');
541	ResetSms++;
542	}
543	////////////////Read sms ting//////////////////
544	std::vector<unsigned char> data;
545	data.push_back('a');
546	data.push_back('t');
547	data.push_back('+');
548	data.push_back('c');
549	data.push_back('m');
550	data.push_back('g');
551	data.push_back('r');
552	data.push_back('=');
553
554	for (int i=0; i< smscount.GetLength(); i++)
555	{
556	data.push_back(smscount[i]);
557	}
558	m_Textwindow.GetWindowText(oldteskst);
559	oldteskst.Append("\r\n");
560	for (int i=0; i<data.size();i++)
561	{
562	oldteskst.AppendChar(data[i]);
563	}
564	m_Textwindow.SetWindowText(oldteskst);
565	writeFrame(data);
566	Sleep(200);
567	ReadSms();
568	ResetSms++;
569
570	}
571	else if(command.MakeLower() == "wind")
572	{
573
574	CString send;
575	send.Append("Wind modtaget");
576	send.Append("\r\n");
577	send.Append(tekst);
578	AppendText(send);
579	}
580	}
581	else
582	{
583	CString send;
584	send.Append("Anden tekst end forventet");
585	send.Append("\r\n");
586	send.Append(tekst);
587	AppendText(send);
588	}
589	if(ResetSms == 20)
590	{
591	DeleteSms();
592	AppendText("Sms'er slettet da vi n�ede gr�nsen");
593	}
594
595	}
596	if (continueThread == 1)
597	{
598
599	CString testdata, dataframe,testprint, sIDnr, sCommandID, sInstallationsID, sImei;
600	int commandtest = 0;
601	int iAll = 1;
602	std::vector<Commands> data;
603	data = DBReadCommands();
604	for (int i=0; i<data.size(); i++)
605	{
606	sIDnr = data[i].IDnr;
607	sCommandID = data[i].CommandID;
608	commandtest = atoi(data[i].CommandID);
609	sInstallationsID = "0";
610
611	if(commandtest > 1)
612	{
613	sInstallationsID = data[i].InstallationsID;
614	}
615	}
616
617	if (commandtest > 1)
618	{
619	iAll = 0;
620	}
621
622	if (sIDnr.GetLength() > 0)
623	{
624	SendConfig(sIDnr,sCommandID,sInstallationsID);
625	}
626	Sleep(500);
627	}
628	}
629	void CFlisServerDlg::SendConfig(CString IDnr,CString CommandID,CString InstallationsID)
630	{
631	CString ServerTlfNr;
632	int i = 0;
633	ServerTlfNr = "29860132";
634
635
636	std::vector<Installation> inst;
637	inst = DBReadPhone(InstallationsID);
638	while (i < inst.size())
639	{
640	CString TlfNr, Imei, updaterate;
641	TlfNr.Empty();
642	Imei.Empty();
643	updaterate.Empty();
644
645	CString dataen = inst[i].InstPhoneNr;
646	TlfNr.Append(dataen);
647	CString Imeidata = inst[i].Imei;
648	Imei.Append(Imeidata);
649	CString updaterat = inst[i].Updaterate;
650	updaterate.Append(updaterat);
651	i++;
652
653	vector<unsigned char> tlfnr;
654	for (int i=0; i<TlfNr.GetLength(); i++)
655	{
656	tlfnr.push_back(TlfNr[i]);
657	}
658
659	int calcimei;
660	__int64 buf;
661
662	buf = atof(Imei);
663
664	calcimei = tversum(buf);
665
666	Imei.Format("%d",calcimei);
667
668	SendSmsHead(tlfnr);
669	Sleep(250);
670
671	vector<unsigned char> smsdata;
672
673	for (int i=0; i<Imei.GetLength(); i++)
674	{
675	smsdata.push_back(Imei[i]);
676	}
677	smsdata.push_back(':');
678	for (int i=0; i<ServerTlfNr.GetLength(); i++)
679	{
680	smsdata.push_back(ServerTlfNr[i]);
681	}
682	smsdata.push_back(':');
683	for (int i=0; i<updaterate.GetLength(); i++)
684	{
685	smsdata.push_back(updaterate[i]);
686	}
687
688	SendSmsData(smsdata);
689	Sleep(500);
690
691	}
692	CString SQL, Textwindow;
693	SQL.Format("update command set executed=now() where id=%s",IDnr);
694	db.ExecuteSQL(SQL);
695	AppendText("Command executed");
696	Sleep(150);
697
698	}
699	vector<Installation> CFlisServerDlg::DBReadPhone(CString sInstallationsID)
700	{
701	vector<Installation> buffer;
702
703	CString SQL, phonenr, imei, updaterate;
704	int installernull;
705	Installation Myinst;
706	installernull = atoi(sInstallationsID);
707	if (installernull > 1)
708	{
709	SQL.Format("select installationphonenr, imei, updaterate from installation WHERE id = %s", sInstallationsID);
710	}
711	else if(installernull < 2)
712	{
713	SQL.Format("select installationphonenr, imei, updaterate from installation");
714	}
715	CRecordset rs(&db);
716	rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
717	if (rs.GetRecordCount()>0)
718	{
719	rs.MoveFirst();
720	while(!rs.IsEOF())
721	{
722
723	rs.GetFieldValue((short)0,phonenr);
724	rs.GetFieldValue(1,imei);
725	rs.GetFieldValue(2,updaterate);
726
727	Myinst.InstPhoneNr = phonenr;
728	Myinst.Imei = imei;
729	Myinst.Updaterate = updaterate;
730
731	buffer.push_back(Myinst);
732	rs.MoveNext();
733	}
734	}
735	rs.Close();
736	return buffer;
737	}
738	int CFlisServerDlg::tversum(__int64 input)
739	{
740	int sum = 0;
741	while (input > 0)
742	{
743	sum += (input %10);
744	input /= 10;
745	}
746	return sum;
747	}
748	void CFlisServerDlg::OnBnClickedStart()
749	{
750	// TODO: Add your control notification handler code here
751
752	continueThread = 1;
753	m_Textwindow.SetWindowText("Started");
754	AfxBeginThread(threadWrapper,AfxGetMainWnd());
755	}
756	void CFlisServerDlg::AppendText(CString s)
757	{
758	CString Tekst;
759	m_Textwindow.GetWindowText(Tekst);
760	Tekst.Append("\r\n");
761	Tekst.Append(s);
762	m_Textwindow.SetWindowText(Tekst);
763
764	}
765	void ConfigFile::ReadSettings()
766	{
767	ifstream file("Server-Settings.ini");
768	if (!file.is_open())
769	throw("Could not open file");
770
771	char buf[200];
772	while (!file.eof() ) {
773	file.getline(buf,200);
774	CString tmp(buf);
775
776	if (tmp.GetAt(0) == '#')
777	continue;
778
779	int pos = tmp.Find('=');
780	if (pos>0) {
781	CString key = tmp.Left(pos).Trim().MakeLower();;
782	CString value = tmp.Right(tmp.GetLength()-pos-1).Trim();
783
784	if (key == "host")
785	host = value;
786	else if (key == "username")
787	username = value;
788	else if (key == "password")
789	password = value;
790	else if (key == "database")
791	database = value;
792	else if (key == "comport")
793	comport = value;
794	}
795
796	}
797
798	file.close();
799	}