Add ability to save route table updates to disk
[ric-plt/lib/rmr.git] / src / rmr / common / src / rtc_static.c
1 // : vi ts=4 sw=4 noet :
2 /*
3 ==================================================================================
4         Copyright (c) 2019-2021 Nokia
5         Copyright (c) 2018-2021 AT&T Intellectual Property.
6
7    Licensed under the Apache License, Version 2.0 (the "License");
8    you may not use this file except in compliance with the License.
9    You may obtain a copy of the License at
10
11            http://www.apache.org/licenses/LICENSE-2.0
12
13    Unless required by applicable law or agreed to in writing, software
14    distributed under the License is distributed on an "AS IS" BASIS,
15    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
16    See the License for the specific language governing permissions and
17    limitations under the License.
18 ==================================================================================
19 */
20
21 /*
22         Mnemonic:       rt_collector.c
23         Abstract:       The route table collector is started as a separate pthread and
24                                 is responsible for listening for route table updates from a
25                                 route manager or route table generator process.
26
27         Author:         E. Scott Daniels
28         Date:           29 November 2018 (extracted to common 13 March 2019)
29 */
30
31 #ifndef _rt_collector_c
32 #define _rt_collector_c
33
34 #include <stdio.h>
35 #include <stdlib.h>
36 #include <netdb.h>
37 #include <errno.h>
38 #include <string.h>
39 #include <errno.h>
40 #include <fcntl.h>
41 #include <sys/types.h>
42 #include <sys/stat.h>
43 #include <unistd.h>
44
45 #include <RIC_message_types.h>          // needed for RMR/Rt Mgr msg types
46
47 // ---- local constants ------------------
48                                                                                 // flags
49 #define RTCFL_HAVE_UPDATE       0x01            // an update from RM was received
50
51 #define MAX_RTC_BUF     5 * 1024                        // max buffer size we'll expect is 4k, add some fudge room
52
53 // ------------------------------------------------------------------------------------------------
54
55 /*
56         Opens the vlevel control file if needed and reads the vlevel from it.
57         The file is rewound if already open so that external updates are captured.
58         The current level is returnd; 0 on error.
59
60         The environment variable (ENV_VERBOSE_FILE) is used to supply the file to
61         open and read. If missing, we will try /tmp/rmr.v.  We will try to open the file
62         on each call if not alrady open; this allows the value to be supplied after
63         start which helps debugging.
64
65         If close_file is true, then we will close the open vfd and return 0;
66 */
67 extern int refresh_vlevel( int close_file ) {
68         static int vfd = -1;
69
70         char*   eptr;
71         char    wbuf[128];                      // read buffer; MUST be 11 or greater
72         int             vlevel = 0;
73
74         if( close_file ) {
75                 if( vfd >= 0 ) {
76                         close( vfd );
77                         vfd = -1;
78                 }
79                 return 0;
80         }
81
82         if( vfd < 0 ) {                         // attempt to find/open on all calls if not open
83                 if( (eptr = getenv( ENV_VERBOSE_FILE )) != NULL ) {
84                         vfd = open( eptr, O_RDONLY );
85                 } else {
86                         vfd = open( "/tmp/rmr.v", O_RDONLY );
87                 }
88                 if( vfd < 0 ) {
89                         return 0;
90                 }
91         }
92
93         memset( wbuf, 0, sizeof( char ) * 11 );                 // ensure what we read will be nil terminated
94         if( lseek( vfd, 0, SEEK_SET ) == 0 && read( vfd, wbuf, 10 ) > 0 ) {
95                 vlevel = atoi( wbuf );
96         }
97
98         return vlevel;
99 }
100
101 /*
102         Loop forever (assuming we're running in a pthread reading the static table
103         every minute or so.
104 */
105 static void* rtc_file( void* vctx ) {
106         uta_ctx_t*      ctx;                                    // context user has -- where we pin the route table
107         char*   eptr;
108         int             vlevel = 0;                                     // how chatty we should be 0== no nattering allowed
109         char    wbuf[256];
110
111
112         if( (ctx = (uta_ctx_t *) vctx) == NULL ) {
113                 rmr_vlog( RMR_VL_CRIT, "rmr_rtc: internal mishap: context passed in was nil\n" );
114                 return NULL;
115         }
116
117         ctx->flags |= CFL_NO_RTACK;                             // no attempt to ack when reading from a file
118         while( 1 ) {
119                 vlevel = refresh_vlevel( 0 );
120                 read_static_rt( ctx, vlevel );                                          // refresh from the file
121
122                 if( ctx->shutdown != 0 ) {                                                      // allow for graceful termination and unit testing
123                         refresh_vlevel( 1 );                                                            // close the verbose file if open
124                         return NULL;
125                 }
126
127                 if( ctx->rtable_ready ) {
128                         sleep( 60 );
129                 } else {
130                         sleep( 1 );                                                                             // check every second until we have a good one
131                 }
132         }
133 }
134
135 /*
136         Rtc_parse_msg parses a single message from the route manager. We allow multiple, newline terminated,
137         records in each message; it is required that the last record in the message be complete (we do not
138         reconstruct records split over multiple messages).  For each record, we call the record parser
139         to parse and add the information to the table being built.
140
141         This function was broken from the main rtc() function in order to be able to unit test it. Without
142         this as a standalone funciton, it was impossible to simulate a message arriving on the RTC's private
143         context.
144
145         To reduce malloc/free cycles, we allocate a static work buffer and expand it when needed; in other
146         words, this is not thread safe but it shouldn't need to be.
147 */
148 static void rtc_parse_msg( uta_ctx_t *ctx, uta_ctx_t* pvt_cx, rmr_mbuf_t* msg, int vlevel,  int* flags ) {
149         static  unsigned char* pbuf = NULL;
150         static  int pbuf_size = 0;
151
152         unsigned char* payload;
153         unsigned char* curr;
154         unsigned char* nextr;
155         int mlen;
156
157         payload = msg->payload;
158         mlen = msg->len;                                        // usable bytes in the payload
159
160         if( DEBUG > 1 || (vlevel > 0) ) rmr_vlog( RMR_VL_DEBUG, "rmr_rtc: received rt message type=%d len=%d\n", msg->mtype, (int) mlen );
161         switch( msg->mtype ) {
162                 case RMRRM_TABLE_DATA:
163                         if( (*flags & RTCFL_HAVE_UPDATE) == 0 ) {
164                                 *flags |= RTCFL_HAVE_UPDATE;
165                                 rmr_vlog( RMR_VL_INFO, "message flow from route manager starts\n" );
166                         }
167
168                         if( pbuf_size <= mlen ) {
169                                 if( pbuf ) {
170                                         free( pbuf );
171                                 }
172                                 if( mlen < 512 ) {
173                                         pbuf_size = 1024;
174                                 } else {
175                                         pbuf_size = mlen * 2;
176                                 }
177                                 pbuf = (char *) malloc( sizeof( char ) * pbuf_size );
178                         }
179                         memcpy( pbuf, payload, mlen );
180                         pbuf[mlen] = 0;                                                                         // don't depend on sender making this a legit string
181                         if( vlevel > 1 ) {
182                                 rmr_vlog_force( RMR_VL_DEBUG, "rmr_rtc: rt message: (%s)\n", pbuf );
183                         }
184
185                         curr = pbuf;
186                         while( curr ) {                                                                         // loop over each record in the buffer
187                                 nextr = strchr( (char *) curr, '\n' );                  // allow multiple newline records, find end of current and mark
188
189                                 if( nextr ) {
190                                         *(nextr++) = 0;
191                                 }
192
193                                 if( vlevel > 1 ) {
194                                         rmr_vlog_force( RMR_VL_DEBUG, "rmr_rtc_parse_msg: snarf_fd=%d processing (%s)\n", ctx ? ctx->snarf_rt_fd : -99, curr );
195                                 }
196                                 parse_rt_rec( ctx, pvt_cx, curr, vlevel, msg );         // parse record and add to in progress table; ack using rts to msg
197
198                                 curr = nextr;
199                         }
200
201                         msg->len = 0;                           // force back into the listen loop
202                         break;
203
204                 default:
205                         rmr_vlog( RMR_VL_WARN, "rmr_rtc: invalid message type=%d len=%d\n", msg->mtype, (int) msg->len );
206                         break;
207         }
208 }
209
210 /*
211         Route Table Collector
212         A side thread which either attempts to connect and request a table
213         from the Route Manager, or opens a port and listens for Route Manager
214         to push table updates.
215
216         It may do other things along the way (latency measurements, alarms,
217         respond to RMR pings, etc.).
218
219         The behaviour with respect to listening for Route Manager updates vs
220         the initiation of the connection and sending a request depends on the
221         value of the ENV_RTG_ADDR (RMR_RTG_SVC)  environment variable. If
222         host:port, or IP:port, is given, then we assume that we make the connection
223         and send a request for the table (request mode).  If the variable is just
224         a port, then we assume Route Manager will connect and push updates (original
225         method).
226
227         If the variable is not defined, the default behaviour, in order to be
228         backwards compatable, depends on the presence of the ENV_CTL_PORT
229         (RMR_CTL_PORT) variable (new with the support for requesting a table).
230
231
232         ENV_CTL_PORT    ENV_RTG_ADDR    Behaviour
233         unset                   unset                   Open default CTL port (DEF_CTL_PORT) and
234                                                                         wait for Rt Mgr to push tables
235
236         set                             unset                   Use the default Rt Mgr wellknown addr
237                                                                         and port (DEF_RTG_WK_ADDR) to connect
238                                                                         and request a table. The control port
239                                                                         used is the value set by ENV_CTL_PORT.
240
241         unset                   set                             As described above. The default control
242                                                                         port (DEF_CTL_PORT) is used.
243
244         When we are running in request mode, then we will send the RMR message
245         RMRRM_REFRESH to this address (wormhole) as a request for the route manager
246         to send a new table. We will attempt to connect and send requests until
247         we have a table. Calls to rmr_ready() will report FALSE until a table is
248         loaded _unless_ a seed table was given.
249
250         Route table information is expected to arrive on RMR messages with type
251         RMRRM_TABLE_DATA.  There is NOT a specific message type for each possible
252         table record, so the payload is as it appears in the seed file or as
253         delivered in old versions.  It may take several RMRRM_TABLE_DATA messages
254         to completely supply a new table or table update. See the header for parse_rt_rec
255         in common for a description of possible message contents.
256
257         Buffers received from the route table generator can contain multiple newline terminated
258         records, but each buffer must be less than 4K in length, and the last record in a
259         buffer may NOT be split across buffers.
260
261         Other chores:
262         In addition to the primary task of getting, vetting, and installing a new route table, or
263         updates to the existing table, this thread will periodically cause the send counts for each
264         endpoint known to be written to standard error. The frequency is once every 180 seconds, and
265         more frequently if verbose mode (see ENV_VERBOSE_FILE) is > 0.
266 */
267 static void* rtc( void* vctx ) {
268         uta_ctx_t*      ctx;                                    // context user has -- where we pin the route table
269         uta_ctx_t*      pvt_cx;                                 // private context for session with rtg
270         rmr_mbuf_t*     msg = NULL;                             // message from rtg
271         char*   my_port;                                        // the port number that we will listen on (4561 has been the default for this)
272         char*   rtg_addr;                                       // host:port address of route table generator (route manager)
273         char*   daddr;                                          // duplicated rtg address string to parse/trash
274         size_t  buf_size;                                       // nng needs var pointer not just size?
275         int             i;
276         long    blabber = 0;                            // time of last blabber so we don't flood if rtg goes bad
277         int             cstate = -1;                            // connection state to rtg
278         int             state;                                          // processing state of some nng function
279         char*   tokens[128];
280         char    wbuf[128];
281         int             ntoks;
282         int             vlevel = 0;                                     // how chatty we should be 0== no nattering allowed
283         char*   eptr;
284         int             epfd = -1;                                      // fd for epoll so we can multi-task
285         struct  epoll_event events[1];          // list of events to give to epoll; we only have one we care about
286         struct  epoll_event epe;                        // event definition for event to listen to
287         int             count_delay = 30;                       // number of seconds between writing count info; initially every 30s
288         int             bump_freq = 0;                          // time at which we will bump count frequency to every 5 minutes
289         int             flags = 0;
290         int             rt_req_freq = DEF_RTREQ_FREQ;   // request frequency (sec) when wanting a new table
291         int             nxt_rt_req = 0;                                 // time of next request
292
293
294         if( (ctx = (uta_ctx_t *) vctx) == NULL ) {
295                 rmr_vlog( RMR_VL_CRIT, "rmr_rtc: internal mishap: context passed in was nil\n" );
296                 return NULL;
297         }
298
299         vlevel = refresh_vlevel( 0 );
300
301         if( (eptr = getenv( ENV_RTREQ_FREA )) != NULL ) {
302                 rt_req_freq = atoi( eptr );
303                 if( rt_req_freq < 1 || rt_req_freq > 300 ) {
304                         rt_req_freq = DEF_RTREQ_FREQ;
305                         rmr_vlog( RMR_VL_WARN, "rmr_rtc: RT request frequency (%d) out of range (1-300), using default (%d)\n", rt_req_freq, DEF_RTREQ_FREQ );
306                 }
307         }
308         rmr_vlog( RMR_VL_INFO, "rmr_rtc: RT request frequency set to: %d seconds", rt_req_freq );
309
310         ctx->flags |= CFL_NO_RTACK;                             // don't ack when reading from a file
311         read_static_rt( ctx, vlevel );                  // seed the route table if one provided
312         ctx->flags &= ~CFL_NO_RTACK;
313
314
315         my_port = getenv( ENV_CTL_PORT );                               // default port to listen on (likely 4561)
316         if( my_port == NULL || ! *my_port ) {                   // if undefined, then go with default
317                 my_port = DEF_CTL_PORT;
318                 daddr = DEF_CTL_PORT;                                           // backwards compat; if ctl port not hard defined, default is to listen
319         } else {
320                 daddr = DEF_RTG_WK_ADDR;                                        // if ctl port is defined, then default changes to connecting to well known RM addr
321         }
322
323         if( (rtg_addr = getenv( ENV_RTG_ADDR )) == NULL || ! *rtg_addr ) {              // undefined, use default set above
324                 rtg_addr = daddr;
325         }
326
327         daddr = strdup( rtg_addr );                                                                     // dup to destroy during parse
328
329         ntoks = uta_tokenise( daddr, tokens, 120, ':' );                        // should be host:ip of rt mgr (could be port only which we assume is old listen port)
330         switch( ntoks ) {
331                 case 0:                                                                 // should not happen, but prevent accidents and allow default to ignore additional tokens
332                         break;
333
334                 case 1:
335                         my_port = tokens[0];                    // just port -- assume backlevel environment where we just listen
336                         flags |= RTCFL_HAVE_UPDATE;             // prevent sending update reqests
337                         break;
338
339                 default:
340                         if( strcmp( tokens[0], "tcp" ) == 0 ) {                 // old school nng tcp:xxxx so we listen on xxx
341                                 flags |= RTCFL_HAVE_UPDATE;                                     // and signal not to try to request an update
342                                 my_port = tokens[1];
343                         } else {
344                                 // rtg_addr points at rt mgr address and my port set from env or default stands as is
345                         }
346                         break;
347         }
348
349         if( (pvt_cx = init( my_port, MAX_RTC_BUF, FL_NOTHREAD )) == NULL ) {                            // open a private context (no RT listener!)
350                 rmr_vlog( RMR_VL_CRIT, "rmr_rtc: unable to initialise listen port for RTG (pvt_cx)\n" );
351
352                 while( TRUE ) {                                                                                         // no listen port, just dump counts now and then
353                         sleep( count_delay );
354                         rt_epcounts( ctx->rtable, ctx->my_name );
355                 }
356
357                 return NULL;
358         }
359
360         ctx->rtg_whid = -1;
361
362         cycle_snarfed_rt( ctx );                                // cause the nrt to be opened
363
364         if( DEBUG ) rmr_vlog( RMR_VL_DEBUG, "rtc thread is running and listening; listening for rtg conns on %s\n", my_port );
365
366         bump_freq = time( NULL ) + 300;                         // after 5 minutes we decrease the count frequency
367         blabber = 0;
368         while( 1 ) {                                                                                                            // until the cows return, pigs fly, or somesuch event likely not to happen
369                 while( msg == NULL || msg->len <= 0 ) {                                                 // until we actually have something from the other side
370                         if( (flags & RTCFL_HAVE_UPDATE) == 0 && time( NULL ) >= nxt_rt_req ) {                  // no route table updated from rt mgr; request one
371                                 if( ctx->rtg_whid < 0 ) {
372                                         ctx->rtg_whid = rmr_wh_open( pvt_cx, rtg_addr );
373                                 }
374                                 send_update_req( pvt_cx, ctx );
375                                 nxt_rt_req = time( NULL ) + rt_req_freq;
376                         }
377
378                         msg = rmr_torcv_msg( pvt_cx, msg, 1000 );
379
380                         if( time( NULL ) > blabber  ) {
381                                 vlevel = refresh_vlevel( 0 );
382                                 blabber = time( NULL ) + count_delay;                           // set next time to blabber, then do so
383                                 if( blabber > bump_freq ) {
384                                         count_delay = 300;
385                                 }
386                                 if( vlevel >= 0 ) {                                                                             // allow it to be forced off with -n in verbose file
387                                         rt_epcounts( ctx->rtable, ctx->my_name );
388                                 }
389                         }
390
391                         if( ctx->shutdown != 0 ) {
392                                 break;                                                  // mostly for unit test, but allows a forced stop
393                         }
394
395                                                                                                 // extra housekeeping chores can be added here...
396                         alarm_if_drops( ctx, pvt_cx );          // send an alarm if message are dropping, clear if we set one and thtings are better
397                 }
398
399                 vlevel = refresh_vlevel( 0 );                   // ensure it's fresh when we get a message
400
401                 if( msg != NULL && msg->len > 0 ) {
402                         rtc_parse_msg( ctx, pvt_cx, msg, vlevel, &flags );
403                 }
404
405                 if( ctx->shutdown ) {           // mostly for testing, but allows user app to close us down if rmr_*() function sets this
406                         return NULL;
407                 }
408
409         }
410
411         return NULL;    // unreachable, but some compilers don't see that and complain.
412 }
413
414 #ifndef SI95_BUILD
415 // this is nng specific inas much as we allow raw (non-RMR) messages
416
417 /*
418         NOTE:   This is the original rtc code when we supported "raw" nano/nng messages
419                         from the route manger.  It is deprecated in favour of managing all RM-RMR
420                         communications via an RMR session.
421
422                         The rtc() function above is the new and preferred function regardless
423                         of transport.
424
425         -----------------------------------------------------------------------------------
426         Route Table Collector
427         A side thread which opens a socket and subscribes to a routing table generator.
428         It may do other things along the way (latency measurements?).
429
430         The pointer is a pointer to the context.
431
432         Listens for records from the route table generation publisher, expecting
433         one of the following, newline terminated, ASCII records:
434                 rte|msg-type||]name:port,name:port,...;name:port,...                    // route table entry with one or more groups of endpoints
435                 new|start                                                               // start of new table
436                 new|end                                                                 // end of new table; complete
437
438                 Name must be a host name which can be looked up via gethostbyname() (DNS).
439
440                 Multiple endpoints (name:port) may be given separated by a comma; an endpoint is selected using round robin
441                         for each message of the type that is sent.
442
443                 Multiple endpoint groups can be given as a comma separated list of endpoints, separated by semicolons:
444                                 group1n1:port,group1n2:port,group1n3:port;group2n1:port,group2n2:port
445
446                 If multiple groups are given, when send() is called for the cooresponding message type,
447                 the message will be sent to one endpoint in each group.
448
449                 msg-type is the numeric message type (e.g. 102). If it is given as n,name then it is assumed
450                 that the entry applies only to the instance running with the hostname 'name.'
451
452         Buffers received from the route table generator can contain multiple newline terminated
453         records, but each buffer must be less than 4K in length, and the last record in a
454         buffer may NOT be split across buffers.
455
456         Other chores:
457         In addition to the primary task of getting, vetting, and installing a new route table, or
458         updates to the existing table, this thread will periodically cause the send counts for each
459         endpoint known to be written to standard error. The frequency is once every 180 seconds, and
460         more frequently if verbose mode (see ENV_VERBOSE_FILE) is > 0.
461 */
462 static void* raw_rtc( void* vctx ) {
463         uta_ctx_t*      ctx;                                    // context user has -- where we pin the route table
464         uta_ctx_t*      pvt_cx;                                 // private context for session with rtg
465         rmr_mbuf_t*     msg = NULL;                             // message from rtg
466         char*   payload;                                        // payload in the message
467         size_t  mlen;
468         char*   port;                                           // a port number we listen/connect to
469         char*   fport;                                          // pointer to the real buffer to free
470         size_t  buf_size;                                       // nng needs var pointer not just size?
471         char*   nextr;                                          // pointer at next record in the message
472         char*   curr;                                           // current record
473         int             i;
474         long    blabber = 0;                            // time of last blabber so we don't flood if rtg goes bad
475         int             cstate = -1;                            // connection state to rtg
476         int             state;                                          // processing state of some nng function
477         char*   tokens[128];
478         char    wbuf[128];
479         char*   pbuf = NULL;
480         int             pbuf_size = 0;                          // number allocated in pbuf
481         int             ntoks;
482         int             raw_interface = 1;                      // rtg is using raw NNG/Nano not RMr to send updates
483         int             vlevel = 0;                                     // how chatty we should be 0== no nattering allowed
484         char*   eptr;
485         int             epfd = -1;                                      // fd for epoll so we can multi-task
486         struct  epoll_event events[1];          // list of events to give to epoll; we only have one we care about
487         struct  epoll_event epe;                        // event definition for event to listen to
488         int             rcv_fd = -1;                            // pollable file des from NNG to use for timeout
489         int             count_delay = 30;                       // number of seconds between writing count info; initially every 30s
490         int             bump_freq = 0;                          // time at which we will bump count frequency to every 5 minutes
491
492
493         if( (ctx = (uta_ctx_t *) vctx) == NULL ) {
494                 rmr_vlog( RMR_VL_CRIT, "rmr_rtc: internal mishap: context passed in was nil\n" );
495                 return NULL;
496         }
497
498         vlevel = refresh_vlevel( 0 );
499         read_static_rt( ctx, vlevel );                                          // seed the route table if one provided
500
501         if( (port = getenv( ENV_RTG_PORT )) == NULL || ! *port ) {              // port we need to open to listen for RTG connections
502                 port = strdup( DEF_RTG_PORT );
503         } else {
504                 port = strdup( port );
505         }
506
507         fport = port;           // must hold to free
508
509         ntoks = uta_tokenise( port, tokens, 120, ':' );                 // assume tcp:port, but it could be port or old style host:port
510         switch( ntoks ) {
511                 case 1:
512                                 port = tokens[0];                       // just the port
513                                 break;
514
515                 case 2:
516                                 port = tokens[1];                       // tcp:port or :port
517                                 break;
518
519                 default:
520                                 port = DEF_RTG_PORT;            // this shouldn't happen, but parnioia is good
521                                 break;
522         }
523
524         if( (pvt_cx = init( port, MAX_RTG_MSG_SZ, FL_NOTHREAD )) == NULL ) {                            // open a private context
525                 rmr_vlog( RMR_VL_CRIT, "rmr_rtc: unable to initialise listen port for RTG (pvt_cx)\n" );
526
527                 while( TRUE ) {                                                                                         // no listen port, just dump counts now and then
528                         sleep( count_delay );
529                         rt_epcounts( ctx->rtable, ctx->my_name );
530                 }
531
532                 free( fport );                                  // parinoid free and return
533                 return NULL;
534         }
535
536         if( (rcv_fd = rmr_get_rcvfd( pvt_cx )) >= 0 ) {            // get the epoll fd for the rtg socket
537                 if( rcv_fd < 0 ) {
538                         rmr_vlog( RMR_VL_WARN, "cannot get epoll fd for rtg session; stats will generate only after update from rt manager\n" );
539                 } else {
540                         if( (epfd = epoll_create1( 0 )) < 0 ) {
541                                 rmr_vlog( RMR_VL_WARN, "stats will generate only after rt manager update; unable to create epoll fd for rtg session: %s\n", strerror( errno ) );
542                                 rcv_fd = -1;
543                         } else {
544                                 epe.events = EPOLLIN;
545                                 epe.data.fd = rcv_fd;
546
547                                 if( epoll_ctl( epfd, EPOLL_CTL_ADD, rcv_fd, &epe ) != 0 )  {
548                                         rmr_vlog( RMR_VL_WARN, "stats will generate only after rt manager update; unable to init epoll_ctl: %s\n", strerror( errno ) );
549                                         rcv_fd = -1;
550                                 }
551                         }
552                 }
553         }
554
555         if( DEBUG ) rmr_vlog( RMR_VL_DEBUG, "rtc thread is running and listening; listening for rtg conns on %s\n", port );
556         free( fport );
557
558         // future:  if we need to register with the rtg, then build a message and send it through a wormhole here
559
560         bump_freq = time( NULL ) + 300;                         // after 5 minutes we decrease the count frequency
561         blabber = 0;
562         while( 1 ) {                    // until the cows return, pigs fly, or somesuch event likely not to happen
563                 while( msg == NULL || msg->len <= 0 ) {                                                 // until we actually have something from the other side
564                         if( rcv_fd < 0 || epoll_wait( epfd, events, 1, 1000 ) > 0 )  {  // skip epoll if init failed, else block for max 1 sec
565                                 if( raw_interface ) {
566                                         msg = (rmr_mbuf_t *) rcv_payload( pvt_cx, msg );                // receive from non-RMr sender
567                                 } else {
568                                         msg = rmr_rcv_msg( pvt_cx, msg );               // receive from an RMr sender
569                                 }
570                         } else {                                                                                                        // no msg, do extra tasks
571                                 if( msg != NULL ) {                                                                             // if we were working with a message; ensure no len
572                                         msg->len = 0;
573                                         msg->state = RMR_ERR_TIMEOUT;
574                                 }
575                         }
576
577                         if( time( NULL ) > blabber  ) {
578                                 vlevel = refresh_vlevel( 0 );
579                                 if( vlevel >= 0 ) {                                                                             // allow it to be forced off with -n in verbose file
580                                         blabber = time( NULL ) + count_delay;                           // set next time to blabber, then do so
581                                         if( blabber > bump_freq ) {
582                                                 count_delay = 300;
583                                         }
584                                         rt_epcounts( ctx->rtable, ctx->my_name );
585                                 }
586                         }
587
588                         alarm_if_drops( ctx );                          // send an alarm if message are dropping, clear if we set one and thtings are better
589                 }
590
591                 vlevel = refresh_vlevel( 0 );                   // ensure it's fresh when we get a message
592
593                 if( msg != NULL && msg->len > 0 ) {
594                         payload = msg->payload;
595                         mlen = msg->len;                                        // usable bytes in the payload
596                         if( vlevel > 1 ) {
597                                 rmr_vlog_force( RMR_VL_DEBUG, "rmr_rtc: received rt message; %d bytes (%s)\n", (int) mlen, msg->payload );
598                         } else {
599                                 if( DEBUG > 1 || (vlevel > 0) ) rmr_vlog_force( RMR_VL_DEBUG, "rmr_rtc: received rt message; %d bytes\n", (int) mlen );
600                         }
601
602                         if( pbuf_size <= mlen ) {
603                                 if( pbuf ) {
604                                         free( pbuf );
605                                 }
606                                 if( mlen < 512 ) {
607                                         pbuf_size = 512;
608                                 } else {
609                                         pbuf_size = mlen * 2;
610                                 }
611                                 pbuf = (char *) malloc( sizeof( char ) * pbuf_size );
612                         }
613                         memcpy( pbuf, payload, mlen );
614                         pbuf[mlen] = 0;                                                                         // don't depend on sender making this a legit string
615
616                         curr = pbuf;
617                         while( curr ) {                                                         // loop over each record in the buffer
618                                 nextr = strchr( curr, '\n' );                   // allow multiple newline records, find end of current and mark
619
620                                 if( nextr ) {
621                                         *(nextr++) = 0;
622                                 }
623
624                                 if( vlevel > 1 ) {
625                                         rmr_vlog_force( RMR_VL_DEBUG, "rmr_rtc: processing (%s)\n", curr );
626                                 }
627                                 if( raw_interface ) {
628                                         parse_rt_rec( ctx, NULL, curr, vlevel, NULL );          // nil pvt to parser as we can't ack messages
629                                 } else {
630                                         parse_rt_rec( ctx, pvt_cx, curr, vlevel, msg );         // parse record and add to in progress table
631                                 }
632
633                                 curr = nextr;
634                         }
635
636                         if( ctx->shutdown ) {           // mostly for testing, but allows user app to close us down if rmr_*() function sets this
637                                 break;
638                         }
639
640                         msg->len = 0;                           // force back into the listen loop
641                 }
642         }
643
644         return NULL;    // unreachable, but some compilers don't see that and complain.
645 }
646 #endif
647
648
649 #endif