rbnewt 0.0.3 → 0.0.4

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 2fc9c96699a8b2aee42b4943b41863e7920a55f2
-  data.tar.gz: dafa4acf3efd038b7795ed6f12f303041a76aaa2
+  metadata.gz: 0c26cde6bba16893211200d19f988832981f1d90
+  data.tar.gz: f90478c6a6038072b168f909c53bd5f337aadffa
 SHA512:
-  metadata.gz: c26d04528ac759b858a67f3f595fa94670616d5c871137acb19c457278619f07ff912eb244febf417b6b33ce6b55e340a3ea66b860ca002a66ae890df04cf350
-  data.tar.gz: 164bcf5a890544b1a1daf035ab084e2ec91486257027c0cbfe3f6409c21538786615bf8dc1d6392f3ee71fc7205f9bb3c8085357b310546c5310dc2c88280d71
+  metadata.gz: 297dc08ec4d1d167659f0fd8f1f144898d100ddefa8a51a54f2d323177419bcbfca58776b8b85cd213478fd262141acc9be04c218319ba9c320cb94dbddf073b
+  data.tar.gz: 86258abb18f69c7fc2d55c28a6897a9e3b663716d2631ec7c999fbc1a47162c188c48d4e3e223e7189c3c53a97cc8ecc9d5a6045114783d22c03e85227308885

data/Makefile

