- interim release w11a_V0.562 (untagged)

- C++ and Tcl based backend server: many support classes for interfacing to w11 system designs, and the associated Tcl bindings. - add 'asm-11', a simple, Macro-11 syntax subset combatible, assembler. - use now doxygen 1.8.3.1, generate c++,tcl, and vhdl source docs
2026-02-06 08:45:19 +00:00 · 2013-04-13 17:13:15 +00:00
parent 29d2dc5bef
commit 99de9893cb
439 changed files with 21913 additions and 1980 deletions
--- a/tools/src/librlink/RlinkServerEventLoop.cpp
+++ b/tools/src/librlink/RlinkServerEventLoop.cpp
@@ -0,0 +1,93 @@
+// $Id: RlinkServerEventLoop.cpp 495 2013-03-06 17:13:48Z mueller $
+//
+// Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
+//
+// This program is free software; you may redistribute and/or modify it under
+// the terms of the GNU General Public License as published by the Free
+// Software Foundation, either version 2, or at your option any later version.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY, without even the implied warranty of MERCHANTABILITY
+// or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+// for complete details.
+// 
+// Revision History: 
+// Date         Rev Version  Comment
+// 2013-03-05   495   1.1.1  add exception catcher to EventLoop
+// 2013-02-22   491   1.1    use new RlogFile/RlogMsg interfaces
+// 2013-01-12   474   1.0    Initial Version
+// ---------------------------------------------------------------------------
+
+/*!
+  \file
+  \version $Id: RlinkServerEventLoop.cpp 495 2013-03-06 17:13:48Z mueller $
+  \brief   Implemenation of RlinkServerEventLoop.
+*/
+
+#include <errno.h>
+
+#include "RlinkServer.hpp"
+#include "librtools/RlogMsg.hpp"
+
+#include "RlinkServerEventLoop.hpp"
+
+using namespace std;
+
+/*!
+  \class Retro::RlinkServerEventLoop
+  \brief FIXME_docs
+*/
+
+// all method definitions in namespace Retro
+namespace Retro {
+
+//------------------------------------------+-----------------------------------
+//! Default constructor
+
+RlinkServerEventLoop::RlinkServerEventLoop(RlinkServer* pserv)
+  : fpServer(pserv)
+{}
+
+//------------------------------------------+-----------------------------------
+//! Destructor
+
+RlinkServerEventLoop::~RlinkServerEventLoop()
+{}
+
+//------------------------------------------+-----------------------------------
+//! FIXME_docs
+
+void RlinkServerEventLoop::EventLoop()
+{
+  fLoopActive = true;
+  fUpdatePoll = true;
+
+  if (fspLog && fTraceLevel>0) fspLog->Write("eloop: starting", 'I');
+
+  try {
+    while (fLoopActive) {
+      int timeout = (fpServer->AttnPending() || 
+                     fpServer->ActnPending()) ? 0 : -1;
+      int irc = DoPoll(timeout);
+      fpServer->fStats.Inc(timeout<0 ? RlinkServer::kStatNEloopWait : 
+                           RlinkServer::kStatNEloopPoll);
+      if (fPollFd.size() == 0) break;
+      if (irc > 0) DoCall();
+      
+      if (fpServer->AttnPending()) fpServer->CallAttnHandler();
+      if (fpServer->ActnPending()) fpServer->CallActnHandler();
+    }
+  } catch (exception& e) {
+    if (fspLog) {
+      RlogMsg lmsg(*fspLog, 'F');
+      lmsg << "eloop: crashed with exception: " << e.what();
+    }
+    return;
+  }
+
+  if (fspLog && fTraceLevel>0) fspLog->Write("eloop: stopped", 'I');
+
+  return;
+}
+
+} // end namespace Retro