using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Diagnostics; using System.Linq; using System.IO; using System.ServiceProcess; using System.Text; using System.Threading.Tasks; using System.Timers; using log4net; using bsmd.database; using bsmd.dbh; namespace SendNSWMessageService { public partial class NSWSendService : ServiceBase { private Timer _timer; private object _timerlock = new object(); private bool processRunning = false; private ILog _log = LogManager.GetLogger(typeof(NSWSendService)); public NSWSendService() { Directory.SetCurrentDirectory(AppDomain.CurrentDomain.BaseDirectory); InitializeComponent(); } protected override void OnStart(string[] args) { this.EventLog.Source = this.ServiceName; this.EventLog.Log = "Application"; this.EventLog.BeginInit(); if (!EventLog.SourceExists(this.EventLog.Source, this.EventLog.Log)) EventLog.CreateEventSource(this.EventLog.Source, this.EventLog.Log); this.EventLog.EndInit(); this.Init(args); this.EventLog.WriteEntry("NSW Send Service started.", EventLogEntryType.Information); } public void Init(string[] args) { this._timer = new Timer(); this._timer.Interval = 60000; // 1 min this._timer.Elapsed += _timer_Elapsed; this._timer.Enabled = true; _timer_Elapsed(null, null); } void _timer_Elapsed(object sender, ElapsedEventArgs e) { lock (this._timerlock) { if (this.processRunning) return; else this.processRunning = true; } if (DBManager.Instance.Connect(Properties.Settings.Default.ConnectionString)) { // Datenbank auf zu sendende Objekte überprüfen und laden List messagesToSendList = DBManager.Instance.GetToSendMessageList(); foreach (DatabaseEntity entity in messagesToSendList) { try { _log.InfoFormat("Sending CORE message for {0} application to {1}", entity.MessageCore.IsTransit ? "TRANSIT" : "VISIT", entity.MessageCore.InitialHIS.ToString()); bool sendSucceeded = false; // switch über passendes HIS / Schnittstelle switch (entity.MessageCore.InitialHIS) { case Message.NSWProvider.DBH: sendSucceeded = bsmd.dbh.Request.SendMessage(entity); break; case Message.NSWProvider.DAKOSY: _log.Warn("Cannot send via DAKOSY yet"); break; case Message.NSWProvider.DUDR: _log.Warn("Cannot send via Daten und Dienste HRO yet"); break; default: _log.WarnFormat("Initial HIS not specified for message {0}", entity.Id); break; } if (sendSucceeded) { entity.InternalStatus = Message.BSMDStatus.SENT; DBManager.Instance.Save(entity); } } catch (Exception ex) { _log.ErrorFormat("SENDING message {0}: {1}", entity.Id.ToString(), ex.Message); } } DBManager.Instance.Disconnect(); } else { this.EventLog.WriteEntry("NSW Send Service stopped: DB connection failed", EventLogEntryType.Error); this.Stop(); } lock (this._timerlock) { this.processRunning = false; } } protected override void OnPause() { this._timer.Stop(); } protected override void OnContinue() { this._timer.Start(); } protected override void OnStop() { this._timer.Enabled = false; this.EventLog.WriteEntry("NSW Send Service stopped.", EventLogEntryType.Information); } } }