@@ -0,0 +1,259 @@
+
+SHELL = /bin/sh
+
+# V=0 quiet, V=1 verbose.  other values don't work.
+V = 0
+Q1 = $(V:1=)
+Q = $(Q1:0=@)
+ECHO1 = $(V:1=@:)
+ECHO = $(ECHO1:0=@echo)
+NULLCMD = :
+
+#### Start of system configuration section. ####
+
+srcdir = src
+topdir = /home/vagrant/.rbenv/versions/2.2.2/include/ruby-2.2.0
+hdrdir = $(topdir)
+arch_hdrdir = /home/vagrant/.rbenv/versions/2.2.2/include/ruby-2.2.0/x86_64-linux
+PATH_SEPARATOR = :
+VPATH = $(srcdir):$(arch_hdrdir)/ruby:$(hdrdir)/ruby
+prefix = $(DESTDIR)/home/vagrant/.rbenv/versions/2.2.2
+rubysitearchprefix = $(rubylibprefix)/$(sitearch)
+rubyarchprefix = $(rubylibprefix)/$(arch)
+rubylibprefix = $(libdir)/$(RUBY_BASE_NAME)
+exec_prefix = $(prefix)
+vendorarchhdrdir = $(vendorhdrdir)/$(sitearch)
+sitearchhdrdir = $(sitehdrdir)/$(sitearch)
+rubyarchhdrdir = $(rubyhdrdir)/$(arch)
+vendorhdrdir = $(rubyhdrdir)/vendor_ruby
+sitehdrdir = $(rubyhdrdir)/site_ruby
+rubyhdrdir = $(includedir)/$(RUBY_VERSION_NAME)
+vendorarchdir = $(vendorlibdir)/$(sitearch)
+vendorlibdir = $(vendordir)/$(ruby_version)
+vendordir = $(rubylibprefix)/vendor_ruby
+sitearchdir = $(sitelibdir)/$(sitearch)
+sitelibdir = $(sitedir)/$(ruby_version)
+sitedir = $(rubylibprefix)/site_ruby
+rubyarchdir = $(rubylibdir)/$(arch)
+rubylibdir = $(rubylibprefix)/$(ruby_version)
+sitearchincludedir = $(includedir)/$(sitearch)
+archincludedir = $(includedir)/$(arch)
+sitearchlibdir = $(libdir)/$(sitearch)
+archlibdir = $(libdir)/$(arch)
+ridir = $(datarootdir)/$(RI_BASE_NAME)
+mandir = $(datarootdir)/man
+localedir = $(datarootdir)/locale
+libdir = $(exec_prefix)/lib
+psdir = $(docdir)
+pdfdir = $(docdir)
+dvidir = $(docdir)
+htmldir = $(docdir)
+infodir = $(datarootdir)/info
+docdir = $(datarootdir)/doc/$(PACKAGE)
+oldincludedir = $(DESTDIR)/usr/include
+includedir = $(prefix)/include
+localstatedir = $(prefix)/var
+sharedstatedir = $(prefix)/com
+sysconfdir = $(prefix)/etc
+datadir = $(datarootdir)
+datarootdir = $(prefix)/share
+libexecdir = $(exec_prefix)/libexec
+sbindir = $(exec_prefix)/sbin
+bindir = $(exec_prefix)/bin
+archdir = $(rubyarchdir)
+
+
+CC = gcc
+CXX = g++
+LIBRUBY = $(LIBRUBY_A)
+LIBRUBY_A = lib$(RUBY_SO_NAME)-static.a
+LIBRUBYARG_SHARED = -Wl,-R$(libdir) -L$(libdir) 
+LIBRUBYARG_STATIC = -Wl,-R$(libdir) -L$(libdir) -l$(RUBY_SO_NAME)-static
+empty =
+OUTFLAG = -o $(empty)
+COUTFLAG = -o $(empty)
+
+RUBY_EXTCONF_H = 
+cflags   =  $(optflags) $(debugflags) $(warnflags)
+optflags = -O3 -fno-fast-math
+debugflags = -ggdb3
+warnflags = -Wall -Wextra -Wno-unused-parameter -Wno-parentheses -Wno-long-long -Wno-missing-field-initializers -Wunused-variable -Wpointer-arith -Wwrite-strings -Wdeclaration-after-statement -Wimplicit-function-declaration -Wdeprecated-declarations -Wno-packed-bitfield-compat
+CCDLFLAGS = -fPIC
+CFLAGS   = $(CCDLFLAGS) -I./include $(ARCH_FLAG)
+INCFLAGS = -I. -I$(arch_hdrdir) -I$(hdrdir)/ruby/backward -I$(hdrdir) -I$(srcdir)
+DEFS     = 
+CPPFLAGS = -DHAVE_STOMP_STOMP_H -DHAVE_PTHREAD_H -I/home/vagrant/.rbenv/versions/2.2.2/include  $(DEFS) $(cppflags)
+CXXFLAGS = $(CCDLFLAGS) $(cxxflags) $(ARCH_FLAG)
+ldflags  = -L. -L/home/vagrant/.rbenv/versions/2.2.2/lib  -fstack-protector -rdynamic -Wl,-export-dynamic
+dldflags =  
+ARCH_FLAG = 
+DLDFLAGS = $(ldflags) $(dldflags) $(ARCH_FLAG)
+LDSHARED = $(CC) -shared
+LDSHAREDXX = $(CXX) -shared
+AR = ar
+EXEEXT = 
+
+RUBY_INSTALL_NAME = $(RUBY_BASE_NAME)
+RUBY_SO_NAME = ruby
+RUBYW_INSTALL_NAME = 
+RUBY_VERSION_NAME = $(RUBY_BASE_NAME)-$(ruby_version)
+RUBYW_BASE_NAME = rubyw
+RUBY_BASE_NAME = ruby
+
+arch = x86_64-linux
+sitearch = $(arch)
+ruby_version = 2.2.0
+ruby = $(bindir)/$(RUBY_BASE_NAME)
+RUBY = $(ruby)
+ruby_headers = $(hdrdir)/ruby.h $(hdrdir)/ruby/ruby.h $(hdrdir)/ruby/defines.h $(hdrdir)/ruby/missing.h $(hdrdir)/ruby/intern.h $(hdrdir)/ruby/st.h $(hdrdir)/ruby/subst.h $(arch_hdrdir)/ruby/config.h
+
+RM = rm -f
+RM_RF = $(RUBY) -run -e rm -- -rf
+RMDIRS = rmdir --ignore-fail-on-non-empty -p
+MAKEDIRS = /bin/mkdir -p
+INSTALL = /usr/bin/install -c
+INSTALL_PROG = $(INSTALL) -m 0755
+INSTALL_DATA = $(INSTALL) -m 644
+COPY = cp
+TOUCH = exit >
+
+#### End of system configuration section. ####
+
+preload = 
+
+libpath = . $(libdir)
+LIBPATH =  -L. -L$(libdir) -Wl,-R$(libdir)
+DEFFILE = 
+
+CLEANFILES = mkmf.log
+DISTCLEANFILES = 
+DISTCLEANDIRS = 
+
+extout = 
+extout_prefix = 
+target_prefix = 
+LOCAL_LIBS = 
+LIBS =  -lpthread -lstomp -lpthread -lstomp -lpthread -ldl -lcrypt -lm   -lc
+ORIG_SRCS = stomp.c rbframe.c rbnewt.c
+SRCS = $(ORIG_SRCS) 
+OBJS = stomp.o rbframe.o rbnewt.o
+HDRS = 
+TARGET = rbnewt
+TARGET_NAME = rbnewt
+TARGET_ENTRY = Init_$(TARGET_NAME)
+DLLIB = $(TARGET).so
+EXTSTATIC = 
+STATIC_LIB = 
+
+TIMESTAMP_DIR = .
+BINDIR        = $(bindir)
+RUBYCOMMONDIR = $(sitedir)$(target_prefix)
+RUBYLIBDIR    = $(sitelibdir)$(target_prefix)
+RUBYARCHDIR   = $(sitearchdir)$(target_prefix)
+HDRDIR        = $(rubyhdrdir)/ruby$(target_prefix)
+ARCHHDRDIR    = $(rubyhdrdir)/$(arch)/ruby$(target_prefix)
+
+TARGET_SO     = $(DLLIB)
+CLEANLIBS     = $(TARGET).so 
+CLEANOBJS     = *.o  *.bak
+
+all:    $(DLLIB)
+static: $(STATIC_LIB)
+.PHONY: all install static install-so install-rb
+.PHONY: clean clean-so clean-static clean-rb
+
+clean-static::
+clean-rb-default::
+clean-rb::
+clean-so::
+clean: clean-so clean-static clean-rb-default clean-rb
+		-$(Q)$(RM) $(CLEANLIBS) $(CLEANOBJS) $(CLEANFILES) .*.time
+
+distclean-rb-default::
+distclean-rb::
+distclean-so::
+distclean-static::
+distclean: clean distclean-so distclean-static distclean-rb-default distclean-rb
+		-$(Q)$(RM) Makefile $(RUBY_EXTCONF_H) conftest.* mkmf.log
+		-$(Q)$(RM) core ruby$(EXEEXT) *~ $(DISTCLEANFILES)
+		-$(Q)$(RMDIRS) $(DISTCLEANDIRS) 2> /dev/null || true
+
+realclean: distclean
+install: install-so install-rb
+
+install-so: $(DLLIB) $(TIMESTAMP_DIR)/.RUBYARCHDIR.time
+	$(INSTALL_PROG) $(DLLIB) $(RUBYARCHDIR)
+clean-static::
+	-$(Q)$(RM) $(STATIC_LIB)
+install-rb: pre-install-rb install-rb-default
+install-rb-default: pre-install-rb-default
+pre-install-rb: Makefile
+pre-install-rb-default: Makefile
+pre-install-rb-default:
+	@$(NULLCMD)
+$(TIMESTAMP_DIR)/.RUBYARCHDIR.time:
+	$(Q) $(MAKEDIRS) $(@D) $(RUBYARCHDIR)
+	$(Q) $(TOUCH) $@
+
+site-install: site-install-so site-install-rb
+site-install-so: install-so
+site-install-rb: install-rb
+
+.SUFFIXES: .c .m .cc .mm .cxx .cpp .o .S
+
+.cc.o:
+	$(ECHO) compiling $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
+
+.cc.S:
+	$(ECHO) translating $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -S $<
+
+.mm.o:
+	$(ECHO) compiling $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
+
+.mm.S:
+	$(ECHO) translating $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -S $<
+
+.cxx.o:
+	$(ECHO) compiling $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
+
+.cxx.S:
+	$(ECHO) translating $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -S $<
+
+.cpp.o:
+	$(ECHO) compiling $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -c $<
+
+.cpp.S:
+	$(ECHO) translating $(<)
+	$(Q) $(CXX) $(INCFLAGS) $(CPPFLAGS) $(CXXFLAGS) $(COUTFLAG)$@ -S $<
+
+.c.o:
+	$(ECHO) compiling $(<)
+	$(Q) $(CC) $(INCFLAGS) $(CPPFLAGS) $(CFLAGS) $(COUTFLAG)$@ -c $<
+
+.c.S:
+	$(ECHO) translating $(<)
+	$(Q) $(CC) $(INCFLAGS) $(CPPFLAGS) $(CFLAGS) $(COUTFLAG)$@ -S $<
+
+.m.o:
+	$(ECHO) compiling $(<)
+	$(Q) $(CC) $(INCFLAGS) $(CPPFLAGS) $(CFLAGS) $(COUTFLAG)$@ -c $<
+
+.m.S:
+	$(ECHO) translating $(<)
+	$(Q) $(CC) $(INCFLAGS) $(CPPFLAGS) $(CFLAGS) $(COUTFLAG)$@ -S $<
+
+$(DLLIB): $(OBJS) Makefile
+	$(ECHO) linking shared-object $(DLLIB)
+	-$(Q)$(RM) $(@)
+	$(Q) $(LDSHARED) -o $@ $(OBJS) $(LIBPATH) $(DLDFLAGS) $(LOCAL_LIBS) $(LIBS)
+
+
+
+$(OBJS): $(HDRS) $(ruby_headers)

