+static int tpem_accept( int socket, struct sockaddr *restrict address, socklen_t *restrict address_len) {
+ return tpem_accept_fd;
+}
+
+/*
+ Emulate a select. If tpem_sel_ef is set, then the error fd set for the fd is set to true.
+ If sel_woudl_block is set, then the select returns blocking
+*/
+static int tpem_select( int fd_count, fd_set* rf, fd_set* wf, fd_set* ef, void* time ) {
+ fprintf( stderr, "<SYSTEM> select returns %d (1==no-block)\n", tpem_sel_block ? -1 : 1 );
+
+ if( tpem_sel_block ) {
+ return -1;
+ }
+
+ if( tpem_sel_ef >= 0 ) {
+ FD_SET( tpem_sel_ef, ef );
+ } else {
+ FD_ZERO( ef );
+ }
+
+ return 1;
+}
+
+/*
+ If tpem_send_err is set, we return less than count;
+*/
+static int tpem_send( int fd, void* buf, int count, int flags ) {
+ errno = tpem_send_err;
+
+ fprintf( stderr, "<SYSTEM> send on fd=%d for %d bytes ret=%d\n", fd, count, tpem_send_err ? -1 : count );
+ return tpem_send_err ? -1 : count;
+}
+
+
+// ---------------------------------------------------------------------------------------
+