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()-3);
        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);
                db.ExecuteSQL(SQL);

                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 == "OK")
                        {       
                                AppendText("OK tekst modtaget");
                        }
                        else if (tekst == "error")
                        {
                                CString send;
                                send.Append("error tekst");
                                send.Append("\r\n");
                                send.Append(tekst);
                                AppendText(send);
                        }
                        else if (plus == true)
                        {
                                if (command == "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 == "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);

                                if(commandtest > 1)
                                {
                                        sInstallationsID = data[i].InstallationsID;
                                }
                        }
                        sIDnr = Splitter(testdata);
                        sCommandID = Splitter(testdata);
                        sInstallationsID = "0";
                        if (commandtest > 1)
                        {
                                sInstallationsID = Splitter(testdata);
                                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()-3);
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	db.ExecuteSQL(SQL);
392
393	AppendText("Sms added to Log");
394	Sleep(150);
395	}
396	CString CFlisServerDlg::Splitter(CString& fyrdata)
397	{
398	CString Output;
399
400	int pos = fyrdata.Find(':',0);
401	if (pos != -1)
402	{
403	Output = fyrdata.Left(pos);
404	fyrdata = fyrdata.Right( fyrdata.GetLength() - pos -1);
405	}
406	return Output;
407	}
408	void CFlisServerDlg::OnBnClickedClose()
409	{
410	// TODO: Add your control notification handler code here
411	continueThread = 0;
412	DeleteSms();
413
414	Sleep(500);
415	if( Serial.isOpen() )
416	{
417	Serial.close();
418	}
419
420	if(db.IsOpen())
421	{
422	db.Close();
423	}
424
425	OnOK();
426
427	}
428
429	void CFlisServerDlg::OnBnClickedGsmpin()
430	{
431	// TODO: Add your control notification handler code here
432	m_Textwindow.SetWindowText("Inds�tter Pinkode, efterfuldt af 60sec pause");
433	UpdateWindow();
434	SetPin();
435	Sleep(50000);
436
437	while (Serial.getComstat().cbInQue > 0)
438	{
439	Serial.readByte(); //Flush the incoming queue
440	}
441
442	OnBnClickedStart();
443	}
444	void CFlisServerDlg::DeleteSms()
445	{
446	vector<unsigned char> atcommand;
447	atcommand.push_back('a');
448	atcommand.push_back('t');
449	atcommand.push_back('+');
450	atcommand.push_back('c');
451	atcommand.push_back('m');
452	atcommand.push_back('g');
453	atcommand.push_back('d');
454	atcommand.push_back('=');
455	atcommand.push_back('1');
456	atcommand.push_back(',');
457	atcommand.push_back('3');
458
459	writeFrame(atcommand);
460	Sleep(500);
461	}
462	UINT threadWrapper(LPVOID thread)
463	{
464	CFlisServerDlg t = (CFlisServerDlg) thread;
465	t->runthread();
466	return 0;
467	}
468
469	void CFlisServerDlg::startthread()
470	{
471	AfxBeginThread(threadWrapper, (LPVOID) this);
472	}
473
474	void CFlisServerDlg::runthread()
475	{
476	while (continueThread != 0)
477	{
478	Reader();
479	}
480	}
481	void CFlisServerDlg::Reader()
482	{
483	if(Serial.getComstat().cbInQue > 0)
484	{
485	Sleep(250);
486	std::vector<unsigned char> answer = readFrame();
487	Sleep(500);
488	CString tekst, oldtekst;
489	int lol;
490
491	for (int i=0; i<answer.size(); i++)
492	{
493	if ((answer[i] != 0x0A) && (answer[i] != 0x0D))
494	{
495	tekst.AppendChar(answer[i]);
496	}
497	}
498	tekst.Append(":");
499
500	CString command;
501	bool plus;
502	int pos = tekst.Find('+',0);
503	if (pos != -1)
504	{
505	plus = true;
506	tekst = tekst.Right( tekst.GetLength() - pos -1);
507	pos = tekst.Find(':');
508	command = tekst.Left(pos);
509	tekst = tekst.Right( tekst.GetLength() - pos -1);
510	}
511
512
513	if(tekst == "OK")
514	{
515	AppendText("OK tekst modtaget");
516	}
517	else if (tekst == "error")
518	{
519	CString send;
520	send.Append("error tekst");
521	send.Append("\r\n");
522	send.Append(tekst);
523	AppendText(send);
524	}
525	else if (plus == true)
526	{
527	if (command == "cmti")
528	{
529	CString smscount, oldteskst;
530	int pos = tekst.Find(',',0);
531	if (pos != -1)
532	{
533	smscount = tekst.Right( tekst.GetLength() - pos -1);
534	smscount.Remove(':');
535	ResetSms++;
536	}
537	////////////////Read sms ting//////////////////
538	std::vector<unsigned char> data;
539	data.push_back('a');
540	data.push_back('t');
541	data.push_back('+');
542	data.push_back('c');
543	data.push_back('m');
544	data.push_back('g');
545	data.push_back('r');
546	data.push_back('=');
547
548	for (int i=0; i< smscount.GetLength(); i++)
549	{
550	data.push_back(smscount[i]);
551	}
552	m_Textwindow.GetWindowText(oldteskst);
553	oldteskst.Append("\r\n");
554	for (int i=0; i<data.size();i++)
555	{
556	oldteskst.AppendChar(data[i]);
557	}
558	m_Textwindow.SetWindowText(oldteskst);
559	writeFrame(data);
560	Sleep(200);
561	ReadSms();
562	ResetSms++;
563
564	}
565	else if(command == "wind")
566	{
567
568	CString send;
569	send.Append("Wind modtaget");
570	send.Append("\r\n");
571	send.Append(tekst);
572	AppendText(send);
573	}
574	}
575	else
576	{
577	CString send;
578	send.Append("Anden tekst end forventet");
579	send.Append("\r\n");
580	send.Append(tekst);
581	AppendText(send);
582	}
583	if(ResetSms == 20)
584	{
585	DeleteSms();
586	AppendText("Sms'er slettet da vi n�ede gr�nsen");
587	}
588
589	}
590	if (continueThread == 1)
591	{
592
593	CString testdata, dataframe,testprint, sIDnr, sCommandID, sInstallationsID, sImei;
594	int commandtest = 0;
595	int iAll = 1;
596	std::vector<Commands> data;
597	data = DBReadCommands();
598	for (int i=0; i<data.size(); i++)
599	{
600	sIDnr = data[i].IDnr;
601	sCommandID = data[i].CommandID;
602	commandtest = atoi(data[i].CommandID);
603
604	if(commandtest > 1)
605	{
606	sInstallationsID = data[i].InstallationsID;
607	}
608	}
609	sIDnr = Splitter(testdata);
610	sCommandID = Splitter(testdata);
611	sInstallationsID = "0";
612	if (commandtest > 1)
613	{
614	sInstallationsID = Splitter(testdata);
615	iAll = 0;
616	}
617
618	if (sIDnr.GetLength() > 0)
619	{
620	SendConfig(sIDnr,sCommandID,sInstallationsID);
621	}
622	Sleep(500);
623	}
624	}
625	void CFlisServerDlg::SendConfig(CString IDnr,CString CommandID,CString InstallationsID)
626	{
627	CString ServerTlfNr;
628	int i = 0;
629	ServerTlfNr = "29860132";
630
631
632	std::vector<Installation> inst;
633	inst = DBReadPhone(InstallationsID);
634	while (i < inst.size())
635	{
636	CString TlfNr, Imei, updaterate;
637	TlfNr.Empty();
638	Imei.Empty();
639	updaterate.Empty();
640
641	CString dataen = inst[i].InstPhoneNr;
642	TlfNr.Append(dataen);
643	CString Imeidata = inst[i].Imei;
644	Imei.Append(Imeidata);
645	CString updaterat = inst[i].Updaterate;
646	updaterate.Append(updaterat);
647	i++;
648
649	vector<unsigned char> tlfnr;
650	for (int i=0; i<TlfNr.GetLength(); i++)
651	{
652	tlfnr.push_back(TlfNr[i]);
653	}
654
655	int calcimei;
656	__int64 buf;
657
658	buf = atof(Imei);
659
660	calcimei = tversum(buf);
661
662	Imei.Format("%d",calcimei);
663
664	SendSmsHead(tlfnr);
665	Sleep(250);
666
667	vector<unsigned char> smsdata;
668
669	for (int i=0; i<Imei.GetLength(); i++)
670	{
671	smsdata.push_back(Imei[i]);
672	}
673	smsdata.push_back(':');
674	for (int i=0; i<ServerTlfNr.GetLength(); i++)
675	{
676	smsdata.push_back(ServerTlfNr[i]);
677	}
678	smsdata.push_back(':');
679	for (int i=0; i<updaterate.GetLength(); i++)
680	{
681	smsdata.push_back(updaterate[i]);
682	}
683
684	SendSmsData(smsdata);
685	Sleep(500);
686
687	}
688	CString SQL, Textwindow;
689	SQL.Format("update command set executed=now() where id=%s",IDnr);
690	db.ExecuteSQL(SQL);
691	AppendText("Command executed");
692	Sleep(150);
693
694	}
695	vector<Installation> CFlisServerDlg::DBReadPhone(CString sInstallationsID)
696	{
697	vector<Installation> buffer;
698
699	CString SQL, phonenr, imei, updaterate;
700	int installernull;
701	Installation Myinst;
702	installernull = atoi(sInstallationsID);
703	if (installernull > 1)
704	{
705	SQL.Format("select installationphonenr, imei, updaterate from installation WHERE id = %s", sInstallationsID);
706	}
707	else if(installernull < 2)
708	{
709	SQL.Format("select installationphonenr, imei, updaterate from installation");
710	}
711	CRecordset rs(&db);
712	rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
713	if (rs.GetRecordCount()>0)
714	{
715	rs.MoveFirst();
716	while(!rs.IsEOF())
717	{
718
719	rs.GetFieldValue((short)0,phonenr);
720	rs.GetFieldValue(1,imei);
721	rs.GetFieldValue(2,updaterate);
722
723	Myinst.InstPhoneNr = phonenr;
724	Myinst.Imei = imei;
725	Myinst.Updaterate = updaterate;
726
727	buffer.push_back(Myinst);
728	rs.MoveNext();
729	}
730	}
731	rs.Close();
732	return buffer;
733	}
734	int CFlisServerDlg::tversum(__int64 input)
735	{
736	int sum = 0;
737	while (input > 0)
738	{
739	sum += (input %10);
740	input /= 10;
741	}
742	return sum;
743	}
744	void CFlisServerDlg::OnBnClickedStart()
745	{
746	// TODO: Add your control notification handler code here
747
748	continueThread = 1;
749	m_Textwindow.SetWindowText("Started");
750	AfxBeginThread(threadWrapper,AfxGetMainWnd());
751	}
752	void CFlisServerDlg::AppendText(CString s)
753	{
754	CString Tekst;
755	m_Textwindow.GetWindowText(Tekst);
756	Tekst.Append("\r\n");
757	Tekst.Append(s);
758	m_Textwindow.SetWindowText(Tekst);
759
760	}
761	void ConfigFile::ReadSettings()
762	{
763	ifstream file("Server-Settings.ini");
764	if (!file.is_open())
765	throw("Could not open file");
766
767	char buf[200];
768	while (!file.eof() ) {
769	file.getline(buf,200);
770	CString tmp(buf);
771
772	if (tmp.GetAt(0) == '#')
773	continue;
774
775	int pos = tmp.Find('=');
776	if (pos>0) {
777	CString key = tmp.Left(pos).Trim().MakeLower();;
778	CString value = tmp.Right(tmp.GetLength()-pos-1).Trim();
779
780	if (key == "host")
781	host = value;
782	else if (key == "username")
783	username = value;
784	else if (key == "password")
785	password = value;
786	else if (key == "database")
787	database = value;
788	else if (key == "comport")
789	comport = value;
790	}
791
792	}
793
794	file.close();
795	}