data/include/newt/rbnewt.h

@@ -0,0 +1,16 @@
+#ifndef __NEWT_RBNEWT_H__
+#define __NEWT_RBNEWT_H__
+
+#include <stomp/stomp.h>
+#include <ruby/ruby.h>
+
+/* internal data structure to share in the session */
+typedef struct rbnewt_context_t {
+  VALUE self;
+} rbnewt_context_t;
+
+void newt_stomp_callback_connected(stomp_session_t *, void *, void *);
+void newt_stomp_callback_message(stomp_session_t *, void *, void *);
+void newt_stomp_callback_error(stomp_session_t *, void *, void *);
+
+#endif

data/src/rbnewt.c

@@ -1,9 +1,58 @@
-#include <ruby.h>
+#include <ruby/ruby.h>
+#include <ruby/intern.h>
 #include <assert.h>
 #include <stdlib.h>
-#include <pthread.h>
+#include <string.h>
 #include <stomp/stomp.h>
+
 #include <newt/stomp.h>
+#include <newt/rbnewt.h>
+
+static VALUE get_headers(struct stomp_ctx_message *ctx) {
+  VALUE ret;
+
+  assert(ctx != NULL);
+
+  // XXX no implementation
+  ret = Qnil;
+
+  return ret;
+}
+
+static VALUE get_body(struct stomp_ctx_message *ctx) {
+  VALUE ret;
+
+  assert(ctx != NULL);
+
+  // XXX no implementation
+  ret = Qnil;
+
+  return ret;
+}
+
+void newt_stomp_callback_connected(stomp_session_t *s, void *callback_ctx, void *session_ctx) {
+  rbnewt_context_t *rbnewt_ctx = (rbnewt_context_t *)s->ctx;
+
+  assert(rbnewt_ctx != NULL);
+
+  //VALUE kls = rb_obj_class(rbnewt_ctx->self);
+  if(rb_respond_to(rbnewt_ctx->self, rb_intern("callback_connected"))) {
+    VALUE header = get_headers((struct stomp_ctx_message *)callback_ctx);
+    VALUE body = get_body((struct stomp_ctx_message *)callback_ctx);
+
+    rb_funcall(rbnewt_ctx->self, rb_intern("callback_connected"), 2, header, body);
+  }
+
+  if(rb_block_given_p()) {
+    rb_yield(Qnil);
+  }
+}
+void newt_stomp_callback_message(stomp_session_t *s, void *callback_ctx, void *session_ctx) {
+  // nope
+}
+void newt_stomp_callback_error(stomp_session_t *s, void *callback_ctx, void *session_ctx) {
+  // nope
+}
 
 static char *get_str_from_hash(VALUE hash, char *key) {
   assert(TYPE(hash) == T_HASH);
@@ -27,22 +76,11 @@ static int get_int_from_hash(VALUE hash, char *key) {
   return -1;
 }
 
-VALUE newt_stomp_close(VALUE self) {
-  stomp_session_t *session;
-
-  Data_Get_Struct(self, stomp_session_t, session);
-
-  if(cnewt_stomp_close(session) == RET_SUCCESS) {
-    return self;
-  }
-
-  return Qnil;
-}
-
-VALUE newt_stomp_initialize(int argc, VALUE *argv, VALUE self) {
+static VALUE newt_stomp_initialize(int argc, VALUE *argv, VALUE self) {
   stomp_session_t *session;
   VALUE opts;
   char *server, *userid, *passwd, *port;
+  rbnewt_context_t *context;
 
   rb_scan_args(argc, argv, "01", &opts);
 
@@ -58,12 +96,16 @@ VALUE newt_stomp_initialize(int argc, VALUE *argv, VALUE self) {
     port   = get_str_from_hash(opts, NEWT_STOMP_KEY_PORT);
   }
 
-  //set default values
+  // set default values
   if(server == NULL) server = NEWT_STOMP_DEFAULT_SERVER;
   if(userid == NULL) userid = NEWT_STOMP_DEFAULT_USERID;
   if(passwd == NULL) passwd = NEWT_STOMP_DEFAULT_PASSWD;
   if(port == NULL)   port   = NEWT_STOMP_DEFAULT_PORT;
 
+  // set self object to context
+  context = (rbnewt_context_t *)session->ctx;
+  context->self = self;
+
   if(cnewt_stomp_initialize(session, server, port, userid, passwd) != RET_SUCCESS) {
     printf("[warning] failed to connect server\n");
   }
@@ -71,17 +113,78 @@ VALUE newt_stomp_initialize(int argc, VALUE *argv, VALUE self) {
   return self;
 }
 
+static VALUE newt_stomp_send(int argc, VALUE *argv, VALUE self) {
+  stomp_session_t *session;
+  VALUE rb_dest, rb_data, rb_opts, rb_headers;
+  int header_len = 1;
+
+  // initialize each rb values
+  rb_headers = Qnil;
+  rb_scan_args(argc, argv, "21", &rb_dest, &rb_data, &rb_opts);
+
+  Data_Get_Struct(self, stomp_session_t, session);
+
+  char *body = StringValuePtr(rb_data);
+
+  if(! NIL_P(rb_opts)) {
+    assert(TYPE(rb_opts) == T_HASH);
+
+    VALUE rb_headers = rb_funcall(rb_opts, rb_intern("to_a"), 0);
+
+    assert(TYPE(rb_headers) == T_ARRAY);
+
+    header_len += RARRAY_LEN(rb_headers);
+  }
+
+  // making headers
+  struct stomp_hdr *headers = (struct stomp_hdr*)malloc(sizeof(struct stomp_hdr) * header_len);
+  headers[0].key = "destination";
+  headers[0].val = StringValuePtr(rb_dest);
+  int i;
+  for(i=1; i<header_len; i++) {
+    VALUE entry = rb_ary_entry(rb_opts, i);
+
+    VALUE key = rb_ary_entry(entry, 0);
+    VALUE val = rb_ary_entry(entry, 1);
+
+    headers[i].key = StringValueCStr(key);
+    headers[i].val = StringValueCStr(val);
+  }
+
+  stomp_send(session, header_len, headers, body, strlen(body));
+
+  free(headers);
+
+  return self;
+}
+
+static VALUE newt_stomp_receiving(VALUE self) {
+  stomp_session_t *session;
+
+  Data_Get_Struct(self, stomp_session_t, session);
+
+  cnewt_stomp_start(session);
+
+  return Qnil;
+}
+
+static void context_free(void *ptr) {
+  stomp_session_t *session = (stomp_session_t *)ptr;
+
+  stomp_session_free(session);
+}
+
 static VALUE newt_stomp_alloc(VALUE klass) {
   stomp_session_t *session;
-  pthread_t *thread_id;
+  rbnewt_context_t *context;
   VALUE ret = Qnil;
 
-  thread_id = (pthread_t *)malloc(sizeof(pthread_t));
-  assert(thread_id != NULL);
+  context = (rbnewt_context_t *)malloc(sizeof(rbnewt_context_t));
+  assert(context != NULL);
 
-  session = stomp_session_new(thread_id);
+  session = stomp_session_new(context);
   if(session != NULL) {
-    ret = rb_data_object_alloc(klass, session, 0, NULL);
+    ret = rb_data_object_alloc(klass, session, 0, context_free);
   }
 
   return ret;
@@ -95,5 +198,6 @@ void Init_rbnewt(void) {
 
   rb_define_alloc_func(stomp_kls, newt_stomp_alloc);
   rb_define_method(stomp_kls, "initialize", newt_stomp_initialize, -1);
-  rb_define_method(stomp_kls, "close", newt_stomp_close, 0);
+  rb_define_method(stomp_kls, "send", newt_stomp_send, -1);
+  rb_define_method(stomp_kls, "receiving", newt_stomp_receiving, 0);
 }

data/src/stomp.c

@@ -1,15 +1,12 @@
 #include <stomp/stomp.h>
+
+#include <newt/rbnewt.h>
 #include <newt/common.h>
 #include <newt/stomp.h>
-#include <pthread.h>
-
-static void *thread_stomp(void *data) {
-  stomp_session_t *session = (stomp_session_t *)data;
 
+void cnewt_stomp_start(stomp_session_t *session) {
   //here is main-loop
   stomp_run(session);
-
-  stomp_session_free(session);
 }
 
 int cnewt_stomp_initialize(stomp_session_t *session, char *server, char *port, char *userid, char *passwd) {
@@ -18,29 +15,14 @@ int cnewt_stomp_initialize(stomp_session_t *session, char *server, char *port, c
     {"passcode", passwd},
   };
   int ret = RET_ERROR;
-  pthread_t *thread_id = (pthread_t *)session->ctx;
+  rbnewt_context_t *context = (rbnewt_context_t *)session->ctx;
 
-  if(thread_id != NULL) {
+  if(context != NULL) {
     stomp_connect(session, server, port, 2, connection_headers);
 
-    pthread_create(thread_id, NULL, thread_stomp, session);
-
-    ret = RET_SUCCESS;
-  }
-
-  return ret;
-}
-
-int cnewt_stomp_close(stomp_session_t *session) {
-  pthread_t *thread_id = (pthread_t *)session->ctx;
-  const struct stomp_hdr disconnect_header[] = {{0}};
-  int ret = RET_ERROR;
-
-  if(thread_id != NULL) {
-    // set flag to escape stomp mainloop
-    session->run = 0;
-
-    pthread_join(*thread_id, NULL);
+    stomp_callback_set(session, SCB_CONNECTED, newt_stomp_callback_connected);
+    stomp_callback_set(session, SCB_MESSAGE, newt_stomp_callback_message);
+    stomp_callback_set(session, SCB_ERROR, newt_stomp_callback_error);
 
     ret = RET_SUCCESS;
   }

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: rbnewt
 version: !ruby/object:Gem::Version
-  version: 0.0.3
+  version: 0.0.4
 platform: ruby
 authors:
 - Hiroyasu OHYAMA
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2016-06-01 00:00:00.000000000 Z
+date: 2016-06-04 00:00:00.000000000 Z
 dependencies: []
 description: This aims to to be the fastest Ruby client for NewtMQ which is an implementation
   of STOMP server.
@@ -19,8 +19,10 @@ extensions:
 - extconf.rb
 extra_rdoc_files: []
 files:
+- Makefile
 - extconf.rb
 - include/newt/common.h
+- include/newt/rbnewt.h
 - include/newt/stomp.h
 - src/rbnewt.c
 - src/stomp.c