// FlisServerDlg.cpp : implementation file // #include "stdafx.h" #include "FlisServer.h" #include "FlisServerDlg.h" #include #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(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(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 CFlisServerDlg::readFrame() { std::vector buf; while(Serial.getComstat().cbInQue > 0) { unsigned char data = Serial.readByte(); buf.push_back(data); } return buf; } void CFlisServerDlg::writeFrame(std::vector data) { for (int i=0; i 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 data) { for (int i=0; i 0) { CString tekst; std::vector answer = readFrame(); Sleep(50); for (int i=0; i tlfnr) { vector 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 CFlisServerDlg::DBReadCommands(void) { vector 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 answer = readFrame(); Sleep(50); for (int i=0; i0) { 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 bool ready = true; m_Textwindow.SetWindowText("Indsætter Pinkode, og venter på modem bliver klar"); UpdateWindow(); SetPin(); Sleep(500); while (ready == true) { if (Serial.getComstat().cbInQue > 120) { std::vector answer = readFrame(); CString tekst; for (int i=0; i -1) { ready = false; } else { AppendText(tekst); } } Sleep(5); //Small delay to avoid busy wait } Sleep(100); //Give the modem a chance to send the last data while(Serial.getComstat().cbInQue > 0) { Serial.readByte(); //Flush the incoming queue Sleep(1); } OnBnClickedStart(); } void CFlisServerDlg::DeleteSms() { vector 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 answer = readFrame(); Sleep(500); CString tekst, oldtekst; int lol; for (int i=0; i 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; data = DBReadCommands(); for (int i=0; i 1) { sInstallationsID = data[i].InstallationsID; } } if (commandtest > 1) { iAll = 0; } if (sIDnr.GetLength() > 0) { SendConfig(sIDnr,sCommandID,sInstallationsID); } Sleep(500); CheckAcknowledges(); Sleep(500); } CTime now = CTime::GetCurrentTime(); CTimeSpan elapsed = now-Alive.tid; if (elapsed.GetTotalSeconds() >= 900) { keepaliveandread(); } } void CFlisServerDlg::SendConfig(CString IDnr,CString CommandID,CString InstallationsID) { std::vector inst; if (CommandID == "1") inst = DBReadPhone("0"); else inst = DBReadPhone(InstallationsID); for ( int j=0; j < inst.size(); j++) { CString TlfNr, Imei, updaterate; TlfNr.Empty(); Imei.Empty(); updaterate.Empty(); CString dataen = inst[j].InstPhoneNr; TlfNr.Append(dataen); CString Imeidata = inst[j].Imei; Imei.Append(Imeidata); CString updaterat = inst[j].Updaterate; updaterate.Append(updaterat); vector tlfnr; for (int i=0; i smsdata; for (int i=0; i CFlisServerDlg::DBReadPhone(CString sInstallationsID) { vector buffer; CString SQL, phonenr, imei, updaterate, id; Installation Myinst; if (sInstallationsID != "0") { SQL.Format("select installationphonenr, imei, updaterate, id from installation WHERE id = %s", sInstallationsID); } else { SQL.Format("select installationphonenr, imei, updaterate, id 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); rs.GetFieldValue(3,id); Myinst.InstPhoneNr = phonenr; Myinst.Imei = imei; Myinst.Updaterate = updaterate; Myinst.instID = id; 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; keepaliveandread(); Sleep(150); m_Textwindow.SetWindowText(CString("Server phonenr read from db: ") + Alive.Phonenr ); AppendText("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(); } void CFlisServerDlg::HandleAcknowledge(CString tlfnr) { for (std::list::iterator it = Acks.begin(); it != Acks.end(); ++it) { Acknowledge& current = (*it); if (current.sTlfNr == tlfnr) { CString SQL; SQL.Format("UPDATE installation SET commerror = false WHERE id = %s", current.sInstallationID); db.ExecuteSQL(SQL); Acks.erase(it); return; } } } void CFlisServerDlg::CheckAcknowledges() { CTime now = CTime::GetCurrentTime(); for (std::list::iterator it = Acks.begin(); it != Acks.end(); ++it) { Acknowledge& current = (*it); CTimeSpan elapsed = now-current.cTime; if (elapsed.GetTotalSeconds() >= 300) { DumpAckList(); if (current.iRetry >= 1) { CString SQL; SQL.Format("UPDATE installation SET commerror = true WHERE id = %s", current.sInstallationID); db.ExecuteSQL(SQL); Acks.erase(it); return; // the iterator is now invalidated, but the thread loop will make sure we are here soon again } else { SendConfig("0","2",current.sInstallationID); current.iRetry++; current.cTime = CTime::GetCurrentTime(); AppendText( CString("Retry send config to ") + current.sTlfNr ); } } } } void CFlisServerDlg::DumpAckList() { CTime now = CTime::GetCurrentTime(); OutputDebugString("-------------------------------\n"); int count = 0; for (std::list::iterator it = Acks.begin(); it != Acks.end(); ++it) { CString msg; msg.Format("%d:%d:%d> %4d : %s\n", now.GetHour(), now.GetMinute(), now.GetSecond(), count, (*it).sTlfNr); OutputDebugString(msg); count++; } } vector CFlisServerDlg::keepaliveandread(void) { vector buffer; CString SQL, name, value; SQL = "select name, value from config;"; CRecordset rs(&db); try { rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL); if (rs.GetRecordCount()>0) { rs.MoveFirst(); rs.GetFieldValue((short)0, name); rs.GetFieldValue(1,value); Alive.name = name; Alive.value = value; Alive.tid = CTime::GetCurrentTime(); if(Alive.name == "phonenr") { Alive.Phonenr = value; } buffer.push_back(Alive); rs.MoveNext(); } rs.Close(); return buffer; } catch (char * str) { AppendText("Keepalive failed, closing and opening the db connection again"); if(db.IsOpen()) { db.Close(); AppendText("DB connection closed"); } if(!db.IsOpen()) { DBConnect(); AppendText("DB connection started again"); } } }