sctp-socket 0.1.0 → 0.1.2

data/ext/sctp/socket.c

@@ -4,6 +4,10 @@
 #include <arpa/inet.h>
 #include <netinet/sctp.h>
 
+#ifdef HAVE_SYS_PARAM_H
+#include <sys/param.h>
+#endif
+
 VALUE mSCTP;
 VALUE cSocket;
 VALUE v_sndrcv_struct;
@@ -25,6 +29,7 @@ VALUE v_sctp_event_subscribe_struct;
 VALUE v_sctp_receive_info_struct;
 VALUE v_sctp_peer_addr_params_struct;
 VALUE v_sender_dry_event_struct;
+VALUE v_sctp_initmsg_struct;
 
 #if !defined(IOV_MAX)
 #if defined(_SC_IOV_MAX)
@@ -63,7 +68,226 @@ VALUE rb_hash_aref2(VALUE v_hash, const char* key){
   return v_val;
 }
 
+VALUE get_notification_info(char* buffer){
+  uint32_t i;
+  char str[16];
+  union sctp_notification* snp;
+  VALUE v_notification = Qnil;
+  VALUE v_str = Qnil;
+  VALUE* v_temp;
+
+  snp = (union sctp_notification*)buffer;
+
+  switch(snp->sn_header.sn_type){
+    case SCTP_ASSOC_CHANGE:
+      switch(snp->sn_assoc_change.sac_state){
+        case SCTP_COMM_LOST:
+          v_str = rb_str_new2("comm lost");
+          break;
+        case SCTP_COMM_UP:
+          v_str = rb_str_new2("comm up");
+          break;
+        case SCTP_RESTART:
+          v_str = rb_str_new2("restart");
+          break;
+        case SCTP_SHUTDOWN_COMP:
+          v_str = rb_str_new2("shutdown complete");
+          break;
+        case SCTP_CANT_STR_ASSOC:
+          v_str = rb_str_new2("association setup failed");
+          break;
+        default:
+          v_str = rb_str_new2("unknown");
+      }
+
+      v_notification = rb_struct_new(v_assoc_change_struct,
+        UINT2NUM(snp->sn_assoc_change.sac_type),
+        UINT2NUM(snp->sn_assoc_change.sac_length),
+        UINT2NUM(snp->sn_assoc_change.sac_state),
+        UINT2NUM(snp->sn_assoc_change.sac_error),
+        UINT2NUM(snp->sn_assoc_change.sac_outbound_streams),
+        UINT2NUM(snp->sn_assoc_change.sac_inbound_streams),
+        UINT2NUM(snp->sn_assoc_change.sac_assoc_id),
+        v_str
+      );
+      break;
+    case SCTP_PEER_ADDR_CHANGE:
+      switch(snp->sn_paddr_change.spc_state){
+        case SCTP_ADDR_AVAILABLE:
+          v_str = rb_str_new2("available");
+          break;
+        case SCTP_ADDR_UNREACHABLE:
+          v_str = rb_str_new2("unreachable");
+          break;
+        case SCTP_ADDR_REMOVED:
+          v_str = rb_str_new2("removed from association");
+          break;
+        case SCTP_ADDR_ADDED:
+          v_str = rb_str_new2("added to association");
+          break;
+        case SCTP_ADDR_MADE_PRIM:
+          v_str = rb_str_new2("primary destination");
+          break;
+        default:
+          v_str = rb_str_new2("unknown");
+      }
+
+      inet_ntop(
+        ((struct sockaddr_in *)&snp->sn_paddr_change.spc_aaddr)->sin_family,
+        &(((struct sockaddr_in *)&snp->sn_paddr_change.spc_aaddr)->sin_addr),
+        str,
+        sizeof(str)
+      );
+
+      v_notification = rb_struct_new(v_peeraddr_change_struct,
+        UINT2NUM(snp->sn_paddr_change.spc_type),
+        UINT2NUM(snp->sn_paddr_change.spc_length),
+        rb_str_new2(str),
+        UINT2NUM(snp->sn_paddr_change.spc_state),
+        UINT2NUM(snp->sn_paddr_change.spc_error),
+        UINT2NUM(snp->sn_paddr_change.spc_assoc_id),
+        v_str
+      );
+      break;
+    case SCTP_REMOTE_ERROR:
+      v_temp = ALLOCA_N(VALUE, snp->sn_remote_error.sre_length);
+
+      for(i = 0; i < snp->sn_remote_error.sre_length; i++){
+        v_temp[i] = UINT2NUM(snp->sn_remote_error.sre_data[i]);
+      }
+
+      v_notification = rb_struct_new(v_remote_error_struct,
+        UINT2NUM(snp->sn_remote_error.sre_type),
+        UINT2NUM(snp->sn_remote_error.sre_flags),
+        UINT2NUM(snp->sn_remote_error.sre_length),
+        UINT2NUM(snp->sn_remote_error.sre_error),
+        UINT2NUM(snp->sn_remote_error.sre_assoc_id),
+        rb_ary_new4(snp->sn_remote_error.sre_length, v_temp)
+      );
+      break;
+#ifdef SCTP_SEND_FAILED_EVENT
+    case SCTP_SEND_FAILED_EVENT:
+#ifdef HAVE_STRUCT_SCTP_SEND_FAILED_EVENT_SSFE_LENGTH
+      v_temp = ALLOCA_N(VALUE, snp->sn_send_failed_event.ssfe_length);
+
+      for(i = 0; i < snp->sn_send_failed_event.ssfe_length; i++){
+        v_temp[i] = UINT2NUM(snp->sn_send_failed_event.ssfe_data[i]);
+      }
+
+      v_notification = rb_struct_new(v_send_failed_event_struct,
+        UINT2NUM(snp->sn_send_failed_event.ssfe_type),
+        UINT2NUM(snp->sn_send_failed_event.ssfe_length),
+        UINT2NUM(snp->sn_send_failed_event.ssfe_error),
+        rb_struct_new(v_sndinfo_struct,
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_sid),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_flags),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_ppid),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_context),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_assoc_id)
+        ),
+        UINT2NUM(snp->sn_send_failed_event.ssfe_assoc_id),
+        rb_ary_new4(snp->sn_send_failed_event.ssfe_length, v_temp)
+      );
+#else
+      v_temp = ALLOCA_N(VALUE, snp->sn_send_failed_event.ssf_length);
+
+      for(i = 0; i < snp->sn_send_failed_event.ssf_length; i++){
+        v_temp[i] = UINT2NUM(snp->sn_send_failed_event.ssf_data[i]);
+      }
+
+      v_notification = rb_struct_new(v_send_failed_event_struct,
+        UINT2NUM(snp->sn_send_failed_event.ssf_type),
+        UINT2NUM(snp->sn_send_failed_event.ssf_length),
+        UINT2NUM(snp->sn_send_failed_event.ssf_error),
+        rb_struct_new(v_sndinfo_struct,
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_sid),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_flags),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_ppid),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_context),
+          UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_assoc_id)
+        ),
+        UINT2NUM(snp->sn_send_failed_event.ssf_assoc_id),
+        rb_ary_new4(snp->sn_send_failed_event.ssf_length, v_temp)
+      );
+#endif
+      break;
+#else
+    case SCTP_SEND_FAILED:
+      v_temp = ALLOCA_N(VALUE, snp->sn_send_failed.ssf_length);
+
+      for(i = 0; i < snp->sn_send_failed.ssf_length; i++){
+        v_temp[i] = UINT2NUM(snp->sn_send_failed.ssf_data[i]);
+      }
+
+      v_notification = rb_struct_new(v_send_failed_event_struct,
+        UINT2NUM(snp->sn_send_failed.ssf_type),
+        UINT2NUM(snp->sn_send_failed.ssf_length),
+        UINT2NUM(snp->sn_send_failed.ssf_error),
+        Qnil,
+        UINT2NUM(snp->sn_send_failed.ssf_assoc_id),
+        rb_ary_new4(snp->sn_send_failed.ssf_length, v_temp)
+      );
+      break;
+#endif
+    case SCTP_SHUTDOWN_EVENT:
+      v_notification = rb_struct_new(v_shutdown_event_struct,
+        UINT2NUM(snp->sn_shutdown_event.sse_type),
+        UINT2NUM(snp->sn_shutdown_event.sse_length),
+        UINT2NUM(snp->sn_shutdown_event.sse_assoc_id)
+      );
+      break;
+    case SCTP_ADAPTATION_INDICATION:
+      v_notification = rb_struct_new(v_adaptation_event_struct,
+        UINT2NUM(snp->sn_adaptation_event.sai_type),
+        UINT2NUM(snp->sn_adaptation_event.sai_length),
+        UINT2NUM(snp->sn_adaptation_event.sai_adaptation_ind),
+        UINT2NUM(snp->sn_adaptation_event.sai_assoc_id)
+      );
+      break;
+    case SCTP_PARTIAL_DELIVERY_EVENT:
+      v_notification = rb_struct_new(v_partial_delivery_event_struct,
+        UINT2NUM(snp->sn_pdapi_event.pdapi_type),
+        UINT2NUM(snp->sn_pdapi_event.pdapi_length),
+        UINT2NUM(snp->sn_pdapi_event.pdapi_indication),
+        UINT2NUM(snp->sn_pdapi_event.pdapi_stream),
+        UINT2NUM(snp->sn_pdapi_event.pdapi_seq),
+        UINT2NUM(snp->sn_pdapi_event.pdapi_assoc_id)
+      );
+      break;
+    case SCTP_AUTHENTICATION_EVENT:
+      v_notification = rb_struct_new(v_auth_event_struct,
+#ifdef HAVE_UNION_SCTP_NOTIFICATION_SN_AUTH_EVENT
+        UINT2NUM(snp->sn_auth_event.auth_type),
+        UINT2NUM(snp->sn_auth_event.auth_length),
+        UINT2NUM(snp->sn_auth_event.auth_keynumber),
+        UINT2NUM(snp->sn_auth_event.auth_indication),
+        UINT2NUM(snp->sn_auth_event.auth_assoc_id)
+#else
+        UINT2NUM(snp->sn_authkey_event.auth_type),
+        UINT2NUM(snp->sn_authkey_event.auth_length),
+        UINT2NUM(snp->sn_authkey_event.auth_keynumber),
+        UINT2NUM(snp->sn_authkey_event.auth_indication),
+        UINT2NUM(snp->sn_authkey_event.auth_assoc_id)
+#endif
+      );
+      break;
+    case SCTP_SENDER_DRY_EVENT:
+      v_notification = rb_struct_new(v_sender_dry_event_struct,
+        UINT2NUM(snp->sn_sender_dry_event.sender_dry_type),
+        UINT2NUM(snp->sn_sender_dry_event.sender_dry_flags),
+        UINT2NUM(snp->sn_sender_dry_event.sender_dry_length),
+        UINT2NUM(snp->sn_sender_dry_event.sender_dry_assoc_id)
+      );
+      break;
+  }
+
+  return v_notification;
+}
+
 /*
+ * call-seq:
+ *    SCTP::Socket.new(domain = Socket::AF_INET, type = Socket::SOCK_STREAM)
+ *
  * Create and return a new SCTP::Socket instance. You may optionally pass in
  * a domain (aka family) value and socket type. By default these are AF_INET
  * and SOCK_SEQPACKET, respectively.
@@ -106,27 +330,30 @@ static VALUE rsctp_init(int argc, VALUE* argv, VALUE self){
 }
 
 /*
- *  Bind a subset of IP addresses associated with the host system on the
- *  given port, or a port assigned by the operating system if none is provided.
+ * call-seq:
+ *    SCTP::Socket#bindx(options)
  *
- *  Note that you can both add or remove an address to or from the socket
- *  using the SCTP_BINDX_ADD_ADDR (default) or SCTP_BINDX_REM_ADDR constants,
- *  respectively.
+ * Bind a subset of IP addresses associated with the host system on the
+ * given port, or a port assigned by the operating system if none is provided.
  *
- *  Example:
+ * Note that you can both add or remove an address to or from the socket
+ * using the SCTP_BINDX_ADD_ADDR (default) or SCTP_BINDX_REM_ADDR constants,
+ * respectively.
  *
- *    socket = SCTP::Socket.new
+ * Example:
  *
- *    # Bind 2 addresses
- *    socket.bindx(:port => 64325, :addresses => ['10.0.4.5', '10.0.5.5'])
+ *   socket = SCTP::Socket.new
  *
- *    # Remove 1 later
- *    socket.bindx(:addresses => ['10.0.4.5'], :flags => SCTP::Socket::BINDX_REM_ADDR)
+ *   # Bind 2 addresses
+ *   socket.bindx(:port => 64325, :addresses => ['10.0.4.5', '10.0.5.5'])
  *
- *  If no addresses are specified, then it will bind to all available interfaces. If
- *  no port is specified, then one will be assigned by the host.
+ *   # Remove 1 later
+ *   socket.bindx(:addresses => ['10.0.4.5'], :flags => SCTP::Socket::BINDX_REM_ADDR)
  *
- *  Returns the port that it was bound to.
+ * If no addresses are specified, then it will bind to all available interfaces. If
+ * no port is specified, then one will be assigned by the host.
+ *
+ * Returns the port that it was bound to.
  */
 static VALUE rsctp_bindx(int argc, VALUE* argv, VALUE self){
   struct sockaddr_in addrs[8];
@@ -157,7 +384,7 @@ static VALUE rsctp_bindx(int argc, VALUE* argv, VALUE self){
   if(NIL_P(v_addresses))
     num_ip = 1;
   else
-    num_ip = RARRAY_LEN(v_addresses);
+    num_ip = (int)RARRAY_LEN(v_addresses);
 
   domain = NUM2INT(rb_iv_get(self, "@domain"));
   fileno = NUM2INT(rb_iv_get(self, "@fileno"));
@@ -168,12 +395,18 @@ static VALUE rsctp_bindx(int argc, VALUE* argv, VALUE self){
       addrs[i].sin_family = domain;
       addrs[i].sin_port = htons(port);
       addrs[i].sin_addr.s_addr = inet_addr(StringValueCStr(v_address));
+#ifdef BSD
+      addrs[i].sin_len = sizeof(struct sockaddr_in);
+#endif
     }
   }
   else{
     addrs[0].sin_family = domain;
     addrs[0].sin_port = htons(port);
     addrs[0].sin_addr.s_addr = htonl(INADDR_ANY);
+#ifdef BSD
+    addrs[0].sin_len = sizeof(struct sockaddr_in);
+#endif
   }
 
   if(sctp_bindx(fileno, (struct sockaddr *) addrs, num_ip, flags) != 0)
@@ -196,6 +429,9 @@ static VALUE rsctp_bindx(int argc, VALUE* argv, VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#connectx(options)
+ *
  * Connect the socket to a multihomed peer via the provided array of addresses
  * using the domain specified in the constructor. You must also specify the port.
  *
@@ -204,7 +440,9 @@ static VALUE rsctp_bindx(int argc, VALUE* argv, VALUE self){
  *   socket = SCTP::Socket.new
  *   socket.connectx(:port => 62354, :addresses => ['10.0.4.5', '10.0.5.5'])
  *
- * Note that this will also set/update the object's association_id.
+ * Note that this will also set/update the object's association_id. Also note that
+ * this method is not strictly necessary on the client side, since the various send
+ * methods will automatically establish associations.
  */
 static VALUE rsctp_connectx(int argc, VALUE* argv, VALUE self){
   struct sockaddr_in addrs[8];
@@ -230,7 +468,7 @@ static VALUE rsctp_connectx(int argc, VALUE* argv, VALUE self){
 
   v_domain = rb_iv_get(self, "@domain");
 
-  num_ip = RARRAY_LEN(v_addresses);
+  num_ip = (int)RARRAY_LEN(v_addresses);
   bzero(&addrs, sizeof(addrs));
 
   for(i = 0; i < num_ip; i++){
@@ -238,6 +476,9 @@ static VALUE rsctp_connectx(int argc, VALUE* argv, VALUE self){
     addrs[i].sin_family = NUM2INT(v_domain);
     addrs[i].sin_port = htons(NUM2INT(v_port));
     addrs[i].sin_addr.s_addr = inet_addr(StringValueCStr(v_address));
+#ifdef BSD
+    addrs[i].sin_len = sizeof(struct sockaddr_in);
+#endif
   }
 
   fileno = NUM2INT(rb_iv_get(self, "@fileno"));
@@ -251,6 +492,9 @@ static VALUE rsctp_connectx(int argc, VALUE* argv, VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#close
+ *
  * Close the socket. You should always do this.
  *
  * Example:
@@ -268,22 +512,25 @@ static VALUE rsctp_close(VALUE self){
 }
 
 /*
- *  Return an array of all addresses of a peer of the current socket
- *  and association number.
+ * call-seq:
+ *    SCTP::Socket#getpeernames 
  *
- *  You may optionally pass a assocation fileno and association ID. Typically
- *  this information would come from the peeloff method.
+ * Return an array of all addresses of a peer of the current socket
+ * and association number.
  *
- *  Example:
+ * You may optionally pass a assocation fileno and association ID. Typically
+ * this information would come from the peeloff method.
  *
- *    socket = SCTP::Socket.new
- *    # ...
- *    p socket.getpeernames
+ * Example:
  *
- *    info = socket.recvmsg
- *    association_fileno = socket.peeloff(info.association_id)
+ *   socket = SCTP::Socket.new
+ *   # ...
+ *   p socket.getpeernames
+ * 
+ *   info = socket.recvmsg
+ *   association_fileno = socket.peeloff(info.association_id)
  *
- *    p socket.getpeernames(association_fileno, info.association_id)
+ *   p socket.getpeernames(association_fileno, info.association_id)
  */
 static VALUE rsctp_getpeernames(int argc, VALUE* argv, VALUE self){
   sctp_assoc_t assoc_id;
@@ -326,6 +573,9 @@ static VALUE rsctp_getpeernames(int argc, VALUE* argv, VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#getlocalnames
+ *
  * Return an array of local addresses that are part of the association.
  *
  * Example:
@@ -381,6 +631,9 @@ static VALUE rsctp_getlocalnames(int argc, VALUE* argv, VALUE self){
 
 #ifdef HAVE_SCTP_SENDV
 /*
+ * call-seq:
+ *    SCTP::Socket#sendv(options)
+ *
  * Transmit a message to an SCTP endpoint using a gather-write. The following
  * hash of options is permitted:
  *
@@ -392,13 +645,14 @@ static VALUE rsctp_getlocalnames(int argc, VALUE* argv, VALUE self){
  *
  *    socket = SCTP::Socket.new
  *
+ *    # You can specify addresses here or in an earlier connectx call.
  *    socket.sendv
  *      :message   => ['Hello ', 'World.'],
  *      :addresses => ['10.0.5.4', '10.0.6.4'],
  *      :info_type => SCTP::Socket:::SCTP_SENDV_SNDINFO
  *    )
  *
- *  CAVEAT: Currently addresses does not work, and info_type is not yet supported.
+ *  CAVEAT: Currently info_type is not yet supported.
  *
  *  Returns the number of bytes sent.
  */
@@ -406,13 +660,14 @@ static VALUE rsctp_sendv(VALUE self, VALUE v_options){
   VALUE v_msg, v_message, v_addresses;
   struct iovec iov[IOV_MAX];
   struct sockaddr_in* addrs;
-  struct sctp_sndinfo info;
-  int i, fileno, num_bytes, size, num_ip;
+  struct sctp_sendv_spa spa;
+  int i, fileno, size, num_ip;
+  ssize_t num_bytes;
 
   Check_Type(v_options, T_HASH);
 
   bzero(&iov, sizeof(iov));
-  bzero(&info, sizeof(info));
+  bzero(&spa, sizeof(spa));
 
   v_message   = rb_hash_aref2(v_options, "message");
   v_addresses = rb_hash_aref2(v_options, "addresses");
@@ -422,8 +677,8 @@ static VALUE rsctp_sendv(VALUE self, VALUE v_options){
 
   if(!NIL_P(v_addresses)){
     Check_Type(v_addresses, T_ARRAY);
-    num_ip = RARRAY_LEN(v_addresses);
-    addrs = (struct sockaddr_in*)alloca(sizeof(struct sockaddr_in) * num_ip);
+    num_ip = (int)RARRAY_LEN(v_addresses);
+    addrs = (struct sockaddr_in*)alloca(num_ip * sizeof(*addrs));
   }
   else{
     addrs = NULL;
@@ -431,7 +686,7 @@ static VALUE rsctp_sendv(VALUE self, VALUE v_options){
   }
 
   fileno = NUM2INT(rb_iv_get(self, "@fileno"));
-  size = RARRAY_LEN(v_message);
+  size = (int)RARRAY_LEN(v_message);
 
   if(!size)
     rb_raise(rb_eArgError, "Must contain at least one message");
@@ -439,26 +694,31 @@ static VALUE rsctp_sendv(VALUE self, VALUE v_options){
   if(size > IOV_MAX)
     rb_raise(rb_eArgError, "Array size is greater than IOV_MAX");
 
-  info.snd_flags = SCTP_UNORDERED;
-  info.snd_assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  // TODO: Make this configurable
+  spa.sendv_sndinfo.snd_flags = SCTP_UNORDERED;
+  spa.sendv_sndinfo.snd_assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
 
   if(!NIL_P(v_addresses)){
-    int i, port;
+    int i, port, domain;
     VALUE v_address, v_port;
 
-    v_port = NUM2INT(rb_iv_get(self, "@port"));
+    v_port = rb_iv_get(self, "@port");
 
     if(NIL_P(v_port))
       port = 0;
     else
       port = NUM2INT(v_port);
 
+    domain = NUM2INT(rb_iv_get(self, "@domain"));
+
     for(i = 0; i < num_ip; i++){
       v_address = RARRAY_PTR(v_addresses)[i];
-      addrs->sin_family = NUM2INT(rb_iv_get(self, "@domain"));
-      addrs->sin_port = htons(port);
-      addrs->sin_addr.s_addr = inet_addr(StringValueCStr(v_address));
-      addrs += sizeof(struct sockaddr_in);
+      addrs[i].sin_family = domain;
+      addrs[i].sin_port = htons(port);
+      addrs[i].sin_addr.s_addr = inet_addr(StringValueCStr(v_address));
+#ifdef BSD
+      addrs[i].sin_len = sizeof(struct sockaddr_in);
+#endif
     }
   }
 
@@ -468,29 +728,30 @@ static VALUE rsctp_sendv(VALUE self, VALUE v_options){
     iov[i].iov_len = RSTRING_LEN(v_msg);
   }
 
-  num_bytes = sctp_sendv(
+  num_bytes = (ssize_t)sctp_sendv(
     fileno,
     iov,
     size,
     (struct sockaddr*)addrs,
     num_ip,
-    &info,
-    sizeof(info),
-    SCTP_SENDV_SNDINFO,
+    &spa,
+    sizeof(spa),
+    SCTP_SENDV_SPA,
     0
   );
 
   if(num_bytes < 0)
     rb_raise(rb_eSystemCallError, "sctp_sendv: %s", strerror(errno));
 
-  return INT2NUM(num_bytes);
+  return LONG2NUM(num_bytes);
 }
 #endif
 
 #ifdef HAVE_SCTP_RECVV
 static VALUE rsctp_recvv(int argc, VALUE* argv, VALUE self){
   VALUE v_flags;
-  int fileno, flags, bytes, on;
+  int fileno, flags, on;
+  ssize_t bytes;
   uint infotype;
   socklen_t infolen;
   struct iovec iov[1];
@@ -520,7 +781,7 @@ static VALUE rsctp_recvv(int argc, VALUE* argv, VALUE self){
   infolen = sizeof(struct sctp_rcvinfo);
   infotype = 0;
 
-  bytes = sctp_recvv(
+  bytes = (ssize_t)sctp_recvv(
     fileno,
     iov,
     1,
@@ -556,6 +817,9 @@ static VALUE rsctp_recvv(int argc, VALUE* argv, VALUE self){
 #endif
 
 /*
+ * call-seq:
+ *    SCTP::Socket.send(options)
+ *
  * Send a message on an already-connected socket to a specific association.
  *
  * Example:
@@ -634,7 +898,7 @@ static VALUE rsctp_send(VALUE self, VALUE v_options){
 
   fileno = NUM2INT(rb_iv_get(self, "@fileno"));
 
-  num_bytes = sctp_send(
+  num_bytes = (ssize_t)sctp_send(
     fileno,
     StringValueCStr(v_msg),
     RSTRING_LEN(v_msg),
@@ -645,10 +909,13 @@ static VALUE rsctp_send(VALUE self, VALUE v_options){
   if(num_bytes < 0)
     rb_raise(rb_eSystemCallError, "sctp_send: %s", strerror(errno));
 
-  return INT2NUM(num_bytes);
+  return LONG2NUM(num_bytes);
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#sendmsg(options)
+ *
  * Transmit a message to an SCTP endpoint. The following hash of options
  * is permitted:
  *
@@ -683,7 +950,7 @@ static VALUE rsctp_sendmsg(VALUE self, VALUE v_options){
   uint32_t ppid, flags, ttl, context;
   ssize_t num_bytes;
   struct sockaddr_in addrs[8];
-  int fileno, size;
+  int fileno, size, num_ip;
 
   Check_Type(v_options, T_HASH);
 
@@ -726,10 +993,10 @@ static VALUE rsctp_sendmsg(VALUE self, VALUE v_options){
     context = NUM2INT(v_context);
 
   if(!NIL_P(v_addresses)){
-    int i, num_ip, port;
+    int i, port;
     VALUE v_address, v_port;
 
-    num_ip = RARRAY_LEN(v_addresses);
+    num_ip = (int)RARRAY_LEN(v_addresses);
     v_port = rb_hash_aref2(v_options, "port");
 
     if(NIL_P(v_port))
@@ -742,17 +1009,51 @@ static VALUE rsctp_sendmsg(VALUE self, VALUE v_options){
       addrs[i].sin_family = NUM2INT(rb_iv_get(self, "@domain"));
       addrs[i].sin_port = htons(port);
       addrs[i].sin_addr.s_addr = inet_addr(StringValueCStr(v_address));
+#ifdef BSD
+      addrs[i].sin_len = sizeof(struct sockaddr_in);
+#endif
     }
 
     size = sizeof(addrs);
   }
   else{
+    num_ip = 0;
     size = 0;
   }
 
   fileno = NUM2INT(rb_iv_get(self, "@fileno"));
 
-  num_bytes = sctp_sendmsg(
+#ifdef BSD
+  if(num_ip){
+    num_bytes = (ssize_t)sctp_sendmsgx(
+      fileno,
+      StringValueCStr(v_msg),
+      RSTRING_LEN(v_msg),
+      (struct sockaddr*)addrs,
+      num_ip,
+      ppid,
+      flags,
+      stream,
+      ttl,
+      context
+    );
+  }
+  else{
+    num_bytes = (ssize_t)sctp_sendmsg(
+      fileno,
+      StringValueCStr(v_msg),
+      RSTRING_LEN(v_msg),
+      (struct sockaddr*)addrs,
+      size,
+      ppid,
+      flags,
+      stream,
+      ttl,
+      context
+    );
+  }
+#else
+  num_bytes = (ssize_t)sctp_sendmsg(
     fileno,
     StringValueCStr(v_msg),
     RSTRING_LEN(v_msg),
@@ -764,14 +1065,26 @@ static VALUE rsctp_sendmsg(VALUE self, VALUE v_options){
     ttl,
     context
   );
+#endif
 
-  if(num_bytes < 0)
+  if(num_bytes < 0){
+#ifdef BSD
+    if(num_ip > 0)
+      rb_raise(rb_eSystemCallError, "sctp_sendmsgx: %s", strerror(errno));
+    else
+      rb_raise(rb_eSystemCallError, "sctp_sendmsg: %s", strerror(errno));
+#else
     rb_raise(rb_eSystemCallError, "sctp_sendmsg: %s", strerror(errno));
+#endif
+  }
 
-  return INT2NUM(num_bytes);
+  return LONG2NUM(num_bytes);
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#recvmsg(flags=0)
+ *
  * Receive a message from another SCTP endpoint.
  *
  * Example:
@@ -794,7 +1107,8 @@ static VALUE rsctp_recvmsg(int argc, VALUE* argv, VALUE self){
   VALUE v_flags, v_notification, v_message;
   struct sctp_sndrcvinfo sndrcvinfo;
   struct sockaddr_in clientaddr;
-  int flags, bytes, fileno;
+  int flags, fileno;
+  ssize_t bytes;
   char buffer[1024]; // TODO: Let this be configurable?
   socklen_t length;
 
@@ -812,7 +1126,7 @@ static VALUE rsctp_recvmsg(int argc, VALUE* argv, VALUE self){
   bzero(&clientaddr, sizeof(clientaddr));
   bzero(&sndrcvinfo, sizeof(sndrcvinfo));
 
-  bytes = sctp_recvmsg(
+  bytes = (ssize_t)sctp_recvmsg(
     fileno,
     buffer,
     sizeof(buffer),
@@ -827,187 +1141,8 @@ static VALUE rsctp_recvmsg(int argc, VALUE* argv, VALUE self){
 
   v_notification = Qnil;
 
-  if(flags & MSG_NOTIFICATION){
-    uint32_t i;
-    char str[16];
-    union sctp_notification* snp;
-    VALUE v_str;
-    VALUE* v_temp;
-
-    snp = (union sctp_notification*)buffer;
-
-    switch(snp->sn_header.sn_type){
-      case SCTP_ASSOC_CHANGE:
-        switch(snp->sn_assoc_change.sac_state){
-          case SCTP_COMM_LOST:
-            v_str = rb_str_new2("comm lost");
-            break;
-          case SCTP_COMM_UP:
-            v_str = rb_str_new2("comm up");
-            break;
-          case SCTP_RESTART:
-            v_str = rb_str_new2("restart");
-            break;
-          case SCTP_SHUTDOWN_COMP:
-            v_str = rb_str_new2("shutdown complete");
-            break;
-          case SCTP_CANT_STR_ASSOC:
-            v_str = rb_str_new2("association setup failed");
-            break;
-          default:
-            v_str = rb_str_new2("unknown");
-        }
-
-        v_notification = rb_struct_new(v_assoc_change_struct,
-          UINT2NUM(snp->sn_assoc_change.sac_type),
-          UINT2NUM(snp->sn_assoc_change.sac_length),
-          UINT2NUM(snp->sn_assoc_change.sac_state),
-          UINT2NUM(snp->sn_assoc_change.sac_error),
-          UINT2NUM(snp->sn_assoc_change.sac_outbound_streams),
-          UINT2NUM(snp->sn_assoc_change.sac_inbound_streams),
-          UINT2NUM(snp->sn_assoc_change.sac_assoc_id),
-          v_str
-        );
-        break;
-      case SCTP_PEER_ADDR_CHANGE:
-        switch(snp->sn_paddr_change.spc_state){
-          case SCTP_ADDR_AVAILABLE:
-            v_str = rb_str_new2("available");
-            break;
-          case SCTP_ADDR_UNREACHABLE:
-            v_str = rb_str_new2("unreachable");
-            break;
-          case SCTP_ADDR_REMOVED:
-            v_str = rb_str_new2("removed from association");
-            break;
-          case SCTP_ADDR_ADDED:
-            v_str = rb_str_new2("added to association");
-            break;
-          case SCTP_ADDR_MADE_PRIM:
-            v_str = rb_str_new2("primary destination");
-            break;
-          default:
-            v_str = rb_str_new2("unknown");
-        }
-
-        inet_ntop(
-          ((struct sockaddr_in *)&snp->sn_paddr_change.spc_aaddr)->sin_family,
-          &(((struct sockaddr_in *)&snp->sn_paddr_change.spc_aaddr)->sin_addr),
-          str,
-          sizeof(str)
-        );
-
-        v_notification = rb_struct_new(v_peeraddr_change_struct,
-          UINT2NUM(snp->sn_paddr_change.spc_type),
-          UINT2NUM(snp->sn_paddr_change.spc_length),
-          rb_str_new2(str),
-          UINT2NUM(snp->sn_paddr_change.spc_state),
-          UINT2NUM(snp->sn_paddr_change.spc_error),
-          UINT2NUM(snp->sn_paddr_change.spc_assoc_id),
-          v_str
-        );
-        break;
-      case SCTP_REMOTE_ERROR:
-        v_temp = ALLOCA_N(VALUE, snp->sn_remote_error.sre_length);
-
-        for(i = 0; i < snp->sn_remote_error.sre_length; i++){
-          v_temp[i] = UINT2NUM(snp->sn_remote_error.sre_data[i]);
-        }
-
-        v_notification = rb_struct_new(v_remote_error_struct,
-          UINT2NUM(snp->sn_remote_error.sre_type),
-          UINT2NUM(snp->sn_remote_error.sre_flags),
-          UINT2NUM(snp->sn_remote_error.sre_length),
-          UINT2NUM(snp->sn_remote_error.sre_error),
-          UINT2NUM(snp->sn_remote_error.sre_assoc_id),
-          rb_ary_new4(snp->sn_remote_error.sre_length, v_temp)
-        );
-        break;
-#ifdef SCTP_SEND_FAILED_EVENT
-      case SCTP_SEND_FAILED_EVENT:
-        v_temp = ALLOCA_N(VALUE, snp->sn_send_failed_event.ssf_length);
-
-        for(i = 0; i < snp->sn_send_failed_event.ssf_length; i++){
-          v_temp[i] = UINT2NUM(snp->sn_send_failed_event.ssf_data[i]);
-        }
-
-        v_notification = rb_struct_new(v_send_failed_event_struct,
-          UINT2NUM(snp->sn_send_failed_event.ssf_type),
-          UINT2NUM(snp->sn_send_failed_event.ssf_length),
-          UINT2NUM(snp->sn_send_failed_event.ssf_error),
-          rb_struct_new(v_sndinfo_struct,
-            UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_sid),
-            UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_flags),
-            UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_ppid),
-            UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_context),
-            UINT2NUM(snp->sn_send_failed_event.ssfe_info.snd_assoc_id)
-          ),
-          UINT2NUM(snp->sn_send_failed_event.ssf_assoc_id),
-          rb_ary_new4(snp->sn_send_failed_event.ssf_length, v_temp)
-        );
-        break;
-#else
-      case SCTP_SEND_FAILED:
-        v_temp = ALLOCA_N(VALUE, snp->sn_send_failed.ssf_length);
-
-        for(i = 0; i < snp->sn_send_failed.ssf_length; i++){
-          v_temp[i] = UINT2NUM(snp->sn_send_failed.ssf_data[i]);
-        }
-
-        v_notification = rb_struct_new(v_send_failed_event_struct,
-          UINT2NUM(snp->sn_send_failed.ssf_type),
-          UINT2NUM(snp->sn_send_failed.ssf_length),
-          UINT2NUM(snp->sn_send_failed.ssf_error),
-          Qnil,
-          UINT2NUM(snp->sn_send_failed.ssf_assoc_id),
-          rb_ary_new4(snp->sn_send_failed.ssf_length, v_temp)
-        );
-        break;
-#endif
-      case SCTP_SHUTDOWN_EVENT:
-        v_notification = rb_struct_new(v_shutdown_event_struct,
-          UINT2NUM(snp->sn_shutdown_event.sse_type),
-          UINT2NUM(snp->sn_shutdown_event.sse_length),
-          UINT2NUM(snp->sn_shutdown_event.sse_assoc_id)
-        );
-        break;
-      case SCTP_ADAPTATION_INDICATION:
-        v_notification = rb_struct_new(v_adaptation_event_struct,
-          UINT2NUM(snp->sn_adaptation_event.sai_type),
-          UINT2NUM(snp->sn_adaptation_event.sai_length),
-          UINT2NUM(snp->sn_adaptation_event.sai_adaptation_ind),
-          UINT2NUM(snp->sn_adaptation_event.sai_assoc_id)
-        );
-        break;
-      case SCTP_PARTIAL_DELIVERY_EVENT:
-        v_notification = rb_struct_new(v_partial_delivery_event_struct,
-          UINT2NUM(snp->sn_pdapi_event.pdapi_type),
-          UINT2NUM(snp->sn_pdapi_event.pdapi_length),
-          UINT2NUM(snp->sn_pdapi_event.pdapi_indication),
-          UINT2NUM(snp->sn_pdapi_event.pdapi_stream),
-          UINT2NUM(snp->sn_pdapi_event.pdapi_seq),
-          UINT2NUM(snp->sn_pdapi_event.pdapi_assoc_id)
-        );
-        break;
-      case SCTP_AUTHENTICATION_EVENT:
-        v_notification = rb_struct_new(v_auth_event_struct,
-          UINT2NUM(snp->sn_authkey_event.auth_type),
-          UINT2NUM(snp->sn_authkey_event.auth_length),
-          UINT2NUM(snp->sn_authkey_event.auth_keynumber),
-          UINT2NUM(snp->sn_authkey_event.auth_indication),
-          UINT2NUM(snp->sn_authkey_event.auth_assoc_id)
-        );
-        break;
-      case SCTP_SENDER_DRY_EVENT:
-        v_notification = rb_struct_new(v_sender_dry_event_struct,
-          UINT2NUM(snp->sn_sender_dry_event.sender_dry_type),
-          UINT2NUM(snp->sn_sender_dry_event.sender_dry_flags),
-          UINT2NUM(snp->sn_sender_dry_event.sender_dry_length),
-          UINT2NUM(snp->sn_sender_dry_event.sender_dry_assoc_id)
-        );
-        break;
-    }
-  }
+  if(flags & MSG_NOTIFICATION)
+    v_notification = get_notification_info(buffer);
 
   if(NIL_P(v_notification))
     v_message = rb_str_new(buffer, bytes);
@@ -1028,6 +1163,9 @@ static VALUE rsctp_recvmsg(int argc, VALUE* argv, VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#set_initmsg(options)
+ *
  * Set the initial parameters used by the socket when sending out the INIT message.
  *
  * Example:
@@ -1077,6 +1215,9 @@ static VALUE rsctp_set_initmsg(VALUE self, VALUE v_options){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#subscribe(options)
+ *
  * Subscribe to various notification type events, which will generate additional
  * data that the socket may receive. The possible notification type events are
  * as follows:
@@ -1161,6 +1302,9 @@ static VALUE rsctp_subscribe(VALUE self, VALUE v_options){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#listen(backlog=128)
+ *
  * Marks the socket referred to by sockfd as a passive socket, i.e. a socket that
  * will be used to accept incoming connection requests.
  *
@@ -1204,6 +1348,9 @@ static VALUE rsctp_listen(int argc, VALUE* argv, VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#peeloff(association_id)
+ *
  * Extracts an association contained by a one-to-many socket connection into
  * a one-to-one style socket. Returns the socket descriptor (fileno).
  *
@@ -1234,6 +1381,9 @@ static VALUE rsctp_peeloff(VALUE self, VALUE v_assoc_id){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#get_default_send_params
+ *
  * Returns the default set of parameters that a call to the sendto function
  * uses on this association. This is a struct that contains the following
  * members:
@@ -1278,6 +1428,9 @@ static VALUE rsctp_get_default_send_params(VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#get_association_info
+ *
  * Returns the association specific parameters. This is a struct
  * that contains the following members:
  *
@@ -1317,6 +1470,9 @@ static VALUE rsctp_get_association_info(VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#shutdown
+ *
  * Shuts down socket send and receive operations.
  *
  * Optionally accepts an argument that specifieds the type of shutdown.
@@ -1351,6 +1507,9 @@ static VALUE rsctp_shutdown(int argc, VALUE* argv, VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#get_retransmission_info
+ *
  * Returns the protocol parameters that are used to initialize and bind the
  * retransmission timeout (RTO) tunable. This is a struct with the following
  * members:
@@ -1385,6 +1544,9 @@ static VALUE rsctp_get_retransmission_info(VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#get_status
+ *
  * Get the status of a connected socket.
  *
  * Example:
@@ -1449,6 +1611,9 @@ static VALUE rsctp_get_status(VALUE self){
 }
 
 /*
+ * call-seq:
+ *    SCTP::Socket#get_subscriptions
+ *
  * Returns a struct of events detailing which events have been
  * subscribed to by the socket. The struct contains the following
  * members:
@@ -1483,7 +1648,8 @@ static VALUE rsctp_get_subscriptions(VALUE self){
   if(sctp_opt_info(fileno, assoc_id, SCTP_EVENTS, (void*)&events, &size) < 0)
     rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
 
-  return rb_struct_new(v_sctp_event_subscribe_struct,
+  return rb_struct_new(
+    v_sctp_event_subscribe_struct,
     (events.sctp_data_io_event ? Qtrue : Qfalse),
     (events.sctp_association_event ? Qtrue : Qfalse),
     (events.sctp_address_event ? Qtrue : Qfalse),
@@ -1493,14 +1659,43 @@ static VALUE rsctp_get_subscriptions(VALUE self){
     (events.sctp_partial_delivery_event ? Qtrue : Qfalse),
     (events.sctp_adaptation_layer_event ? Qtrue : Qfalse),
     (events.sctp_authentication_event ? Qtrue : Qfalse),
-    (events.sctp_sender_dry_event ? Qtrue : Qfalse),
-    (events.sctp_stream_reset_event ? Qtrue : Qfalse),
-    (events.sctp_assoc_reset_event ? Qtrue : Qfalse),
-    (events.sctp_stream_change_event ? Qtrue : Qfalse),
-    (events.sctp_send_failure_event_event ? Qtrue : Qfalse)
+    (events.sctp_sender_dry_event ? Qtrue : Qfalse)
+#ifdef HAVE_STRUCT_SCTP_EVENT_SUBSCRIBE_SCTP_STREAM_RESET_EVENT
+    ,(events.sctp_stream_reset_event ? Qtrue : Qfalse)
+#endif
+#ifdef HAVE_STRUCT_SCTP_EVENT_SUBSCRIBE_SCTP_ASSOC_RESET_EVENT
+    ,(events.sctp_assoc_reset_event ? Qtrue : Qfalse)
+#endif
+#ifdef HAVE_STRUCT_SCTP_EVENT_SUBSCRIBE_SCTP_STREAM_CHANGE_EVENT
+    ,(events.sctp_stream_change_event ? Qtrue : Qfalse)
+#endif
+#ifdef HAVE_STRUCT_SCTP_EVENT_SUBSCRIBE_SCTP_SEND_FAILURE_EVENT_EVENT
+    ,(events.sctp_send_failure_event_event ? Qtrue : Qfalse)
+#endif
   );
 }
 
+/*
+ * call-seq:
+ *    SCTP::Socket#get_peer_address_params
+ *
+ * Applications can enable or disable heartbeats for any peer address of
+ * an association, modify an address's heartbeat interval, force a
+ * heartbeat to be sent immediately, and adjust the address's maximum
+ * number of retransmissions sent before an address is considered
+ * unreachable.
+ *
+ * This method returns a struct that contains this information. It contains
+ * the following struct members.
+ *
+ * * association_id
+ * * address
+ * * heartbeat_interval
+ * * max_retransmission_count
+ * * path_mtu
+ * * flags
+ * * ipv6_flowlabel
+ */
 static VALUE rsctp_get_peer_address_params(VALUE self){
   int fileno;
   char str[16];
@@ -1525,10 +1720,482 @@ static VALUE rsctp_get_peer_address_params(VALUE self){
     INT2NUM(paddr.spp_assoc_id),
     rb_str_new2(str),
     INT2NUM(paddr.spp_hbinterval),
-    INT2NUM(paddr.spp_pathmaxrxt)
+    INT2NUM(paddr.spp_pathmaxrxt),
+    INT2NUM(paddr.spp_pathmtu),
+    INT2NUM(paddr.spp_flags),
+    INT2NUM(paddr.spp_ipv6_flowlabel)
   );
 }
 
+/*
+ * call-seq:
+ *    SCTP::Socket#get_init_msg
+ *
+ * Returns a structure that contains various initialization parameters.
+ *
+ * * num_ostreams: A number representing the number of streams that the
+ *     application wishes to be able to send to.
+ *
+ * * max_instreams: The maximum number of inbound streams the application
+ *     is prepared to support.
+ *
+ * * max_attempts: The number of attempts the SCTP endpoint should make at
+ *     resending the INIT.
+ *
+ * * max_init_timeout: This value represents the largest Timeout or RTO value
+ *     (in milliseconds) to use in attempting an INIT.
+ */
+static VALUE rsctp_get_init_msg(VALUE self){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  struct sctp_initmsg initmsg;
+
+  bzero(&initmsg, sizeof(initmsg));
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  size = sizeof(struct sctp_initmsg);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_INITMSG, (void*)&initmsg, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return rb_struct_new(
+    v_sctp_initmsg_struct,
+    INT2NUM(initmsg.sinit_num_ostreams),
+    INT2NUM(initmsg.sinit_max_instreams),
+    INT2NUM(initmsg.sinit_max_attempts),
+    INT2NUM(initmsg.sinit_max_init_timeo)
+  );
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#nodelay?
+ *
+ * Returns whether or not the nodelay option has been set.
+ */
+static VALUE rsctp_get_nodelay(VALUE self){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  int value;
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  size = sizeof(int);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_NODELAY, (void*)&value, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  if(value)
+    return Qtrue;
+  else
+    return Qfalse;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#nodelay=(bool)
+ *
+ * Turn on/off any Nagle-like algorithm. This means that packets are generally
+ * sent as soon as possible and no unnecessary delays are introduced, at the
+ * cost of more packets in the network.
+ */
+static VALUE rsctp_set_nodelay(VALUE self, VALUE v_bool){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  int value;
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  size = sizeof(int);
+
+  if(NIL_P(v_bool) || v_bool == Qfalse)
+    value = 0;
+  else
+    value = 1;
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_NODELAY, (void*)&value, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  if(value)
+    return Qtrue;
+  else
+    return Qfalse;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#disable_fragments=(bool)
+ * 
+ * This option is a on/off flag and is passed an integer where a non-
+ * zero is on and a zero is off.  If enabled no SCTP message
+ * fragmentation will be performed.  Instead if a message being sent
+ * exceeds the current PMTU size, the message will NOT be sent and
+ * instead a error will be indicated to the user.
+ */
+static VALUE rsctp_disable_fragments(VALUE self, VALUE v_bool){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  int value;
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  size = sizeof(int);
+
+  if(NIL_P(v_bool) || v_bool == Qfalse)
+    value = 0;
+  else
+    value = 1;
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_DISABLE_FRAGMENTS, (void*)&value, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  if(value)
+    return Qtrue;
+  else
+    return Qfalse;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#autoclose
+ *
+ * Returns the number of seconds before socket associations automatically
+ * shut down.
+ */
+static VALUE rsctp_get_autoclose(VALUE self){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  int value;
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  size = sizeof(int);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTOCLOSE, (void*)&value, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return INT2NUM(value);
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#autoclose=(seconds=0)
+ *
+ * When set it will cause associations that are idle for more than the specified
+ * number of seconds to automatically close using the graceful shutdown
+ * procedure. An association being idle is defined as an association that has
+ * NOT sent or received user data.
+ *
+ * The special value of 0 indicates that no automatic close of any associations
+ * should be performed, this is the default value. The option expects an integer
+ * defining the number of seconds of idle time before an association is closed.
+ *
+ * An application using this option should enable receiving the association
+ * change notification. This is the only mechanism an application is informed
+ * about the closing of an association. After an association is closed, the
+ * association ID assigned to it can be reused. An application should be aware
+ * of this to avoid the possible problem of sending data to an incorrect peer
+ * end point.
+ *
+ * This socket option is applicable to the one-to-many style socket only.
+ */
+static VALUE rsctp_set_autoclose(VALUE self, VALUE v_seconds){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  int value;
+
+  value = NUM2INT(v_seconds);
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  size = sizeof(int);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTOCLOSE, (void*)&value, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return v_seconds;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#enable_auth_support(association_id=nil)
+ *
+ * Enables auth for future associations.
+ */
+static VALUE rsctp_enable_auth_support(int argc, VALUE* argv, VALUE self){
+  int fileno;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  struct sctp_assoc_value assoc_value;
+  VALUE v_assoc_id;
+
+  rb_scan_args(argc, argv, "01", &v_assoc_id);
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  size = sizeof(struct sctp_assoc_value);
+
+  if(NIL_P(v_assoc_id))
+    assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  else
+    assoc_id = NUM2INT(v_assoc_id);
+
+  assoc_value.assoc_id = assoc_id;
+  assoc_value.assoc_value = 1;
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTH_SUPPORTED, (void*)&assoc_value, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return self;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#set_shared_key(key, keynum, association_id=nil)
+ *
+ *  This option will set a shared secret key which is used to build an
+ *  association shared key.
+ *
+ *  The +key+ parameter should be a string (converted to an array of bytes
+ *  internally) that is to be used by the endpoint (or association) as the
+ *  shared secret key. If an empty string is used, then a null key is set.
+ *
+ *  The +keynum+ parameter is the shared key identifier by which the
+ *  application will refer to this key. If a key of the specified index already
+ *  exists, then this new key will replace the old existing key. Note that
+ *  shared key identifier '0' defaults to a null key.
+ *
+ *  The +association_id+, if non-zero, indicates what association that the shared
+ *  key is being set upon. If this argument is zero, then the shared key is set
+ *  upon the endpoint and all future associations will use this key (if not
+ *  changed by subsequent calls). By default this is the result of the
+ *  SCTP::Socket#association_id method.
+ *
+ *  For one-to-one sockets, this parameter is ignored. Note, however, that this
+ *  option will set a key on the association if the socket is connected,
+ *  otherwise this will set a key on the endpoint.
+*/
+static VALUE rsctp_set_shared_key(int argc, VALUE* argv, VALUE self){
+  int fileno;
+  size_t len;
+  char* key;
+  uint keynum;
+  socklen_t size;
+  sctp_assoc_t assoc_id;
+  struct sctp_authkey* auth_key;
+  VALUE v_key, v_keynumber, v_assoc_id;
+
+  rb_scan_args(argc, argv, "12", &v_key, &v_keynumber, &v_assoc_id);
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  key = StringValuePtr(v_key);
+  len = strlen(key);
+  unsigned char byte_array[len+1];
+
+  for(size_t i = 0; i < len; i++)
+    byte_array[i] = key[i];
+
+  byte_array[len] = '\0';
+
+  auth_key = malloc(sizeof(auth_key) + sizeof(char[strlen(key)+1]));
+  size = sizeof(auth_key);
+
+  if(NIL_P(v_assoc_id))
+    assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  else
+    assoc_id = NUM2INT(v_assoc_id);
+
+  if(NIL_P(v_keynumber))
+    keynum = 1;
+  else
+    keynum = NUM2INT(v_keynumber);
+
+  auth_key->sca_assoc_id = assoc_id;
+  auth_key->sca_keynumber = keynum;
+  auth_key->sca_keylength = strlen(key); 
+  memcpy(auth_key->sca_key, byte_array, sizeof(byte_array));
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTH_KEY, (void*)auth_key, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return self;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#get_active_shared_key(keynum, association_id=nil)
+ *
+ * Gets the active shared key to be used to build the association shared key.
+ */
+static VALUE rsctp_get_active_shared_key(int argc, VALUE* argv, VALUE self){
+  int fileno;
+  socklen_t size;
+  struct sctp_authkeyid authkey;
+  sctp_assoc_t assoc_id;
+  VALUE v_assoc_id, v_keynum;
+  uint keynum;
+
+  rb_scan_args(argc, argv, "11", &v_keynum, &v_assoc_id);
+
+  bzero(&authkey, sizeof(authkey));
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  keynum = NUM2UINT(v_keynum);
+
+  if(NIL_P(v_assoc_id))
+    assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  else
+    assoc_id = NUM2INT(v_assoc_id);
+
+  authkey.scact_assoc_id = assoc_id;
+  authkey.scact_keynumber = keynum;
+
+  size = sizeof(struct sctp_authkeyid);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTH_ACTIVE_KEY, (void*)&authkey, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return INT2NUM(authkey.scact_keynumber);
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#set_active_shared_key(keynum, association_id=nil)
+ *
+ * Sets the active shared key to be used to build the association shared key.
+ *
+ * Th +keynum+ parameter is the shared key identifier which the application is
+ * requesting to become the active shared key to be used for sending
+ * authenticated chunks. The key identifier MUST correspond to an existing
+ * shared key. Note that shared key identifier '0' defaults to a null key.
+ *
+ * The association_idparameter, if non-zero, indicates what association that
+ * the shared key identifier is being set active upon. If this element contains
+ * zero, then the activation applies to the endpoint and all future
+ * associations will use the specified shared key identifier.
+ *
+ * For one-to-one sockets, this parameter is ignored.  Note, however, that this
+ * option will set the active key on the association if the socket is connected,
+ * otherwise this will set the default active key for the endpoint.
+ *
+ * By default, the association_id is the result of SCTP::Socket#association_id.
+ */
+static VALUE rsctp_set_active_shared_key(int argc, VALUE* argv, VALUE self){
+  int fileno;
+  socklen_t size;
+  struct sctp_authkeyid authkey;
+  sctp_assoc_t assoc_id;
+  VALUE v_assoc_id, v_keynum;
+  uint keynum;
+
+  rb_scan_args(argc, argv, "11", &v_keynum, &v_assoc_id);
+
+  keynum = NUM2UINT(v_keynum);
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+
+  if(NIL_P(v_assoc_id))
+    assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  else
+    assoc_id = NUM2INT(v_assoc_id);
+
+  authkey.scact_assoc_id = assoc_id;
+  authkey.scact_keynumber = keynum;
+  size = sizeof(struct sctp_authkeyid);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTH_ACTIVE_KEY, (void*)&authkey, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return self;
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#delete_shared_key(keynum, association_id=nil)
+ *
+ * Delete a shared secret key from use.
+ *
+ * The +keynum+ parameter is the shared key identifier which the application
+ * is requesting to be deleted. The key identifier MUST correspond to an
+ * existing shared key and MUST NOT be the current active key.
+ *
+ * If this parameter is zero, use of the null key identifier '0' is disabled
+ * on the endpoint and/or association.
+ *
+ * The +association_id+ parameter, if non-zero, indicates what association that
+ * the shared key identifier is being deleted from. By default this is the
+ * association that's returned via SCTP::Socket#association_id.
+ *
+ * If set to zero, then the shared key is deleted from the endpoint and
+ * and ALL associations will no longer use the specified shared key identifier
+ * (unless otherwise set on the association using SCTP_AUTH_KEY).
+ *
+ * For one-to-one sockets, this parameter is ignored. Note, however, that this
+ * option will delete the key from the association if the socket is connected,
+ * otherwise this will delete the key from the endpoint.
+ */
+static VALUE rsctp_delete_shared_key(int argc, VALUE* argv, VALUE self){
+  int fileno;
+  socklen_t size;
+  struct sctp_authkeyid authkey;
+  sctp_assoc_t assoc_id;
+  VALUE v_assoc_id, v_keynum;
+  uint keynum;
+
+  rb_scan_args(argc, argv, "11", &v_keynum, &v_assoc_id);
+
+  bzero(&authkey, sizeof(authkey));
+
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  keynum = NUM2UINT(v_keynum);
+
+  if(NIL_P(v_assoc_id))
+    assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+  else
+    assoc_id = NUM2INT(v_assoc_id);
+
+  authkey.scact_assoc_id = assoc_id;
+  authkey.scact_keynumber = keynum;
+
+  size = sizeof(struct sctp_authkeyid);
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_AUTH_DELETE_KEY, (void*)&authkey, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return INT2NUM(authkey.scact_keynumber);
+}
+
+/*
+ * call-seq:
+ *    SCTP::Socket#map_ipv4=(bool)
+ *
+ * If set to true and the socket is type PF_INET6, then IPv4 addresses will be
+ * mapped to V6 representation. If set to false (the default), then no mapping
+ * will be done of V4 addresses and a user will receive both PF_INET6 and
+ * PF_INET type addresses on the socket.
+ */
+static VALUE rsctp_map_ipv4(VALUE self, VALUE v_bool){
+  int fileno, boolean;
+  sctp_assoc_t assoc_id;
+  socklen_t size;
+
+  boolean = 0;
+  fileno = NUM2INT(rb_iv_get(self, "@fileno"));
+  assoc_id = NUM2INT(rb_iv_get(self, "@association_id"));
+
+  if(v_bool == Qtrue)
+    boolean = 1;
+
+  if(sctp_opt_info(fileno, assoc_id, SCTP_I_WANT_MAPPED_V4_ADDR, (void*)&boolean, &size) < 0)
+    rb_raise(rb_eSystemCallError, "sctp_opt_info: %s", strerror(errno));
+
+  return v_bool;
+}
+
 void Init_socket(void){
   mSCTP   = rb_define_module("SCTP");
   cSocket = rb_define_class_under(mSCTP, "Socket", rb_cObject);
@@ -1619,23 +2286,38 @@ void Init_socket(void){
 
   v_sctp_peer_addr_params_struct = rb_struct_define(
     "PeerAddressParams", "association_id", "address", "heartbeat_interval",
-    "max_retransmission_count", NULL
+    "max_retransmission_count", "path_mtu", "flags",
+    "ipv6_flowlabel", NULL
+  );
+
+  v_sctp_initmsg_struct = rb_struct_define(
+    "InitMsg", "num_ostreams", "max_instreams", "max_attempts", "max_init_timeout", NULL
   );
 
   rb_define_method(cSocket, "initialize", rsctp_init, -1);
 
+  rb_define_method(cSocket, "autoclose=", rsctp_set_autoclose, 1);
   rb_define_method(cSocket, "bindx", rsctp_bindx, -1);
   rb_define_method(cSocket, "close", rsctp_close, 0);
   rb_define_method(cSocket, "connectx", rsctp_connectx, -1);
+  rb_define_method(cSocket, "delete_shared_key", rsctp_delete_shared_key, -1);
+  rb_define_method(cSocket, "disable_fragments=", rsctp_disable_fragments, 1);
+  rb_define_method(cSocket, "enable_auth_support", rsctp_enable_auth_support, -1);
   rb_define_method(cSocket, "getpeernames", rsctp_getpeernames, -1);
   rb_define_method(cSocket, "getlocalnames", rsctp_getlocalnames, -1);
-  rb_define_method(cSocket, "get_status", rsctp_get_status, 0);
+  rb_define_method(cSocket, "get_active_shared_key", rsctp_get_active_shared_key, -1);
+  rb_define_method(cSocket, "get_association_info", rsctp_get_association_info, 0);
+  rb_define_method(cSocket, "get_autoclose", rsctp_get_autoclose, 0);
   rb_define_method(cSocket, "get_default_send_params", rsctp_get_default_send_params, 0);
+  rb_define_method(cSocket, "get_initmsg", rsctp_get_init_msg, 0);
+  rb_define_method(cSocket, "get_peer_address_params", rsctp_get_peer_address_params, 0);
   rb_define_method(cSocket, "get_retransmission_info", rsctp_get_retransmission_info, 0);
-  rb_define_method(cSocket, "get_association_info", rsctp_get_association_info, 0);
+  rb_define_method(cSocket, "get_status", rsctp_get_status, 0);
   rb_define_method(cSocket, "get_subscriptions", rsctp_get_subscriptions, 0);
-  rb_define_method(cSocket, "get_peer_address_params", rsctp_get_peer_address_params, 0);
   rb_define_method(cSocket, "listen", rsctp_listen, -1);
+  rb_define_method(cSocket, "map_ipv4=", rsctp_map_ipv4, 1);
+  rb_define_method(cSocket, "nodelay?", rsctp_get_nodelay, 0);
+  rb_define_method(cSocket, "nodelay=", rsctp_set_nodelay, 1);
   rb_define_method(cSocket, "peeloff", rsctp_peeloff, 1);
   rb_define_method(cSocket, "recvmsg", rsctp_recvmsg, -1);
   rb_define_method(cSocket, "send", rsctp_send, 1);
@@ -1649,7 +2331,10 @@ void Init_socket(void){
 #endif
 
   rb_define_method(cSocket, "sendmsg", rsctp_sendmsg, 1);
+  rb_define_method(cSocket, "set_active_shared_key", rsctp_set_active_shared_key, -1);
   rb_define_method(cSocket, "set_initmsg", rsctp_set_initmsg, 1);
+  //rb_define_method(cSocket, "set_retransmission_info", rsctp_set_retransmission_info, -1);
+  rb_define_method(cSocket, "set_shared_key", rsctp_set_shared_key, -1);
   rb_define_method(cSocket, "shutdown", rsctp_shutdown, -1);
   rb_define_method(cSocket, "subscribe", rsctp_subscribe, 1);
 
@@ -1659,8 +2344,8 @@ void Init_socket(void){
   rb_define_attr(cSocket, "association_id", 1, 1);
   rb_define_attr(cSocket, "port", 1, 1);
 
-  /* 0.1.0: The version of this library */
-  rb_define_const(cSocket, "VERSION", rb_str_new2("0.1.0"));
+  /* 0.1.2: The version of this library */
+  rb_define_const(cSocket, "VERSION", rb_str_new2("0.1.2"));
 
   /* send flags */
 
@@ -1683,7 +2368,9 @@ void Init_socket(void){
 
   // ASSOCIATION STATES //
 
+#ifdef HAVE_SCTP_EMPTY
   rb_define_const(cSocket, "SCTP_EMPTY", INT2NUM(SCTP_EMPTY));
+#endif
   rb_define_const(cSocket, "SCTP_CLOSED", INT2NUM(SCTP_CLOSED));
   rb_define_const(cSocket, "SCTP_COOKIE_WAIT", INT2NUM(SCTP_COOKIE_WAIT));
   rb_define_const(cSocket, "SCTP_COOKIE_ECHOED", INT2NUM(SCTP_COOKIE_ECHOED));