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()
        ON_MESSAGE(UWM_MYMESSAGE, OnShowString)
        //}}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;
        CString SerialPort = "COM3";

        Baud = 1200;
        if( Serial.isOpen() )
        {
                Serial.close();
                Serial.open( SerialPort, Baud );
        }
        else 
        {
                Serial.open( SerialPort, Baud );
        }

                
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);
                        char array1[150];
                        int i;
                        for (int i=0; i<answer.size(); i++)
                        {
                                array1[i] = answer[i];
                        }
                
                        for (int i=0; i<answer.size(); i++)
                        {
                                if ((array1[i] != 0x0A) && (array1[i] != 0x0D))
                                {
                                        tekst.AppendChar(array1[i]);
                                }
                        }
                        m_Textwindow.SetWindowText(tekst);
        }

}
void CFlisServerDlg::SendSmsHead(std::vector<unsigned char> data)
{
        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<data.size(); i++)
        {
                Serial.writeByte( data[i] );
                Sleep(5);
        }
        Serial.writeByte(atcommand[s]);
        Serial.writeByte(0x0D);
        Sleep(250);
}
void CFlisServerDlg::DBConnect()
{
        CString dsn;
        //dsn.Format("ODBC;Description=asd;DRIVER=PostgreSQL ANSI;SERVER=t-hoerup.dk; uid=serrenab;password=furnacemonitor;database=flisfyr;sslmode=prefer");   //Torben
        dsn.Format("ODBC;Description=asd;DRIVER=PostgreSQL ANSI;SERVER=192.168.134.132; uid=serrenab;password=furnacemonitor;database=flisfyr;sslmode=prefer");   //skole server
        db.OpenEx(dsn, CDatabase::noOdbcDialog);
}
vector<Commands> CFlisServerDlg::DBRead(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;";
        CRecordset rs(&db);
        rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
        if (rs.GetRecordCount()>0) 
        {
                rs.MoveFirst();
                while(!rs.IsEOF())
                {
                        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);
        if(Serial.getComstat().cbInQue > 0)
        {
                std::vector<unsigned char> answer = readFrame();
                Sleep(50);
                        char array1[250];
                        int i;
                        for (int i=0; i<answer.size(); i++)
                        {
                                array1[i] = answer[i];
                        }
                
                        for (int i=0; i<answer.size(); i++)
                        {
                                if ((array1[i] != 0x0A) && (array1[i] != 0x0D))
                                {
                                        tekst.AppendChar(array1[i]);
                                }
                        }

                        m_Textwindow.GetWindowText(oldtekst);
                        oldtekst.Append("\r\n");
                        oldtekst.Append(tekst);
                        m_Textwindow.SetWindowText(oldtekst);
                        SmsSplit(tekst);
        }
}
void CFlisServerDlg::SmsSplit(CString data)
{
        CString FyrData, TlfNr, SmsCount, Temper, Flamme, Flis, FremFejl, PowerFail, oldtekst;
        char CharData[150];
        strcpy(CharData,data);

        int s=24;
        for (int i=0; i<=7; i++)
        {
                TlfNr.AppendChar(CharData[s]);
                s++;
        }

        for (int s=57; s<=(data.GetLength()-3); s++)
        {
                FyrData.AppendChar(CharData[s]);
        }
        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);

                m_Textwindow.GetWindowText(Textwindow);
                Textwindow.Append("\r\n");
                Textwindow.Append("Sms added to Log");
                m_Textwindow.SetWindowText(Textwindow);
                Sleep(150);

///////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////// Her skal sendes data til databasen //////////////////////////////////////////////
}
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);
}
LRESULT CFlisServerDlg::OnShowString(WPARAM wParam, LPARAM lParam)
{
        CString *s = (CString*) lParam;
        GetDlgItem(IDC_Textwindow)->SetWindowText(*s);

        delete s;
        return 0;

}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;
                        char array1[250];
                        int i;
                        for (int i=0; i<answer.size(); i++)
                        {
                                array1[i] = answer[i];
                        }
                
                        for (int i=0; i<answer.size(); i++)
                        {
                                if ((array1[i] != 0x0A) && (array1[i] != 0x0D))
                                {
                                        tekst.AppendChar(array1[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")
                        {       
                                m_Textwindow.GetWindowText(oldtekst);
                                oldtekst.Append("\r\n");
                                oldtekst.Append("OK tekst modtaget");
                                m_Textwindow.SetWindowText(oldtekst);
                        }
                        else if (tekst == "error")
                        {
                                m_Textwindow.GetWindowText(oldtekst);
                                oldtekst.Append("\r\n");
                                oldtekst.Append("error tekst");
                                oldtekst.Append(tekst);
                                m_Textwindow.SetWindowText(oldtekst);
                        }
                        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")
                                {
                                        m_Textwindow.GetWindowText(oldtekst);
                                        oldtekst.Append("\r\n");
                                        oldtekst.Append("F�rst lidt tekst p� n�ste linie\r\n");
                                        oldtekst.Append(tekst);
                                        m_Textwindow.SetWindowText(oldtekst);
                                }
                        }
                        else
                        {
                                m_Textwindow.GetWindowText(oldtekst);
                                oldtekst.Append("\r\n");
                                oldtekst.Append("Anden tekst end forventet");
                                oldtekst.Append("\r\n");
                                oldtekst.Append(tekst);
                                m_Textwindow.SetWindowText(oldtekst);
                        }
                        if(ResetSms == 20)
                        {
                                DeleteSms();
                                m_Textwindow.GetWindowText(oldtekst);
                                oldtekst.Append("\r\n");
                                oldtekst.Append("Slettet Sendte og l�ste beskeder da vi n�ede gr�nsen.");
                                m_Textwindow.SetWindowText(oldtekst);
                        }

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

                                if(commandtest > 1)
                                {
                                        testdata.Append(data[i].InstallationsID);
                                        testdata.Append(":");
                                }
                        }
                        sIDnr = Splitter(testdata);
                        sCommandID = Splitter(testdata);
                        sInstallationsID = "0";
                        if (commandtest > 1)
                        {
                                sInstallationsID = Splitter(testdata);
                                iAll = 0;
                        }

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