Fixed to_s for Binary terms

extconf.rb

@@ -12,7 +12,7 @@
 lib_dir = ei_dir + '/lib/'
 
 $LDFLAGS << " -L#{lib_dir} -lei -lerl_interface"
-$CPPFLAGS << ' -D_REENTRANT -g'
+$CPPFLAGS << ' -D_REENTRANT -g -g3 -gdwarf-2'
 
 if find_header('ei.h', include_dir)
   create_makefile(extension_name, src_dir)

src/erlix_helper.c

@@ -94,8 +94,9 @@ void fill_string(VALUE *str,ETERM *ep){
       rb_funcall(*str,concat,1,rb_str_new2("\'"));
     }
   }else if(ERL_IS_PID(ep)){
-    char tmp_buf_pid[24];
-    memset(tmp_buf_pid,0,24);
+    int buffsize = 9 + strlen(ERL_PID_NODE(ep));
+    char tmp_buf_pid[buffsize];
+    memset(tmp_buf_pid,0,buffsize);
     sprintf(tmp_buf_pid,"<%s.%d.%d>",ERL_PID_NODE(ep),ERL_PID_NUMBER(ep), ERL_PID_SERIAL(ep));
     rb_funcall(*str,concat,1,rb_str_new2(tmp_buf_pid));
   }else if(ERL_IS_PORT(ep)){

src/erlix_helper.h

@@ -6,6 +6,7 @@
 #include "ei.h"
 
 #include <ctype.h>
+#include <string.h>
 
 void fill_string(VALUE *str, ETERM *ep);
 

src/mod.c

@@ -54,6 +54,9 @@ VALUE intruder_mod_rpc(VALUE self, VALUE args) {
   tuplep = erl_decode(result.buff);
   ei_x_free(&rpcargs);
   ei_x_free(&result);
+/*   printf("result: \n"); */
+/*   erl_print_term(stdout, tuplep); */
+/*   fflush(stdout); */
   return rb_value_from_eterm(tuplep);
 }
 

src/term.c

@@ -21,6 +21,10 @@ VALUE intruder_term_to_s(VALUE self) {
   Data_Get_Struct(self, INTRUDER_TERM, iterm);
   ETERM *eterm = iterm->eterm;
   VALUE ret = rb_str_new2("");
+ /*  int ei_s_print_term(char** s, const char* buf, int* index) */
+/*   int index = 0; */
+/*   char *buff; */
+/*   int ei_s_print_term(&buff, , int* index); */
   fill_string(&ret, eterm);
   return ret;
 }