/**********************************************************************

  object.c -

  $Author$
  created at: Thu Jul 15 12:01:24 JST 1993

  Copyright (C) 1993-2007 Yukihiro Matsumoto
  Copyright (C) 2000  Network Applied Communication Laboratory, Inc.
  Copyright (C) 2000  Information-technology Promotion Agency, Japan

**********************************************************************/

#include "ruby/ruby.h"
#include "ruby/st.h"
#include "ruby/util.h"
#include "debug.h"
#include <stdio.h>
#include <errno.h>
#include <ctype.h>
#include <math.h>
#include <float.h>

VALUE rb_cBasicObject;
VALUE rb_mKernel;
VALUE rb_cObject;
VALUE rb_cModule;
VALUE rb_cClass;
VALUE rb_cData;

VALUE rb_cNilClass;
VALUE rb_cTrueClass;
VALUE rb_cFalseClass;

static ID id_eq, id_eql, id_match, id_inspect, id_init_copy;

/*
 *  call-seq:
 *     obj === other   => true or false
 *  
 *  Case Equality---For class <code>Object</code>, effectively the same
 *  as calling  <code>#==</code>, but typically overridden by descendents
 *  to provide meaningful semantics in <code>case</code> statements.
 */

VALUE
rb_equal(VALUE obj1, VALUE obj2)
{
    VALUE result;

    if (obj1 == obj2) return Qtrue;
    result = rb_funcall(obj1, id_eq, 1, obj2);
    if (RTEST(result)) return Qtrue;
    return Qfalse;
}

int
rb_eql(VALUE obj1, VALUE obj2)
{
    return RTEST(rb_funcall(obj1, id_eql, 1, obj2));
}

/*
 *  call-seq:
 *     obj == other        => true or false
 *     obj.equal?(other)   => true or false
 *     obj.eql?(other)     => true or false
 *  
 *  Equality---At the <code>Object</code> level, <code>==</code> returns
 *  <code>true</code> only if <i>obj</i> and <i>other</i> are the
 *  same object. Typically, this method is overridden in descendent
 *  classes to provide class-specific meaning.
 *
 *  Unlike <code>==</code>, the <code>equal?</code> method should never be
 *  overridden by subclasses: it is used to determine object identity
 *  (that is, <code>a.equal?(b)</code> iff <code>a</code> is the same
 *  object as <code>b</code>).
 *
 *  The <code>eql?</code> method returns <code>true</code> if
 *  <i>obj</i> and <i>anObject</i> have the same value. Used by
 *  <code>Hash</code> to test members for equality.  For objects of
 *  class <code>Object</code>, <code>eql?</code> is synonymous with
 *  <code>==</code>. Subclasses normally continue this tradition, but
 *  there are exceptions. <code>Numeric</code> types, for example,
 *  perform type conversion across <code>==</code>, but not across
 *  <code>eql?</code>, so:
 *     
 *     1 == 1.0     #=> true
 *     1.eql? 1.0   #=> false
 */

VALUE
rb_obj_equal(VALUE obj1, VALUE obj2)
{
    if (obj1 == obj2) return Qtrue;
    return Qfalse;
}

/*
 *  call-seq:
 *     !obj    => true or false
 *
 *  Boolean negate.
 */

VALUE
rb_obj_not(VALUE obj)
{
    return RTEST(obj) ? Qfalse : Qtrue;
}

/*
 *  call-seq:
 *     obj != other        => true or false
 *
 *  Returns true if two objects are not-equal, otherwise false.
 */

VALUE
rb_obj_not_equal(VALUE obj1, VALUE obj2)
{
    VALUE result = rb_funcall(obj1, id_eq, 1, obj2);
    return RTEST(result) ? Qfalse : Qtrue;
}

VALUE
rb_class_real(VALUE cl)
{
    if (cl == 0)
        return 0;
    while ((RBASIC(cl)->flags & FL_SINGLETON) || BUILTIN_TYPE(cl) == T_ICLASS) {
	cl = RCLASS_SUPER(cl);
    }
    return cl;
}

/*
 *  call-seq:
 *     obj.class    => class
 *  
 *  Returns the class of <i>obj</i>, now preferred over
 *  <code>Object#type</code>, as an object's type in Ruby is only
 *  loosely tied to that object's class. This method must always be
 *  called with an explicit receiver, as <code>class</code> is also a
 *  reserved word in Ruby.
 *     
 *     1.class      #=> Fixnum
 *     self.class   #=> Object
 */

VALUE
rb_obj_class(VALUE obj)
{
    return rb_class_real(CLASS_OF(obj));
}

static void
init_copy(VALUE dest, VALUE obj)
{
    if (OBJ_FROZEN(dest)) {
        rb_raise(rb_eTypeError, "[bug] frozen object (%s) allocated", rb_obj_classname(dest));
    }
    RBASIC(dest)->flags &= ~(T_MASK|FL_EXIVAR);
    RBASIC(dest)->flags |= RBASIC(obj)->flags & (T_MASK|FL_EXIVAR|FL_TAINT|FL_UNTRUSTED);
    rb_copy_generic_ivar(dest, obj);
    rb_gc_copy_finalizer(dest, obj);
    switch (TYPE(obj)) {
      case T_OBJECT:
        if (!(RBASIC(dest)->flags & ROBJECT_EMBED) && ROBJECT_IVPTR(dest)) {
            xfree(ROBJECT_IVPTR(dest));
            ROBJECT(dest)->as.heap.ivptr = 0;
            ROBJECT(dest)->as.heap.numiv = 0;
            ROBJECT(dest)->as.heap.iv_index_tbl = 0;
        }
        if (RBASIC(obj)->flags & ROBJECT_EMBED) {
            MEMCPY(ROBJECT(dest)->as.ary, ROBJECT(obj)->as.ary, VALUE, ROBJECT_EMBED_LEN_MAX);
            RBASIC(dest)->flags |= ROBJECT_EMBED;
        }
        else {
            long len = ROBJECT(obj)->as.heap.numiv;
            VALUE *ptr = ALLOC_N(VALUE, len);
            MEMCPY(ptr, ROBJECT(obj)->as.heap.ivptr, VALUE, len);
            ROBJECT(dest)->as.heap.ivptr = ptr;
            ROBJECT(dest)->as.heap.numiv = len;
            ROBJECT(dest)->as.heap.iv_index_tbl = ROBJECT(obj)->as.heap.iv_index_tbl;
            RBASIC(dest)->flags &= ~ROBJECT_EMBED;
        }
        break;
      case T_CLASS:
      case T_MODULE:
	if (RCLASS_IV_TBL(dest)) {
	    st_free_table(RCLASS_IV_TBL(dest));
	    RCLASS_IV_TBL(dest) = 0;
	}
	if (RCLASS_IV_TBL(obj)) {
	    RCLASS_IV_TBL(dest) = st_copy(RCLASS_IV_TBL(obj));
	}
        break;
    }
    rb_funcall(dest, id_init_copy, 1, obj);
}

/*
 *  call-seq:
 *     obj.clone -> an_object
 *  
 *  Produces a shallow copy of <i>obj</i>---the instance variables of
 *  <i>obj</i> are copied, but not the objects they reference. Copies
 *  the frozen and tainted state of <i>obj</i>. See also the discussion
 *  under <code>Object#dup</code>.
 *     
 *     class Klass
 *        attr_accessor :str
 *     end
 *     s1 = Klass.new      #=> #<Klass:0x401b3a38>
 *     s1.str = "Hello"    #=> "Hello"
 *     s2 = s1.clone       #=> #<Klass:0x401b3998 @str="Hello">
 *     s2.str[1,4] = "i"   #=> "i"
 *     s1.inspect          #=> "#<Klass:0x401b3a38 @str=\"Hi\">"
 *     s2.inspect          #=> "#<Klass:0x401b3998 @str=\"Hi\">"
 *
 *  This method may have class-specific behavior.  If so, that
 *  behavior will be documented under the #+initialize_copy+ method of
 *  the class.
 */

VALUE
rb_obj_clone(VALUE obj)
{
    VALUE clone;

    if (rb_special_const_p(obj)) {
        rb_raise(rb_eTypeError, "can't clone %s", rb_obj_classname(obj));
    }
    clone = rb_obj_alloc(rb_obj_class(obj));
    RBASIC(clone)->klass = rb_singleton_class_clone(obj);
    RBASIC(clone)->flags = (RBASIC(obj)->flags | FL_TEST(clone, FL_TAINT) | FL_TEST(clone, FL_UNTRUSTED)) & ~(FL_FREEZE|FL_FINALIZE);
    init_copy(clone, obj);
    RBASIC(clone)->flags |= RBASIC(obj)->flags & FL_FREEZE;

    return clone;
}

/*
 *  call-seq:
 *     obj.dup -> an_object
 *  
 *  Produces a shallow copy of <i>obj</i>---the instance variables of
 *  <i>obj</i> are copied, but not the objects they reference.
 *  <code>dup</code> copies the tainted state of <i>obj</i>. See also
 *  the discussion under <code>Object#clone</code>. In general,
 *  <code>clone</code> and <code>dup</code> may have different semantics
 *  in descendent classes. While <code>clone</code> is used to duplicate
 *  an object, including its internal state, <code>dup</code> typically
 *  uses the class of the descendent object to create the new instance.
 *
 *  This method may have class-specific behavior.  If so, that
 *  behavior will be documented under the #+initialize_copy+ method of
 *  the class.
 */

VALUE
rb_obj_dup(VALUE obj)
{
    VALUE dup;

    if (rb_special_const_p(obj)) {
        rb_raise(rb_eTypeError, "can't dup %s", rb_obj_classname(obj));
    }
    dup = rb_obj_alloc(rb_obj_class(obj));
    init_copy(dup, obj);

    return dup;
}

/* :nodoc: */
VALUE
rb_obj_init_copy(VALUE obj, VALUE orig)
{
    if (obj == orig) return obj;
    rb_check_frozen(obj);
    if (TYPE(obj) != TYPE(orig) || rb_obj_class(obj) != rb_obj_class(orig)) {
	rb_raise(rb_eTypeError, "initialize_copy should take same class object");
    }
    return obj;
}

/*
 *  call-seq:
 *     obj.to_s    => string
 *  
 *  Returns a string representing <i>obj</i>. The default
 *  <code>to_s</code> prints the object's class and an encoding of the
 *  object id. As a special case, the top-level object that is the
 *  initial execution context of Ruby programs returns ``main.''
 */

VALUE
rb_any_to_s(VALUE obj)
{
    const char *cname = rb_obj_classname(obj);
    VALUE str;

    str = rb_sprintf("#<%s:%p>", cname, (void*)obj);
    OBJ_INFECT(str, obj);

    return str;
}

VALUE
rb_inspect(VALUE obj)
{
    return rb_obj_as_string(rb_funcall(obj, id_inspect, 0, 0));
}

static int
inspect_i(ID id, VALUE value, VALUE str)
{
    VALUE str2;
    const char *ivname;

    /* need not to show internal data */
    if (CLASS_OF(value) == 0) return ST_CONTINUE;
    if (!rb_is_instance_id(id)) return ST_CONTINUE;
    if (RSTRING_PTR(str)[0] == '-') { /* first element */
	RSTRING_PTR(str)[0] = '#';
	rb_str_cat2(str, " ");
    }
    else {
	rb_str_cat2(str, ", ");
    }
    ivname = rb_id2name(id);
    rb_str_cat2(str, ivname);
    rb_str_cat2(str, "=");
    str2 = rb_inspect(value);
    rb_str_append(str, str2);
    OBJ_INFECT(str, str2);

    return ST_CONTINUE;
}

static VALUE
inspect_obj(VALUE obj, VALUE str, int recur)
{
    if (recur) {
	rb_str_cat2(str, " ...");
    }
    else {
	rb_ivar_foreach(obj, inspect_i, str);
    }
    rb_str_cat2(str, ">");
    RSTRING_PTR(str)[0] = '#';
    OBJ_INFECT(str, obj);

    return str;
}

/*
 *  call-seq:
 *     obj.inspect   => string
 *  
 *  Returns a string containing a human-readable representation of
 *  <i>obj</i>. If not overridden, uses the <code>to_s</code> method to
 *  generate the string.
 *     
 *     [ 1, 2, 3..4, 'five' ].inspect   #=> "[1, 2, 3..4, \"five\"]"
 *     Time.new.inspect                 #=> "2008-03-08 19:43:39 +0900"
 */


static VALUE
rb_obj_inspect(VALUE obj)
{

    if (TYPE(obj) == T_OBJECT) {
        int has_ivar = 0;
        VALUE *ptr = ROBJECT_IVPTR(obj);
        long len = ROBJECT_NUMIV(obj);
        long i;

        for (i = 0; i < len; i++) {
            if (ptr[i] != Qundef) {
                has_ivar = 1;
                break;
            }
        }

        if (has_ivar) {
            VALUE str;
            const char *c = rb_obj_classname(obj);

            str = rb_sprintf("-<%s:%p", c, (void*)obj);
            return rb_exec_recursive(inspect_obj, obj, str);
        }
    }
    return rb_funcall(obj, rb_intern("to_s"), 0, 0);
}


/*
 *  call-seq:
 *     obj.instance_of?(class)    => true or false
 *  
 *  Returns <code>true</code> if <i>obj</i> is an instance of the given
 *  class. See also <code>Object#kind_of?</code>.
 */

VALUE
rb_obj_is_instance_of(VALUE obj, VALUE c)
{
    switch (TYPE(c)) {
      case T_MODULE:
      case T_CLASS:
      case T_ICLASS:
	break;
      default:
	rb_raise(rb_eTypeError, "class or module required");
    }

    if (rb_obj_class(obj) == c) return Qtrue;
    return Qfalse;
}


/*
 *  call-seq:
 *     obj.is_a?(class)       => true or false
 *     obj.kind_of?(class)    => true or false
 *  
 *  Returns <code>true</code> if <i>class</i> is the class of
 *  <i>obj</i>, or if <i>class</i> is one of the superclasses of
 *  <i>obj</i> or modules included in <i>obj</i>.
 *     
 *     module M;    end
 *     class A
 *       include M
 *     end
 *     class B < A; end
 *     class C < B; end
 *     b = B.new
 *     b.instance_of? A   #=> false
 *     b.instance_of? B   #=> true
 *     b.instance_of? C   #=> false
 *     b.instance_of? M   #=> false
 *     b.kind_of? A       #=> true
 *     b.kind_of? B       #=> true
 *     b.kind_of? C       #=> false
 *     b.kind_of? M       #=> true
 */

VALUE
rb_obj_is_kind_of(VALUE obj, VALUE c)
{
    VALUE cl = CLASS_OF(obj);

    switch (TYPE(c)) {
      case T_MODULE:
      case T_CLASS:
      case T_ICLASS:
	break;

      default:
	rb_raise(rb_eTypeError, "class or module required");
    }

    while (cl) {
	if (cl == c || RCLASS_M_TBL(cl) == RCLASS_M_TBL(c))
	    return Qtrue;
	cl = RCLASS_SUPER(cl);
    }
    return Qfalse;
}


/*
 *  call-seq:
 *     obj.tap{|x|...}    => obj
 *  
 *  Yields <code>x</code> to the block, and then returns <code>x</code>.
 *  The primary purpose of this method is to "tap into" a method chain,
 *  in order to perform operations on intermediate results within the chain.
 *
 *	(1..10)                .tap {|x| puts "original: #{x.inspect}"}
 *	  .to_a                .tap {|x| puts "array: #{x.inspect}"}
 *	  .select {|x| x%2==0} .tap {|x| puts "evens: #{x.inspect}"}
 *	  .map { |x| x*x }     .tap {|x| puts "squares: #{x.inspect}"}
 *
 */

VALUE
rb_obj_tap(VALUE obj)
{
    rb_yield(obj);
    return obj;
}


/*
 * Document-method: inherited
 *
 * call-seq:
 *    inherited(subclass)
 *
 * Callback invoked whenever a subclass of the current class is created.
 *
 * Example:
 *
 *    class Foo
 *       def self.inherited(subclass)
 *          puts "New subclass: #{subclass}"
 *       end
 *    end
 *
 *    class Bar < Foo
 *    end
 *
 *    class Baz < Bar
 *    end
 *
 * produces:
 *
 *    New subclass: Bar
 *    New subclass: Baz
 */

/*
 * Document-method: singleton_method_added
 *
 *  call-seq:
 *     singleton_method_added(symbol)
 *  
 *  Invoked as a callback whenever a singleton method is added to the
 *  receiver.
 *     
 *     module Chatty
 *       def Chatty.singleton_method_added(id)
 *         puts "Adding #{id.id2name}"
 *       end
 *       def self.one()     end
 *       def two()          end
 *       def Chatty.three() end
 *     end
 *     
 *  <em>produces:</em>
 *     
 *     Adding singleton_method_added
 *     Adding one
 *     Adding three
 *     
 */

/*
 * Document-method: singleton_method_removed
 *
 *  call-seq:
 *     singleton_method_removed(symbol)
 *  
 *  Invoked as a callback whenever a singleton method is removed from
 *  the receiver.
 *     
 *     module Chatty
 *       def Chatty.singleton_method_removed(id)
 *         puts "Removing #{id.id2name}"
 *       end
 *       def self.one()     end
 *       def two()          end
 *       def Chatty.three() end
 *       class <<self
 *         remove_method :three
 *         remove_method :one
 *       end
 *     end
 *     
 *  <em>produces:</em>
 *     
 *     Removing three
 *     Removing one
 */

/*
 * Document-method: singleton_method_undefined
 *
 *  call-seq:
 *     singleton_method_undefined(symbol)
 *  
 *  Invoked as a callback whenever a singleton method is undefined in
 *  the receiver.
 *     
 *     module Chatty
 *       def Chatty.singleton_method_undefined(id)
 *         puts "Undefining #{id.id2name}"
 *       end
 *       def Chatty.one()   end
 *       class << self
 *          undef_method(:one)
 *       end
 *     end
 *     
 *  <em>produces:</em>
 *     
 *     Undefining one
 */


/*
 * Document-method: included
 *
 * call-seq:
 *    included( othermod )
 *
 * Callback invoked whenever the receiver is included in another
 * module or class. This should be used in preference to
 * <tt>Module.append_features</tt> if your code wants to perform some
 * action when a module is included in another.
 *
 *        module A
 *          def A.included(mod)
 *            puts "#{self} included in #{mod}"
 *          end
 *        end
 *        module Enumerable
 *          include A
 *        end
 */


/*
 * Not documented
 */

static VALUE
rb_obj_dummy(void)
{
    return Qnil;
}

/*
 *  call-seq:
 *     obj.tainted?    => true or false
 *  
 *  Returns <code>true</code> if the object is tainted.
 */

VALUE
rb_obj_tainted(VALUE obj)
{
    if (OBJ_TAINTED(obj))
	return Qtrue;
    return Qfalse;
}

/*
 *  call-seq:
 *     obj.taint -> obj
 *  
 *  Marks <i>obj</i> as tainted---if the <code>$SAFE</code> level is
 *  set appropriately, many method calls which might alter the running
 *  programs environment will refuse to accept tainted strings.
 */

VALUE
rb_obj_taint(VALUE obj)
{
    rb_secure(4);
    if (!OBJ_TAINTED(obj)) {
	if (OBJ_FROZEN(obj)) {
	    rb_error_frozen("object");
	}
	OBJ_TAINT(obj);
    }
    return obj;
}


/*
 *  call-seq:
 *     obj.untaint    => obj
 *  
 *  Removes the taint from <i>obj</i>.
 */

VALUE
rb_obj_untaint(VALUE obj)
{
    rb_secure(3);
    if (OBJ_TAINTED(obj)) {
	if (OBJ_FROZEN(obj)) {
	    rb_error_frozen("object");
	}
	FL_UNSET(obj, FL_TAINT);
    }
    return obj;
}

/*
 *  call-seq:
 *     obj.untrusted?    => true or false
 *  
 *  Returns <code>true</code> if the object is untrusted.
 */

VALUE
rb_obj_untrusted(VALUE obj)
{
    if (OBJ_UNTRUSTED(obj))
	return Qtrue;
    return Qfalse;
}

/*
 *  call-seq:
 *     obj.untrust -> obj
 *  
 *  Marks <i>obj</i> as untrusted.
 */

VALUE
rb_obj_untrust(VALUE obj)
{
    rb_secure(4);
    if (!OBJ_UNTRUSTED(obj)) {
	if (OBJ_FROZEN(obj)) {
	    rb_error_frozen("object");
	}
	OBJ_UNTRUST(obj);
    }
    return obj;
}


/*
 *  call-seq:
 *     obj.trust    => obj
 *  
 *  Removes the untrusted mark from <i>obj</i>.
 */

VALUE
rb_obj_trust(VALUE obj)
{
    rb_secure(3);
    if (OBJ_UNTRUSTED(obj)) {
	if (OBJ_FROZEN(obj)) {
	    rb_error_frozen("object");
	}
	FL_UNSET(obj, FL_UNTRUSTED);
    }
    return obj;
}

void
rb_obj_infect(VALUE obj1, VALUE obj2)
{
    OBJ_INFECT(obj1, obj2);
}

static st_table *immediate_frozen_tbl = 0;

/*
 *  call-seq:
 *     obj.freeze    => obj
 *  
 *  Prevents further modifications to <i>obj</i>. A
 *  <code>TypeError</code> will be raised if modification is attempted.
 *  There is no way to unfreeze a frozen object. See also
 *  <code>Object#frozen?</code>.
 *     
 *     a = [ "a", "b", "c" ]
 *     a.freeze
 *     a << "z"
 *     
 *  <em>produces:</em>
 *     
 *     prog.rb:3:in `<<': can't modify frozen array (TypeError)
 *     	from prog.rb:3
 */

VALUE
rb_obj_freeze(VALUE obj)
{
    if (!OBJ_FROZEN(obj)) {
	if (rb_safe_level() >= 4 && !OBJ_UNTRUSTED(obj)) {
	    rb_raise(rb_eSecurityError, "Insecure: can't freeze object");
	}
	OBJ_FREEZE(obj);
	if (SPECIAL_CONST_P(obj)) {
	    if (!immediate_frozen_tbl) {
		immediate_frozen_tbl = st_init_numtable();
	    }
	    st_insert(immediate_frozen_tbl, obj, (st_data_t)Qtrue);
	}
    }
    return obj;
}

/*
 *  call-seq:
 *     obj.frozen?    => true or false
 *  
 *  Returns the freeze status of <i>obj</i>.
 *     
 *     a = [ "a", "b", "c" ]
 *     a.freeze    #=> ["a", "b", "c"]
 *     a.frozen?   #=> true
 */

VALUE
rb_obj_frozen_p(VALUE obj)
{
    if (OBJ_FROZEN(obj)) return Qtrue;
    if (SPECIAL_CONST_P(obj)) {
	if (!immediate_frozen_tbl) return Qfalse;
	if (st_lookup(immediate_frozen_tbl, obj, 0)) return Qtrue;
    }
    return Qfalse;
}


/*
 * Document-class: NilClass
 *
 *  The class of the singleton object <code>nil</code>.
 */

/*
 *  call-seq:
 *     nil.to_i => 0
 *  
 *  Always returns zero.
 *     
 *     nil.to_i   #=> 0
 */


static VALUE
nil_to_i(VALUE obj)
{
    return INT2FIX(0);
}

/*
 *  call-seq:
 *     nil.to_f    => 0.0
 *  
 *  Always returns zero.
 *     
 *     nil.to_f   #=> 0.0
 */

static VALUE
nil_to_f(VALUE obj)
{
    return DOUBLE2NUM(0.0);
}

/*
 *  call-seq:
 *     nil.to_s    => ""
 *  
 *  Always returns the empty string.
 */

static VALUE
nil_to_s(VALUE obj)
{
    return rb_usascii_str_new(0, 0);
}

/*
 * Document-method: to_a
 *
 *  call-seq:
 *     nil.to_a    => []
 *  
 *  Always returns an empty array.
 *     
 *     nil.to_a   #=> []
 */

static VALUE
nil_to_a(VALUE obj)
{
    return rb_ary_new2(0);
}

/*
 *  call-seq:
 *    nil.inspect  => "nil"
 *
 *  Always returns the string "nil".
 */

static VALUE
nil_inspect(VALUE obj)
{
    return rb_usascii_str_new2("nil");
}

/***********************************************************************
 *  Document-class: TrueClass
 *
 *  The global value <code>true</code> is the only instance of class
 *  <code>TrueClass</code> and represents a logically true value in
 *  boolean expressions. The class provides operators allowing
 *  <code>true</code> to be used in logical expressions.
 */


/*
 * call-seq:
 *   true.to_s   =>  "true"
 *
 * The string representation of <code>true</code> is "true".
 */

static VALUE
true_to_s(VALUE obj)
{
    return rb_usascii_str_new2("true");
}


/*
 *  call-seq:
 *     true & obj    => true or false
 *  
 *  And---Returns <code>false</code> if <i>obj</i> is
 *  <code>nil</code> or <code>false</code>, <code>true</code> otherwise.
 */

static VALUE
true_and(VALUE obj, VALUE obj2)
{
    return RTEST(obj2)?Qtrue:Qfalse;
}

/*
 *  call-seq:
 *     true | obj   => true
 *  
 *  Or---Returns <code>true</code>. As <i>anObject</i> is an argument to
 *  a method call, it is always evaluated; there is no short-circuit
 *  evaluation in this case.
 *     
 *     true |  puts("or")
 *     true || puts("logical or")
 *     
 *  <em>produces:</em>
 *     
 *     or
 */

static VALUE
true_or(VALUE obj, VALUE obj2)
{
    return Qtrue;
}


/*
 *  call-seq:
 *     true ^ obj   => !obj
 *  
 *  Exclusive Or---Returns <code>true</code> if <i>obj</i> is
 *  <code>nil</code> or <code>false</code>, <code>false</code>
 *  otherwise.
 */

static VALUE
true_xor(VALUE obj, VALUE obj2)
{
    return RTEST(obj2)?Qfalse:Qtrue;
}


/*
 *  Document-class: FalseClass
 *
 *  The global value <code>false</code> is the only instance of class
 *  <code>FalseClass</code> and represents a logically false value in
 *  boolean expressions. The class provides operators allowing
 *  <code>false</code> to participate correctly in logical expressions.
 *     
 */

/*
 * call-seq:
 *   false.to_s   =>  "false"
 *
 * 'nuf said...
 */

static VALUE
false_to_s(VALUE obj)
{
    return rb_usascii_str_new2("false");
}

/*
 *  call-seq:
 *     false & obj   => false
 *     nil & obj     => false
 *  
 *  And---Returns <code>false</code>. <i>obj</i> is always
 *  evaluated as it is the argument to a method call---there is no
 *  short-circuit evaluation in this case.
 */

static VALUE
false_and(VALUE obj, VALUE obj2)
{
    return Qfalse;
}


/*
 *  call-seq:
 *     false | obj   =>   true or false
 *     nil   | obj   =>   true or false
 *  
 *  Or---Returns <code>false</code> if <i>obj</i> is
 *  <code>nil</code> or <code>false</code>; <code>true</code> otherwise.
 */

static VALUE
false_or(VALUE obj, VALUE obj2)
{
    return RTEST(obj2)?Qtrue:Qfalse;
}



/*
 *  call-seq:
 *     false ^ obj    => true or false
 *     nil   ^ obj    => true or false
 *  
 *  Exclusive Or---If <i>obj</i> is <code>nil</code> or
 *  <code>false</code>, returns <code>false</code>; otherwise, returns
 *  <code>true</code>.
 *     
 */

static VALUE
false_xor(VALUE obj, VALUE obj2)
{
    return RTEST(obj2)?Qtrue:Qfalse;
}

/*
 * call_seq:
 *   nil.nil?               => true
 *
 * Only the object <i>nil</i> responds <code>true</code> to <code>nil?</code>.
 */

static VALUE
rb_true(VALUE obj)
{
    return Qtrue;
}

/*
 * call_seq:
 *   nil.nil?               => true
 *   <anything_else>.nil?   => false
 *
 * Only the object <i>nil</i> responds <code>true</code> to <code>nil?</code>.
 */


static VALUE
rb_false(VALUE obj)
{
    return Qfalse;
}


/*
 *  call-seq:
 *     obj =~ other  => nil
 *  
 *  Pattern Match---Overridden by descendents (notably
 *  <code>Regexp</code> and <code>String</code>) to provide meaningful
 *  pattern-match semantics.
 */

static VALUE
rb_obj_match(VALUE obj1, VALUE obj2)
{
    return Qnil;
}

/*
 *  call-seq:
 *     obj !~ other  => nil
 *  
 *  Returns true if two objects does not match, using <i>=~</i> method.
 */

static VALUE
rb_obj_not_match(VALUE obj1, VALUE obj2)
{
    VALUE result = rb_funcall(obj1, id_match, 1, obj2);
    return RTEST(result) ? Qfalse : Qtrue;
}


/***********************************************************************
 *
 * Document-class: Module
 *
 *  A <code>Module</code> is a collection of methods and constants. The
 *  methods in a module may be instance methods or module methods.
 *  Instance methods appear as methods in a class when the module is
 *  included, module methods do not. Conversely, module methods may be
 *  called without creating an encapsulating object, while instance
 *  methods may not. (See <code>Module#module_function</code>)
 *     
 *  In the descriptions that follow, the parameter <i>syml</i> refers
 *  to a symbol, which is either a quoted string or a
 *  <code>Symbol</code> (such as <code>:name</code>).
 *     
 *     module Mod
 *       include Math
 *       CONST = 1
 *       def meth
 *         #  ...
 *       end
 *     end
 *     Mod.class              #=> Module
 *     Mod.constants          #=> [:CONST, :PI, :E]
 *     Mod.instance_methods   #=> [:meth]
 *     
 */

/*
 * call-seq:
 *   mod.to_s   => string
 *
 * Return a string representing this module or class. For basic
 * classes and modules, this is the name. For singletons, we
 * show information on the thing we're attached to as well.
 */

static VALUE
rb_mod_to_s(VALUE klass)
{
    if (FL_TEST(klass, FL_SINGLETON)) {
	VALUE s = rb_usascii_str_new2("#<");
	VALUE v = rb_iv_get(klass, "__attached__");

	rb_str_cat2(s, "Class:");
	switch (TYPE(v)) {
	  case T_CLASS: case T_MODULE:
	    rb_str_append(s, rb_inspect(v));
	    break;
	  default:
	    rb_str_append(s, rb_any_to_s(v));
	    break;
	}
	rb_str_cat2(s, ">");

	return s;
    }
    return rb_str_dup(rb_class_name(klass));
}

/*
 *  call-seq:
 *     mod.freeze
 *  
 *  Prevents further modifications to <i>mod</i>.
 */

static VALUE
rb_mod_freeze(VALUE mod)
{
    rb_class_name(mod);
    return rb_obj_freeze(mod);
}

/*
 *  call-seq:
 *     mod === obj    => true or false
 *  
 *  Case Equality---Returns <code>true</code> if <i>anObject</i> is an
 *  instance of <i>mod</i> or one of <i>mod</i>'s descendents. Of
 *  limited use for modules, but can be used in <code>case</code>
 *  statements to classify objects by class.
 */

static VALUE
rb_mod_eqq(VALUE mod, VALUE arg)
{
    return rb_obj_is_kind_of(arg, mod);
}

/*
 * call-seq:
 *   mod <= other   =>  true, false, or nil
 *
 * Returns true if <i>mod</i> is a subclass of <i>other</i> or
 * is the same as <i>other</i>. Returns 
 * <code>nil</code> if there's no relationship between the two. 
 * (Think of the relationship in terms of the class definition: 
 * "class A<B" implies "A<B").
 *
 */

VALUE
rb_class_inherited_p(VALUE mod, VALUE arg)
{
    VALUE start = mod;

    if (mod == arg) return Qtrue;
    switch (TYPE(arg)) {
      case T_MODULE:
      case T_CLASS:
	break;
      default:
	rb_raise(rb_eTypeError, "compared with non class/module");
    }
    while (mod) {
	if (RCLASS_M_TBL(mod) == RCLASS_M_TBL(arg))
	    return Qtrue;
	mod = RCLASS_SUPER(mod);
    }
    /* not mod < arg; check if mod > arg */
    while (arg) {
	if (RCLASS_M_TBL(arg) == RCLASS_M_TBL(start))
	    return Qfalse;
	arg = RCLASS_SUPER(arg);
    }
    return Qnil;
}

/*
 * call-seq:
 *   mod < other   =>  true, false, or nil
 *
 * Returns true if <i>mod</i> is a subclass of <i>other</i>. Returns 
 * <code>nil</code> if there's no relationship between the two. 
 * (Think of the relationship in terms of the class definition: 
 * "class A<B" implies "A<B").
 *
 */

static VALUE
rb_mod_lt(VALUE mod, VALUE arg)
{
    if (mod == arg) return Qfalse;
    return rb_class_inherited_p(mod, arg);
}


/*
 * call-seq:
 *   mod >= other   =>  true, false, or nil
 *
 * Returns true if <i>mod</i> is an ancestor of <i>other</i>, or the
 * two modules are the same. Returns 
 * <code>nil</code> if there's no relationship between the two. 
 * (Think of the relationship in terms of the class definition: 
 * "class A<B" implies "B>A").
 *
 */

static VALUE
rb_mod_ge(VALUE mod, VALUE arg)
{
    switch (TYPE(arg)) {
      case T_MODULE:
      case T_CLASS:
	break;
      default:
	rb_raise(rb_eTypeError, "compared with non class/module");
    }

    return rb_class_inherited_p(arg, mod);
}

/*
 * call-seq:
 *   mod > other   =>  true, false, or nil
 *
 * Returns true if <i>mod</i> is an ancestor of <i>other</i>. Returns 
 * <code>nil</code> if there's no relationship between the two. 
 * (Think of the relationship in terms of the class definition: 
 * "class A<B" implies "B>A").
 *
 */

static VALUE
rb_mod_gt(VALUE mod, VALUE arg)
{
    if (mod == arg) return Qfalse;
    return rb_mod_ge(mod, arg);
}

/*
 *  call-seq:
 *     mod <=> other_mod   => -1, 0, +1, or nil
 *  
 *  Comparison---Returns -1 if <i>mod</i> includes <i>other_mod</i>, 0 if
 *  <i>mod</i> is the same as <i>other_mod</i>, and +1 if <i>mod</i> is
 *  included by <i>other_mod</i> or if <i>mod</i> has no relationship with
 *  <i>other_mod</i>. Returns <code>nil</code> if <i>other_mod</i> is
 *  not a module.
 */

static VALUE
rb_mod_cmp(VALUE mod, VALUE arg)
{
    VALUE cmp;

    if (mod == arg) return INT2FIX(0);
    switch (TYPE(arg)) {
      case T_MODULE:
      case T_CLASS:
	break;
      default:
	return Qnil;
    }

    cmp = rb_class_inherited_p(mod, arg);
    if (NIL_P(cmp)) return Qnil;
    if (cmp) {
	return INT2FIX(-1);
    }
    return INT2FIX(1);
}

static VALUE
rb_module_s_alloc(VALUE klass)
{
    VALUE mod = rb_module_new();

    RBASIC(mod)->klass = klass;
    return mod;
}

static VALUE
rb_class_s_alloc(VALUE klass)
{
    return rb_class_boot(0);
}

/*
 *  call-seq:
 *    Module.new                  => mod
 *    Module.new {|mod| block }   => mod
 *  
 *  Creates a new anonymous module. If a block is given, it is passed
 *  the module object, and the block is evaluated in the context of this
 *  module using <code>module_eval</code>.
 *     
 *     Fred = Module.new do
 *       def meth1
 *         "hello"
 *       end
 *       def meth2
 *         "bye"
 *       end
 *     end
 *     a = "my string"
 *     a.extend(Fred)   #=> "my string"
 *     a.meth1          #=> "hello"
 *     a.meth2          #=> "bye"
 */

static VALUE
rb_mod_initialize(VALUE module)
{
    extern VALUE rb_mod_module_exec(int argc, VALUE *argv, VALUE mod);

    if (rb_block_given_p()) {
	rb_mod_module_exec(1, &module, module);
    }
    return Qnil;
}

/*
 *  call-seq:
 *     Class.new(super_class=Object)   =>    a_class
 *  
 *  Creates a new anonymous (unnamed) class with the given superclass
 *  (or <code>Object</code> if no parameter is given). You can give a
 *  class a name by assigning the class object to a constant.
 *     
 */

static VALUE
rb_class_initialize(int argc, VALUE *argv, VALUE klass)
{
    VALUE super;

    if (RCLASS_SUPER(klass) != 0) {
	rb_raise(rb_eTypeError, "already initialized class");
    }
    if (argc == 0) {
	super = rb_cObject;
    }
    else {
	rb_scan_args(argc, argv, "01", &super);
	rb_check_inheritable(super);
    }
    RCLASS_SUPER(klass) = super;
    rb_make_metaclass(klass, RBASIC(super)->klass);
    rb_class_inherited(super, klass);
    rb_mod_initialize(klass);

    return klass;
}

/*
 *  call-seq:
 *     class.allocate()   =>   obj
 *  
 *  Allocates space for a new object of <i>class</i>'s class and does not
 *  call initialize on the new instance. The returned object must be an
 *  instance of <i>class</i>.
 *  
 *      klass = Class.new do
 *        def initialize(*args)
 *          @initialized = true
 *        end
 *      
 *        def initialized?
 *          @initialized || false
 *        end
 *      end
 *      
 *      klass.allocate.initialized? #=> false
 *     
 */

VALUE
rb_obj_alloc(VALUE klass)
{
    VALUE obj;

    if (RCLASS_SUPER(klass) == 0 && klass != rb_cBasicObject) {
	rb_raise(rb_eTypeError, "can't instantiate uninitialized class");
    }
    if (FL_TEST(klass, FL_SINGLETON)) {
	rb_raise(rb_eTypeError, "can't create instance of singleton class");
    }
    obj = rb_funcall(klass, ID_ALLOCATOR, 0, 0);
    if (rb_obj_class(obj) != rb_class_real(klass)) {
	rb_raise(rb_eTypeError, "wrong instance allocation");
    }
    return obj;
}

static VALUE
rb_class_allocate_instance(VALUE klass)
{
    NEWOBJ(obj, struct RObject);
    OBJSETUP(obj, klass, T_OBJECT);
    return (VALUE)obj;
}

/*
 *  call-seq:
 *     class.new(args, ...)    =>  obj
 *  
 *  Calls <code>allocate</code> to create a new object of
 *  <i>class</i>'s class, then invokes that object's
 *  <code>initialize</code> method, passing it <i>args</i>.
 *  This is the method that ends up getting called whenever
 *  an object is constructed using .new.
 *     
 */

VALUE
rb_class_new_instance(int argc, VALUE *argv, VALUE klass)
{
    VALUE obj;

    obj = rb_obj_alloc(klass);
    rb_obj_call_init(obj, argc, argv);

    return obj;
}

/*
 *  call-seq:
 *     class.superclass -> a_super_class or nil
 *  
 *  Returns the superclass of <i>class</i>, or <code>nil</code>.
 *     
 *     File.superclass          #=> IO
 *     IO.superclass            #=> Object
 *     Object.superclass        #=> BasicObject
 *     class Foo; end
 *     class Bar < Foo; end
 *     Bar.superclass           #=> Foo
 *
 *  returns nil when the given class hasn't a parent class:
 *
 *     BasicObject.superclass   #=> nil
 *     
 */

static VALUE
rb_class_superclass(VALUE klass)
{
    VALUE super = RCLASS_SUPER(klass);

    if (!super) {
	if (klass == rb_cBasicObject) return Qnil;
	rb_raise(rb_eTypeError, "uninitialized class");
    }
    while (TYPE(super) == T_ICLASS) {
	super = RCLASS_SUPER(super);
    }
    if (!super) {
	return Qnil;
    }
    return super;
}

/*
 *  call-seq:
 *     attr_reader(symbol, ...)    => nil
 *     attr(symbol, ...)             => nil
 *  
 *  Creates instance variables and corresponding methods that return the
 *  value of each instance variable. Equivalent to calling
 *  ``<code>attr</code><i>:name</i>'' on each name in turn.
 */

static VALUE
rb_mod_attr_reader(int argc, VALUE *argv, VALUE klass)
{
    int i;

    for (i=0; i<argc; i++) {
	rb_attr(klass, rb_to_id(argv[i]), Qtrue, Qfalse, Qtrue);
    }
    return Qnil;
}

VALUE
rb_mod_attr(int argc, VALUE *argv, VALUE klass)
{
    if (argc == 2 && (argv[1] == Qtrue || argv[1] == Qfalse)) {
	rb_warning("optional boolean argument is obsoleted");
	rb_attr(klass, rb_to_id(argv[0]), 1, RTEST(argv[1]), Qtrue);
	return Qnil;
    }
    return rb_mod_attr_reader(argc, argv, klass);
}

/*
 *  call-seq:
 *      attr_writer(symbol, ...)    => nil
 *  
 *  Creates an accessor method to allow assignment to the attribute
 *  <i>aSymbol</i><code>.id2name</code>.
 */

static VALUE
rb_mod_attr_writer(int argc, VALUE *argv, VALUE klass)
{
    int i;

    for (i=0; i<argc; i++) {
	rb_attr(klass, rb_to_id(argv[i]), Qfalse, Qtrue, Qtrue);
    }
    return Qnil;
}

/*
 *  call-seq:
 *     attr_accessor(symbol, ...)    => nil
 *  
 *  Defines a named attribute for this module, where the name is
 *  <i>symbol.</i><code>id2name</code>, creating an instance variable
 *  (<code>@name</code>) and a corresponding access method to read it.
 *  Also creates a method called <code>name=</code> to set the attribute.
 *     
 *     module Mod
 *       attr_accessor(:one, :two)
 *     end
 *     Mod.instance_methods.sort   #=> [:one, :one=, :two, :two=]
 */

static VALUE
rb_mod_attr_accessor(int argc, VALUE *argv, VALUE klass)
{
    int i;

    for (i=0; i<argc; i++) {
	rb_attr(klass, rb_to_id(argv[i]), Qtrue, Qtrue, Qtrue);
    }
    return Qnil;
}

/*
 *  call-seq:
 *     mod.const_get(sym, inherit=true)    => obj
 *  
 *  Returns the value of the named constant in <i>mod</i>.
 *     
 *     Math.const_get(:PI)   #=> 3.14159265358979
 *
 *  If the constant is not defined or is defined by the ancestors and
 *  +inherit+ is false, +NameError+ will be raised.
 */

static VALUE
rb_mod_const_get(int argc, VALUE *argv, VALUE mod)
{
    VALUE name, recur;
    ID id;

    if (argc == 1) {
	name = argv[0];
	recur = Qtrue;
    }
    else {
	rb_scan_args(argc, argv, "11", &name, &recur);
    }
    id = rb_to_id(name);
    if (!rb_is_const_id(id)) {
	rb_name_error(id, "wrong constant name %s", rb_id2name(id));
    }
    return RTEST(recur) ? rb_const_get(mod, id) : rb_const_get_at(mod, id);
}

/*
 *  call-seq:
 *     mod.const_set(sym, obj)    => obj
 *  
 *  Sets the named constant to the given object, returning that object.
 *  Creates a new constant if no constant with the given name previously
 *  existed.
 *     
 *     Math.const_set("HIGH_SCHOOL_PI", 22.0/7.0)   #=> 3.14285714285714
 *     Math::HIGH_SCHOOL_PI - Math::PI              #=> 0.00126448926734968
 */

static VALUE
rb_mod_const_set(VALUE mod, VALUE name, VALUE value)
{
    ID id = rb_to_id(name);

    if (!rb_is_const_id(id)) {
	rb_name_error(id, "wrong constant name %s", rb_id2name(id));
    }
    rb_const_set(mod, id, value);
    return value;
}

/*
 *  call-seq:
 *     mod.const_defined?(sym, inherit=true)   => true or false
 *  
 *  Returns <code>true</code> if a constant with the given name is
 *  defined by <i>mod</i>, or its ancestors if +inherit+ is not false.
 *     
 *     Math.const_defined? "PI"   #=> true
 *     IO.const_defined? "SYNC"   #=> true
 *     IO.const_defined? "SYNC", false   #=> false
 */

static VALUE
rb_mod_const_defined(int argc, VALUE *argv, VALUE mod)
{
    VALUE name, recur;
    ID id;

    if (argc == 1) {
	name = argv[0];
	recur = Qtrue;
    }
    else {
	rb_scan_args(argc, argv, "11", &name, &recur);
    }
    id = rb_to_id(name);
    if (!rb_is_const_id(id)) {
	rb_name_error(id, "wrong constant name %s", rb_id2name(id));
    }
    return RTEST(recur) ? rb_const_defined(mod, id) : rb_const_defined_at(mod, id);
}

/*
 *  call-seq:
 *     obj.methods    => array
 *  
 *  Returns a list of the names of methods publicly accessible in
 *  <i>obj</i>. This will include all the methods accessible in
 *  <i>obj</i>'s ancestors.
 *     
 *     class Klass
 *       def kMethod()
 *       end
 *     end
 *     k = Klass.new
 *     k.methods[0..9]    #=> ["kMethod", "freeze", "nil?", "is_a?", 
 *                        #    "class", "instance_variable_set",
 *                        #    "methods", "extend", "__send__", "instance_eval"]
 *     k.methods.length   #=> 42
 */

static VALUE
rb_obj_methods(int argc, VALUE *argv, VALUE obj)
{
  retry:
    if (argc == 0) {
	VALUE args[1];

	args[0] = Qtrue;
	return rb_class_instance_methods(1, args, CLASS_OF(obj));
    }
    else {
	VALUE recur;

	rb_scan_args(argc, argv, "1", &recur);
	if (RTEST(recur)) {
	    argc = 0;
	    goto retry;
	}
	return rb_obj_singleton_methods(argc, argv, obj);
    }
}

/*
 *  call-seq:
 *     obj.protected_methods(all=true)   => array
 *  
 *  Returns the list of protected methods accessible to <i>obj</i>. If
 *  the <i>all</i> parameter is set to <code>false</code>, only those methods
 *  in the receiver will be listed.
 */

static VALUE
rb_obj_protected_methods(int argc, VALUE *argv, VALUE obj)
{
    if (argc == 0) {		/* hack to stop warning */
	VALUE args[1];

	args[0] = Qtrue;
	return rb_class_protected_instance_methods(1, args, CLASS_OF(obj));
    }
    return rb_class_protected_instance_methods(argc, argv, CLASS_OF(obj));
}

/*
 *  call-seq:
 *     obj.private_methods(all=true)   => array
 *  
 *  Returns the list of private methods accessible to <i>obj</i>. If
 *  the <i>all</i> parameter is set to <code>false</code>, only those methods
 *  in the receiver will be listed.
 */

static VALUE
rb_obj_private_methods(int argc, VALUE *argv, VALUE obj)
{
    if (argc == 0) {		/* hack to stop warning */
	VALUE args[1];

	args[0] = Qtrue;
	return rb_class_private_instance_methods(1, args, CLASS_OF(obj));
    }
    return rb_class_private_instance_methods(argc, argv, CLASS_OF(obj));
}

/*
 *  call-seq:
 *     obj.public_methods(all=true)   => array
 *  
 *  Returns the list of public methods accessible to <i>obj</i>. If
 *  the <i>all</i> parameter is set to <code>false</code>, only those methods
 *  in the receiver will be listed.
 */

static VALUE
rb_obj_public_methods(int argc, VALUE *argv, VALUE obj)
{
    if (argc == 0) {		/* hack to stop warning */
	VALUE args[1];

	args[0] = Qtrue;
	return rb_class_public_instance_methods(1, args, CLASS_OF(obj));
    }
    return rb_class_public_instance_methods(argc, argv, CLASS_OF(obj));
}

/*
 *  call-seq:
 *     obj.instance_variable_get(symbol)    => obj
 *
 *  Returns the value of the given instance variable, or nil if the
 *  instance variable is not set. The <code>@</code> part of the
 *  variable name should be included for regular instance
 *  variables. Throws a <code>NameError</code> exception if the
 *  supplied symbol is not valid as an instance variable name.
 *     
 *     class Fred
 *       def initialize(p1, p2)
 *         @a, @b = p1, p2
 *       end
 *     end
 *     fred = Fred.new('cat', 99)
 *     fred.instance_variable_get(:@a)    #=> "cat"
 *     fred.instance_variable_get("@b")   #=> 99
 */

static VALUE
rb_obj_ivar_get(VALUE obj, VALUE iv)
{
    ID id = rb_to_id(iv);

    if (!rb_is_instance_id(id)) {
	rb_name_error(id, "`%s' is not allowed as an instance variable name", rb_id2name(id));
    }
    return rb_ivar_get(obj, id);
}

/*
 *  call-seq:
 *     obj.instance_variable_set(symbol, obj)    => obj
 *  
 *  Sets the instance variable names by <i>symbol</i> to
 *  <i>object</i>, thereby frustrating the efforts of the class's
 *  author to attempt to provide proper encapsulation. The variable
 *  did not have to exist prior to this call.
 *     
 *     class Fred
 *       def initialize(p1, p2)
 *         @a, @b = p1, p2
 *       end
 *     end
 *     fred = Fred.new('cat', 99)
 *     fred.instance_variable_set(:@a, 'dog')   #=> "dog"
 *     fred.instance_variable_set(:@c, 'cat')   #=> "cat"
 *     fred.inspect                             #=> "#<Fred:0x401b3da8 @a=\"dog\", @b=99, @c=\"cat\">"
 */

static VALUE
rb_obj_ivar_set(VALUE obj, VALUE iv, VALUE val)
{
    ID id = rb_to_id(iv);

    if (!rb_is_instance_id(id)) {
	rb_name_error(id, "`%s' is not allowed as an instance variable name", rb_id2name(id));
    }
    return rb_ivar_set(obj, id, val);
}

/*
 *  call-seq:
 *     obj.instance_variable_defined?(symbol)    => true or false
 *
 *  Returns <code>true</code> if the given instance variable is
 *  defined in <i>obj</i>.
 *
 *     class Fred
 *       def initialize(p1, p2)
 *         @a, @b = p1, p2
 *       end
 *     end
 *     fred = Fred.new('cat', 99)
 *     fred.instance_variable_defined?(:@a)    #=> true
 *     fred.instance_variable_defined?("@b")   #=> true
 *     fred.instance_variable_defined?("@c")   #=> false
 */

static VALUE
rb_obj_ivar_defined(VALUE obj, VALUE iv)
{
    ID id = rb_to_id(iv);

    if (!rb_is_instance_id(id)) {
	rb_name_error(id, "`%s' is not allowed as an instance variable name", rb_id2name(id));
    }
    return rb_ivar_defined(obj, id);
}

/*
 *  call-seq:
 *     mod.class_variable_get(symbol)    => obj
 *  
 *  Returns the value of the given class variable (or throws a
 *  <code>NameError</code> exception). The <code>@@</code> part of the
 *  variable name should be included for regular class variables
 *     
 *     class Fred
 *       @@foo = 99
 *     end
 *     Fred.class_variable_get(:@@foo)     #=> 99
 */

static VALUE
rb_mod_cvar_get(VALUE obj, VALUE iv)
{
    ID id = rb_to_id(iv);

    if (!rb_is_class_id(id)) {
	rb_name_error(id, "`%s' is not allowed as a class variable name", rb_id2name(id));
    }
    return rb_cvar_get(obj, id);
}

/*
 *  call-seq:
 *     obj.class_variable_set(symbol, obj)    => obj
 *  
 *  Sets the class variable names by <i>symbol</i> to
 *  <i>object</i>.
 *     
 *     class Fred
 *       @@foo = 99
 *       def foo
 *         @@foo
 *       end
 *     end
 *     Fred.class_variable_set(:@@foo, 101)     #=> 101
 *     Fred.new.foo                             #=> 101
 */

static VALUE
rb_mod_cvar_set(VALUE obj, VALUE iv, VALUE val)
{
    ID id = rb_to_id(iv);

    if (!rb_is_class_id(id)) {
	rb_name_error(id, "`%s' is not allowed as a class variable name", rb_id2name(id));
    }
    rb_cvar_set(obj, id, val);
    return val;
}

/*
 *  call-seq:
 *     obj.class_variable_defined?(symbol)    => true or false
 *
 *  Returns <code>true</code> if the given class variable is defined
 *  in <i>obj</i>.
 *
 *     class Fred
 *       @@foo = 99
 *     end
 *     Fred.class_variable_defined?(:@@foo)    #=> true
 *     Fred.class_variable_defined?(:@@bar)    #=> false
 */

static VALUE
rb_mod_cvar_defined(VALUE obj, VALUE iv)
{
    ID id = rb_to_id(iv);

    if (!rb_is_class_id(id)) {
	rb_name_error(id, "`%s' is not allowed as a class variable name", rb_id2name(id));
    }
    return rb_cvar_defined(obj, id);
}

static VALUE
convert_type(VALUE val, const char *tname, const char *method, int raise)
{
    ID m;

    m = rb_intern(method);
    if (!rb_respond_to(val, m)) {
	if (raise) {
	    rb_raise(rb_eTypeError, "can't convert %s into %s",
		     NIL_P(val) ? "nil" :
		     val == Qtrue ? "true" :
		     val == Qfalse ? "false" :
		     rb_obj_classname(val), 
		     tname);
	}
	else {
	    return Qnil;
	}
    }
    return rb_funcall(val, m, 0);
}

VALUE
rb_convert_type(VALUE val, int type, const char *tname, const char *method)
{
    VALUE v;

    if (TYPE(val) == type) return val;
    v = convert_type(val, tname, method, Qtrue);
    if (TYPE(v) != type) {
	const char *cname = rb_obj_classname(val);
	rb_raise(rb_eTypeError, "can't convert %s to %s (%s#%s gives %s)",
		 cname, tname, cname, method, rb_obj_classname(v));
    }
    return v;
}

VALUE
rb_check_convert_type(VALUE val, int type, const char *tname, const char *method)
{
    VALUE v;

    /* always convert T_DATA */
    if (TYPE(val) == type && type != T_DATA) return val;
    v = convert_type(val, tname, method, Qfalse);
    if (NIL_P(v)) return Qnil;
    if (TYPE(v) != type) {
	const char *cname = rb_obj_classname(val);
	rb_raise(rb_eTypeError, "can't convert %s to %s (%s#%s gives %s)",
		 cname, tname, cname, method, rb_obj_classname(v));
    }
    return v;
}


static VALUE
rb_to_integer(VALUE val, const char *method)
{
    VALUE v;

    if (FIXNUM_P(val)) return val;
    v = convert_type(val, "Integer", method, Qtrue);
    if (!rb_obj_is_kind_of(v, rb_cInteger)) {
	const char *cname = rb_obj_classname(val);
	rb_raise(rb_eTypeError, "can't convert %s to Integer (%s#%s gives %s)",
		 cname, cname, method, rb_obj_classname(v));
    }
    return v;
}

VALUE
rb_check_to_integer(VALUE val, const char *method)
{
    VALUE v;

    if (FIXNUM_P(val)) return val;
    v = convert_type(val, "Integer", method, Qfalse);
    if (!rb_obj_is_kind_of(v, rb_cInteger)) {
	return Qnil;
    }
    return v;
}

VALUE
rb_to_int(VALUE val)
{
    return rb_to_integer(val, "to_int");
}

VALUE
rb_Integer(VALUE val)
{
    VALUE tmp;

    switch (TYPE(val)) {
      case T_FLOAT:
	if (RFLOAT_VALUE(val) <= (double)FIXNUM_MAX
	    && RFLOAT_VALUE(val) >= (double)FIXNUM_MIN) {
	    break;
	}
	return rb_dbl2big(RFLOAT_VALUE(val));

      case T_FIXNUM:
      case T_BIGNUM:
	return val;

      case T_STRING:
	return rb_str_to_inum(val, 0, Qtrue);

      case T_NIL:
	rb_raise(rb_eTypeError, "can't convert nil into Integer");
	break;

      default:
	break;
    }
    tmp = convert_type(val, "Integer", "to_int", Qfalse);
    if (NIL_P(tmp)) {
	return rb_to_integer(val, "to_i");
    }
    return tmp;
}

/*
 *  call-seq:
 *     Integer(arg)    => integer
 *  
 *  Converts <i>arg</i> to a <code>Fixnum</code> or <code>Bignum</code>.
 *  Numeric types are converted directly (with floating point numbers
 *  being truncated). If <i>arg</i> is a <code>String</code>, leading
 *  radix indicators (<code>0</code>, <code>0b</code>, and
 *  <code>0x</code>) are honored. Others are converted using
 *  <code>to_int</code> and <code>to_i</code>. This behavior is
 *  different from that of <code>String#to_i</code>.
 *     
 *     Integer(123.999)    #=> 123
 *     Integer("0x1a")     #=> 26
 *     Integer(Time.new)   #=> 1204973019
 */

static VALUE
rb_f_integer(VALUE obj, VALUE arg)
{
    return rb_Integer(arg);
}

double
rb_cstr_to_dbl(const char *p, int badcheck)
{
    const char *q;
    char *end;
    double d;
    const char *ellipsis = "";
    int w;
#define OutOfRange() (((w = end - p) > 20) ? (w = 20, ellipsis = "...") : (ellipsis = ""))

    if (!p) return 0.0;
    q = p;
    while (ISSPACE(*p)) p++;
    d = strtod(p, &end);
    if (errno == ERANGE) {
	OutOfRange();
	rb_warning("Float %.*s%s out of range", w, p, ellipsis);
	errno = 0;
    }
    if (p == end) {
	if (badcheck) {
	  bad:
	    rb_invalid_str(q, "Float()");
	}
	return d;
    }
    if (*end) {
	char buf[DBL_DIG * 4 + 10];
	char *n = buf;
	char *e = buf + sizeof(buf) - 1;
	char prev = 0;

	while (p < end && n < e) prev = *n++ = *p++;
	while (*p) {
	    if (*p == '_') {
		/* remove underscores between digits */
		if (badcheck) {
		    if (n == buf || !ISDIGIT(prev)) goto bad;
		    ++p;
		    if (!ISDIGIT(*p)) goto bad;
		}
		else {
		    while (*++p == '_');
		    continue;
		}
	    }
	    prev = *p++;
	    if (n < e) *n++ = prev;
	}
	*n = '\0';
	p = buf;
	d = strtod(p, &end);
	if (errno == ERANGE) {
	    OutOfRange();
	    rb_warning("Float %.*s%s out of range", w, p, ellipsis);
	    errno = 0;
	}
	if (badcheck) {
	    if (!end || p == end) goto bad;
	    while (*end && ISSPACE(*end)) end++;
	    if (*end) goto bad;
	}
    }
    if (errno == ERANGE) {
	errno = 0;
	OutOfRange();
	rb_raise(rb_eArgError, "Float %.*s%s out of range", w, q, ellipsis);
    }
    return d;
}

double
rb_str_to_dbl(VALUE str, int badcheck)
{
    char *s;
    long len;

    StringValue(str);
    s = RSTRING_PTR(str);
    len = RSTRING_LEN(str);
    if (s) {
	if (s[len]) {		/* no sentinel somehow */
	    char *p = ALLOCA_N(char, len+1);

	    MEMCPY(p, s, char, len);
	    p[len] = '\0';
	    s = p;
	}
	if (badcheck && len != strlen(s)) {
	    rb_raise(rb_eArgError, "string for Float contains null byte");
	}
    }
    return rb_cstr_to_dbl(s, badcheck);
}

VALUE
rb_Float(VALUE val)
{
    switch (TYPE(val)) {
      case T_FIXNUM:
	return DOUBLE2NUM((double)FIX2LONG(val));

      case T_FLOAT:
	return val;

      case T_BIGNUM:
	return DOUBLE2NUM(rb_big2dbl(val));

      case T_STRING:
	return DOUBLE2NUM(rb_str_to_dbl(val, Qtrue));

      case T_NIL:
	rb_raise(rb_eTypeError, "can't convert nil into Float");
	break;

      default:
	return rb_convert_type(val, T_FLOAT, "Float", "to_f");
    }
}

/*
 *  call-seq:
 *     Float(arg)    => float
 *  
 *  Returns <i>arg</i> converted to a float. Numeric types are converted
 *  directly, the rest are converted using <i>arg</i>.to_f. As of Ruby
 *  1.8, converting <code>nil</code> generates a <code>TypeError</code>.
 *     
 *     Float(1)           #=> 1.0
 *     Float("123.456")   #=> 123.456
 */

static VALUE
rb_f_float(VALUE obj, VALUE arg)
{
    return rb_Float(arg);
}

double
rb_num2dbl(VALUE val)
{
    switch (TYPE(val)) {
      case T_FLOAT:
	return RFLOAT_VALUE(val);

      case T_STRING:
	rb_raise(rb_eTypeError, "no implicit conversion to float from string");
	break;

      case T_NIL:
	rb_raise(rb_eTypeError, "no implicit conversion to float from nil");
	break;

      default:
	break;
    }

    return RFLOAT_VALUE(rb_Float(val));
}

char*
rb_str2cstr(VALUE str, long *len)
{
    StringValue(str);
    if (len) *len = RSTRING_LEN(str);
    else if (RTEST(ruby_verbose) && RSTRING_LEN(str) != strlen(RSTRING_PTR(str))) {
	rb_warn("string contains \\0 character");
    }
    return RSTRING_PTR(str);
}

VALUE
rb_String(VALUE val)
{
    return rb_convert_type(val, T_STRING, "String", "to_s");
}


/*
 *  call-seq:
 *     String(arg)   => string
 *  
 *  Converts <i>arg</i> to a <code>String</code> by calling its
 *  <code>to_s</code> method.
 *     
 *     String(self)        #=> "main"
 *     String(self.class)  #=> "Object"
 *     String(123456)      #=> "123456"
 */

static VALUE
rb_f_string(VALUE obj, VALUE arg)
{
    return rb_String(arg);
}

VALUE
rb_Array(VALUE val)
{
    VALUE tmp = rb_check_array_type(val);

    if (NIL_P(tmp)) {
	tmp = rb_check_convert_type(val, T_ARRAY, "Array", "to_a");
	if (NIL_P(tmp)) {
	    return rb_ary_new3(1, val);
	}
    }
    return tmp;
}

/*
 *  call-seq:
 *     Array(arg)    => array
 *  
 *  Returns <i>arg</i> as an <code>Array</code>. First tries to call
 *  <i>arg</i><code>.to_ary</code>, then <i>arg</i><code>.to_a</code>.
 *     
 *     Array(1..5)   #=> [1, 2, 3, 4, 5]
 */

static VALUE
rb_f_array(VALUE obj, VALUE arg)
{
    return rb_Array(arg);
}

static VALUE
boot_defclass(const char *name, VALUE super)
{
    extern st_table *rb_class_tbl;
    VALUE obj = rb_class_boot(super);
    ID id = rb_intern(name);

    rb_name_class(obj, id);
    st_add_direct(rb_class_tbl, id, obj);
    rb_const_set((rb_cObject ? rb_cObject : obj), id, obj);
    return obj;
}

/*
 *  Document-class: Class
 *
 *  Classes in Ruby are first-class objects---each is an instance of
 *  class <code>Class</code>.
 *     
 *  When a new class is created (typically using <code>class Name ...
 *  end</code>), an object of type <code>Class</code> is created and
 *  assigned to a global constant (<code>Name</code> in this case). When
 *  <code>Name.new</code> is called to create a new object, the
 *  <code>new</code> method in <code>Class</code> is run by default.
 *  This can be demonstrated by overriding <code>new</code> in
 *  <code>Class</code>:
 *     
 *     class Class
 *        alias oldNew  new
 *        def new(*args)
 *          print "Creating a new ", self.name, "\n"
 *          oldNew(*args)
 *        end
 *      end
 *     
 *     
 *      class Name
 *      end
 *     
 *     
 *      n = Name.new
 *     
 *  <em>produces:</em>
 *     
 *     Creating a new Name
 *     
 *  Classes, modules, and objects are interrelated. In the diagram
 *  that follows, the vertical arrows represent inheritance, and the
 *  parentheses meta-classes. All metaclasses are instances 
 *  of the class `Class'.
 *
 *                             +-----------------+
 *                            |                  |
 *           BasicObject-->(BasicObject)         |
 *                ^           ^                  |
 *                |           |                  |
 *              Object---->(Object)              |
 *               ^  ^        ^  ^                |
 *               |  |        |  |                |
 *               |  |  +-----+  +---------+      |
 *               |  |  |                  |      |
 *               |  +-----------+         |      |
 *               |     |        |         |      |
 *        +------+     |     Module--->(Module)  |
 *        |            |        ^         ^      |
 *   OtherClass-->(OtherClass)  |         |      |
 *                              |         |      |
 *                            Class---->(Class)  |
 *                              ^                |
 *                              |                |
 *                              +----------------+
 */


/*
 *  <code>BasicObject</code> is the parent class of all classes in Ruby.
 *  It's an explicit blank class.  <code>Object</code>, the root of Ruby's
 *  class hierarchy is a direct subclass of <code>BasicObject</code>.  Its
 *  methods are therefore available to all objects unless explicitly
 *  overridden.
 *     
 *  <code>Object</code> mixes in the <code>Kernel</code> module, making
 *  the built-in kernel functions globally accessible. Although the
 *  instance methods of <code>Object</code> are defined by the
 *  <code>Kernel</code> module, we have chosen to document them here for
 *  clarity.
 *     
 *  In the descriptions of Object's methods, the parameter <i>symbol</i> refers
 *  to a symbol, which is either a quoted string or a
 *  <code>Symbol</code> (such as <code>:name</code>).
 */

void
Init_Object(void)
{
#undef rb_intern
#define rb_intern(str) rb_intern_const(str)

    VALUE metaclass;

    rb_cBasicObject = boot_defclass("BasicObject", 0);
    rb_cObject = boot_defclass("Object", rb_cBasicObject);
    rb_cModule = boot_defclass("Module", rb_cObject);
    rb_cClass =  boot_defclass("Class",  rb_cModule);

    metaclass = rb_make_metaclass(rb_cBasicObject, rb_cClass);
    metaclass = rb_make_metaclass(rb_cObject, metaclass);
    metaclass = rb_make_metaclass(rb_cModule, metaclass);
    metaclass = rb_make_metaclass(rb_cClass, metaclass);

    rb_define_private_method(rb_cBasicObject, "initialize", rb_obj_dummy, 0);
    rb_define_alloc_func(rb_cBasicObject, rb_class_allocate_instance);
    rb_define_method(rb_cBasicObject, "==", rb_obj_equal, 1);
    rb_define_method(rb_cBasicObject, "equal?", rb_obj_equal, 1);
    rb_define_method(rb_cBasicObject, "!", rb_obj_not, 0);
    rb_define_method(rb_cBasicObject, "!=", rb_obj_not_equal, 1);

    rb_define_private_method(rb_cBasicObject, "singleton_method_added", rb_obj_dummy, 1);
    rb_define_private_method(rb_cBasicObject, "singleton_method_removed", rb_obj_dummy, 1);
    rb_define_private_method(rb_cBasicObject, "singleton_method_undefined", rb_obj_dummy, 1);

    rb_mKernel = rb_define_module("Kernel");
    rb_include_module(rb_cObject, rb_mKernel);
    rb_define_private_method(rb_cClass, "inherited", rb_obj_dummy, 1);
    rb_define_private_method(rb_cModule, "included", rb_obj_dummy, 1);
    rb_define_private_method(rb_cModule, "extended", rb_obj_dummy, 1);
    rb_define_private_method(rb_cModule, "method_added", rb_obj_dummy, 1);
    rb_define_private_method(rb_cModule, "method_removed", rb_obj_dummy, 1);
    rb_define_private_method(rb_cModule, "method_undefined", rb_obj_dummy, 1);

    rb_define_method(rb_mKernel, "nil?", rb_false, 0);
    rb_define_method(rb_mKernel, "===", rb_equal, 1); 
    rb_define_method(rb_mKernel, "=~", rb_obj_match, 1);
    rb_define_method(rb_mKernel, "!~", rb_obj_not_match, 1);
    rb_define_method(rb_mKernel, "eql?", rb_obj_equal, 1);

    rb_define_method(rb_mKernel, "class", rb_obj_class, 0);
    rb_define_method(rb_mKernel, "clone", rb_obj_clone, 0);
    rb_define_method(rb_mKernel, "dup", rb_obj_dup, 0);
    rb_define_method(rb_mKernel, "initialize_copy", rb_obj_init_copy, 1);

    rb_define_method(rb_mKernel, "taint", rb_obj_taint, 0);
    rb_define_method(rb_mKernel, "tainted?", rb_obj_tainted, 0);
    rb_define_method(rb_mKernel, "untaint", rb_obj_untaint, 0);
    rb_define_method(rb_mKernel, "untrust", rb_obj_untrust, 0);
    rb_define_method(rb_mKernel, "untrusted?", rb_obj_untrusted, 0);
    rb_define_method(rb_mKernel, "trust", rb_obj_trust, 0);
    rb_define_method(rb_mKernel, "freeze", rb_obj_freeze, 0);
    rb_define_method(rb_mKernel, "frozen?", rb_obj_frozen_p, 0);

    rb_define_method(rb_mKernel, "to_s", rb_any_to_s, 0);
    rb_define_method(rb_mKernel, "inspect", rb_obj_inspect, 0);
    rb_define_method(rb_mKernel, "methods", rb_obj_methods, -1);
    rb_define_method(rb_mKernel, "singleton_methods", rb_obj_singleton_methods, -1); /* in class.c */
    rb_define_method(rb_mKernel, "protected_methods", rb_obj_protected_methods, -1);
    rb_define_method(rb_mKernel, "private_methods", rb_obj_private_methods, -1);
    rb_define_method(rb_mKernel, "public_methods", rb_obj_public_methods, -1);
    rb_define_method(rb_mKernel, "instance_variables", rb_obj_instance_variables, 0); /* in variable.c */
    rb_define_method(rb_mKernel, "instance_variable_get", rb_obj_ivar_get, 1);
    rb_define_method(rb_mKernel, "instance_variable_set", rb_obj_ivar_set, 2);
    rb_define_method(rb_mKernel, "instance_variable_defined?", rb_obj_ivar_defined, 1);
    rb_define_private_method(rb_mKernel, "remove_instance_variable",
			     rb_obj_remove_instance_variable, 1); /* in variable.c */

    rb_define_method(rb_mKernel, "instance_of?", rb_obj_is_instance_of, 1);
    rb_define_method(rb_mKernel, "kind_of?", rb_obj_is_kind_of, 1);
    rb_define_method(rb_mKernel, "is_a?", rb_obj_is_kind_of, 1);
    rb_define_method(rb_mKernel, "tap", rb_obj_tap, 0);

    rb_define_global_function("sprintf", rb_f_sprintf, -1); /* in sprintf.c */
    rb_define_global_function("format", rb_f_sprintf, -1);  /* in sprintf.c */

    rb_define_global_function("Integer", rb_f_integer, 1);
    rb_define_global_function("Float", rb_f_float, 1);

    rb_define_global_function("String", rb_f_string, 1);
    rb_define_global_function("Array", rb_f_array, 1);

    rb_cNilClass = rb_define_class("NilClass", rb_cObject);
    rb_define_method(rb_cNilClass, "to_i", nil_to_i, 0);
    rb_define_method(rb_cNilClass, "to_f", nil_to_f, 0);
    rb_define_method(rb_cNilClass, "to_s", nil_to_s, 0);
    rb_define_method(rb_cNilClass, "to_a", nil_to_a, 0);
    rb_define_method(rb_cNilClass, "inspect", nil_inspect, 0);
    rb_define_method(rb_cNilClass, "&", false_and, 1);
    rb_define_method(rb_cNilClass, "|", false_or, 1);
    rb_define_method(rb_cNilClass, "^", false_xor, 1);

    rb_define_method(rb_cNilClass, "nil?", rb_true, 0);
    rb_undef_alloc_func(rb_cNilClass);
    rb_undef_method(CLASS_OF(rb_cNilClass), "new");
    rb_define_global_const("NIL", Qnil);

    rb_define_method(rb_cModule, "freeze", rb_mod_freeze, 0);
    rb_define_method(rb_cModule, "===", rb_mod_eqq, 1);
    rb_define_method(rb_cModule, "==", rb_obj_equal, 1);
    rb_define_method(rb_cModule, "<=>",  rb_mod_cmp, 1);
    rb_define_method(rb_cModule, "<",  rb_mod_lt, 1);
    rb_define_method(rb_cModule, "<=", rb_class_inherited_p, 1);
    rb_define_method(rb_cModule, ">",  rb_mod_gt, 1);
    rb_define_method(rb_cModule, ">=", rb_mod_ge, 1);
    rb_define_method(rb_cModule, "initialize_copy", rb_mod_init_copy, 1); /* in class.c */
    rb_define_method(rb_cModule, "to_s", rb_mod_to_s, 0);
    rb_define_method(rb_cModule, "included_modules", rb_mod_included_modules, 0); /* in class.c */
    rb_define_method(rb_cModule, "include?", rb_mod_include_p, 1); /* in class.c */
    rb_define_method(rb_cModule, "name", rb_mod_name, 0);  /* in variable.c */
    rb_define_method(rb_cModule, "ancestors", rb_mod_ancestors, 0); /* in class.c */

    rb_define_private_method(rb_cModule, "attr", rb_mod_attr, -1);
    rb_define_private_method(rb_cModule, "attr_reader", rb_mod_attr_reader, -1);
    rb_define_private_method(rb_cModule, "attr_writer", rb_mod_attr_writer, -1);
    rb_define_private_method(rb_cModule, "attr_accessor", rb_mod_attr_accessor, -1);

    rb_define_alloc_func(rb_cModule, rb_module_s_alloc);
    rb_define_method(rb_cModule, "initialize", rb_mod_initialize, 0);
    rb_define_method(rb_cModule, "instance_methods", rb_class_instance_methods, -1); /* in class.c */
    rb_define_method(rb_cModule, "public_instance_methods", 
		     rb_class_public_instance_methods, -1);    /* in class.c */
    rb_define_method(rb_cModule, "protected_instance_methods", 
		     rb_class_protected_instance_methods, -1); /* in class.c */
    rb_define_method(rb_cModule, "private_instance_methods", 
		     rb_class_private_instance_methods, -1);   /* in class.c */

    rb_define_method(rb_cModule, "constants", rb_mod_constants, -1); /* in variable.c */
    rb_define_method(rb_cModule, "const_get", rb_mod_const_get, -1);
    rb_define_method(rb_cModule, "const_set", rb_mod_const_set, 2);
    rb_define_method(rb_cModule, "const_defined?", rb_mod_const_defined, -1);
    rb_define_private_method(rb_cModule, "remove_const", 
			     rb_mod_remove_const, 1); /* in variable.c */
    rb_define_method(rb_cModule, "const_missing", 
		     rb_mod_const_missing, 1); /* in variable.c */
    rb_define_method(rb_cModule, "class_variables", 
		     rb_mod_class_variables, 0); /* in variable.c */
    rb_define_method(rb_cModule, "remove_class_variable", 
		     rb_mod_remove_cvar, 1); /* in variable.c */
    rb_define_method(rb_cModule, "class_variable_get", rb_mod_cvar_get, 1);
    rb_define_method(rb_cModule, "class_variable_set", rb_mod_cvar_set, 2);
    rb_define_method(rb_cModule, "class_variable_defined?", rb_mod_cvar_defined, 1);

    rb_define_method(rb_cClass, "allocate", rb_obj_alloc, 0);
    rb_define_method(rb_cClass, "new", rb_class_new_instance, -1);
    rb_define_method(rb_cClass, "initialize", rb_class_initialize, -1);
    rb_define_method(rb_cClass, "initialize_copy", rb_class_init_copy, 1); /* in class.c */
    rb_define_method(rb_cClass, "superclass", rb_class_superclass, 0);
    rb_define_alloc_func(rb_cClass, rb_class_s_alloc);
    rb_undef_method(rb_cClass, "extend_object");
    rb_undef_method(rb_cClass, "append_features");

    rb_cData = rb_define_class("Data", rb_cObject);
    rb_undef_alloc_func(rb_cData);

    rb_cTrueClass = rb_define_class("TrueClass", rb_cObject);
    rb_define_method(rb_cTrueClass, "to_s", true_to_s, 0);
    rb_define_method(rb_cTrueClass, "&", true_and, 1);
    rb_define_method(rb_cTrueClass, "|", true_or, 1);
    rb_define_method(rb_cTrueClass, "^", true_xor, 1);
    rb_undef_alloc_func(rb_cTrueClass);
    rb_undef_method(CLASS_OF(rb_cTrueClass), "new");
    rb_define_global_const("TRUE", Qtrue);

    rb_cFalseClass = rb_define_class("FalseClass", rb_cObject);
    rb_define_method(rb_cFalseClass, "to_s", false_to_s, 0);
    rb_define_method(rb_cFalseClass, "&", false_and, 1);
    rb_define_method(rb_cFalseClass, "|", false_or, 1);
    rb_define_method(rb_cFalseClass, "^", false_xor, 1);
    rb_undef_alloc_func(rb_cFalseClass);
    rb_undef_method(CLASS_OF(rb_cFalseClass), "new");
    rb_define_global_const("FALSE", Qfalse);

    id_eq = rb_intern("==");
    id_eql = rb_intern("eql?");
    id_match = rb_intern("=~");
    id_inspect = rb_intern("inspect");
    id_init_copy = rb_intern("initialize_copy");
}
</a>
<a id='n1753' href='#n1753'>1753</a>
<a id='n1754' href='#n1754'>1754</a>
<a id='n1755' href='#n1755'>1755</a>
<a id='n1756' href='#n1756'>1756</a>
<a id='n1757' href='#n1757'>1757</a>
<a id='n1758' href='#n1758'>1758</a>
<a id='n1759' href='#n1759'>1759</a>
<a id='n1760' href='#n1760'>1760</a>
<a id='n1761' href='#n1761'>1761</a>
<a id='n1762' href='#n1762'>1762</a>
<a id='n1763' href='#n1763'>1763</a>
<a id='n1764' href='#n1764'>1764</a>
<a id='n1765' href='#n1765'>1765</a>
<a id='n1766' href='#n1766'>1766</a>
<a id='n1767' href='#n1767'>1767</a>
<a id='n1768' href='#n1768'>1768</a>
<a id='n1769' href='#n1769'>1769</a>
<a id='n1770' href='#n1770'>1770</a>
<a id='n1771' href='#n1771'>1771</a>
<a id='n1772' href='#n1772'>1772</a>
<a id='n1773' href='#n1773'>1773</a>
<a id='n1774' href='#n1774'>1774</a>
<a id='n1775' href='#n1775'>1775</a>
<a id='n1776' href='#n1776'>1776</a>
<a id='n1777' href='#n1777'>1777</a>
<a id='n1778' href='#n1778'>1778</a>
<a id='n1779' href='#n1779'>1779</a>
<a id='n1780' href='#n1780'>1780</a>
<a id='n1781' href='#n1781'>1781</a>
<a id='n1782' href='#n1782'>1782</a>
<a id='n1783' href='#n1783'>1783</a>
<a id='n1784' href='#n1784'>1784</a>
<a id='n1785' href='#n1785'>1785</a>
<a id='n1786' href='#n1786'>1786</a>
<a id='n1787' href='#n1787'>1787</a>
<a id='n1788' href='#n1788'>1788</a>
<a id='n1789' href='#n1789'>1789</a>
<a id='n1790' href='#n1790'>1790</a>
<a id='n1791' href='#n1791'>1791</a>
<a id='n1792' href='#n1792'>1792</a>
<a id='n1793' href='#n1793'>1793</a>
<a id='n1794' href='#n1794'>1794</a>
<a id='n1795' href='#n1795'>1795</a>
<a id='n1796' href='#n1796'>1796</a>
<a id='n1797' href='#n1797'>1797</a>
<a id='n1798' href='#n1798'>1798</a>
<a id='n1799' href='#n1799'>1799</a>
<a id='n1800' href='#n1800'>1800</a>
<a id='n1801' href='#n1801'>1801</a>
<a id='n1802' href='#n1802'>1802</a>
<a id='n1803' href='#n1803'>1803</a>
<a id='n1804' href='#n1804'>1804</a>
<a id='n1805' href='#n1805'>1805</a>
<a id='n1806' href='#n1806'>1806</a>
<a id='n1807' href='#n1807'>1807</a>
<a id='n1808' href='#n1808'>1808</a>
<a id='n1809' href='#n1809'>1809</a>
<a id='n1810' href='#n1810'>1810</a>
<a id='n1811' href='#n1811'>1811</a>
<a id='n1812' href='#n1812'>1812</a>
<a id='n1813' href='#n1813'>1813</a>
<a id='n1814' href='#n1814'>1814</a>
<a id='n1815' href='#n1815'>1815</a>
<a id='n1816' href='#n1816'>1816</a>
<a id='n1817' href='#n1817'>1817</a>
<a id='n1818' href='#n1818'>1818</a>
<a id='n1819' href='#n1819'>1819</a>
<a id='n1820' href='#n1820'>1820</a>
<a id='n1821' href='#n1821'>1821</a>
<a id='n1822' href='#n1822'>1822</a>
<a id='n1823' href='#n1823'>1823</a>
<a id='n1824' href='#n1824'>1824</a>
<a id='n1825' href='#n1825'>1825</a>
<a id='n1826' href='#n1826'>1826</a>
<a id='n1827' href='#n1827'>1827</a>
<a id='n1828' href='#n1828'>1828</a>
<a id='n1829' href='#n1829'>1829</a>
<a id='n1830' href='#n1830'>1830</a>
<a id='n1831' href='#n1831'>1831</a>
<a id='n1832' href='#n1832'>1832</a>
<a id='n1833' href='#n1833'>1833</a>
<a id='n1834' href='#n1834'>1834</a>
<a id='n1835' href='#n1835'>1835</a>
<a id='n1836' href='#n1836'>1836</a>
<a id='n1837' href='#n1837'>1837</a>
<a id='n1838' href='#n1838'>1838</a>
<a id='n1839' href='#n1839'>1839</a>
<a id='n1840' href='#n1840'>1840</a>
<a id='n1841' href='#n1841'>1841</a>
<a id='n1842' href='#n1842'>1842</a>
<a id='n1843' href='#n1843'>1843</a>
<a id='n1844' href='#n1844'>1844</a>
<a id='n1845' href='#n1845'>1845</a>
<a id='n1846' href='#n1846'>1846</a>
<a id='n1847' href='#n1847'>1847</a>
<a id='n1848' href='#n1848'>1848</a>
<a id='n1849' href='#n1849'>1849</a>
<a id='n1850' href='#n1850'>1850</a>
<a id='n1851' href='#n1851'>1851</a>
<a id='n1852' href='#n1852'>1852</a>
<a id='n1853' href='#n1853'>1853</a>
<a id='n1854' href='#n1854'>1854</a>
<a id='n1855' href='#n1855'>1855</a>
<a id='n1856' href='#n1856'>1856</a>
<a id='n1857' href='#n1857'>1857</a>
<a id='n1858' href='#n1858'>1858</a>
<a id='n1859' href='#n1859'>1859</a>
<a id='n1860' href='#n1860'>1860</a>
<a id='n1861' href='#n1861'>1861</a>
<a id='n1862' href='#n1862'>1862</a>
<a id='n1863' href='#n1863'>1863</a>
<a id='n1864' href='#n1864'>1864</a>
<a id='n1865' href='#n1865'>1865</a>
<a id='n1866' href='#n1866'>1866</a>
<a id='n1867' href='#n1867'>1867</a>
<a id='n1868' href='#n1868'>1868</a>
<a id='n1869' href='#n1869'>1869</a>
<a id='n1870' href='#n1870'>1870</a>
<a id='n1871' href='#n1871'>1871</a>
<a id='n1872' href='#n1872'>1872</a>
<a id='n1873' href='#n1873'>1873</a>
<a id='n1874' href='#n1874'>1874</a>
<a id='n1875' href='#n1875'>1875</a>
<a id='n1876' href='#n1876'>1876</a>
<a id='n1877' href='#n1877'>1877</a>
<a id='n1878' href='#n1878'>1878</a>
<a id='n1879' href='#n1879'>1879</a>
<a id='n1880' href='#n1880'>1880</a>
<a id='n1881' href='#n1881'>1881</a>
<a id='n1882' href='#n1882'>1882</a>
<a id='n1883' href='#n1883'>1883</a>
<a id='n1884' href='#n1884'>1884</a>
<a id='n1885' href='#n1885'>1885</a>
<a id='n1886' href='#n1886'>1886</a>
<a id='n1887' href='#n1887'>1887</a>
<a id='n1888' href='#n1888'>1888</a>
<a id='n1889' href='#n1889'>1889</a>
<a id='n1890' href='#n1890'>1890</a>
<a id='n1891' href='#n1891'>1891</a>
<a id='n1892' href='#n1892'>1892</a>
<a id='n1893' href='#n1893'>1893</a>
<a id='n1894' href='#n1894'>1894</a>
<a id='n1895' href='#n1895'>1895</a>
<a id='n1896' href='#n1896'>1896</a>
<a id='n1897' href='#n1897'>1897</a>
<a id='n1898' href='#n1898'>1898</a>
<a id='n1899' href='#n1899'>1899</a>
<a id='n1900' href='#n1900'>1900</a>
<a id='n1901' href='#n1901'>1901</a>
<a id='n1902' href='#n1902'>1902</a>
<a id='n1903' href='#n1903'>1903</a>
<a id='n1904' href='#n1904'>1904</a>
<a id='n1905' href='#n1905'>1905</a>
<a id='n1906' href='#n1906'>1906</a>
<a id='n1907' href='#n1907'>1907</a>
<a id='n1908' href='#n1908'>1908</a>
<a id='n1909' href='#n1909'>1909</a>
<a id='n1910' href='#n1910'>1910</a>
<a id='n1911' href='#n1911'>1911</a>
<a id='n1912' href='#n1912'>1912</a>
<a id='n1913' href='#n1913'>1913</a>
<a id='n1914' href='#n1914'>1914</a>
<a id='n1915' href='#n1915'>1915</a>
<a id='n1916' href='#n1916'>1916</a>
<a id='n1917' href='#n1917'>1917</a>
<a id='n1918' href='#n1918'>1918</a>
<a id='n1919' href='#n1919'>1919</a>
<a id='n1920' href='#n1920'>1920</a>
<a id='n1921' href='#n1921'>1921</a>
<a id='n1922' href='#n1922'>1922</a>
<a id='n1923' href='#n1923'>1923</a>
<a id='n1924' href='#n1924'>1924</a>
<a id='n1925' href='#n1925'>1925</a>
<a id='n1926' href='#n1926'>1926</a>
<a id='n1927' href='#n1927'>1927</a>
<a id='n1928' href='#n1928'>1928</a>
<a id='n1929' href='#n1929'>1929</a>
<a id='n1930' href='#n1930'>1930</a>
<a id='n1931' href='#n1931'>1931</a>
<a id='n1932' href='#n1932'>1932</a>
<a id='n1933' href='#n1933'>1933</a>
<a id='n1934' href='#n1934'>1934</a>
<a id='n1935' href='#n1935'>1935</a>
<a id='n1936' href='#n1936'>1936</a>
<a id='n1937' href='#n1937'>1937</a>
<a id='n1938' href='#n1938'>1938</a>
<a id='n1939' href='#n1939'>1939</a>
<a id='n1940' href='#n1940'>1940</a>
<a id='n1941' href='#n1941'>1941</a>
<a id='n1942' href='#n1942'>1942</a>
<a id='n1943' href='#n1943'>1943</a>
<a id='n1944' href='#n1944'>1944</a>
<a id='n1945' href='#n1945'>1945</a>
<a id='n1946' href='#n1946'>1946</a>
<a id='n1947' href='#n1947'>1947</a>
<a id='n1948' href='#n1948'>1948</a>
<a id='n1949' href='#n1949'>1949</a>
<a id='n1950' href='#n1950'>1950</a>
<a id='n1951' href='#n1951'>1951</a>
<a id='n1952' href='#n1952'>1952</a>
<a id='n1953' href='#n1953'>1953</a>
<a id='n1954' href='#n1954'>1954</a>
<a id='n1955' href='#n1955'>1955</a>
<a id='n1956' href='#n1956'>1956</a>
<a id='n1957' href='#n1957'>1957</a>
<a id='n1958' href='#n1958'>1958</a>
<a id='n1959' href='#n1959'>1959</a>
<a id='n1960' href='#n1960'>1960</a>
<a id='n1961' href='#n1961'>1961</a>
<a id='n1962' href='#n1962'>1962</a>
<a id='n1963' href='#n1963'>1963</a>
<a id='n1964' href='#n1964'>1964</a>
<a id='n1965' href='#n1965'>1965</a>
<a id='n1966' href='#n1966'>1966</a>
<a id='n1967' href='#n1967'>1967</a>
<a id='n1968' href='#n1968'>1968</a>
<a id='n1969' href='#n1969'>1969</a>
<a id='n1970' href='#n1970'>1970</a>
<a id='n1971' href='#n1971'>1971</a>
<a id='n1972' href='#n1972'>1972</a>
<a id='n1973' href='#n1973'>1973</a>
<a id='n1974' href='#n1974'>1974</a>
<a id='n1975' href='#n1975'>1975</a>
<a id='n1976' href='#n1976'>1976</a>
<a id='n1977' href='#n1977'>1977</a>
<a id='n1978' href='#n1978'>1978</a>
<a id='n1979' href='#n1979'>1979</a>
<a id='n1980' href='#n1980'>1980</a>
<a id='n1981' href='#n1981'>1981</a>
<a id='n1982' href='#n1982'>1982</a>
<a id='n1983' href='#n1983'>1983</a>
<a id='n1984' href='#n1984'>1984</a>
<a id='n1985' href='#n1985'>1985</a>
<a id='n1986' href='#n1986'>1986</a>
<a id='n1987' href='#n1987'>1987</a>
<a id='n1988' href='#n1988'>1988</a>
<a id='n1989' href='#n1989'>1989</a>
<a id='n1990' href='#n1990'>1990</a>
<a id='n1991' href='#n1991'>1991</a>
<a id='n1992' href='#n1992'>1992</a>
<a id='n1993' href='#n1993'>1993</a>
<a id='n1994' href='#n1994'>1994</a>
<a id='n1995' href='#n1995'>1995</a>
<a id='n1996' href='#n1996'>1996</a>
<a id='n1997' href='#n1997'>1997</a>
<a id='n1998' href='#n1998'>1998</a>
<a id='n1999' href='#n1999'>1999</a>
<a id='n2000' href='#n2000'>2000</a>
<a id='n2001' href='#n2001'>2001</a>
<a id='n2002' href='#n2002'>2002</a>
<a id='n2003' href='#n2003'>2003</a>
<a id='n2004' href='#n2004'>2004</a>
<a id='n2005' href='#n2005'>2005</a>
<a id='n2006' href='#n2006'>2006</a>
<a id='n2007' href='#n2007'>2007</a>
<a id='n2008' href='#n2008'>2008</a>
<a id='n2009' href='#n2009'>2009</a>
<a id='n2010' href='#n2010'>2010</a>
<a id='n2011' href='#n2011'>2011</a>
<a id='n2012' href='#n2012'>2012</a>
<a id='n2013' href='#n2013'>2013</a>
<a id='n2014' href='#n2014'>2014</a>
<a id='n2015' href='#n2015'>2015</a>
<a id='n2016' href='#n2016'>2016</a>
<a id='n2017' href='#n2017'>2017</a>
<a id='n2018' href='#n2018'>2018</a>
<a id='n2019' href='#n2019'>2019</a>
<a id='n2020' href='#n2020'>2020</a>
<a id='n2021' href='#n2021'>2021</a>
<a id='n2022' href='#n2022'>2022</a>
<a id='n2023' href='#n2023'>2023</a>
<a id='n2024' href='#n2024'>2024</a>
<a id='n2025' href='#n2025'>2025</a>
<a id='n2026' href='#n2026'>2026</a>
<a id='n2027' href='#n2027'>2027</a>
<a id='n2028' href='#n2028'>2028</a>
<a id='n2029' href='#n2029'>2029</a>
<a id='n2030' href='#n2030'>2030</a>
<a id='n2031' href='#n2031'>2031</a>
<a id='n2032' href='#n2032'>2032</a>
<a id='n2033' href='#n2033'>2033</a>
<a id='n2034' href='#n2034'>2034</a>
<a id='n2035' href='#n2035'>2035</a>
<a id='n2036' href='#n2036'>2036</a>
<a id='n2037' href='#n2037'>2037</a>
<a id='n2038' href='#n2038'>2038</a>
<a id='n2039' href='#n2039'>2039</a>
<a id='n2040' href='#n2040'>2040</a>
<a id='n2041' href='#n2041'>2041</a>
<a id='n2042' href='#n2042'>2042</a>
<a id='n2043' href='#n2043'>2043</a>
<a id='n2044' href='#n2044'>2044</a>
<a id='n2045' href='#n2045'>2045</a>
<a id='n2046' href='#n2046'>2046</a>
<a id='n2047' href='#n2047'>2047</a>
<a id='n2048' href='#n2048'>2048</a>
<a id='n2049' href='#n2049'>2049</a>
<a id='n2050' href='#n2050'>2050</a>
<a id='n2051' href='#n2051'>2051</a>
<a id='n2052' href='#n2052'>2052</a>
<a id='n2053' href='#n2053'>2053</a>
<a id='n2054' href='#n2054'>2054</a>
<a id='n2055' href='#n2055'>2055</a>
<a id='n2056' href='#n2056'>2056</a>
<a id='n2057' href='#n2057'>2057</a>
<a id='n2058' href='#n2058'>2058</a>
<a id='n2059' href='#n2059'>2059</a>
<a id='n2060' href='#n2060'>2060</a>
<a id='n2061' href='#n2061'>2061</a>
<a id='n2062' href='#n2062'>2062</a>
<a id='n2063' href='#n2063'>2063</a>
<a id='n2064' href='#n2064'>2064</a>
<a id='n2065' href='#n2065'>2065</a>
<a id='n2066' href='#n2066'>2066</a>
<a id='n2067' href='#n2067'>2067</a>
<a id='n2068' href='#n2068'>2068</a>
<a id='n2069' href='#n2069'>2069</a>
<a id='n2070' href='#n2070'>2070</a>
<a id='n2071' href='#n2071'>2071</a>
<a id='n2072' href='#n2072'>2072</a>
<a id='n2073' href='#n2073'>2073</a>
<a id='n2074' href='#n2074'>2074</a>
<a id='n2075' href='#n2075'>2075</a>
<a id='n2076' href='#n2076'>2076</a>
<a id='n2077' href='#n2077'>2077</a>
<a id='n2078' href='#n2078'>2078</a>
<a id='n2079' href='#n2079'>2079</a>
<a id='n2080' href='#n2080'>2080</a>
<a id='n2081' href='#n2081'>2081</a>
<a id='n2082' href='#n2082'>2082</a>
<a id='n2083' href='#n2083'>2083</a>
<a id='n2084' href='#n2084'>2084</a>
<a id='n2085' href='#n2085'>2085</a>
<a id='n2086' href='#n2086'>2086</a>
<a id='n2087' href='#n2087'>2087</a>
<a id='n2088' href='#n2088'>2088</a>
<a id='n2089' href='#n2089'>2089</a>
<a id='n2090' href='#n2090'>2090</a>
<a id='n2091' href='#n2091'>2091</a>
<a id='n2092' href='#n2092'>2092</a>
<a id='n2093' href='#n2093'>2093</a>
<a id='n2094' href='#n2094'>2094</a>
<a id='n2095' href='#n2095'>2095</a>
<a id='n2096' href='#n2096'>2096</a>
<a id='n2097' href='#n2097'>2097</a>
<a id='n2098' href='#n2098'>2098</a>
<a id='n2099' href='#n2099'>2099</a>
<a id='n2100' href='#n2100'>2100</a>
<a id='n2101' href='#n2101'>2101</a>
<a id='n2102' href='#n2102'>2102</a>
<a id='n2103' href='#n2103'>2103</a>
<a id='n2104' href='#n2104'>2104</a>
<a id='n2105' href='#n2105'>2105</a>
<a id='n2106' href='#n2106'>2106</a>
<a id='n2107' href='#n2107'>2107</a>
<a id='n2108' href='#n2108'>2108</a>
<a id='n2109' href='#n2109'>2109</a>
<a id='n2110' href='#n2110'>2110</a>
<a id='n2111' href='#n2111'>2111</a>
<a id='n2112' href='#n2112'>2112</a>
<a id='n2113' href='#n2113'>2113</a>
<a id='n2114' href='#n2114'>2114</a>
<a id='n2115' href='#n2115'>2115</a>
<a id='n2116' href='#n2116'>2116</a>
<a id='n2117' href='#n2117'>2117</a>
<a id='n2118' href='#n2118'>2118</a>
<a id='n2119' href='#n2119'>2119</a>
<a id='n2120' href='#n2120'>2120</a>
<a id='n2121' href='#n2121'>2121</a>
<a id='n2122' href='#n2122'>2122</a>
<a id='n2123' href='#n2123'>2123</a>
<a id='n2124' href='#n2124'>2124</a>
<a id='n2125' href='#n2125'>2125</a>
<a id='n2126' href='#n2126'>2126</a>
<a id='n2127' href='#n2127'>2127</a>
<a id='n2128' href='#n2128'>2128</a>
<a id='n2129' href='#n2129'>2129</a>
<a id='n2130' href='#n2130'>2130</a>
<a id='n2131' href='#n2131'>2131</a>
<a id='n2132' href='#n2132'>2132</a>
<a id='n2133' href='#n2133'>2133</a>
<a id='n2134' href='#n2134'>2134</a>
<a id='n2135' href='#n2135'>2135</a>
<a id='n2136' href='#n2136'>2136</a>
<a id='n2137' href='#n2137'>2137</a>
<a id='n2138' href='#n2138'>2138</a>
<a id='n2139' href='#n2139'>2139</a>
<a id='n2140' href='#n2140'>2140</a>
<a id='n2141' href='#n2141'>2141</a>
<a id='n2142' href='#n2142'>2142</a>
<a id='n2143' href='#n2143'>2143</a>
<a id='n2144' href='#n2144'>2144</a>
<a id='n2145' href='#n2145'>2145</a>
<a id='n2146' href='#n2146'>2146</a>
<a id='n2147' href='#n2147'>2147</a>
<a id='n2148' href='#n2148'>2148</a>
<a id='n2149' href='#n2149'>2149</a>
<a id='n2150' href='#n2150'>2150</a>
<a id='n2151' href='#n2151'>2151</a>
<a id='n2152' href='#n2152'>2152</a>
<a id='n2153' href='#n2153'>2153</a>
<a id='n2154' href='#n2154'>2154</a>
<a id='n2155' href='#n2155'>2155</a>
<a id='n2156' href='#n2156'>2156</a>
<a id='n2157' href='#n2157'>2157</a>
<a id='n2158' href='#n2158'>2158</a>
<a id='n2159' href='#n2159'>2159</a>
<a id='n2160' href='#n2160'>2160</a>
<a id='n2161' href='#n2161'>2161</a>
<a id='n2162' href='#n2162'>2162</a>
<a id='n2163' href='#n2163'>2163</a>
<a id='n2164' href='#n2164'>2164</a>
<a id='n2165' href='#n2165'>2165</a>
<a id='n2166' href='#n2166'>2166</a>
<a id='n2167' href='#n2167'>2167</a>
<a id='n2168' href='#n2168'>2168</a>
<a id='n2169' href='#n2169'>2169</a>
<a id='n2170' href='#n2170'>2170</a>
<a id='n2171' href='#n2171'>2171</a>
<a id='n2172' href='#n2172'>2172</a>
<a id='n2173' href='#n2173'>2173</a>
<a id='n2174' href='#n2174'>2174</a>
<a id='n2175' href='#n2175'>2175</a>
<a id='n2176' href='#n2176'>2176</a>
<a id='n2177' href='#n2177'>2177</a>
<a id='n2178' href='#n2178'>2178</a>
<a id='n2179' href='#n2179'>2179</a>
<a id='n2180' href='#n2180'>2180</a>
<a id='n2181' href='#n2181'>2181</a>
<a id='n2182' href='#n2182'>2182</a>
<a id='n2183' href='#n2183'>2183</a>
<a id='n2184' href='#n2184'>2184</a>
<a id='n2185' href='#n2185'>2185</a>
<a id='n2186' href='#n2186'>2186</a>
<a id='n2187' href='#n2187'>2187</a>
<a id='n2188' href='#n2188'>2188</a>
<a id='n2189' href='#n2189'>2189</a>
<a id='n2190' href='#n2190'>2190</a>
<a id='n2191' href='#n2191'>2191</a>
<a id='n2192' href='#n2192'>2192</a>
<a id='n2193' href='#n2193'>2193</a>
<a id='n2194' href='#n2194'>2194</a>
<a id='n2195' href='#n2195'>2195</a>
<a id='n2196' href='#n2196'>2196</a>
<a id='n2197' href='#n2197'>2197</a>
<a id='n2198' href='#n2198'>2198</a>
<a id='n2199' href='#n2199'>2199</a>
<a id='n2200' href='#n2200'>2200</a>
<a id='n2201' href='#n2201'>2201</a>
<a id='n2202' href='#n2202'>2202</a>
<a id='n2203' href='#n2203'>2203</a>
<a id='n2204' href='#n2204'>2204</a>
<a id='n2205' href='#n2205'>2205</a>
<a id='n2206' href='#n2206'>2206</a>
<a id='n2207' href='#n2207'>2207</a>
<a id='n2208' href='#n2208'>2208</a>
<a id='n2209' href='#n2209'>2209</a>
<a id='n2210' href='#n2210'>2210</a>
<a id='n2211' href='#n2211'>2211</a>
<a id='n2212' href='#n2212'>2212</a>
<a id='n2213' href='#n2213'>2213</a>
<a id='n2214' href='#n2214'>2214</a>
<a id='n2215' href='#n2215'>2215</a>
<a id='n2216' href='#n2216'>2216</a>
<a id='n2217' href='#n2217'>2217</a>
<a id='n2218' href='#n2218'>2218</a>
<a id='n2219' href='#n2219'>2219</a>
<a id='n2220' href='#n2220'>2220</a>
<a id='n2221' href='#n2221'>2221</a>
<a id='n2222' href='#n2222'>2222</a>
<a id='n2223' href='#n2223'>2223</a>
<a id='n2224' href='#n2224'>2224</a>
<a id='n2225' href='#n2225'>2225</a>
<a id='n2226' href='#n2226'>2226</a>
<a id='n2227' href='#n2227'>2227</a>
<a id='n2228' href='#n2228'>2228</a>
<a id='n2229' href='#n2229'>2229</a>
<a id='n2230' href='#n2230'>2230</a>
<a id='n2231' href='#n2231'>2231</a>
<a id='n2232' href='#n2232'>2232</a>
<a id='n2233' href='#n2233'>2233</a>
<a id='n2234' href='#n2234'>2234</a>
<a id='n2235' href='#n2235'>2235</a>
<a id='n2236' href='#n2236'>2236</a>
<a id='n2237' href='#n2237'>2237</a>
<a id='n2238' href='#n2238'>2238</a>
<a id='n2239' href='#n2239'>2239</a>
<a id='n2240' href='#n2240'>2240</a>
<a id='n2241' href='#n2241'>2241</a>
<a id='n2242' href='#n2242'>2242</a>
<a id='n2243' href='#n2243'>2243</a>
<a id='n2244' href='#n2244'>2244</a>
<a id='n2245' href='#n2245'>2245</a>
<a id='n2246' href='#n2246'>2246</a>
<a id='n2247' href='#n2247'>2247</a>
<a id='n2248' href='#n2248'>2248</a>
<a id='n2249' href='#n2249'>2249</a>
<a id='n2250' href='#n2250'>2250</a>
<a id='n2251' href='#n2251'>2251</a>
<a id='n2252' href='#n2252'>2252</a>
<a id='n2253' href='#n2253'>2253</a>
<a id='n2254' href='#n2254'>2254</a>
<a id='n2255' href='#n2255'>2255</a>
<a id='n2256' href='#n2256'>2256</a>
<a id='n2257' href='#n2257'>2257</a>
<a id='n2258' href='#n2258'>2258</a>
<a id='n2259' href='#n2259'>2259</a>
<a id='n2260' href='#n2260'>2260</a>
<a id='n2261' href='#n2261'>2261</a>
<a id='n2262' href='#n2262'>2262</a>
<a id='n2263' href='#n2263'>2263</a>
<a id='n2264' href='#n2264'>2264</a>
<a id='n2265' href='#n2265'>2265</a>
<a id='n2266' href='#n2266'>2266</a>
<a id='n2267' href='#n2267'>2267</a>
<a id='n2268' href='#n2268'>2268</a>
<a id='n2269' href='#n2269'>2269</a>
<a id='n2270' href='#n2270'>2270</a>
<a id='n2271' href='#n2271'>2271</a>
<a id='n2272' href='#n2272'>2272</a>
<a id='n2273' href='#n2273'>2273</a>
<a id='n2274' href='#n2274'>2274</a>
<a id='n2275' href='#n2275'>2275</a>
<a id='n2276' href='#n2276'>2276</a>
<a id='n2277' href='#n2277'>2277</a>
<a id='n2278' href='#n2278'>2278</a>
<a id='n2279' href='#n2279'>2279</a>
<a id='n2280' href='#n2280'>2280</a>
<a id='n2281' href='#n2281'>2281</a>
<a id='n2282' href='#n2282'>2282</a>
<a id='n2283' href='#n2283'>2283</a>
<a id='n2284' href='#n2284'>2284</a>
<a id='n2285' href='#n2285'>2285</a>
<a id='n2286' href='#n2286'>2286</a>
<a id='n2287' href='#n2287'>2287</a>
<a id='n2288' href='#n2288'>2288</a>
<a id='n2289' href='#n2289'>2289</a>
<a id='n2290' href='#n2290'>2290</a>
<a id='n2291' href='#n2291'>2291</a>
<a id='n2292' href='#n2292'>2292</a>
<a id='n2293' href='#n2293'>2293</a>
<a id='n2294' href='#n2294'>2294</a>
<a id='n2295' href='#n2295'>2295</a>
<a id='n2296' href='#n2296'>2296</a>
<a id='n2297' href='#n2297'>2297</a>
<a id='n2298' href='#n2298'>2298</a>
<a id='n2299' href='#n2299'>2299</a>
<a id='n2300' href='#n2300'>2300</a>
<a id='n2301' href='#n2301'>2301</a>
<a id='n2302' href='#n2302'>2302</a>
<a id='n2303' href='#n2303'>2303</a>
<a id='n2304' href='#n2304'>2304</a>
<a id='n2305' href='#n2305'>2305</a>
<a id='n2306' href='#n2306'>2306</a>
<a id='n2307' href='#n2307'>2307</a>
<a id='n2308' href='#n2308'>2308</a>
<a id='n2309' href='#n2309'>2309</a>
<a id='n2310' href='#n2310'>2310</a>
<a id='n2311' href='#n2311'>2311</a>
<a id='n2312' href='#n2312'>2312</a>
<a id='n2313' href='#n2313'>2313</a>
<a id='n2314' href='#n2314'>2314</a>
<a id='n2315' href='#n2315'>2315</a>
<a id='n2316' href='#n2316'>2316</a>
<a id='n2317' href='#n2317'>2317</a>
<a id='n2318' href='#n2318'>2318</a>
<a id='n2319' href='#n2319'>2319</a>
<a id='n2320' href='#n2320'>2320</a>
<a id='n2321' href='#n2321'>2321</a>
<a id='n2322' href='#n2322'>2322</a>
<a id='n2323' href='#n2323'>2323</a>
<a id='n2324' href='#n2324'>2324</a>
<a id='n2325' href='#n2325'>2325</a>
<a id='n2326' href='#n2326'>2326</a>
<a id='n2327' href='#n2327'>2327</a>
<a id='n2328' href='#n2328'>2328</a>
<a id='n2329' href='#n2329'>2329</a>
<a id='n2330' href='#n2330'>2330</a>
<a id='n2331' href='#n2331'>2331</a>
<a id='n2332' href='#n2332'>2332</a>
<a id='n2333' href='#n2333'>2333</a>
<a id='n2334' href='#n2334'>2334</a>
<a id='n2335' href='#n2335'>2335</a>
<a id='n2336' href='#n2336'>2336</a>
<a id='n2337' href='#n2337'>2337</a>
<a id='n2338' href='#n2338'>2338</a>
<a id='n2339' href='#n2339'>2339</a>
<a id='n2340' href='#n2340'>2340</a>
<a id='n2341' href='#n2341'>2341</a>
<a id='n2342' href='#n2342'>2342</a>
<a id='n2343' href='#n2343'>2343</a>
<a id='n2344' href='#n2344'>2344</a>
<a id='n2345' href='#n2345'>2345</a>
<a id='n2346' href='#n2346'>2346</a>
<a id='n2347' href='#n2347'>2347</a>
<a id='n2348' href='#n2348'>2348</a>
<a id='n2349' href='#n2349'>2349</a>
<a id='n2350' href='#n2350'>2350</a>
<a id='n2351' href='#n2351'>2351</a>
<a id='n2352' href='#n2352'>2352</a>
<a id='n2353' href='#n2353'>2353</a>
<a id='n2354' href='#n2354'>2354</a>
<a id='n2355' href='#n2355'>2355</a>
<a id='n2356' href='#n2356'>2356</a>
<a id='n2357' href='#n2357'>2357</a>
<a id='n2358' href='#n2358'>2358</a>
<a id='n2359' href='#n2359'>2359</a>
<a id='n2360' href='#n2360'>2360</a>
<a id='n2361' href='#n2361'>2361</a>
<a id='n2362' href='#n2362'>2362</a>
<a id='n2363' href='#n2363'>2363</a>
<a id='n2364' href='#n2364'>2364</a>
<a id='n2365' href='#n2365'>2365</a>
<a id='n2366' href='#n2366'>2366</a>
<a id='n2367' href='#n2367'>2367</a>
<a id='n2368' href='#n2368'>2368</a>
<a id='n2369' href='#n2369'>2369</a>
<a id='n2370' href='#n2370'>2370</a>
<a id='n2371' href='#n2371'>2371</a>
<a id='n2372' href='#n2372'>2372</a>
<a id='n2373' href='#n2373'>2373</a>
<a id='n2374' href='#n2374'>2374</a>
<a id='n2375' href='#n2375'>2375</a>
<a id='n2376' href='#n2376'>2376</a>
<a id='n2377' href='#n2377'>2377</a>
<a id='n2378' href='#n2378'>2378</a>
<a id='n2379' href='#n2379'>2379</a>
<a id='n2380' href='#n2380'>2380</a>
<a id='n2381' href='#n2381'>2381</a>
<a id='n2382' href='#n2382'>2382</a>
<a id='n2383' href='#n2383'>2383</a>
<a id='n2384' href='#n2384'>2384</a>
<a id='n2385' href='#n2385'>2385</a>
<a id='n2386' href='#n2386'>2386</a>
<a id='n2387' href='#n2387'>2387</a>
<a id='n2388' href='#n2388'>2388</a>
<a id='n2389' href='#n2389'>2389</a>
<a id='n2390' href='#n2390'>2390</a>
<a id='n2391' href='#n2391'>2391</a>
<a id='n2392' href='#n2392'>2392</a>
<a id='n2393' href='#n2393'>2393</a>
<a id='n2394' href='#n2394'>2394</a>
<a id='n2395' href='#n2395'>2395</a>
<a id='n2396' href='#n2396'>2396</a>
<a id='n2397' href='#n2397'>2397</a>
<a id='n2398' href='#n2398'>2398</a>
<a id='n2399' href='#n2399'>2399</a>
<a id='n2400' href='#n2400'>2400</a>
<a id='n2401' href='#n2401'>2401</a>
<a id='n2402' href='#n2402'>2402</a>
<a id='n2403' href='#n2403'>2403</a>
<a id='n2404' href='#n2404'>2404</a>
<a id='n2405' href='#n2405'>2405</a>
<a id='n2406' href='#n2406'>2406</a>
<a id='n2407' href='#n2407'>2407</a>
<a id='n2408' href='#n2408'>2408</a>
<a id='n2409' href='#n2409'>2409</a>
<a id='n2410' href='#n2410'>2410</a>
<a id='n2411' href='#n2411'>2411</a>
<a id='n2412' href='#n2412'>2412</a>
<a id='n2413' href='#n2413'>2413</a>
<a id='n2414' href='#n2414'>2414</a>
<a id='n2415' href='#n2415'>2415</a>
<a id='n2416' href='#n2416'>2416</a>
<a id='n2417' href='#n2417'>2417</a>
<a id='n2418' href='#n2418'>2418</a>
<a id='n2419' href='#n2419'>2419</a>
<a id='n2420' href='#n2420'>2420</a>
<a id='n2421' href='#n2421'>2421</a>
<a id='n2422' href='#n2422'>2422</a>
<a id='n2423' href='#n2423'>2423</a>
<a id='n2424' href='#n2424'>2424</a>
<a id='n2425' href='#n2425'>2425</a>
<a id='n2426' href='#n2426'>2426</a>
<a id='n2427' href='#n2427'>2427</a>
<a id='n2428' href='#n2428'>2428</a>
<a id='n2429' href='#n2429'>2429</a>
<a id='n2430' href='#n2430'>2430</a>
<a id='n2431' href='#n2431'>2431</a>
<a id='n2432' href='#n2432'>2432</a>
<a id='n2433' href='#n2433'>2433</a>
<a id='n2434' href='#n2434'>2434</a>
<a id='n2435' href='#n2435'>2435</a>
<a id='n2436' href='#n2436'>2436</a>
<a id='n2437' href='#n2437'>2437</a>
<a id='n2438' href='#n2438'>2438</a>
<a id='n2439' href='#n2439'>2439</a>
<a id='n2440' href='#n2440'>2440</a>
<a id='n2441' href='#n2441'>2441</a>
<a id='n2442' href='#n2442'>2442</a>
<a id='n2443' href='#n2443'>2443</a>
<a id='n2444' href='#n2444'>2444</a>
<a id='n2445' href='#n2445'>2445</a>
<a id='n2446' href='#n2446'>2446</a>
<a id='n2447' href='#n2447'>2447</a>
<a id='n2448' href='#n2448'>2448</a>
<a id='n2449' href='#n2449'>2449</a>
<a id='n2450' href='#n2450'>2450</a>
<a id='n2451' href='#n2451'>2451</a>
<a id='n2452' href='#n2452'>2452</a>
<a id='n2453' href='#n2453'>2453</a>
<a id='n2454' href='#n2454'>2454</a>
<a id='n2455' href='#n2455'>2455</a>
<a id='n2456' href='#n2456'>2456</a>
<a id='n2457' href='#n2457'>2457</a>
<a id='n2458' href='#n2458'>2458</a>
<a id='n2459' href='#n2459'>2459</a>
<a id='n2460' href='#n2460'>2460</a>
<a id='n2461' href='#n2461'>2461</a>
<a id='n2462' href='#n2462'>2462</a>
<a id='n2463' href='#n2463'>2463</a>
<a id='n2464' href='#n2464'>2464</a>
<a id='n2465' href='#n2465'>2465</a>
<a id='n2466' href='#n2466'>2466</a>
<a id='n2467' href='#n2467'>2467</a>
<a id='n2468' href='#n2468'>2468</a>
<a id='n2469' href='#n2469'>2469</a>
<a id='n2470' href='#n2470'>2470</a>
<a id='n2471' href='#n2471'>2471</a>
<a id='n2472' href='#n2472'>2472</a>
<a id='n2473' href='#n2473'>2473</a>
<a id='n2474' href='#n2474'>2474</a>
<a id='n2475' href='#n2475'>2475</a>
<a id='n2476' href='#n2476'>2476</a>
<a id='n2477' href='#n2477'>2477</a>
<a id='n2478' href='#n2478'>2478</a>
<a id='n2479' href='#n2479'>2479</a>
<a id='n2480' href='#n2480'>2480</a>
<a id='n2481' href='#n2481'>2481</a>
<a id='n2482' href='#n2482'>2482</a>
<a id='n2483' href='#n2483'>2483</a>
<a id='n2484' href='#n2484'>2484</a>
<a id='n2485' href='#n2485'>2485</a>
<a id='n2486' href='#n2486'>2486</a>
<a id='n2487' href='#n2487'>2487</a>
<a id='n2488' href='#n2488'>2488</a>
<a id='n2489' href='#n2489'>2489</a>
<a id='n2490' href='#n2490'>2490</a>
<a id='n2491' href='#n2491'>2491</a>
<a id='n2492' href='#n2492'>2492</a>
<a id='n2493' href='#n2493'>2493</a>
<a id='n2494' href='#n2494'>2494</a>
<a id='n2495' href='#n2495'>2495</a>
<a id='n2496' href='#n2496'>2496</a>
<a id='n2497' href='#n2497'>2497</a>
<a id='n2498' href='#n2498'>2498</a>
<a id='n2499' href='#n2499'>2499</a>
<a id='n2500' href='#n2500'>2500</a>
<a id='n2501' href='#n2501'>2501</a>
<a id='n2502' href='#n2502'>2502</a>
<a id='n2503' href='#n2503'>2503</a>
<a id='n2504' href='#n2504'>2504</a>
<a id='n2505' href='#n2505'>2505</a>
<a id='n2506' href='#n2506'>2506</a>
<a id='n2507' href='#n2507'>2507</a>
<a id='n2508' href='#n2508'>2508</a>
<a id='n2509' href='#n2509'>2509</a>
<a id='n2510' href='#n2510'>2510</a>
<a id='n2511' href='#n2511'>2511</a>
<a id='n2512' href='#n2512'>2512</a>
<a id='n2513' href='#n2513'>2513</a>
<a id='n2514' href='#n2514'>2514</a>
<a id='n2515' href='#n2515'>2515</a>
<a id='n2516' href='#n2516'>2516</a>
<a id='n2517' href='#n2517'>2517</a>
<a id='n2518' href='#n2518'>2518</a>
<a id='n2519' href='#n2519'>2519</a>
<a id='n2520' href='#n2520'>2520</a>
<a id='n2521' href='#n2521'>2521</a>
<a id='n2522' href='#n2522'>2522</a>
<a id='n2523' href='#n2523'>2523</a>
<a id='n2524' href='#n2524'>2524</a>
<a id='n2525' href='#n2525'>2525</a>
<a id='n2526' href='#n2526'>2526</a>
<a id='n2527' href='#n2527'>2527</a>
<a id='n2528' href='#n2528'>2528</a>
<a id='n2529' href='#n2529'>2529</a>
<a id='n2530' href='#n2530'>2530</a>
<a id='n2531' href='#n2531'>2531</a>
<a id='n2532' href='#n2532'>2532</a>
<a id='n2533' href='#n2533'>2533</a>
<a id='n2534' href='#n2534'>2534</a>
<a id='n2535' href='#n2535'>2535</a>
<a id='n2536' href='#n2536'>2536</a>
<a id='n2537' href='#n2537'>2537</a>
<a id='n2538' href='#n2538'>2538</a>
<a id='n2539' href='#n2539'>2539</a>
<a id='n2540' href='#n2540'>2540</a>
<a id='n2541' href='#n2541'>2541</a>
<a id='n2542' href='#n2542'>2542</a>
<a id='n2543' href='#n2543'>2543</a>
<a id='n2544' href='#n2544'>2544</a>
<a id='n2545' href='#n2545'>2545</a>
<a id='n2546' href='#n2546'>2546</a>
<a id='n2547' href='#n2547'>2547</a>
<a id='n2548' href='#n2548'>2548</a>
<a id='n2549' href='#n2549'>2549</a>
<a id='n2550' href='#n2550'>2550</a>
<a id='n2551' href='#n2551'>2551</a>
<a id='n2552' href='#n2552'>2552</a>
<a id='n2553' href='#n2553'>2553</a>
<a id='n2554' href='#n2554'>2554</a>
<a id='n2555' href='#n2555'>2555</a>
<a id='n2556' href='#n2556'>2556</a>
<a id='n2557' href='#n2557'>2557</a>
<a id='n2558' href='#n2558'>2558</a>
<a id='n2559' href='#n2559'>2559</a>
<a id='n2560' href='#n2560'>2560</a>
<a id='n2561' href='#n2561'>2561</a>
<a id='n2562' href='#n2562'>2562</a>
<a id='n2563' href='#n2563'>2563</a>
<a id='n2564' href='#n2564'>2564</a>
<a id='n2565' href='#n2565'>2565</a>
<a id='n2566' href='#n2566'>2566</a>
<a id='n2567' href='#n2567'>2567</a>
<a id='n2568' href='#n2568'>2568</a>
<a id='n2569' href='#n2569'>2569</a>
<a id='n2570' href='#n2570'>2570</a>
<a id='n2571' href='#n2571'>2571</a>
<a id='n2572' href='#n2572'>2572</a>
<a id='n2573' href='#n2573'>2573</a>
<a id='n2574' href='#n2574'>2574</a>
<a id='n2575' href='#n2575'>2575</a>
<a id='n2576' href='#n2576'>2576</a>
<a id='n2577' href='#n2577'>2577</a>
<a id='n2578' href='#n2578'>2578</a>
<a id='n2579' href='#n2579'>2579</a>
<a id='n2580' href='#n2580'>2580</a>
<a id='n2581' href='#n2581'>2581</a>
<a id='n2582' href='#n2582'>2582</a>
<a id='n2583' href='#n2583'>2583</a>
<a id='n2584' href='#n2584'>2584</a>
<a id='n2585' href='#n2585'>2585</a>
<a id='n2586' href='#n2586'>2586</a>
<a id='n2587' href='#n2587'>2587</a>
<a id='n2588' href='#n2588'>2588</a>
<a id='n2589' href='#n2589'>2589</a>
<a id='n2590' href='#n2590'>2590</a>
<a id='n2591' href='#n2591'>2591</a>
<a id='n2592' href='#n2592'>2592</a>
<a id='n2593' href='#n2593'>2593</a>
<a id='n2594' href='#n2594'>2594</a>
<a id='n2595' href='#n2595'>2595</a>
<a id='n2596' href='#n2596'>2596</a>
<a id='n2597' href='#n2597'>2597</a>
<a id='n2598' href='#n2598'>2598</a>
<a id='n2599' href='#n2599'>2599</a>
<a id='n2600' href='#n2600'>2600</a>
<a id='n2601' href='#n2601'>2601</a>
<a id='n2602' href='#n2602'>2602</a>
<a id='n2603' href='#n2603'>2603</a>
<a id='n2604' href='#n2604'>2604</a>
<a id='n2605' href='#n2605'>2605</a>
<a id='n2606' href='#n2606'>2606</a>
<a id='n2607' href='#n2607'>2607</a>
<a id='n2608' href='#n2608'>2608</a>
<a id='n2609' href='#n2609'>2609</a>
<a id='n2610' href='#n2610'>2610</a>
<a id='n2611' href='#n2611'>2611</a>
<a id='n2612' href='#n2612'>2612</a>
<a id='n2613' href='#n2613'>2613</a>
<a id='n2614' href='#n2614'>2614</a>
<a id='n2615' href='#n2615'>2615</a>
<a id='n2616' href='#n2616'>2616</a>
<a id='n2617' href='#n2617'>2617</a>
<a id='n2618' href='#n2618'>2618</a>
<a id='n2619' href='#n2619'>2619</a>
<a id='n2620' href='#n2620'>2620</a>
<a id='n2621' href='#n2621'>2621</a>
<a id='n2622' href='#n2622'>2622</a>
<a id='n2623' href='#n2623'>2623</a>
<a id='n2624' href='#n2624'>2624</a>
<a id='n2625' href='#n2625'>2625</a>
<a id='n2626' href='#n2626'>2626</a>
<a id='n2627' href='#n2627'>2627</a>
<a id='n2628' href='#n2628'>2628</a>
<a id='n2629' href='#n2629'>2629</a>
<a id='n2630' href='#n2630'>2630</a>
<a id='n2631' href='#n2631'>2631</a>
<a id='n2632' href='#n2632'>2632</a>
<a id='n2633' href='#n2633'>2633</a>
<a id='n2634' href='#n2634'>2634</a>
<a id='n2635' href='#n2635'>2635</a>
<a id='n2636' href='#n2636'>2636</a>
<a id='n2637' href='#n2637'>2637</a>
<a id='n2638' href='#n2638'>2638</a>
<a id='n2639' href='#n2639'>2639</a>
<a id='n2640' href='#n2640'>2640</a>
<a id='n2641' href='#n2641'>2641</a>
<a id='n2642' href='#n2642'>2642</a>
<a id='n2643' href='#n2643'>2643</a>
<a id='n2644' href='#n2644'>2644</a>
<a id='n2645' href='#n2645'>2645</a>
<a id='n2646' href='#n2646'>2646</a>
<a id='n2647' href='#n2647'>2647</a>
<a id='n2648' href='#n2648'>2648</a>
<a id='n2649' href='#n2649'>2649</a>
<a id='n2650' href='#n2650'>2650</a>
<a id='n2651' href='#n2651'>2651</a>
<a id='n2652' href='#n2652'>2652</a>
<a id='n2653' href='#n2653'>2653</a>
<a id='n2654' href='#n2654'>2654</a>
<a id='n2655' href='#n2655'>2655</a>
<a id='n2656' href='#n2656'>2656</a>
<a id='n2657' href='#n2657'>2657</a>
<a id='n2658' href='#n2658'>2658</a>
<a id='n2659' href='#n2659'>2659</a>
<a id='n2660' href='#n2660'>2660</a>
<a id='n2661' href='#n2661'>2661</a>
<a id='n2662' href='#n2662'>2662</a>
<a id='n2663' href='#n2663'>2663</a>
<a id='n2664' href='#n2664'>2664</a>
<a id='n2665' href='#n2665'>2665</a>
<a id='n2666' href='#n2666'>2666</a>
<a id='n2667' href='#n2667'>2667</a>
<a id='n2668' href='#n2668'>2668</a>
<a id='n2669' href='#n2669'>2669</a>
<a id='n2670' href='#n2670'>2670</a>
<a id='n2671' href='#n2671'>2671</a>
<a id='n2672' href='#n2672'>2672</a>
<a id='n2673' href='#n2673'>2673</a>
<a id='n2674' href='#n2674'>2674</a>
<a id='n2675' href='#n2675'>2675</a>
<a id='n2676' href='#n2676'>2676</a>
<a id='n2677' href='#n2677'>2677</a>
<a id='n2678' href='#n2678'>2678</a>
<a id='n2679' href='#n2679'>2679</a>
<a id='n2680' href='#n2680'>2680</a>
<a id='n2681' href='#n2681'>2681</a>
<a id='n2682' href='#n2682'>2682</a>
<a id='n2683' href='#n2683'>2683</a>
<a id='n2684' href='#n2684'>2684</a>
<a id='n2685' href='#n2685'>2685</a>
<a id='n2686' href='#n2686'>2686</a>
<a id='n2687' href='#n2687'>2687</a>
<a id='n2688' href='#n2688'>2688</a>
<a id='n2689' href='#n2689'>2689</a>
<a id='n2690' href='#n2690'>2690</a>
<a id='n2691' href='#n2691'>2691</a>
<a id='n2692' href='#n2692'>2692</a>
<a id='n2693' href='#n2693'>2693</a>
<a id='n2694' href='#n2694'>2694</a>
<a id='n2695' href='#n2695'>2695</a>
<a id='n2696' href='#n2696'>2696</a>
<a id='n2697' href='#n2697'>2697</a>
<a id='n2698' href='#n2698'>2698</a>
<a id='n2699' href='#n2699'>2699</a>
<a id='n2700' href='#n2700'>2700</a>
<a id='n2701' href='#n2701'>2701</a>
<a id='n2702' href='#n2702'>2702</a>
<a id='n2703' href='#n2703'>2703</a>
<a id='n2704' href='#n2704'>2704</a>
<a id='n2705' href='#n2705'>2705</a>
<a id='n2706' href='#n2706'>2706</a>
<a id='n2707' href='#n2707'>2707</a>
<a id='n2708' href='#n2708'>2708</a>
<a id='n2709' href='#n2709'>2709</a>
<a id='n2710' href='#n2710'>2710</a>
<a id='n2711' href='#n2711'>2711</a>
<a id='n2712' href='#n2712'>2712</a>
<a id='n2713' href='#n2713'>2713</a>
<a id='n2714' href='#n2714'>2714</a>
<a id='n2715' href='#n2715'>2715</a>
<a id='n2716' href='#n2716'>2716</a>
<a id='n2717' href='#n2717'>2717</a>
<a id='n2718' href='#n2718'>2718</a>
<a id='n2719' href='#n2719'>2719</a>
<a id='n2720' href='#n2720'>2720</a>
<a id='n2721' href='#n2721'>2721</a>
<a id='n2722' href='#n2722'>2722</a>
<a id='n2723' href='#n2723'>2723</a>
<a id='n2724' href='#n2724'>2724</a>
<a id='n2725' href='#n2725'>2725</a>
<a id='n2726' href='#n2726'>2726</a>
<a id='n2727' href='#n2727'>2727</a>
<a id='n2728' href='#n2728'>2728</a>
<a id='n2729' href='#n2729'>2729</a>
<a id='n2730' href='#n2730'>2730</a>
<a id='n2731' href='#n2731'>2731</a>
<a id='n2732' href='#n2732'>2732</a>
<a id='n2733' href='#n2733'>2733</a>
<a id='n2734' href='#n2734'>2734</a>
<a id='n2735' href='#n2735'>2735</a>
<a id='n2736' href='#n2736'>2736</a>
<a id='n2737' href='#n2737'>2737</a>
<a id='n2738' href='#n2738'>2738</a>
<a id='n2739' href='#n2739'>2739</a>
<a id='n2740' href='#n2740'>2740</a>
<a id='n2741' href='#n2741'>2741</a>
<a id='n2742' href='#n2742'>2742</a>
<a id='n2743' href='#n2743'>2743</a>
<a id='n2744' href='#n2744'>2744</a>
<a id='n2745' href='#n2745'>2745</a>
<a id='n2746' href='#n2746'>2746</a>
<a id='n2747' href='#n2747'>2747</a>
<a id='n2748' href='#n2748'>2748</a>
<a id='n2749' href='#n2749'>2749</a>
<a id='n2750' href='#n2750'>2750</a>
<a id='n2751' href='#n2751'>2751</a>
<a id='n2752' href='#n2752'>2752</a>
<a id='n2753' href='#n2753'>2753</a>
<a id='n2754' href='#n2754'>2754</a>
<a id='n2755' href='#n2755'>2755</a>
<a id='n2756' href='#n2756'>2756</a>
<a id='n2757' href='#n2757'>2757</a>
<a id='n2758' href='#n2758'>2758</a>
<a id='n2759' href='#n2759'>2759</a>
<a id='n2760' href='#n2760'>2760</a>
<a id='n2761' href='#n2761'>2761</a>
<a id='n2762' href='#n2762'>2762</a>
<a id='n2763' href='#n2763'>2763</a>
<a id='n2764' href='#n2764'>2764</a>
<a id='n2765' href='#n2765'>2765</a>
<a id='n2766' href='#n2766'>2766</a>
<a id='n2767' href='#n2767'>2767</a>
<a id='n2768' href='#n2768'>2768</a>
<a id='n2769' href='#n2769'>2769</a>
<a id='n2770' href='#n2770'>2770</a>
<a id='n2771' href='#n2771'>2771</a>
<a id='n2772' href='#n2772'>2772</a>
<a id='n2773' href='#n2773'>2773</a>
<a id='n2774' href='#n2774'>2774</a>
<a id='n2775' href='#n2775'>2775</a>
<a id='n2776' href='#n2776'>2776</a>
<a id='n2777' href='#n2777'>2777</a>
<a id='n2778' href='#n2778'>2778</a>
<a id='n2779' href='#n2779'>2779</a>
<a id='n2780' href='#n2780'>2780</a>
<a id='n2781' href='#n2781'>2781</a>
<a id='n2782' href='#n2782'>2782</a>
<a id='n2783' href='#n2783'>2783</a>
<a id='n2784' href='#n2784'>2784</a>
<a id='n2785' href='#n2785'>2785</a>
<a id='n2786' href='#n2786'>2786</a>
<a id='n2787' href='#n2787'>2787</a>
<a id='n2788' href='#n2788'>2788</a>
<a id='n2789' href='#n2789'>2789</a>
<a id='n2790' href='#n2790'>2790</a>
<a id='n2791' href='#n2791'>2791</a>
<a id='n2792' href='#n2792'>2792</a>
<a id='n2793' href='#n2793'>2793</a>
<a id='n2794' href='#n2794'>2794</a>
<a id='n2795' href='#n2795'>2795</a>
<a id='n2796' href='#n2796'>2796</a>
<a id='n2797' href='#n2797'>2797</a>
<a id='n2798' href='#n2798'>2798</a>
<a id='n2799' href='#n2799'>2799</a>
<a id='n2800' href='#n2800'>2800</a>
<a id='n2801' href='#n2801'>2801</a>
<a id='n2802' href='#n2802'>2802</a>
<a id='n2803' href='#n2803'>2803</a>
<a id='n2804' href='#n2804'>2804</a>
<a id='n2805' href='#n2805'>2805</a>
<a id='n2806' href='#n2806'>2806</a>
<a id='n2807' href='#n2807'>2807</a>
<a id='n2808' href='#n2808'>2808</a>
<a id='n2809' href='#n2809'>2809</a>
<a id='n2810' href='#n2810'>2810</a>
<a id='n2811' href='#n2811'>2811</a>
<a id='n2812' href='#n2812'>2812</a>
<a id='n2813' href='#n2813'>2813</a>
<a id='n2814' href='#n2814'>2814</a>
<a id='n2815' href='#n2815'>2815</a>
<a id='n2816' href='#n2816'>2816</a>
<a id='n2817' href='#n2817'>2817</a>
<a id='n2818' href='#n2818'>2818</a>
<a id='n2819' href='#n2819'>2819</a>
<a id='n2820' href='#n2820'>2820</a>
<a id='n2821' href='#n2821'>2821</a>
<a id='n2822' href='#n2822'>2822</a>
<a id='n2823' href='#n2823'>2823</a>
<a id='n2824' href='#n2824'>2824</a>
<a id='n2825' href='#n2825'>2825</a>
<a id='n2826' href='#n2826'>2826</a>
<a id='n2827' href='#n2827'>2827</a>
<a id='n2828' href='#n2828'>2828</a>
<a id='n2829' href='#n2829'>2829</a>
<a id='n2830' href='#n2830'>2830</a>
<a id='n2831' href='#n2831'>2831</a>
<a id='n2832' href='#n2832'>2832</a>
<a id='n2833' href='#n2833'>2833</a>
<a id='n2834' href='#n2834'>2834</a>
<a id='n2835' href='#n2835'>2835</a>
<a id='n2836' href='#n2836'>2836</a>
<a id='n2837' href='#n2837'>2837</a>
<a id='n2838' href='#n2838'>2838</a>
<a id='n2839' href='#n2839'>2839</a>
<a id='n2840' href='#n2840'>2840</a>
<a id='n2841' href='#n2841'>2841</a>
<a id='n2842' href='#n2842'>2842</a>
<a id='n2843' href='#n2843'>2843</a>
<a id='n2844' href='#n2844'>2844</a>
<a id='n2845' href='#n2845'>2845</a>
<a id='n2846' href='#n2846'>2846</a>
<a id='n2847' href='#n2847'>2847</a>
<a id='n2848' href='#n2848'>2848</a>
<a id='n2849' href='#n2849'>2849</a>
<a id='n2850' href='#n2850'>2850</a>
<a id='n2851' href='#n2851'>2851</a>
<a id='n2852' href='#n2852'>2852</a>
<a id='n2853' href='#n2853'>2853</a>
<a id='n2854' href='#n2854'>2854</a>
<a id='n2855' href='#n2855'>2855</a>
<a id='n2856' href='#n2856'>2856</a>
<a id='n2857' href='#n2857'>2857</a>
<a id='n2858' href='#n2858'>2858</a>
<a id='n2859' href='#n2859'>2859</a>
<a id='n2860' href='#n2860'>2860</a>
<a id='n2861' href='#n2861'>2861</a>
<a id='n2862' href='#n2862'>2862</a>
<a id='n2863' href='#n2863'>2863</a>
<a id='n2864' href='#n2864'>2864</a>
<a id='n2865' href='#n2865'>2865</a>
<a id='n2866' href='#n2866'>2866</a>
<a id='n2867' href='#n2867'>2867</a>
<a id='n2868' href='#n2868'>2868</a>
<a id='n2869' href='#n2869'>2869</a>
<a id='n2870' href='#n2870'>2870</a>
<a id='n2871' href='#n2871'>2871</a>
<a id='n2872' href='#n2872'>2872</a>
<a id='n2873' href='#n2873'>2873</a>
<a id='n2874' href='#n2874'>2874</a>
<a id='n2875' href='#n2875'>2875</a>
<a id='n2876' href='#n2876'>2876</a>
<a id='n2877' href='#n2877'>2877</a>
<a id='n2878' href='#n2878'>2878</a>
<a id='n2879' href='#n2879'>2879</a>
<a id='n2880' href='#n2880'>2880</a>
<a id='n2881' href='#n2881'>2881</a>
<a id='n2882' href='#n2882'>2882</a>
<a id='n2883' href='#n2883'>2883</a>
<a id='n2884' href='#n2884'>2884</a>
<a id='n2885' href='#n2885'>2885</a>
<a id='n2886' href='#n2886'>2886</a>
<a id='n2887' href='#n2887'>2887</a>
<a id='n2888' href='#n2888'>2888</a>
<a id='n2889' href='#n2889'>2889</a>
<a id='n2890' href='#n2890'>2890</a>
<a id='n2891' href='#n2891'>2891</a>
<a id='n2892' href='#n2892'>2892</a>
<a id='n2893' href='#n2893'>2893</a>
<a id='n2894' href='#n2894'>2894</a>
<a id='n2895' href='#n2895'>2895</a>
<a id='n2896' href='#n2896'>2896</a>
<a id='n2897' href='#n2897'>2897</a>
<a id='n2898' href='#n2898'>2898</a>
<a id='n2899' href='#n2899'>2899</a>
<a id='n2900' href='#n2900'>2900</a>
<a id='n2901' href='#n2901'>2901</a>
<a id='n2902' href='#n2902'>2902</a>
<a id='n2903' href='#n2903'>2903</a>
<a id='n2904' href='#n2904'>2904</a>
<a id='n2905' href='#n2905'>2905</a>
<a id='n2906' href='#n2906'>2906</a>
<a id='n2907' href='#n2907'>2907</a>
<a id='n2908' href='#n2908'>2908</a>
<a id='n2909' href='#n2909'>2909</a>
<a id='n2910' href='#n2910'>2910</a>
<a id='n2911' href='#n2911'>2911</a>
<a id='n2912' href='#n2912'>2912</a>
<a id='n2913' href='#n2913'>2913</a>
<a id='n2914' href='#n2914'>2914</a>
<a id='n2915' href='#n2915'>2915</a>
<a id='n2916' href='#n2916'>2916</a>
<a id='n2917' href='#n2917'>2917</a>
<a id='n2918' href='#n2918'>2918</a>
<a id='n2919' href='#n2919'>2919</a>
<a id='n2920' href='#n2920'>2920</a>
<a id='n2921' href='#n2921'>2921</a>
<a id='n2922' href='#n2922'>2922</a>
<a id='n2923' href='#n2923'>2923</a>
<a id='n2924' href='#n2924'>2924</a>
<a id='n2925' href='#n2925'>2925</a>
<a id='n2926' href='#n2926'>2926</a>
<a id='n2927' href='#n2927'>2927</a>
<a id='n2928' href='#n2928'>2928</a>
<a id='n2929' href='#n2929'>2929</a>
<a id='n2930' href='#n2930'>2930</a>
<a id='n2931' href='#n2931'>2931</a>
<a id='n2932' href='#n2932'>2932</a>
<a id='n2933' href='#n2933'>2933</a>
<a id='n2934' href='#n2934'>2934</a>
<a id='n2935' href='#n2935'>2935</a>
<a id='n2936' href='#n2936'>2936</a>
<a id='n2937' href='#n2937'>2937</a>
<a id='n2938' href='#n2938'>2938</a>
<a id='n2939' href='#n2939'>2939</a>
<a id='n2940' href='#n2940'>2940</a>
<a id='n2941' href='#n2941'>2941</a>
<a id='n2942' href='#n2942'>2942</a>
<a id='n2943' href='#n2943'>2943</a>
<a id='n2944' href='#n2944'>2944</a>
<a id='n2945' href='#n2945'>2945</a>
<a id='n2946' href='#n2946'>2946</a>
<a id='n2947' href='#n2947'>2947</a>
<a id='n2948' href='#n2948'>2948</a>
<a id='n2949' href='#n2949'>2949</a>
<a id='n2950' href='#n2950'>2950</a>
<a id='n2951' href='#n2951'>2951</a>
<a id='n2952' href='#n2952'>2952</a>
<a id='n2953' href='#n2953'>2953</a>
<a id='n2954' href='#n2954'>2954</a>
<a id='n2955' href='#n2955'>2955</a>
<a id='n2956' href='#n2956'>2956</a>
<a id='n2957' href='#n2957'>2957</a>
<a id='n2958' href='#n2958'>2958</a>
<a id='n2959' href='#n2959'>2959</a>
<a id='n2960' href='#n2960'>2960</a>
<a id='n2961' href='#n2961'>2961</a>
<a id='n2962' href='#n2962'>2962</a>
<a id='n2963' href='#n2963'>2963</a>
<a id='n2964' href='#n2964'>2964</a>
<a id='n2965' href='#n2965'>2965</a>
<a id='n2966' href='#n2966'>2966</a>
<a id='n2967' href='#n2967'>2967</a>
<a id='n2968' href='#n2968'>2968</a>
<a id='n2969' href='#n2969'>2969</a>
<a id='n2970' href='#n2970'>2970</a>
<a id='n2971' href='#n2971'>2971</a>
<a id='n2972' href='#n2972'>2972</a>
<a id='n2973' href='#n2973'>2973</a>
<a id='n2974' href='#n2974'>2974</a>
<a id='n2975' href='#n2975'>2975</a>
<a id='n2976' href='#n2976'>2976</a>
<a id='n2977' href='#n2977'>2977</a>
<a id='n2978' href='#n2978'>2978</a>
<a id='n2979' href='#n2979'>2979</a>
<a id='n2980' href='#n2980'>2980</a>
<a id='n2981' href='#n2981'>2981</a>
<a id='n2982' href='#n2982'>2982</a>
<a id='n2983' href='#n2983'>2983</a>
<a id='n2984' href='#n2984'>2984</a>
<a id='n2985' href='#n2985'>2985</a>
<a id='n2986' href='#n2986'>2986</a>
<a id='n2987' href='#n2987'>2987</a>
<a id='n2988' href='#n2988'>2988</a>
<a id='n2989' href='#n2989'>2989</a>
<a id='n2990' href='#n2990'>2990</a>
<a id='n2991' href='#n2991'>2991</a>
<a id='n2992' href='#n2992'>2992</a>
<a id='n2993' href='#n2993'>2993</a>
<a id='n2994' href='#n2994'>2994</a>
<a id='n2995' href='#n2995'>2995</a>
<a id='n2996' href='#n2996'>2996</a>
<a id='n2997' href='#n2997'>2997</a>
<a id='n2998' href='#n2998'>2998</a>
<a id='n2999' href='#n2999'>2999</a>
<a id='n3000' href='#n3000'>3000</a>
<a id='n3001' href='#n3001'>3001</a>
<a id='n3002' href='#n3002'>3002</a>
<a id='n3003' href='#n3003'>3003</a>
<a id='n3004' href='#n3004'>3004</a>
<a id='n3005' href='#n3005'>3005</a>
<a id='n3006' href='#n3006'>3006</a>
<a id='n3007' href='#n3007'>3007</a>
<a id='n3008' href='#n3008'>3008</a>
<a id='n3009' href='#n3009'>3009</a>
<a id='n3010' href='#n3010'>3010</a>
<a id='n3011' href='#n3011'>3011</a>
<a id='n3012' href='#n3012'>3012</a>
<a id='n3013' href='#n3013'>3013</a>
<a id='n3014' href='#n3014'>3014</a>
<a id='n3015' href='#n3015'>3015</a>
<a id='n3016' href='#n3016'>3016</a>
<a id='n3017' href='#n3017'>3017</a>
<a id='n3018' href='#n3018'>3018</a>
<a id='n3019' href='#n3019'>3019</a>
<a id='n3020' href='#n3020'>3020</a>
<a id='n3021' href='#n3021'>3021</a>
<a id='n3022' href='#n3022'>3022</a>
<a id='n3023' href='#n3023'>3023</a>
<a id='n3024' href='#n3024'>3024</a>
<a id='n3025' href='#n3025'>3025</a>
<a id='n3026' href='#n3026'>3026</a>
<a id='n3027' href='#n3027'>3027</a>
<a id='n3028' href='#n3028'>3028</a>
<a id='n3029' href='#n3029'>3029</a>
<a id='n3030' href='#n3030'>3030</a>
<a id='n3031' href='#n3031'>3031</a>
<a id='n3032' href='#n3032'>3032</a>
<a id='n3033' href='#n3033'>3033</a>
<a id='n3034' href='#n3034'>3034</a>
<a id='n3035' href='#n3035'>3035</a>
<a id='n3036' href='#n3036'>3036</a>
<a id='n3037' href='#n3037'>3037</a>
<a id='n3038' href='#n3038'>3038</a>
<a id='n3039' href='#n3039'>3039</a>
<a id='n3040' href='#n3040'>3040</a>
<a id='n3041' href='#n3041'>3041</a>
<a id='n3042' href='#n3042'>3042</a>
<a id='n3043' href='#n3043'>3043</a>
<a id='n3044' href='#n3044'>3044</a>
<a id='n3045' href='#n3045'>3045</a>
<a id='n3046' href='#n3046'>3046</a>
<a id='n3047' href='#n3047'>3047</a>
<a id='n3048' href='#n3048'>3048</a>
<a id='n3049' href='#n3049'>3049</a>
<a id='n3050' href='#n3050'>3050</a>
<a id='n3051' href='#n3051'>3051</a>
<a id='n3052' href='#n3052'>3052</a>
<a id='n3053' href='#n3053'>3053</a>
<a id='n3054' href='#n3054'>3054</a>
<a id='n3055' href='#n3055'>3055</a>
<a id='n3056' href='#n3056'>3056</a>
<a id='n3057' href='#n3057'>3057</a>
<a id='n3058' href='#n3058'>3058</a>
<a id='n3059' href='#n3059'>3059</a>
<a id='n3060' href='#n3060'>3060</a>
<a id='n3061' href='#n3061'>3061</a>
<a id='n3062' href='#n3062'>3062</a>
<a id='n3063' href='#n3063'>3063</a>
<a id='n3064' href='#n3064'>3064</a>
<a id='n3065' href='#n3065'>3065</a>
<a id='n3066' href='#n3066'>3066</a>
<a id='n3067' href='#n3067'>3067</a>
<a id='n3068' href='#n3068'>3068</a>
<a id='n3069' href='#n3069'>3069</a>
<a id='n3070' href='#n3070'>3070</a>
<a id='n3071' href='#n3071'>3071</a>
<a id='n3072' href='#n3072'>3072</a>
<a id='n3073' href='#n3073'>3073</a>
<a id='n3074' href='#n3074'>3074</a>
<a id='n3075' href='#n3075'>3075</a>
<a id='n3076' href='#n3076'>3076</a>
<a id='n3077' href='#n3077'>3077</a>
<a id='n3078' href='#n3078'>3078</a>
<a id='n3079' href='#n3079'>3079</a>
<a id='n3080' href='#n3080'>3080</a>
<a id='n3081' href='#n3081'>3081</a>
<a id='n3082' href='#n3082'>3082</a>
<a id='n3083' href='#n3083'>3083</a>
<a id='n3084' href='#n3084'>3084</a>
<a id='n3085' href='#n3085'>3085</a>
<a id='n3086' href='#n3086'>3086</a>
<a id='n3087' href='#n3087'>3087</a>
<a id='n3088' href='#n3088'>3088</a>
<a id='n3089' href='#n3089'>3089</a>
<a id='n3090' href='#n3090'>3090</a>
<a id='n3091' href='#n3091'>3091</a>
<a id='n3092' href='#n3092'>3092</a>
<a id='n3093' href='#n3093'>3093</a>
<a id='n3094' href='#n3094'>3094</a>
<a id='n3095' href='#n3095'>3095</a>
<a id='n3096' href='#n3096'>3096</a>
<a id='n3097' href='#n3097'>3097</a>
<a id='n3098' href='#n3098'>3098</a>
<a id='n3099' href='#n3099'>3099</a>
<a id='n3100' href='#n3100'>3100</a>
<a id='n3101' href='#n3101'>3101</a>
<a id='n3102' href='#n3102'>3102</a>
<a id='n3103' href='#n3103'>3103</a>
<a id='n3104' href='#n3104'>3104</a>
<a id='n3105' href='#n3105'>3105</a>
<a id='n3106' href='#n3106'>3106</a>
<a id='n3107' href='#n3107'>3107</a>
<a id='n3108' href='#n3108'>3108</a>
<a id='n3109' href='#n3109'>3109</a>
<a id='n3110' href='#n3110'>3110</a>
<a id='n3111' href='#n3111'>3111</a>
<a id='n3112' href='#n3112'>3112</a>
<a id='n3113' href='#n3113'>3113</a>
<a id='n3114' href='#n3114'>3114</a>
<a id='n3115' href='#n3115'>3115</a>
<a id='n3116' href='#n3116'>3116</a>
<a id='n3117' href='#n3117'>3117</a>
<a id='n3118' href='#n3118'>3118</a>
<a id='n3119' href='#n3119'>3119</a>
<a id='n3120' href='#n3120'>3120</a>
<a id='n3121' href='#n3121'>3121</a>
<a id='n3122' href='#n3122'>3122</a>
<a id='n3123' href='#n3123'>3123</a>
<a id='n3124' href='#n3124'>3124</a>
<a id='n3125' href='#n3125'>3125</a>
<a id='n3126' href='#n3126'>3126</a>
<a id='n3127' href='#n3127'>3127</a>
<a id='n3128' href='#n3128'>3128</a>
<a id='n3129' href='#n3129'>3129</a>
<a id='n3130' href='#n3130'>3130</a>
<a id='n3131' href='#n3131'>3131</a>
<a id='n3132' href='#n3132'>3132</a>
<a id='n3133' href='#n3133'>3133</a>
<a id='n3134' href='#n3134'>3134</a>
<a id='n3135' href='#n3135'>3135</a>
<a id='n3136' href='#n3136'>3136</a>
<a id='n3137' href='#n3137'>3137</a>
<a id='n3138' href='#n3138'>3138</a>
<a id='n3139' href='#n3139'>3139</a>
<a id='n3140' href='#n3140'>3140</a>
<a id='n3141' href='#n3141'>3141</a>
<a id='n3142' href='#n3142'>3142</a>
<a id='n3143' href='#n3143'>3143</a>
<a id='n3144' href='#n3144'>3144</a>
<a id='n3145' href='#n3145'>3145</a>
<a id='n3146' href='#n3146'>3146</a>
<a id='n3147' href='#n3147'>3147</a>
<a id='n3148' href='#n3148'>3148</a>
<a id='n3149' href='#n3149'>3149</a>
<a id='n3150' href='#n3150'>3150</a>
<a id='n3151' href='#n3151'>3151</a>
<a id='n3152' href='#n3152'>3152</a>
<a id='n3153' href='#n3153'>3153</a>
<a id='n3154' href='#n3154'>3154</a>
<a id='n3155' href='#n3155'>3155</a>
<a id='n3156' href='#n3156'>3156</a>
<a id='n3157' href='#n3157'>3157</a>
<a id='n3158' href='#n3158'>3158</a>
<a id='n3159' href='#n3159'>3159</a>
<a id='n3160' href='#n3160'>3160</a>
<a id='n3161' href='#n3161'>3161</a>
<a id='n3162' href='#n3162'>3162</a>
<a id='n3163' href='#n3163'>3163</a>
<a id='n3164' href='#n3164'>3164</a>
<a id='n3165' href='#n3165'>3165</a>
<a id='n3166' href='#n3166'>3166</a>
<a id='n3167' href='#n3167'>3167</a>
<a id='n3168' href='#n3168'>3168</a>
<a id='n3169' href='#n3169'>3169</a>
<a id='n3170' href='#n3170'>3170</a>
<a id='n3171' href='#n3171'>3171</a>
<a id='n3172' href='#n3172'>3172</a>
<a id='n3173' href='#n3173'>3173</a>
<a id='n3174' href='#n3174'>3174</a>
<a id='n3175' href='#n3175'>3175</a>
<a id='n3176' href='#n3176'>3176</a>
<a id='n3177' href='#n3177'>3177</a>
<a id='n3178' href='#n3178'>3178</a>
<a id='n3179' href='#n3179'>3179</a>
<a id='n3180' href='#n3180'>3180</a>
<a id='n3181' href='#n3181'>3181</a>
<a id='n3182' href='#n3182'>3182</a>
<a id='n3183' href='#n3183'>3183</a>
<a id='n3184' href='#n3184'>3184</a>
<a id='n3185' href='#n3185'>3185</a>
<a id='n3186' href='#n3186'>3186</a>
<a id='n3187' href='#n3187'>3187</a>
<a id='n3188' href='#n3188'>3188</a>
<a id='n3189' href='#n3189'>3189</a>
<a id='n3190' href='#n3190'>3190</a>
<a id='n3191' href='#n3191'>3191</a>
<a id='n3192' href='#n3192'>3192</a>
<a id='n3193' href='#n3193'>3193</a>
<a id='n3194' href='#n3194'>3194</a>
<a id='n3195' href='#n3195'>3195</a>
<a id='n3196' href='#n3196'>3196</a>
<a id='n3197' href='#n3197'>3197</a>
<a id='n3198' href='#n3198'>3198</a>
<a id='n3199' href='#n3199'>3199</a>
<a id='n3200' href='#n3200'>3200</a>
<a id='n3201' href='#n3201'>3201</a>
<a id='n3202' href='#n3202'>3202</a>
<a id='n3203' href='#n3203'>3203</a>
<a id='n3204' href='#n3204'>3204</a>
<a id='n3205' href='#n3205'>3205</a>
<a id='n3206' href='#n3206'>3206</a>
<a id='n3207' href='#n3207'>3207</a>
<a id='n3208' href='#n3208'>3208</a>
<a id='n3209' href='#n3209'>3209</a>
<a id='n3210' href='#n3210'>3210</a>
<a id='n3211' href='#n3211'>3211</a>
<a id='n3212' href='#n3212'>3212</a>
<a id='n3213' href='#n3213'>3213</a>
<a id='n3214' href='#n3214'>3214</a>
<a id='n3215' href='#n3215'>3215</a>
<a id='n3216' href='#n3216'>3216</a>
<a id='n3217' href='#n3217'>3217</a>
<a id='n3218' href='#n3218'>3218</a>
<a id='n3219' href='#n3219'>3219</a>
<a id='n3220' href='#n3220'>3220</a>
<a id='n3221' href='#n3221'>3221</a>
<a id='n3222' href='#n3222'>3222</a>
<a id='n3223' href='#n3223'>3223</a>
<a id='n3224' href='#n3224'>3224</a>
<a id='n3225' href='#n3225'>3225</a>
<a id='n3226' href='#n3226'>3226</a>
<a id='n3227' href='#n3227'>3227</a>
<a id='n3228' href='#n3228'>3228</a>
<a id='n3229' href='#n3229'>3229</a>
<a id='n3230' href='#n3230'>3230</a>
<a id='n3231' href='#n3231'>3231</a>
<a id='n3232' href='#n3232'>3232</a>
<a id='n3233' href='#n3233'>3233</a>
<a id='n3234' href='#n3234'>3234</a>
<a id='n3235' href='#n3235'>3235</a>
<a id='n3236' href='#n3236'>3236</a>
<a id='n3237' href='#n3237'>3237</a>
<a id='n3238' href='#n3238'>3238</a>
<a id='n3239' href='#n3239'>3239</a>
<a id='n3240' href='#n3240'>3240</a>
<a id='n3241' href='#n3241'>3241</a>
<a id='n3242' href='#n3242'>3242</a>
<a id='n3243' href='#n3243'>3243</a>
<a id='n3244' href='#n3244'>3244</a>
<a id='n3245' href='#n3245'>3245</a>
<a id='n3246' href='#n3246'>3246</a>
<a id='n3247' href='#n3247'>3247</a>
<a id='n3248' href='#n3248'>3248</a>
<a id='n3249' href='#n3249'>3249</a>
<a id='n3250' href='#n3250'>3250</a>
<a id='n3251' href='#n3251'>3251</a>
<a id='n3252' href='#n3252'>3252</a>
<a id='n3253' href='#n3253'>3253</a>
<a id='n3254' href='#n3254'>3254</a>
<a id='n3255' href='#n3255'>3255</a>
<a id='n3256' href='#n3256'>3256</a>
<a id='n3257' href='#n3257'>3257</a>
<a id='n3258' href='#n3258'>3258</a>
<a id='n3259' href='#n3259'>3259</a>
<a id='n3260' href='#n3260'>3260</a>
<a id='n3261' href='#n3261'>3261</a>
<a id='n3262' href='#n3262'>3262</a>
<a id='n3263' href='#n3263'>3263</a>
<a id='n3264' href='#n3264'>3264</a>
<a id='n3265' href='#n3265'>3265</a>
<a id='n3266' href='#n3266'>3266</a>
<a id='n3267' href='#n3267'>3267</a>
<a id='n3268' href='#n3268'>3268</a>
<a id='n3269' href='#n3269'>3269</a>
<a id='n3270' href='#n3270'>3270</a>
<a id='n3271' href='#n3271'>3271</a>
<a id='n3272' href='#n3272'>3272</a>
<a id='n3273' href='#n3273'>3273</a>
<a id='n3274' href='#n3274'>3274</a>
<a id='n3275' href='#n3275'>3275</a>
<a id='n3276' href='#n3276'>3276</a>
<a id='n3277' href='#n3277'>3277</a>
<a id='n3278' href='#n3278'>3278</a>
<a id='n3279' href='#n3279'>3279</a>
<a id='n3280' href='#n3280'>3280</a>
<a id='n3281' href='#n3281'>3281</a>
<a id='n3282' href='#n3282'>3282</a>
<a id='n3283' href='#n3283'>3283</a>
<a id='n3284' href='#n3284'>3284</a>
<a id='n3285' href='#n3285'>3285</a>
<a id='n3286' href='#n3286'>3286</a>
<a id='n3287' href='#n3287'>3287</a>
<a id='n3288' href='#n3288'>3288</a>
<a id='n3289' href='#n3289'>3289</a>
<a id='n3290' href='#n3290'>3290</a>
<a id='n3291' href='#n3291'>3291</a>
<a id='n3292' href='#n3292'>3292</a>
<a id='n3293' href='#n3293'>3293</a>
<a id='n3294' href='#n3294'>3294</a>
<a id='n3295' href='#n3295'>3295</a>
<a id='n3296' href='#n3296'>3296</a>
<a id='n3297' href='#n3297'>3297</a>
<a id='n3298' href='#n3298'>3298</a>
<a id='n3299' href='#n3299'>3299</a>
<a id='n3300' href='#n3300'>3300</a>
<a id='n3301' href='#n3301'>3301</a>
<a id='n3302' href='#n3302'>3302</a>
<a id='n3303' href='#n3303'>3303</a>
<a id='n3304' href='#n3304'>3304</a>
<a id='n3305' href='#n3305'>3305</a>
<a id='n3306' href='#n3306'>3306</a>
<a id='n3307' href='#n3307'>3307</a>
<a id='n3308' href='#n3308'>3308</a>
<a id='n3309' href='#n3309'>3309</a>
<a id='n3310' href='#n3310'>3310</a>
<a id='n3311' href='#n3311'>3311</a>
<a id='n3312' href='#n3312'>3312</a>
<a id='n3313' href='#n3313'>3313</a>
<a id='n3314' href='#n3314'>3314</a>
<a id='n3315' href='#n3315'>3315</a>
<a id='n3316' href='#n3316'>3316</a>
<a id='n3317' href='#n3317'>3317</a>
<a id='n3318' href='#n3318'>3318</a>
<a id='n3319' href='#n3319'>3319</a>
<a id='n3320' href='#n3320'>3320</a>
<a id='n3321' href='#n3321'>3321</a>
<a id='n3322' href='#n3322'>3322</a>
<a id='n3323' href='#n3323'>3323</a>
<a id='n3324' href='#n3324'>3324</a>
<a id='n3325' href='#n3325'>3325</a>
<a id='n3326' href='#n3326'>3326</a>
<a id='n3327' href='#n3327'>3327</a>
<a id='n3328' href='#n3328'>3328</a>
<a id='n3329' href='#n3329'>3329</a>
<a id='n3330' href='#n3330'>3330</a>
<a id='n3331' href='#n3331'>3331</a>
<a id='n3332' href='#n3332'>3332</a>
<a id='n3333' href='#n3333'>3333</a>
<a id='n3334' href='#n3334'>3334</a>
<a id='n3335' href='#n3335'>3335</a>
<a id='n3336' href='#n3336'>3336</a>
<a id='n3337' href='#n3337'>3337</a>
<a id='n3338' href='#n3338'>3338</a>
<a id='n3339' href='#n3339'>3339</a>
<a id='n3340' href='#n3340'>3340</a>
<a id='n3341' href='#n3341'>3341</a>
<a id='n3342' href='#n3342'>3342</a>
<a id='n3343' href='#n3343'>3343</a>
<a id='n3344' href='#n3344'>3344</a>
<a id='n3345' href='#n3345'>3345</a>
<a id='n3346' href='#n3346'>3346</a>
<a id='n3347' href='#n3347'>3347</a>
<a id='n3348' href='#n3348'>3348</a>
<a id='n3349' href='#n3349'>3349</a>
<a id='n3350' href='#n3350'>3350</a>
<a id='n3351' href='#n3351'>3351</a>
<a id='n3352' href='#n3352'>3352</a>
<a id='n3353' href='#n3353'>3353</a>
<a id='n3354' href='#n3354'>3354</a>
<a id='n3355' href='#n3355'>3355</a>
<a id='n3356' href='#n3356'>3356</a>
<a id='n3357' href='#n3357'>3357</a>
<a id='n3358' href='#n3358'>3358</a>
<a id='n3359' href='#n3359'>3359</a>
<a id='n3360' href='#n3360'>3360</a>
<a id='n3361' href='#n3361'>3361</a>
<a id='n3362' href='#n3362'>3362</a>
<a id='n3363' href='#n3363'>3363</a>
<a id='n3364' href='#n3364'>3364</a>
<a id='n3365' href='#n3365'>3365</a>
<a id='n3366' href='#n3366'>3366</a>
<a id='n3367' href='#n3367'>3367</a>
<a id='n3368' href='#n3368'>3368</a>
<a id='n3369' href='#n3369'>3369</a>
<a id='n3370' href='#n3370'>3370</a>
<a id='n3371' href='#n3371'>3371</a>
<a id='n3372' href='#n3372'>3372</a>
<a id='n3373' href='#n3373'>3373</a>
<a id='n3374' href='#n3374'>3374</a>
<a id='n3375' href='#n3375'>3375</a>
<a id='n3376' href='#n3376'>3376</a>
<a id='n3377' href='#n3377'>3377</a>
<a id='n3378' href='#n3378'>3378</a>
<a id='n3379' href='#n3379'>3379</a>
<a id='n3380' href='#n3380'>3380</a>
<a id='n3381' href='#n3381'>3381</a>
<a id='n3382' href='#n3382'>3382</a>
<a id='n3383' href='#n3383'>3383</a>
<a id='n3384' href='#n3384'>3384</a>
<a id='n3385' href='#n3385'>3385</a>
<a id='n3386' href='#n3386'>3386</a>
<a id='n3387' href='#n3387'>3387</a>
<a id='n3388' href='#n3388'>3388</a>
<a id='n3389' href='#n3389'>3389</a>
<a id='n3390' href='#n3390'>3390</a>
<a id='n3391' href='#n3391'>3391</a>
<a id='n3392' href='#n3392'>3392</a>
<a id='n3393' href='#n3393'>3393</a>
<a id='n3394' href='#n3394'>3394</a>
<a id='n3395' href='#n3395'>3395</a>
<a id='n3396' href='#n3396'>3396</a>
<a id='n3397' href='#n3397'>3397</a>
<a id='n3398' href='#n3398'>3398</a>
<a id='n3399' href='#n3399'>3399</a>
<a id='n3400' href='#n3400'>3400</a>
<a id='n3401' href='#n3401'>3401</a>
<a id='n3402' href='#n3402'>3402</a>
<a id='n3403' href='#n3403'>3403</a>
<a id='n3404' href='#n3404'>3404</a>
<a id='n3405' href='#n3405'>3405</a>
<a id='n3406' href='#n3406'>3406</a>
<a id='n3407' href='#n3407'>3407</a>
<a id='n3408' href='#n3408'>3408</a>
<a id='n3409' href='#n3409'>3409</a>
<a id='n3410' href='#n3410'>3410</a>
<a id='n3411' href='#n3411'>3411</a>
<a id='n3412' href='#n3412'>3412</a>
<a id='n3413' href='#n3413'>3413</a>
<a id='n3414' href='#n3414'>3414</a>
<a id='n3415' href='#n3415'>3415</a>
<a id='n3416' href='#n3416'>3416</a>
<a id='n3417' href='#n3417'>3417</a>
<a id='n3418' href='#n3418'>3418</a>
<a id='n3419' href='#n3419'>3419</a>
<a id='n3420' href='#n3420'>3420</a>
<a id='n3421' href='#n3421'>3421</a>
<a id='n3422' href='#n3422'>3422</a>
<a id='n3423' href='#n3423'>3423</a>
<a id='n3424' href='#n3424'>3424</a>
<a id='n3425' href='#n3425'>3425</a>
<a id='n3426' href='#n3426'>3426</a>
<a id='n3427' href='#n3427'>3427</a>
<a id='n3428' href='#n3428'>3428</a>
<a id='n3429' href='#n3429'>3429</a>
<a id='n3430' href='#n3430'>3430</a>
<a id='n3431' href='#n3431'>3431</a>
<a id='n3432' href='#n3432'>3432</a>
<a id='n3433' href='#n3433'>3433</a>
<a id='n3434' href='#n3434'>3434</a>
<a id='n3435' href='#n3435'>3435</a>
<a id='n3436' href='#n3436'>3436</a>
<a id='n3437' href='#n3437'>3437</a>
<a id='n3438' href='#n3438'>3438</a>
<a id='n3439' href='#n3439'>3439</a>
<a id='n3440' href='#n3440'>3440</a>
<a id='n3441' href='#n3441'>3441</a>
<a id='n3442' href='#n3442'>3442</a>
<a id='n3443' href='#n3443'>3443</a>
<a id='n3444' href='#n3444'>3444</a>
<a id='n3445' href='#n3445'>3445</a>
<a id='n3446' href='#n3446'>3446</a>
<a id='n3447' href='#n3447'>3447</a>
<a id='n3448' href='#n3448'>3448</a>
<a id='n3449' href='#n3449'>3449</a>
<a id='n3450' href='#n3450'>3450</a>
<a id='n3451' href='#n3451'>3451</a>
<a id='n3452' href='#n3452'>3452</a>
<a id='n3453' href='#n3453'>3453</a>
<a id='n3454' href='#n3454'>3454</a>
<a id='n3455' href='#n3455'>3455</a>
<a id='n3456' href='#n3456'>3456</a>
<a id='n3457' href='#n3457'>3457</a>
<a id='n3458' href='#n3458'>3458</a>
<a id='n3459' href='#n3459'>3459</a>
<a id='n3460' href='#n3460'>3460</a>
<a id='n3461' href='#n3461'>3461</a>
<a id='n3462' href='#n3462'>3462</a>
<a id='n3463' href='#n3463'>3463</a>
<a id='n3464' href='#n3464'>3464</a>
<a id='n3465' href='#n3465'>3465</a>
<a id='n3466' href='#n3466'>3466</a>
<a id='n3467' href='#n3467'>3467</a>
<a id='n3468' href='#n3468'>3468</a>
<a id='n3469' href='#n3469'>3469</a>
<a id='n3470' href='#n3470'>3470</a>
<a id='n3471' href='#n3471'>3471</a>
<a id='n3472' href='#n3472'>3472</a>
<a id='n3473' href='#n3473'>3473</a>
<a id='n3474' href='#n3474'>3474</a>
<a id='n3475' href='#n3475'>3475</a>
<a id='n3476' href='#n3476'>3476</a>
<a id='n3477' href='#n3477'>3477</a>
<a id='n3478' href='#n3478'>3478</a>
<a id='n3479' href='#n3479'>3479</a>
<a id='n3480' href='#n3480'>3480</a>
<a id='n3481' href='#n3481'>3481</a>
<a id='n3482' href='#n3482'>3482</a>
<a id='n3483' href='#n3483'>3483</a>
<a id='n3484' href='#n3484'>3484</a>
<a id='n3485' href='#n3485'>3485</a>
<a id='n3486' href='#n3486'>3486</a>
<a id='n3487' href='#n3487'>3487</a>
<a id='n3488' href='#n3488'>3488</a>
<a id='n3489' href='#n3489'>3489</a>
<a id='n3490' href='#n3490'>3490</a>
<a id='n3491' href='#n3491'>3491</a>
<a id='n3492' href='#n3492'>3492</a>
<a id='n3493' href='#n3493'>3493</a>
<a id='n3494' href='#n3494'>3494</a>
<a id='n3495' href='#n3495'>3495</a>
<a id='n3496' href='#n3496'>3496</a>
<a id='n3497' href='#n3497'>3497</a>
<a id='n3498' href='#n3498'>3498</a>
<a id='n3499' href='#n3499'>3499</a>
<a id='n3500' href='#n3500'>3500</a>
<a id='n3501' href='#n3501'>3501</a>
<a id='n3502' href='#n3502'>3502</a>
<a id='n3503' href='#n3503'>3503</a>
<a id='n3504' href='#n3504'>3504</a>
<a id='n3505' href='#n3505'>3505</a>
<a id='n3506' href='#n3506'>3506</a>
<a id='n3507' href='#n3507'>3507</a>
<a id='n3508' href='#n3508'>3508</a>
<a id='n3509' href='#n3509'>3509</a>
<a id='n3510' href='#n3510'>3510</a>
<a id='n3511' href='#n3511'>3511</a>
<a id='n3512' href='#n3512'>3512</a>
<a id='n3513' href='#n3513'>3513</a>
<a id='n3514' href='#n3514'>3514</a>
<a id='n3515' href='#n3515'>3515</a>
<a id='n3516' href='#n3516'>3516</a>
<a id='n3517' href='#n3517'>3517</a>
<a id='n3518' href='#n3518'>3518</a>
<a id='n3519' href='#n3519'>3519</a>
<a id='n3520' href='#n3520'>3520</a>
<a id='n3521' href='#n3521'>3521</a>
<a id='n3522' href='#n3522'>3522</a>
<a id='n3523' href='#n3523'>3523</a>
<a id='n3524' href='#n3524'>3524</a>
<a id='n3525' href='#n3525'>3525</a>
<a id='n3526' href='#n3526'>3526</a>
<a id='n3527' href='#n3527'>3527</a>
<a id='n3528' href='#n3528'>3528</a>
<a id='n3529' href='#n3529'>3529</a>
<a id='n3530' href='#n3530'>3530</a>
<a id='n3531' href='#n3531'>3531</a>
<a id='n3532' href='#n3532'>3532</a>
<a id='n3533' href='#n3533'>3533</a>
<a id='n3534' href='#n3534'>3534</a>
<a id='n3535' href='#n3535'>3535</a>
<a id='n3536' href='#n3536'>3536</a>
<a id='n3537' href='#n3537'>3537</a>
<a id='n3538' href='#n3538'>3538</a>
<a id='n3539' href='#n3539'>3539</a>
<a id='n3540' href='#n3540'>3540</a>
<a id='n3541' href='#n3541'>3541</a>
<a id='n3542' href='#n3542'>3542</a>
<a id='n3543' href='#n3543'>3543</a>
<a id='n3544' href='#n3544'>3544</a>
<a id='n3545' href='#n3545'>3545</a>
<a id='n3546' href='#n3546'>3546</a>
<a id='n3547' href='#n3547'>3547</a>
<a id='n3548' href='#n3548'>3548</a>
<a id='n3549' href='#n3549'>3549</a>
<a id='n3550' href='#n3550'>3550</a>
<a id='n3551' href='#n3551'>3551</a>
<a id='n3552' href='#n3552'>3552</a>
<a id='n3553' href='#n3553'>3553</a>
<a id='n3554' href='#n3554'>3554</a>
<a id='n3555' href='#n3555'>3555</a>
<a id='n3556' href='#n3556'>3556</a>
<a id='n3557' href='#n3557'>3557</a>
<a id='n3558' href='#n3558'>3558</a>
<a id='n3559' href='#n3559'>3559</a>
<a id='n3560' href='#n3560'>3560</a>
<a id='n3561' href='#n3561'>3561</a>
<a id='n3562' href='#n3562'>3562</a>
<a id='n3563' href='#n3563'>3563</a>
<a id='n3564' href='#n3564'>3564</a>
<a id='n3565' href='#n3565'>3565</a>
<a id='n3566' href='#n3566'>3566</a>
<a id='n3567' href='#n3567'>3567</a>
<a id='n3568' href='#n3568'>3568</a>
<a id='n3569' href='#n3569'>3569</a>
<a id='n3570' href='#n3570'>3570</a>
<a id='n3571' href='#n3571'>3571</a>
<a id='n3572' href='#n3572'>3572</a>
<a id='n3573' href='#n3573'>3573</a>
<a id='n3574' href='#n3574'>3574</a>
<a id='n3575' href='#n3575'>3575</a>
<a id='n3576' href='#n3576'>3576</a>
<a id='n3577' href='#n3577'>3577</a>
<a id='n3578' href='#n3578'>3578</a>
<a id='n3579' href='#n3579'>3579</a>
<a id='n3580' href='#n3580'>3580</a>
<a id='n3581' href='#n3581'>3581</a>
<a id='n3582' href='#n3582'>3582</a>
<a id='n3583' href='#n3583'>3583</a>
<a id='n3584' href='#n3584'>3584</a>
<a id='n3585' href='#n3585'>3585</a>
<a id='n3586' href='#n3586'>3586</a>
<a id='n3587' href='#n3587'>3587</a>
<a id='n3588' href='#n3588'>3588</a>
<a id='n3589' href='#n3589'>3589</a>
<a id='n3590' href='#n3590'>3590</a>
<a id='n3591' href='#n3591'>3591</a>
<a id='n3592' href='#n3592'>3592</a>
<a id='n3593' href='#n3593'>3593</a>
<a id='n3594' href='#n3594'>3594</a>
<a id='n3595' href='#n3595'>3595</a>
<a id='n3596' href='#n3596'>3596</a>
<a id='n3597' href='#n3597'>3597</a>
<a id='n3598' href='#n3598'>3598</a>
<a id='n3599' href='#n3599'>3599</a>
<a id='n3600' href='#n3600'>3600</a>
<a id='n3601' href='#n3601'>3601</a>
<a id='n3602' href='#n3602'>3602</a>
<a id='n3603' href='#n3603'>3603</a>
<a id='n3604' href='#n3604'>3604</a>
<a id='n3605' href='#n3605'>3605</a>
<a id='n3606' href='#n3606'>3606</a>
<a id='n3607' href='#n3607'>3607</a>
<a id='n3608' href='#n3608'>3608</a>
<a id='n3609' href='#n3609'>3609</a>
<a id='n3610' href='#n3610'>3610</a>
<a id='n3611' href='#n3611'>3611</a>
<a id='n3612' href='#n3612'>3612</a>
<a id='n3613' href='#n3613'>3613</a>
<a id='n3614' href='#n3614'>3614</a>
<a id='n3615' href='#n3615'>3615</a>
<a id='n3616' href='#n3616'>3616</a>
<a id='n3617' href='#n3617'>3617</a>
<a id='n3618' href='#n3618'>3618</a>
<a id='n3619' href='#n3619'>3619</a>
<a id='n3620' href='#n3620'>3620</a>
<a id='n3621' href='#n3621'>3621</a>
<a id='n3622' href='#n3622'>3622</a>
<a id='n3623' href='#n3623'>3623</a>
<a id='n3624' href='#n3624'>3624</a>
<a id='n3625' href='#n3625'>3625</a>
<a id='n3626' href='#n3626'>3626</a>
<a id='n3627' href='#n3627'>3627</a>
<a id='n3628' href='#n3628'>3628</a>
<a id='n3629' href='#n3629'>3629</a>
<a id='n3630' href='#n3630'>3630</a>
<a id='n3631' href='#n3631'>3631</a>
<a id='n3632' href='#n3632'>3632</a>
<a id='n3633' href='#n3633'>3633</a>
<a id='n3634' href='#n3634'>3634</a>
<a id='n3635' href='#n3635'>3635</a>
<a id='n3636' href='#n3636'>3636</a>
<a id='n3637' href='#n3637'>3637</a>
<a id='n3638' href='#n3638'>3638</a>
<a id='n3639' href='#n3639'>3639</a>
<a id='n3640' href='#n3640'>3640</a>
<a id='n3641' href='#n3641'>3641</a>
<a id='n3642' href='#n3642'>3642</a>
<a id='n3643' href='#n3643'>3643</a>
<a id='n3644' href='#n3644'>3644</a>
<a id='n3645' href='#n3645'>3645</a>
<a id='n3646' href='#n3646'>3646</a>
<a id='n3647' href='#n3647'>3647</a>
<a id='n3648' href='#n3648'>3648</a>
<a id='n3649' href='#n3649'>3649</a>
<a id='n3650' href='#n3650'>3650</a>
<a id='n3651' href='#n3651'>3651</a>
<a id='n3652' href='#n3652'>3652</a>
<a id='n3653' href='#n3653'>3653</a>
<a id='n3654' href='#n3654'>3654</a>
<a id='n3655' href='#n3655'>3655</a>
<a id='n3656' href='#n3656'>3656</a>
<a id='n3657' href='#n3657'>3657</a>
<a id='n3658' href='#n3658'>3658</a>
<a id='n3659' href='#n3659'>3659</a>
<a id='n3660' href='#n3660'>3660</a>
<a id='n3661' href='#n3661'>3661</a>
<a id='n3662' href='#n3662'>3662</a>
<a id='n3663' href='#n3663'>3663</a>
<a id='n3664' href='#n3664'>3664</a>
<a id='n3665' href='#n3665'>3665</a>
<a id='n3666' href='#n3666'>3666</a>
<a id='n3667' href='#n3667'>3667</a>
<a id='n3668' href='#n3668'>3668</a>
<a id='n3669' href='#n3669'>3669</a>
<a id='n3670' href='#n3670'>3670</a>
<a id='n3671' href='#n3671'>3671</a>
<a id='n3672' href='#n3672'>3672</a>
<a id='n3673' href='#n3673'>3673</a>
<a id='n3674' href='#n3674'>3674</a>
<a id='n3675' href='#n3675'>3675</a>
<a id='n3676' href='#n3676'>3676</a>
<a id='n3677' href='#n3677'>3677</a>
<a id='n3678' href='#n3678'>3678</a>
<a id='n3679' href='#n3679'>3679</a>
<a id='n3680' href='#n3680'>3680</a>
<a id='n3681' href='#n3681'>3681</a>
<a id='n3682' href='#n3682'>3682</a>
<a id='n3683' href='#n3683'>3683</a>
<a id='n3684' href='#n3684'>3684</a>
<a id='n3685' href='#n3685'>3685</a>
<a id='n3686' href='#n3686'>3686</a>
<a id='n3687' href='#n3687'>3687</a>
<a id='n3688' href='#n3688'>3688</a>
<a id='n3689' href='#n3689'>3689</a>
<a id='n3690' href='#n3690'>3690</a>
<a id='n3691' href='#n3691'>3691</a>
<a id='n3692' href='#n3692'>3692</a>
<a id='n3693' href='#n3693'>3693</a>
<a id='n3694' href='#n3694'>3694</a>
<a id='n3695' href='#n3695'>3695</a>
<a id='n3696' href='#n3696'>3696</a>
<a id='n3697' href='#n3697'>3697</a>
<a id='n3698' href='#n3698'>3698</a>
<a id='n3699' href='#n3699'>3699</a>
<a id='n3700' href='#n3700'>3700</a>
<a id='n3701' href='#n3701'>3701</a>
<a id='n3702' href='#n3702'>3702</a>
<a id='n3703' href='#n3703'>3703</a>
<a id='n3704' href='#n3704'>3704</a>
<a id='n3705' href='#n3705'>3705</a>
<a id='n3706' href='#n3706'>3706</a>
<a id='n3707' href='#n3707'>3707</a>
<a id='n3708' href='#n3708'>3708</a>
<a id='n3709' href='#n3709'>3709</a>
<a id='n3710' href='#n3710'>3710</a>
<a id='n3711' href='#n3711'>3711</a>
<a id='n3712' href='#n3712'>3712</a>
<a id='n3713' href='#n3713'>3713</a>
<a id='n3714' href='#n3714'>3714</a>
<a id='n3715' href='#n3715'>3715</a>
<a id='n3716' href='#n3716'>3716</a>
<a id='n3717' href='#n3717'>3717</a>
<a id='n3718' href='#n3718'>3718</a>
<a id='n3719' href='#n3719'>3719</a>
<a id='n3720' href='#n3720'>3720</a>
<a id='n3721' href='#n3721'>3721</a>
<a id='n3722' href='#n3722'>3722</a>
<a id='n3723' href='#n3723'>3723</a>
<a id='n3724' href='#n3724'>3724</a>
<a id='n3725' href='#n3725'>3725</a>
<a id='n3726' href='#n3726'>3726</a>
<a id='n3727' href='#n3727'>3727</a>
<a id='n3728' href='#n3728'>3728</a>
<a id='n3729' href='#n3729'>3729</a>
<a id='n3730' href='#n3730'>3730</a>
<a id='n3731' href='#n3731'>3731</a>
<a id='n3732' href='#n3732'>3732</a>
<a id='n3733' href='#n3733'>3733</a>
<a id='n3734' href='#n3734'>3734</a>
<a id='n3735' href='#n3735'>3735</a>
<a id='n3736' href='#n3736'>3736</a>
<a id='n3737' href='#n3737'>3737</a>
<a id='n3738' href='#n3738'>3738</a>
<a id='n3739' href='#n3739'>3739</a>
<a id='n3740' href='#n3740'>3740</a>
<a id='n3741' href='#n3741'>3741</a>
<a id='n3742' href='#n3742'>3742</a>
<a id='n3743' href='#n3743'>3743</a>
<a id='n3744' href='#n3744'>3744</a>
<a id='n3745' href='#n3745'>3745</a>
<a id='n3746' href='#n3746'>3746</a>
<a id='n3747' href='#n3747'>3747</a>
<a id='n3748' href='#n3748'>3748</a>
<a id='n3749' href='#n3749'>3749</a>
<a id='n3750' href='#n3750'>3750</a>
<a id='n3751' href='#n3751'>3751</a>
<a id='n3752' href='#n3752'>3752</a>
<a id='n3753' href='#n3753'>3753</a>
<a id='n3754' href='#n3754'>3754</a>
<a id='n3755' href='#n3755'>3755</a>
<a id='n3756' href='#n3756'>3756</a>
<a id='n3757' href='#n3757'>3757</a>
<a id='n3758' href='#n3758'>3758</a>
<a id='n3759' href='#n3759'>3759</a>
<a id='n3760' href='#n3760'>3760</a>
<a id='n3761' href='#n3761'>3761</a>
<a id='n3762' href='#n3762'>3762</a>
<a id='n3763' href='#n3763'>3763</a>
<a id='n3764' href='#n3764'>3764</a>
<a id='n3765' href='#n3765'>3765</a>
<a id='n3766' href='#n3766'>3766</a>
<a id='n3767' href='#n3767'>3767</a>
<a id='n3768' href='#n3768'>3768</a>
<a id='n3769' href='#n3769'>3769</a>
<a id='n3770' href='#n3770'>3770</a>
<a id='n3771' href='#n3771'>3771</a>
<a id='n3772' href='#n3772'>3772</a>
<a id='n3773' href='#n3773'>3773</a>
<a id='n3774' href='#n3774'>3774</a>
<a id='n3775' href='#n3775'>3775</a>
<a id='n3776' href='#n3776'>3776</a>
<a id='n3777' href='#n3777'>3777</a>
<a id='n3778' href='#n3778'>3778</a>
<a id='n3779' href='#n3779'>3779</a>
<a id='n3780' href='#n3780'>3780</a>
<a id='n3781' href='#n3781'>3781</a>
<a id='n3782' href='#n3782'>3782</a>
<a id='n3783' href='#n3783'>3783</a>
<a id='n3784' href='#n3784'>3784</a>
<a id='n3785' href='#n3785'>3785</a>
<a id='n3786' href='#n3786'>3786</a>
<a id='n3787' href='#n3787'>3787</a>
<a id='n3788' href='#n3788'>3788</a>
<a id='n3789' href='#n3789'>3789</a>
<a id='n3790' href='#n3790'>3790</a>
<a id='n3791' href='#n3791'>3791</a>
<a id='n3792' href='#n3792'>3792</a>
<a id='n3793' href='#n3793'>3793</a>
<a id='n3794' href='#n3794'>3794</a>
<a id='n3795' href='#n3795'>3795</a>
<a id='n3796' href='#n3796'>3796</a>
<a id='n3797' href='#n3797'>3797</a>
<a id='n3798' href='#n3798'>3798</a>
<a id='n3799' href='#n3799'>3799</a>
<a id='n3800' href='#n3800'>3800</a>
<a id='n3801' href='#n3801'>3801</a>
<a id='n3802' href='#n3802'>3802</a>
<a id='n3803' href='#n3803'>3803</a>
<a id='n3804' href='#n3804'>3804</a>
<a id='n3805' href='#n3805'>3805</a>
<a id='n3806' href='#n3806'>3806</a>
<a id='n3807' href='#n3807'>3807</a>
<a id='n3808' href='#n3808'>3808</a>
<a id='n3809' href='#n3809'>3809</a>
<a id='n3810' href='#n3810'>3810</a>
<a id='n3811' href='#n3811'>3811</a>
<a id='n3812' href='#n3812'>3812</a>
<a id='n3813' href='#n3813'>3813</a>
<a id='n3814' href='#n3814'>3814</a>
<a id='n3815' href='#n3815'>3815</a>
<a id='n3816' href='#n3816'>3816</a>
<a id='n3817' href='#n3817'>3817</a>
<a id='n3818' href='#n3818'>3818</a>
<a id='n3819' href='#n3819'>3819</a>
<a id='n3820' href='#n3820'>3820</a>
<a id='n3821' href='#n3821'>3821</a>
<a id='n3822' href='#n3822'>3822</a>
<a id='n3823' href='#n3823'>3823</a>
<a id='n3824' href='#n3824'>3824</a>
<a id='n3825' href='#n3825'>3825</a>
<a id='n3826' href='#n3826'>3826</a>
<a id='n3827' href='#n3827'>3827</a>
<a id='n3828' href='#n3828'>3828</a>
<a id='n3829' href='#n3829'>3829</a>
<a id='n3830' href='#n3830'>3830</a>
<a id='n3831' href='#n3831'>3831</a>
<a id='n3832' href='#n3832'>3832</a>
<a id='n3833' href='#n3833'>3833</a>
<a id='n3834' href='#n3834'>3834</a>
<a id='n3835' href='#n3835'>3835</a>
<a id='n3836' href='#n3836'>3836</a>
<a id='n3837' href='#n3837'>3837</a>
<a id='n3838' href='#n3838'>3838</a>
<a id='n3839' href='#n3839'>3839</a>
<a id='n3840' href='#n3840'>3840</a>
<a id='n3841' href='#n3841'>3841</a>
<a id='n3842' href='#n3842'>3842</a>
<a id='n3843' href='#n3843'>3843</a>
<a id='n3844' href='#n3844'>3844</a>
<a id='n3845' href='#n3845'>3845</a>
<a id='n3846' href='#n3846'>3846</a>
<a id='n3847' href='#n3847'>3847</a>
<a id='n3848' href='#n3848'>3848</a>
<a id='n3849' href='#n3849'>3849</a>
<a id='n3850' href='#n3850'>3850</a>
<a id='n3851' href='#n3851'>3851</a>
<a id='n3852' href='#n3852'>3852</a>
<a id='n3853' href='#n3853'>3853</a>
<a id='n3854' href='#n3854'>3854</a>
<a id='n3855' href='#n3855'>3855</a>
<a id='n3856' href='#n3856'>3856</a>
<a id='n3857' href='#n3857'>3857</a>
<a id='n3858' href='#n3858'>3858</a>
<a id='n3859' href='#n3859'>3859</a>
<a id='n3860' href='#n3860'>3860</a>
<a id='n3861' href='#n3861'>3861</a>
<a id='n3862' href='#n3862'>3862</a>
<a id='n3863' href='#n3863'>3863</a>
<a id='n3864' href='#n3864'>3864</a>
<a id='n3865' href='#n3865'>3865</a>
<a id='n3866' href='#n3866'>3866</a>
<a id='n3867' href='#n3867'>3867</a>
<a id='n3868' href='#n3868'>3868</a>
<a id='n3869' href='#n3869'>3869</a>
<a id='n3870' href='#n3870'>3870</a>
<a id='n3871' href='#n3871'>3871</a>
<a id='n3872' href='#n3872'>3872</a>
<a id='n3873' href='#n3873'>3873</a>
<a id='n3874' href='#n3874'>3874</a>
<a id='n3875' href='#n3875'>3875</a>
<a id='n3876' href='#n3876'>3876</a>
<a id='n3877' href='#n3877'>3877</a>
<a id='n3878' href='#n3878'>3878</a>
<a id='n3879' href='#n3879'>3879</a>
<a id='n3880' href='#n3880'>3880</a>
<a id='n3881' href='#n3881'>3881</a>
<a id='n3882' href='#n3882'>3882</a>
<a id='n3883' href='#n3883'>3883</a>
<a id='n3884' href='#n3884'>3884</a>
<a id='n3885' href='#n3885'>3885</a>
<a id='n3886' href='#n3886'>3886</a>
<a id='n3887' href='#n3887'>3887</a>
<a id='n3888' href='#n3888'>3888</a>
<a id='n3889' href='#n3889'>3889</a>
<a id='n3890' href='#n3890'>3890</a>
<a id='n3891' href='#n3891'>3891</a>
<a id='n3892' href='#n3892'>3892</a>
<a id='n3893' href='#n3893'>3893</a>
<a id='n3894' href='#n3894'>3894</a>
<a id='n3895' href='#n3895'>3895</a>
<a id='n3896' href='#n3896'>3896</a>
<a id='n3897' href='#n3897'>3897</a>
<a id='n3898' href='#n3898'>3898</a>
<a id='n3899' href='#n3899'>3899</a>
<a id='n3900' href='#n3900'>3900</a>
<a id='n3901' href='#n3901'>3901</a>
<a id='n3902' href='#n3902'>3902</a>
<a id='n3903' href='#n3903'>3903</a>
<a id='n3904' href='#n3904'>3904</a>
<a id='n3905' href='#n3905'>3905</a>
<a id='n3906' href='#n3906'>3906</a>
<a id='n3907' href='#n3907'>3907</a>
<a id='n3908' href='#n3908'>3908</a>
<a id='n3909' href='#n3909'>3909</a>
<a id='n3910' href='#n3910'>3910</a>
<a id='n3911' href='#n3911'>3911</a>
<a id='n3912' href='#n3912'>3912</a>
<a id='n3913' href='#n3913'>3913</a>
<a id='n3914' href='#n3914'>3914</a>
<a id='n3915' href='#n3915'>3915</a>
<a id='n3916' href='#n3916'>3916</a>
<a id='n3917' href='#n3917'>3917</a>
<a id='n3918' href='#n3918'>3918</a>
<a id='n3919' href='#n3919'>3919</a>
<a id='n3920' href='#n3920'>3920</a>
<a id='n3921' href='#n3921'>3921</a>
<a id='n3922' href='#n3922'>3922</a>
<a id='n3923' href='#n3923'>3923</a>
<a id='n3924' href='#n3924'>3924</a>
<a id='n3925' href='#n3925'>3925</a>
<a id='n3926' href='#n3926'>3926</a>
<a id='n3927' href='#n3927'>3927</a>
<a id='n3928' href='#n3928'>3928</a>
<a id='n3929' href='#n3929'>3929</a>
<a id='n3930' href='#n3930'>3930</a>
<a id='n3931' href='#n3931'>3931</a>
<a id='n3932' href='#n3932'>3932</a>
<a id='n3933' href='#n3933'>3933</a>
<a id='n3934' href='#n3934'>3934</a>
<a id='n3935' href='#n3935'>3935</a>
<a id='n3936' href='#n3936'>3936</a>
<a id='n3937' href='#n3937'>3937</a>
<a id='n3938' href='#n3938'>3938</a>
<a id='n3939' href='#n3939'>3939</a>
<a id='n3940' href='#n3940'>3940</a>
<a id='n3941' href='#n3941'>3941</a>
<a id='n3942' href='#n3942'>3942</a>
<a id='n3943' href='#n3943'>3943</a>
<a id='n3944' href='#n3944'>3944</a>
<a id='n3945' href='#n3945'>3945</a>
<a id='n3946' href='#n3946'>3946</a>
<a id='n3947' href='#n3947'>3947</a>
<a id='n3948' href='#n3948'>3948</a>
<a id='n3949' href='#n3949'>3949</a>
<a id='n3950' href='#n3950'>3950</a>
<a id='n3951' href='#n3951'>3951</a>
<a id='n3952' href='#n3952'>3952</a>
<a id='n3953' href='#n3953'>3953</a>
<a id='n3954' href='#n3954'>3954</a>
<a id='n3955' href='#n3955'>3955</a>
<a id='n3956' href='#n3956'>3956</a>
<a id='n3957' href='#n3957'>3957</a>
<a id='n3958' href='#n3958'>3958</a>
<a id='n3959' href='#n3959'>3959</a>
<a id='n3960' href='#n3960'>3960</a>
<a id='n3961' href='#n3961'>3961</a>
<a id='n3962' href='#n3962'>3962</a>
<a id='n3963' href='#n3963'>3963</a>
<a id='n3964' href='#n3964'>3964</a>
<a id='n3965' href='#n3965'>3965</a>
<a id='n3966' href='#n3966'>3966</a>
<a id='n3967' href='#n3967'>3967</a>
<a id='n3968' href='#n3968'>3968</a>
<a id='n3969' href='#n3969'>3969</a>
<a id='n3970' href='#n3970'>3970</a>
<a id='n3971' href='#n3971'>3971</a>
<a id='n3972' href='#n3972'>3972</a>
<a id='n3973' href='#n3973'>3973</a>
<a id='n3974' href='#n3974'>3974</a>
<a id='n3975' href='#n3975'>3975</a>
<a id='n3976' href='#n3976'>3976</a>
<a id='n3977' href='#n3977'>3977</a>
<a id='n3978' href='#n3978'>3978</a>
<a id='n3979' href='#n3979'>3979</a>
<a id='n3980' href='#n3980'>3980</a>
<a id='n3981' href='#n3981'>3981</a>
<a id='n3982' href='#n3982'>3982</a>
<a id='n3983' href='#n3983'>3983</a>
<a id='n3984' href='#n3984'>3984</a>
<a id='n3985' href='#n3985'>3985</a>
<a id='n3986' href='#n3986'>3986</a>
<a id='n3987' href='#n3987'>3987</a>
<a id='n3988' href='#n3988'>3988</a>
<a id='n3989' href='#n3989'>3989</a>
<a id='n3990' href='#n3990'>3990</a>
<a id='n3991' href='#n3991'>3991</a>
<a id='n3992' href='#n3992'>3992</a>
<a id='n3993' href='#n3993'>3993</a>
<a id='n3994' href='#n3994'>3994</a>
<a id='n3995' href='#n3995'>3995</a>
<a id='n3996' href='#n3996'>3996</a>
<a id='n3997' href='#n3997'>3997</a>
<a id='n3998' href='#n3998'>3998</a>
<a id='n3999' href='#n3999'>3999</a>
<a id='n4000' href='#n4000'>4000</a>
<a id='n4001' href='#n4001'>4001</a>
<a id='n4002' href='#n4002'>4002</a>
<a id='n4003' href='#n4003'>4003</a>
<a id='n4004' href='#n4004'>4004</a>
<a id='n4005' href='#n4005'>4005</a>
<a id='n4006' href='#n4006'>4006</a>
<a id='n4007' href='#n4007'>4007</a>
<a id='n4008' href='#n4008'>4008</a>
<a id='n4009' href='#n4009'>4009</a>
<a id='n4010' href='#n4010'>4010</a>
<a id='n4011' href='#n4011'>4011</a>
<a id='n4012' href='#n4012'>4012</a>
<a id='n4013' href='#n4013'>4013</a>
<a id='n4014' href='#n4014'>4014</a>
<a id='n4015' href='#n4015'>4015</a>
<a id='n4016' href='#n4016'>4016</a>
<a id='n4017' href='#n4017'>4017</a>
<a id='n4018' href='#n4018'>4018</a>
<a id='n4019' href='#n4019'>4019</a>
<a id='n4020' href='#n4020'>4020</a>
<a id='n4021' href='#n4021'>4021</a>
<a id='n4022' href='#n4022'>4022</a>
<a id='n4023' href='#n4023'>4023</a>
<a id='n4024' href='#n4024'>4024</a>
<a id='n4025' href='#n4025'>4025</a>
<a id='n4026' href='#n4026'>4026</a>
<a id='n4027' href='#n4027'>4027</a>
<a id='n4028' href='#n4028'>4028</a>
<a id='n4029' href='#n4029'>4029</a>
<a id='n4030' href='#n4030'>4030</a>
<a id='n4031' href='#n4031'>4031</a>
<a id='n4032' href='#n4032'>4032</a>
<a id='n4033' href='#n4033'>4033</a>
<a id='n4034' href='#n4034'>4034</a>
<a id='n4035' href='#n4035'>4035</a>
<a id='n4036' href='#n4036'>4036</a>
<a id='n4037' href='#n4037'>4037</a>
<a id='n4038' href='#n4038'>4038</a>
<a id='n4039' href='#n4039'>4039</a>
<a id='n4040' href='#n4040'>4040</a>
<a id='n4041' href='#n4041'>4041</a>
<a id='n4042' href='#n4042'>4042</a>
<a id='n4043' href='#n4043'>4043</a>
<a id='n4044' href='#n4044'>4044</a>
<a id='n4045' href='#n4045'>4045</a>
<a id='n4046' href='#n4046'>4046</a>
<a id='n4047' href='#n4047'>4047</a>
<a id='n4048' href='#n4048'>4048</a>
<a id='n4049' href='#n4049'>4049</a>
<a id='n4050' href='#n4050'>4050</a>
<a id='n4051' href='#n4051'>4051</a>
<a id='n4052' href='#n4052'>4052</a>
<a id='n4053' href='#n4053'>4053</a>
<a id='n4054' href='#n4054'>4054</a>
<a id='n4055' href='#n4055'>4055</a>
<a id='n4056' href='#n4056'>4056</a>
<a id='n4057' href='#n4057'>4057</a>
<a id='n4058' href='#n4058'>4058</a>
<a id='n4059' href='#n4059'>4059</a>
<a id='n4060' href='#n4060'>4060</a>
<a id='n4061' href='#n4061'>4061</a>
<a id='n4062' href='#n4062'>4062</a>
<a id='n4063' href='#n4063'>4063</a>
<a id='n4064' href='#n4064'>4064</a>
<a id='n4065' href='#n4065'>4065</a>
<a id='n4066' href='#n4066'>4066</a>
<a id='n4067' href='#n4067'>4067</a>
<a id='n4068' href='#n4068'>4068</a>
<a id='n4069' href='#n4069'>4069</a>
<a id='n4070' href='#n4070'>4070</a>
<a id='n4071' href='#n4071'>4071</a>
<a id='n4072' href='#n4072'>4072</a>
<a id='n4073' href='#n4073'>4073</a>
<a id='n4074' href='#n4074'>4074</a>
<a id='n4075' href='#n4075'>4075</a>
<a id='n4076' href='#n4076'>4076</a>
<a id='n4077' href='#n4077'>4077</a>
<a id='n4078' href='#n4078'>4078</a>
<a id='n4079' href='#n4079'>4079</a>
<a id='n4080' href='#n4080'>4080</a>
<a id='n4081' href='#n4081'>4081</a>
<a id='n4082' href='#n4082'>4082</a>
<a id='n4083' href='#n4083'>4083</a>
<a id='n4084' href='#n4084'>4084</a>
<a id='n4085' href='#n4085'>4085</a>
<a id='n4086' href='#n4086'>4086</a>
<a id='n4087' href='#n4087'>4087</a>
<a id='n4088' href='#n4088'>4088</a>
<a id='n4089' href='#n4089'>4089</a>
<a id='n4090' href='#n4090'>4090</a>
<a id='n4091' href='#n4091'>4091</a>
<a id='n4092' href='#n4092'>4092</a>
<a id='n4093' href='#n4093'>4093</a>
<a id='n4094' href='#n4094'>4094</a>
<a id='n4095' href='#n4095'>4095</a>
<a id='n4096' href='#n4096'>4096</a>
<a id='n4097' href='#n4097'>4097</a>
<a id='n4098' href='#n4098'>4098</a>
<a id='n4099' href='#n4099'>4099</a>
<a id='n4100' href='#n4100'>4100</a>
<a id='n4101' href='#n4101'>4101</a>
<a id='n4102' href='#n4102'>4102</a>
<a id='n4103' href='#n4103'>4103</a>
<a id='n4104' href='#n4104'>4104</a>
<a id='n4105' href='#n4105'>4105</a>
<a id='n4106' href='#n4106'>4106</a>
<a id='n4107' href='#n4107'>4107</a>
<a id='n4108' href='#n4108'>4108</a>
<a id='n4109' href='#n4109'>4109</a>
<a id='n4110' href='#n4110'>4110</a>
<a id='n4111' href='#n4111'>4111</a>
<a id='n4112' href='#n4112'>4112</a>
<a id='n4113' href='#n4113'>4113</a>
<a id='n4114' href='#n4114'>4114</a>
<a id='n4115' href='#n4115'>4115</a>
<a id='n4116' href='#n4116'>4116</a>
<a id='n4117' href='#n4117'>4117</a>
<a id='n4118' href='#n4118'>4118</a>
<a id='n4119' href='#n4119'>4119</a>
<a id='n4120' href='#n4120'>4120</a>
<a id='n4121' href='#n4121'>4121</a>
<a id='n4122' href='#n4122'>4122</a>
<a id='n4123' href='#n4123'>4123</a>
<a id='n4124' href='#n4124'>4124</a>
<a id='n4125' href='#n4125'>4125</a>
<a id='n4126' href='#n4126'>4126</a>
<a id='n4127' href='#n4127'>4127</a>
<a id='n4128' href='#n4128'>4128</a>
<a id='n4129' href='#n4129'>4129</a>
<a id='n4130' href='#n4130'>4130</a>
<a id='n4131' href='#n4131'>4131</a>
<a id='n4132' href='#n4132'>4132</a>
<a id='n4133' href='#n4133'>4133</a>
<a id='n4134' href='#n4134'>4134</a>
<a id='n4135' href='#n4135'>4135</a>
<a id='n4136' href='#n4136'>4136</a>
<a id='n4137' href='#n4137'>4137</a>
<a id='n4138' href='#n4138'>4138</a>
<a id='n4139' href='#n4139'>4139</a>
<a id='n4140' href='#n4140'>4140</a>
<a id='n4141' href='#n4141'>4141</a>
<a id='n4142' href='#n4142'>4142</a>
<a id='n4143' href='#n4143'>4143</a>
<a id='n4144' href='#n4144'>4144</a>
<a id='n4145' href='#n4145'>4145</a>
<a id='n4146' href='#n4146'>4146</a>
<a id='n4147' href='#n4147'>4147</a>
<a id='n4148' href='#n4148'>4148</a>
<a id='n4149' href='#n4149'>4149</a>
<a id='n4150' href='#n4150'>4150</a>
<a id='n4151' href='#n4151'>4151</a>
<a id='n4152' href='#n4152'>4152</a>
<a id='n4153' href='#n4153'>4153</a>
<a id='n4154' href='#n4154'>4154</a>
<a id='n4155' href='#n4155'>4155</a>
<a id='n4156' href='#n4156'>4156</a>
<a id='n4157' href='#n4157'>4157</a>
<a id='n4158' href='#n4158'>4158</a>
<a id='n4159' href='#n4159'>4159</a>
<a id='n4160' href='#n4160'>4160</a>
<a id='n4161' href='#n4161'>4161</a>
<a id='n4162' href='#n4162'>4162</a>
<a id='n4163' href='#n4163'>4163</a>
<a id='n4164' href='#n4164'>4164</a>
<a id='n4165' href='#n4165'>4165</a>
<a id='n4166' href='#n4166'>4166</a>
<a id='n4167' href='#n4167'>4167</a>
<a id='n4168' href='#n4168'>4168</a>
<a id='n4169' href='#n4169'>4169</a>
<a id='n4170' href='#n4170'>4170</a>
<a id='n4171' href='#n4171'>4171</a>
<a id='n4172' href='#n4172'>4172</a>
<a id='n4173' href='#n4173'>4173</a>
<a id='n4174' href='#n4174'>4174</a>
<a id='n4175' href='#n4175'>4175</a>
<a id='n4176' href='#n4176'>4176</a>
<a id='n4177' href='#n4177'>4177</a>
<a id='n4178' href='#n4178'>4178</a>
<a id='n4179' href='#n4179'>4179</a>
<a id='n4180' href='#n4180'>4180</a>
<a id='n4181' href='#n4181'>4181</a>
<a id='n4182' href='#n4182'>4182</a>
<a id='n4183' href='#n4183'>4183</a>
<a id='n4184' href='#n4184'>4184</a>
<a id='n4185' href='#n4185'>4185</a>
<a id='n4186' href='#n4186'>4186</a>
<a id='n4187' href='#n4187'>4187</a>
<a id='n4188' href='#n4188'>4188</a>
<a id='n4189' href='#n4189'>4189</a>
<a id='n4190' href='#n4190'>4190</a>
<a id='n4191' href='#n4191'>4191</a>
<a id='n4192' href='#n4192'>4192</a>
<a id='n4193' href='#n4193'>4193</a>
<a id='n4194' href='#n4194'>4194</a>
<a id='n4195' href='#n4195'>4195</a>
<a id='n4196' href='#n4196'>4196</a>
<a id='n4197' href='#n4197'>4197</a>
<a id='n4198' href='#n4198'>4198</a>
<a id='n4199' href='#n4199'>4199</a>
<a id='n4200' href='#n4200'>4200</a>
<a id='n4201' href='#n4201'>4201</a>
<a id='n4202' href='#n4202'>4202</a>
<a id='n4203' href='#n4203'>4203</a>
<a id='n4204' href='#n4204'>4204</a>
<a id='n4205' href='#n4205'>4205</a>
<a id='n4206' href='#n4206'>4206</a>
<a id='n4207' href='#n4207'>4207</a>
<a id='n4208' href='#n4208'>4208</a>
<a id='n4209' href='#n4209'>4209</a>
<a id='n4210' href='#n4210'>4210</a>
<a id='n4211' href='#n4211'>4211</a>
<a id='n4212' href='#n4212'>4212</a>
<a id='n4213' href='#n4213'>4213</a>
<a id='n4214' href='#n4214'>4214</a>
<a id='n4215' href='#n4215'>4215</a>
<a id='n4216' href='#n4216'>4216</a>
<a id='n4217' href='#n4217'>4217</a>
<a id='n4218' href='#n4218'>4218</a>
<a id='n4219' href='#n4219'>4219</a>
<a id='n4220' href='#n4220'>4220</a>
<a id='n4221' href='#n4221'>4221</a>
<a id='n4222' href='#n4222'>4222</a>
<a id='n4223' href='#n4223'>4223</a>
<a id='n4224' href='#n4224'>4224</a>
<a id='n4225' href='#n4225'>4225</a>
<a id='n4226' href='#n4226'>4226</a>
<a id='n4227' href='#n4227'>4227</a>
<a id='n4228' href='#n4228'>4228</a>
<a id='n4229' href='#n4229'>4229</a>
<a id='n4230' href='#n4230'>4230</a>
<a id='n4231' href='#n4231'>4231</a>
<a id='n4232' href='#n4232'>4232</a>
<a id='n4233' href='#n4233'>4233</a>
<a id='n4234' href='#n4234'>4234</a>
<a id='n4235' href='#n4235'>4235</a>
<a id='n4236' href='#n4236'>4236</a>
<a id='n4237' href='#n4237'>4237</a>
<a id='n4238' href='#n4238'>4238</a>
<a id='n4239' href='#n4239'>4239</a>
<a id='n4240' href='#n4240'>4240</a>
<a id='n4241' href='#n4241'>4241</a>
<a id='n4242' href='#n4242'>4242</a>
<a id='n4243' href='#n4243'>4243</a>
<a id='n4244' href='#n4244'>4244</a>
<a id='n4245' href='#n4245'>4245</a>
<a id='n4246' href='#n4246'>4246</a>
<a id='n4247' href='#n4247'>4247</a>
<a id='n4248' href='#n4248'>4248</a>
<a id='n4249' href='#n4249'>4249</a>
<a id='n4250' href='#n4250'>4250</a>
<a id='n4251' href='#n4251'>4251</a>
<a id='n4252' href='#n4252'>4252</a>
<a id='n4253' href='#n4253'>4253</a>
<a id='n4254' href='#n4254'>4254</a>
<a id='n4255' href='#n4255'>4255</a>
<a id='n4256' href='#n4256'>4256</a>
<a id='n4257' href='#n4257'>4257</a>
<a id='n4258' href='#n4258'>4258</a>
<a id='n4259' href='#n4259'>4259</a>
<a id='n4260' href='#n4260'>4260</a>
<a id='n4261' href='#n4261'>4261</a>
<a id='n4262' href='#n4262'>4262</a>
<a id='n4263' href='#n4263'>4263</a>
<a id='n4264' href='#n4264'>4264</a>
<a id='n4265' href='#n4265'>4265</a>
<a id='n4266' href='#n4266'>4266</a>
<a id='n4267' href='#n4267'>4267</a>
<a id='n4268' href='#n4268'>4268</a>
<a id='n4269' href='#n4269'>4269</a>
<a id='n4270' href='#n4270'>4270</a>
<a id='n4271' href='#n4271'>4271</a>
<a id='n4272' href='#n4272'>4272</a>
<a id='n4273' href='#n4273'>4273</a>
<a id='n4274' href='#n4274'>4274</a>
<a id='n4275' href='#n4275'>4275</a>
<a id='n4276' href='#n4276'>4276</a>
<a id='n4277' href='#n4277'>4277</a>
<a id='n4278' href='#n4278'>4278</a>
<a id='n4279' href='#n4279'>4279</a>
<a id='n4280' href='#n4280'>4280</a>
<a id='n4281' href='#n4281'>4281</a>
<a id='n4282' href='#n4282'>4282</a>
<a id='n4283' href='#n4283'>4283</a>
<a id='n4284' href='#n4284'>4284</a>
<a id='n4285' href='#n4285'>4285</a>
<a id='n4286' href='#n4286'>4286</a>
<a id='n4287' href='#n4287'>4287</a>
<a id='n4288' href='#n4288'>4288</a>
<a id='n4289' href='#n4289'>4289</a>
<a id='n4290' href='#n4290'>4290</a>
<a id='n4291' href='#n4291'>4291</a>
<a id='n4292' href='#n4292'>4292</a>
<a id='n4293' href='#n4293'>4293</a>
<a id='n4294' href='#n4294'>4294</a>
<a id='n4295' href='#n4295'>4295</a>
<a id='n4296' href='#n4296'>4296</a>
<a id='n4297' href='#n4297'>4297</a>
<a id='n4298' href='#n4298'>4298</a>
<a id='n4299' href='#n4299'>4299</a>
<a id='n4300' href='#n4300'>4300</a>
<a id='n4301' href='#n4301'>4301</a>
<a id='n4302' href='#n4302'>4302</a>
<a id='n4303' href='#n4303'>4303</a>
<a id='n4304' href='#n4304'>4304</a>
<a id='n4305' href='#n4305'>4305</a>
<a id='n4306' href='#n4306'>4306</a>
<a id='n4307' href='#n4307'>4307</a>
<a id='n4308' href='#n4308'>4308</a>
<a id='n4309' href='#n4309'>4309</a>
<a id='n4310' href='#n4310'>4310</a>
<a id='n4311' href='#n4311'>4311</a>
<a id='n4312' href='#n4312'>4312</a>
<a id='n4313' href='#n4313'>4313</a>
<a id='n4314' href='#n4314'>4314</a>
<a id='n4315' href='#n4315'>4315</a>
<a id='n4316' href='#n4316'>4316</a>
<a id='n4317' href='#n4317'>4317</a>
<a id='n4318' href='#n4318'>4318</a>
<a id='n4319' href='#n4319'>4319</a>
<a id='n4320' href='#n4320'>4320</a>
<a id='n4321' href='#n4321'>4321</a>
<a id='n4322' href='#n4322'>4322</a>
<a id='n4323' href='#n4323'>4323</a>
<a id='n4324' href='#n4324'>4324</a>
<a id='n4325' href='#n4325'>4325</a>
<a id='n4326' href='#n4326'>4326</a>
<a id='n4327' href='#n4327'>4327</a>
<a id='n4328' href='#n4328'>4328</a>
<a id='n4329' href='#n4329'>4329</a>
<a id='n4330' href='#n4330'>4330</a>
<a id='n4331' href='#n4331'>4331</a>
<a id='n4332' href='#n4332'>4332</a>
<a id='n4333' href='#n4333'>4333</a>
<a id='n4334' href='#n4334'>4334</a>
<a id='n4335' href='#n4335'>4335</a>
<a id='n4336' href='#n4336'>4336</a>
<a id='n4337' href='#n4337'>4337</a>
<a id='n4338' href='#n4338'>4338</a>
<a id='n4339' href='#n4339'>4339</a>
<a id='n4340' href='#n4340'>4340</a>
<a id='n4341' href='#n4341'>4341</a>
<a id='n4342' href='#n4342'>4342</a>
<a id='n4343' href='#n4343'>4343</a>
<a id='n4344' href='#n4344'>4344</a>
<a id='n4345' href='#n4345'>4345</a>
<a id='n4346' href='#n4346'>4346</a>
<a id='n4347' href='#n4347'>4347</a>
<a id='n4348' href='#n4348'>4348</a>
<a id='n4349' href='#n4349'>4349</a>
<a id='n4350' href='#n4350'>4350</a>
<a id='n4351' href='#n4351'>4351</a>
<a id='n4352' href='#n4352'>4352</a>
<a id='n4353' href='#n4353'>4353</a>
<a id='n4354' href='#n4354'>4354</a>
<a id='n4355' href='#n4355'>4355</a>
<a id='n4356' href='#n4356'>4356</a>
<a id='n4357' href='#n4357'>4357</a>
<a id='n4358' href='#n4358'>4358</a>
<a id='n4359' href='#n4359'>4359</a>
<a id='n4360' href='#n4360'>4360</a>
<a id='n4361' href='#n4361'>4361</a>
<a id='n4362' href='#n4362'>4362</a>
<a id='n4363' href='#n4363'>4363</a>
<a id='n4364' href='#n4364'>4364</a>
<a id='n4365' href='#n4365'>4365</a>
<a id='n4366' href='#n4366'>4366</a>
<a id='n4367' href='#n4367'>4367</a>
<a id='n4368' href='#n4368'>4368</a>
<a id='n4369' href='#n4369'>4369</a>
<a id='n4370' href='#n4370'>4370</a>
<a id='n4371' href='#n4371'>4371</a>
<a id='n4372' href='#n4372'>4372</a>
<a id='n4373' href='#n4373'>4373</a>
<a id='n4374' href='#n4374'>4374</a>
<a id='n4375' href='#n4375'>4375</a>
<a id='n4376' href='#n4376'>4376</a>
<a id='n4377' href='#n4377'>4377</a>
<a id='n4378' href='#n4378'>4378</a>
<a id='n4379' href='#n4379'>4379</a>
<a id='n4380' href='#n4380'>4380</a>
<a id='n4381' href='#n4381'>4381</a>
<a id='n4382' href='#n4382'>4382</a>
<a id='n4383' href='#n4383'>4383</a>
<a id='n4384' href='#n4384'>4384</a>
<a id='n4385' href='#n4385'>4385</a>
<a id='n4386' href='#n4386'>4386</a>
<a id='n4387' href='#n4387'>4387</a>
<a id='n4388' href='#n4388'>4388</a>
<a id='n4389' href='#n4389'>4389</a>
<a id='n4390' href='#n4390'>4390</a>
<a id='n4391' href='#n4391'>4391</a>
<a id='n4392' href='#n4392'>4392</a>
<a id='n4393' href='#n4393'>4393</a>
<a id='n4394' href='#n4394'>4394</a>
<a id='n4395' href='#n4395'>4395</a>
<a id='n4396' href='#n4396'>4396</a>
<a id='n4397' href='#n4397'>4397</a>
<a id='n4398' href='#n4398'>4398</a>
<a id='n4399' href='#n4399'>4399</a>
<a id='n4400' href='#n4400'>4400</a>
<a id='n4401' href='#n4401'>4401</a>
<a id='n4402' href='#n4402'>4402</a>
<a id='n4403' href='#n4403'>4403</a>
<a id='n4404' href='#n4404'>4404</a>
<a id='n4405' href='#n4405'>4405</a>
<a id='n4406' href='#n4406'>4406</a>
<a id='n4407' href='#n4407'>4407</a>
<a id='n4408' href='#n4408'>4408</a>
<a id='n4409' href='#n4409'>4409</a>
<a id='n4410' href='#n4410'>4410</a>
<a id='n4411' href='#n4411'>4411</a>
<a id='n4412' href='#n4412'>4412</a>
<a id='n4413' href='#n4413'>4413</a>
<a id='n4414' href='#n4414'>4414</a>
<a id='n4415' href='#n4415'>4415</a>
<a id='n4416' href='#n4416'>4416</a>
<a id='n4417' href='#n4417'>4417</a>
<a id='n4418' href='#n4418'>4418</a>
<a id='n4419' href='#n4419'>4419</a>
<a id='n4420' href='#n4420'>4420</a>
<a id='n4421' href='#n4421'>4421</a>
<a id='n4422' href='#n4422'>4422</a>
<a id='n4423' href='#n4423'>4423</a>
<a id='n4424' href='#n4424'>4424</a>
<a id='n4425' href='#n4425'>4425</a>
<a id='n4426' href='#n4426'>4426</a>
<a id='n4427' href='#n4427'>4427</a>
<a id='n4428' href='#n4428'>4428</a>
<a id='n4429' href='#n4429'>4429</a>
<a id='n4430' href='#n4430'>4430</a>
<a id='n4431' href='#n4431'>4431</a>
<a id='n4432' href='#n4432'>4432</a>
<a id='n4433' href='#n4433'>4433</a>
<a id='n4434' href='#n4434'>4434</a>
<a id='n4435' href='#n4435'>4435</a>
<a id='n4436' href='#n4436'>4436</a>
<a id='n4437' href='#n4437'>4437</a>
<a id='n4438' href='#n4438'>4438</a>
<a id='n4439' href='#n4439'>4439</a>
<a id='n4440' href='#n4440'>4440</a>
<a id='n4441' href='#n4441'>4441</a>
<a id='n4442' href='#n4442'>4442</a>
<a id='n4443' href='#n4443'>4443</a>
<a id='n4444' href='#n4444'>4444</a>
<a id='n4445' href='#n4445'>4445</a>
<a id='n4446' href='#n4446'>4446</a>
<a id='n4447' href='#n4447'>4447</a>
<a id='n4448' href='#n4448'>4448</a>
<a id='n4449' href='#n4449'>4449</a>
<a id='n4450' href='#n4450'>4450</a>
<a id='n4451' href='#n4451'>4451</a>
<a id='n4452' href='#n4452'>4452</a>
<a id='n4453' href='#n4453'>4453</a>
<a id='n4454' href='#n4454'>4454</a>
<a id='n4455' href='#n4455'>4455</a>
<a id='n4456' href='#n4456'>4456</a>
<a id='n4457' href='#n4457'>4457</a>
<a id='n4458' href='#n4458'>4458</a>
<a id='n4459' href='#n4459'>4459</a>
<a id='n4460' href='#n4460'>4460</a>
<a id='n4461' href='#n4461'>4461</a>
<a id='n4462' href='#n4462'>4462</a>
<a id='n4463' href='#n4463'>4463</a>
<a id='n4464' href='#n4464'>4464</a>
<a id='n4465' href='#n4465'>4465</a>
<a id='n4466' href='#n4466'>4466</a>
<a id='n4467' href='#n4467'>4467</a>
<a id='n4468' href='#n4468'>4468</a>
<a id='n4469' href='#n4469'>4469</a>
<a id='n4470' href='#n4470'>4470</a>
<a id='n4471' href='#n4471'>4471</a>
<a id='n4472' href='#n4472'>4472</a>
<a id='n4473' href='#n4473'>4473</a>
<a id='n4474' href='#n4474'>4474</a>
<a id='n4475' href='#n4475'>4475</a>
<a id='n4476' href='#n4476'>4476</a>
<a id='n4477' href='#n4477'>4477</a>
<a id='n4478' href='#n4478'>4478</a>
<a id='n4479' href='#n4479'>4479</a>
<a id='n4480' href='#n4480'>4480</a>
<a id='n4481' href='#n4481'>4481</a>
<a id='n4482' href='#n4482'>4482</a>
<a id='n4483' href='#n4483'>4483</a>
<a id='n4484' href='#n4484'>4484</a>
<a id='n4485' href='#n4485'>4485</a>
<a id='n4486' href='#n4486'>4486</a>
<a id='n4487' href='#n4487'>4487</a>
<a id='n4488' href='#n4488'>4488</a>
<a id='n4489' href='#n4489'>4489</a>
<a id='n4490' href='#n4490'>4490</a>
<a id='n4491' href='#n4491'>4491</a>
<a id='n4492' href='#n4492'>4492</a>
<a id='n4493' href='#n4493'>4493</a>
<a id='n4494' href='#n4494'>4494</a>
<a id='n4495' href='#n4495'>4495</a>
<a id='n4496' href='#n4496'>4496</a>
<a id='n4497' href='#n4497'>4497</a>
<a id='n4498' href='#n4498'>4498</a>
<a id='n4499' href='#n4499'>4499</a>
<a id='n4500' href='#n4500'>4500</a>
<a id='n4501' href='#n4501'>4501</a>
<a id='n4502' href='#n4502'>4502</a>
<a id='n4503' href='#n4503'>4503</a>
<a id='n4504' href='#n4504'>4504</a>
<a id='n4505' href='#n4505'>4505</a>
<a id='n4506' href='#n4506'>4506</a>
<a id='n4507' href='#n4507'>4507</a>
<a id='n4508' href='#n4508'>4508</a>
<a id='n4509' href='#n4509'>4509</a>
<a id='n4510' href='#n4510'>4510</a>
<a id='n4511' href='#n4511'>4511</a>
<a id='n4512' href='#n4512'>4512</a>
<a id='n4513' href='#n4513'>4513</a>
<a id='n4514' href='#n4514'>4514</a>
<a id='n4515' href='#n4515'>4515</a>
<a id='n4516' href='#n4516'>4516</a>
<a id='n4517' href='#n4517'>4517</a>
<a id='n4518' href='#n4518'>4518</a>
<a id='n4519' href='#n4519'>4519</a>
<a id='n4520' href='#n4520'>4520</a>
<a id='n4521' href='#n4521'>4521</a>
<a id='n4522' href='#n4522'>4522</a>
<a id='n4523' href='#n4523'>4523</a>
<a id='n4524' href='#n4524'>4524</a>
<a id='n4525' href='#n4525'>4525</a>
<a id='n4526' href='#n4526'>4526</a>
<a id='n4527' href='#n4527'>4527</a>
<a id='n4528' href='#n4528'>4528</a>
<a id='n4529' href='#n4529'>4529</a>
<a id='n4530' href='#n4530'>4530</a>
<a id='n4531' href='#n4531'>4531</a>
<a id='n4532' href='#n4532'>4532</a>
<a id='n4533' href='#n4533'>4533</a>
<a id='n4534' href='#n4534'>4534</a>
<a id='n4535' href='#n4535'>4535</a>
<a id='n4536' href='#n4536'>4536</a>
<a id='n4537' href='#n4537'>4537</a>
<a id='n4538' href='#n4538'>4538</a>
<a id='n4539' href='#n4539'>4539</a>
<a id='n4540' href='#n4540'>4540</a>
<a id='n4541' href='#n4541'>4541</a>
<a id='n4542' href='#n4542'>4542</a>
<a id='n4543' href='#n4543'>4543</a>
<a id='n4544' href='#n4544'>4544</a>
<a id='n4545' href='#n4545'>4545</a>
<a id='n4546' href='#n4546'>4546</a>
<a id='n4547' href='#n4547'>4547</a>
<a id='n4548' href='#n4548'>4548</a>
<a id='n4549' href='#n4549'>4549</a>
<a id='n4550' href='#n4550'>4550</a>
<a id='n4551' href='#n4551'>4551</a>
<a id='n4552' href='#n4552'>4552</a>
<a id='n4553' href='#n4553'>4553</a>
<a id='n4554' href='#n4554'>4554</a>
<a id='n4555' href='#n4555'>4555</a>
<a id='n4556' href='#n4556'>4556</a>
<a id='n4557' href='#n4557'>4557</a>
<a id='n4558' href='#n4558'>4558</a>
<a id='n4559' href='#n4559'>4559</a>
<a id='n4560' href='#n4560'>4560</a>
<a id='n4561' href='#n4561'>4561</a>
<a id='n4562' href='#n4562'>4562</a>
<a id='n4563' href='#n4563'>4563</a>
<a id='n4564' href='#n4564'>4564</a>
<a id='n4565' href='#n4565'>4565</a>
<a id='n4566' href='#n4566'>4566</a>
<a id='n4567' href='#n4567'>4567</a>
<a id='n4568' href='#n4568'>4568</a>
<a id='n4569' href='#n4569'>4569</a>
<a id='n4570' href='#n4570'>4570</a>
<a id='n4571' href='#n4571'>4571</a>
<a id='n4572' href='#n4572'>4572</a>
<a id='n4573' href='#n4573'>4573</a>
<a id='n4574' href='#n4574'>4574</a>
<a id='n4575' href='#n4575'>4575</a>
<a id='n4576' href='#n4576'>4576</a>
<a id='n4577' href='#n4577'>4577</a>
<a id='n4578' href='#n4578'>4578</a>
<a id='n4579' href='#n4579'>4579</a>
<a id='n4580' href='#n4580'>4580</a>
<a id='n4581' href='#n4581'>4581</a>
<a id='n4582' href='#n4582'>4582</a>
<a id='n4583' href='#n4583'>4583</a>
<a id='n4584' href='#n4584'>4584</a>
<a id='n4585' href='#n4585'>4585</a>
<a id='n4586' href='#n4586'>4586</a>
<a id='n4587' href='#n4587'>4587</a>
<a id='n4588' href='#n4588'>4588</a>
<a id='n4589' href='#n4589'>4589</a>
<a id='n4590' href='#n4590'>4590</a>
<a id='n4591' href='#n4591'>4591</a>
<a id='n4592' href='#n4592'>4592</a>
<a id='n4593' href='#n4593'>4593</a>
<a id='n4594' href='#n4594'>4594</a>
<a id='n4595' href='#n4595'>4595</a>
<a id='n4596' href='#n4596'>4596</a>
<a id='n4597' href='#n4597'>4597</a>
<a id='n4598' href='#n4598'>4598</a>
<a id='n4599' href='#n4599'>4599</a>
<a id='n4600' href='#n4600'>4600</a>
<a id='n4601' href='#n4601'>4601</a>
<a id='n4602' href='#n4602'>4602</a>
<a id='n4603' href='#n4603'>4603</a>
<a id='n4604' href='#n4604'>4604</a>
<a id='n4605' href='#n4605'>4605</a>
<a id='n4606' href='#n4606'>4606</a>
<a id='n4607' href='#n4607'>4607</a>
<a id='n4608' href='#n4608'>4608</a>
<a id='n4609' href='#n4609'>4609</a>
<a id='n4610' href='#n4610'>4610</a>
<a id='n4611' href='#n4611'>4611</a>
<a id='n4612' href='#n4612'>4612</a>
<a id='n4613' href='#n4613'>4613</a>
<a id='n4614' href='#n4614'>4614</a>
<a id='n4615' href='#n4615'>4615</a>
<a id='n4616' href='#n4616'>4616</a>
<a id='n4617' href='#n4617'>4617</a>
<a id='n4618' href='#n4618'>4618</a>
<a id='n4619' href='#n4619'>4619</a>
<a id='n4620' href='#n4620'>4620</a>
<a id='n4621' href='#n4621'>4621</a>
<a id='n4622' href='#n4622'>4622</a>
<a id='n4623' href='#n4623'>4623</a>
<a id='n4624' href='#n4624'>4624</a>
<a id='n4625' href='#n4625'>4625</a>
<a id='n4626' href='#n4626'>4626</a>
<a id='n4627' href='#n4627'>4627</a>
<a id='n4628' href='#n4628'>4628</a>
<a id='n4629' href='#n4629'>4629</a>
<a id='n4630' href='#n4630'>4630</a>
<a id='n4631' href='#n4631'>4631</a>
<a id='n4632' href='#n4632'>4632</a>
<a id='n4633' href='#n4633'>4633</a>
<a id='n4634' href='#n4634'>4634</a>
<a id='n4635' href='#n4635'>4635</a>
<a id='n4636' href='#n4636'>4636</a>
<a id='n4637' href='#n4637'>4637</a>
<a id='n4638' href='#n4638'>4638</a>
<a id='n4639' href='#n4639'>4639</a>
<a id='n4640' href='#n4640'>4640</a>
<a id='n4641' href='#n4641'>4641</a>
<a id='n4642' href='#n4642'>4642</a>
<a id='n4643' href='#n4643'>4643</a>
<a id='n4644' href='#n4644'>4644</a>
<a id='n4645' href='#n4645'>4645</a>
<a id='n4646' href='#n4646'>4646</a>
<a id='n4647' href='#n4647'>4647</a>
<a id='n4648' href='#n4648'>4648</a>
<a id='n4649' href='#n4649'>4649</a>
<a id='n4650' href='#n4650'>4650</a>
<a id='n4651' href='#n4651'>4651</a>
<a id='n4652' href='#n4652'>4652</a>
<a id='n4653' href='#n4653'>4653</a>
<a id='n4654' href='#n4654'>4654</a>
<a id='n4655' href='#n4655'>4655</a>
<a id='n4656' href='#n4656'>4656</a>
<a id='n4657' href='#n4657'>4657</a>
<a id='n4658' href='#n4658'>4658</a>
<a id='n4659' href='#n4659'>4659</a>
<a id='n4660' href='#n4660'>4660</a>
<a id='n4661' href='#n4661'>4661</a>
<a id='n4662' href='#n4662'>4662</a>
<a id='n4663' href='#n4663'>4663</a>
<a id='n4664' href='#n4664'>4664</a>
<a id='n4665' href='#n4665'>4665</a>
<a id='n4666' href='#n4666'>4666</a>
<a id='n4667' href='#n4667'>4667</a>
<a id='n4668' href='#n4668'>4668</a>
<a id='n4669' href='#n4669'>4669</a>
<a id='n4670' href='#n4670'>4670</a>
<a id='n4671' href='#n4671'>4671</a>
<a id='n4672' href='#n4672'>4672</a>
<a id='n4673' href='#n4673'>4673</a>
<a id='n4674' href='#n4674'>4674</a>
<a id='n4675' href='#n4675'>4675</a>
<a id='n4676' href='#n4676'>4676</a>
<a id='n4677' href='#n4677'>4677</a>
<a id='n4678' href='#n4678'>4678</a>
<a id='n4679' href='#n4679'>4679</a>
<a id='n4680' href='#n4680'>4680</a>
<a id='n4681' href='#n4681'>4681</a>
<a id='n4682' href='#n4682'>4682</a>
<a id='n4683' href='#n4683'>4683</a>
<a id='n4684' href='#n4684'>4684</a>
<a id='n4685' href='#n4685'>4685</a>
<a id='n4686' href='#n4686'>4686</a>
<a id='n4687' href='#n4687'>4687</a>
<a id='n4688' href='#n4688'>4688</a>
<a id='n4689' href='#n4689'>4689</a>
<a id='n4690' href='#n4690'>4690</a>
<a id='n4691' href='#n4691'>4691</a>
<a id='n4692' href='#n4692'>4692</a>
<a id='n4693' href='#n4693'>4693</a>
<a id='n4694' href='#n4694'>4694</a>
<a id='n4695' href='#n4695'>4695</a>
<a id='n4696' href='#n4696'>4696</a>
<a id='n4697' href='#n4697'>4697</a>
<a id='n4698' href='#n4698'>4698</a>
<a id='n4699' href='#n4699'>4699</a>
<a id='n4700' href='#n4700'>4700</a>
<a id='n4701' href='#n4701'>4701</a>
<a id='n4702' href='#n4702'>4702</a>
<a id='n4703' href='#n4703'>4703</a>
<a id='n4704' href='#n4704'>4704</a>
<a id='n4705' href='#n4705'>4705</a>
<a id='n4706' href='#n4706'>4706</a>
<a id='n4707' href='#n4707'>4707</a>
<a id='n4708' href='#n4708'>4708</a>
<a id='n4709' href='#n4709'>4709</a>
<a id='n4710' href='#n4710'>4710</a>
<a id='n4711' href='#n4711'>4711</a>
<a id='n4712' href='#n4712'>4712</a>
<a id='n4713' href='#n4713'>4713</a>
<a id='n4714' href='#n4714'>4714</a>
<a id='n4715' href='#n4715'>4715</a>
<a id='n4716' href='#n4716'>4716</a>
<a id='n4717' href='#n4717'>4717</a>
<a id='n4718' href='#n4718'>4718</a>
<a id='n4719' href='#n4719'>4719</a>
<a id='n4720' href='#n4720'>4720</a>
<a id='n4721' href='#n4721'>4721</a>
<a id='n4722' href='#n4722'>4722</a>
<a id='n4723' href='#n4723'>4723</a>
<a id='n4724' href='#n4724'>4724</a>
<a id='n4725' href='#n4725'>4725</a>
<a id='n4726' href='#n4726'>4726</a>
<a id='n4727' href='#n4727'>4727</a>
<a id='n4728' href='#n4728'>4728</a>
<a id='n4729' href='#n4729'>4729</a>
<a id='n4730' href='#n4730'>4730</a>
<a id='n4731' href='#n4731'>4731</a>
<a id='n4732' href='#n4732'>4732</a>
<a id='n4733' href='#n4733'>4733</a>
<a id='n4734' href='#n4734'>4734</a>
<a id='n4735' href='#n4735'>4735</a>
<a id='n4736' href='#n4736'>4736</a>
<a id='n4737' href='#n4737'>4737</a>
<a id='n4738' href='#n4738'>4738</a>
<a id='n4739' href='#n4739'>4739</a>
<a id='n4740' href='#n4740'>4740</a>
<a id='n4741' href='#n4741'>4741</a>
<a id='n4742' href='#n4742'>4742</a>
<a id='n4743' href='#n4743'>4743</a>
<a id='n4744' href='#n4744'>4744</a>
<a id='n4745' href='#n4745'>4745</a>
<a id='n4746' href='#n4746'>4746</a>
<a id='n4747' href='#n4747'>4747</a>
<a id='n4748' href='#n4748'>4748</a>
<a id='n4749' href='#n4749'>4749</a>
<a id='n4750' href='#n4750'>4750</a>
<a id='n4751' href='#n4751'>4751</a>
<a id='n4752' href='#n4752'>4752</a>
<a id='n4753' href='#n4753'>4753</a>
<a id='n4754' href='#n4754'>4754</a>
<a id='n4755' href='#n4755'>4755</a>
<a id='n4756' href='#n4756'>4756</a>
<a id='n4757' href='#n4757'>4757</a>
<a id='n4758' href='#n4758'>4758</a>
<a id='n4759' href='#n4759'>4759</a>
<a id='n4760' href='#n4760'>4760</a>
<a id='n4761' href='#n4761'>4761</a>
<a id='n4762' href='#n4762'>4762</a>
<a id='n4763' href='#n4763'>4763</a>
<a id='n4764' href='#n4764'>4764</a>
<a id='n4765' href='#n4765'>4765</a>
<a id='n4766' href='#n4766'>4766</a>
<a id='n4767' href='#n4767'>4767</a>
<a id='n4768' href='#n4768'>4768</a>
<a id='n4769' href='#n4769'>4769</a>
<a id='n4770' href='#n4770'>4770</a>
<a id='n4771' href='#n4771'>4771</a>
<a id='n4772' href='#n4772'>4772</a>
<a id='n4773' href='#n4773'>4773</a>
<a id='n4774' href='#n4774'>4774</a>
<a id='n4775' href='#n4775'>4775</a>
<a id='n4776' href='#n4776'>4776</a>
<a id='n4777' href='#n4777'>4777</a>
<a id='n4778' href='#n4778'>4778</a>
<a id='n4779' href='#n4779'>4779</a>
<a id='n4780' href='#n4780'>4780</a>
<a id='n4781' href='#n4781'>4781</a>
<a id='n4782' href='#n4782'>4782</a>
<a id='n4783' href='#n4783'>4783</a>
<a id='n4784' href='#n4784'>4784</a>
<a id='n4785' href='#n4785'>4785</a>
<a id='n4786' href='#n4786'>4786</a>
<a id='n4787' href='#n4787'>4787</a>
<a id='n4788' href='#n4788'>4788</a>
<a id='n4789' href='#n4789'>4789</a>
<a id='n4790' href='#n4790'>4790</a>
<a id='n4791' href='#n4791'>4791</a>
<a id='n4792' href='#n4792'>4792</a>
<a id='n4793' href='#n4793'>4793</a>
<a id='n4794' href='#n4794'>4794</a>
<a id='n4795' href='#n4795'>4795</a>
<a id='n4796' href='#n4796'>4796</a>
<a id='n4797' href='#n4797'>4797</a>
<a id='n4798' href='#n4798'>4798</a>
<a id='n4799' href='#n4799'>4799</a>
<a id='n4800' href='#n4800'>4800</a>
<a id='n4801' href='#n4801'>4801</a>
<a id='n4802' href='#n4802'>4802</a>
<a id='n4803' href='#n4803'>4803</a>
<a id='n4804' href='#n4804'>4804</a>
<a id='n4805' href='#n4805'>4805</a>
<a id='n4806' href='#n4806'>4806</a>
<a id='n4807' href='#n4807'>4807</a>
<a id='n4808' href='#n4808'>4808</a>
<a id='n4809' href='#n4809'>4809</a>
<a id='n4810' href='#n4810'>4810</a>
<a id='n4811' href='#n4811'>4811</a>
<a id='n4812' href='#n4812'>4812</a>
<a id='n4813' href='#n4813'>4813</a>
<a id='n4814' href='#n4814'>4814</a>
<a id='n4815' href='#n4815'>4815</a>
<a id='n4816' href='#n4816'>4816</a>
<a id='n4817' href='#n4817'>4817</a>
<a id='n4818' href='#n4818'>4818</a>
<a id='n4819' href='#n4819'>4819</a>
<a id='n4820' href='#n4820'>4820</a>
<a id='n4821' href='#n4821'>4821</a>
<a id='n4822' href='#n4822'>4822</a>
<a id='n4823' href='#n4823'>4823</a>
<a id='n4824' href='#n4824'>4824</a>
<a id='n4825' href='#n4825'>4825</a>
<a id='n4826' href='#n4826'>4826</a>
<a id='n4827' href='#n4827'>4827</a>
<a id='n4828' href='#n4828'>4828</a>
<a id='n4829' href='#n4829'>4829</a>
<a id='n4830' href='#n4830'>4830</a>
<a id='n4831' href='#n4831'>4831</a>
<a id='n4832' href='#n4832'>4832</a>
<a id='n4833' href='#n4833'>4833</a>
<a id='n4834' href='#n4834'>4834</a>
<a id='n4835' href='#n4835'>4835</a>
<a id='n4836' href='#n4836'>4836</a>
<a id='n4837' href='#n4837'>4837</a>
<a id='n4838' href='#n4838'>4838</a>
<a id='n4839' href='#n4839'>4839</a>
<a id='n4840' href='#n4840'>4840</a>
<a id='n4841' href='#n4841'>4841</a>
<a id='n4842' href='#n4842'>4842</a>
<a id='n4843' href='#n4843'>4843</a>
<a id='n4844' href='#n4844'>4844</a>
<a id='n4845' href='#n4845'>4845</a>
<a id='n4846' href='#n4846'>4846</a>
<a id='n4847' href='#n4847'>4847</a>
<a id='n4848' href='#n4848'>4848</a>
<a id='n4849' href='#n4849'>4849</a>
<a id='n4850' href='#n4850'>4850</a>
<a id='n4851' href='#n4851'>4851</a>
<a id='n4852' href='#n4852'>4852</a>
<a id='n4853' href='#n4853'>4853</a>
<a id='n4854' href='#n4854'>4854</a>
<a id='n4855' href='#n4855'>4855</a>
<a id='n4856' href='#n4856'>4856</a>
<a id='n4857' href='#n4857'>4857</a>
<a id='n4858' href='#n4858'>4858</a>
<a id='n4859' href='#n4859'>4859</a>
<a id='n4860' href='#n4860'>4860</a>
<a id='n4861' href='#n4861'>4861</a>
<a id='n4862' href='#n4862'>4862</a>
<a id='n4863' href='#n4863'>4863</a>
<a id='n4864' href='#n4864'>4864</a>
<a id='n4865' href='#n4865'>4865</a>
<a id='n4866' href='#n4866'>4866</a>
<a id='n4867' href='#n4867'>4867</a>
<a id='n4868' href='#n4868'>4868</a>
<a id='n4869' href='#n4869'>4869</a>
<a id='n4870' href='#n4870'>4870</a>
<a id='n4871' href='#n4871'>4871</a>
<a id='n4872' href='#n4872'>4872</a>
<a id='n4873' href='#n4873'>4873</a>
<a id='n4874' href='#n4874'>4874</a>
<a id='n4875' href='#n4875'>4875</a>
<a id='n4876' href='#n4876'>4876</a>
<a id='n4877' href='#n4877'>4877</a>
<a id='n4878' href='#n4878'>4878</a>
<a id='n4879' href='#n4879'>4879</a>
<a id='n4880' href='#n4880'>4880</a>
<a id='n4881' href='#n4881'>4881</a>
<a id='n4882' href='#n4882'>4882</a>
<a id='n4883' href='#n4883'>4883</a>
<a id='n4884' href='#n4884'>4884</a>
<a id='n4885' href='#n4885'>4885</a>
<a id='n4886' href='#n4886'>4886</a>
<a id='n4887' href='#n4887'>4887</a>
<a id='n4888' href='#n4888'>4888</a>
<a id='n4889' href='#n4889'>4889</a>
<a id='n4890' href='#n4890'>4890</a>
<a id='n4891' href='#n4891'>4891</a>
<a id='n4892' href='#n4892'>4892</a>
<a id='n4893' href='#n4893'>4893</a>
<a id='n4894' href='#n4894'>4894</a>
<a id='n4895' href='#n4895'>4895</a>
<a id='n4896' href='#n4896'>4896</a>
<a id='n4897' href='#n4897'>4897</a>
<a id='n4898' href='#n4898'>4898</a>
<a id='n4899' href='#n4899'>4899</a>
<a id='n4900' href='#n4900'>4900</a>
<a id='n4901' href='#n4901'>4901</a>
<a id='n4902' href='#n4902'>4902</a>
<a id='n4903' href='#n4903'>4903</a>
<a id='n4904' href='#n4904'>4904</a>
<a id='n4905' href='#n4905'>4905</a>
<a id='n4906' href='#n4906'>4906</a>
<a id='n4907' href='#n4907'>4907</a>
<a id='n4908' href='#n4908'>4908</a>
<a id='n4909' href='#n4909'>4909</a>
<a id='n4910' href='#n4910'>4910</a>
<a id='n4911' href='#n4911'>4911</a>
<a id='n4912' href='#n4912'>4912</a>
<a id='n4913' href='#n4913'>4913</a>
<a id='n4914' href='#n4914'>4914</a>
<a id='n4915' href='#n4915'>4915</a>
<a id='n4916' href='#n4916'>4916</a>
<a id='n4917' href='#n4917'>4917</a>
<a id='n4918' href='#n4918'>4918</a>
<a id='n4919' href='#n4919'>4919</a>
<a id='n4920' href='#n4920'>4920</a>
<a id='n4921' href='#n4921'>4921</a>
<a id='n4922' href='#n4922'>4922</a>
<a id='n4923' href='#n4923'>4923</a>
<a id='n4924' href='#n4924'>4924</a>
<a id='n4925' href='#n4925'>4925</a>
<a id='n4926' href='#n4926'>4926</a>
<a id='n4927' href='#n4927'>4927</a>
<a id='n4928' href='#n4928'>4928</a>
<a id='n4929' href='#n4929'>4929</a>
<a id='n4930' href='#n4930'>4930</a>
<a id='n4931' href='#n4931'>4931</a>
<a id='n4932' href='#n4932'>4932</a>
<a id='n4933' href='#n4933'>4933</a>
<a id='n4934' href='#n4934'>4934</a>
<a id='n4935' href='#n4935'>4935</a>
<a id='n4936' href='#n4936'>4936</a>
<a id='n4937' href='#n4937'>4937</a>
<a id='n4938' href='#n4938'>4938</a>
<a id='n4939' href='#n4939'>4939</a>
<a id='n4940' href='#n4940'>4940</a>
<a id='n4941' href='#n4941'>4941</a>
<a id='n4942' href='#n4942'>4942</a>
<a id='n4943' href='#n4943'>4943</a>
<a id='n4944' href='#n4944'>4944</a>
<a id='n4945' href='#n4945'>4945</a>
<a id='n4946' href='#n4946'>4946</a>
<a id='n4947' href='#n4947'>4947</a>
<a id='n4948' href='#n4948'>4948</a>
<a id='n4949' href='#n4949'>4949</a>
<a id='n4950' href='#n4950'>4950</a>
<a id='n4951' href='#n4951'>4951</a>
<a id='n4952' href='#n4952'>4952</a>
<a id='n4953' href='#n4953'>4953</a>
<a id='n4954' href='#n4954'>4954</a>
<a id='n4955' href='#n4955'>4955</a>
<a id='n4956' href='#n4956'>4956</a>
<a id='n4957' href='#n4957'>4957</a>
<a id='n4958' href='#n4958'>4958</a>
<a id='n4959' href='#n4959'>4959</a>
<a id='n4960' href='#n4960'>4960</a>
<a id='n4961' href='#n4961'>4961</a>
<a id='n4962' href='#n4962'>4962</a>
<a id='n4963' href='#n4963'>4963</a>
<a id='n4964' href='#n4964'>4964</a>
<a id='n4965' href='#n4965'>4965</a>
<a id='n4966' href='#n4966'>4966</a>
<a id='n4967' href='#n4967'>4967</a>
<a id='n4968' href='#n4968'>4968</a>
<a id='n4969' href='#n4969'>4969</a>
<a id='n4970' href='#n4970'>4970</a>
<a id='n4971' href='#n4971'>4971</a>
<a id='n4972' href='#n4972'>4972</a>
<a id='n4973' href='#n4973'>4973</a>
<a id='n4974' href='#n4974'>4974</a>
<a id='n4975' href='#n4975'>4975</a>
<a id='n4976' href='#n4976'>4976</a>
<a id='n4977' href='#n4977'>4977</a>
<a id='n4978' href='#n4978'>4978</a>
<a id='n4979' href='#n4979'>4979</a>
<a id='n4980' href='#n4980'>4980</a>
<a id='n4981' href='#n4981'>4981</a>
<a id='n4982' href='#n4982'>4982</a>
<a id='n4983' href='#n4983'>4983</a>
<a id='n4984' href='#n4984'>4984</a>
<a id='n4985' href='#n4985'>4985</a>
<a id='n4986' href='#n4986'>4986</a>
<a id='n4987' href='#n4987'>4987</a>
<a id='n4988' href='#n4988'>4988</a>
<a id='n4989' href='#n4989'>4989</a>
<a id='n4990' href='#n4990'>4990</a>
<a id='n4991' href='#n4991'>4991</a>
<a id='n4992' href='#n4992'>4992</a>
<a id='n4993' href='#n4993'>4993</a>
<a id='n4994' href='#n4994'>4994</a>
<a id='n4995' href='#n4995'>4995</a>
<a id='n4996' href='#n4996'>4996</a>
<a id='n4997' href='#n4997'>4997</a>
<a id='n4998' href='#n4998'>4998</a>
<a id='n4999' href='#n4999'>4999</a>
<a id='n5000' href='#n5000'>5000</a>
<a id='n5001' href='#n5001'>5001</a>
<a id='n5002' href='#n5002'>5002</a>
<a id='n5003' href='#n5003'>5003</a>
<a id='n5004' href='#n5004'>5004</a>
<a id='n5005' href='#n5005'>5005</a>
<a id='n5006' href='#n5006'>5006</a>
<a id='n5007' href='#n5007'>5007</a>
<a id='n5008' href='#n5008'>5008</a>
<a id='n5009' href='#n5009'>5009</a>
<a id='n5010' href='#n5010'>5010</a>
<a id='n5011' href='#n5011'>5011</a>
<a id='n5012' href='#n5012'>5012</a>
<a id='n5013' href='#n5013'>5013</a>
<a id='n5014' href='#n5014'>5014</a>
<a id='n5015' href='#n5015'>5015</a>
<a id='n5016' href='#n5016'>5016</a>
<a id='n5017' href='#n5017'>5017</a>
<a id='n5018' href='#n5018'>5018</a>
<a id='n5019' href='#n5019'>5019</a>
<a id='n5020' href='#n5020'>5020</a>
<a id='n5021' href='#n5021'>5021</a>
<a id='n5022' href='#n5022'>5022</a>
<a id='n5023' href='#n5023'>5023</a>
<a id='n5024' href='#n5024'>5024</a>
<a id='n5025' href='#n5025'>5025</a>
<a id='n5026' href='#n5026'>5026</a>
<a id='n5027' href='#n5027'>5027</a>
<a id='n5028' href='#n5028'>5028</a>
<a id='n5029' href='#n5029'>5029</a>
<a id='n5030' href='#n5030'>5030</a>
<a id='n5031' href='#n5031'>5031</a>
<a id='n5032' href='#n5032'>5032</a>
<a id='n5033' href='#n5033'>5033</a>
<a id='n5034' href='#n5034'>5034</a>
<a id='n5035' href='#n5035'>5035</a>
<a id='n5036' href='#n5036'>5036</a>
<a id='n5037' href='#n5037'>5037</a>
<a id='n5038' href='#n5038'>5038</a>
<a id='n5039' href='#n5039'>5039</a>
<a id='n5040' href='#n5040'>5040</a>
<a id='n5041' href='#n5041'>5041</a>
<a id='n5042' href='#n5042'>5042</a>
<a id='n5043' href='#n5043'>5043</a>
<a id='n5044' href='#n5044'>5044</a>
<a id='n5045' href='#n5045'>5045</a>
<a id='n5046' href='#n5046'>5046</a>
<a id='n5047' href='#n5047'>5047</a>
<a id='n5048' href='#n5048'>5048</a>
<a id='n5049' href='#n5049'>5049</a>
<a id='n5050' href='#n5050'>5050</a>
<a id='n5051' href='#n5051'>5051</a>
<a id='n5052' href='#n5052'>5052</a>
<a id='n5053' href='#n5053'>5053</a>
<a id='n5054' href='#n5054'>5054</a>
<a id='n5055' href='#n5055'>5055</a>
<a id='n5056' href='#n5056'>5056</a>
<a id='n5057' href='#n5057'>5057</a>
<a id='n5058' href='#n5058'>5058</a>
<a id='n5059' href='#n5059'>5059</a>
<a id='n5060' href='#n5060'>5060</a>
<a id='n5061' href='#n5061'>5061</a>
<a id='n5062' href='#n5062'>5062</a>
<a id='n5063' href='#n5063'>5063</a>
<a id='n5064' href='#n5064'>5064</a>
<a id='n5065' href='#n5065'>5065</a>
<a id='n5066' href='#n5066'>5066</a>
<a id='n5067' href='#n5067'>5067</a>
<a id='n5068' href='#n5068'>5068</a>
<a id='n5069' href='#n5069'>5069</a>
<a id='n5070' href='#n5070'>5070</a>
<a id='n5071' href='#n5071'>5071</a>
<a id='n5072' href='#n5072'>5072</a>
<a id='n5073' href='#n5073'>5073</a>
<a id='n5074' href='#n5074'>5074</a>
<a id='n5075' href='#n5075'>5075</a>
<a id='n5076' href='#n5076'>5076</a>
<a id='n5077' href='#n5077'>5077</a>
<a id='n5078' href='#n5078'>5078</a>
<a id='n5079' href='#n5079'>5079</a>
<a id='n5080' href='#n5080'>5080</a>
<a id='n5081' href='#n5081'>5081</a>
<a id='n5082' href='#n5082'>5082</a>
<a id='n5083' href='#n5083'>5083</a>
<a id='n5084' href='#n5084'>5084</a>
<a id='n5085' href='#n5085'>5085</a>
<a id='n5086' href='#n5086'>5086</a>
<a id='n5087' href='#n5087'>5087</a>
<a id='n5088' href='#n5088'>5088</a>
<a id='n5089' href='#n5089'>5089</a>
<a id='n5090' href='#n5090'>5090</a>
<a id='n5091' href='#n5091'>5091</a>
<a id='n5092' href='#n5092'>5092</a>
<a id='n5093' href='#n5093'>5093</a>
<a id='n5094' href='#n5094'>5094</a>
<a id='n5095' href='#n5095'>5095</a>
<a id='n5096' href='#n5096'>5096</a>
<a id='n5097' href='#n5097'>5097</a>
<a id='n5098' href='#n5098'>5098</a>
<a id='n5099' href='#n5099'>5099</a>
<a id='n5100' href='#n5100'>5100</a>
<a id='n5101' href='#n5101'>5101</a>
<a id='n5102' href='#n5102'>5102</a>
<a id='n5103' href='#n5103'>5103</a>
<a id='n5104' href='#n5104'>5104</a>
<a id='n5105' href='#n5105'>5105</a>
<a id='n5106' href='#n5106'>5106</a>
<a id='n5107' href='#n5107'>5107</a>
<a id='n5108' href='#n5108'>5108</a>
<a id='n5109' href='#n5109'>5109</a>
<a id='n5110' href='#n5110'>5110</a>
<a id='n5111' href='#n5111'>5111</a>
<a id='n5112' href='#n5112'>5112</a>
<a id='n5113' href='#n5113'>5113</a>
<a id='n5114' href='#n5114'>5114</a>
<a id='n5115' href='#n5115'>5115</a>
<a id='n5116' href='#n5116'>5116</a>
<a id='n5117' href='#n5117'>5117</a>
<a id='n5118' href='#n5118'>5118</a>
<a id='n5119' href='#n5119'>5119</a>
<a id='n5120' href='#n5120'>5120</a>
<a id='n5121' href='#n5121'>5121</a>
<a id='n5122' href='#n5122'>5122</a>
<a id='n5123' href='#n5123'>5123</a>
<a id='n5124' href='#n5124'>5124</a>
<a id='n5125' href='#n5125'>5125</a>
<a id='n5126' href='#n5126'>5126</a>
<a id='n5127' href='#n5127'>5127</a>
<a id='n5128' href='#n5128'>5128</a>
<a id='n5129' href='#n5129'>5129</a>
<a id='n5130' href='#n5130'>5130</a>
<a id='n5131' href='#n5131'>5131</a>
<a id='n5132' href='#n5132'>5132</a>
<a id='n5133' href='#n5133'>5133</a>
<a id='n5134' href='#n5134'>5134</a>
<a id='n5135' href='#n5135'>5135</a>
<a id='n5136' href='#n5136'>5136</a>
<a id='n5137' href='#n5137'>5137</a>
<a id='n5138' href='#n5138'>5138</a>
<a id='n5139' href='#n5139'>5139</a>
<a id='n5140' href='#n5140'>5140</a>
<a id='n5141' href='#n5141'>5141</a>
<a id='n5142' href='#n5142'>5142</a>
<a id='n5143' href='#n5143'>5143</a>
<a id='n5144' href='#n5144'>5144</a>
<a id='n5145' href='#n5145'>5145</a>
<a id='n5146' href='#n5146'>5146</a>
<a id='n5147' href='#n5147'>5147</a>
<a id='n5148' href='#n5148'>5148</a>
<a id='n5149' href='#n5149'>5149</a>
<a id='n5150' href='#n5150'>5150</a>
<a id='n5151' href='#n5151'>5151</a>
<a id='n5152' href='#n5152'>5152</a>
<a id='n5153' href='#n5153'>5153</a>
<a id='n5154' href='#n5154'>5154</a>
<a id='n5155' href='#n5155'>5155</a>
<a id='n5156' href='#n5156'>5156</a>
<a id='n5157' href='#n5157'>5157</a>
<a id='n5158' href='#n5158'>5158</a>
<a id='n5159' href='#n5159'>5159</a>
<a id='n5160' href='#n5160'>5160</a>
<a id='n5161' href='#n5161'>5161</a>
<a id='n5162' href='#n5162'>5162</a>
<a id='n5163' href='#n5163'>5163</a>
<a id='n5164' href='#n5164'>5164</a>
<a id='n5165' href='#n5165'>5165</a>
<a id='n5166' href='#n5166'>5166</a>
<a id='n5167' href='#n5167'>5167</a>
<a id='n5168' href='#n5168'>5168</a>
<a id='n5169' href='#n5169'>5169</a>
<a id='n5170' href='#n5170'>5170</a>
<a id='n5171' href='#n5171'>5171</a>
<a id='n5172' href='#n5172'>5172</a>
<a id='n5173' href='#n5173'>5173</a>
<a id='n5174' href='#n5174'>5174</a>
<a id='n5175' href='#n5175'>5175</a>
<a id='n5176' href='#n5176'>5176</a>
<a id='n5177' href='#n5177'>5177</a>
<a id='n5178' href='#n5178'>5178</a>
<a id='n5179' href='#n5179'>5179</a>
<a id='n5180' href='#n5180'>5180</a>
<a id='n5181' href='#n5181'>5181</a>
<a id='n5182' href='#n5182'>5182</a>
<a id='n5183' href='#n5183'>5183</a>
<a id='n5184' href='#n5184'>5184</a>
<a id='n5185' href='#n5185'>5185</a>
<a id='n5186' href='#n5186'>5186</a>
<a id='n5187' href='#n5187'>5187</a>
<a id='n5188' href='#n5188'>5188</a>
<a id='n5189' href='#n5189'>5189</a>
<a id='n5190' href='#n5190'>5190</a>
<a id='n5191' href='#n5191'>5191</a>
<a id='n5192' href='#n5192'>5192</a>
<a id='n5193' href='#n5193'>5193</a>
<a id='n5194' href='#n5194'>5194</a>
<a id='n5195' href='#n5195'>5195</a>
<a id='n5196' href='#n5196'>5196</a>
<a id='n5197' href='#n5197'>5197</a>
<a id='n5198' href='#n5198'>5198</a>
<a id='n5199' href='#n5199'>5199</a>
<a id='n5200' href='#n5200'>5200</a>
<a id='n5201' href='#n5201'>5201</a>
<a id='n5202' href='#n5202'>5202</a>
<a id='n5203' href='#n5203'>5203</a>
<a id='n5204' href='#n5204'>5204</a>
<a id='n5205' href='#n5205'>5205</a>
<a id='n5206' href='#n5206'>5206</a>
<a id='n5207' href='#n5207'>5207</a>
<a id='n5208' href='#n5208'>5208</a>
<a id='n5209' href='#n5209'>5209</a>
<a id='n5210' href='#n5210'>5210</a>
<a id='n5211' href='#n5211'>5211</a>
<a id='n5212' href='#n5212'>5212</a>
<a id='n5213' href='#n5213'>5213</a>
<a id='n5214' href='#n5214'>5214</a>
<a id='n5215' href='#n5215'>5215</a>
<a id='n5216' href='#n5216'>5216</a>
<a id='n5217' href='#n5217'>5217</a>
<a id='n5218' href='#n5218'>5218</a>
<a id='n5219' href='#n5219'>5219</a>
<a id='n5220' href='#n5220'>5220</a>
<a id='n5221' href='#n5221'>5221</a>
<a id='n5222' href='#n5222'>5222</a>
<a id='n5223' href='#n5223'>5223</a>
<a id='n5224' href='#n5224'>5224</a>
<a id='n5225' href='#n5225'>5225</a>
<a id='n5226' href='#n5226'>5226</a>
<a id='n5227' href='#n5227'>5227</a>
<a id='n5228' href='#n5228'>5228</a>
<a id='n5229' href='#n5229'>5229</a>
<a id='n5230' href='#n5230'>5230</a>
<a id='n5231' href='#n5231'>5231</a>
<a id='n5232' href='#n5232'>5232</a>
<a id='n5233' href='#n5233'>5233</a>
<a id='n5234' href='#n5234'>5234</a>
<a id='n5235' href='#n5235'>5235</a>
<a id='n5236' href='#n5236'>5236</a>
<a id='n5237' href='#n5237'>5237</a>
<a id='n5238' href='#n5238'>5238</a>
<a id='n5239' href='#n5239'>5239</a>
<a id='n5240' href='#n5240'>5240</a>
<a id='n5241' href='#n5241'>5241</a>
<a id='n5242' href='#n5242'>5242</a>
<a id='n5243' href='#n5243'>5243</a>
<a id='n5244' href='#n5244'>5244</a>
<a id='n5245' href='#n5245'>5245</a>
<a id='n5246' href='#n5246'>5246</a>
<a id='n5247' href='#n5247'>5247</a>
<a id='n5248' href='#n5248'>5248</a>
<a id='n5249' href='#n5249'>5249</a>
<a id='n5250' href='#n5250'>5250</a>
<a id='n5251' href='#n5251'>5251</a>
<a id='n5252' href='#n5252'>5252</a>
<a id='n5253' href='#n5253'>5253</a>
<a id='n5254' href='#n5254'>5254</a>
<a id='n5255' href='#n5255'>5255</a>
<a id='n5256' href='#n5256'>5256</a>
<a id='n5257' href='#n5257'>5257</a>
<a id='n5258' href='#n5258'>5258</a>
<a id='n5259' href='#n5259'>5259</a>
<a id='n5260' href='#n5260'>5260</a>
<a id='n5261' href='#n5261'>5261</a>
<a id='n5262' href='#n5262'>5262</a>
<a id='n5263' href='#n5263'>5263</a>
<a id='n5264' href='#n5264'>5264</a>
<a id='n5265' href='#n5265'>5265</a>
<a id='n5266' href='#n5266'>5266</a>
<a id='n5267' href='#n5267'>5267</a>
<a id='n5268' href='#n5268'>5268</a>
<a id='n5269' href='#n5269'>5269</a>
<a id='n5270' href='#n5270'>5270</a>
<a id='n5271' href='#n5271'>5271</a>
<a id='n5272' href='#n5272'>5272</a>
<a id='n5273' href='#n5273'>5273</a>
<a id='n5274' href='#n5274'>5274</a>
<a id='n5275' href='#n5275'>5275</a>
<a id='n5276' href='#n5276'>5276</a>
<a id='n5277' href='#n5277'>5277</a>
<a id='n5278' href='#n5278'>5278</a>
<a id='n5279' href='#n5279'>5279</a>
<a id='n5280' href='#n5280'>5280</a>
<a id='n5281' href='#n5281'>5281</a>
<a id='n5282' href='#n5282'>5282</a>
<a id='n5283' href='#n5283'>5283</a>
<a id='n5284' href='#n5284'>5284</a>
<a id='n5285' href='#n5285'>5285</a>
<a id='n5286' href='#n5286'>5286</a>
<a id='n5287' href='#n5287'>5287</a>
<a id='n5288' href='#n5288'>5288</a>
<a id='n5289' href='#n5289'>5289</a>
<a id='n5290' href='#n5290'>5290</a>
<a id='n5291' href='#n5291'>5291</a>
<a id='n5292' href='#n5292'>5292</a>
<a id='n5293' href='#n5293'>5293</a>
<a id='n5294' href='#n5294'>5294</a>
<a id='n5295' href='#n5295'>5295</a>
<a id='n5296' href='#n5296'>5296</a>
<a id='n5297' href='#n5297'>5297</a>
<a id='n5298' href='#n5298'>5298</a>
<a id='n5299' href='#n5299'>5299</a>
<a id='n5300' href='#n5300'>5300</a>
<a id='n5301' href='#n5301'>5301</a>
<a id='n5302' href='#n5302'>5302</a>
<a id='n5303' href='#n5303'>5303</a>
<a id='n5304' href='#n5304'>5304</a>
<a id='n5305' href='#n5305'>5305</a>
<a id='n5306' href='#n5306'>5306</a>
<a id='n5307' href='#n5307'>5307</a>
<a id='n5308' href='#n5308'>5308</a>
<a id='n5309' href='#n5309'>5309</a>
<a id='n5310' href='#n5310'>5310</a>
<a id='n5311' href='#n5311'>5311</a>
<a id='n5312' href='#n5312'>5312</a>
<a id='n5313' href='#n5313'>5313</a>
<a id='n5314' href='#n5314'>5314</a>
<a id='n5315' href='#n5315'>5315</a>
<a id='n5316' href='#n5316'>5316</a>
<a id='n5317' href='#n5317'>5317</a>
<a id='n5318' href='#n5318'>5318</a>
<a id='n5319' href='#n5319'>5319</a>
<a id='n5320' href='#n5320'>5320</a>
<a id='n5321' href='#n5321'>5321</a>
<a id='n5322' href='#n5322'>5322</a>
<a id='n5323' href='#n5323'>5323</a>
<a id='n5324' href='#n5324'>5324</a>
<a id='n5325' href='#n5325'>5325</a>
<a id='n5326' href='#n5326'>5326</a>
<a id='n5327' href='#n5327'>5327</a>
<a id='n5328' href='#n5328'>5328</a>
<a id='n5329' href='#n5329'>5329</a>
<a id='n5330' href='#n5330'>5330</a>
<a id='n5331' href='#n5331'>5331</a>
<a id='n5332' href='#n5332'>5332</a>
<a id='n5333' href='#n5333'>5333</a>
<a id='n5334' href='#n5334'>5334</a>
<a id='n5335' href='#n5335'>5335</a>
<a id='n5336' href='#n5336'>5336</a>
<a id='n5337' href='#n5337'>5337</a>
<a id='n5338' href='#n5338'>5338</a>
<a id='n5339' href='#n5339'>5339</a>
<a id='n5340' href='#n5340'>5340</a>
<a id='n5341' href='#n5341'>5341</a>
<a id='n5342' href='#n5342'>5342</a>
<a id='n5343' href='#n5343'>5343</a>
<a id='n5344' href='#n5344'>5344</a>
<a id='n5345' href='#n5345'>5345</a>
<a id='n5346' href='#n5346'>5346</a>
<a id='n5347' href='#n5347'>5347</a>
<a id='n5348' href='#n5348'>5348</a>
<a id='n5349' href='#n5349'>5349</a>
<a id='n5350' href='#n5350'>5350</a>
<a id='n5351' href='#n5351'>5351</a>
<a id='n5352' href='#n5352'>5352</a>
<a id='n5353' href='#n5353'>5353</a>
<a id='n5354' href='#n5354'>5354</a>
<a id='n5355' href='#n5355'>5355</a>
<a id='n5356' href='#n5356'>5356</a>
<a id='n5357' href='#n5357'>5357</a>
<a id='n5358' href='#n5358'>5358</a>
<a id='n5359' href='#n5359'>5359</a>
<a id='n5360' href='#n5360'>5360</a>
<a id='n5361' href='#n5361'>5361</a>
<a id='n5362' href='#n5362'>5362</a>
<a id='n5363' href='#n5363'>5363</a>
<a id='n5364' href='#n5364'>5364</a>
<a id='n5365' href='#n5365'>5365</a>
<a id='n5366' href='#n5366'>5366</a>
<a id='n5367' href='#n5367'>5367</a>
<a id='n5368' href='#n5368'>5368</a>
<a id='n5369' href='#n5369'>5369</a>
<a id='n5370' href='#n5370'>5370</a>
<a id='n5371' href='#n5371'>5371</a>
<a id='n5372' href='#n5372'>5372</a>
<a id='n5373' href='#n5373'>5373</a>
<a id='n5374' href='#n5374'>5374</a>
<a id='n5375' href='#n5375'>5375</a>
<a id='n5376' href='#n5376'>5376</a>
<a id='n5377' href='#n5377'>5377</a>
<a id='n5378' href='#n5378'>5378</a>
<a id='n5379' href='#n5379'>5379</a>
<a id='n5380' href='#n5380'>5380</a>
<a id='n5381' href='#n5381'>5381</a>
<a id='n5382' href='#n5382'>5382</a>
<a id='n5383' href='#n5383'>5383</a>
<a id='n5384' href='#n5384'>5384</a>
<a id='n5385' href='#n5385'>5385</a>
<a id='n5386' href='#n5386'>5386</a>
<a id='n5387' href='#n5387'>5387</a>
<a id='n5388' href='#n5388'>5388</a>
<a id='n5389' href='#n5389'>5389</a>
<a id='n5390' href='#n5390'>5390</a>
<a id='n5391' href='#n5391'>5391</a>
<a id='n5392' href='#n5392'>5392</a>
<a id='n5393' href='#n5393'>5393</a>
<a id='n5394' href='#n5394'>5394</a>
<a id='n5395' href='#n5395'>5395</a>
<a id='n5396' href='#n5396'>5396</a>
<a id='n5397' href='#n5397'>5397</a>
<a id='n5398' href='#n5398'>5398</a>
<a id='n5399' href='#n5399'>5399</a>
<a id='n5400' href='#n5400'>5400</a>
<a id='n5401' href='#n5401'>5401</a>
<a id='n5402' href='#n5402'>5402</a>
<a id='n5403' href='#n5403'>5403</a>
<a id='n5404' href='#n5404'>5404</a>
<a id='n5405' href='#n5405'>5405</a>
<a id='n5406' href='#n5406'>5406</a>
<a id='n5407' href='#n5407'>5407</a>
<a id='n5408' href='#n5408'>5408</a>
<a id='n5409' href='#n5409'>5409</a>
<a id='n5410' href='#n5410'>5410</a>
<a id='n5411' href='#n5411'>5411</a>
<a id='n5412' href='#n5412'>5412</a>
<a id='n5413' href='#n5413'>5413</a>
<a id='n5414' href='#n5414'>5414</a>
<a id='n5415' href='#n5415'>5415</a>
<a id='n5416' href='#n5416'>5416</a>
<a id='n5417' href='#n5417'>5417</a>
<a id='n5418' href='#n5418'>5418</a>
<a id='n5419' href='#n5419'>5419</a>
<a id='n5420' href='#n5420'>5420</a>
<a id='n5421' href='#n5421'>5421</a>
<a id='n5422' href='#n5422'>5422</a>
<a id='n5423' href='#n5423'>5423</a>
<a id='n5424' href='#n5424'>5424</a>
<a id='n5425' href='#n5425'>5425</a>
<a id='n5426' href='#n5426'>5426</a>
<a id='n5427' href='#n5427'>5427</a>
<a id='n5428' href='#n5428'>5428</a>
<a id='n5429' href='#n5429'>5429</a>
<a id='n5430' href='#n5430'>5430</a>
<a id='n5431' href='#n5431'>5431</a>
<a id='n5432' href='#n5432'>5432</a>
<a id='n5433' href='#n5433'>5433</a>
<a id='n5434' href='#n5434'>5434</a>
<a id='n5435' href='#n5435'>5435</a>
<a id='n5436' href='#n5436'>5436</a>
<a id='n5437' href='#n5437'>5437</a>
<a id='n5438' href='#n5438'>5438</a>
<a id='n5439' href='#n5439'>5439</a>
<a id='n5440' href='#n5440'>5440</a>
<a id='n5441' href='#n5441'>5441</a>
<a id='n5442' href='#n5442'>5442</a>
<a id='n5443' href='#n5443'>5443</a>
<a id='n5444' href='#n5444'>5444</a>
<a id='n5445' href='#n5445'>5445</a>
<a id='n5446' href='#n5446'>5446</a>
<a id='n5447' href='#n5447'>5447</a>
<a id='n5448' href='#n5448'>5448</a>
<a id='n5449' href='#n5449'>5449</a>
<a id='n5450' href='#n5450'>5450</a>
<a id='n5451' href='#n5451'>5451</a>
<a id='n5452' href='#n5452'>5452</a>
<a id='n5453' href='#n5453'>5453</a>
<a id='n5454' href='#n5454'>5454</a>
<a id='n5455' href='#n5455'>5455</a>
<a id='n5456' href='#n5456'>5456</a>
<a id='n5457' href='#n5457'>5457</a>
<a id='n5458' href='#n5458'>5458</a>
<a id='n5459' href='#n5459'>5459</a>
<a id='n5460' href='#n5460'>5460</a>
<a id='n5461' href='#n5461'>5461</a>
<a id='n5462' href='#n5462'>5462</a>
<a id='n5463' href='#n5463'>5463</a>
<a id='n5464' href='#n5464'>5464</a>
<a id='n5465' href='#n5465'>5465</a>
<a id='n5466' href='#n5466'>5466</a>
<a id='n5467' href='#n5467'>5467</a>
<a id='n5468' href='#n5468'>5468</a>
<a id='n5469' href='#n5469'>5469</a>
<a id='n5470' href='#n5470'>5470</a>
<a id='n5471' href='#n5471'>5471</a>
<a id='n5472' href='#n5472'>5472</a>
<a id='n5473' href='#n5473'>5473</a>
<a id='n5474' href='#n5474'>5474</a>
<a id='n5475' href='#n5475'>5475</a>
<a id='n5476' href='#n5476'>5476</a>
<a id='n5477' href='#n5477'>5477</a>
<a id='n5478' href='#n5478'>5478</a>
<a id='n5479' href='#n5479'>5479</a>
<a id='n5480' href='#n5480'>5480</a>
<a id='n5481' href='#n5481'>5481</a>
<a id='n5482' href='#n5482'>5482</a>
<a id='n5483' href='#n5483'>5483</a>
<a id='n5484' href='#n5484'>5484</a>
<a id='n5485' href='#n5485'>5485</a>
<a id='n5486' href='#n5486'>5486</a>
<a id='n5487' href='#n5487'>5487</a>
<a id='n5488' href='#n5488'>5488</a>
<a id='n5489' href='#n5489'>5489</a>
<a id='n5490' href='#n5490'>5490</a>
<a id='n5491' href='#n5491'>5491</a>
<a id='n5492' href='#n5492'>5492</a>
<a id='n5493' href='#n5493'>5493</a>
<a id='n5494' href='#n5494'>5494</a>
<a id='n5495' href='#n5495'>5495</a>
<a id='n5496' href='#n5496'>5496</a>
<a id='n5497' href='#n5497'>5497</a>
<a id='n5498' href='#n5498'>5498</a>
<a id='n5499' href='#n5499'>5499</a>
<a id='n5500' href='#n5500'>5500</a>
<a id='n5501' href='#n5501'>5501</a>
<a id='n5502' href='#n5502'>5502</a>
<a id='n5503' href='#n5503'>5503</a>
<a id='n5504' href='#n5504'>5504</a>
<a id='n5505' href='#n5505'>5505</a>
<a id='n5506' href='#n5506'>5506</a>
<a id='n5507' href='#n5507'>5507</a>
<a id='n5508' href='#n5508'>5508</a>
<a id='n5509' href='#n5509'>5509</a>
<a id='n5510' href='#n5510'>5510</a>
<a id='n5511' href='#n5511'>5511</a>
<a id='n5512' href='#n5512'>5512</a>
<a id='n5513' href='#n5513'>5513</a>
<a id='n5514' href='#n5514'>5514</a>
<a id='n5515' href='#n5515'>5515</a>
<a id='n5516' href='#n5516'>5516</a>
<a id='n5517' href='#n5517'>5517</a>
<a id='n5518' href='#n5518'>5518</a>
<a id='n5519' href='#n5519'>5519</a>
<a id='n5520' href='#n5520'>5520</a>
<a id='n5521' href='#n5521'>5521</a>
<a id='n5522' href='#n5522'>5522</a>
<a id='n5523' href='#n5523'>5523</a>
<a id='n5524' href='#n5524'>5524</a>
<a id='n5525' href='#n5525'>5525</a>
<a id='n5526' href='#n5526'>5526</a>
<a id='n5527' href='#n5527'>5527</a>
<a id='n5528' href='#n5528'>5528</a>
<a id='n5529' href='#n5529'>5529</a>
<a id='n5530' href='#n5530'>5530</a>
<a id='n5531' href='#n5531'>5531</a>
<a id='n5532' href='#n5532'>5532</a>
<a id='n5533' href='#n5533'>5533</a>
<a id='n5534' href='#n5534'>5534</a>
<a id='n5535' href='#n5535'>5535</a>
<a id='n5536' href='#n5536'>5536</a>
<a id='n5537' href='#n5537'>5537</a>
<a id='n5538' href='#n5538'>5538</a>
<a id='n5539' href='#n5539'>5539</a>
<a id='n5540' href='#n5540'>5540</a>
<a id='n5541' href='#n5541'>5541</a>
<a id='n5542' href='#n5542'>5542</a>
<a id='n5543' href='#n5543'>5543</a>
<a id='n5544' href='#n5544'>5544</a>
<a id='n5545' href='#n5545'>5545</a>
<a id='n5546' href='#n5546'>5546</a>
<a id='n5547' href='#n5547'>5547</a>
<a id='n5548' href='#n5548'>5548</a>
<a id='n5549' href='#n5549'>5549</a>
<a id='n5550' href='#n5550'>5550</a>
<a id='n5551' href='#n5551'>5551</a>
<a id='n5552' href='#n5552'>5552</a>
<a id='n5553' href='#n5553'>5553</a>
<a id='n5554' href='#n5554'>5554</a>
<a id='n5555' href='#n5555'>5555</a>
<a id='n5556' href='#n5556'>5556</a>
<a id='n5557' href='#n5557'>5557</a>
<a id='n5558' href='#n5558'>5558</a>
<a id='n5559' href='#n5559'>5559</a>
<a id='n5560' href='#n5560'>5560</a>
<a id='n5561' href='#n5561'>5561</a>
<a id='n5562' href='#n5562'>5562</a>
<a id='n5563' href='#n5563'>5563</a>
<a id='n5564' href='#n5564'>5564</a>
<a id='n5565' href='#n5565'>5565</a>
<a id='n5566' href='#n5566'>5566</a>
<a id='n5567' href='#n5567'>5567</a>
<a id='n5568' href='#n5568'>5568</a>
<a id='n5569' href='#n5569'>5569</a>
<a id='n5570' href='#n5570'>5570</a>
<a id='n5571' href='#n5571'>5571</a>
<a id='n5572' href='#n5572'>5572</a>
<a id='n5573' href='#n5573'>5573</a>
<a id='n5574' href='#n5574'>5574</a>
<a id='n5575' href='#n5575'>5575</a>
<a id='n5576' href='#n5576'>5576</a>
<a id='n5577' href='#n5577'>5577</a>
<a id='n5578' href='#n5578'>5578</a>
<a id='n5579' href='#n5579'>5579</a>
<a id='n5580' href='#n5580'>5580</a>
<a id='n5581' href='#n5581'>5581</a>
<a id='n5582' href='#n5582'>5582</a>
<a id='n5583' href='#n5583'>5583</a>
<a id='n5584' href='#n5584'>5584</a>
<a id='n5585' href='#n5585'>5585</a>
<a id='n5586' href='#n5586'>5586</a>
<a id='n5587' href='#n5587'>5587</a>
<a id='n5588' href='#n5588'>5588</a>
<a id='n5589' href='#n5589'>5589</a>
<a id='n5590' href='#n5590'>5590</a>
<a id='n5591' href='#n5591'>5591</a>
<a id='n5592' href='#n5592'>5592</a>
<a id='n5593' href='#n5593'>5593</a>
<a id='n5594' href='#n5594'>5594</a>
<a id='n5595' href='#n5595'>5595</a>
<a id='n5596' href='#n5596'>5596</a>
<a id='n5597' href='#n5597'>5597</a>
<a id='n5598' href='#n5598'>5598</a>
<a id='n5599' href='#n5599'>5599</a>
<a id='n5600' href='#n5600'>5600</a>
<a id='n5601' href='#n5601'>5601</a>
<a id='n5602' href='#n5602'>5602</a>
<a id='n5603' href='#n5603'>5603</a>
<a id='n5604' href='#n5604'>5604</a>
<a id='n5605' href='#n5605'>5605</a>
<a id='n5606' href='#n5606'>5606</a>
<a id='n5607' href='#n5607'>5607</a>
<a id='n5608' href='#n5608'>5608</a>
<a id='n5609' href='#n5609'>5609</a>
<a id='n5610' href='#n5610'>5610</a>
<a id='n5611' href='#n5611'>5611</a>
<a id='n5612' href='#n5612'>5612</a>
<a id='n5613' href='#n5613'>5613</a>
<a id='n5614' href='#n5614'>5614</a>
<a id='n5615' href='#n5615'>5615</a>
<a id='n5616' href='#n5616'>5616</a>
<a id='n5617' href='#n5617'>5617</a>
<a id='n5618' href='#n5618'>5618</a>
<a id='n5619' href='#n5619'>5619</a>
<a id='n5620' href='#n5620'>5620</a>
<a id='n5621' href='#n5621'>5621</a>
<a id='n5622' href='#n5622'>5622</a>
<a id='n5623' href='#n5623'>5623</a>
<a id='n5624' href='#n5624'>5624</a>
<a id='n5625' href='#n5625'>5625</a>
<a id='n5626' href='#n5626'>5626</a>
<a id='n5627' href='#n5627'>5627</a>
<a id='n5628' href='#n5628'>5628</a>
<a id='n5629' href='#n5629'>5629</a>
<a id='n5630' href='#n5630'>5630</a>
<a id='n5631' href='#n5631'>5631</a>
<a id='n5632' href='#n5632'>5632</a>
<a id='n5633' href='#n5633'>5633</a>
<a id='n5634' href='#n5634'>5634</a>
<a id='n5635' href='#n5635'>5635</a>
<a id='n5636' href='#n5636'>5636</a>
<a id='n5637' href='#n5637'>5637</a>
<a id='n5638' href='#n5638'>5638</a>
<a id='n5639' href='#n5639'>5639</a>
<a id='n5640' href='#n5640'>5640</a>
<a id='n5641' href='#n5641'>5641</a>
<a id='n5642' href='#n5642'>5642</a>
<a id='n5643' href='#n5643'>5643</a>
<a id='n5644' href='#n5644'>5644</a>
<a id='n5645' href='#n5645'>5645</a>
<a id='n5646' href='#n5646'>5646</a>
<a id='n5647' href='#n5647'>5647</a>
<a id='n5648' href='#n5648'>5648</a>
<a id='n5649' href='#n5649'>5649</a>
<a id='n5650' href='#n5650'>5650</a>
<a id='n5651' href='#n5651'>5651</a>
<a id='n5652' href='#n5652'>5652</a>
<a id='n5653' href='#n5653'>5653</a>
<a id='n5654' href='#n5654'>5654</a>
<a id='n5655' href='#n5655'>5655</a>
<a id='n5656' href='#n5656'>5656</a>
<a id='n5657' href='#n5657'>5657</a>
<a id='n5658' href='#n5658'>5658</a>
<a id='n5659' href='#n5659'>5659</a>
<a id='n5660' href='#n5660'>5660</a>
<a id='n5661' href='#n5661'>5661</a>
<a id='n5662' href='#n5662'>5662</a>
<a id='n5663' href='#n5663'>5663</a>
<a id='n5664' href='#n5664'>5664</a>
<a id='n5665' href='#n5665'>5665</a>
<a id='n5666' href='#n5666'>5666</a>
<a id='n5667' href='#n5667'>5667</a>
<a id='n5668' href='#n5668'>5668</a>
<a id='n5669' href='#n5669'>5669</a>
<a id='n5670' href='#n5670'>5670</a>
<a id='n5671' href='#n5671'>5671</a>
<a id='n5672' href='#n5672'>5672</a>
<a id='n5673' href='#n5673'>5673</a>
<a id='n5674' href='#n5674'>5674</a>
<a id='n5675' href='#n5675'>5675</a>
<a id='n5676' href='#n5676'>5676</a>
<a id='n5677' href='#n5677'>5677</a>
<a id='n5678' href='#n5678'>5678</a>
<a id='n5679' href='#n5679'>5679</a>
<a id='n5680' href='#n5680'>5680</a>
<a id='n5681' href='#n5681'>5681</a>
<a id='n5682' href='#n5682'>5682</a>
<a id='n5683' href='#n5683'>5683</a>
<a id='n5684' href='#n5684'>5684</a>
<a id='n5685' href='#n5685'>5685</a>
<a id='n5686' href='#n5686'>5686</a>
<a id='n5687' href='#n5687'>5687</a>
<a id='n5688' href='#n5688'>5688</a>
<a id='n5689' href='#n5689'>5689</a>
<a id='n5690' href='#n5690'>5690</a>
<a id='n5691' href='#n5691'>5691</a>
<a id='n5692' href='#n5692'>5692</a>
<a id='n5693' href='#n5693'>5693</a>
<a id='n5694' href='#n5694'>5694</a>
<a id='n5695' href='#n5695'>5695</a>
<a id='n5696' href='#n5696'>5696</a>
<a id='n5697' href='#n5697'>5697</a>
<a id='n5698' href='#n5698'>5698</a>
<a id='n5699' href='#n5699'>5699</a>
<a id='n5700' href='#n5700'>5700</a>
<a id='n5701' href='#n5701'>5701</a>
<a id='n5702' href='#n5702'>5702</a>
<a id='n5703' href='#n5703'>5703</a>
<a id='n5704' href='#n5704'>5704</a>
<a id='n5705' href='#n5705'>5705</a>
<a id='n5706' href='#n5706'>5706</a>
<a id='n5707' href='#n5707'>5707</a>
<a id='n5708' href='#n5708'>5708</a>
<a id='n5709' href='#n5709'>5709</a>
<a id='n5710' href='#n5710'>5710</a>
<a id='n5711' href='#n5711'>5711</a>
<a id='n5712' href='#n5712'>5712</a>
<a id='n5713' href='#n5713'>5713</a>
<a id='n5714' href='#n5714'>5714</a>
<a id='n5715' href='#n5715'>5715</a>
<a id='n5716' href='#n5716'>5716</a>
<a id='n5717' href='#n5717'>5717</a>
<a id='n5718' href='#n5718'>5718</a>
<a id='n5719' href='#n5719'>5719</a>
<a id='n5720' href='#n5720'>5720</a>
<a id='n5721' href='#n5721'>5721</a>
<a id='n5722' href='#n5722'>5722</a>
<a id='n5723' href='#n5723'>5723</a>
<a id='n5724' href='#n5724'>5724</a>
<a id='n5725' href='#n5725'>5725</a>
<a id='n5726' href='#n5726'>5726</a>
<a id='n5727' href='#n5727'>5727</a>
<a id='n5728' href='#n5728'>5728</a>
<a id='n5729' href='#n5729'>5729</a>
<a id='n5730' href='#n5730'>5730</a>
<a id='n5731' href='#n5731'>5731</a>
<a id='n5732' href='#n5732'>5732</a>
<a id='n5733' href='#n5733'>5733</a>
<a id='n5734' href='#n5734'>5734</a>
<a id='n5735' href='#n5735'>5735</a>
<a id='n5736' href='#n5736'>5736</a>
<a id='n5737' href='#n5737'>5737</a>
<a id='n5738' href='#n5738'>5738</a>
<a id='n5739' href='#n5739'>5739</a>
<a id='n5740' href='#n5740'>5740</a>
<a id='n5741' href='#n5741'>5741</a>
<a id='n5742' href='#n5742'>5742</a>
<a id='n5743' href='#n5743'>5743</a>
<a id='n5744' href='#n5744'>5744</a>
<a id='n5745' href='#n5745'>5745</a>
<a id='n5746' href='#n5746'>5746</a>
<a id='n5747' href='#n5747'>5747</a>
<a id='n5748' href='#n5748'>5748</a>
<a id='n5749' href='#n5749'>5749</a>
<a id='n5750' href='#n5750'>5750</a>
<a id='n5751' href='#n5751'>5751</a>
<a id='n5752' href='#n5752'>5752</a>
<a id='n5753' href='#n5753'>5753</a>
<a id='n5754' href='#n5754'>5754</a>
<a id='n5755' href='#n5755'>5755</a>
<a id='n5756' href='#n5756'>5756</a>
<a id='n5757' href='#n5757'>5757</a>
<a id='n5758' href='#n5758'>5758</a>
<a id='n5759' href='#n5759'>5759</a>
<a id='n5760' href='#n5760'>5760</a>
<a id='n5761' href='#n5761'>5761</a>
<a id='n5762' href='#n5762'>5762</a>
<a id='n5763' href='#n5763'>5763</a>
<a id='n5764' href='#n5764'>5764</a>
<a id='n5765' href='#n5765'>5765</a>
<a id='n5766' href='#n5766'>5766</a>
<a id='n5767' href='#n5767'>5767</a>
<a id='n5768' href='#n5768'>5768</a>
<a id='n5769' href='#n5769'>5769</a>
<a id='n5770' href='#n5770'>5770</a>
<a id='n5771' href='#n5771'>5771</a>
<a id='n5772' href='#n5772'>5772</a>
<a id='n5773' href='#n5773'>5773</a>
<a id='n5774' href='#n5774'>5774</a>
<a id='n5775' href='#n5775'>5775</a>
<a id='n5776' href='#n5776'>5776</a>
<a id='n5777' href='#n5777'>5777</a>
<a id='n5778' href='#n5778'>5778</a>
<a id='n5779' href='#n5779'>5779</a>
<a id='n5780' href='#n5780'>5780</a>
<a id='n5781' href='#n5781'>5781</a>
<a id='n5782' href='#n5782'>5782</a>
<a id='n5783' href='#n5783'>5783</a>
<a id='n5784' href='#n5784'>5784</a>
<a id='n5785' href='#n5785'>5785</a>
<a id='n5786' href='#n5786'>5786</a>
<a id='n5787' href='#n5787'>5787</a>
<a id='n5788' href='#n5788'>5788</a>
<a id='n5789' href='#n5789'>5789</a>
<a id='n5790' href='#n5790'>5790</a>
<a id='n5791' href='#n5791'>5791</a>
<a id='n5792' href='#n5792'>5792</a>
<a id='n5793' href='#n5793'>5793</a>
<a id='n5794' href='#n5794'>5794</a>
<a id='n5795' href='#n5795'>5795</a>
<a id='n5796' href='#n5796'>5796</a>
<a id='n5797' href='#n5797'>5797</a>
<a id='n5798' href='#n5798'>5798</a>
<a id='n5799' href='#n5799'>5799</a>
<a id='n5800' href='#n5800'>5800</a>
<a id='n5801' href='#n5801'>5801</a>
<a id='n5802' href='#n5802'>5802</a>
<a id='n5803' href='#n5803'>5803</a>
<a id='n5804' href='#n5804'>5804</a>
<a id='n5805' href='#n5805'>5805</a>
<a id='n5806' href='#n5806'>5806</a>
<a id='n5807' href='#n5807'>5807</a>
<a id='n5808' href='#n5808'>5808</a>
<a id='n5809' href='#n5809'>5809</a>
<a id='n5810' href='#n5810'>5810</a>
<a id='n5811' href='#n5811'>5811</a>
<a id='n5812' href='#n5812'>5812</a>
<a id='n5813' href='#n5813'>5813</a>
<a id='n5814' href='#n5814'>5814</a>
<a id='n5815' href='#n5815'>5815</a>
<a id='n5816' href='#n5816'>5816</a>
<a id='n5817' href='#n5817'>5817</a>
<a id='n5818' href='#n5818'>5818</a>
<a id='n5819' href='#n5819'>5819</a>
<a id='n5820' href='#n5820'>5820</a>
<a id='n5821' href='#n5821'>5821</a>
<a id='n5822' href='#n5822'>5822</a>
<a id='n5823' href='#n5823'>5823</a>
<a id='n5824' href='#n5824'>5824</a>
<a id='n5825' href='#n5825'>5825</a>
<a id='n5826' href='#n5826'>5826</a>
<a id='n5827' href='#n5827'>5827</a>
<a id='n5828' href='#n5828'>5828</a>
<a id='n5829' href='#n5829'>5829</a>
<a id='n5830' href='#n5830'>5830</a>
<a id='n5831' href='#n5831'>5831</a>
<a id='n5832' href='#n5832'>5832</a>
<a id='n5833' href='#n5833'>5833</a>
<a id='n5834' href='#n5834'>5834</a>
<a id='n5835' href='#n5835'>5835</a>
<a id='n5836' href='#n5836'>5836</a>
<a id='n5837' href='#n5837'>5837</a>
<a id='n5838' href='#n5838'>5838</a>
<a id='n5839' href='#n5839'>5839</a>
<a id='n5840' href='#n5840'>5840</a>
<a id='n5841' href='#n5841'>5841</a>
<a id='n5842' href='#n5842'>5842</a>
<a id='n5843' href='#n5843'>5843</a>
<a id='n5844' href='#n5844'>5844</a>
<a id='n5845' href='#n5845'>5845</a>
<a id='n5846' href='#n5846'>5846</a>
<a id='n5847' href='#n5847'>5847</a>
<a id='n5848' href='#n5848'>5848</a>
<a id='n5849' href='#n5849'>5849</a>
<a id='n5850' href='#n5850'>5850</a>
<a id='n5851' href='#n5851'>5851</a>
<a id='n5852' href='#n5852'>5852</a>
<a id='n5853' href='#n5853'>5853</a>
<a id='n5854' href='#n5854'>5854</a>
<a id='n5855' href='#n5855'>5855</a>
<a id='n5856' href='#n5856'>5856</a>
<a id='n5857' href='#n5857'>5857</a>
<a id='n5858' href='#n5858'>5858</a>
<a id='n5859' href='#n5859'>5859</a>
<a id='n5860' href='#n5860'>5860</a>
<a id='n5861' href='#n5861'>5861</a>
<a id='n5862' href='#n5862'>5862</a>
<a id='n5863' href='#n5863'>5863</a>
<a id='n5864' href='#n5864'>5864</a>
<a id='n5865' href='#n5865'>5865</a>
<a id='n5866' href='#n5866'>5866</a>
<a id='n5867' href='#n5867'>5867</a>
<a id='n5868' href='#n5868'>5868</a>
<a id='n5869' href='#n5869'>5869</a>
<a id='n5870' href='#n5870'>5870</a>
<a id='n5871' href='#n5871'>5871</a>
<a id='n5872' href='#n5872'>5872</a>
<a id='n5873' href='#n5873'>5873</a>
<a id='n5874' href='#n5874'>5874</a>
<a id='n5875' href='#n5875'>5875</a>
<a id='n5876' href='#n5876'>5876</a>
<a id='n5877' href='#n5877'>5877</a>
<a id='n5878' href='#n5878'>5878</a>
<a id='n5879' href='#n5879'>5879</a>
<a id='n5880' href='#n5880'>5880</a>
<a id='n5881' href='#n5881'>5881</a>
<a id='n5882' href='#n5882'>5882</a>
<a id='n5883' href='#n5883'>5883</a>
<a id='n5884' href='#n5884'>5884</a>
<a id='n5885' href='#n5885'>5885</a>
<a id='n5886' href='#n5886'>5886</a>
<a id='n5887' href='#n5887'>5887</a>
<a id='n5888' href='#n5888'>5888</a>
<a id='n5889' href='#n5889'>5889</a>
<a id='n5890' href='#n5890'>5890</a>
<a id='n5891' href='#n5891'>5891</a>
<a id='n5892' href='#n5892'>5892</a>
<a id='n5893' href='#n5893'>5893</a>
<a id='n5894' href='#n5894'>5894</a>
<a id='n5895' href='#n5895'>5895</a>
<a id='n5896' href='#n5896'>5896</a>
<a id='n5897' href='#n5897'>5897</a>
<a id='n5898' href='#n5898'>5898</a>
<a id='n5899' href='#n5899'>5899</a>
<a id='n5900' href='#n5900'>5900</a>
<a id='n5901' href='#n5901'>5901</a>
<a id='n5902' href='#n5902'>5902</a>
<a id='n5903' href='#n5903'>5903</a>
<a id='n5904' href='#n5904'>5904</a>
<a id='n5905' href='#n5905'>5905</a>
<a id='n5906' href='#n5906'>5906</a>
<a id='n5907' href='#n5907'>5907</a>
<a id='n5908' href='#n5908'>5908</a>
<a id='n5909' href='#n5909'>5909</a>
<a id='n5910' href='#n5910'>5910</a>
<a id='n5911' href='#n5911'>5911</a>
<a id='n5912' href='#n5912'>5912</a>
<a id='n5913' href='#n5913'>5913</a>
<a id='n5914' href='#n5914'>5914</a>
<a id='n5915' href='#n5915'>5915</a>
<a id='n5916' href='#n5916'>5916</a>
<a id='n5917' href='#n5917'>5917</a>
<a id='n5918' href='#n5918'>5918</a>
<a id='n5919' href='#n5919'>5919</a>
<a id='n5920' href='#n5920'>5920</a>
<a id='n5921' href='#n5921'>5921</a>
<a id='n5922' href='#n5922'>5922</a>
<a id='n5923' href='#n5923'>5923</a>
<a id='n5924' href='#n5924'>5924</a>
<a id='n5925' href='#n5925'>5925</a>
<a id='n5926' href='#n5926'>5926</a>
<a id='n5927' href='#n5927'>5927</a>
<a id='n5928' href='#n5928'>5928</a>
<a id='n5929' href='#n5929'>5929</a>
<a id='n5930' href='#n5930'>5930</a>
<a id='n5931' href='#n5931'>5931</a>
<a id='n5932' href='#n5932'>5932</a>
<a id='n5933' href='#n5933'>5933</a>
<a id='n5934' href='#n5934'>5934</a>
<a id='n5935' href='#n5935'>5935</a>
<a id='n5936' href='#n5936'>5936</a>
<a id='n5937' href='#n5937'>5937</a>
<a id='n5938' href='#n5938'>5938</a>
<a id='n5939' href='#n5939'>5939</a>
<a id='n5940' href='#n5940'>5940</a>
<a id='n5941' href='#n5941'>5941</a>
<a id='n5942' href='#n5942'>5942</a>
<a id='n5943' href='#n5943'>5943</a>
<a id='n5944' href='#n5944'>5944</a>
<a id='n5945' href='#n5945'>5945</a>
<a id='n5946' href='#n5946'>5946</a>
<a id='n5947' href='#n5947'>5947</a>
<a id='n5948' href='#n5948'>5948</a>
<a id='n5949' href='#n5949'>5949</a>
<a id='n5950' href='#n5950'>5950</a>
<a id='n5951' href='#n5951'>5951</a>
<a id='n5952' href='#n5952'>5952</a>
<a id='n5953' href='#n5953'>5953</a>
<a id='n5954' href='#n5954'>5954</a>
<a id='n5955' href='#n5955'>5955</a>
<a id='n5956' href='#n5956'>5956</a>
<a id='n5957' href='#n5957'>5957</a>
<a id='n5958' href='#n5958'>5958</a>
<a id='n5959' href='#n5959'>5959</a>
<a id='n5960' href='#n5960'>5960</a>
<a id='n5961' href='#n5961'>5961</a>
<a id='n5962' href='#n5962'>5962</a>
<a id='n5963' href='#n5963'>5963</a>
<a id='n5964' href='#n5964'>5964</a>
<a id='n5965' href='#n5965'>5965</a>
<a id='n5966' href='#n5966'>5966</a>
<a id='n5967' href='#n5967'>5967</a>
<a id='n5968' href='#n5968'>5968</a>
<a id='n5969' href='#n5969'>5969</a>
<a id='n5970' href='#n5970'>5970</a>
<a id='n5971' href='#n5971'>5971</a>
<a id='n5972' href='#n5972'>5972</a>
<a id='n5973' href='#n5973'>5973</a>
<a id='n5974' href='#n5974'>5974</a>
<a id='n5975' href='#n5975'>5975</a>
<a id='n5976' href='#n5976'>5976</a>
<a id='n5977' href='#n5977'>5977</a>
<a id='n5978' href='#n5978'>5978</a>
<a id='n5979' href='#n5979'>5979</a>
<a id='n5980' href='#n5980'>5980</a>
<a id='n5981' href='#n5981'>5981</a>
<a id='n5982' href='#n5982'>5982</a>
<a id='n5983' href='#n5983'>5983</a>
<a id='n5984' href='#n5984'>5984</a>
<a id='n5985' href='#n5985'>5985</a>
<a id='n5986' href='#n5986'>5986</a>
<a id='n5987' href='#n5987'>5987</a>
<a id='n5988' href='#n5988'>5988</a>
<a id='n5989' href='#n5989'>5989</a>
<a id='n5990' href='#n5990'>5990</a>
<a id='n5991' href='#n5991'>5991</a>
<a id='n5992' href='#n5992'>5992</a>
<a id='n5993' href='#n5993'>5993</a>
<a id='n5994' href='#n5994'>5994</a>
<a id='n5995' href='#n5995'>5995</a>
<a id='n5996' href='#n5996'>5996</a>
<a id='n5997' href='#n5997'>5997</a>
<a id='n5998' href='#n5998'>5998</a>
<a id='n5999' href='#n5999'>5999</a>
<a id='n6000' href='#n6000'>6000</a>
<a id='n6001' href='#n6001'>6001</a>
<a id='n6002' href='#n6002'>6002</a>
<a id='n6003' href='#n6003'>6003</a>
<a id='n6004' href='#n6004'>6004</a>
<a id='n6005' href='#n6005'>6005</a>
<a id='n6006' href='#n6006'>6006</a>
<a id='n6007' href='#n6007'>6007</a>
<a id='n6008' href='#n6008'>6008</a>
<a id='n6009' href='#n6009'>6009</a>
<a id='n6010' href='#n6010'>6010</a>
<a id='n6011' href='#n6011'>6011</a>
<a id='n6012' href='#n6012'>6012</a>
<a id='n6013' href='#n6013'>6013</a>
<a id='n6014' href='#n6014'>6014</a>
<a id='n6015' href='#n6015'>6015</a>
<a id='n6016' href='#n6016'>6016</a>
<a id='n6017' href='#n6017'>6017</a>
<a id='n6018' href='#n6018'>6018</a>
<a id='n6019' href='#n6019'>6019</a>
<a id='n6020' href='#n6020'>6020</a>
<a id='n6021' href='#n6021'>6021</a>
<a id='n6022' href='#n6022'>6022</a>
<a id='n6023' href='#n6023'>6023</a>
<a id='n6024' href='#n6024'>6024</a>
<a id='n6025' href='#n6025'>6025</a>
<a id='n6026' href='#n6026'>6026</a>
<a id='n6027' href='#n6027'>6027</a>
<a id='n6028' href='#n6028'>6028</a>
<a id='n6029' href='#n6029'>6029</a>
<a id='n6030' href='#n6030'>6030</a>
<a id='n6031' href='#n6031'>6031</a>
<a id='n6032' href='#n6032'>6032</a>
<a id='n6033' href='#n6033'>6033</a>
<a id='n6034' href='#n6034'>6034</a>
<a id='n6035' href='#n6035'>6035</a>
<a id='n6036' href='#n6036'>6036</a>
<a id='n6037' href='#n6037'>6037</a>
<a id='n6038' href='#n6038'>6038</a>
<a id='n6039' href='#n6039'>6039</a>
<a id='n6040' href='#n6040'>6040</a>
<a id='n6041' href='#n6041'>6041</a>
<a id='n6042' href='#n6042'>6042</a>
<a id='n6043' href='#n6043'>6043</a>
<a id='n6044' href='#n6044'>6044</a>
<a id='n6045' href='#n6045'>6045</a>
<a id='n6046' href='#n6046'>6046</a>
<a id='n6047' href='#n6047'>6047</a>
<a id='n6048' href='#n6048'>6048</a>
<a id='n6049' href='#n6049'>6049</a>
<a id='n6050' href='#n6050'>6050</a>
<a id='n6051' href='#n6051'>6051</a>
<a id='n6052' href='#n6052'>6052</a>
<a id='n6053' href='#n6053'>6053</a>
<a id='n6054' href='#n6054'>6054</a>
<a id='n6055' href='#n6055'>6055</a>
<a id='n6056' href='#n6056'>6056</a>
<a id='n6057' href='#n6057'>6057</a>
<a id='n6058' href='#n6058'>6058</a>
<a id='n6059' href='#n6059'>6059</a>
<a id='n6060' href='#n6060'>6060</a>
<a id='n6061' href='#n6061'>6061</a>
<a id='n6062' href='#n6062'>6062</a>
<a id='n6063' href='#n6063'>6063</a>
<a id='n6064' href='#n6064'>6064</a>
<a id='n6065' href='#n6065'>6065</a>
<a id='n6066' href='#n6066'>6066</a>
<a id='n6067' href='#n6067'>6067</a>
<a id='n6068' href='#n6068'>6068</a>
<a id='n6069' href='#n6069'>6069</a>
<a id='n6070' href='#n6070'>6070</a>
<a id='n6071' href='#n6071'>6071</a>
<a id='n6072' href='#n6072'>6072</a>
<a id='n6073' href='#n6073'>6073</a>
<a id='n6074' href='#n6074'>6074</a>
<a id='n6075' href='#n6075'>6075</a>
<a id='n6076' href='#n6076'>6076</a>
<a id='n6077' href='#n6077'>6077</a>
<a id='n6078' href='#n6078'>6078</a>
<a id='n6079' href='#n6079'>6079</a>
<a id='n6080' href='#n6080'>6080</a>
<a id='n6081' href='#n6081'>6081</a>
<a id='n6082' href='#n6082'>6082</a>
<a id='n6083' href='#n6083'>6083</a>
<a id='n6084' href='#n6084'>6084</a>
<a id='n6085' href='#n6085'>6085</a>
<a id='n6086' href='#n6086'>6086</a>
<a id='n6087' href='#n6087'>6087</a>
<a id='n6088' href='#n6088'>6088</a>
<a id='n6089' href='#n6089'>6089</a>
<a id='n6090' href='#n6090'>6090</a>
<a id='n6091' href='#n6091'>6091</a>
<a id='n6092' href='#n6092'>6092</a>
<a id='n6093' href='#n6093'>6093</a>
<a id='n6094' href='#n6094'>6094</a>
<a id='n6095' href='#n6095'>6095</a>
<a id='n6096' href='#n6096'>6096</a>
<a id='n6097' href='#n6097'>6097</a>
<a id='n6098' href='#n6098'>6098</a>
<a id='n6099' href='#n6099'>6099</a>
<a id='n6100' href='#n6100'>6100</a>
<a id='n6101' href='#n6101'>6101</a>
<a id='n6102' href='#n6102'>6102</a>
<a id='n6103' href='#n6103'>6103</a>
<a id='n6104' href='#n6104'>6104</a>
<a id='n6105' href='#n6105'>6105</a>
<a id='n6106' href='#n6106'>6106</a>
<a id='n6107' href='#n6107'>6107</a>
<a id='n6108' href='#n6108'>6108</a>
<a id='n6109' href='#n6109'>6109</a>
<a id='n6110' href='#n6110'>6110</a>
<a id='n6111' href='#n6111'>6111</a>
<a id='n6112' href='#n6112'>6112</a>
<a id='n6113' href='#n6113'>6113</a>
<a id='n6114' href='#n6114'>6114</a>
<a id='n6115' href='#n6115'>6115</a>
<a id='n6116' href='#n6116'>6116</a>
<a id='n6117' href='#n6117'>6117</a>
<a id='n6118' href='#n6118'>6118</a>
<a id='n6119' href='#n6119'>6119</a>
<a id='n6120' href='#n6120'>6120</a>
<a id='n6121' href='#n6121'>6121</a>
<a id='n6122' href='#n6122'>6122</a>
<a id='n6123' href='#n6123'>6123</a>
<a id='n6124' href='#n6124'>6124</a>
<a id='n6125' href='#n6125'>6125</a>
<a id='n6126' href='#n6126'>6126</a>
<a id='n6127' href='#n6127'>6127</a>
<a id='n6128' href='#n6128'>6128</a>
<a id='n6129' href='#n6129'>6129</a>
<a id='n6130' href='#n6130'>6130</a>
<a id='n6131' href='#n6131'>6131</a>
<a id='n6132' href='#n6132'>6132</a>
<a id='n6133' href='#n6133'>6133</a>
<a id='n6134' href='#n6134'>6134</a>
<a id='n6135' href='#n6135'>6135</a>
<a id='n6136' href='#n6136'>6136</a>
<a id='n6137' href='#n6137'>6137</a>
<a id='n6138' href='#n6138'>6138</a>
<a id='n6139' href='#n6139'>6139</a>
<a id='n6140' href='#n6140'>6140</a>
<a id='n6141' href='#n6141'>6141</a>
<a id='n6142' href='#n6142'>6142</a>
<a id='n6143' href='#n6143'>6143</a>
<a id='n6144' href='#n6144'>6144</a>
<a id='n6145' href='#n6145'>6145</a>
<a id='n6146' href='#n6146'>6146</a>
<a id='n6147' href='#n6147'>6147</a>
<a id='n6148' href='#n6148'>6148</a>
<a id='n6149' href='#n6149'>6149</a>
<a id='n6150' href='#n6150'>6150</a>
<a id='n6151' href='#n6151'>6151</a>
<a id='n6152' href='#n6152'>6152</a>
<a id='n6153' href='#n6153'>6153</a>
<a id='n6154' href='#n6154'>6154</a>
<a id='n6155' href='#n6155'>6155</a>
<a id='n6156' href='#n6156'>6156</a>
<a id='n6157' href='#n6157'>6157</a>
<a id='n6158' href='#n6158'>6158</a>
<a id='n6159' href='#n6159'>6159</a>
<a id='n6160' href='#n6160'>6160</a>
<a id='n6161' href='#n6161'>6161</a>
<a id='n6162' href='#n6162'>6162</a>
<a id='n6163' href='#n6163'>6163</a>
<a id='n6164' href='#n6164'>6164</a>
<a id='n6165' href='#n6165'>6165</a>
<a id='n6166' href='#n6166'>6166</a>
<a id='n6167' href='#n6167'>6167</a>
<a id='n6168' href='#n6168'>6168</a>
<a id='n6169' href='#n6169'>6169</a>
<a id='n6170' href='#n6170'>6170</a>
<a id='n6171' href='#n6171'>6171</a>
<a id='n6172' href='#n6172'>6172</a>
<a id='n6173' href='#n6173'>6173</a>
<a id='n6174' href='#n6174'>6174</a>
<a id='n6175' href='#n6175'>6175</a>
<a id='n6176' href='#n6176'>6176</a>
<a id='n6177' href='#n6177'>6177</a>
<a id='n6178' href='#n6178'>6178</a>
<a id='n6179' href='#n6179'>6179</a>
<a id='n6180' href='#n6180'>6180</a>
<a id='n6181' href='#n6181'>6181</a>
<a id='n6182' href='#n6182'>6182</a>
<a id='n6183' href='#n6183'>6183</a>
<a id='n6184' href='#n6184'>6184</a>
<a id='n6185' href='#n6185'>6185</a>
<a id='n6186' href='#n6186'>6186</a>
<a id='n6187' href='#n6187'>6187</a>
<a id='n6188' href='#n6188'>6188</a>
<a id='n6189' href='#n6189'>6189</a>
<a id='n6190' href='#n6190'>6190</a>
<a id='n6191' href='#n6191'>6191</a>
<a id='n6192' href='#n6192'>6192</a>
<a id='n6193' href='#n6193'>6193</a>
<a id='n6194' href='#n6194'>6194</a>
<a id='n6195' href='#n6195'>6195</a>
<a id='n6196' href='#n6196'>6196</a>
<a id='n6197' href='#n6197'>6197</a>
<a id='n6198' href='#n6198'>6198</a>
<a id='n6199' href='#n6199'>6199</a>
<a id='n6200' href='#n6200'>6200</a>
<a id='n6201' href='#n6201'>6201</a>
<a id='n6202' href='#n6202'>6202</a>
<a id='n6203' href='#n6203'>6203</a>
<a id='n6204' href='#n6204'>6204</a>
<a id='n6205' href='#n6205'>6205</a>
<a id='n6206' href='#n6206'>6206</a>
<a id='n6207' href='#n6207'>6207</a>
<a id='n6208' href='#n6208'>6208</a>
<a id='n6209' href='#n6209'>6209</a>
<a id='n6210' href='#n6210'>6210</a>
<a id='n6211' href='#n6211'>6211</a>
<a id='n6212' href='#n6212'>6212</a>
<a id='n6213' href='#n6213'>6213</a>
<a id='n6214' href='#n6214'>6214</a>
<a id='n6215' href='#n6215'>6215</a>
<a id='n6216' href='#n6216'>6216</a>
<a id='n6217' href='#n6217'>6217</a>
<a id='n6218' href='#n6218'>6218</a>
<a id='n6219' href='#n6219'>6219</a>
<a id='n6220' href='#n6220'>6220</a>
<a id='n6221' href='#n6221'>6221</a>
<a id='n6222' href='#n6222'>6222</a>
<a id='n6223' href='#n6223'>6223</a>
<a id='n6224' href='#n6224'>6224</a>
<a id='n6225' href='#n6225'>6225</a>
<a id='n6226' href='#n6226'>6226</a>
<a id='n6227' href='#n6227'>6227</a>
<a id='n6228' href='#n6228'>6228</a>
<a id='n6229' href='#n6229'>6229</a>
<a id='n6230' href='#n6230'>6230</a>
<a id='n6231' href='#n6231'>6231</a>
<a id='n6232' href='#n6232'>6232</a>
<a id='n6233' href='#n6233'>6233</a>
<a id='n6234' href='#n6234'>6234</a>
<a id='n6235' href='#n6235'>6235</a>
<a id='n6236' href='#n6236'>6236</a>
<a id='n6237' href='#n6237'>6237</a>
<a id='n6238' href='#n6238'>6238</a>
<a id='n6239' href='#n6239'>6239</a>
<a id='n6240' href='#n6240'>6240</a>
<a id='n6241' href='#n6241'>6241</a>
<a id='n6242' href='#n6242'>6242</a>
<a id='n6243' href='#n6243'>6243</a>
<a id='n6244' href='#n6244'>6244</a>
<a id='n6245' href='#n6245'>6245</a>
<a id='n6246' href='#n6246'>6246</a>
<a id='n6247' href='#n6247'>6247</a>
<a id='n6248' href='#n6248'>6248</a>
<a id='n6249' href='#n6249'>6249</a>
<a id='n6250' href='#n6250'>6250</a>
<a id='n6251' href='#n6251'>6251</a>
<a id='n6252' href='#n6252'>6252</a>
<a id='n6253' href='#n6253'>6253</a>
<a id='n6254' href='#n6254'>6254</a>
<a id='n6255' href='#n6255'>6255</a>
<a id='n6256' href='#n6256'>6256</a>
<a id='n6257' href='#n6257'>6257</a>
<a id='n6258' href='#n6258'>6258</a>
<a id='n6259' href='#n6259'>6259</a>
<a id='n6260' href='#n6260'>6260</a>
<a id='n6261' href='#n6261'>6261</a>
<a id='n6262' href='#n6262'>6262</a>
<a id='n6263' href='#n6263'>6263</a>
<a id='n6264' href='#n6264'>6264</a>
<a id='n6265' href='#n6265'>6265</a>
<a id='n6266' href='#n6266'>6266</a>
<a id='n6267' href='#n6267'>6267</a>
<a id='n6268' href='#n6268'>6268</a>
<a id='n6269' href='#n6269'>6269</a>
<a id='n6270' href='#n6270'>6270</a>
<a id='n6271' href='#n6271'>6271</a>
<a id='n6272' href='#n6272'>6272</a>
<a id='n6273' href='#n6273'>6273</a>
<a id='n6274' href='#n6274'>6274</a>
<a id='n6275' href='#n6275'>6275</a>
<a id='n6276' href='#n6276'>6276</a>
<a id='n6277' href='#n6277'>6277</a>
<a id='n6278' href='#n6278'>6278</a>
<a id='n6279' href='#n6279'>6279</a>
<a id='n6280' href='#n6280'>6280</a>
<a id='n6281' href='#n6281'>6281</a>
<a id='n6282' href='#n6282'>6282</a>
<a id='n6283' href='#n6283'>6283</a>
<a id='n6284' href='#n6284'>6284</a>
<a id='n6285' href='#n6285'>6285</a>
<a id='n6286' href='#n6286'>6286</a>
<a id='n6287' href='#n6287'>6287</a>
<a id='n6288' href='#n6288'>6288</a>
<a id='n6289' href='#n6289'>6289</a>
<a id='n6290' href='#n6290'>6290</a>
<a id='n6291' href='#n6291'>6291</a>
<a id='n6292' href='#n6292'>6292</a>
<a id='n6293' href='#n6293'>6293</a>
<a id='n6294' href='#n6294'>6294</a>
<a id='n6295' href='#n6295'>6295</a>
<a id='n6296' href='#n6296'>6296</a>
<a id='n6297' href='#n6297'>6297</a>
<a id='n6298' href='#n6298'>6298</a>
<a id='n6299' href='#n6299'>6299</a>
<a id='n6300' href='#n6300'>6300</a>
<a id='n6301' href='#n6301'>6301</a>
<a id='n6302' href='#n6302'>6302</a>
<a id='n6303' href='#n6303'>6303</a>
<a id='n6304' href='#n6304'>6304</a>
<a id='n6305' href='#n6305'>6305</a>
<a id='n6306' href='#n6306'>6306</a>
<a id='n6307' href='#n6307'>6307</a>
<a id='n6308' href='#n6308'>6308</a>
<a id='n6309' href='#n6309'>6309</a>
<a id='n6310' href='#n6310'>6310</a>
<a id='n6311' href='#n6311'>6311</a>
<a id='n6312' href='#n6312'>6312</a>
<a id='n6313' href='#n6313'>6313</a>
<a id='n6314' href='#n6314'>6314</a>
<a id='n6315' href='#n6315'>6315</a>
<a id='n6316' href='#n6316'>6316</a>
<a id='n6317' href='#n6317'>6317</a>
<a id='n6318' href='#n6318'>6318</a>
<a id='n6319' href='#n6319'>6319</a>
<a id='n6320' href='#n6320'>6320</a>
<a id='n6321' href='#n6321'>6321</a>
<a id='n6322' href='#n6322'>6322</a>
<a id='n6323' href='#n6323'>6323</a>
<a id='n6324' href='#n6324'>6324</a>
<a id='n6325' href='#n6325'>6325</a>
<a id='n6326' href='#n6326'>6326</a>
<a id='n6327' href='#n6327'>6327</a>
<a id='n6328' href='#n6328'>6328</a>
<a id='n6329' href='#n6329'>6329</a>
<a id='n6330' href='#n6330'>6330</a>
<a id='n6331' href='#n6331'>6331</a>
<a id='n6332' href='#n6332'>6332</a>
<a id='n6333' href='#n6333'>6333</a>
<a id='n6334' href='#n6334'>6334</a>
<a id='n6335' href='#n6335'>6335</a>
<a id='n6336' href='#n6336'>6336</a>
<a id='n6337' href='#n6337'>6337</a>
<a id='n6338' href='#n6338'>6338</a>
<a id='n6339' href='#n6339'>6339</a>
<a id='n6340' href='#n6340'>6340</a>
<a id='n6341' href='#n6341'>6341</a>
<a id='n6342' href='#n6342'>6342</a>
<a id='n6343' href='#n6343'>6343</a>
<a id='n6344' href='#n6344'>6344</a>
<a id='n6345' href='#n6345'>6345</a>
<a id='n6346' href='#n6346'>6346</a>
<a id='n6347' href='#n6347'>6347</a>
<a id='n6348' href='#n6348'>6348</a>
<a id='n6349' href='#n6349'>6349</a>
<a id='n6350' href='#n6350'>6350</a>
<a id='n6351' href='#n6351'>6351</a>
<a id='n6352' href='#n6352'>6352</a>
<a id='n6353' href='#n6353'>6353</a>
<a id='n6354' href='#n6354'>6354</a>
<a id='n6355' href='#n6355'>6355</a>
<a id='n6356' href='#n6356'>6356</a>
<a id='n6357' href='#n6357'>6357</a>
<a id='n6358' href='#n6358'>6358</a>
<a id='n6359' href='#n6359'>6359</a>
<a id='n6360' href='#n6360'>6360</a>
<a id='n6361' href='#n6361'>6361</a>
<a id='n6362' href='#n6362'>6362</a>
<a id='n6363' href='#n6363'>6363</a>
<a id='n6364' href='#n6364'>6364</a>
<a id='n6365' href='#n6365'>6365</a>
<a id='n6366' href='#n6366'>6366</a>
<a id='n6367' href='#n6367'>6367</a>
<a id='n6368' href='#n6368'>6368</a>
<a id='n6369' href='#n6369'>6369</a>
<a id='n6370' href='#n6370'>6370</a>
<a id='n6371' href='#n6371'>6371</a>
<a id='n6372' href='#n6372'>6372</a>
<a id='n6373' href='#n6373'>6373</a>
<a id='n6374' href='#n6374'>6374</a>
<a id='n6375' href='#n6375'>6375</a>
<a id='n6376' href='#n6376'>6376</a>
<a id='n6377' href='#n6377'>6377</a>
<a id='n6378' href='#n6378'>6378</a>
<a id='n6379' href='#n6379'>6379</a>
<a id='n6380' href='#n6380'>6380</a>
<a id='n6381' href='#n6381'>6381</a>
<a id='n6382' href='#n6382'>6382</a>
<a id='n6383' href='#n6383'>6383</a>
<a id='n6384' href='#n6384'>6384</a>
<a id='n6385' href='#n6385'>6385</a>
<a id='n6386' href='#n6386'>6386</a>
<a id='n6387' href='#n6387'>6387</a>
<a id='n6388' href='#n6388'>6388</a>
<a id='n6389' href='#n6389'>6389</a>
<a id='n6390' href='#n6390'>6390</a>
<a id='n6391' href='#n6391'>6391</a>
<a id='n6392' href='#n6392'>6392</a>
<a id='n6393' href='#n6393'>6393</a>
<a id='n6394' href='#n6394'>6394</a>
<a id='n6395' href='#n6395'>6395</a>
<a id='n6396' href='#n6396'>6396</a>
<a id='n6397' href='#n6397'>6397</a>
<a id='n6398' href='#n6398'>6398</a>
<a id='n6399' href='#n6399'>6399</a>
<a id='n6400' href='#n6400'>6400</a>
<a id='n6401' href='#n6401'>6401</a>
<a id='n6402' href='#n6402'>6402</a>
<a id='n6403' href='#n6403'>6403</a>
<a id='n6404' href='#n6404'>6404</a>
<a id='n6405' href='#n6405'>6405</a>
<a id='n6406' href='#n6406'>6406</a>
<a id='n6407' href='#n6407'>6407</a>
<a id='n6408' href='#n6408'>6408</a>
<a id='n6409' href='#n6409'>6409</a>
<a id='n6410' href='#n6410'>6410</a>
<a id='n6411' href='#n6411'>6411</a>
<a id='n6412' href='#n6412'>6412</a>
<a id='n6413' href='#n6413'>6413</a>
<a id='n6414' href='#n6414'>6414</a>
<a id='n6415' href='#n6415'>6415</a>
<a id='n6416' href='#n6416'>6416</a>
<a id='n6417' href='#n6417'>6417</a>
<a id='n6418' href='#n6418'>6418</a>
<a id='n6419' href='#n6419'>6419</a>
<a id='n6420' href='#n6420'>6420</a>
<a id='n6421' href='#n6421'>6421</a>
<a id='n6422' href='#n6422'>6422</a>
<a id='n6423' href='#n6423'>6423</a>
<a id='n6424' href='#n6424'>6424</a>
<a id='n6425' href='#n6425'>6425</a>
<a id='n6426' href='#n6426'>6426</a>
<a id='n6427' href='#n6427'>6427</a>
<a id='n6428' href='#n6428'>6428</a>
<a id='n6429' href='#n6429'>6429</a>
<a id='n6430' href='#n6430'>6430</a>
<a id='n6431' href='#n6431'>6431</a>
<a id='n6432' href='#n6432'>6432</a>
<a id='n6433' href='#n6433'>6433</a>
<a id='n6434' href='#n6434'>6434</a>
<a id='n6435' href='#n6435'>6435</a>
<a id='n6436' href='#n6436'>6436</a>
<a id='n6437' href='#n6437'>6437</a>
<a id='n6438' href='#n6438'>6438</a>
<a id='n6439' href='#n6439'>6439</a>
<a id='n6440' href='#n6440'>6440</a>
<a id='n6441' href='#n6441'>6441</a>
<a id='n6442' href='#n6442'>6442</a>
<a id='n6443' href='#n6443'>6443</a>
<a id='n6444' href='#n6444'>6444</a>
<a id='n6445' href='#n6445'>6445</a>
<a id='n6446' href='#n6446'>6446</a>
<a id='n6447' href='#n6447'>6447</a>
<a id='n6448' href='#n6448'>6448</a>
<a id='n6449' href='#n6449'>6449</a>
<a id='n6450' href='#n6450'>6450</a>
<a id='n6451' href='#n6451'>6451</a>
<a id='n6452' href='#n6452'>6452</a>
<a id='n6453' href='#n6453'>6453</a>
<a id='n6454' href='#n6454'>6454</a>
<a id='n6455' href='#n6455'>6455</a>
<a id='n6456' href='#n6456'>6456</a>
<a id='n6457' href='#n6457'>6457</a>
<a id='n6458' href='#n6458'>6458</a>
<a id='n6459' href='#n6459'>6459</a>
<a id='n6460' href='#n6460'>6460</a>
<a id='n6461' href='#n6461'>6461</a>
<a id='n6462' href='#n6462'>6462</a>
<a id='n6463' href='#n6463'>6463</a>
<a id='n6464' href='#n6464'>6464</a>
<a id='n6465' href='#n6465'>6465</a>
<a id='n6466' href='#n6466'>6466</a>
<a id='n6467' href='#n6467'>6467</a>
<a id='n6468' href='#n6468'>6468</a>
<a id='n6469' href='#n6469'>6469</a>
<a id='n6470' href='#n6470'>6470</a>
<a id='n6471' href='#n6471'>6471</a>
<a id='n6472' href='#n6472'>6472</a>
<a id='n6473' href='#n6473'>6473</a>
<a id='n6474' href='#n6474'>6474</a>
<a id='n6475' href='#n6475'>6475</a>
<a id='n6476' href='#n6476'>6476</a>
<a id='n6477' href='#n6477'>6477</a>
<a id='n6478' href='#n6478'>6478</a>
<a id='n6479' href='#n6479'>6479</a>
<a id='n6480' href='#n6480'>6480</a>
<a id='n6481' href='#n6481'>6481</a>
<a id='n6482' href='#n6482'>6482</a>
<a id='n6483' href='#n6483'>6483</a>
<a id='n6484' href='#n6484'>6484</a>
<a id='n6485' href='#n6485'>6485</a>
<a id='n6486' href='#n6486'>6486</a>
<a id='n6487' href='#n6487'>6487</a>
<a id='n6488' href='#n6488'>6488</a>
<a id='n6489' href='#n6489'>6489</a>
<a id='n6490' href='#n6490'>6490</a>
<a id='n6491' href='#n6491'>6491</a>
<a id='n6492' href='#n6492'>6492</a>
<a id='n6493' href='#n6493'>6493</a>
<a id='n6494' href='#n6494'>6494</a>
<a id='n6495' href='#n6495'>6495</a>
<a id='n6496' href='#n6496'>6496</a>
<a id='n6497' href='#n6497'>6497</a>
<a id='n6498' href='#n6498'>6498</a>
<a id='n6499' href='#n6499'>6499</a>
<a id='n6500' href='#n6500'>6500</a>
<a id='n6501' href='#n6501'>6501</a>
<a id='n6502' href='#n6502'>6502</a>
<a id='n6503' href='#n6503'>6503</a>
<a id='n6504' href='#n6504'>6504</a>
<a id='n6505' href='#n6505'>6505</a>
<a id='n6506' href='#n6506'>6506</a>
<a id='n6507' href='#n6507'>6507</a>
<a id='n6508' href='#n6508'>6508</a>
<a id='n6509' href='#n6509'>6509</a>
<a id='n6510' href='#n6510'>6510</a>
<a id='n6511' href='#n6511'>6511</a>
<a id='n6512' href='#n6512'>6512</a>
<a id='n6513' href='#n6513'>6513</a>
<a id='n6514' href='#n6514'>6514</a>
<a id='n6515' href='#n6515'>6515</a>
<a id='n6516' href='#n6516'>6516</a>
<a id='n6517' href='#n6517'>6517</a>
<a id='n6518' href='#n6518'>6518</a>
<a id='n6519' href='#n6519'>6519</a>
<a id='n6520' href='#n6520'>6520</a>
<a id='n6521' href='#n6521'>6521</a>
<a id='n6522' href='#n6522'>6522</a>
<a id='n6523' href='#n6523'>6523</a>
<a id='n6524' href='#n6524'>6524</a>
<a id='n6525' href='#n6525'>6525</a>
<a id='n6526' href='#n6526'>6526</a>
<a id='n6527' href='#n6527'>6527</a>
<a id='n6528' href='#n6528'>6528</a>
<a id='n6529' href='#n6529'>6529</a>
<a id='n6530' href='#n6530'>6530</a>
<a id='n6531' href='#n6531'>6531</a>
<a id='n6532' href='#n6532'>6532</a>
<a id='n6533' href='#n6533'>6533</a>
<a id='n6534' href='#n6534'>6534</a>
<a id='n6535' href='#n6535'>6535</a>
<a id='n6536' href='#n6536'>6536</a>
<a id='n6537' href='#n6537'>6537</a>
<a id='n6538' href='#n6538'>6538</a>
<a id='n6539' href='#n6539'>6539</a>
<a id='n6540' href='#n6540'>6540</a>
<a id='n6541' href='#n6541'>6541</a>
<a id='n6542' href='#n6542'>6542</a>
<a id='n6543' href='#n6543'>6543</a>
<a id='n6544' href='#n6544'>6544</a>
<a id='n6545' href='#n6545'>6545</a>
<a id='n6546' href='#n6546'>6546</a>
<a id='n6547' href='#n6547'>6547</a>
<a id='n6548' href='#n6548'>6548</a>
<a id='n6549' href='#n6549'>6549</a>
<a id='n6550' href='#n6550'>6550</a>
<a id='n6551' href='#n6551'>6551</a>
<a id='n6552' href='#n6552'>6552</a>
<a id='n6553' href='#n6553'>6553</a>
<a id='n6554' href='#n6554'>6554</a>
<a id='n6555' href='#n6555'>6555</a>
<a id='n6556' href='#n6556'>6556</a>
<a id='n6557' href='#n6557'>6557</a>
<a id='n6558' href='#n6558'>6558</a>
<a id='n6559' href='#n6559'>6559</a>
<a id='n6560' href='#n6560'>6560</a>
<a id='n6561' href='#n6561'>6561</a>
<a id='n6562' href='#n6562'>6562</a>
<a id='n6563' href='#n6563'>6563</a>
<a id='n6564' href='#n6564'>6564</a>
<a id='n6565' href='#n6565'>6565</a>
<a id='n6566' href='#n6566'>6566</a>
<a id='n6567' href='#n6567'>6567</a>
<a id='n6568' href='#n6568'>6568</a>
<a id='n6569' href='#n6569'>6569</a>
<a id='n6570' href='#n6570'>6570</a>
<a id='n6571' href='#n6571'>6571</a>
<a id='n6572' href='#n6572'>6572</a>
<a id='n6573' href='#n6573'>6573</a>
<a id='n6574' href='#n6574'>6574</a>
<a id='n6575' href='#n6575'>6575</a>
<a id='n6576' href='#n6576'>6576</a>
<a id='n6577' href='#n6577'>6577</a>
<a id='n6578' href='#n6578'>6578</a>
<a id='n6579' href='#n6579'>6579</a>
<a id='n6580' href='#n6580'>6580</a>
<a id='n6581' href='#n6581'>6581</a>
<a id='n6582' href='#n6582'>6582</a>
<a id='n6583' href='#n6583'>6583</a>
<a id='n6584' href='#n6584'>6584</a>
<a id='n6585' href='#n6585'>6585</a>
<a id='n6586' href='#n6586'>6586</a>
<a id='n6587' href='#n6587'>6587</a>
<a id='n6588' href='#n6588'>6588</a>
<a id='n6589' href='#n6589'>6589</a>
<a id='n6590' href='#n6590'>6590</a>
<a id='n6591' href='#n6591'>6591</a>
<a id='n6592' href='#n6592'>6592</a>
<a id='n6593' href='#n6593'>6593</a>
<a id='n6594' href='#n6594'>6594</a>
<a id='n6595' href='#n6595'>6595</a>
<a id='n6596' href='#n6596'>6596</a>
<a id='n6597' href='#n6597'>6597</a>
<a id='n6598' href='#n6598'>6598</a>
<a id='n6599' href='#n6599'>6599</a>
<a id='n6600' href='#n6600'>6600</a>
<a id='n6601' href='#n6601'>6601</a>
<a id='n6602' href='#n6602'>6602</a>
<a id='n6603' href='#n6603'>6603</a>
<a id='n6604' href='#n6604'>6604</a>
<a id='n6605' href='#n6605'>6605</a>
<a id='n6606' href='#n6606'>6606</a>
<a id='n6607' href='#n6607'>6607</a>
<a id='n6608' href='#n6608'>6608</a>
<a id='n6609' href='#n6609'>6609</a>
<a id='n6610' href='#n6610'>6610</a>
<a id='n6611' href='#n6611'>6611</a>
<a id='n6612' href='#n6612'>6612</a>
<a id='n6613' href='#n6613'>6613</a>
<a id='n6614' href='#n6614'>6614</a>
<a id='n6615' href='#n6615'>6615</a>
<a id='n6616' href='#n6616'>6616</a>
<a id='n6617' href='#n6617'>6617</a>
<a id='n6618' href='#n6618'>6618</a>
<a id='n6619' href='#n6619'>6619</a>
<a id='n6620' href='#n6620'>6620</a>
<a id='n6621' href='#n6621'>6621</a>
<a id='n6622' href='#n6622'>6622</a>
<a id='n6623' href='#n6623'>6623</a>
<a id='n6624' href='#n6624'>6624</a>
<a id='n6625' href='#n6625'>6625</a>
<a id='n6626' href='#n6626'>6626</a>
<a id='n6627' href='#n6627'>6627</a>
<a id='n6628' href='#n6628'>6628</a>
<a id='n6629' href='#n6629'>6629</a>
<a id='n6630' href='#n6630'>6630</a>
<a id='n6631' href='#n6631'>6631</a>
<a id='n6632' href='#n6632'>6632</a>
<a id='n6633' href='#n6633'>6633</a>
<a id='n6634' href='#n6634'>6634</a>
<a id='n6635' href='#n6635'>6635</a>
<a id='n6636' href='#n6636'>6636</a>
<a id='n6637' href='#n6637'>6637</a>
<a id='n6638' href='#n6638'>6638</a>
<a id='n6639' href='#n6639'>6639</a>
<a id='n6640' href='#n6640'>6640</a>
<a id='n6641' href='#n6641'>6641</a>
<a id='n6642' href='#n6642'>6642</a>
<a id='n6643' href='#n6643'>6643</a>
<a id='n6644' href='#n6644'>6644</a>
<a id='n6645' href='#n6645'>6645</a>
<a id='n6646' href='#n6646'>6646</a>
<a id='n6647' href='#n6647'>6647</a>
<a id='n6648' href='#n6648'>6648</a>
<a id='n6649' href='#n6649'>6649</a>
<a id='n6650' href='#n6650'>6650</a>
<a id='n6651' href='#n6651'>6651</a>
<a id='n6652' href='#n6652'>6652</a>
<a id='n6653' href='#n6653'>6653</a>
<a id='n6654' href='#n6654'>6654</a>
<a id='n6655' href='#n6655'>6655</a>
<a id='n6656' href='#n6656'>6656</a>
<a id='n6657' href='#n6657'>6657</a>
<a id='n6658' href='#n6658'>6658</a>
<a id='n6659' href='#n6659'>6659</a>
<a id='n6660' href='#n6660'>6660</a>
<a id='n6661' href='#n6661'>6661</a>
<a id='n6662' href='#n6662'>6662</a>
<a id='n6663' href='#n6663'>6663</a>
<a id='n6664' href='#n6664'>6664</a>
<a id='n6665' href='#n6665'>6665</a>
<a id='n6666' href='#n6666'>6666</a>
<a id='n6667' href='#n6667'>6667</a>
<a id='n6668' href='#n6668'>6668</a>
<a id='n6669' href='#n6669'>6669</a>
<a id='n6670' href='#n6670'>6670</a>
<a id='n6671' href='#n6671'>6671</a>
<a id='n6672' href='#n6672'>6672</a>
<a id='n6673' href='#n6673'>6673</a>
<a id='n6674' href='#n6674'>6674</a>
<a id='n6675' href='#n6675'>6675</a>
<a id='n6676' href='#n6676'>6676</a>
<a id='n6677' href='#n6677'>6677</a>
<a id='n6678' href='#n6678'>6678</a>
<a id='n6679' href='#n6679'>6679</a>
<a id='n6680' href='#n6680'>6680</a>
<a id='n6681' href='#n6681'>6681</a>
<a id='n6682' href='#n6682'>6682</a>
<a id='n6683' href='#n6683'>6683</a>
<a id='n6684' href='#n6684'>6684</a>
<a id='n6685' href='#n6685'>6685</a>
<a id='n6686' href='#n6686'>6686</a>
<a id='n6687' href='#n6687'>6687</a>
<a id='n6688' href='#n6688'>6688</a>
<a id='n6689' href='#n6689'>6689</a>
<a id='n6690' href='#n6690'>6690</a>
<a id='n6691' href='#n6691'>6691</a>
<a id='n6692' href='#n6692'>6692</a>
<a id='n6693' href='#n6693'>6693</a>
<a id='n6694' href='#n6694'>6694</a>
<a id='n6695' href='#n6695'>6695</a>
<a id='n6696' href='#n6696'>6696</a>
<a id='n6697' href='#n6697'>6697</a>
<a id='n6698' href='#n6698'>6698</a>
<a id='n6699' href='#n6699'>6699</a>
<a id='n6700' href='#n6700'>6700</a>
<a id='n6701' href='#n6701'>6701</a>
<a id='n6702' href='#n6702'>6702</a>
<a id='n6703' href='#n6703'>6703</a>
<a id='n6704' href='#n6704'>6704</a>
<a id='n6705' href='#n6705'>6705</a>
<a id='n6706' href='#n6706'>6706</a>
<a id='n6707' href='#n6707'>6707</a>
<a id='n6708' href='#n6708'>6708</a>
<a id='n6709' href='#n6709'>6709</a>
<a id='n6710' href='#n6710'>6710</a>
<a id='n6711' href='#n6711'>6711</a>
<a id='n6712' href='#n6712'>6712</a>
<a id='n6713' href='#n6713'>6713</a>
<a id='n6714' href='#n6714'>6714</a>
<a id='n6715' href='#n6715'>6715</a>
<a id='n6716' href='#n6716'>6716</a>
<a id='n6717' href='#n6717'>6717</a>
<a id='n6718' href='#n6718'>6718</a>
<a id='n6719' href='#n6719'>6719</a>
<a id='n6720' href='#n6720'>6720</a>
<a id='n6721' href='#n6721'>6721</a>
<a id='n6722' href='#n6722'>6722</a>
<a id='n6723' href='#n6723'>6723</a>
<a id='n6724' href='#n6724'>6724</a>
<a id='n6725' href='#n6725'>6725</a>
<a id='n6726' href='#n6726'>6726</a>
<a id='n6727' href='#n6727'>6727</a>
<a id='n6728' href='#n6728'>6728</a>
<a id='n6729' href='#n6729'>6729</a>
<a id='n6730' href='#n6730'>6730</a>
<a id='n6731' href='#n6731'>6731</a>
<a id='n6732' href='#n6732'>6732</a>
<a id='n6733' href='#n6733'>6733</a>
<a id='n6734' href='#n6734'>6734</a>
<a id='n6735' href='#n6735'>6735</a>
<a id='n6736' href='#n6736'>6736</a>
<a id='n6737' href='#n6737'>6737</a>
<a id='n6738' href='#n6738'>6738</a>
<a id='n6739' href='#n6739'>6739</a>
<a id='n6740' href='#n6740'>6740</a>
<a id='n6741' href='#n6741'>6741</a>
<a id='n6742' href='#n6742'>6742</a>
<a id='n6743' href='#n6743'>6743</a>
<a id='n6744' href='#n6744'>6744</a>
<a id='n6745' href='#n6745'>6745</a>
<a id='n6746' href='#n6746'>6746</a>
<a id='n6747' href='#n6747'>6747</a>
<a id='n6748' href='#n6748'>6748</a>
<a id='n6749' href='#n6749'>6749</a>
<a id='n6750' href='#n6750'>6750</a>
<a id='n6751' href='#n6751'>6751</a>
<a id='n6752' href='#n6752'>6752</a>
<a id='n6753' href='#n6753'>6753</a>
<a id='n6754' href='#n6754'>6754</a>
<a id='n6755' href='#n6755'>6755</a>
<a id='n6756' href='#n6756'>6756</a>
</pre></td>
<td class='lines'><pre><code><span class="hl com">/*</span>
<span class="hl com"> * BSD 3-Clause License</span>
<span class="hl com"> *</span>
<span class="hl com"> * Copyright (c) 2005-2008, Jelmer Vernooij &lt;jelmer&#64;samba.org&gt;</span>
<span class="hl com"> * Copyright (c) 2006-2018, Stefan Metzmacher &lt;metze&#64;samba.org&gt;</span>
<span class="hl com"> * Copyright (c) 2013-2018, Andreas Schneider &lt;asn&#64;samba.org&gt;</span>
<span class="hl com"> * Copyright (c) 2014-2017, Michael Adam &lt;obnox&#64;samba.org&gt;</span>
<span class="hl com"> * Copyright (c) 2016-2018, Anoop C S &lt;anoopcs&#64;redhat.com&gt;</span>
<span class="hl com"> * All rights reserved.</span>
<span class="hl com"> *</span>
<span class="hl com"> * Redistribution and use in source and binary forms, with or without</span>
<span class="hl com"> * modification, are permitted provided that the following conditions</span>
<span class="hl com"> * are met:</span>
<span class="hl com"> *</span>
<span class="hl com"> * 1. Redistributions of source code must retain the above copyright</span>
<span class="hl com"> *    notice, this list of conditions and the following disclaimer.</span>
<span class="hl com"> *</span>
<span class="hl com"> * 2. Redistributions in binary form must reproduce the above copyright</span>
<span class="hl com"> *    notice, this list of conditions and the following disclaimer in the</span>
<span class="hl com"> *    documentation and/or other materials provided with the distribution.</span>
<span class="hl com"> *</span>
<span class="hl com"> * 3. Neither the name of the author nor the names of its contributors</span>
<span class="hl com"> *    may be used to endorse or promote products derived from this software</span>
<span class="hl com"> *    without specific prior written permission.</span>
<span class="hl com"> *</span>
<span class="hl com"> * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS&#39;&#39; AND</span>
<span class="hl com"> * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE</span>
<span class="hl com"> * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE</span>
<span class="hl com"> * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE</span>
<span class="hl com"> * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL</span>
<span class="hl com"> * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS</span>
<span class="hl com"> * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)</span>
<span class="hl com"> * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT</span>
<span class="hl com"> * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY</span>
<span class="hl com"> * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF</span>
<span class="hl com"> * SUCH DAMAGE.</span>
<span class="hl com"> */</span>

<span class="hl com">/*</span>
<span class="hl com">   Socket wrapper library. Passes all socket communication over</span>
<span class="hl com">   unix domain sockets if the environment variable SOCKET_WRAPPER_DIR</span>
<span class="hl com">   is set.</span>
<span class="hl com">*/</span>

<span class="hl ppc">#include</span> <span class="hl pps">&quot;config.h&quot;</span><span class="hl ppc"></span>

<span class="hl ppc">#include &lt;sys/types.h&gt;</span>
<span class="hl ppc">#include &lt;sys/time.h&gt;</span>
<span class="hl ppc">#include &lt;sys/stat.h&gt;</span>
<span class="hl ppc">#include &lt;sys/socket.h&gt;</span>
<span class="hl ppc">#include &lt;sys/ioctl.h&gt;</span>
<span class="hl ppc">#ifdef HAVE_SYS_FILIO_H</span>
<span class="hl ppc">#include &lt;sys/filio.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_SYS_SIGNALFD_H</span>
<span class="hl ppc">#include &lt;sys/signalfd.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_SYS_EVENTFD_H</span>
<span class="hl ppc">#include &lt;sys/eventfd.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_SYS_TIMERFD_H</span>
<span class="hl ppc">#include &lt;sys/timerfd.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#include &lt;sys/uio.h&gt;</span>
<span class="hl ppc">#include &lt;errno.h&gt;</span>
<span class="hl ppc">#include &lt;sys/un.h&gt;</span>
<span class="hl ppc">#include &lt;netinet/in.h&gt;</span>
<span class="hl ppc">#include &lt;netinet/tcp.h&gt;</span>
<span class="hl ppc">#ifdef HAVE_NETINET_TCP_FSM_H</span>
<span class="hl ppc">#include &lt;netinet/tcp_fsm.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#include &lt;arpa/inet.h&gt;</span>
<span class="hl ppc">#include &lt;fcntl.h&gt;</span>
<span class="hl ppc">#include &lt;stdlib.h&gt;</span>
<span class="hl ppc">#include &lt;string.h&gt;</span>
<span class="hl ppc">#include &lt;stdio.h&gt;</span>
<span class="hl ppc">#include &lt;stdint.h&gt;</span>
<span class="hl ppc">#include &lt;stdarg.h&gt;</span>
<span class="hl ppc">#include &lt;stdbool.h&gt;</span>
<span class="hl ppc">#include &lt;unistd.h&gt;</span>
<span class="hl ppc">#ifdef HAVE_GNU_LIB_NAMES_H</span>
<span class="hl ppc">#include &lt;gnu/lib-names.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_RPC_RPC_H</span>
<span class="hl ppc">#include &lt;rpc/rpc.h&gt;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#include &lt;pthread.h&gt;</span>

<span class="hl kwb">enum</span> swrap_dbglvl_e <span class="hl opt">{</span>
	SWRAP_LOG_ERROR <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">,</span>
	SWRAP_LOG_WARN<span class="hl opt">,</span>
	SWRAP_LOG_DEBUG<span class="hl opt">,</span>
	SWRAP_LOG_TRACE
<span class="hl opt">};</span>

<span class="hl com">/* GCC have printf type attribute check. */</span>
<span class="hl ppc">#ifdef HAVE_FUNCTION_ATTRIBUTE_FORMAT</span>
<span class="hl ppc">#define PRINTF_ATTRIBUTE(a,b) __attribute__ ((__format__ (__printf__, a, b)))</span>
<span class="hl ppc">#else</span>
<span class="hl ppc">#define PRINTF_ATTRIBUTE(a,b)</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_FUNCTION_ATTRIBUTE_FORMAT */</span><span class="hl ppc"></span>

<span class="hl ppc">#ifdef HAVE_CONSTRUCTOR_ATTRIBUTE</span>
<span class="hl ppc">#define CONSTRUCTOR_ATTRIBUTE __attribute__ ((constructor))</span>
<span class="hl ppc">#else</span>
<span class="hl ppc">#define CONSTRUCTOR_ATTRIBUTE</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_CONSTRUCTOR_ATTRIBUTE */</span><span class="hl ppc"></span>

<span class="hl ppc">#ifdef HAVE_DESTRUCTOR_ATTRIBUTE</span>
<span class="hl ppc">#define DESTRUCTOR_ATTRIBUTE __attribute__ ((destructor))</span>
<span class="hl ppc">#else</span>
<span class="hl ppc">#define DESTRUCTOR_ATTRIBUTE</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef FALL_THROUGH</span>
<span class="hl ppc"># ifdef HAVE_FALLTHROUGH_ATTRIBUTE</span>
<span class="hl ppc">#  define FALL_THROUGH __attribute__ ((fallthrough))</span>
<span class="hl ppc"># else</span> <span class="hl com">/* HAVE_FALLTHROUGH_ATTRIBUTE */</span><span class="hl ppc"></span>
<span class="hl ppc">#  define FALL_THROUGH ((void)0)</span>
<span class="hl ppc"># endif</span> <span class="hl com">/* HAVE_FALLTHROUGH_ATTRIBUTE */</span><span class="hl ppc"></span>
<span class="hl ppc">#endif</span> <span class="hl com">/* FALL_THROUGH */</span><span class="hl ppc"></span>

<span class="hl ppc">#ifdef HAVE_ADDRESS_SANITIZER_ATTRIBUTE</span>
<span class="hl ppc">#define DO_NOT_SANITIZE_ADDRESS_ATTRIBUTE __attribute__((no_sanitize_address))</span>
<span class="hl ppc">#else</span>
<span class="hl ppc">#define DO_NOT_SANITIZE_ADDRESS_ATTRIBUTE</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifdef HAVE_GCC_THREAD_LOCAL_STORAGE</span>
<span class="hl ppc"># define SWRAP_THREAD __thread</span>
<span class="hl ppc">#else</span>
<span class="hl ppc"># define SWRAP_THREAD</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef MIN</span>
<span class="hl ppc">#define MIN(a,b) ((a)&lt;(b)?(a):(b))</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef ZERO_STRUCT</span>
<span class="hl ppc">#define ZERO_STRUCT(x) memset((char *)&amp;(x), 0, sizeof(x))</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef ZERO_STRUCTP</span>
<span class="hl ppc">#define ZERO_STRUCTP(x) do { \</span>
<span class="hl ppc">		if ((x) != NULL) \</span>
<span class="hl ppc">			memset((char *)(x), 0, sizeof(*(x))); \</span>
<span class="hl ppc">	} while(0)</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef SAFE_FREE</span>
<span class="hl ppc">#define SAFE_FREE(x) do { if ((x) != NULL) {free(x); (x)=NULL;} } while(0)</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef discard_const</span>
<span class="hl ppc">#define discard_const(ptr) ((void *)((uintptr_t)(ptr)))</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifndef discard_const_p</span>
<span class="hl ppc">#define discard_const_p(type, ptr) ((type *)discard_const(ptr))</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#define UNUSED(x) (void)(x)</span>

<span class="hl ppc">#ifdef IPV6_PKTINFO</span>
<span class="hl ppc"># ifndef IPV6_RECVPKTINFO</span>
<span class="hl ppc">#  define IPV6_RECVPKTINFO IPV6_PKTINFO</span>
<span class="hl ppc"># endif</span> <span class="hl com">/* IPV6_RECVPKTINFO */</span><span class="hl ppc"></span>
<span class="hl ppc">#endif</span> <span class="hl com">/* IPV6_PKTINFO */</span><span class="hl ppc"></span>

<span class="hl com">/*</span>
<span class="hl com"> * On BSD IP_PKTINFO has a different name because during</span>
<span class="hl com"> * the time when they implemented it, there was no RFC.</span>
<span class="hl com"> * The name for IPv6 is the same as on Linux.</span>
<span class="hl com"> */</span>
<span class="hl ppc">#ifndef IP_PKTINFO</span>
<span class="hl ppc"># ifdef IP_RECVDSTADDR</span>
<span class="hl ppc">#  define IP_PKTINFO IP_RECVDSTADDR</span>
<span class="hl ppc"># endif</span>
<span class="hl ppc">#endif</span>

<span class="hl com">/* Add new global locks here please */</span>
<span class="hl ppc"># define SWRAP_LOCK_ALL \</span>
<span class="hl ppc">	swrap_mutex_lock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc"></span>
<span class="hl ppc"># define SWRAP_UNLOCK_ALL \</span>
<span class="hl ppc">	swrap_mutex_unlock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc"></span>
<span class="hl ppc">#define SOCKET_INFO_CONTAINER(si) \</span>
<span class="hl ppc">	(struct socket_info_container *)(si)</span>

<span class="hl ppc">#define SWRAP_LOCK_SI(si) do { \</span>
<span class="hl ppc">	struct socket_info_container *sic = SOCKET_INFO_CONTAINER(si); \</span>
<span class="hl ppc">	swrap_mutex_lock(&amp;sic-&gt;meta.mutex); \</span>
<span class="hl ppc">} while(0)</span>

<span class="hl ppc">#define SWRAP_UNLOCK_SI(si) do { \</span>
<span class="hl ppc">	struct socket_info_container *sic = SOCKET_INFO_CONTAINER(si); \</span>
<span class="hl ppc">	swrap_mutex_unlock(&amp;sic-&gt;meta.mutex); \</span>
<span class="hl ppc">} while(0)</span>

<span class="hl ppc">#if defined(HAVE_GETTIMEOFDAY_TZ) || defined(HAVE_GETTIMEOFDAY_TZ_VOID)</span>
<span class="hl ppc">#define swrapGetTimeOfDay(tval) gettimeofday(tval,NULL)</span>
<span class="hl ppc">#else</span>
<span class="hl ppc">#define swrapGetTimeOfDay(tval)	gettimeofday(tval)</span>
<span class="hl ppc">#endif</span>

<span class="hl com">/* we need to use a very terse format here as IRIX 6.4 silently</span>
<span class="hl com">   truncates names to 16 chars, so if we use a longer name then we</span>
<span class="hl com">   can&#39;t tell which port a packet came from with recvfrom()</span>
<span class="hl com"></span>
<span class="hl com">   with this format we have 8 chars left for the directory name</span>
<span class="hl com">*/</span>
<span class="hl ppc">#define SOCKET_FORMAT</span> <span class="hl pps">&quot;</span><span class="hl ipl">%c%0</span><span class="hl pps">2X</span><span class="hl ipl">%0</span><span class="hl pps">4X&quot;</span><span class="hl ppc"></span>
<span class="hl ppc">#define SOCKET_TYPE_CHAR_TCP</span>		<span class="hl pps">&#39;T&#39;</span><span class="hl ppc"></span>
<span class="hl ppc">#define SOCKET_TYPE_CHAR_UDP</span>		<span class="hl pps">&#39;U&#39;</span><span class="hl ppc"></span>
<span class="hl ppc">#define SOCKET_TYPE_CHAR_TCP_V6</span>		<span class="hl pps">&#39;X&#39;</span><span class="hl ppc"></span>
<span class="hl ppc">#define SOCKET_TYPE_CHAR_UDP_V6</span>		<span class="hl pps">&#39;Y&#39;</span><span class="hl ppc"></span>

<span class="hl com">/*</span>
<span class="hl com"> * Set the packet MTU to 1500 bytes for stream sockets to make it it easier to</span>
<span class="hl com"> * format PCAP capture files (as the caller will simply continue from here).</span>
<span class="hl com"> */</span>
<span class="hl ppc">#define SOCKET_WRAPPER_MTU_DEFAULT 1500</span>
<span class="hl ppc">#define SOCKET_WRAPPER_MTU_MIN     512</span>
<span class="hl ppc">#define SOCKET_WRAPPER_MTU_MAX     32768</span>

<span class="hl ppc">#define SOCKET_MAX_SOCKETS 1024</span>

<span class="hl com">/*</span>
<span class="hl com"> * Maximum number of socket_info structures that can</span>
<span class="hl com"> * be used. Can be overriden by the environment variable</span>
<span class="hl com"> * SOCKET_WRAPPER_MAX_SOCKETS.</span>
<span class="hl com"> */</span>
<span class="hl ppc">#define SOCKET_WRAPPER_MAX_SOCKETS_DEFAULT 65535</span>

<span class="hl ppc">#define SOCKET_WRAPPER_MAX_SOCKETS_LIMIT 262140</span>

<span class="hl com">/* This limit is to avoid broadcast sendto() needing to stat too many</span>
<span class="hl com"> * files.  It may be raised (with a performance cost) to up to 254</span>
<span class="hl com"> * without changing the format above */</span>
<span class="hl ppc">#define MAX_WRAPPED_INTERFACES 64</span>

<span class="hl kwb">struct</span> swrap_address <span class="hl opt">{</span>
	socklen_t sa_socklen<span class="hl opt">;</span>
	<span class="hl kwb">union</span> <span class="hl opt">{</span>
		<span class="hl kwb">struct</span> sockaddr s<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> sockaddr_in in<span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
		<span class="hl kwb">struct</span> sockaddr_in6 in6<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwb">struct</span> sockaddr_un un<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> sockaddr_storage ss<span class="hl opt">;</span>
	<span class="hl opt">}</span> sa<span class="hl opt">;</span>
<span class="hl opt">};</span>

<span class="hl kwb">int</span> first_free<span class="hl opt">;</span>

<span class="hl kwb">struct</span> socket_info
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> family<span class="hl opt">;</span>
	<span class="hl kwb">int</span> type<span class="hl opt">;</span>
	<span class="hl kwb">int</span> protocol<span class="hl opt">;</span>
	<span class="hl kwb">int</span> bound<span class="hl opt">;</span>
	<span class="hl kwb">int</span> bcast<span class="hl opt">;</span>
	<span class="hl kwb">int</span> is_server<span class="hl opt">;</span>
	<span class="hl kwb">int</span> connected<span class="hl opt">;</span>
	<span class="hl kwb">int</span> defer_connect<span class="hl opt">;</span>
	<span class="hl kwb">int</span> pktinfo<span class="hl opt">;</span>
	<span class="hl kwb">int</span> tcp_nodelay<span class="hl opt">;</span>
	<span class="hl kwb">int</span> listening<span class="hl opt">;</span>

	<span class="hl com">/* The unix path so we can unlink it on close() */</span>
	<span class="hl kwb">struct</span> sockaddr_un un_addr<span class="hl opt">;</span>

	<span class="hl kwb">struct</span> swrap_address bindname<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address myname<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address peername<span class="hl opt">;</span>

	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">unsigned long</span> pck_snd<span class="hl opt">;</span>
		<span class="hl kwb">unsigned long</span> pck_rcv<span class="hl opt">;</span>
	<span class="hl opt">}</span> io<span class="hl opt">;</span>
<span class="hl opt">};</span>

<span class="hl kwb">struct</span> socket_info_meta
<span class="hl opt">{</span>
	<span class="hl kwb">unsigned int</span> refcount<span class="hl opt">;</span>
	<span class="hl kwb">int</span> next_free<span class="hl opt">;</span>
	pthread_mutex_t mutex<span class="hl opt">;</span>
<span class="hl opt">};</span>

<span class="hl kwb">struct</span> socket_info_container
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info info<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info_meta meta<span class="hl opt">;</span>
<span class="hl opt">};</span>

<span class="hl kwb">static struct</span> socket_info_container <span class="hl opt">*</span>sockets<span class="hl opt">;</span>

<span class="hl kwb">static size_t</span> socket_info_max <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

<span class="hl com">/*</span>
<span class="hl com"> * Allocate the socket array always on the limit value. We want it to be</span>
<span class="hl com"> * at least bigger than the default so if we reach the limit we can</span>
<span class="hl com"> * still deal with duplicate fds pointing to the same socket_info.</span>
<span class="hl com"> */</span>
<span class="hl kwb">static size_t</span> socket_fds_max <span class="hl opt">=</span> SOCKET_WRAPPER_MAX_SOCKETS_LIMIT<span class="hl opt">;</span>

<span class="hl com">/* Hash table to map fds to corresponding socket_info index */</span>
<span class="hl kwb">static int</span> <span class="hl opt">*</span>socket_fds_idx<span class="hl opt">;</span>

<span class="hl com">/* Mutex to synchronize access to global libc.symbols */</span>
<span class="hl kwb">static</span> pthread_mutex_t libc_symbol_binding_mutex <span class="hl opt">=</span> PTHREAD_MUTEX_INITIALIZER<span class="hl opt">;</span>

<span class="hl com">/* Mutex for syncronizing port selection during swrap_auto_bind() */</span>
<span class="hl kwb">static</span> pthread_mutex_t autobind_start_mutex<span class="hl opt">;</span>

<span class="hl com">/* Mutex to guard the initialization of array of socket_info structures */</span>
<span class="hl kwb">static</span> pthread_mutex_t sockets_mutex<span class="hl opt">;</span>

<span class="hl com">/* Mutex to guard the socket reset in swrap_close() and swrap_remove_stale() */</span>
<span class="hl kwb">static</span> pthread_mutex_t socket_reset_mutex<span class="hl opt">;</span>

<span class="hl com">/* Mutex to synchronize access to first free index in socket_info array */</span>
<span class="hl kwb">static</span> pthread_mutex_t first_free_mutex<span class="hl opt">;</span>

<span class="hl com">/* Mutex to synchronize access to packet capture dump file */</span>
<span class="hl kwb">static</span> pthread_mutex_t pcap_dump_mutex<span class="hl opt">;</span>

<span class="hl com">/* Mutex for synchronizing mtu value fetch*/</span>
<span class="hl kwb">static</span> pthread_mutex_t mtu_update_mutex<span class="hl opt">;</span>

<span class="hl com">/* Function prototypes */</span>

<span class="hl kwb">bool</span> <span class="hl kwd">socket_wrapper_enabled</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">);</span>

<span class="hl kwb">void</span> <span class="hl kwd">swrap_constructor</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span> CONSTRUCTOR_ATTRIBUTE<span class="hl opt">;</span>
<span class="hl kwb">void</span> <span class="hl kwd">swrap_destructor</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span> DESTRUCTOR_ATTRIBUTE<span class="hl opt">;</span>

<span class="hl ppc">#ifndef HAVE_GETPROGNAME</span>
<span class="hl kwb">static const char</span> <span class="hl opt">*</span><span class="hl kwd">getprogname</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
<span class="hl ppc">#if defined(HAVE_PROGRAM_INVOCATION_SHORT_NAME)</span>
	<span class="hl kwa">return</span> program_invocation_short_name<span class="hl opt">;</span>
<span class="hl ppc">#elif defined(HAVE_GETEXECNAME)</span>
	<span class="hl kwa">return</span> <span class="hl kwd">getexecname</span><span class="hl opt">();</span>
<span class="hl ppc">#else</span>
	<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_PROGRAM_INVOCATION_SHORT_NAME */</span><span class="hl ppc"></span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_GETPROGNAME */</span><span class="hl ppc"></span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_log</span><span class="hl opt">(</span><span class="hl kwb">enum</span> swrap_dbglvl_e dbglvl<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>func<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>format<span class="hl opt">, ...)</span> <span class="hl kwd">PRINTF_ATTRIBUTE</span><span class="hl opt">(</span><span class="hl num">3</span><span class="hl opt">,</span> <span class="hl num">4</span><span class="hl opt">);</span>
<span class="hl ppc"># define SWRAP_LOG(dbglvl, ...) swrap_log((dbglvl), __func__, __VA_ARGS__)</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_log</span><span class="hl opt">(</span><span class="hl kwb">enum</span> swrap_dbglvl_e dbglvl<span class="hl opt">,</span>
		      <span class="hl kwb">const char</span> <span class="hl opt">*</span>func<span class="hl opt">,</span>
		      <span class="hl kwb">const char</span> <span class="hl opt">*</span>format<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">char</span> buffer<span class="hl opt">[</span><span class="hl num">1024</span><span class="hl opt">];</span>
	<span class="hl kwb">va_list</span> va<span class="hl opt">;</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>d<span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> lvl <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>prefix <span class="hl opt">=</span> <span class="hl str">&quot;SWRAP&quot;</span><span class="hl opt">;</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>progname <span class="hl opt">=</span> <span class="hl kwd">getprogname</span><span class="hl opt">();</span>

	d <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_DEBUGLEVEL&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>d <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		lvl <span class="hl opt">=</span> <span class="hl kwd">atoi</span><span class="hl opt">(</span>d<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>lvl <span class="hl opt">&lt;</span> dbglvl<span class="hl opt">) {</span>
		<span class="hl kwa">return</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>va<span class="hl opt">,</span> format<span class="hl opt">);</span>
	<span class="hl kwd">vsnprintf</span><span class="hl opt">(</span>buffer<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>buffer<span class="hl opt">),</span> format<span class="hl opt">,</span> va<span class="hl opt">);</span>
	<span class="hl kwd">va_end</span><span class="hl opt">(</span>va<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>dbglvl<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SWRAP_LOG_ERROR<span class="hl opt">:</span>
			prefix <span class="hl opt">=</span> <span class="hl str">&quot;SWRAP_ERROR&quot;</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SWRAP_LOG_WARN<span class="hl opt">:</span>
			prefix <span class="hl opt">=</span> <span class="hl str">&quot;SWRAP_WARN&quot;</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SWRAP_LOG_DEBUG<span class="hl opt">:</span>
			prefix <span class="hl opt">=</span> <span class="hl str">&quot;SWRAP_DEBUG&quot;</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SWRAP_LOG_TRACE<span class="hl opt">:</span>
			prefix <span class="hl opt">=</span> <span class="hl str">&quot;SWRAP_TRACE&quot;</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>progname <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		progname <span class="hl opt">=</span> <span class="hl str">&quot;&lt;unknown&gt;&quot;</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">fprintf</span><span class="hl opt">(</span>stderr<span class="hl opt">,</span>
		<span class="hl str">&quot;</span><span class="hl ipl">%s</span><span class="hl str">[</span><span class="hl ipl">%s</span> <span class="hl str">(</span><span class="hl ipl">%u</span><span class="hl str">)] -</span> <span class="hl ipl">%s</span><span class="hl str">:</span> <span class="hl ipl">%s</span><span class="hl str"></span><span class="hl esc">\n</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		prefix<span class="hl opt">,</span>
		progname<span class="hl opt">,</span>
		<span class="hl opt">(</span><span class="hl kwb">unsigned int</span><span class="hl opt">)</span><span class="hl kwd">getpid</span><span class="hl opt">(),</span>
		func<span class="hl opt">,</span>
		buffer<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/*********************************************************</span>
<span class="hl com"> * SWRAP LOADING LIBC FUNCTIONS</span>
<span class="hl com"> *********************************************************/</span>

<span class="hl ppc">#include &lt;dlfcn.h&gt;</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_accept4<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			      <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			      socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">,</span>
			      <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl ppc">#else</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_accept<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			     <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			     socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_bind<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			   <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			   socklen_t addrlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_close<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_connect<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			      <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			      socklen_t addrlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_dup<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_dup2<span class="hl opt">)(</span><span class="hl kwb">int</span> oldfd<span class="hl opt">,</span> <span class="hl kwb">int</span> newfd<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_fcntl<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> cmd<span class="hl opt">, ...);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">FILE</span> <span class="hl opt">*(*</span>__libc_fopen<span class="hl opt">)(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_FOPEN64</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">FILE</span> <span class="hl opt">*(*</span>__libc_fopen64<span class="hl opt">)(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_EVENTFD</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_eventfd<span class="hl opt">)(</span><span class="hl kwb">int</span> count<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_getpeername<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
				  <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
				  socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_getsockname<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
				  <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
				  socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_getsockopt<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			       <span class="hl kwb">int</span> level<span class="hl opt">,</span>
			       <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
			       <span class="hl kwb">void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span>
			       socklen_t <span class="hl opt">*</span>optlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_ioctl<span class="hl opt">)(</span><span class="hl kwb">int</span> d<span class="hl opt">,</span> <span class="hl kwb">unsigned long int</span> request<span class="hl opt">, ...);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_listen<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">int</span> backlog<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_open<span class="hl opt">)(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...);</span>
<span class="hl ppc">#ifdef HAVE_OPEN64</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_open64<span class="hl opt">)(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...);</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_OPEN64 */</span><span class="hl ppc"></span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_openat<span class="hl opt">)(</span><span class="hl kwb">int</span> dirfd<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>path<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_pipe<span class="hl opt">)(</span><span class="hl kwb">int</span> pipefd<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">]);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_read<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> count<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwd">ssize_t</span> <span class="hl opt">(*</span>__libc_readv<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>iov<span class="hl opt">,</span> <span class="hl kwb">int</span> iovcnt<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_recv<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_recvfrom<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			     <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span>
			     <span class="hl kwb">size_t</span> len<span class="hl opt">,</span>
			     <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
			     <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>src_addr<span class="hl opt">,</span>
			     socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_recvmsg<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_send<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_sendmsg<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_sendto<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			   <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span>
			   <span class="hl kwb">size_t</span> len<span class="hl opt">,</span>
			   <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
			   <span class="hl kwb">const  struct</span> sockaddr <span class="hl opt">*</span>dst_addr<span class="hl opt">,</span>
			   socklen_t addrlen<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_setsockopt<span class="hl opt">)(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			       <span class="hl kwb">int</span> level<span class="hl opt">,</span>
			       <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
			       <span class="hl kwb">const void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span>
			       socklen_t optlen<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_SIGNALFD</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_signalfd<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const</span> sigset_t <span class="hl opt">*</span>mask<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_socket<span class="hl opt">)(</span><span class="hl kwb">int</span> domain<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_socketpair<span class="hl opt">)(</span><span class="hl kwb">int</span> domain<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">,</span> <span class="hl kwb">int</span> sv<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">]);</span>
<span class="hl ppc">#ifdef HAVE_TIMERFD_CREATE</span>
<span class="hl kwc">typedef</span> <span class="hl kwb">int</span> <span class="hl opt">(*</span>__libc_timerfd_create<span class="hl opt">)(</span><span class="hl kwb">int</span> clockid<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl kwc">typedef</span> <span class="hl kwd">ssize_t</span> <span class="hl opt">(*</span>__libc_write<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> count<span class="hl opt">);</span>
<span class="hl kwc">typedef</span> <span class="hl kwd">ssize_t</span> <span class="hl opt">(*</span>__libc_writev<span class="hl opt">)(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>iov<span class="hl opt">,</span> <span class="hl kwb">int</span> iovcnt<span class="hl opt">);</span>

<span class="hl ppc">#define SWRAP_SYMBOL_ENTRY(i) \</span>
<span class="hl ppc">	union { \</span>
<span class="hl ppc">		__libc_##i f; \</span>
<span class="hl ppc">		void *obj; \</span>
<span class="hl ppc">	} _libc_##i</span>

<span class="hl kwb">struct</span> swrap_libc_symbols <span class="hl opt">{</span>
<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>accept4<span class="hl opt">);</span>
<span class="hl ppc">#else</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>accept<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>bind<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>close<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>connect<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>dup<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>dup2<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>fcntl<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>fopen<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_FOPEN64</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>fopen64<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_EVENTFD</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>eventfd<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>getpeername<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>getsockname<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>getsockopt<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>ioctl<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>listen<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>open<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_OPEN64</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>open64<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>openat<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>pipe<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>read<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>readv<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>recv<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>recvfrom<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>recvmsg<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>send<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>sendmsg<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>sendto<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>setsockopt<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_SIGNALFD</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>signalfd<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>socket<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>socketpair<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_TIMERFD_CREATE</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>timerfd_create<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>write<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_SYMBOL_ENTRY</span><span class="hl opt">(</span>writev<span class="hl opt">);</span>
<span class="hl opt">};</span>

<span class="hl kwb">struct</span> swrap <span class="hl opt">{</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">void</span> <span class="hl opt">*</span>handle<span class="hl opt">;</span>
		<span class="hl kwb">void</span> <span class="hl opt">*</span>socket_handle<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> swrap_libc_symbols symbols<span class="hl opt">;</span>
	<span class="hl opt">}</span> libc<span class="hl opt">;</span>
<span class="hl opt">};</span>

<span class="hl kwb">static struct</span> swrap swrap<span class="hl opt">;</span>

<span class="hl com">/* prototypes */</span>
<span class="hl kwb">static char</span> <span class="hl opt">*</span><span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">);</span>

<span class="hl ppc">#define LIBC_NAME</span> <span class="hl pps">&quot;libc.so&quot;</span><span class="hl ppc"></span>

<span class="hl kwb">enum</span> swrap_lib <span class="hl opt">{</span>
    SWRAP_LIBC<span class="hl opt">,</span>
    SWRAP_LIBNSL<span class="hl opt">,</span>
    SWRAP_LIBSOCKET<span class="hl opt">,</span>
<span class="hl opt">};</span>

<span class="hl kwb">static const char</span> <span class="hl opt">*</span><span class="hl kwd">swrap_str_lib</span><span class="hl opt">(</span><span class="hl kwb">enum</span> swrap_lib lib<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">switch</span> <span class="hl opt">(</span>lib<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SWRAP_LIBC<span class="hl opt">:</span>
		<span class="hl kwa">return</span> <span class="hl str">&quot;libc&quot;</span><span class="hl opt">;</span>
	<span class="hl kwa">case</span> SWRAP_LIBNSL<span class="hl opt">:</span>
		<span class="hl kwa">return</span> <span class="hl str">&quot;libnsl&quot;</span><span class="hl opt">;</span>
	<span class="hl kwa">case</span> SWRAP_LIBSOCKET<span class="hl opt">:</span>
		<span class="hl kwa">return</span> <span class="hl str">&quot;libsocket&quot;</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* Compiler would warn us about unhandled enum value if we get here */</span>
	<span class="hl kwa">return</span> <span class="hl str">&quot;unknown&quot;</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl opt">*</span><span class="hl kwd">swrap_load_lib_handle</span><span class="hl opt">(</span><span class="hl kwb">enum</span> swrap_lib lib<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> flags <span class="hl opt">=</span> RTLD_LAZY<span class="hl opt">;</span>
	<span class="hl kwb">void</span> <span class="hl opt">*</span>handle <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">int</span> i<span class="hl opt">;</span>

<span class="hl ppc">#ifdef RTLD_DEEPBIND</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>env_preload <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;LD_PRELOAD&quot;</span><span class="hl opt">);</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>env_deepbind <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_DISABLE_DEEPBIND&quot;</span><span class="hl opt">);</span>
	<span class="hl kwb">bool</span> enable_deepbind <span class="hl opt">=</span> <span class="hl kwa">true</span><span class="hl opt">;</span>

	<span class="hl com">/* Don&#39;t do a deepbind if we run with libasan */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>env_preload <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp;</span> <span class="hl kwd">strlen</span><span class="hl opt">(</span>env_preload<span class="hl opt">) &lt;</span> <span class="hl num">1024</span><span class="hl opt">) {</span>
		<span class="hl kwb">const char</span> <span class="hl opt">*</span>p <span class="hl opt">=</span> <span class="hl kwd">strstr</span><span class="hl opt">(</span>env_preload<span class="hl opt">,</span> <span class="hl str">&quot;libasan.so&quot;</span><span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>p <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
			enable_deepbind <span class="hl opt">=</span> <span class="hl kwa">false</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>env_deepbind <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp;</span> <span class="hl kwd">strlen</span><span class="hl opt">(</span>env_deepbind<span class="hl opt">) &gt;=</span> <span class="hl num">1</span><span class="hl opt">) {</span>
		enable_deepbind <span class="hl opt">=</span> <span class="hl kwa">false</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>enable_deepbind<span class="hl opt">) {</span>
		flags <span class="hl opt">|=</span> RTLD_DEEPBIND<span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>lib<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SWRAP_LIBNSL<span class="hl opt">:</span>
	<span class="hl kwa">case</span> SWRAP_LIBSOCKET<span class="hl opt">:</span>
<span class="hl ppc">#ifdef HAVE_LIBSOCKET</span>
		handle <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>socket_handle<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>handle <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">10</span><span class="hl opt">;</span> i <span class="hl opt">&gt;=</span> <span class="hl num">0</span><span class="hl opt">;</span> i<span class="hl opt">--) {</span>
				<span class="hl kwb">char</span> soname<span class="hl opt">[</span><span class="hl num">256</span><span class="hl opt">] = {</span><span class="hl num">0</span><span class="hl opt">};</span>

				<span class="hl kwd">snprintf</span><span class="hl opt">(</span>soname<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>soname<span class="hl opt">),</span> <span class="hl str">&quot;libsocket.so.</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span> i<span class="hl opt">);</span>
				handle <span class="hl opt">=</span> <span class="hl kwd">dlopen</span><span class="hl opt">(</span>soname<span class="hl opt">,</span> flags<span class="hl opt">);</span>
				<span class="hl kwa">if</span> <span class="hl opt">(</span>handle <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
					<span class="hl kwa">break</span><span class="hl opt">;</span>
				<span class="hl opt">}</span>
			<span class="hl opt">}</span>

			swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>socket_handle <span class="hl opt">=</span> handle<span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">case</span> SWRAP_LIBC<span class="hl opt">:</span>
		handle <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>handle<span class="hl opt">;</span>
<span class="hl ppc">#ifdef LIBC_SO</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>handle <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			handle <span class="hl opt">=</span> <span class="hl kwd">dlopen</span><span class="hl opt">(</span>LIBC_SO<span class="hl opt">,</span> flags<span class="hl opt">);</span>

			swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>handle <span class="hl opt">=</span> handle<span class="hl opt">;</span>
		<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>handle <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">10</span><span class="hl opt">;</span> i <span class="hl opt">&gt;=</span> <span class="hl num">0</span><span class="hl opt">;</span> i<span class="hl opt">--) {</span>
				<span class="hl kwb">char</span> soname<span class="hl opt">[</span><span class="hl num">256</span><span class="hl opt">] = {</span><span class="hl num">0</span><span class="hl opt">};</span>

				<span class="hl kwd">snprintf</span><span class="hl opt">(</span>soname<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>soname<span class="hl opt">),</span> <span class="hl str">&quot;libc.so.</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span> i<span class="hl opt">);</span>
				handle <span class="hl opt">=</span> <span class="hl kwd">dlopen</span><span class="hl opt">(</span>soname<span class="hl opt">,</span> flags<span class="hl opt">);</span>
				<span class="hl kwa">if</span> <span class="hl opt">(</span>handle <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
					<span class="hl kwa">break</span><span class="hl opt">;</span>
				<span class="hl opt">}</span>
			<span class="hl opt">}</span>

			swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>handle <span class="hl opt">=</span> handle<span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>handle <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef RTLD_NEXT</span>
		handle <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>handle <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>socket_handle <span class="hl opt">=</span> RTLD_NEXT<span class="hl opt">;</span>
<span class="hl ppc">#else</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to dlopen library:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  <span class="hl kwd">dlerror</span><span class="hl opt">());</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> handle<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl opt">*</span><span class="hl kwd">_swrap_bind_symbol</span><span class="hl opt">(</span><span class="hl kwb">enum</span> swrap_lib lib<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>fn_name<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">void</span> <span class="hl opt">*</span>handle<span class="hl opt">;</span>
	<span class="hl kwb">void</span> <span class="hl opt">*</span>func<span class="hl opt">;</span>

	handle <span class="hl opt">=</span> <span class="hl kwd">swrap_load_lib_handle</span><span class="hl opt">(</span>lib<span class="hl opt">);</span>

	func <span class="hl opt">=</span> <span class="hl kwd">dlsym</span><span class="hl opt">(</span>handle<span class="hl opt">,</span> fn_name<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>func <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to find</span> <span class="hl ipl">%s</span><span class="hl str">:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  fn_name<span class="hl opt">,</span>
			  <span class="hl kwd">dlerror</span><span class="hl opt">());</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;Loaded</span> <span class="hl ipl">%s</span> <span class="hl str">from</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  fn_name<span class="hl opt">,</span>
		  <span class="hl kwd">swrap_str_lib</span><span class="hl opt">(</span>lib<span class="hl opt">));</span>

	<span class="hl kwa">return</span> func<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(</span>pthread_mutex_t <span class="hl opt">*</span>mutex<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">pthread_mutex_lock</span><span class="hl opt">(</span>mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Couldn&#39;t lock pthread mutex -</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  <span class="hl kwd">strerror</span><span class="hl opt">(</span>ret<span class="hl opt">));</span>
	<span class="hl opt">}</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(</span>pthread_mutex_t <span class="hl opt">*</span>mutex<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">pthread_mutex_unlock</span><span class="hl opt">(</span>mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Couldn&#39;t unlock pthread mutex -</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  <span class="hl kwd">strerror</span><span class="hl opt">(</span>ret<span class="hl opt">));</span>
	<span class="hl opt">}</span>
<span class="hl opt">}</span>

<span class="hl com">/*</span>
<span class="hl com"> * These macros have a thread race condition on purpose!</span>
<span class="hl com"> *</span>
<span class="hl com"> * This is an optimization to avoid locking each time we check if the symbol is</span>
<span class="hl com"> * bound.</span>
<span class="hl com"> */</span>
<span class="hl ppc">#define swrap_bind_symbol_libc(sym_name) \</span>
<span class="hl ppc">	if (swrap.libc.symbols._libc_##sym_name.obj == NULL) { \</span>
<span class="hl ppc">		swrap_mutex_lock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc">		if (swrap.libc.symbols._libc_##sym_name.obj == NULL) { \</span>
<span class="hl ppc">			swrap.libc.symbols._libc_##sym_name.obj = \</span>
<span class="hl ppc">				_swrap_bind_symbol(SWRAP_LIBC, #sym_name); \</span>
<span class="hl ppc">		} \</span>
<span class="hl ppc">		swrap_mutex_unlock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc">	}</span>

<span class="hl ppc">#define swrap_bind_symbol_libsocket(sym_name) \</span>
<span class="hl ppc">	if (swrap.libc.symbols._libc_##sym_name.obj == NULL) { \</span>
<span class="hl ppc">		swrap_mutex_lock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc">		if (swrap.libc.symbols._libc_##sym_name.obj == NULL) { \</span>
<span class="hl ppc">			swrap.libc.symbols._libc_##sym_name.obj = \</span>
<span class="hl ppc">				_swrap_bind_symbol(SWRAP_LIBSOCKET, #sym_name); \</span>
<span class="hl ppc">		} \</span>
<span class="hl ppc">		swrap_mutex_unlock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc">	}</span>

<span class="hl ppc">#define swrap_bind_symbol_libnsl(sym_name) \</span>
<span class="hl ppc">	if (swrap.libc.symbols._libc_##sym_name.obj == NULL) { \</span>
<span class="hl ppc">		swrap_mutex_lock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc">		if (swrap.libc.symbols._libc_##sym_name.obj == NULL) { \</span>
<span class="hl ppc">			swrap.libc.symbols._libc_##sym_name.obj = \</span>
<span class="hl ppc">				_swrap_bind_symbol(SWRAP_LIBNSL, #sym_name); \</span>
<span class="hl ppc">		} \</span>
<span class="hl ppc">		swrap_mutex_unlock(&amp;libc_symbol_binding_mutex); \</span>
<span class="hl ppc">	}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *                               IMPORTANT</span>
<span class="hl com"> ****************************************************************************</span>
<span class="hl com"> *</span>
<span class="hl com"> * Functions especially from libc need to be loaded individually, you can&#39;t</span>
<span class="hl com"> * load all at once or gdb will segfault at startup. The same applies to</span>
<span class="hl com"> * valgrind and has probably something todo with with the linker.  So we need</span>
<span class="hl com"> * load each function at the point it is called the first time.</span>
<span class="hl com"> *</span>
<span class="hl com"> ****************************************************************************/</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
<span class="hl kwb">static int</span> <span class="hl kwd">libc_accept4</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			<span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">,</span>
			<span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>accept4<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_accept4<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl ppc">#else</span> <span class="hl com">/* HAVE_ACCEPT4 */</span><span class="hl ppc"></span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_accept</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>accept<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_accept<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_ACCEPT4 */</span><span class="hl ppc"></span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_bind</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
		     <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
		     socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>bind<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_bind<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_close</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>close<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_close<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_connect</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			<span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>connect<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_connect<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_dup</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>dup<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_dup<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_dup2</span><span class="hl opt">(</span><span class="hl kwb">int</span> oldfd<span class="hl opt">,</span> <span class="hl kwb">int</span> newfd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>dup2<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_dup2<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>oldfd<span class="hl opt">,</span> newfd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_EVENTFD</span>
<span class="hl kwb">static int</span> <span class="hl kwd">libc_eventfd</span><span class="hl opt">(</span><span class="hl kwb">int</span> count<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>eventfd<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_eventfd<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>count<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

DO_NOT_SANITIZE_ADDRESS_ATTRIBUTE
<span class="hl kwb">static int</span> <span class="hl kwd">libc_vfcntl</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> cmd<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">void</span> <span class="hl opt">*</span>arg<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>fcntl<span class="hl opt">);</span>

	arg <span class="hl opt">=</span> <span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*);</span>

	rc <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_fcntl<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> cmd<span class="hl opt">,</span> arg<span class="hl opt">);</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_getpeername</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			    <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			    socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>getpeername<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_getpeername<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_getsockname</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			    <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			    socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>getsockname<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_getsockname<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_getsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			   <span class="hl kwb">int</span> level<span class="hl opt">,</span>
			   <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
			   <span class="hl kwb">void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span>
			   socklen_t <span class="hl opt">*</span>optlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>getsockopt<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_getsockopt<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span>
						     level<span class="hl opt">,</span>
						     optname<span class="hl opt">,</span>
						     optval<span class="hl opt">,</span>
						     optlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

DO_NOT_SANITIZE_ADDRESS_ATTRIBUTE
<span class="hl kwb">static int</span> <span class="hl kwd">libc_vioctl</span><span class="hl opt">(</span><span class="hl kwb">int</span> d<span class="hl opt">,</span> <span class="hl kwb">unsigned long int</span> request<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">void</span> <span class="hl opt">*</span>arg<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>ioctl<span class="hl opt">);</span>

	arg <span class="hl opt">=</span> <span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*);</span>

	rc <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_ioctl<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>d<span class="hl opt">,</span> request<span class="hl opt">,</span> arg<span class="hl opt">);</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_listen</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">int</span> backlog<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>listen<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_listen<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> backlog<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static FILE</span> <span class="hl opt">*</span><span class="hl kwd">libc_fopen</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>fopen<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_fopen<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>name<span class="hl opt">,</span> mode<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_FOPEN64</span>
<span class="hl kwb">static FILE</span> <span class="hl opt">*</span><span class="hl kwd">libc_fopen64</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>fopen64<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_fopen64<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>name<span class="hl opt">,</span> mode<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_FOPEN64 */</span><span class="hl ppc"></span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_vopen</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> mode <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>open<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>flags <span class="hl opt">&amp;</span> O_CREAT<span class="hl opt">) {</span>
		mode <span class="hl opt">=</span> <span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">int</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>
	fd <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_open<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">, (</span>mode_t<span class="hl opt">)</span>mode<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_open</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> ap<span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	fd <span class="hl opt">=</span> <span class="hl kwd">libc_vopen</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwd">va_end</span><span class="hl opt">(</span>ap<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_OPEN64</span>
<span class="hl kwb">static int</span> <span class="hl kwd">libc_vopen64</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> mode <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>open64<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>flags <span class="hl opt">&amp;</span> O_CREAT<span class="hl opt">) {</span>
		mode <span class="hl opt">=</span> <span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">int</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>
	fd <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_open64<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">, (</span>mode_t<span class="hl opt">)</span>mode<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_OPEN64 */</span><span class="hl ppc"></span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_vopenat</span><span class="hl opt">(</span><span class="hl kwb">int</span> dirfd<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>path<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> mode <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>openat<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>flags <span class="hl opt">&amp;</span> O_CREAT<span class="hl opt">) {</span>
		mode <span class="hl opt">=</span> <span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">int</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>
	fd <span class="hl opt">=</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_openat<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>dirfd<span class="hl opt">,</span>
					       path<span class="hl opt">,</span>
					       flags<span class="hl opt">,</span>
					       <span class="hl opt">(</span>mode_t<span class="hl opt">)</span>mode<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#if 0</span>
<span class="hl kwb">static int</span> <span class="hl kwd">libc_openat</span><span class="hl opt">(</span><span class="hl kwb">int</span> dirfd<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>path<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> ap<span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	fd <span class="hl opt">=</span> <span class="hl kwd">libc_vopenat</span><span class="hl opt">(</span>dirfd<span class="hl opt">,</span> path<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwd">va_end</span><span class="hl opt">(</span>ap<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_pipe</span><span class="hl opt">(</span><span class="hl kwb">int</span> pipefd<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">])</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>pipe<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_pipe<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>pipefd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_read</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> count<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>read<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_read<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> buf<span class="hl opt">,</span> count<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">libc_readv</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>iov<span class="hl opt">,</span> <span class="hl kwb">int</span> iovcnt<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>readv<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_readv<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> iov<span class="hl opt">,</span> iovcnt<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_recv</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>recv<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_recv<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_recvfrom</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			 <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span>
			 <span class="hl kwb">size_t</span> len<span class="hl opt">,</span>
			 <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
			 <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>src_addr<span class="hl opt">,</span>
			 socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>recvfrom<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_recvfrom<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span>
						   buf<span class="hl opt">,</span>
						   len<span class="hl opt">,</span>
						   flags<span class="hl opt">,</span>
						   src_addr<span class="hl opt">,</span>
						   addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_recvmsg</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>recvmsg<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_recvmsg<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> msg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_send</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>send<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_send<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_sendmsg</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>sendmsg<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_sendmsg<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> msg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_sendto</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
		       <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span>
		       <span class="hl kwb">size_t</span> len<span class="hl opt">,</span>
		       <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
		       <span class="hl kwb">const  struct</span> sockaddr <span class="hl opt">*</span>dst_addr<span class="hl opt">,</span>
		       socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>sendto<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_sendto<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span>
						 buf<span class="hl opt">,</span>
						 len<span class="hl opt">,</span>
						 flags<span class="hl opt">,</span>
						 dst_addr<span class="hl opt">,</span>
						 addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_setsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span>
			   <span class="hl kwb">int</span> level<span class="hl opt">,</span>
			   <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
			   <span class="hl kwb">const void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span>
			   socklen_t optlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>setsockopt<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_setsockopt<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span>
						     level<span class="hl opt">,</span>
						     optname<span class="hl opt">,</span>
						     optval<span class="hl opt">,</span>
						     optlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_SIGNALFD</span>
<span class="hl kwb">static int</span> <span class="hl kwd">libc_signalfd</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const</span> sigset_t <span class="hl opt">*</span>mask<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>signalfd<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_signalfd<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> mask<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_socket</span><span class="hl opt">(</span><span class="hl kwb">int</span> domain<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>socket<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_socket<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>domain<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">libc_socketpair</span><span class="hl opt">(</span><span class="hl kwb">int</span> domain<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">,</span> <span class="hl kwb">int</span> sv<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">])</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>socketpair<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_socketpair<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>domain<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">,</span> sv<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_TIMERFD_CREATE</span>
<span class="hl kwb">static int</span> <span class="hl kwd">libc_timerfd_create</span><span class="hl opt">(</span><span class="hl kwb">int</span> clockid<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>timerfd_create<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_timerfd_create<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>clockid<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">libc_write</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> count<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>write<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_write<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> buf<span class="hl opt">,</span> count<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">libc_writev</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>iov<span class="hl opt">,</span> <span class="hl kwb">int</span> iovcnt<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>writev<span class="hl opt">);</span>

	<span class="hl kwa">return</span> swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>symbols<span class="hl opt">.</span>_libc_writev<span class="hl opt">.</span><span class="hl kwd">f</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> iov<span class="hl opt">,</span> iovcnt<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/* DO NOT call this function during library initialization! */</span>
<span class="hl kwb">static void</span> <span class="hl kwd">swrap_bind_symbol_all</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>accept4<span class="hl opt">);</span>
<span class="hl ppc">#else</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>accept<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>bind<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>close<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>connect<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>dup<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>dup2<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>fcntl<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>fopen<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_FOPEN64</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>fopen64<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef HAVE_EVENTFD</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>eventfd<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>getpeername<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>getsockname<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>getsockopt<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>ioctl<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>listen<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>open<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_OPEN64</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>open64<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>openat<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>pipe<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>read<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>readv<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>recv<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>recvfrom<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>recvmsg<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>send<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>sendmsg<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>sendto<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>setsockopt<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_SIGNALFD</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>signalfd<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>socket<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>socketpair<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_TIMERFD_CREATE</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>timerfd_create<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwd">swrap_bind_symbol_libc</span><span class="hl opt">(</span>write<span class="hl opt">);</span>
	<span class="hl kwd">swrap_bind_symbol_libsocket</span><span class="hl opt">(</span>writev<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/*********************************************************</span>
<span class="hl com"> * SWRAP HELPER FUNCTIONS</span>
<span class="hl com"> *********************************************************/</span>

<span class="hl com">/*</span>
<span class="hl com"> * We return 127.0.0.0 (default) or 10.53.57.0.</span>
<span class="hl com"> *</span>
<span class="hl com"> * This can be controlled by:</span>
<span class="hl com"> * SOCKET_WRAPPER_IPV4_NETWORK=127.0.0.0 (default)</span>
<span class="hl com"> * or</span>
<span class="hl com"> * SOCKET_WRAPPER_IPV4_NETWORK=10.53.57.0</span>
<span class="hl com"> */</span>
<span class="hl kwb">static</span> in_addr_t <span class="hl kwd">swrap_ipv4_net</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">static int</span> initialized<span class="hl opt">;</span>
	<span class="hl kwb">static</span> in_addr_t hv<span class="hl opt">;</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>net_str <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> in_addr nv<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>initialized<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> hv<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	initialized <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

	net_str <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_IPV4_NETWORK&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>net_str <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		net_str <span class="hl opt">=</span> <span class="hl str">&quot;127.0.0.0&quot;</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">inet_pton</span><span class="hl opt">(</span>AF_INET<span class="hl opt">,</span> net_str<span class="hl opt">, &amp;</span>nv<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">&lt;=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;INVALID IPv4 Network [</span><span class="hl ipl">%s</span><span class="hl str">]&quot;</span><span class="hl opt">,</span>
			  net_str<span class="hl opt">);</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
	<span class="hl opt">}</span>

	hv <span class="hl opt">=</span> <span class="hl kwd">ntohl</span><span class="hl opt">(</span>nv<span class="hl opt">.</span>s_addr<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>hv<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> <span class="hl num">0x7f000000</span><span class="hl opt">:</span>
		<span class="hl com">/* 127.0.0.0 */</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">case</span> <span class="hl num">0x0a353900</span><span class="hl opt">:</span>
		<span class="hl com">/* 10.53.57.0 */</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;INVALID IPv4 Network [</span><span class="hl ipl">%s</span><span class="hl str">][0x</span><span class="hl ipl">%x</span><span class="hl str">] should be &quot;</span>
			  <span class="hl str">&quot;127.0.0.0 or 10.53.57.0&quot;</span><span class="hl opt">,</span>
			  net_str<span class="hl opt">, (</span><span class="hl kwb">unsigned</span><span class="hl opt">)</span>hv<span class="hl opt">);</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> hv<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/*</span>
<span class="hl com"> * This returns 127.255.255.255 or 10.255.255.255</span>
<span class="hl com"> */</span>
<span class="hl kwb">static</span> in_addr_t <span class="hl kwd">swrap_ipv4_bcast</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	in_addr_t hv<span class="hl opt">;</span>

	hv <span class="hl opt">=</span> <span class="hl kwd">swrap_ipv4_net</span><span class="hl opt">();</span>
	hv <span class="hl opt">|=</span> IN_CLASSA_HOST<span class="hl opt">;</span>

	<span class="hl kwa">return</span> hv<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/*</span>
<span class="hl com"> * This returns 127.0.0.${iface} or 10.53.57.${iface}</span>
<span class="hl com"> */</span>
<span class="hl kwb">static</span> in_addr_t <span class="hl kwd">swrap_ipv4_iface</span><span class="hl opt">(</span><span class="hl kwb">unsigned int</span> iface<span class="hl opt">)</span>
<span class="hl opt">{</span>
	in_addr_t hv<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>iface <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">||</span> iface <span class="hl opt">&gt;</span> MAX_WRAPPED_INTERFACES<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;swrap_ipv4_iface(</span><span class="hl ipl">%u</span><span class="hl str">) invalid!&quot;</span><span class="hl opt">,</span>
			  iface<span class="hl opt">);</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	hv <span class="hl opt">=</span> <span class="hl kwd">swrap_ipv4_net</span><span class="hl opt">();</span>
	hv <span class="hl opt">|=</span> iface<span class="hl opt">;</span>

	<span class="hl kwa">return</span> hv<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_IPV6</span>
<span class="hl com">/*</span>
<span class="hl com"> * FD00::5357:5FXX</span>
<span class="hl com"> */</span>
<span class="hl kwb">static const struct</span> in6_addr <span class="hl opt">*</span><span class="hl kwd">swrap_ipv6</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">static struct</span> in6_addr v<span class="hl opt">;</span>
	<span class="hl kwb">static int</span> initialized<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>initialized<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">&amp;</span>v<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	initialized <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">inet_pton</span><span class="hl opt">(</span>AF_INET6<span class="hl opt">,</span> <span class="hl str">&quot;FD00::5357:5F00&quot;</span><span class="hl opt">, &amp;</span>v<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">&lt;=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl opt">&amp;</span>v<span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl kwb">static void</span> <span class="hl kwd">set_port</span><span class="hl opt">(</span><span class="hl kwb">int</span> family<span class="hl opt">,</span> <span class="hl kwb">int</span> prt<span class="hl opt">,</span> <span class="hl kwb">struct</span> swrap_address <span class="hl opt">*</span>addr<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">switch</span> <span class="hl opt">(</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		addr<span class="hl opt">-&gt;</span>sa<span class="hl opt">.</span>in<span class="hl opt">.</span>sin_port <span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>prt<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		addr<span class="hl opt">-&gt;</span>sa<span class="hl opt">.</span>in6<span class="hl opt">.</span>sin6_port <span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>prt<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl opt">}</span>
<span class="hl opt">}</span>

<span class="hl kwb">static size_t</span> <span class="hl kwd">socket_length</span><span class="hl opt">(</span><span class="hl kwb">int</span> family<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">switch</span> <span class="hl opt">(</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		<span class="hl kwa">return sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		<span class="hl kwa">return sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static struct</span> socket_info <span class="hl opt">*</span><span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span><span class="hl kwb">int</span> si_index<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*)(&amp;(</span>sockets<span class="hl opt">[</span>si_index<span class="hl opt">].</span>info<span class="hl opt">));</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_get_refcount</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info_container <span class="hl opt">*</span>sic <span class="hl opt">=</span> <span class="hl kwd">SOCKET_INFO_CONTAINER</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">return</span> sic<span class="hl opt">-&gt;</span>meta<span class="hl opt">.</span>refcount<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_inc_refcount</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info_container <span class="hl opt">*</span>sic <span class="hl opt">=</span> <span class="hl kwd">SOCKET_INFO_CONTAINER</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	sic<span class="hl opt">-&gt;</span>meta<span class="hl opt">.</span>refcount <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_dec_refcount</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info_container <span class="hl opt">*</span>sic <span class="hl opt">=</span> <span class="hl kwd">SOCKET_INFO_CONTAINER</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	sic<span class="hl opt">-&gt;</span>meta<span class="hl opt">.</span>refcount <span class="hl opt">-=</span> <span class="hl num">1</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_get_next_free</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info_container <span class="hl opt">*</span>sic <span class="hl opt">=</span> <span class="hl kwd">SOCKET_INFO_CONTAINER</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> sic<span class="hl opt">-&gt;</span>meta<span class="hl opt">.</span>next_free<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_set_next_free</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span> <span class="hl kwb">int</span> next_free<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info_container <span class="hl opt">*</span>sic <span class="hl opt">=</span> <span class="hl kwd">SOCKET_INFO_CONTAINER</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	sic<span class="hl opt">-&gt;</span>meta<span class="hl opt">.</span>next_free <span class="hl opt">=</span> next_free<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_un_path</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un <span class="hl opt">*</span>un<span class="hl opt">,</span>
			 <span class="hl kwb">const char</span> <span class="hl opt">*</span>swrap_dir<span class="hl opt">,</span>
			 <span class="hl kwb">char</span> type<span class="hl opt">,</span>
			 <span class="hl kwb">unsigned int</span> iface<span class="hl opt">,</span>
			 <span class="hl kwb">unsigned int</span> prt<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">snprintf</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">,</span>
		       <span class="hl kwa">sizeof</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">),</span>
		       <span class="hl str">&quot;</span><span class="hl ipl">%s</span><span class="hl str">/&quot;</span>SOCKET_FORMAT<span class="hl opt">,</span>
		       swrap_dir<span class="hl opt">,</span>
		       type<span class="hl opt">,</span>
		       iface<span class="hl opt">,</span>
		       prt<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">((</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>ret <span class="hl opt">&gt;=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">)) {</span>
		<span class="hl kwa">return</span> ENAMETOOLONG<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_un_path_EINVAL</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un <span class="hl opt">*</span>un<span class="hl opt">,</span>
				<span class="hl kwb">const char</span> <span class="hl opt">*</span>swrap_dir<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">snprintf</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">,</span>
		       <span class="hl kwa">sizeof</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">),</span>
		       <span class="hl str">&quot;</span><span class="hl ipl">%s</span><span class="hl str">/EINVAL&quot;</span><span class="hl opt">,</span>
		       swrap_dir<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">((</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>ret <span class="hl opt">&gt;=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">)) {</span>
		<span class="hl kwa">return</span> ENAMETOOLONG<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static bool</span> <span class="hl kwd">swrap_dir_usable</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>swrap_dir<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> sockaddr_un un<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">swrap_un_path</span><span class="hl opt">(&amp;</span>un<span class="hl opt">,</span> swrap_dir<span class="hl opt">,</span> SOCKET_TYPE_CHAR_TCP<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return true</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">swrap_un_path_EINVAL</span><span class="hl opt">(&amp;</span>un<span class="hl opt">,</span> swrap_dir<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return true</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return false</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static char</span> <span class="hl opt">*</span><span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>swrap_dir <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>s <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_DIR&quot;</span><span class="hl opt">);</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>t<span class="hl opt">;</span>
	<span class="hl kwb">bool</span> ok<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_WARN<span class="hl opt">,</span> <span class="hl str">&quot;SOCKET_WRAPPER_DIR not set&quot;</span><span class="hl opt">);</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	swrap_dir <span class="hl opt">=</span> <span class="hl kwd">realpath</span><span class="hl opt">(</span>s<span class="hl opt">,</span> NULL<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Unable to resolve socket_wrapper dir path:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  <span class="hl kwd">strerror</span><span class="hl opt">(</span>errno<span class="hl opt">));</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
	<span class="hl opt">}</span>

	ok <span class="hl opt">=</span> <span class="hl kwd">swrap_dir_usable</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ok<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">free</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>

	ok <span class="hl opt">=</span> <span class="hl kwd">swrap_dir_usable</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(!</span>ok<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;SOCKET_WRAPPER_DIR is too long&quot;</span><span class="hl opt">);</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
	<span class="hl opt">}</span>

	t <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_DIR_ALLOW_ORIG&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>t <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;realpath(SOCKET_WRAPPER_DIR) too long and &quot;</span>
			  <span class="hl str">&quot;SOCKET_WRAPPER_DIR_ALLOW_ORIG not set&quot;</span><span class="hl opt">);</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>

	<span class="hl opt">}</span>

	swrap_dir <span class="hl opt">=</span> <span class="hl kwd">strdup</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Unable to duplicate socket_wrapper dir path&quot;</span><span class="hl opt">);</span>
		<span class="hl kwd">abort</span><span class="hl opt">();</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_WARN<span class="hl opt">,</span>
		  <span class="hl str">&quot;realpath(SOCKET_WRAPPER_DIR) too long, &quot;</span>
		  <span class="hl str">&quot;using original SOCKET_WRAPPER_DIR</span><span class="hl esc">\n</span><span class="hl str">&quot;</span><span class="hl opt">);</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span> <span class="hl str">&quot;socket_wrapper_dir:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span> swrap_dir<span class="hl opt">);</span>
	<span class="hl kwa">return</span> swrap_dir<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static unsigned int</span> <span class="hl kwd">socket_wrapper_mtu</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">static unsigned int</span> max_mtu <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> tmp<span class="hl opt">;</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>s<span class="hl opt">;</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>endp<span class="hl opt">;</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>mtu_update_mutex<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>max_mtu <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	max_mtu <span class="hl opt">=</span> SOCKET_WRAPPER_MTU_DEFAULT<span class="hl opt">;</span>

	s <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_MTU&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	tmp <span class="hl opt">=</span> <span class="hl kwd">strtol</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>endp<span class="hl opt">,</span> <span class="hl num">10</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> endp<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>tmp <span class="hl opt">&lt;</span> SOCKET_WRAPPER_MTU_MIN <span class="hl opt">||</span> tmp <span class="hl opt">&gt;</span> SOCKET_WRAPPER_MTU_MAX<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	max_mtu <span class="hl opt">=</span> tmp<span class="hl opt">;</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>mtu_update_mutex<span class="hl opt">);</span>
	<span class="hl kwa">return</span> max_mtu<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(</span>pthread_mutex_t <span class="hl opt">*</span>m<span class="hl opt">)</span>
<span class="hl opt">{</span>
	pthread_mutexattr_t ma<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">pthread_mutexattr_init</span><span class="hl opt">(&amp;</span>ma<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">pthread_mutexattr_settype</span><span class="hl opt">(&amp;</span>ma<span class="hl opt">,</span> PTHREAD_MUTEX_ERRORCHECK<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">pthread_mutex_init</span><span class="hl opt">(</span>m<span class="hl opt">, &amp;</span>ma<span class="hl opt">);</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">pthread_mutexattr_destroy</span><span class="hl opt">(&amp;</span>ma<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static size_t</span> <span class="hl kwd">socket_wrapper_max_sockets</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>s<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> tmp<span class="hl opt">;</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>endp<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>socket_info_max <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> socket_info_max<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	socket_info_max <span class="hl opt">=</span> SOCKET_WRAPPER_MAX_SOCKETS_DEFAULT<span class="hl opt">;</span>

	s <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_MAX_SOCKETS&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> NULL <span class="hl opt">||</span> s<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">] ==</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	tmp <span class="hl opt">=</span> <span class="hl kwd">strtoul</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>endp<span class="hl opt">,</span> <span class="hl num">10</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> endp<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tmp <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		tmp <span class="hl opt">=</span> SOCKET_WRAPPER_MAX_SOCKETS_DEFAULT<span class="hl opt">;</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Invalid number of sockets specified, &quot;</span>
			  <span class="hl str">&quot;using default (</span><span class="hl ipl">%z</span><span class="hl str">u)&quot;</span><span class="hl opt">,</span>
			  tmp<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>tmp <span class="hl opt">&gt;</span> SOCKET_WRAPPER_MAX_SOCKETS_LIMIT<span class="hl opt">) {</span>
		tmp <span class="hl opt">=</span> SOCKET_WRAPPER_MAX_SOCKETS_LIMIT<span class="hl opt">;</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Invalid number of sockets specified, &quot;</span>
			  <span class="hl str">&quot;using maximum (</span><span class="hl ipl">%z</span><span class="hl str">u).&quot;</span><span class="hl opt">,</span>
			  tmp<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	socket_info_max <span class="hl opt">=</span> tmp<span class="hl opt">;</span>

done<span class="hl opt">:</span>
	<span class="hl kwa">return</span> socket_info_max<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">socket_wrapper_init_fds_idx</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> <span class="hl opt">*</span>tmp <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>socket_fds_idx <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	tmp <span class="hl opt">= (</span><span class="hl kwb">int</span> <span class="hl opt">*)</span><span class="hl kwd">calloc</span><span class="hl opt">(</span>socket_fds_max<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">));</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tmp <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to allocate socket fds index array:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  <span class="hl kwd">strerror</span><span class="hl opt">(</span>errno<span class="hl opt">));</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt;</span> socket_fds_max<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		tmp<span class="hl opt">[</span>i<span class="hl opt">] = -</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	socket_fds_idx <span class="hl opt">=</span> tmp<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">socket_wrapper_init_sockets</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">size_t</span> max_sockets<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>sockets_mutex<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>sockets <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>sockets_mutex<span class="hl opt">);</span>
		<span class="hl kwa">return</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * Intialize the static cache early before</span>
<span class="hl com">	 * any thread is able to start.</span>
<span class="hl com">	 */</span>
	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span><span class="hl kwd">swrap_ipv4_net</span><span class="hl opt">();</span>

	<span class="hl kwd">socket_wrapper_init_fds_idx</span><span class="hl opt">();</span>

	<span class="hl com">/* Needs to be called inside the sockets_mutex lock here. */</span>
	max_sockets <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_max_sockets</span><span class="hl opt">();</span>

	sockets <span class="hl opt">= (</span><span class="hl kwb">struct</span> socket_info_container <span class="hl opt">*)</span><span class="hl kwd">calloc</span><span class="hl opt">(</span>max_sockets<span class="hl opt">,</span>
					<span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info_container<span class="hl opt">));</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>sockets <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to allocate sockets array:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  <span class="hl kwd">strerror</span><span class="hl opt">(</span>errno<span class="hl opt">));</span>
		<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>sockets_mutex<span class="hl opt">);</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>

	first_free <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt;</span> max_sockets<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		<span class="hl kwd">swrap_set_next_free</span><span class="hl opt">(&amp;</span>sockets<span class="hl opt">[</span>i<span class="hl opt">].</span>info<span class="hl opt">,</span> i<span class="hl opt">+</span><span class="hl num">1</span><span class="hl opt">);</span>
		ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>sockets<span class="hl opt">[</span>i<span class="hl opt">].</span>meta<span class="hl opt">.</span>mutex<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
				  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* mark the end of the free list */</span>
	<span class="hl kwd">swrap_set_next_free</span><span class="hl opt">(&amp;</span>sockets<span class="hl opt">[</span>max_sockets<span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">].</span>info<span class="hl opt">, -</span><span class="hl num">1</span><span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>autobind_start_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>pcap_dump_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>mtu_update_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>sockets_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>
<span class="hl opt">}</span>

<span class="hl kwb">bool</span> <span class="hl kwd">socket_wrapper_enabled</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>s <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">();</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return false</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>s<span class="hl opt">);</span>

	<span class="hl kwd">socket_wrapper_init_sockets</span><span class="hl opt">();</span>

	<span class="hl kwa">return true</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static unsigned int</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>s <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_DEFAULT_IFACE&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>s<span class="hl opt">) {</span>
		<span class="hl kwb">unsigned int</span> iface<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">sscanf</span><span class="hl opt">(</span>s<span class="hl opt">,</span> <span class="hl str">&quot;</span><span class="hl ipl">%u</span><span class="hl str">&quot;</span><span class="hl opt">, &amp;</span>iface<span class="hl opt">) ==</span> <span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>iface <span class="hl opt">&gt;=</span> <span class="hl num">1</span> <span class="hl opt">&amp;&amp;</span> iface <span class="hl opt">&lt;=</span> MAX_WRAPPED_INTERFACES<span class="hl opt">) {</span>
				<span class="hl kwa">return</span> iface<span class="hl opt">;</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl num">1</span><span class="hl opt">;</span><span class="hl com">/* 127.0.0.1 */</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">set_socket_info_index</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> idx<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;fd=</span><span class="hl ipl">%d</span> <span class="hl str">idx=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  fd<span class="hl opt">,</span> idx<span class="hl opt">);</span>
	socket_fds_idx<span class="hl opt">[</span>fd<span class="hl opt">] =</span> idx<span class="hl opt">;</span>
	<span class="hl com">/* This builtin issues a full memory barrier. */</span>
	<span class="hl kwd">__sync_synchronize</span><span class="hl opt">();</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">reset_socket_info_index</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;fd=</span><span class="hl ipl">%d</span> <span class="hl str">idx=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  fd<span class="hl opt">, -</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl kwd">set_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">, -</span><span class="hl num">1</span><span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>socket_fds_idx <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">((</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>fd <span class="hl opt">&gt;=</span> socket_fds_max<span class="hl opt">) {</span>
		<span class="hl com">/*</span>
<span class="hl com">		 * Do not add a log here as some applications do stupid things</span>
<span class="hl com">		 * like:</span>
<span class="hl com">		 *</span>
<span class="hl com">		 *     for (fd = 0; fd &lt;= getdtablesize(); fd++) {</span>
<span class="hl com">		 *         close(fd)</span>
<span class="hl com">		 *     };</span>
<span class="hl com">		 *</span>
<span class="hl com">		 * This would produce millions of lines of debug messages.</span>
<span class="hl com">		 */</span>
<span class="hl ppc">#if 0</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Looking for a socket info for the fd</span> <span class="hl ipl">%d</span> <span class="hl str">is over the &quot;</span>
			  <span class="hl str">&quot;max socket index limit of</span> <span class="hl ipl">%z</span><span class="hl str">u.&quot;</span><span class="hl opt">,</span>
			  fd<span class="hl opt">,</span>
			  socket_fds_max<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* This builtin issues a full memory barrier. */</span>
	<span class="hl kwd">__sync_synchronize</span><span class="hl opt">();</span>
	<span class="hl kwa">return</span> socket_fds_idx<span class="hl opt">[</span>fd<span class="hl opt">];</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_add_socket_info</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si_input<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">int</span> si_index <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si_input <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>first_free <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> ENFILE<span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	si_index <span class="hl opt">=</span> first_free<span class="hl opt">;</span>
	si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>si_index<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	first_free <span class="hl opt">=</span> <span class="hl kwd">swrap_get_next_free</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl opt">*</span>si <span class="hl opt">= *</span>si_input<span class="hl opt">;</span>
	<span class="hl kwd">swrap_inc_refcount</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

out<span class="hl opt">:</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>

	<span class="hl kwa">return</span> si_index<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_create_socket</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span> <span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> idx<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">((</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>fd <span class="hl opt">&gt;=</span> socket_fds_max<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;The max socket index limit of</span> <span class="hl ipl">%z</span><span class="hl str">u has been reached, &quot;</span>
			  <span class="hl str">&quot;trying to add</span> <span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  socket_fds_max<span class="hl opt">,</span>
			  fd<span class="hl opt">);</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	idx <span class="hl opt">=</span> <span class="hl kwd">swrap_add_socket_info</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>idx <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">set_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> idx<span class="hl opt">);</span>

	<span class="hl kwa">return</span> idx<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">convert_un_in</span><span class="hl opt">(</span><span class="hl kwb">const struct</span> sockaddr_un <span class="hl opt">*</span>un<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>in<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">unsigned int</span> iface<span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> prt<span class="hl opt">;</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>p<span class="hl opt">;</span>
	<span class="hl kwb">char</span> type<span class="hl opt">;</span>

	p <span class="hl opt">=</span> <span class="hl kwd">strrchr</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">,</span> <span class="hl str">&#39;/&#39;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>p<span class="hl opt">)</span> p<span class="hl opt">++;</span> <span class="hl kwa">else</span> p <span class="hl opt">=</span> un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">sscanf</span><span class="hl opt">(</span>p<span class="hl opt">,</span> SOCKET_FORMAT<span class="hl opt">, &amp;</span>type<span class="hl opt">, &amp;</span>iface<span class="hl opt">, &amp;</span>prt<span class="hl opt">) !=</span> <span class="hl num">3</span><span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span> <span class="hl str">&quot;type</span> <span class="hl ipl">%c</span> <span class="hl str">iface</span> <span class="hl ipl">%u</span> <span class="hl str">port</span> <span class="hl ipl">%u</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			type<span class="hl opt">,</span> iface<span class="hl opt">,</span> prt<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>iface <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">||</span> iface <span class="hl opt">&gt;</span> MAX_WRAPPED_INTERFACES<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>prt <span class="hl opt">&gt;</span> <span class="hl num">0xFFFF</span><span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span><span class="hl opt">(</span>type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCKET_TYPE_CHAR_TCP<span class="hl opt">:</span>
	<span class="hl kwa">case</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*</span>in2 <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>in<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">((*</span>len<span class="hl opt">) &lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>in2<span class="hl opt">)) {</span>
		    errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		    <span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">memset</span><span class="hl opt">(</span>in2<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>in2<span class="hl opt">));</span>
		in2<span class="hl opt">-&gt;</span>sin_family <span class="hl opt">=</span> AF_INET<span class="hl opt">;</span>
		in2<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span><span class="hl kwd">swrap_ipv4_iface</span><span class="hl opt">(</span>iface<span class="hl opt">));</span>
		in2<span class="hl opt">-&gt;</span>sin_port <span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>prt<span class="hl opt">);</span>

		<span class="hl opt">*</span>len <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>in2<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> SOCKET_TYPE_CHAR_TCP_V6<span class="hl opt">:</span>
	<span class="hl kwa">case</span> SOCKET_TYPE_CHAR_UDP_V6<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*</span>in2 <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>in<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">((*</span>len<span class="hl opt">) &lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>in2<span class="hl opt">)) {</span>
			errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">memset</span><span class="hl opt">(</span>in2<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>in2<span class="hl opt">));</span>
		in2<span class="hl opt">-&gt;</span>sin6_family <span class="hl opt">=</span> AF_INET6<span class="hl opt">;</span>
		in2<span class="hl opt">-&gt;</span>sin6_addr <span class="hl opt">= *</span><span class="hl kwd">swrap_ipv6</span><span class="hl opt">();</span>
		in2<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">] =</span> iface<span class="hl opt">;</span>
		in2<span class="hl opt">-&gt;</span>sin6_port <span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>prt<span class="hl opt">);</span>

		<span class="hl opt">*</span>len <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>in2<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">convert_in_un_remote</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span> <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>inaddr<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr_un <span class="hl opt">*</span>un<span class="hl opt">,</span>
				<span class="hl kwb">int</span> <span class="hl opt">*</span>bcast<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">char</span> type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> prt<span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> iface<span class="hl opt">;</span>
	<span class="hl kwb">int</span> is_bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>swrap_dir <span class="hl opt">=</span> NULL<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) *</span>bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>inaddr<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*</span>in <span class="hl opt">=</span>
		    <span class="hl opt">(</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>inaddr<span class="hl opt">;</span>
		<span class="hl kwb">unsigned int</span> addr <span class="hl opt">=</span> <span class="hl kwd">ntohl</span><span class="hl opt">(</span>in<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">);</span>
		<span class="hl kwb">char</span> u_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">char</span> b_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">char</span> a_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">const unsigned int</span> sw_net_addr <span class="hl opt">=</span> <span class="hl kwd">swrap_ipv4_net</span><span class="hl opt">();</span>
		<span class="hl kwb">const unsigned int</span> sw_bcast_addr <span class="hl opt">=</span> <span class="hl kwd">swrap_ipv4_bcast</span><span class="hl opt">();</span>

		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
			u_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			u_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			a_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			b_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown socket type!&quot;</span><span class="hl opt">);</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		prt <span class="hl opt">=</span> <span class="hl kwd">ntohs</span><span class="hl opt">(</span>in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>a_type <span class="hl opt">&amp;&amp;</span> addr <span class="hl opt">==</span> <span class="hl num">0xFFFFFFFF</span><span class="hl opt">) {</span>
			<span class="hl com">/* 255.255.255.255 only udp */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">2</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> a_type<span class="hl opt">;</span>
			iface <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>b_type <span class="hl opt">&amp;&amp;</span> addr <span class="hl opt">==</span> sw_bcast_addr<span class="hl opt">) {</span>
			<span class="hl com">/*</span>
<span class="hl com">			 * 127.255.255.255</span>
<span class="hl com">			 * or</span>
<span class="hl com">			 * 10.255.255.255</span>
<span class="hl com">			 * only udp</span>
<span class="hl com">			 */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> b_type<span class="hl opt">;</span>
			iface <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">((</span>addr <span class="hl opt">&amp;</span> <span class="hl num">0xFFFFFF00</span><span class="hl opt">) ==</span> sw_net_addr<span class="hl opt">) {</span>
			<span class="hl com">/* 127.0.0.X or 10.53.57.X */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> u_type<span class="hl opt">;</span>
			iface <span class="hl opt">= (</span>addr <span class="hl opt">&amp;</span> <span class="hl num">0x000000FF</span><span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			errno <span class="hl opt">=</span> ENETUNREACH<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) *</span>bcast <span class="hl opt">=</span> is_bcast<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*</span>in <span class="hl opt">=</span>
		    <span class="hl opt">(</span><span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>inaddr<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> in6_addr cmp1<span class="hl opt">,</span> cmp2<span class="hl opt">;</span>

		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP_V6<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP_V6<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown socket type!&quot;</span><span class="hl opt">);</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl com">/* XXX no multicast/broadcast */</span>

		prt <span class="hl opt">=</span> <span class="hl kwd">ntohs</span><span class="hl opt">(</span>in<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">);</span>

		cmp1 <span class="hl opt">= *</span><span class="hl kwd">swrap_ipv6</span><span class="hl opt">();</span>
		cmp2 <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">;</span>
		cmp2<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">] =</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">IN6_ARE_ADDR_EQUAL</span><span class="hl opt">(&amp;</span>cmp1<span class="hl opt">, &amp;</span>cmp2<span class="hl opt">)) {</span>
			iface <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">];</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			errno <span class="hl opt">=</span> ENETUNREACH<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown address family!&quot;</span><span class="hl opt">);</span>
		errno <span class="hl opt">=</span> ENETUNREACH<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>prt <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_WARN<span class="hl opt">,</span> <span class="hl str">&quot;Port not set&quot;</span><span class="hl opt">);</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	swrap_dir <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">();</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>is_bcast<span class="hl opt">) {</span>
		<span class="hl kwd">swrap_un_path_EINVAL</span><span class="hl opt">(</span>un<span class="hl opt">,</span> swrap_dir<span class="hl opt">);</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_DEBUG<span class="hl opt">,</span> <span class="hl str">&quot;un path [</span><span class="hl ipl">%s</span><span class="hl str">]&quot;</span><span class="hl opt">,</span> un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">);</span>
		<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>
		<span class="hl com">/* the caller need to do more processing */</span>
		<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrap_un_path</span><span class="hl opt">(</span>un<span class="hl opt">,</span> swrap_dir<span class="hl opt">,</span> type<span class="hl opt">,</span> iface<span class="hl opt">,</span> prt<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_DEBUG<span class="hl opt">,</span> <span class="hl str">&quot;un path [</span><span class="hl ipl">%s</span><span class="hl str">]&quot;</span><span class="hl opt">,</span> un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">);</span>

	<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">convert_in_un_alloc</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span> <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>inaddr<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr_un <span class="hl opt">*</span>un<span class="hl opt">,</span>
			       <span class="hl kwb">int</span> <span class="hl opt">*</span>bcast<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">char</span> type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> prt<span class="hl opt">;</span>
	<span class="hl kwb">unsigned int</span> iface<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> stat st<span class="hl opt">;</span>
	<span class="hl kwb">int</span> is_bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>swrap_dir <span class="hl opt">=</span> NULL<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) *</span>bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*</span>in <span class="hl opt">=</span>
		    <span class="hl opt">(</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>inaddr<span class="hl opt">;</span>
		<span class="hl kwb">unsigned int</span> addr <span class="hl opt">=</span> <span class="hl kwd">ntohl</span><span class="hl opt">(</span>in<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">);</span>
		<span class="hl kwb">char</span> u_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">char</span> d_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">char</span> b_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">char</span> a_type <span class="hl opt">=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">;</span>
		<span class="hl kwb">const unsigned int</span> sw_net_addr <span class="hl opt">=</span> <span class="hl kwd">swrap_ipv4_net</span><span class="hl opt">();</span>
		<span class="hl kwb">const unsigned int</span> sw_bcast_addr <span class="hl opt">=</span> <span class="hl kwd">swrap_ipv4_bcast</span><span class="hl opt">();</span>

		prt <span class="hl opt">=</span> <span class="hl kwd">ntohs</span><span class="hl opt">(</span>in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">);</span>

		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
			u_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP<span class="hl opt">;</span>
			d_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			u_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			d_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			a_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			b_type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown socket type!&quot;</span><span class="hl opt">);</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>addr <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl com">/* 0.0.0.0 */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> d_type<span class="hl opt">;</span>
			iface <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>a_type <span class="hl opt">&amp;&amp;</span> addr <span class="hl opt">==</span> <span class="hl num">0xFFFFFFFF</span><span class="hl opt">) {</span>
			<span class="hl com">/* 255.255.255.255 only udp */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">2</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> a_type<span class="hl opt">;</span>
			iface <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>b_type <span class="hl opt">&amp;&amp;</span> addr <span class="hl opt">==</span> sw_bcast_addr<span class="hl opt">) {</span>
			<span class="hl com">/* 127.255.255.255 only udp */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> b_type<span class="hl opt">;</span>
			iface <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">((</span>addr <span class="hl opt">&amp;</span> <span class="hl num">0xFFFFFF00</span><span class="hl opt">) ==</span> sw_net_addr<span class="hl opt">) {</span>
			<span class="hl com">/* 127.0.0.X */</span>
			is_bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			type <span class="hl opt">=</span> u_type<span class="hl opt">;</span>
			iface <span class="hl opt">= (</span>addr <span class="hl opt">&amp;</span> <span class="hl num">0x000000FF</span><span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			errno <span class="hl opt">=</span> EADDRNOTAVAIL<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl com">/* Store the bind address for connect() */</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwb">struct</span> sockaddr_in bind_in<span class="hl opt">;</span>
			socklen_t blen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">);</span>

			<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>bind_in<span class="hl opt">);</span>
			bind_in<span class="hl opt">.</span>sin_family <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin_family<span class="hl opt">;</span>
			bind_in<span class="hl opt">.</span>sin_port <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">;</span>
			bind_in<span class="hl opt">.</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span><span class="hl kwd">swrap_ipv4_iface</span><span class="hl opt">(</span>iface<span class="hl opt">));</span>
			si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> blen<span class="hl opt">;</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in<span class="hl opt">, &amp;</span>bind_in<span class="hl opt">,</span> blen<span class="hl opt">);</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*</span>in <span class="hl opt">=</span>
		    <span class="hl opt">(</span><span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>inaddr<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> in6_addr cmp1<span class="hl opt">,</span> cmp2<span class="hl opt">;</span>

		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP_V6<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP_V6<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown socket type!&quot;</span><span class="hl opt">);</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl com">/* XXX no multicast/broadcast */</span>

		prt <span class="hl opt">=</span> <span class="hl kwd">ntohs</span><span class="hl opt">(</span>in<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">);</span>

		cmp1 <span class="hl opt">= *</span><span class="hl kwd">swrap_ipv6</span><span class="hl opt">();</span>
		cmp2 <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">;</span>
		cmp2<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">] =</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">IN6_IS_ADDR_UNSPECIFIED</span><span class="hl opt">(&amp;</span>in<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">)) {</span>
			iface <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span><span class="hl kwd">IN6_ARE_ADDR_EQUAL</span><span class="hl opt">(&amp;</span>cmp1<span class="hl opt">, &amp;</span>cmp2<span class="hl opt">)) {</span>
			iface <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">];</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			errno <span class="hl opt">=</span> EADDRNOTAVAIL<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl com">/* Store the bind address for connect() */</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwb">struct</span> sockaddr_in6 bind_in<span class="hl opt">;</span>
			socklen_t blen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">);</span>

			<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>bind_in<span class="hl opt">);</span>
			bind_in<span class="hl opt">.</span>sin6_family <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin6_family<span class="hl opt">;</span>
			bind_in<span class="hl opt">.</span>sin6_port <span class="hl opt">=</span> in<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">;</span>

			bind_in<span class="hl opt">.</span>sin6_addr <span class="hl opt">= *</span><span class="hl kwd">swrap_ipv6</span><span class="hl opt">();</span>
			bind_in<span class="hl opt">.</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">] =</span> iface<span class="hl opt">;</span>

			<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in6<span class="hl opt">, &amp;</span>bind_in<span class="hl opt">,</span> blen<span class="hl opt">);</span>
			si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> blen<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown address family&quot;</span><span class="hl opt">);</span>
		errno <span class="hl opt">=</span> EADDRNOTAVAIL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>


	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) *</span>bcast <span class="hl opt">=</span> is_bcast<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>iface <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">||</span> iface <span class="hl opt">&gt;</span> MAX_WRAPPED_INTERFACES<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	swrap_dir <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">();</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>prt <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl com">/* handle auto-allocation of ephemeral ports */</span>
		<span class="hl kwa">for</span> <span class="hl opt">(</span>prt <span class="hl opt">=</span> <span class="hl num">5001</span><span class="hl opt">;</span> prt <span class="hl opt">&lt;</span> <span class="hl num">10000</span><span class="hl opt">;</span> prt<span class="hl opt">++) {</span>
			<span class="hl kwd">swrap_un_path</span><span class="hl opt">(</span>un<span class="hl opt">,</span> swrap_dir<span class="hl opt">,</span> type<span class="hl opt">,</span> iface<span class="hl opt">,</span> prt<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">stat</span><span class="hl opt">(</span>un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">, &amp;</span>st<span class="hl opt">) ==</span> <span class="hl num">0</span><span class="hl opt">)</span> <span class="hl kwa">continue</span><span class="hl opt">;</span>

			<span class="hl kwd">set_port</span><span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span> prt<span class="hl opt">, &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">);</span>
			<span class="hl kwd">set_port</span><span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span> prt<span class="hl opt">, &amp;</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">);</span>

			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>prt <span class="hl opt">==</span> <span class="hl num">10000</span><span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> ENFILE<span class="hl opt">;</span>
			<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrap_un_path</span><span class="hl opt">(</span>un<span class="hl opt">,</span> swrap_dir<span class="hl opt">,</span> type<span class="hl opt">,</span> iface<span class="hl opt">,</span> prt<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_DEBUG<span class="hl opt">,</span> <span class="hl str">&quot;un path [</span><span class="hl ipl">%s</span><span class="hl str">]&quot;</span><span class="hl opt">,</span> un<span class="hl opt">-&gt;</span>sun_path<span class="hl opt">);</span>

	<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static struct</span> socket_info <span class="hl opt">*</span><span class="hl kwd">find_socket_info</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> idx <span class="hl opt">=</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>idx <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>idx<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl ppc">#if 0</span> <span class="hl com">/* FIXME */</span><span class="hl ppc"></span>
<span class="hl kwb">static bool</span> <span class="hl kwd">check_addr_port_in_use</span><span class="hl opt">(</span><span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>sa<span class="hl opt">,</span> socklen_t len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info_fd <span class="hl opt">*</span>f<span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> socket_info <span class="hl opt">*</span>last_s <span class="hl opt">=</span> NULL<span class="hl opt">;</span>

	<span class="hl com">/* first catch invalid input */</span>
	<span class="hl kwa">switch</span> <span class="hl opt">(</span>sa<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>len <span class="hl opt">&lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">)) {</span>
			<span class="hl kwa">return false</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>len <span class="hl opt">&lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">)) {</span>
			<span class="hl kwa">return false</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">return false</span><span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>f <span class="hl opt">=</span> socket_fds<span class="hl opt">;</span> f<span class="hl opt">;</span> f <span class="hl opt">=</span> f<span class="hl opt">-&gt;</span>next<span class="hl opt">) {</span>
		<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>s <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>f<span class="hl opt">-&gt;</span>si_index<span class="hl opt">);</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> last_s<span class="hl opt">) {</span>
			<span class="hl kwa">continue</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		last_s <span class="hl opt">=</span> s<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>s<span class="hl opt">-&gt;</span>myname <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwa">continue</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>s<span class="hl opt">-&gt;</span>myname<span class="hl opt">-&gt;</span>sa_family <span class="hl opt">!=</span> sa<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
			<span class="hl kwa">continue</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>s<span class="hl opt">-&gt;</span>myname<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
			<span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*</span>sin1<span class="hl opt">, *</span>sin2<span class="hl opt">;</span>

			sin1 <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*)</span>s<span class="hl opt">-&gt;</span>myname<span class="hl opt">;</span>
			sin2 <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*)</span>sa<span class="hl opt">;</span>

			<span class="hl kwa">if</span> <span class="hl opt">(</span>sin1<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">==</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span>INADDR_ANY<span class="hl opt">)) {</span>
				<span class="hl kwa">continue</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>sin1<span class="hl opt">-&gt;</span>sin_port <span class="hl opt">!=</span> sin2<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">) {</span>
				<span class="hl kwa">continue</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>sin1<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">!=</span> sin2<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">) {</span>
				<span class="hl kwa">continue</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl com">/* found */</span>
			<span class="hl kwa">return true</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
		<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
			<span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*</span>sin1<span class="hl opt">, *</span>sin2<span class="hl opt">;</span>

			sin1 <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*)</span>s<span class="hl opt">-&gt;</span>myname<span class="hl opt">;</span>
			sin2 <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*)</span>sa<span class="hl opt">;</span>

			<span class="hl kwa">if</span> <span class="hl opt">(</span>sin1<span class="hl opt">-&gt;</span>sin6_port <span class="hl opt">!=</span> sin2<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">) {</span>
				<span class="hl kwa">continue</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
			<span class="hl kwa">if</span> <span class="hl opt">(!</span><span class="hl kwd">IN6_ARE_ADDR_EQUAL</span><span class="hl opt">(&amp;</span>sin1<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">,</span>
						<span class="hl opt">&amp;</span>sin2<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">))</span>
			<span class="hl opt">{</span>
				<span class="hl kwa">continue</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl com">/* found */</span>
			<span class="hl kwa">return true</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwa">continue</span><span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>

		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return false</span><span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">int</span> si_index<span class="hl opt">;</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span> <span class="hl str">&quot;remove stale wrapper for</span> <span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span> fd<span class="hl opt">);</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>

	si_index <span class="hl opt">=</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si_index <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>
		<span class="hl kwa">return</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">reset_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>

	si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>si_index<span class="hl opt">);</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">swrap_dec_refcount</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">swrap_get_refcount</span><span class="hl opt">(</span>si<span class="hl opt">) &gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>un_addr<span class="hl opt">.</span>sun_path<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">] !=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">) {</span>
		<span class="hl kwd">unlink</span><span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>un_addr<span class="hl opt">.</span>sun_path<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrap_set_next_free</span><span class="hl opt">(</span>si<span class="hl opt">,</span> first_free<span class="hl opt">);</span>
	first_free <span class="hl opt">=</span> si_index<span class="hl opt">;</span>

out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">sockaddr_convert_to_un</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				  <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>in_addr<span class="hl opt">,</span>
				  socklen_t in_len<span class="hl opt">,</span>
				  <span class="hl kwb">struct</span> sockaddr_un <span class="hl opt">*</span>out_addr<span class="hl opt">,</span>
				  <span class="hl kwb">int</span> alloc_sock<span class="hl opt">,</span>
				  <span class="hl kwb">int</span> <span class="hl opt">*</span>bcast<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>out <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>out_addr<span class="hl opt">;</span>

	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span> in_len<span class="hl opt">;</span> <span class="hl com">/* unused */</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>out_addr <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	out<span class="hl opt">-&gt;</span>sa_family <span class="hl opt">=</span> AF_UNIX<span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_SOCKADDR_SA_LEN</span>
	out<span class="hl opt">-&gt;</span>sa_len <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>out_addr<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>in_addr<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_UNSPEC<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*</span>sin<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family <span class="hl opt">!=</span> AF_INET<span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>in_len <span class="hl opt">&lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">)) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		sin <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>in_addr<span class="hl opt">;</span>
		<span class="hl kwa">if</span><span class="hl opt">(</span>sin<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">!=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span>INADDR_ANY<span class="hl opt">)) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl com">/*</span>
<span class="hl com">		 * Note: in the special case of AF_UNSPEC and INADDR_ANY,</span>
<span class="hl com">		 * AF_UNSPEC is mapped to AF_INET and must be treated here.</span>
<span class="hl com">		 */</span>

		FALL_THROUGH<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown socket type!&quot;</span><span class="hl opt">);</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>alloc_sock<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl kwd">convert_in_un_alloc</span><span class="hl opt">(</span>si<span class="hl opt">,</span> in_addr<span class="hl opt">,</span> out_addr<span class="hl opt">,</span> bcast<span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwa">return</span> <span class="hl kwd">convert_in_un_remote</span><span class="hl opt">(</span>si<span class="hl opt">,</span> in_addr<span class="hl opt">,</span> out_addr<span class="hl opt">,</span> bcast<span class="hl opt">);</span>
		<span class="hl opt">}</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	errno <span class="hl opt">=</span> EAFNOSUPPORT<span class="hl opt">;</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown address family&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">sockaddr_convert_from_un</span><span class="hl opt">(</span><span class="hl kwb">const struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				    <span class="hl kwb">const struct</span> sockaddr_un <span class="hl opt">*</span>in_addr<span class="hl opt">,</span>
				    socklen_t un_addrlen<span class="hl opt">,</span>
				    <span class="hl kwb">int</span> family<span class="hl opt">,</span>
				    <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>out_addr<span class="hl opt">,</span>
				    socklen_t <span class="hl opt">*</span>out_addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>out_addr <span class="hl opt">==</span> NULL <span class="hl opt">||</span> out_addrlen <span class="hl opt">==</span> NULL<span class="hl opt">)</span>
		<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>un_addrlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl opt">*</span>out_addrlen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown socket type!&quot;</span><span class="hl opt">);</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		ret <span class="hl opt">=</span> <span class="hl kwd">convert_un_in</span><span class="hl opt">(</span>in_addr<span class="hl opt">,</span> out_addr<span class="hl opt">,</span> out_addrlen<span class="hl opt">);</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_SOCKADDR_SA_LEN</span>
		out_addr<span class="hl opt">-&gt;</span>sa_len <span class="hl opt">= *</span>out_addrlen<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Unknown address family&quot;</span><span class="hl opt">);</span>
	errno <span class="hl opt">=</span> EAFNOSUPPORT<span class="hl opt">;</span>
	<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">enum</span> swrap_packet_type <span class="hl opt">{</span>
	SWRAP_CONNECT_SEND<span class="hl opt">,</span>
	SWRAP_CONNECT_UNREACH<span class="hl opt">,</span>
	SWRAP_CONNECT_RECV<span class="hl opt">,</span>
	SWRAP_CONNECT_ACK<span class="hl opt">,</span>
	SWRAP_ACCEPT_SEND<span class="hl opt">,</span>
	SWRAP_ACCEPT_RECV<span class="hl opt">,</span>
	SWRAP_ACCEPT_ACK<span class="hl opt">,</span>
	SWRAP_RECVFROM<span class="hl opt">,</span>
	SWRAP_SENDTO<span class="hl opt">,</span>
	SWRAP_SENDTO_UNREACH<span class="hl opt">,</span>
	SWRAP_PENDING_RST<span class="hl opt">,</span>
	SWRAP_RECV<span class="hl opt">,</span>
	SWRAP_RECV_RST<span class="hl opt">,</span>
	SWRAP_SEND<span class="hl opt">,</span>
	SWRAP_SEND_RST<span class="hl opt">,</span>
	SWRAP_CLOSE_SEND<span class="hl opt">,</span>
	SWRAP_CLOSE_RECV<span class="hl opt">,</span>
	SWRAP_CLOSE_ACK<span class="hl opt">,</span>
<span class="hl opt">};</span>

<span class="hl kwb">struct</span> swrap_file_hdr <span class="hl opt">{</span>
	<span class="hl kwb">uint32_t</span>	magic<span class="hl opt">;</span>
	<span class="hl kwb">uint16_t</span>	version_major<span class="hl opt">;</span>
	<span class="hl kwb">uint16_t</span>	version_minor<span class="hl opt">;</span>
	<span class="hl kwb">int32_t</span>		timezone<span class="hl opt">;</span>
	<span class="hl kwb">uint32_t</span>	sigfigs<span class="hl opt">;</span>
	<span class="hl kwb">uint32_t</span>	frame_max_len<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_FRAME_LENGTH_MAX 0xFFFF</span>
	<span class="hl kwb">uint32_t</span>	link_type<span class="hl opt">;</span>
<span class="hl opt">};</span>
<span class="hl ppc">#define SWRAP_FILE_HDR_SIZE 24</span>

<span class="hl kwb">struct</span> swrap_packet_frame <span class="hl opt">{</span>
	<span class="hl kwb">uint32_t</span> seconds<span class="hl opt">;</span>
	<span class="hl kwb">uint32_t</span> micro_seconds<span class="hl opt">;</span>
	<span class="hl kwb">uint32_t</span> recorded_length<span class="hl opt">;</span>
	<span class="hl kwb">uint32_t</span> full_length<span class="hl opt">;</span>
<span class="hl opt">};</span>
<span class="hl ppc">#define SWRAP_PACKET_FRAME_SIZE 16</span>

<span class="hl kwb">union</span> swrap_packet_ip <span class="hl opt">{</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint8_t</span>		ver_hdrlen<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		tos<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	packet_length<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	identification<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		flags<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		fragment<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		ttl<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		protocol<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	hdr_checksum<span class="hl opt">;</span>
		<span class="hl kwb">uint32_t</span>	src_addr<span class="hl opt">;</span>
		<span class="hl kwb">uint32_t</span>	dest_addr<span class="hl opt">;</span>
	<span class="hl opt">}</span> v4<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_PACKET_IP_V4_SIZE 20</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint8_t</span>		ver_prio<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		flow_label_high<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	flow_label_low<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	payload_length<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		next_header<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		hop_limit<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		src_addr<span class="hl opt">[</span><span class="hl num">16</span><span class="hl opt">];</span>
		<span class="hl kwb">uint8_t</span>		dest_addr<span class="hl opt">[</span><span class="hl num">16</span><span class="hl opt">];</span>
	<span class="hl opt">}</span> v6<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_PACKET_IP_V6_SIZE 40</span>
<span class="hl opt">};</span>
<span class="hl ppc">#define SWRAP_PACKET_IP_SIZE 40</span>

<span class="hl kwb">union</span> swrap_packet_payload <span class="hl opt">{</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint16_t</span>	source_port<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	dest_port<span class="hl opt">;</span>
		<span class="hl kwb">uint32_t</span>	seq_num<span class="hl opt">;</span>
		<span class="hl kwb">uint32_t</span>	ack_num<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		hdr_length<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		control<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	window<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	checksum<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	urg<span class="hl opt">;</span>
	<span class="hl opt">}</span> tcp<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_PACKET_PAYLOAD_TCP_SIZE 20</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint16_t</span>	source_port<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	dest_port<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	length<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	checksum<span class="hl opt">;</span>
	<span class="hl opt">}</span> udp<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_PACKET_PAYLOAD_UDP_SIZE 8</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint8_t</span>		type<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		code<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	checksum<span class="hl opt">;</span>
		<span class="hl kwb">uint32_t</span>	unused<span class="hl opt">;</span>
	<span class="hl opt">}</span> icmp4<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_PACKET_PAYLOAD_ICMP4_SIZE 8</span>
	<span class="hl kwb">struct</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint8_t</span>		type<span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span>		code<span class="hl opt">;</span>
		<span class="hl kwb">uint16_t</span>	checksum<span class="hl opt">;</span>
		<span class="hl kwb">uint32_t</span>	unused<span class="hl opt">;</span>
	<span class="hl opt">}</span> icmp6<span class="hl opt">;</span>
<span class="hl ppc">#define SWRAP_PACKET_PAYLOAD_ICMP6_SIZE 8</span>
<span class="hl opt">};</span>
<span class="hl ppc">#define SWRAP_PACKET_PAYLOAD_SIZE 20</span>

<span class="hl ppc">#define SWRAP_PACKET_MIN_ALLOC \</span>
<span class="hl ppc">	(SWRAP_PACKET_FRAME_SIZE + \</span>
<span class="hl ppc">	 SWRAP_PACKET_IP_SIZE + \</span>
<span class="hl ppc">	 SWRAP_PACKET_PAYLOAD_SIZE)</span>

<span class="hl kwb">static const char</span> <span class="hl opt">*</span><span class="hl kwd">swrap_pcap_init_file</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">static int</span> initialized <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">static const char</span> <span class="hl opt">*</span>s <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">static const struct</span> swrap_file_hdr h<span class="hl opt">;</span>
	<span class="hl kwb">static const struct</span> swrap_packet_frame f<span class="hl opt">;</span>
	<span class="hl kwb">static const union</span> swrap_packet_ip i<span class="hl opt">;</span>
	<span class="hl kwb">static const union</span> swrap_packet_payload p<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>initialized <span class="hl opt">==</span> <span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> s<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	initialized <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * TODO: don&#39;t use the structs use plain buffer offsets</span>
<span class="hl com">	 *       and PUSH_U8(), PUSH_U16() and PUSH_U32()</span>
<span class="hl com">	 *</span>
<span class="hl com">	 * for now make sure we disable PCAP support</span>
<span class="hl com">	 * if the struct has alignment!</span>
<span class="hl com">	 */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>h<span class="hl opt">) !=</span> SWRAP_FILE_HDR_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>f<span class="hl opt">) !=</span> SWRAP_PACKET_FRAME_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>i<span class="hl opt">) !=</span> SWRAP_PACKET_IP_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>i<span class="hl opt">.</span>v4<span class="hl opt">) !=</span> SWRAP_PACKET_IP_V4_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>i<span class="hl opt">.</span>v6<span class="hl opt">) !=</span> SWRAP_PACKET_IP_V6_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>p<span class="hl opt">) !=</span> SWRAP_PACKET_PAYLOAD_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>p<span class="hl opt">.</span>tcp<span class="hl opt">) !=</span> SWRAP_PACKET_PAYLOAD_TCP_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>p<span class="hl opt">.</span>udp<span class="hl opt">) !=</span> SWRAP_PACKET_PAYLOAD_UDP_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>p<span class="hl opt">.</span>icmp4<span class="hl opt">) !=</span> SWRAP_PACKET_PAYLOAD_ICMP4_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span>p<span class="hl opt">.</span>icmp6<span class="hl opt">) !=</span> SWRAP_PACKET_PAYLOAD_ICMP6_SIZE<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	s <span class="hl opt">=</span> <span class="hl kwd">getenv</span><span class="hl opt">(</span><span class="hl str">&quot;SOCKET_WRAPPER_PCAP_FILE&quot;</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>s <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">strncmp</span><span class="hl opt">(</span>s<span class="hl opt">,</span> <span class="hl str">&quot;./&quot;</span><span class="hl opt">,</span> <span class="hl num">2</span><span class="hl opt">) ==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		s <span class="hl opt">+=</span> <span class="hl num">2</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span> <span class="hl str">&quot;SOCKET_WRAPPER_PCAP_FILE:</span> <span class="hl ipl">%s</span><span class="hl str">&quot;</span><span class="hl opt">,</span> s<span class="hl opt">);</span>
	<span class="hl kwa">return</span> s<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static uint8_t</span> <span class="hl opt">*</span><span class="hl kwd">swrap_pcap_packet_init</span><span class="hl opt">(</span><span class="hl kwb">struct</span> timeval <span class="hl opt">*</span>tval<span class="hl opt">,</span>
				       <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>src<span class="hl opt">,</span>
				       <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>dest<span class="hl opt">,</span>
				       <span class="hl kwb">int</span> socket_type<span class="hl opt">,</span>
				       <span class="hl kwb">const uint8_t</span> <span class="hl opt">*</span>payload<span class="hl opt">,</span>
				       <span class="hl kwb">size_t</span> payload_len<span class="hl opt">,</span>
				       <span class="hl kwb">unsigned long</span> tcp_seqno<span class="hl opt">,</span>
				       <span class="hl kwb">unsigned long</span> tcp_ack<span class="hl opt">,</span>
				       <span class="hl kwb">unsigned char</span> tcp_ctl<span class="hl opt">,</span>
				       <span class="hl kwb">int</span> unreachable<span class="hl opt">,</span>
				       <span class="hl kwb">size_t</span> <span class="hl opt">*</span>_packet_len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>base <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>buf <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">union</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>ptr<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> swrap_packet_frame <span class="hl opt">*</span>frame<span class="hl opt">;</span>
	<span class="hl opt">}</span> f<span class="hl opt">;</span>
	<span class="hl kwb">union</span> <span class="hl opt">{</span>
		<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>ptr<span class="hl opt">;</span>
		<span class="hl kwb">union</span> swrap_packet_ip <span class="hl opt">*</span>ip<span class="hl opt">;</span>
	<span class="hl opt">}</span> i<span class="hl opt">;</span>
	<span class="hl kwb">union</span> swrap_packet_payload <span class="hl opt">*</span>pay<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> packet_len<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> alloc_len<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> nonwire_len <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> swrap_packet_frame<span class="hl opt">);</span>
	<span class="hl kwb">size_t</span> wire_hdr_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> wire_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> ip_hdr_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> icmp_hdr_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> icmp_truncate_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> protocol <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">,</span> icmp_protocol <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*</span>src_in <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*</span>dest_in <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*</span>src_in6 <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*</span>dest_in6 <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwb">uint16_t</span> src_port<span class="hl opt">;</span>
	<span class="hl kwb">uint16_t</span> dest_port<span class="hl opt">;</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>src<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		src_in <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>src<span class="hl opt">;</span>
		dest_in <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>dest<span class="hl opt">;</span>
		src_port <span class="hl opt">=</span> src_in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">;</span>
		dest_port <span class="hl opt">=</span> dest_in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">;</span>
		ip_hdr_len <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		src_in6 <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>src<span class="hl opt">;</span>
		dest_in6 <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>dest<span class="hl opt">;</span>
		src_port <span class="hl opt">=</span> src_in6<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">;</span>
		dest_port <span class="hl opt">=</span> dest_in6<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">;</span>
		ip_hdr_len <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>socket_type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		protocol <span class="hl opt">=</span> <span class="hl num">0x06</span><span class="hl opt">;</span> <span class="hl com">/* TCP */</span>
		wire_hdr_len <span class="hl opt">=</span> ip_hdr_len <span class="hl opt">+</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">);</span>
		wire_len <span class="hl opt">=</span> wire_hdr_len <span class="hl opt">+</span> payload_len<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		protocol <span class="hl opt">=</span> <span class="hl num">0x11</span><span class="hl opt">;</span> <span class="hl com">/* UDP */</span>
		wire_hdr_len <span class="hl opt">=</span> ip_hdr_len <span class="hl opt">+</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>pay<span class="hl opt">-&gt;</span>udp<span class="hl opt">);</span>
		wire_len <span class="hl opt">=</span> wire_hdr_len <span class="hl opt">+</span> payload_len<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>unreachable<span class="hl opt">) {</span>
		icmp_protocol <span class="hl opt">=</span> protocol<span class="hl opt">;</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>src<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
			protocol <span class="hl opt">=</span> <span class="hl num">0x01</span><span class="hl opt">;</span> <span class="hl com">/* ICMPv4 */</span>
			icmp_hdr_len <span class="hl opt">=</span> ip_hdr_len <span class="hl opt">+</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>pay<span class="hl opt">-&gt;</span>icmp4<span class="hl opt">);</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
		<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
			protocol <span class="hl opt">=</span> <span class="hl num">0x3A</span><span class="hl opt">;</span> <span class="hl com">/* ICMPv6 */</span>
			icmp_hdr_len <span class="hl opt">=</span> ip_hdr_len <span class="hl opt">+</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>pay<span class="hl opt">-&gt;</span>icmp6<span class="hl opt">);</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>wire_len <span class="hl opt">&gt;</span> <span class="hl num">64</span> <span class="hl opt">) {</span>
			icmp_truncate_len <span class="hl opt">=</span> wire_len <span class="hl opt">-</span> <span class="hl num">64</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		wire_len <span class="hl opt">+=</span> icmp_hdr_len<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	packet_len <span class="hl opt">=</span> nonwire_len <span class="hl opt">+</span> wire_len<span class="hl opt">;</span>
	alloc_len <span class="hl opt">=</span> packet_len<span class="hl opt">;</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>alloc_len <span class="hl opt">&lt;</span> SWRAP_PACKET_MIN_ALLOC<span class="hl opt">) {</span>
		alloc_len <span class="hl opt">=</span> SWRAP_PACKET_MIN_ALLOC<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	base <span class="hl opt">= (</span><span class="hl kwb">uint8_t</span> <span class="hl opt">*)</span><span class="hl kwd">calloc</span><span class="hl opt">(</span><span class="hl num">1</span><span class="hl opt">,</span> alloc_len<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>base <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> base<span class="hl opt">;</span>
	f<span class="hl opt">.</span>ptr <span class="hl opt">=</span> buf<span class="hl opt">;</span>

	f<span class="hl opt">.</span>frame<span class="hl opt">-&gt;</span>seconds		<span class="hl opt">=</span> tval<span class="hl opt">-&gt;</span>tv_sec<span class="hl opt">;</span>
	f<span class="hl opt">.</span>frame<span class="hl opt">-&gt;</span>micro_seconds	<span class="hl opt">=</span> tval<span class="hl opt">-&gt;</span>tv_usec<span class="hl opt">;</span>
	f<span class="hl opt">.</span>frame<span class="hl opt">-&gt;</span>recorded_length	<span class="hl opt">=</span> wire_len <span class="hl opt">-</span> icmp_truncate_len<span class="hl opt">;</span>
	f<span class="hl opt">.</span>frame<span class="hl opt">-&gt;</span>full_length	<span class="hl opt">=</span> wire_len <span class="hl opt">-</span> icmp_truncate_len<span class="hl opt">;</span>

	buf <span class="hl opt">+=</span> SWRAP_PACKET_FRAME_SIZE<span class="hl opt">;</span>

	i<span class="hl opt">.</span>ptr <span class="hl opt">=</span> buf<span class="hl opt">;</span>
	<span class="hl kwa">switch</span> <span class="hl opt">(</span>src<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>src_in <span class="hl opt">==</span> NULL <span class="hl opt">||</span> dest_in <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>base<span class="hl opt">);</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>ver_hdrlen	<span class="hl opt">=</span> <span class="hl num">0x45</span><span class="hl opt">;</span> <span class="hl com">/* version 4 and 5 * 32 bit words */</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>tos		<span class="hl opt">=</span> <span class="hl num">0x00</span><span class="hl opt">;</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>packet_length	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>wire_len <span class="hl opt">-</span> icmp_truncate_len<span class="hl opt">);</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>identification	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0xFFFF</span><span class="hl opt">);</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>flags		<span class="hl opt">=</span> <span class="hl num">0x40</span><span class="hl opt">;</span> <span class="hl com">/* BIT 1 set - means don&#39;t fragment */</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>fragment	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>ttl		<span class="hl opt">=</span> <span class="hl num">0xFF</span><span class="hl opt">;</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>protocol	<span class="hl opt">=</span> protocol<span class="hl opt">;</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>hdr_checksum	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>src_addr	<span class="hl opt">=</span> src_in<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">;</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>dest_addr	<span class="hl opt">=</span> dest_in<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">;</span>
		buf <span class="hl opt">+=</span> SWRAP_PACKET_IP_V4_SIZE<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>src_in6 <span class="hl opt">==</span> NULL <span class="hl opt">||</span> dest_in6 <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>base<span class="hl opt">);</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>ver_prio		<span class="hl opt">=</span> <span class="hl num">0x60</span><span class="hl opt">;</span> <span class="hl com">/* version 4 and 5 * 32 bit words */</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>flow_label_high	<span class="hl opt">=</span> <span class="hl num">0x00</span><span class="hl opt">;</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>flow_label_low	<span class="hl opt">=</span> <span class="hl num">0x0000</span><span class="hl opt">;</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>payload_length	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>wire_len <span class="hl opt">-</span> icmp_truncate_len<span class="hl opt">);</span> <span class="hl com">/* TODO */</span>
		i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>next_header	<span class="hl opt">=</span> protocol<span class="hl opt">;</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>src_addr<span class="hl opt">,</span> src_in6<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">,</span> <span class="hl num">16</span><span class="hl opt">);</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>dest_addr<span class="hl opt">,</span> dest_in6<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">,</span> <span class="hl num">16</span><span class="hl opt">);</span>
		buf <span class="hl opt">+=</span> SWRAP_PACKET_IP_V6_SIZE<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>unreachable<span class="hl opt">) {</span>
		pay <span class="hl opt">= (</span><span class="hl kwb">union</span> swrap_packet_payload <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>buf<span class="hl opt">;</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>src<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
			pay<span class="hl opt">-&gt;</span>icmp4<span class="hl opt">.</span>type		<span class="hl opt">=</span> <span class="hl num">0x03</span><span class="hl opt">;</span> <span class="hl com">/* destination unreachable */</span>
			pay<span class="hl opt">-&gt;</span>icmp4<span class="hl opt">.</span>code		<span class="hl opt">=</span> <span class="hl num">0x01</span><span class="hl opt">;</span> <span class="hl com">/* host unreachable */</span>
			pay<span class="hl opt">-&gt;</span>icmp4<span class="hl opt">.</span>checksum	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
			pay<span class="hl opt">-&gt;</span>icmp4<span class="hl opt">.</span>unused	<span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span><span class="hl num">0x00000000</span><span class="hl opt">);</span>

			buf <span class="hl opt">+=</span> SWRAP_PACKET_PAYLOAD_ICMP4_SIZE<span class="hl opt">;</span>

			<span class="hl com">/* set the ip header in the ICMP payload */</span>
			i<span class="hl opt">.</span>ptr <span class="hl opt">=</span> buf<span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>ver_hdrlen	<span class="hl opt">=</span> <span class="hl num">0x45</span><span class="hl opt">;</span> <span class="hl com">/* version 4 and 5 * 32 bit words */</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>tos		<span class="hl opt">=</span> <span class="hl num">0x00</span><span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>packet_length	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>wire_len <span class="hl opt">-</span> icmp_hdr_len<span class="hl opt">);</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>identification	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0xFFFF</span><span class="hl opt">);</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>flags		<span class="hl opt">=</span> <span class="hl num">0x40</span><span class="hl opt">;</span> <span class="hl com">/* BIT 1 set - means don&#39;t fragment */</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>fragment	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>ttl		<span class="hl opt">=</span> <span class="hl num">0xFF</span><span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>protocol	<span class="hl opt">=</span> icmp_protocol<span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>hdr_checksum	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>src_addr	<span class="hl opt">=</span> dest_in<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v4<span class="hl opt">.</span>dest_addr	<span class="hl opt">=</span> src_in<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">;</span>

			buf <span class="hl opt">+=</span> SWRAP_PACKET_IP_V4_SIZE<span class="hl opt">;</span>

			src_port <span class="hl opt">=</span> dest_in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">;</span>
			dest_port <span class="hl opt">=</span> src_in<span class="hl opt">-&gt;</span>sin_port<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
		<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
			pay<span class="hl opt">-&gt;</span>icmp6<span class="hl opt">.</span>type		<span class="hl opt">=</span> <span class="hl num">0x01</span><span class="hl opt">;</span> <span class="hl com">/* destination unreachable */</span>
			pay<span class="hl opt">-&gt;</span>icmp6<span class="hl opt">.</span>code		<span class="hl opt">=</span> <span class="hl num">0x03</span><span class="hl opt">;</span> <span class="hl com">/* address unreachable */</span>
			pay<span class="hl opt">-&gt;</span>icmp6<span class="hl opt">.</span>checksum	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
			pay<span class="hl opt">-&gt;</span>icmp6<span class="hl opt">.</span>unused	<span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span><span class="hl num">0x00000000</span><span class="hl opt">);</span>
			buf <span class="hl opt">+=</span> SWRAP_PACKET_PAYLOAD_ICMP6_SIZE<span class="hl opt">;</span>

			<span class="hl com">/* set the ip header in the ICMP payload */</span>
			i<span class="hl opt">.</span>ptr <span class="hl opt">=</span> buf<span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>ver_prio		<span class="hl opt">=</span> <span class="hl num">0x60</span><span class="hl opt">;</span> <span class="hl com">/* version 4 and 5 * 32 bit words */</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>flow_label_high	<span class="hl opt">=</span> <span class="hl num">0x00</span><span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>flow_label_low	<span class="hl opt">=</span> <span class="hl num">0x0000</span><span class="hl opt">;</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>payload_length	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>wire_len <span class="hl opt">-</span> icmp_truncate_len<span class="hl opt">);</span> <span class="hl com">/* TODO */</span>
			i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>next_header	<span class="hl opt">=</span> protocol<span class="hl opt">;</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(</span>i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>src_addr<span class="hl opt">,</span> dest_in6<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">,</span> <span class="hl num">16</span><span class="hl opt">);</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(</span>i<span class="hl opt">.</span>ip<span class="hl opt">-&gt;</span>v6<span class="hl opt">.</span>dest_addr<span class="hl opt">,</span> src_in6<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">,</span> <span class="hl num">16</span><span class="hl opt">);</span>

			buf <span class="hl opt">+=</span> SWRAP_PACKET_IP_V6_SIZE<span class="hl opt">;</span>

			src_port <span class="hl opt">=</span> dest_in6<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">;</span>
			dest_port <span class="hl opt">=</span> src_in6<span class="hl opt">-&gt;</span>sin6_port<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	pay <span class="hl opt">= (</span><span class="hl kwb">union</span> swrap_packet_payload <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>buf<span class="hl opt">;</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>socket_type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>source_port	<span class="hl opt">=</span> src_port<span class="hl opt">;</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>dest_port	<span class="hl opt">=</span> dest_port<span class="hl opt">;</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>seq_num	<span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span>tcp_seqno<span class="hl opt">);</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>ack_num	<span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span>tcp_ack<span class="hl opt">);</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>hdr_length	<span class="hl opt">=</span> <span class="hl num">0x50</span><span class="hl opt">;</span> <span class="hl com">/* 5 * 32 bit words */</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>control	<span class="hl opt">=</span> tcp_ctl<span class="hl opt">;</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>window		<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x7FFF</span><span class="hl opt">);</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>checksum	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
		pay<span class="hl opt">-&gt;</span>tcp<span class="hl opt">.</span>urg		<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
		buf <span class="hl opt">+=</span> SWRAP_PACKET_PAYLOAD_TCP_SIZE<span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		pay<span class="hl opt">-&gt;</span>udp<span class="hl opt">.</span>source_port	<span class="hl opt">=</span> src_port<span class="hl opt">;</span>
		pay<span class="hl opt">-&gt;</span>udp<span class="hl opt">.</span>dest_port	<span class="hl opt">=</span> dest_port<span class="hl opt">;</span>
		pay<span class="hl opt">-&gt;</span>udp<span class="hl opt">.</span>length		<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">8</span> <span class="hl opt">+</span> payload_len<span class="hl opt">);</span>
		pay<span class="hl opt">-&gt;</span>udp<span class="hl opt">.</span>checksum	<span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span><span class="hl num">0x0000</span><span class="hl opt">);</span>
		buf <span class="hl opt">+=</span> SWRAP_PACKET_PAYLOAD_UDP_SIZE<span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>payload <span class="hl opt">&amp;&amp;</span> payload_len <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>buf<span class="hl opt">,</span> payload<span class="hl opt">,</span> payload_len<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl opt">*</span>_packet_len <span class="hl opt">=</span> packet_len <span class="hl opt">-</span> icmp_truncate_len<span class="hl opt">;</span>
	<span class="hl kwa">return</span> base<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_pcap_get_fd</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>fname<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">static int</span> fd <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	fd <span class="hl opt">=</span> <span class="hl kwd">libc_open</span><span class="hl opt">(</span>fname<span class="hl opt">,</span> O_WRONLY<span class="hl opt">|</span>O_CREAT<span class="hl opt">|</span>O_EXCL<span class="hl opt">|</span>O_APPEND<span class="hl opt">,</span> <span class="hl num">0644</span><span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwb">struct</span> swrap_file_hdr file_hdr<span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>magic		<span class="hl opt">=</span> <span class="hl num">0xA1B2C3D4</span><span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>version_major	<span class="hl opt">=</span> <span class="hl num">0x0002</span><span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>version_minor	<span class="hl opt">=</span> <span class="hl num">0x0004</span><span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>timezone	<span class="hl opt">=</span> <span class="hl num">0x00000000</span><span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>sigfigs	<span class="hl opt">=</span> <span class="hl num">0x00000000</span><span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>frame_max_len	<span class="hl opt">=</span> SWRAP_FRAME_LENGTH_MAX<span class="hl opt">;</span>
		file_hdr<span class="hl opt">.</span>link_type	<span class="hl opt">=</span> <span class="hl num">0x0065</span><span class="hl opt">;</span> <span class="hl com">/* 101 RAW IP */</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">write</span><span class="hl opt">(</span>fd<span class="hl opt">, &amp;</span>file_hdr<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>file_hdr<span class="hl opt">)) !=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>file_hdr<span class="hl opt">)) {</span>
			<span class="hl kwd">close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
			fd <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	fd <span class="hl opt">=</span> <span class="hl kwd">libc_open</span><span class="hl opt">(</span>fname<span class="hl opt">,</span> O_WRONLY<span class="hl opt">|</span>O_APPEND<span class="hl opt">,</span> <span class="hl num">0644</span><span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static uint8_t</span> <span class="hl opt">*</span><span class="hl kwd">swrap_pcap_marshall_packet</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
					   <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
					   <span class="hl kwb">enum</span> swrap_packet_type type<span class="hl opt">,</span>
					   <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span>
					   <span class="hl kwb">size_t</span> <span class="hl opt">*</span>packet_len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>src_addr<span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>dest_addr<span class="hl opt">;</span>
	<span class="hl kwb">unsigned long</span> tcp_seqno <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">unsigned long</span> tcp_ack <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">unsigned char</span> tcp_ctl <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> unreachable <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwb">struct</span> timeval tv<span class="hl opt">;</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SWRAP_CONNECT_SEND<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x02</span><span class="hl opt">;</span> <span class="hl com">/* SYN */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_CONNECT_RECV<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x12</span><span class="hl opt">;</span> <span class="hl com">/** SYN,ACK */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_CONNECT_UNREACH<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr  <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		<span class="hl com">/* Unreachable: resend the data of SWRAP_CONNECT_SEND */</span>
		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd <span class="hl opt">-</span> <span class="hl num">1</span><span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x02</span><span class="hl opt">;</span> <span class="hl com">/* SYN */</span>
		unreachable <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_CONNECT_ACK<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x10</span><span class="hl opt">;</span> <span class="hl com">/* ACK */</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_ACCEPT_SEND<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x02</span><span class="hl opt">;</span> <span class="hl com">/* SYN */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_ACCEPT_RECV<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		src_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x12</span><span class="hl opt">;</span> <span class="hl com">/* SYN,ACK */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_ACCEPT_ACK<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x10</span><span class="hl opt">;</span> <span class="hl com">/* ACK */</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_SEND<span class="hl opt">:</span>
		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x18</span><span class="hl opt">;</span> <span class="hl com">/* PSH,ACK */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd <span class="hl opt">+=</span> len<span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_SEND_RST<span class="hl opt">:</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_DGRAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl kwd">swrap_pcap_marshall_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
							  <span class="hl opt">&amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
							  SWRAP_SENDTO_UNREACH<span class="hl opt">,</span>
							  buf<span class="hl opt">,</span>
							  len<span class="hl opt">,</span>
							  packet_len<span class="hl opt">);</span>
		<span class="hl opt">}</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x14</span><span class="hl opt">;</span> <span class="hl com">/** RST,ACK */</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_PENDING_RST<span class="hl opt">:</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_DGRAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x14</span><span class="hl opt">;</span> <span class="hl com">/* RST,ACK */</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_RECV<span class="hl opt">:</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x18</span><span class="hl opt">;</span> <span class="hl com">/* PSH,ACK */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv <span class="hl opt">+=</span> len<span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_RECV_RST<span class="hl opt">:</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_DGRAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x14</span><span class="hl opt">;</span> <span class="hl com">/* RST,ACK */</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_SENDTO<span class="hl opt">:</span>
		src_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd <span class="hl opt">+=</span> len<span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_SENDTO_UNREACH<span class="hl opt">:</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		unreachable <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_RECVFROM<span class="hl opt">:</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr <span class="hl opt">=</span> addr<span class="hl opt">;</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv <span class="hl opt">+=</span> len<span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_CLOSE_SEND<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x11</span><span class="hl opt">;</span> <span class="hl com">/* FIN, ACK */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_CLOSE_RECV<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x11</span><span class="hl opt">;</span> <span class="hl com">/* FIN,ACK */</span>

		si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv <span class="hl opt">+=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SWRAP_CLOSE_ACK<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">!=</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		src_addr  <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		dest_addr <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		tcp_seqno <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_snd<span class="hl opt">;</span>
		tcp_ack <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>io<span class="hl opt">.</span>pck_rcv<span class="hl opt">;</span>
		tcp_ctl <span class="hl opt">=</span> <span class="hl num">0x10</span><span class="hl opt">;</span> <span class="hl com">/* ACK */</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">return</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrapGetTimeOfDay</span><span class="hl opt">(&amp;</span>tv<span class="hl opt">);</span>

	<span class="hl kwa">return</span> <span class="hl kwd">swrap_pcap_packet_init</span><span class="hl opt">(&amp;</span>tv<span class="hl opt">,</span>
				      src_addr<span class="hl opt">,</span>
				      dest_addr<span class="hl opt">,</span>
				      si<span class="hl opt">-&gt;</span>type<span class="hl opt">,</span>
				      <span class="hl opt">(</span><span class="hl kwb">const uint8_t</span> <span class="hl opt">*)</span>buf<span class="hl opt">,</span>
				      len<span class="hl opt">,</span>
				      tcp_seqno<span class="hl opt">,</span>
				      tcp_ack<span class="hl opt">,</span>
				      tcp_ctl<span class="hl opt">,</span>
				      unreachable<span class="hl opt">,</span>
				      packet_len<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				   <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
				   <span class="hl kwb">enum</span> swrap_packet_type type<span class="hl opt">,</span>
				   <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">const char</span> <span class="hl opt">*</span>file_name<span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>packet<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> packet_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>pcap_dump_mutex<span class="hl opt">);</span>

	file_name <span class="hl opt">=</span> <span class="hl kwd">swrap_pcap_init_file</span><span class="hl opt">();</span>
	<span class="hl kwa">if</span> <span class="hl opt">(!</span>file_name<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	packet <span class="hl opt">=</span> <span class="hl kwd">swrap_pcap_marshall_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
					    addr<span class="hl opt">,</span>
					    type<span class="hl opt">,</span>
					    buf<span class="hl opt">,</span>
					    len<span class="hl opt">,</span>
					    <span class="hl opt">&amp;</span>packet_len<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>packet <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	fd <span class="hl opt">=</span> <span class="hl kwd">swrap_pcap_get_fd</span><span class="hl opt">(</span>file_name<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">write</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> packet<span class="hl opt">,</span> packet_len<span class="hl opt">) != (</span>ssize_t<span class="hl opt">)</span>packet_len<span class="hl opt">) {</span>
			<span class="hl kwd">free</span><span class="hl opt">(</span>packet<span class="hl opt">);</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">free</span><span class="hl opt">(</span>packet<span class="hl opt">);</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>pcap_dump_mutex<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SIGNALFD</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl ppc">#ifdef HAVE_SIGNALFD</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_signalfd</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const</span> sigset_t <span class="hl opt">*</span>mask<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">libc_signalfd</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> mask<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">signalfd</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">const</span> sigset_t <span class="hl opt">*</span>mask<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_signalfd</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> mask<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SOCKET</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_socket</span><span class="hl opt">(</span><span class="hl kwb">int</span> family<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info _si <span class="hl opt">= {</span> <span class="hl num">0</span> <span class="hl opt">};</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> real_type <span class="hl opt">=</span> type<span class="hl opt">;</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * Remove possible addition flags passed to socket() so</span>
<span class="hl com">	 * do not fail checking the type.</span>
<span class="hl com">	 * See https://lwn.net/Articles/281965/</span>
<span class="hl com">	 */</span>
<span class="hl ppc">#ifdef SOCK_CLOEXEC</span>
	real_type <span class="hl opt">&amp;= ~</span>SOCK_CLOEXEC<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef SOCK_NONBLOCK</span>
	real_type <span class="hl opt">&amp;= ~</span>SOCK_NONBLOCK<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span><span class="hl kwd">socket_wrapper_enabled</span><span class="hl opt">()) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_socket</span><span class="hl opt">(</span>family<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
<span class="hl ppc">#endif</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef AF_NETLINK</span>
	<span class="hl kwa">case</span> AF_NETLINK<span class="hl opt">:</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* AF_NETLINK */</span><span class="hl ppc"></span>
<span class="hl ppc">#ifdef AF_PACKET</span>
	<span class="hl kwa">case</span> AF_PACKET<span class="hl opt">:</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* AF_PACKET */</span><span class="hl ppc"></span>
	<span class="hl kwa">case</span> AF_UNIX<span class="hl opt">:</span>
		fd <span class="hl opt">=</span> <span class="hl kwd">libc_socket</span><span class="hl opt">(</span>family<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl com">/* Check if we have a stale fd and remove it */</span>
			<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
			<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
				  <span class="hl str">&quot;Unix socket fd=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
				  fd<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EAFNOSUPPORT<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>real_type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EPROTONOSUPPORT<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>protocol<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> <span class="hl num">0</span><span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">case</span> <span class="hl num">6</span><span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>real_type <span class="hl opt">==</span> SOCK_STREAM<span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		FALL_THROUGH<span class="hl opt">;</span>
	<span class="hl kwa">case</span> <span class="hl num">17</span><span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>real_type <span class="hl opt">==</span> SOCK_DGRAM<span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		FALL_THROUGH<span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EPROTONOSUPPORT<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * We must call libc_socket with type, from the caller, not the version</span>
<span class="hl com">	 * we removed SOCK_CLOEXEC and SOCK_NONBLOCK from</span>
<span class="hl com">	 */</span>
	fd <span class="hl opt">=</span> <span class="hl kwd">libc_socket</span><span class="hl opt">(</span>AF_UNIX<span class="hl opt">,</span> type<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* Check if we have a stale fd and remove it */</span>
	<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>

	si <span class="hl opt">= &amp;</span>_si<span class="hl opt">;</span>
	si<span class="hl opt">-&gt;</span>family <span class="hl opt">=</span> family<span class="hl opt">;</span>

	<span class="hl com">/* however, the rest of the socket_wrapper code expects just</span>
<span class="hl com">	 * the type, not the flags */</span>
	si<span class="hl opt">-&gt;</span>type <span class="hl opt">=</span> real_type<span class="hl opt">;</span>
	si<span class="hl opt">-&gt;</span>protocol <span class="hl opt">=</span> protocol<span class="hl opt">;</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * Setup myname so getsockname() can succeed to find out the socket</span>
<span class="hl com">	 * type.</span>
<span class="hl com">	 */</span>
	<span class="hl kwa">switch</span><span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in sin <span class="hl opt">= {</span>
			<span class="hl opt">.</span>sin_family <span class="hl opt">=</span> AF_INET<span class="hl opt">,</span>
		<span class="hl opt">};</span>

		si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">);</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in<span class="hl opt">, &amp;</span>sin<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in6 sin6 <span class="hl opt">= {</span>
			<span class="hl opt">.</span>sin6_family <span class="hl opt">=</span> AF_INET6<span class="hl opt">,</span>
		<span class="hl opt">};</span>

		si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">);</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in6<span class="hl opt">, &amp;</span>sin6<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">swrap_create_socket</span><span class="hl opt">(</span>si<span class="hl opt">,</span> fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;Created</span> <span class="hl ipl">%s</span> <span class="hl str">socket for protocol</span> <span class="hl ipl">%s</span><span class="hl str">, fd=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  family <span class="hl opt">==</span> AF_INET <span class="hl opt">?</span> <span class="hl str">&quot;IPv4&quot;</span> <span class="hl opt">:</span> <span class="hl str">&quot;IPv6&quot;</span><span class="hl opt">,</span>
		  real_type <span class="hl opt">==</span> SOCK_DGRAM <span class="hl opt">?</span> <span class="hl str">&quot;UDP&quot;</span> <span class="hl opt">:</span> <span class="hl str">&quot;TCP&quot;</span><span class="hl opt">,</span>
		  fd<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">socket</span><span class="hl opt">(</span><span class="hl kwb">int</span> family<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_socket</span><span class="hl opt">(</span>family<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SOCKETPAIR</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_socketpair</span><span class="hl opt">(</span><span class="hl kwb">int</span> family<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">,</span> <span class="hl kwb">int</span> sv<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">])</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">libc_socketpair</span><span class="hl opt">(</span>family<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">,</span> sv<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>sv<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">]);</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>sv<span class="hl opt">[</span><span class="hl num">1</span><span class="hl opt">]);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">socketpair</span><span class="hl opt">(</span><span class="hl kwb">int</span> family<span class="hl opt">,</span> <span class="hl kwb">int</span> type<span class="hl opt">,</span> <span class="hl kwb">int</span> protocol<span class="hl opt">,</span> <span class="hl kwb">int</span> sv<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">])</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_socketpair</span><span class="hl opt">(</span>family<span class="hl opt">,</span> type<span class="hl opt">,</span> protocol<span class="hl opt">,</span> sv<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SOCKETPAIR</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl ppc">#ifdef HAVE_TIMERFD_CREATE</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_timerfd_create</span><span class="hl opt">(</span><span class="hl kwb">int</span> clockid<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	fd <span class="hl opt">=</span> <span class="hl kwd">libc_timerfd_create</span><span class="hl opt">(</span>clockid<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">timerfd_create</span><span class="hl opt">(</span><span class="hl kwb">int</span> clockid<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_timerfd_create</span><span class="hl opt">(</span>clockid<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   PIPE</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_pipe</span><span class="hl opt">(</span><span class="hl kwb">int</span> pipefd<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">])</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">libc_pipe</span><span class="hl opt">(</span>pipefd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>pipefd<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">]);</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>pipefd<span class="hl opt">[</span><span class="hl num">1</span><span class="hl opt">]);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">pipe</span><span class="hl opt">(</span><span class="hl kwb">int</span> pipefd<span class="hl opt">[</span><span class="hl num">2</span><span class="hl opt">])</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_pipe</span><span class="hl opt">(</span>pipefd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   ACCEPT</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_accept</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span>
			<span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span>
			socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">,</span>
			<span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>parent_si<span class="hl opt">, *</span>child_si<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info new_si <span class="hl opt">= {</span> <span class="hl num">0</span> <span class="hl opt">};</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>
	<span class="hl kwb">int</span> idx<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address un_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> swrap_address un_my_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> swrap_address in_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> swrap_address in_my_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	parent_si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(!</span>parent_si<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_accept4</span><span class="hl opt">(</span>s<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl ppc">#else</span>
		<span class="hl kwd">UNUSED</span><span class="hl opt">(</span>flags<span class="hl opt">);</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_accept</span><span class="hl opt">(</span>s<span class="hl opt">,</span> addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl opt">}</span>


	<span class="hl com">/*</span>
<span class="hl com">	 * prevent parent_si from being altered / closed</span>
<span class="hl com">	 * while we read it</span>
<span class="hl com">	 */</span>
	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>parent_si<span class="hl opt">);</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * assume out sockaddr have the same size as the in parent</span>
<span class="hl com">	 * socket family</span>
<span class="hl com">	 */</span>
	in_addr<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwd">socket_length</span><span class="hl opt">(</span>parent_si<span class="hl opt">-&gt;</span>family<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>in_addr<span class="hl opt">.</span>sa_socklen <span class="hl opt">&lt;=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>parent_si<span class="hl opt">);</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>parent_si<span class="hl opt">);</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
	ret <span class="hl opt">=</span> <span class="hl kwd">libc_accept4</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl ppc">#else</span>
	<span class="hl kwd">UNUSED</span><span class="hl opt">(</span>flags<span class="hl opt">);</span>
	ret <span class="hl opt">=</span> <span class="hl kwd">libc_accept</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>errno <span class="hl opt">==</span> ENOTSOCK<span class="hl opt">) {</span>
			<span class="hl com">/* Remove stale fds */</span>
			<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	fd <span class="hl opt">=</span> ret<span class="hl opt">;</span>

	<span class="hl com">/* Check if we have a stale fd and remove it */</span>
	<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>parent_si<span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_from_un</span><span class="hl opt">(</span>parent_si<span class="hl opt">,</span>
				       <span class="hl opt">&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				       un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
				       parent_si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span>
				       <span class="hl opt">&amp;</span>in_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
				       <span class="hl opt">&amp;</span>in_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>parent_si<span class="hl opt">);</span>
		<span class="hl kwd">close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	child_si <span class="hl opt">= &amp;</span>new_si<span class="hl opt">;</span>

	child_si<span class="hl opt">-&gt;</span>family <span class="hl opt">=</span> parent_si<span class="hl opt">-&gt;</span>family<span class="hl opt">;</span>
	child_si<span class="hl opt">-&gt;</span>type <span class="hl opt">=</span> parent_si<span class="hl opt">-&gt;</span>type<span class="hl opt">;</span>
	child_si<span class="hl opt">-&gt;</span>protocol <span class="hl opt">=</span> parent_si<span class="hl opt">-&gt;</span>protocol<span class="hl opt">;</span>
	child_si<span class="hl opt">-&gt;</span>bound <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
	child_si<span class="hl opt">-&gt;</span>is_server <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
	child_si<span class="hl opt">-&gt;</span>connected <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>parent_si<span class="hl opt">);</span>

	child_si<span class="hl opt">-&gt;</span>peername <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> in_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
	<span class="hl opt">};</span>
	<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>child_si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">, &amp;</span>in_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> in_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>addr <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp;</span> addrlen <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwb">size_t</span> copy_len <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(*</span>addrlen<span class="hl opt">,</span> in_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>copy_len <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(</span>addr<span class="hl opt">, &amp;</span>in_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> copy_len<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl opt">*</span>addrlen <span class="hl opt">=</span> in_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_getsockname</span><span class="hl opt">(</span>fd<span class="hl opt">,</span>
			       <span class="hl opt">&amp;</span>un_my_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
			       <span class="hl opt">&amp;</span>un_my_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_from_un</span><span class="hl opt">(</span>child_si<span class="hl opt">,</span>
				       <span class="hl opt">&amp;</span>un_my_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				       un_my_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
				       child_si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span>
				       <span class="hl opt">&amp;</span>in_my_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
				       <span class="hl opt">&amp;</span>in_my_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;accept() path=</span><span class="hl ipl">%s</span><span class="hl str">, fd=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  un_my_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_path<span class="hl opt">,</span> s<span class="hl opt">);</span>

	child_si<span class="hl opt">-&gt;</span>myname <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> in_my_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
	<span class="hl opt">};</span>
	<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>child_si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">, &amp;</span>in_my_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> in_my_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>

	idx <span class="hl opt">=</span> <span class="hl kwd">swrap_create_socket</span><span class="hl opt">(&amp;</span>new_si<span class="hl opt">,</span> fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>idx <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">close</span> <span class="hl opt">(</span>fd<span class="hl opt">);</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>addr <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>idx<span class="hl opt">);</span>

		<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> addr<span class="hl opt">,</span> SWRAP_ACCEPT_SEND<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> addr<span class="hl opt">,</span> SWRAP_ACCEPT_RECV<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> addr<span class="hl opt">,</span> SWRAP_ACCEPT_ACK<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
<span class="hl kwb">int</span> <span class="hl kwd">accept4</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_accept</span><span class="hl opt">(</span>s<span class="hl opt">,</span> addr<span class="hl opt">, (</span>socklen_t <span class="hl opt">*)</span>addrlen<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT_PSOCKLEN_T</span>
<span class="hl kwb">int</span> <span class="hl kwd">accept</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span> Psocklen_t addrlen<span class="hl opt">)</span>
<span class="hl ppc">#else</span>
<span class="hl kwb">int</span> <span class="hl kwd">accept</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>addr<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_accept</span><span class="hl opt">(</span>s<span class="hl opt">,</span> addr<span class="hl opt">, (</span>socklen_t <span class="hl opt">*)</span>addrlen<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> autobind_start_init<span class="hl opt">;</span>
<span class="hl kwb">static int</span> autobind_start<span class="hl opt">;</span>

<span class="hl com">/* using sendto() or connect() on an unbound socket would give the</span>
<span class="hl com">   recipient no way to reply, as unlike UDP and TCP, a unix domain</span>
<span class="hl com">   socket can&#39;t auto-assign ephemeral port numbers, so we need to</span>
<span class="hl com">   assign it here.</span>
<span class="hl com">   Note: this might change the family from ipv6 to ipv4</span>
<span class="hl com">*/</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_auto_bind</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span> <span class="hl kwb">int</span> family<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> swrap_address un_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">int</span> i<span class="hl opt">;</span>
	<span class="hl kwb">char</span> type<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> port<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> stat st<span class="hl opt">;</span>
	<span class="hl kwb">char</span> <span class="hl opt">*</span>swrap_dir <span class="hl opt">=</span> NULL<span class="hl opt">;</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>autobind_start_mutex<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>autobind_start_init <span class="hl opt">!=</span> <span class="hl num">1</span><span class="hl opt">) {</span>
		autobind_start_init <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
		autobind_start <span class="hl opt">=</span> <span class="hl kwd">getpid</span><span class="hl opt">();</span>
		autobind_start <span class="hl opt">%=</span> <span class="hl num">50000</span><span class="hl opt">;</span>
		autobind_start <span class="hl opt">+=</span> <span class="hl num">10000</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_family <span class="hl opt">=</span> AF_UNIX<span class="hl opt">;</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in in<span class="hl opt">;</span>

		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">memset</span><span class="hl opt">(&amp;</span>in<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>in<span class="hl opt">));</span>
		in<span class="hl opt">.</span>sin_family <span class="hl opt">=</span> AF_INET<span class="hl opt">;</span>
		in<span class="hl opt">.</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">=</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span><span class="hl kwd">swrap_ipv4_iface</span><span class="hl opt">(</span>
					   <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">()));</span>

		si<span class="hl opt">-&gt;</span>myname <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
			<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>in<span class="hl opt">),</span>
		<span class="hl opt">};</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in<span class="hl opt">, &amp;</span>in<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in6 in6<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family <span class="hl opt">!=</span> family<span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> ENETUNREACH<span class="hl opt">;</span>
			ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_TCP_V6<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
			type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP_V6<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
			ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">memset</span><span class="hl opt">(&amp;</span>in6<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>in6<span class="hl opt">));</span>
		in6<span class="hl opt">.</span>sin6_family <span class="hl opt">=</span> AF_INET6<span class="hl opt">;</span>
		in6<span class="hl opt">.</span>sin6_addr <span class="hl opt">= *</span><span class="hl kwd">swrap_ipv6</span><span class="hl opt">();</span>
		in6<span class="hl opt">.</span>sin6_addr<span class="hl opt">.</span>s6_addr<span class="hl opt">[</span><span class="hl num">15</span><span class="hl opt">] =</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>

		si<span class="hl opt">-&gt;</span>myname <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
			<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>in6<span class="hl opt">),</span>
		<span class="hl opt">};</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in6<span class="hl opt">, &amp;</span>in6<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> ESOCKTNOSUPPORT<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>autobind_start <span class="hl opt">&gt;</span> <span class="hl num">60000</span><span class="hl opt">) {</span>
		autobind_start <span class="hl opt">=</span> <span class="hl num">10000</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	swrap_dir <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">();</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt;</span> SOCKET_MAX_SOCKETS<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		port <span class="hl opt">=</span> autobind_start <span class="hl opt">+</span> i<span class="hl opt">;</span>
		<span class="hl kwd">swrap_un_path</span><span class="hl opt">(&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
			      swrap_dir<span class="hl opt">,</span>
			      type<span class="hl opt">,</span>
			      <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">(),</span>
			      port<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">stat</span><span class="hl opt">(</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_path<span class="hl opt">, &amp;</span>st<span class="hl opt">) ==</span> <span class="hl num">0</span><span class="hl opt">)</span> <span class="hl kwa">continue</span><span class="hl opt">;</span>

		ret <span class="hl opt">=</span> <span class="hl kwd">libc_bind</span><span class="hl opt">(</span>fd<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span> un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		si<span class="hl opt">-&gt;</span>un_addr <span class="hl opt">=</span> un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">;</span>

		si<span class="hl opt">-&gt;</span>bound <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
		autobind_start <span class="hl opt">=</span> port <span class="hl opt">+</span> <span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>i <span class="hl opt">==</span> SOCKET_MAX_SOCKETS<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;Too many open unix sockets (</span><span class="hl ipl">%u</span><span class="hl str">) for &quot;</span>
					   <span class="hl str">&quot;interface &quot;</span>SOCKET_FORMAT<span class="hl opt">,</span>
					   SOCKET_MAX_SOCKETS<span class="hl opt">,</span>
					   type<span class="hl opt">,</span>
					   <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">(),</span>
					   <span class="hl num">0</span><span class="hl opt">);</span>
		errno <span class="hl opt">=</span> ENFILE<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	si<span class="hl opt">-&gt;</span>family <span class="hl opt">=</span> family<span class="hl opt">;</span>
	<span class="hl kwd">set_port</span><span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span> port<span class="hl opt">, &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>autobind_start_mutex<span class="hl opt">);</span>
	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   CONNECT</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_connect</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>serv_addr<span class="hl opt">,</span>
			 socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address un_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">int</span> bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_connect</span><span class="hl opt">(</span>s<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bound <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		ret <span class="hl opt">=</span> <span class="hl kwd">swrap_auto_bind</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">,</span> serv_addr<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family <span class="hl opt">!=</span> serv_addr<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;called for fd=</span><span class="hl ipl">%d</span> <span class="hl str">(family=</span><span class="hl ipl">%d</span><span class="hl str">) called with invalid family=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
			  s<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span> serv_addr<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">);</span>
		errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_to_un</span><span class="hl opt">(</span>si<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span>
				     addrlen<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">, &amp;</span>bcast<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> ENETUNREACH<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_DGRAM<span class="hl opt">) {</span>
		si<span class="hl opt">-&gt;</span>defer_connect <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
		ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> SWRAP_CONNECT_SEND<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>

		ret <span class="hl opt">=</span> <span class="hl kwd">libc_connect</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				   <span class="hl opt">&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
				   un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;connect() path=</span><span class="hl ipl">%s</span><span class="hl str">, fd=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_path<span class="hl opt">,</span> s<span class="hl opt">);</span>


	<span class="hl com">/* to give better errors */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span> <span class="hl opt">&amp;&amp;</span> errno <span class="hl opt">==</span> ENOENT<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EHOSTUNREACH<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		si<span class="hl opt">-&gt;</span>peername <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
			<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> addrlen<span class="hl opt">,</span>
		<span class="hl opt">};</span>

		<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
		si<span class="hl opt">-&gt;</span>connected <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>

		<span class="hl com">/*</span>
<span class="hl com">		 * When we connect() on a socket than we have to bind the</span>
<span class="hl com">		 * outgoing connection on the interface we use for the</span>
<span class="hl com">		 * transport. We already bound it on the right interface</span>
<span class="hl com">		 * but here we have to update the name so getsockname()</span>
<span class="hl com">		 * returns correct information.</span>
<span class="hl com">		 */</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			si<span class="hl opt">-&gt;</span>myname <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
				<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
			<span class="hl opt">};</span>

			<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span>
			       <span class="hl opt">&amp;</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span>
			       si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>

			<span class="hl com">/* Cleanup bindname */</span>
			si<span class="hl opt">-&gt;</span>bindname <span class="hl opt">= (</span><span class="hl kwb">struct</span> swrap_address<span class="hl opt">) {</span>
				<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">,</span>
			<span class="hl opt">};</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> SWRAP_CONNECT_RECV<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> SWRAP_CONNECT_ACK<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> SWRAP_CONNECT_UNREACH<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">connect</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>serv_addr<span class="hl opt">,</span> socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_connect</span><span class="hl opt">(</span>s<span class="hl opt">,</span> serv_addr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   BIND</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_bind</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>myaddr<span class="hl opt">,</span> socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address un_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">int</span> bind_error <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl ppc">#if 0</span> <span class="hl com">/* FIXME */</span><span class="hl ppc"></span>
	<span class="hl kwb">bool</span> in_use<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_bind</span><span class="hl opt">(</span>s<span class="hl opt">,</span> myaddr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*</span>sin<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>addrlen <span class="hl opt">&lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">)) {</span>
			bind_error <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		sin <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>myaddr<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>sin<span class="hl opt">-&gt;</span>sin_family <span class="hl opt">!=</span> AF_INET<span class="hl opt">) {</span>
			bind_error <span class="hl opt">=</span> EAFNOSUPPORT<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl com">/* special case for AF_UNSPEC */</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>sin<span class="hl opt">-&gt;</span>sin_family <span class="hl opt">==</span> AF_UNSPEC <span class="hl opt">&amp;&amp;</span>
		    <span class="hl opt">(</span>sin<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr <span class="hl opt">==</span> <span class="hl kwd">htonl</span><span class="hl opt">(</span>INADDR_ANY<span class="hl opt">)))</span>
		<span class="hl opt">{</span>
			bind_error <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
		<span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*</span>sin6<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>addrlen <span class="hl opt">&lt;</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">)) {</span>
			bind_error <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		sin6 <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>myaddr<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>sin6<span class="hl opt">-&gt;</span>sin6_family <span class="hl opt">!=</span> AF_INET6<span class="hl opt">) {</span>
			bind_error <span class="hl opt">=</span> EAFNOSUPPORT<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		bind_error <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>bind_error <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> bind_error<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

<span class="hl ppc">#if 0</span> <span class="hl com">/* FIXME */</span><span class="hl ppc"></span>
	in_use <span class="hl opt">=</span> <span class="hl kwd">check_addr_port_in_use</span><span class="hl opt">(</span>myaddr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>in_use<span class="hl opt">) {</span>
		errno <span class="hl opt">=</span> EADDRINUSE<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

	si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> addrlen<span class="hl opt">;</span>
	<span class="hl kwd">memcpy</span><span class="hl opt">(&amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> myaddr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_to_un</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
				     myaddr<span class="hl opt">,</span>
				     addrlen<span class="hl opt">,</span>
				     <span class="hl opt">&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				     <span class="hl num">1</span><span class="hl opt">,</span>
				     <span class="hl opt">&amp;</span>si<span class="hl opt">-&gt;</span>bcast<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">unlink</span><span class="hl opt">(</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_path<span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_bind</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span> un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span>
		  <span class="hl str">&quot;bind() path=</span><span class="hl ipl">%s</span><span class="hl str">, fd=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span>
		  un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_path<span class="hl opt">,</span> s<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		si<span class="hl opt">-&gt;</span>bound <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">bind</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>myaddr<span class="hl opt">,</span> socklen_t addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_bind</span><span class="hl opt">(</span>s<span class="hl opt">,</span> myaddr<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   BINDRESVPORT</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl ppc">#ifdef HAVE_BINDRESVPORT</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_getsockname</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">);</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_bindresvport_sa</span><span class="hl opt">(</span><span class="hl kwb">int</span> sd<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>sa<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> swrap_address myaddr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	socklen_t salen<span class="hl opt">;</span>
	<span class="hl kwb">static uint16_t</span> port<span class="hl opt">;</span>
	<span class="hl kwb">uint16_t</span> i<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> af<span class="hl opt">;</span>

<span class="hl ppc">#define SWRAP_STARTPORT 600</span>
<span class="hl ppc">#define SWRAP_ENDPORT (IPPORT_RESERVED - 1)</span>
<span class="hl ppc">#define SWRAP_NPORTS (SWRAP_ENDPORT - SWRAP_STARTPORT + 1)</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>port <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		port <span class="hl opt">= (</span><span class="hl kwd">getpid</span><span class="hl opt">() %</span> SWRAP_NPORTS<span class="hl opt">) +</span> SWRAP_STARTPORT<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>sa <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		salen <span class="hl opt">=</span> myaddr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>
		sa <span class="hl opt">= &amp;</span>myaddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>

		rc <span class="hl opt">=</span> <span class="hl kwd">swrap_getsockname</span><span class="hl opt">(</span>sd<span class="hl opt">, &amp;</span>myaddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">, &amp;</span>salen<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		af <span class="hl opt">=</span> sa<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">;</span>
		<span class="hl kwd">memset</span><span class="hl opt">(&amp;</span>myaddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> salen<span class="hl opt">);</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		af <span class="hl opt">=</span> sa<span class="hl opt">-&gt;</span>sa_family<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt;</span> SWRAP_NPORTS<span class="hl opt">;</span> i<span class="hl opt">++,</span> port<span class="hl opt">++) {</span>
		<span class="hl kwa">switch</span><span class="hl opt">(</span>af<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
			<span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*</span>sinp <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>sa<span class="hl opt">;</span>

			salen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">);</span>
			sinp<span class="hl opt">-&gt;</span>sin_port <span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>port<span class="hl opt">);</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
			<span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*</span>sin6p <span class="hl opt">= (</span><span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>sa<span class="hl opt">;</span>

			salen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">);</span>
			sin6p<span class="hl opt">-&gt;</span>sin6_port <span class="hl opt">=</span> <span class="hl kwd">htons</span><span class="hl opt">(</span>port<span class="hl opt">);</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			errno <span class="hl opt">=</span> EAFNOSUPPORT<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		sa<span class="hl opt">-&gt;</span>sa_family <span class="hl opt">=</span> af<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>port <span class="hl opt">&gt;</span> SWRAP_ENDPORT<span class="hl opt">) {</span>
			port <span class="hl opt">=</span> SWRAP_STARTPORT<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		rc <span class="hl opt">=</span> <span class="hl kwd">swrap_bind</span><span class="hl opt">(</span>sd<span class="hl opt">, (</span><span class="hl kwb">struct</span> sockaddr <span class="hl opt">*)</span>sa<span class="hl opt">,</span> salen<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">||</span> errno <span class="hl opt">!=</span> EADDRINUSE<span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">bindresvport</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*</span>sinp<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_bindresvport_sa</span><span class="hl opt">(</span>sockfd<span class="hl opt">, (</span><span class="hl kwb">struct</span> sockaddr <span class="hl opt">*)</span>sinp<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   LISTEN</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_listen</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> backlog<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_listen</span><span class="hl opt">(</span>s<span class="hl opt">,</span> backlog<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bound <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		ret <span class="hl opt">=</span> <span class="hl kwd">swrap_auto_bind</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>family<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> EADDRINUSE<span class="hl opt">;</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_listen</span><span class="hl opt">(</span>s<span class="hl opt">,</span> backlog<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		si<span class="hl opt">-&gt;</span>listening <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">listen</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> backlog<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_listen</span><span class="hl opt">(</span>s<span class="hl opt">,</span> backlog<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   FOPEN</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static FILE</span> <span class="hl opt">*</span><span class="hl kwd">swrap_fopen</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">FILE</span> <span class="hl opt">*</span>fp<span class="hl opt">;</span>

	fp <span class="hl opt">=</span> <span class="hl kwd">libc_fopen</span><span class="hl opt">(</span>name<span class="hl opt">,</span> mode<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fp <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwb">int</span> fd <span class="hl opt">=</span> <span class="hl kwd">fileno</span><span class="hl opt">(</span>fp<span class="hl opt">);</span>

		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> fp<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">FILE</span> <span class="hl opt">*</span><span class="hl kwd">fopen</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_fopen</span><span class="hl opt">(</span>name<span class="hl opt">,</span> mode<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   FOPEN64</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl ppc">#ifdef HAVE_FOPEN64</span>
<span class="hl kwb">static FILE</span> <span class="hl opt">*</span><span class="hl kwd">swrap_fopen64</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">FILE</span> <span class="hl opt">*</span>fp<span class="hl opt">;</span>

	fp <span class="hl opt">=</span> <span class="hl kwd">libc_fopen64</span><span class="hl opt">(</span>name<span class="hl opt">,</span> mode<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fp <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwb">int</span> fd <span class="hl opt">=</span> <span class="hl kwd">fileno</span><span class="hl opt">(</span>fp<span class="hl opt">);</span>

		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> fp<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">FILE</span> <span class="hl opt">*</span><span class="hl kwd">fopen64</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>name<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>mode<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_fopen64</span><span class="hl opt">(</span>name<span class="hl opt">,</span> mode<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_FOPEN64 */</span><span class="hl ppc"></span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   OPEN</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_vopen</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_vopen</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl com">/*</span>
<span class="hl com">		 * There are methods for closing descriptors (libc-internal code</span>
<span class="hl com">		 * paths, direct syscalls) which close descriptors in ways that</span>
<span class="hl com">		 * we can&#39;t intercept, so try to recover when we notice that</span>
<span class="hl com">		 * that&#39;s happened</span>
<span class="hl com">		 */</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>ret<span class="hl opt">);</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">open</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> ap<span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	fd <span class="hl opt">=</span> <span class="hl kwd">swrap_vopen</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwd">va_end</span><span class="hl opt">(</span>ap<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   OPEN64</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl ppc">#ifdef HAVE_OPEN64</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_vopen64</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_vopen64</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl com">/*</span>
<span class="hl com">		 * There are methods for closing descriptors (libc-internal code</span>
<span class="hl com">		 * paths, direct syscalls) which close descriptors in ways that</span>
<span class="hl com">		 * we can&#39;t intercept, so try to recover when we notice that</span>
<span class="hl com">		 * that&#39;s happened</span>
<span class="hl com">		 */</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>ret<span class="hl opt">);</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">open64</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>pathname<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> ap<span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	fd <span class="hl opt">=</span> <span class="hl kwd">swrap_vopen64</span><span class="hl opt">(</span>pathname<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwd">va_end</span><span class="hl opt">(</span>ap<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_OPEN64 */</span><span class="hl ppc"></span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   OPENAT</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_vopenat</span><span class="hl opt">(</span><span class="hl kwb">int</span> dirfd<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>path<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span> <span class="hl kwb">va_list</span> ap<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_vopenat</span><span class="hl opt">(</span>dirfd<span class="hl opt">,</span> path<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl com">/*</span>
<span class="hl com">		 * There are methods for closing descriptors (libc-internal code</span>
<span class="hl com">		 * paths, direct syscalls) which close descriptors in ways that</span>
<span class="hl com">		 * we can&#39;t intercept, so try to recover when we notice that</span>
<span class="hl com">		 * that&#39;s happened</span>
<span class="hl com">		 */</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>ret<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">openat</span><span class="hl opt">(</span><span class="hl kwb">int</span> dirfd<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>path<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> ap<span class="hl opt">;</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	fd <span class="hl opt">=</span> <span class="hl kwd">swrap_vopenat</span><span class="hl opt">(</span>dirfd<span class="hl opt">,</span> path<span class="hl opt">,</span> flags<span class="hl opt">,</span> ap<span class="hl opt">);</span>
	<span class="hl kwd">va_end</span><span class="hl opt">(</span>ap<span class="hl opt">);</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   GETPEERNAME</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_getpeername</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	socklen_t len<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_getpeername</span><span class="hl opt">(</span>s<span class="hl opt">,</span> name<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa_socklen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">)</span>
	<span class="hl opt">{</span>
		errno <span class="hl opt">=</span> ENOTCONN<span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	len <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(*</span>addrlen<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>len <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">memcpy</span><span class="hl opt">(</span>name<span class="hl opt">, &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> len<span class="hl opt">);</span>
	<span class="hl opt">*</span>addrlen <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT_PSOCKLEN_T</span>
<span class="hl kwb">int</span> <span class="hl kwd">getpeername</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> Psocklen_t addrlen<span class="hl opt">)</span>
<span class="hl ppc">#else</span>
<span class="hl kwb">int</span> <span class="hl kwd">getpeername</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_getpeername</span><span class="hl opt">(</span>s<span class="hl opt">,</span> name<span class="hl opt">, (</span>socklen_t <span class="hl opt">*)</span>addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   GETSOCKNAME</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_getsockname</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	socklen_t len<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_getsockname</span><span class="hl opt">(</span>s<span class="hl opt">,</span> name<span class="hl opt">,</span> addrlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	len <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(*</span>addrlen<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>len <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">memcpy</span><span class="hl opt">(</span>name<span class="hl opt">, &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">,</span> len<span class="hl opt">);</span>
	<span class="hl opt">*</span>addrlen <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT_PSOCKLEN_T</span>
<span class="hl kwb">int</span> <span class="hl kwd">getsockname</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> Psocklen_t addrlen<span class="hl opt">)</span>
<span class="hl ppc">#else</span>
<span class="hl kwb">int</span> <span class="hl kwd">getsockname</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>name<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>addrlen<span class="hl opt">)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_getsockname</span><span class="hl opt">(</span>s<span class="hl opt">,</span> name<span class="hl opt">, (</span>socklen_t <span class="hl opt">*)</span>addrlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   GETSOCKOPT</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl ppc">#ifndef SO_PROTOCOL</span>
<span class="hl ppc"># ifdef SO_PROTOTYPE</span> <span class="hl com">/* The Solaris name */</span><span class="hl ppc"></span>
<span class="hl ppc">#  define SO_PROTOCOL SO_PROTOTYPE</span>
<span class="hl ppc"># endif</span> <span class="hl com">/* SO_PROTOTYPE */</span><span class="hl ppc"></span>
<span class="hl ppc">#endif</span> <span class="hl com">/* SO_PROTOCOL */</span><span class="hl ppc"></span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_getsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> level<span class="hl opt">,</span> <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
			    <span class="hl kwb">void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>optlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_getsockopt</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				       level<span class="hl opt">,</span>
				       optname<span class="hl opt">,</span>
				       optval<span class="hl opt">,</span>
				       optlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>level <span class="hl opt">==</span> SOL_SOCKET<span class="hl opt">) {</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>optname<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef SO_DOMAIN</span>
		<span class="hl kwa">case</span> SO_DOMAIN<span class="hl opt">:</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optval <span class="hl opt">==</span> NULL <span class="hl opt">||</span> optlen <span class="hl opt">==</span> NULL <span class="hl opt">||</span>
			    <span class="hl opt">*</span>optlen <span class="hl opt">&lt; (</span>socklen_t<span class="hl opt">)</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">)) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl opt">*</span>optlen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">);</span>
			<span class="hl opt">*(</span><span class="hl kwb">int</span> <span class="hl opt">*)</span>optval <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>family<span class="hl opt">;</span>
			ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* SO_DOMAIN */</span><span class="hl ppc"></span>

<span class="hl ppc">#ifdef SO_PROTOCOL</span>
		<span class="hl kwa">case</span> SO_PROTOCOL<span class="hl opt">:</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optval <span class="hl opt">==</span> NULL <span class="hl opt">||</span> optlen <span class="hl opt">==</span> NULL <span class="hl opt">||</span>
			    <span class="hl opt">*</span>optlen <span class="hl opt">&lt; (</span>socklen_t<span class="hl opt">)</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">)) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl opt">*</span>optlen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">);</span>
			<span class="hl opt">*(</span><span class="hl kwb">int</span> <span class="hl opt">*)</span>optval <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>protocol<span class="hl opt">;</span>
			ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* SO_PROTOCOL */</span><span class="hl ppc"></span>
		<span class="hl kwa">case</span> SO_TYPE<span class="hl opt">:</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optval <span class="hl opt">==</span> NULL <span class="hl opt">||</span> optlen <span class="hl opt">==</span> NULL <span class="hl opt">||</span>
			    <span class="hl opt">*</span>optlen <span class="hl opt">&lt; (</span>socklen_t<span class="hl opt">)</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">)) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl opt">*</span>optlen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">);</span>
			<span class="hl opt">*(</span><span class="hl kwb">int</span> <span class="hl opt">*)</span>optval <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>type<span class="hl opt">;</span>
			ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			ret <span class="hl opt">=</span> <span class="hl kwd">libc_getsockopt</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
					      level<span class="hl opt">,</span>
					      optname<span class="hl opt">,</span>
					      optval<span class="hl opt">,</span>
					      optlen<span class="hl opt">);</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>level <span class="hl opt">==</span> IPPROTO_TCP<span class="hl opt">) {</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>optname<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef TCP_NODELAY</span>
		<span class="hl kwa">case</span> TCP_NODELAY<span class="hl opt">:</span>
			<span class="hl com">/*</span>
<span class="hl com">			 * This enables sending packets directly out over TCP.</span>
<span class="hl com">			 * As a unix socket is doing that any way, report it as</span>
<span class="hl com">			 * enabled.</span>
<span class="hl com">			 */</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optval <span class="hl opt">==</span> NULL <span class="hl opt">||</span> optlen <span class="hl opt">==</span> NULL <span class="hl opt">||</span>
			    <span class="hl opt">*</span>optlen <span class="hl opt">&lt; (</span>socklen_t<span class="hl opt">)</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">)) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl opt">*</span>optlen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">);</span>
			<span class="hl opt">*(</span><span class="hl kwb">int</span> <span class="hl opt">*)</span>optval <span class="hl opt">=</span> si<span class="hl opt">-&gt;</span>tcp_nodelay<span class="hl opt">;</span>

			ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* TCP_NODELAY */</span><span class="hl ppc"></span>
<span class="hl ppc">#ifdef TCP_INFO</span>
		<span class="hl kwa">case</span> TCP_INFO<span class="hl opt">: {</span>
			<span class="hl kwb">struct</span> tcp_info info<span class="hl opt">;</span>
			socklen_t ilen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>info<span class="hl opt">);</span>

<span class="hl ppc">#ifdef HAVE_NETINET_TCP_FSM_H</span>
<span class="hl com">/* This is FreeBSD */</span>
<span class="hl ppc"># define __TCP_LISTEN TCPS_LISTEN</span>
<span class="hl ppc"># define __TCP_ESTABLISHED TCPS_ESTABLISHED</span>
<span class="hl ppc"># define __TCP_CLOSE TCPS_CLOSED</span>
<span class="hl ppc">#else</span>
<span class="hl com">/* This is Linux */</span>
<span class="hl ppc"># define __TCP_LISTEN TCP_LISTEN</span>
<span class="hl ppc"># define __TCP_ESTABLISHED TCP_ESTABLISHED</span>
<span class="hl ppc"># define __TCP_CLOSE TCP_CLOSE</span>
<span class="hl ppc">#endif</span>

			<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>info<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>listening<span class="hl opt">) {</span>
				info<span class="hl opt">.</span>tcpi_state <span class="hl opt">=</span> __TCP_LISTEN<span class="hl opt">;</span>
			<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>connected<span class="hl opt">) {</span>
				<span class="hl com">/*</span>
<span class="hl com">				 * For now we just fake a few values</span>
<span class="hl com">				 * supported both by FreeBSD and Linux</span>
<span class="hl com">				 */</span>
				info<span class="hl opt">.</span>tcpi_state <span class="hl opt">=</span> __TCP_ESTABLISHED<span class="hl opt">;</span>
				info<span class="hl opt">.</span>tcpi_rto <span class="hl opt">=</span> <span class="hl num">200000</span><span class="hl opt">;</span>  <span class="hl com">/* 200 msec */</span>
				info<span class="hl opt">.</span>tcpi_rtt <span class="hl opt">=</span> <span class="hl num">5000</span><span class="hl opt">;</span>    <span class="hl com">/* 5 msec */</span>
				info<span class="hl opt">.</span>tcpi_rttvar <span class="hl opt">=</span> <span class="hl num">5000</span><span class="hl opt">;</span> <span class="hl com">/* 5 msec */</span>
			<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
				info<span class="hl opt">.</span>tcpi_state <span class="hl opt">=</span> __TCP_CLOSE<span class="hl opt">;</span>
				info<span class="hl opt">.</span>tcpi_rto <span class="hl opt">=</span> <span class="hl num">1000000</span><span class="hl opt">;</span>  <span class="hl com">/* 1 sec */</span>
				info<span class="hl opt">.</span>tcpi_rtt <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
				info<span class="hl opt">.</span>tcpi_rttvar <span class="hl opt">=</span> <span class="hl num">250000</span><span class="hl opt">;</span> <span class="hl com">/* 250 msec */</span>
			<span class="hl opt">}</span>

			<span class="hl kwa">if</span> <span class="hl opt">(</span>optval <span class="hl opt">==</span> NULL <span class="hl opt">||</span> optlen <span class="hl opt">==</span> NULL <span class="hl opt">||</span>
			    <span class="hl opt">*</span>optlen <span class="hl opt">&lt; (</span>socklen_t<span class="hl opt">)</span>ilen<span class="hl opt">) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl opt">*</span>optlen <span class="hl opt">=</span> ilen<span class="hl opt">;</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(</span>optval<span class="hl opt">, &amp;</span>info<span class="hl opt">,</span> ilen<span class="hl opt">);</span>

			ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* TCP_INFO */</span><span class="hl ppc"></span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	errno <span class="hl opt">=</span> ENOPROTOOPT<span class="hl opt">;</span>
	ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT_PSOCKLEN_T</span>
<span class="hl kwb">int</span> <span class="hl kwd">getsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> level<span class="hl opt">,</span> <span class="hl kwb">int</span> optname<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span> Psocklen_t optlen<span class="hl opt">)</span>
<span class="hl ppc">#else</span>
<span class="hl kwb">int</span> <span class="hl kwd">getsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> level<span class="hl opt">,</span> <span class="hl kwb">int</span> optname<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>optlen<span class="hl opt">)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_getsockopt</span><span class="hl opt">(</span>s<span class="hl opt">,</span> level<span class="hl opt">,</span> optname<span class="hl opt">,</span> optval<span class="hl opt">, (</span>socklen_t <span class="hl opt">*)</span>optlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SETSOCKOPT</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_setsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> level<span class="hl opt">,</span> <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
			    <span class="hl kwb">const void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span> socklen_t optlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_setsockopt</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				       level<span class="hl opt">,</span>
				       optname<span class="hl opt">,</span>
				       optval<span class="hl opt">,</span>
				       optlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>level <span class="hl opt">==</span> SOL_SOCKET<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_setsockopt</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				       level<span class="hl opt">,</span>
				       optname<span class="hl opt">,</span>
				       optval<span class="hl opt">,</span>
				       optlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>level <span class="hl opt">==</span> IPPROTO_TCP<span class="hl opt">) {</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>optname<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef TCP_NODELAY</span>
		<span class="hl kwa">case</span> TCP_NODELAY<span class="hl opt">: {</span>
			<span class="hl kwb">int</span> i<span class="hl opt">;</span>

			<span class="hl com">/*</span>
<span class="hl com">			 * This enables sending packets directly out over TCP.</span>
<span class="hl com">			 * A unix socket is doing that any way.</span>
<span class="hl com">			 */</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optval <span class="hl opt">==</span> NULL <span class="hl opt">||</span> optlen <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">||</span>
			    optlen <span class="hl opt">&lt; (</span>socklen_t<span class="hl opt">)</span><span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">)) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			i <span class="hl opt">= *</span><span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">int</span><span class="hl opt">,</span> optval<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>i <span class="hl opt">!=</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span> i <span class="hl opt">!=</span> <span class="hl num">1</span><span class="hl opt">) {</span>
				errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
				ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
				<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
			<span class="hl opt">}</span>
			si<span class="hl opt">-&gt;</span>tcp_nodelay <span class="hl opt">=</span> i<span class="hl opt">;</span>

			ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* TCP_NODELAY */</span><span class="hl ppc"></span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>family<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>level <span class="hl opt">==</span> IPPROTO_IP<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef IP_PKTINFO</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optname <span class="hl opt">==</span> IP_PKTINFO<span class="hl opt">) {</span>
				si<span class="hl opt">-&gt;</span>pktinfo <span class="hl opt">=</span> AF_INET<span class="hl opt">;</span>
			<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* IP_PKTINFO */</span><span class="hl ppc"></span>
		<span class="hl opt">}</span>
		ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_IPV6</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>level <span class="hl opt">==</span> IPPROTO_IPV6<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef IPV6_RECVPKTINFO</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>optname <span class="hl opt">==</span> IPV6_RECVPKTINFO<span class="hl opt">) {</span>
				si<span class="hl opt">-&gt;</span>pktinfo <span class="hl opt">=</span> AF_INET6<span class="hl opt">;</span>
			<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* IPV6_PKTINFO */</span><span class="hl ppc"></span>
		<span class="hl opt">}</span>
		ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> ENOPROTOOPT<span class="hl opt">;</span>
		ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

done<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">setsockopt</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> level<span class="hl opt">,</span> <span class="hl kwb">int</span> optname<span class="hl opt">,</span>
	       <span class="hl kwb">const void</span> <span class="hl opt">*</span>optval<span class="hl opt">,</span> socklen_t optlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_setsockopt</span><span class="hl opt">(</span>s<span class="hl opt">,</span> level<span class="hl opt">,</span> optname<span class="hl opt">,</span> optval<span class="hl opt">,</span> optlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   IOCTL</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_vioctl</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">unsigned long int</span> r<span class="hl opt">,</span> <span class="hl kwb">va_list</span> va<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">va_list</span> ap<span class="hl opt">;</span>
	<span class="hl kwb">int</span> <span class="hl opt">*</span>value_ptr <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_vioctl</span><span class="hl opt">(</span>s<span class="hl opt">,</span> r<span class="hl opt">,</span> va<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">va_copy</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> va<span class="hl opt">);</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">libc_vioctl</span><span class="hl opt">(</span>s<span class="hl opt">,</span> r<span class="hl opt">,</span> va<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>r<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> FIONREAD<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			value_ptr <span class="hl opt">= ((</span><span class="hl kwb">int</span> <span class="hl opt">*)</span><span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">int</span> <span class="hl opt">*));</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">== -</span><span class="hl num">1</span> <span class="hl opt">&amp;&amp;</span> errno <span class="hl opt">!=</span> EAGAIN <span class="hl opt">&amp;&amp;</span> errno <span class="hl opt">!=</span> ENOBUFS<span class="hl opt">) {</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_PENDING_RST<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>value_ptr <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp; *</span>value_ptr <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span> <span class="hl com">/* END OF FILE */</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_PENDING_RST<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#ifdef FIONWRITE</span>
	<span class="hl kwa">case</span> FIONWRITE<span class="hl opt">:</span>
		<span class="hl com">/* this is FreeBSD */</span>
		FALL_THROUGH<span class="hl opt">;</span> <span class="hl com">/* to TIOCOUTQ */</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* FIONWRITE */</span><span class="hl ppc"></span>
	<span class="hl kwa">case</span> TIOCOUTQ<span class="hl opt">:</span> <span class="hl com">/* same as SIOCOUTQ on Linux */</span>
		<span class="hl com">/*</span>
<span class="hl com">		 * This may return more bytes then the application</span>
<span class="hl com">		 * sent into the socket, for tcp it should</span>
<span class="hl com">		 * return the number of unacked bytes.</span>
<span class="hl com">		 *</span>
<span class="hl com">		 * On AF_UNIX, all bytes are immediately acked!</span>
<span class="hl com">		 */</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			value_ptr <span class="hl opt">= ((</span><span class="hl kwb">int</span> <span class="hl opt">*)</span><span class="hl kwd">va_arg</span><span class="hl opt">(</span>ap<span class="hl opt">,</span> <span class="hl kwb">int</span> <span class="hl opt">*));</span>
			<span class="hl opt">*</span>value_ptr <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">va_end</span><span class="hl opt">(</span>ap<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_IOCTL_INT</span>
<span class="hl kwb">int</span> <span class="hl kwd">ioctl</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">int</span> r<span class="hl opt">, ...)</span>
<span class="hl ppc">#else</span>
<span class="hl kwb">int</span> <span class="hl kwd">ioctl</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">unsigned long int</span> r<span class="hl opt">, ...)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> va<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>va<span class="hl opt">,</span> r<span class="hl opt">);</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_vioctl</span><span class="hl opt">(</span>s<span class="hl opt">, (</span><span class="hl kwb">unsigned long int</span><span class="hl opt">)</span> r<span class="hl opt">,</span> va<span class="hl opt">);</span>

	<span class="hl kwd">va_end</span><span class="hl opt">(</span>va<span class="hl opt">);</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/*****************</span>
<span class="hl com"> * CMSG</span>
<span class="hl com"> *****************/</span>

<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>

<span class="hl ppc">#ifndef CMSG_ALIGN</span>
<span class="hl ppc"># ifdef _ALIGN</span> <span class="hl com">/* BSD */</span><span class="hl ppc"></span>
<span class="hl ppc">#define CMSG_ALIGN _ALIGN</span>
<span class="hl ppc"># else</span>
<span class="hl ppc">#define CMSG_ALIGN(len) (((len) + sizeof(size_t) - 1) &amp; ~(sizeof(size_t) - 1))</span>
<span class="hl ppc"># endif</span> <span class="hl com">/* _ALIGN */</span><span class="hl ppc"></span>
<span class="hl ppc">#endif</span> <span class="hl com">/* CMSG_ALIGN */</span><span class="hl ppc"></span>

<span class="hl com">/**</span>
<span class="hl com"> * &#64;brief Add a cmsghdr to a msghdr.</span>
<span class="hl com"> *</span>
<span class="hl com"> * This is an function to add any type of cmsghdr. It will operate on the</span>
<span class="hl com"> * msg-&gt;msg_control and msg-&gt;msg_controllen you pass in by adapting them to</span>
<span class="hl com"> * the buffer position after the added cmsg element. Hence, this function is</span>
<span class="hl com"> * intended to be used with an intermediate msghdr and not on the original</span>
<span class="hl com"> * one handed in by the client.</span>
<span class="hl com"> *</span>
<span class="hl com"> * &#64;param[in]  msg      The msghdr to which to add the cmsg.</span>
<span class="hl com"> *</span>
<span class="hl com"> * &#64;param[in]  level    The cmsg level to set.</span>
<span class="hl com"> *</span>
<span class="hl com"> * &#64;param[in]  type     The cmsg type to set.</span>
<span class="hl com"> *</span>
<span class="hl com"> * &#64;param[in]  data     The cmsg data to set.</span>
<span class="hl com"> *</span>
<span class="hl com"> * &#64;param[in]  len      the length of the data to set.</span>
<span class="hl com"> */</span>
<span class="hl kwb">static void</span> <span class="hl kwd">swrap_msghdr_add_cmsghdr</span><span class="hl opt">(</span><span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span>
				     <span class="hl kwb">int</span> level<span class="hl opt">,</span>
				     <span class="hl kwb">int</span> type<span class="hl opt">,</span>
				     <span class="hl kwb">const void</span> <span class="hl opt">*</span>data<span class="hl opt">,</span>
				     <span class="hl kwb">size_t</span> len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">size_t</span> cmlen <span class="hl opt">=</span> <span class="hl kwd">CMSG_LEN</span><span class="hl opt">(</span>len<span class="hl opt">);</span>
	<span class="hl kwb">size_t</span> cmspace <span class="hl opt">=</span> <span class="hl kwd">CMSG_SPACE</span><span class="hl opt">(</span>len<span class="hl opt">);</span>
	<span class="hl kwb">uint8_t</span> cmbuf<span class="hl opt">[</span>cmspace<span class="hl opt">];</span>
	<span class="hl kwb">void</span> <span class="hl opt">*</span>cast_ptr <span class="hl opt">= (</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>cmbuf<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cm <span class="hl opt">= (</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*)</span>cast_ptr<span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>p<span class="hl opt">;</span>

	<span class="hl kwd">memset</span><span class="hl opt">(</span>cmbuf<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> cmspace<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">&lt;</span> cmlen<span class="hl opt">) {</span>
		cmlen <span class="hl opt">=</span> msg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">;</span>
		msg<span class="hl opt">-&gt;</span>msg_flags <span class="hl opt">|=</span> MSG_CTRUNC<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">&lt;</span> cmspace<span class="hl opt">) {</span>
		cmspace <span class="hl opt">=</span> msg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * We copy the full input data into an intermediate cmsghdr first</span>
<span class="hl com">	 * in order to more easily cope with truncation.</span>
<span class="hl com">	 */</span>
	cm<span class="hl opt">-&gt;</span>cmsg_len <span class="hl opt">=</span> cmlen<span class="hl opt">;</span>
	cm<span class="hl opt">-&gt;</span>cmsg_level <span class="hl opt">=</span> level<span class="hl opt">;</span>
	cm<span class="hl opt">-&gt;</span>cmsg_type <span class="hl opt">=</span> type<span class="hl opt">;</span>
	<span class="hl kwd">memcpy</span><span class="hl opt">(</span><span class="hl kwd">CMSG_DATA</span><span class="hl opt">(</span>cm<span class="hl opt">),</span> data<span class="hl opt">,</span> len<span class="hl opt">);</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * We now copy the possibly truncated buffer.</span>
<span class="hl com">	 * We copy cmlen bytes, but consume cmspace bytes,</span>
<span class="hl com">	 * leaving the possible padding uninitialiazed.</span>
<span class="hl com">	 */</span>
	p <span class="hl opt">= (</span><span class="hl kwb">uint8_t</span> <span class="hl opt">*)</span>msg<span class="hl opt">-&gt;</span>msg_control<span class="hl opt">;</span>
	<span class="hl kwd">memcpy</span><span class="hl opt">(</span>p<span class="hl opt">,</span> cm<span class="hl opt">,</span> cmlen<span class="hl opt">);</span>
	p <span class="hl opt">+=</span> cmspace<span class="hl opt">;</span>
	msg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">=</span> p<span class="hl opt">;</span>
	msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">-=</span> cmspace<span class="hl opt">;</span>

	<span class="hl kwa">return</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_msghdr_add_pktinfo</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				    <span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl com">/* Add packet info */</span>
	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>pktinfo<span class="hl opt">) {</span>
<span class="hl ppc">#if defined(IP_PKTINFO) &amp;&amp; (defined(HAVE_STRUCT_IN_PKTINFO) || defined(IP_RECVDSTADDR))</span>
	<span class="hl kwa">case</span> AF_INET<span class="hl opt">: {</span>
		<span class="hl kwb">struct</span> sockaddr_in <span class="hl opt">*</span>sin<span class="hl opt">;</span>
<span class="hl ppc">#if defined(HAVE_STRUCT_IN_PKTINFO)</span>
		<span class="hl kwb">struct</span> in_pktinfo pkt<span class="hl opt">;</span>
<span class="hl ppc">#elif defined(IP_RECVDSTADDR)</span>
		<span class="hl kwb">struct</span> in_addr pkt<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">==</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">)) {</span>
			sin <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in<span class="hl opt">;</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">!=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in<span class="hl opt">)) {</span>
				<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
			sin <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>pkt<span class="hl opt">);</span>

<span class="hl ppc">#if defined(HAVE_STRUCT_IN_PKTINFO)</span>
		pkt<span class="hl opt">.</span>ipi_ifindex <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		pkt<span class="hl opt">.</span>ipi_addr<span class="hl opt">.</span>s_addr <span class="hl opt">=</span> sin<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">.</span>s_addr<span class="hl opt">;</span>
<span class="hl ppc">#elif defined(IP_RECVDSTADDR)</span>
		pkt <span class="hl opt">=</span> sin<span class="hl opt">-&gt;</span>sin_addr<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>

		<span class="hl kwd">swrap_msghdr_add_cmsghdr</span><span class="hl opt">(</span>msg<span class="hl opt">,</span> IPPROTO_IP<span class="hl opt">,</span> IP_PKTINFO<span class="hl opt">,</span>
					 <span class="hl opt">&amp;</span>pkt<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>pkt<span class="hl opt">));</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* IP_PKTINFO */</span><span class="hl ppc"></span>
<span class="hl ppc">#if defined(HAVE_IPV6)</span>
	<span class="hl kwa">case</span> AF_INET6<span class="hl opt">: {</span>
<span class="hl ppc">#if defined(IPV6_PKTINFO) &amp;&amp; defined(HAVE_STRUCT_IN6_PKTINFO)</span>
		<span class="hl kwb">struct</span> sockaddr_in6 <span class="hl opt">*</span>sin6<span class="hl opt">;</span>
		<span class="hl kwb">struct</span> in6_pktinfo pkt6<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa_socklen <span class="hl opt">==</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">)) {</span>
			sin6 <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>bindname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in6<span class="hl opt">;</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">!=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_in6<span class="hl opt">)) {</span>
				<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
			sin6 <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa<span class="hl opt">.</span>in6<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>pkt6<span class="hl opt">);</span>

		pkt6<span class="hl opt">.</span>ipi6_ifindex <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_default_iface</span><span class="hl opt">();</span>
		pkt6<span class="hl opt">.</span>ipi6_addr <span class="hl opt">=</span> sin6<span class="hl opt">-&gt;</span>sin6_addr<span class="hl opt">;</span>

		<span class="hl kwd">swrap_msghdr_add_cmsghdr</span><span class="hl opt">(</span>msg<span class="hl opt">,</span> IPPROTO_IPV6<span class="hl opt">,</span> IPV6_PKTINFO<span class="hl opt">,</span>
					<span class="hl opt">&amp;</span>pkt6<span class="hl opt">,</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>pkt6<span class="hl opt">));</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_STRUCT_IN6_PKTINFO */</span><span class="hl ppc"></span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* IPV6_PKTINFO */</span><span class="hl ppc"></span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_msghdr_add_socket_info</span><span class="hl opt">(</span><span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
					<span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>omsg<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> rc <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>pktinfo <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		rc <span class="hl opt">=</span> <span class="hl kwd">swrap_msghdr_add_pktinfo</span><span class="hl opt">(</span>si<span class="hl opt">,</span> omsg<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_copy_cmsg</span><span class="hl opt">(</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">,</span>
				   <span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
				   <span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">);</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_socket</span><span class="hl opt">(</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">,</span>
					    <span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
					    <span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">);</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_filter_cmsghdr</span><span class="hl opt">(</span><span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span>
					<span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
					<span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">) {</span>
	<span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl com">/* Nothing to do */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">||</span> msg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>cmsg <span class="hl opt">=</span> <span class="hl kwd">CMSG_FIRSTHDR</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	     cmsg <span class="hl opt">!=</span> NULL<span class="hl opt">;</span>
	     cmsg <span class="hl opt">=</span> <span class="hl kwd">CMSG_NXTHDR</span><span class="hl opt">(</span>msg<span class="hl opt">,</span> cmsg<span class="hl opt">)) {</span>
		<span class="hl kwa">switch</span> <span class="hl opt">(</span>cmsg<span class="hl opt">-&gt;</span>cmsg_level<span class="hl opt">) {</span>
		<span class="hl kwa">case</span> IPPROTO_IP<span class="hl opt">:</span>
			rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_socket</span><span class="hl opt">(</span>cmsg<span class="hl opt">,</span>
							      cm_data<span class="hl opt">,</span>
							      cm_data_space<span class="hl opt">);</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl kwa">default</span><span class="hl opt">:</span>
			rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_copy_cmsg</span><span class="hl opt">(</span>cmsg<span class="hl opt">,</span>
						     cm_data<span class="hl opt">,</span>
						     cm_data_space<span class="hl opt">);</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_copy_cmsg</span><span class="hl opt">(</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">,</span>
				   <span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
				   <span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">size_t</span> cmspace<span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>p<span class="hl opt">;</span>

	cmspace <span class="hl opt">= *</span>cm_data_space <span class="hl opt">+</span> <span class="hl kwd">CMSG_ALIGN</span><span class="hl opt">(</span>cmsg<span class="hl opt">-&gt;</span>cmsg_len<span class="hl opt">);</span>

	p <span class="hl opt">=</span> <span class="hl kwd">realloc</span><span class="hl opt">((*</span>cm_data<span class="hl opt">),</span> cmspace<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>p <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl opt">(*</span>cm_data<span class="hl opt">) =</span> p<span class="hl opt">;</span>

	p <span class="hl opt">= (*</span>cm_data<span class="hl opt">) + (*</span>cm_data_space<span class="hl opt">);</span>
	<span class="hl opt">*</span>cm_data_space <span class="hl opt">=</span> cmspace<span class="hl opt">;</span>

	<span class="hl kwd">memcpy</span><span class="hl opt">(</span>p<span class="hl opt">,</span> cmsg<span class="hl opt">,</span> cmsg<span class="hl opt">-&gt;</span>cmsg_len<span class="hl opt">);</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_pktinfo</span><span class="hl opt">(</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">,</span>
					    <span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
					    <span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">);</span>


<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_socket</span><span class="hl opt">(</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">,</span>
					    <span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
					    <span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> rc <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwa">switch</span><span class="hl opt">(</span>cmsg<span class="hl opt">-&gt;</span>cmsg_type<span class="hl opt">) {</span>
<span class="hl ppc">#ifdef IP_PKTINFO</span>
	<span class="hl kwa">case</span> IP_PKTINFO<span class="hl opt">:</span>
		rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_pktinfo</span><span class="hl opt">(</span>cmsg<span class="hl opt">,</span>
						       cm_data<span class="hl opt">,</span>
						       cm_data_space<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
<span class="hl ppc">#ifdef IPV6_PKTINFO</span>
	<span class="hl kwa">case</span> IPV6_PKTINFO<span class="hl opt">:</span>
		rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_pktinfo</span><span class="hl opt">(</span>cmsg<span class="hl opt">,</span>
						       cm_data<span class="hl opt">,</span>
						       cm_data_space<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_sendmsg_filter_cmsg_pktinfo</span><span class="hl opt">(</span><span class="hl kwb">struct</span> cmsghdr <span class="hl opt">*</span>cmsg<span class="hl opt">,</span>
					     <span class="hl kwb">uint8_t</span> <span class="hl opt">**</span>cm_data<span class="hl opt">,</span>
					     <span class="hl kwb">size_t</span> <span class="hl opt">*</span>cm_data_space<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>cmsg<span class="hl opt">;</span> <span class="hl com">/* unused */</span>
	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>cm_data<span class="hl opt">;</span> <span class="hl com">/* unused */</span>
	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>cm_data_space<span class="hl opt">;</span> <span class="hl com">/* unused */</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * Passing a IP pktinfo to a unix socket might be rejected by the</span>
<span class="hl com">	 * Kernel, at least on FreeBSD. So skip this cmsg.</span>
<span class="hl com">	 */</span>
	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_STRUCT_MSGHDR_MSG_CONTROL */</span><span class="hl ppc"></span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_sendmsg_before</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span>
				    <span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				    <span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span>
				    <span class="hl kwb">struct</span> iovec <span class="hl opt">*</span>tmp_iov<span class="hl opt">,</span>
				    <span class="hl kwb">struct</span> sockaddr_un <span class="hl opt">*</span>tmp_un<span class="hl opt">,</span>
				    <span class="hl kwb">const struct</span> sockaddr_un <span class="hl opt">**</span>to_un<span class="hl opt">,</span>
				    <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">**</span>to<span class="hl opt">,</span>
				    <span class="hl kwb">int</span> <span class="hl opt">*</span>bcast<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">,</span> len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	ssize_t ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>to_un<span class="hl opt">) {</span>
		<span class="hl opt">*</span>to_un <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>to<span class="hl opt">) {</span>
		<span class="hl opt">*</span>to <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) {</span>
		<span class="hl opt">*</span>bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">: {</span>
		<span class="hl kwb">unsigned long</span> mtu<span class="hl opt">;</span>

		<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">-&gt;</span>connected<span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> ENOTCONN<span class="hl opt">;</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		mtu <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_mtu</span><span class="hl opt">();</span>
		<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
			<span class="hl kwb">size_t</span> nlen<span class="hl opt">;</span>
			nlen <span class="hl opt">=</span> len <span class="hl opt">+</span> msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">;</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>nlen <span class="hl opt">&lt;</span> len<span class="hl opt">) {</span>
				<span class="hl com">/* overflow */</span>
				errno <span class="hl opt">=</span> EMSGSIZE<span class="hl opt">;</span>
				<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
			<span class="hl opt">}</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>nlen <span class="hl opt">&gt;</span> mtu<span class="hl opt">) {</span>
				<span class="hl kwa">break</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span>
		msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">=</span> i<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl opt">*</span>tmp_iov <span class="hl opt">=</span> msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">];</span>
			tmp_iov<span class="hl opt">-&gt;</span>iov_len <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">((</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>tmp_iov<span class="hl opt">-&gt;</span>iov_len<span class="hl opt">,</span>
					       <span class="hl opt">(</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>mtu<span class="hl opt">);</span>
			msg<span class="hl opt">-&gt;</span>msg_iov <span class="hl opt">=</span> tmp_iov<span class="hl opt">;</span>
			msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>connected<span class="hl opt">) {</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_name <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
				<span class="hl com">/*</span>
<span class="hl com">				 * We are dealing with unix sockets and if we</span>
<span class="hl com">				 * are connected, we should only talk to the</span>
<span class="hl com">				 * connected unix path. Using the fd to send</span>
<span class="hl com">				 * to another server would be hard to achieve.</span>
<span class="hl com">				 */</span>
				msg<span class="hl opt">-&gt;</span>msg_name <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
				msg<span class="hl opt">-&gt;</span>msg_namelen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>msg_name<span class="hl opt">;</span>
			msg_name <span class="hl opt">= (</span><span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*)</span>msg<span class="hl opt">-&gt;</span>msg_name<span class="hl opt">;</span>

			<span class="hl kwa">if</span> <span class="hl opt">(</span>msg_name <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
				errno <span class="hl opt">=</span> ENOTCONN<span class="hl opt">;</span>
				<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
			<span class="hl opt">}</span>


			ret <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_to_un</span><span class="hl opt">(</span>si<span class="hl opt">,</span> msg_name<span class="hl opt">,</span> msg<span class="hl opt">-&gt;</span>msg_namelen<span class="hl opt">,</span>
						     tmp_un<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> bcast<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
				<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
			<span class="hl opt">}</span>

			<span class="hl kwa">if</span> <span class="hl opt">(</span>to_un<span class="hl opt">) {</span>
				<span class="hl opt">*</span>to_un <span class="hl opt">=</span> tmp_un<span class="hl opt">;</span>
			<span class="hl opt">}</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>to<span class="hl opt">) {</span>
				<span class="hl opt">*</span>to <span class="hl opt">=</span> msg_name<span class="hl opt">;</span>
			<span class="hl opt">}</span>
			msg<span class="hl opt">-&gt;</span>msg_name <span class="hl opt">=</span> tmp_un<span class="hl opt">;</span>
			msg<span class="hl opt">-&gt;</span>msg_namelen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>tmp_un<span class="hl opt">);</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bound <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			ret <span class="hl opt">=</span> <span class="hl kwd">swrap_auto_bind</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> si<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>family<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
				<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
				<span class="hl kwa">if</span> <span class="hl opt">(</span>errno <span class="hl opt">==</span> ENOTSOCK<span class="hl opt">) {</span>
					<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
					ret <span class="hl opt">= -</span>ENOTSOCK<span class="hl opt">;</span>
				<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
					<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span> <span class="hl str">&quot;swrap_sendmsg_before failed&quot;</span><span class="hl opt">);</span>
				<span class="hl opt">}</span>
				<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">-&gt;</span>defer_connect<span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		ret <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_to_un</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
					     <span class="hl opt">&amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
					     si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
					     tmp_un<span class="hl opt">,</span>
					     <span class="hl num">0</span><span class="hl opt">,</span>
					     NULL<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		ret <span class="hl opt">=</span> <span class="hl kwd">libc_connect</span><span class="hl opt">(</span>fd<span class="hl opt">,</span>
				   <span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr <span class="hl opt">*)(</span><span class="hl kwb">void</span> <span class="hl opt">*)</span>tmp_un<span class="hl opt">,</span>
				   <span class="hl kwa">sizeof</span><span class="hl opt">(*</span>tmp_un<span class="hl opt">));</span>

		<span class="hl com">/* to give better errors */</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span> <span class="hl opt">&amp;&amp;</span> errno <span class="hl opt">==</span> ENOENT<span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> EHOSTUNREACH<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		si<span class="hl opt">-&gt;</span>defer_connect <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EHOSTUNREACH<span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">&gt;</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span> msg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>cmbuf <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
		<span class="hl kwb">size_t</span> cmlen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

		ret <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_filter_cmsghdr</span><span class="hl opt">(</span>msg<span class="hl opt">, &amp;</span>cmbuf<span class="hl opt">, &amp;</span>cmlen<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwd">free</span><span class="hl opt">(</span>cmbuf<span class="hl opt">);</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>cmlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
			msg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>cmlen <span class="hl opt">&lt;</span> msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">&amp;&amp;</span> cmbuf <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_control<span class="hl opt">,</span> cmbuf<span class="hl opt">,</span> cmlen<span class="hl opt">);</span>
			msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">=</span> cmlen<span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwd">free</span><span class="hl opt">(</span>cmbuf<span class="hl opt">);</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

	ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_sendmsg_after</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span>
				<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				<span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span>
				<span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>to<span class="hl opt">,</span>
				ssize_t ret<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> saved_errno <span class="hl opt">=</span> errno<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">,</span> len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>buf<span class="hl opt">;</span>
	off_t ofs <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> avail <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> remain<span class="hl opt">;</span>

	<span class="hl com">/* to give better errors */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>saved_errno <span class="hl opt">==</span> ENOENT<span class="hl opt">) {</span>
			saved_errno <span class="hl opt">=</span> EHOSTUNREACH<span class="hl opt">;</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>saved_errno <span class="hl opt">==</span> ENOTSOCK<span class="hl opt">) {</span>
			<span class="hl com">/* If the fd is not a socket, remove it */</span>
			<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		avail <span class="hl opt">+=</span> msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		remain <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(</span><span class="hl num">80</span><span class="hl opt">,</span> avail<span class="hl opt">);</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		remain <span class="hl opt">=</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* we capture it as one single packet */</span>
	buf <span class="hl opt">= (</span><span class="hl kwb">uint8_t</span> <span class="hl opt">*)</span><span class="hl kwd">malloc</span><span class="hl opt">(</span>remain<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(!</span>buf<span class="hl opt">) {</span>
		<span class="hl com">/* we just not capture the packet */</span>
		errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>
		<span class="hl kwa">return</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		<span class="hl kwb">size_t</span> this_time <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(</span>remain<span class="hl opt">, (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">);</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>buf <span class="hl opt">+</span> ofs<span class="hl opt">,</span>
		       msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_base<span class="hl opt">,</span>
		       this_time<span class="hl opt">);</span>
		ofs <span class="hl opt">+=</span> this_time<span class="hl opt">;</span>
		remain <span class="hl opt">-=</span> this_time<span class="hl opt">;</span>
	<span class="hl opt">}</span>
	len <span class="hl opt">=</span> ofs<span class="hl opt">;</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_SEND<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_SEND_RST<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_SEND<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>connected<span class="hl opt">) {</span>
			to <span class="hl opt">= &amp;</span>si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> to<span class="hl opt">,</span> SWRAP_SENDTO<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> to<span class="hl opt">,</span> SWRAP_SENDTO_UNREACH<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> to<span class="hl opt">,</span> SWRAP_SENDTO<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">free</span><span class="hl opt">(</span>buf<span class="hl opt">);</span>
	errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_recvmsg_before</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span>
				<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
				<span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span>
				<span class="hl kwb">struct</span> iovec <span class="hl opt">*</span>tmp_iov<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">,</span> len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret <span class="hl opt">= -</span><span class="hl num">1</span><span class="hl opt">;</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>fd<span class="hl opt">;</span> <span class="hl com">/* unused */</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">: {</span>
		<span class="hl kwb">unsigned int</span> mtu<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">-&gt;</span>connected<span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> ENOTCONN<span class="hl opt">;</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		mtu <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_mtu</span><span class="hl opt">();</span>
		<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
			<span class="hl kwb">size_t</span> nlen<span class="hl opt">;</span>
			nlen <span class="hl opt">=</span> len <span class="hl opt">+</span> msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">;</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>nlen <span class="hl opt">&gt;</span> mtu<span class="hl opt">) {</span>
				<span class="hl kwa">break</span><span class="hl opt">;</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span>
		msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">=</span> i<span class="hl opt">;</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl opt">*</span>tmp_iov <span class="hl opt">=</span> msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">];</span>
			tmp_iov<span class="hl opt">-&gt;</span>iov_len <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">((</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>tmp_iov<span class="hl opt">-&gt;</span>iov_len<span class="hl opt">,</span>
					       <span class="hl opt">(</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>mtu<span class="hl opt">);</span>
			msg<span class="hl opt">-&gt;</span>msg_iov <span class="hl opt">=</span> tmp_iov<span class="hl opt">;</span>
			msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_name <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			errno <span class="hl opt">=</span> EINVAL<span class="hl opt">;</span>
			<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>bound <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			ret <span class="hl opt">=</span> <span class="hl kwd">swrap_auto_bind</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> si<span class="hl opt">,</span> si<span class="hl opt">-&gt;</span>family<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
				<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
				<span class="hl com">/*</span>
<span class="hl com">				 * When attempting to read or write to a</span>
<span class="hl com">				 * descriptor, if an underlying autobind fails</span>
<span class="hl com">				 * because it&#39;s not a socket, stop intercepting</span>
<span class="hl com">				 * uses of that descriptor.</span>
<span class="hl com">				 */</span>
				<span class="hl kwa">if</span> <span class="hl opt">(</span>errno <span class="hl opt">==</span> ENOTSOCK<span class="hl opt">) {</span>
					<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
					ret <span class="hl opt">= -</span>ENOTSOCK<span class="hl opt">;</span>
				<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
					<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
						  <span class="hl str">&quot;swrap_recvmsg_before failed&quot;</span><span class="hl opt">);</span>
				<span class="hl opt">}</span>
				<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		errno <span class="hl opt">=</span> EHOSTUNREACH<span class="hl opt">;</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_recvmsg_after</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span>
			       <span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">,</span>
			       <span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span>
			       <span class="hl kwb">const struct</span> sockaddr_un <span class="hl opt">*</span>un_addr<span class="hl opt">,</span>
			       socklen_t un_addrlen<span class="hl opt">,</span>
			       ssize_t ret<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> saved_errno <span class="hl opt">=</span> errno<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">;</span>
	<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>buf <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	off_t ofs <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> avail <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> remain<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	<span class="hl com">/* to give better errors */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>saved_errno <span class="hl opt">==</span> ENOENT<span class="hl opt">) {</span>
			saved_errno <span class="hl opt">=</span> EHOSTUNREACH<span class="hl opt">;</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>saved_errno <span class="hl opt">==</span> ENOTSOCK<span class="hl opt">) {</span>
			<span class="hl com">/* If the fd is not a socket, remove it */</span>
			<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		avail <span class="hl opt">+=</span> msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl com">/* Convert the socket address before we leave */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_DGRAM <span class="hl opt">&amp;&amp;</span> un_addr <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		rc <span class="hl opt">=</span> <span class="hl kwd">sockaddr_convert_from_un</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
					      un_addr<span class="hl opt">,</span>
					      un_addrlen<span class="hl opt">,</span>
					      si<span class="hl opt">-&gt;</span>family<span class="hl opt">,</span>
					      msg<span class="hl opt">-&gt;</span>msg_name<span class="hl opt">,</span>
					      <span class="hl opt">&amp;</span>msg<span class="hl opt">-&gt;</span>msg_namelen<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>avail <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		rc <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwa">goto</span> done<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		remain <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(</span><span class="hl num">80</span><span class="hl opt">,</span> avail<span class="hl opt">);</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		remain <span class="hl opt">=</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* we capture it as one single packet */</span>
	buf <span class="hl opt">= (</span><span class="hl kwb">uint8_t</span> <span class="hl opt">*)</span><span class="hl kwd">malloc</span><span class="hl opt">(</span>remain<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>buf <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl com">/* we just not capture the packet */</span>
		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
		errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
		<span class="hl kwb">size_t</span> this_time <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(</span>remain<span class="hl opt">, (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">);</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>buf <span class="hl opt">+</span> ofs<span class="hl opt">,</span>
		       msg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_base<span class="hl opt">,</span>
		       this_time<span class="hl opt">);</span>
		ofs <span class="hl opt">+=</span> this_time<span class="hl opt">;</span>
		remain <span class="hl opt">-=</span> this_time<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> SOCK_STREAM<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span> <span class="hl opt">&amp;&amp;</span> saved_errno <span class="hl opt">!=</span> EAGAIN <span class="hl opt">&amp;&amp;</span> saved_errno <span class="hl opt">!=</span> ENOBUFS<span class="hl opt">) {</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_RECV_RST<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>ret <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span> <span class="hl com">/* END OF FILE */</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_RECV_RST<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>ret <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_RECV<span class="hl opt">,</span> buf<span class="hl opt">,</span> ret<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>

	<span class="hl kwa">case</span> SOCK_DGRAM<span class="hl opt">:</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwa">break</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">if</span> <span class="hl opt">(</span>un_addr <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
					  msg<span class="hl opt">-&gt;</span>msg_name<span class="hl opt">,</span>
					  SWRAP_RECVFROM<span class="hl opt">,</span>
					  buf<span class="hl opt">,</span>
					  ret<span class="hl opt">);</span>
		<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
			<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span>
					  msg<span class="hl opt">-&gt;</span>msg_name<span class="hl opt">,</span>
					  SWRAP_RECV<span class="hl opt">,</span>
					  buf<span class="hl opt">,</span>
					  ret<span class="hl opt">);</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	rc <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
done<span class="hl opt">:</span>
	<span class="hl kwd">free</span><span class="hl opt">(</span>buf<span class="hl opt">);</span>
	errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>

<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">==</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span>
	    msg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">&gt;</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span>
	    msg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		rc <span class="hl opt">=</span> <span class="hl kwd">swrap_msghdr_add_socket_info</span><span class="hl opt">(</span>si<span class="hl opt">,</span> msg<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
			<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   RECVFROM</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_recvfrom</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
			      <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>from<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>fromlen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> swrap_address from_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">struct</span> swrap_address saddr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">int</span> tret<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_recvfrom</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				     buf<span class="hl opt">,</span>
				     len<span class="hl opt">,</span>
				     flags<span class="hl opt">,</span>
				     from<span class="hl opt">,</span>
				     fromlen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> buf<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> len<span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>from <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp;</span> fromlen <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		msg<span class="hl opt">.</span>msg_name <span class="hl opt">=</span> from<span class="hl opt">;</span>   <span class="hl com">/* optional address */</span>
		msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">= *</span>fromlen<span class="hl opt">;</span> <span class="hl com">/* size of address */</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>saddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span> <span class="hl com">/* optional address */</span>
		msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> saddr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span> <span class="hl com">/* size of address */</span>
	<span class="hl opt">}</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">= &amp;</span>tmp<span class="hl opt">;</span>            <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>            <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	tret <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_base<span class="hl opt">;</span>
	len <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_len<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_recvfrom</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
			    buf<span class="hl opt">,</span>
			    len<span class="hl opt">,</span>
			    flags<span class="hl opt">,</span>
			    <span class="hl opt">&amp;</span>from_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
			    <span class="hl opt">&amp;</span>from_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	tret <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				   si<span class="hl opt">,</span>
				   <span class="hl opt">&amp;</span>msg<span class="hl opt">,</span>
				   <span class="hl opt">&amp;</span>from_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				   from_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
				   ret<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> tret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>from <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp;</span> fromlen <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl opt">*</span>fromlen <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_namelen<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT_PSOCKLEN_T</span>
ssize_t <span class="hl kwd">recvfrom</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
		 <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>from<span class="hl opt">,</span> Psocklen_t fromlen<span class="hl opt">)</span>
<span class="hl ppc">#else</span>
ssize_t <span class="hl kwd">recvfrom</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
		 <span class="hl kwb">struct</span> sockaddr <span class="hl opt">*</span>from<span class="hl opt">,</span> socklen_t <span class="hl opt">*</span>fromlen<span class="hl opt">)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_recvfrom</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">,</span> from<span class="hl opt">, (</span>socklen_t <span class="hl opt">*)</span>fromlen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SENDTO</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_sendto</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
			    <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>to<span class="hl opt">,</span> socklen_t tolen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address un_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">const struct</span> sockaddr_un <span class="hl opt">*</span>to_un <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">int</span> bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_sendto</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">,</span> to<span class="hl opt">,</span> tolen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> <span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">char</span><span class="hl opt">,</span> buf<span class="hl opt">);</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> len<span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">=</span> <span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr<span class="hl opt">,</span> to<span class="hl opt">);</span> <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> tolen<span class="hl opt">;</span>       <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">= &amp;</span>tmp<span class="hl opt">;</span>            <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>            <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				  si<span class="hl opt">,</span>
				  <span class="hl opt">&amp;</span>msg<span class="hl opt">,</span>
				  <span class="hl opt">&amp;</span>tmp<span class="hl opt">,</span>
				  <span class="hl opt">&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				  <span class="hl opt">&amp;</span>to_un<span class="hl opt">,</span>
				  <span class="hl opt">&amp;</span>to<span class="hl opt">,</span>
				  <span class="hl opt">&amp;</span>bcast<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_base<span class="hl opt">;</span>
	len <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_len<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) {</span>
		<span class="hl kwb">struct</span> stat st<span class="hl opt">;</span>
		<span class="hl kwb">unsigned int</span> iface<span class="hl opt">;</span>
		<span class="hl kwb">unsigned int</span> prt <span class="hl opt">=</span> <span class="hl kwd">ntohs</span><span class="hl opt">(((</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>to<span class="hl opt">)-&gt;</span>sin_port<span class="hl opt">);</span>
		<span class="hl kwb">char</span> type<span class="hl opt">;</span>
		<span class="hl kwb">char</span> <span class="hl opt">*</span>swrap_dir <span class="hl opt">=</span> NULL<span class="hl opt">;</span>

		type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>

		swrap_dir <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">();</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">for</span><span class="hl opt">(</span>iface<span class="hl opt">=</span><span class="hl num">0</span><span class="hl opt">;</span> iface <span class="hl opt">&lt;=</span> MAX_WRAPPED_INTERFACES<span class="hl opt">;</span> iface<span class="hl opt">++) {</span>
			<span class="hl kwd">swrap_un_path</span><span class="hl opt">(&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				      swrap_dir<span class="hl opt">,</span>
				      type<span class="hl opt">,</span>
				      iface<span class="hl opt">,</span>
				      prt<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">stat</span><span class="hl opt">(</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">.</span>sun_path<span class="hl opt">, &amp;</span>st<span class="hl opt">) !=</span> <span class="hl num">0</span><span class="hl opt">)</span> <span class="hl kwa">continue</span><span class="hl opt">;</span>

			<span class="hl com">/* ignore the any errors in broadcast sends */</span>
			<span class="hl kwd">libc_sendto</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				    buf<span class="hl opt">,</span>
				    len<span class="hl opt">,</span>
				    flags<span class="hl opt">,</span>
				    <span class="hl opt">&amp;</span>un_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">,</span>
				    un_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">);</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>

		<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> to<span class="hl opt">,</span> SWRAP_SENDTO<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>

		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl kwa">return</span> len<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl com">/*</span>
<span class="hl com">	 * If it is a dgram socket and we are connected, don&#39;t include the</span>
<span class="hl com">	 * &#39;to&#39; address.</span>
<span class="hl com">	 */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_DGRAM <span class="hl opt">&amp;&amp;</span> si<span class="hl opt">-&gt;</span>connected<span class="hl opt">) {</span>
		ret <span class="hl opt">=</span> <span class="hl kwd">libc_sendto</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				  buf<span class="hl opt">,</span>
				  len<span class="hl opt">,</span>
				  flags<span class="hl opt">,</span>
				  NULL<span class="hl opt">,</span>
				  <span class="hl num">0</span><span class="hl opt">);</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		ret <span class="hl opt">=</span> <span class="hl kwd">libc_sendto</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				  buf<span class="hl opt">,</span>
				  len<span class="hl opt">,</span>
				  flags<span class="hl opt">,</span>
				  <span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr <span class="hl opt">*)</span>msg<span class="hl opt">.</span>msg_name<span class="hl opt">,</span>
				  msg<span class="hl opt">.</span>msg_namelen<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">swrap_sendmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> to<span class="hl opt">,</span> ret<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">sendto</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">,</span>
	       <span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>to<span class="hl opt">,</span> socklen_t tolen<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_sendto</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">,</span> to<span class="hl opt">,</span> tolen<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   READV</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_recv</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address saddr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> tret<span class="hl opt">;</span>

	si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_recv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> buf<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> len<span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>saddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span>    <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> saddr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span> <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">= &amp;</span>tmp<span class="hl opt">;</span>            <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>            <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	tret <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_base<span class="hl opt">;</span>
	len <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_len<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_recv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>

	tret <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> ret<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> tret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">recv</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_recv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   READ</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_read</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address saddr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> tret<span class="hl opt">;</span>

	si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_read</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> buf<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> len<span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>saddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>ss<span class="hl opt">;</span>   <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> saddr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span> <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">= &amp;</span>tmp<span class="hl opt">;</span>            <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>            <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	tret <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">== -</span>ENOTSOCK<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl kwd">libc_read</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_base<span class="hl opt">;</span>
	len <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_len<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_read</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>

	tret <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> ret<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>tret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> tret<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">read</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_read</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   WRITE</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_write</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> sockaddr_un un_addr<span class="hl opt">;</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>

	si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_write</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> <span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">char</span><span class="hl opt">,</span> buf<span class="hl opt">);</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> len<span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">=</span> NULL<span class="hl opt">;</span>           <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>           <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">= &amp;</span>tmp<span class="hl opt">;</span>            <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>            <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">,</span> NULL<span class="hl opt">,</span> NULL<span class="hl opt">,</span> NULL<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_base<span class="hl opt">;</span>
	len <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_len<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_write</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>

	<span class="hl kwd">swrap_sendmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> NULL<span class="hl opt">,</span> ret<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">write</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_write</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SEND</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_send</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> sockaddr_un un_addr<span class="hl opt">;</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_send</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> <span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">char</span><span class="hl opt">,</span> buf<span class="hl opt">);</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> len<span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">=</span> NULL<span class="hl opt">;</span>           <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>           <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">= &amp;</span>tmp<span class="hl opt">;</span>            <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> <span class="hl num">1</span><span class="hl opt">;</span>            <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">,</span> NULL<span class="hl opt">,</span> NULL<span class="hl opt">,</span> NULL<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	buf <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_base<span class="hl opt">;</span>
	len <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">].</span>iov_len<span class="hl opt">;</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_send</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>

	<span class="hl kwd">swrap_sendmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> NULL<span class="hl opt">,</span> ret<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">send</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const void</span> <span class="hl opt">*</span>buf<span class="hl opt">,</span> <span class="hl kwb">size_t</span> len<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_send</span><span class="hl opt">(</span>s<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   RECVMSG</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_recvmsg</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>omsg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> swrap_address from_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_un<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> swrap_address convert_addr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">),</span>
	<span class="hl opt">};</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	<span class="hl kwb">size_t</span> msg_ctrllen_filled<span class="hl opt">;</span>
	<span class="hl kwb">size_t</span> msg_ctrllen_left<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>

	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_recvmsg</span><span class="hl opt">(</span>s<span class="hl opt">,</span> omsg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>from_addr<span class="hl opt">.</span>sa<span class="hl opt">;</span>              <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> from_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>    <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">;</span>               <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span>         <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg_ctrllen_filled <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	msg_ctrllen_left <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">;</span>

	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_control<span class="hl opt">;</span>       <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">;</span> <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_flags<span class="hl opt">;</span>           <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_recvmsg</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> flags<span class="hl opt">);</span>

<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg_ctrllen_filled <span class="hl opt">+=</span> msg<span class="hl opt">.</span>msg_controllen<span class="hl opt">;</span>
	msg_ctrllen_left <span class="hl opt">-=</span> msg<span class="hl opt">.</span>msg_controllen<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>omsg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>p<span class="hl opt">;</span>

		p <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_control<span class="hl opt">;</span>
		p <span class="hl opt">+=</span> msg_ctrllen_filled<span class="hl opt">;</span>

		msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> p<span class="hl opt">;</span>
		msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> msg_ctrllen_left<span class="hl opt">;</span>
	<span class="hl opt">}</span> <span class="hl kwa">else</span> <span class="hl opt">{</span>
		msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
		msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * We convert the unix address to a IP address so we need a buffer</span>
<span class="hl com">	 * which can store the address in case of SOCK_DGRAM, see below.</span>
<span class="hl com">	 */</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>convert_addr<span class="hl opt">.</span>sa<span class="hl opt">;</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> convert_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span>
				 si<span class="hl opt">,</span>
				 <span class="hl opt">&amp;</span>msg<span class="hl opt">,</span>
				 <span class="hl opt">&amp;</span>from_addr<span class="hl opt">.</span>sa<span class="hl opt">.</span>un<span class="hl opt">,</span>
				 from_addr<span class="hl opt">.</span>sa_socklen<span class="hl opt">,</span>
				 ret<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
	<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>omsg<span class="hl opt">-&gt;</span>msg_control <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl com">/* msg.msg_controllen = space left */</span>
		msg_ctrllen_left <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_controllen<span class="hl opt">;</span>
		msg_ctrllen_filled <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">-</span> msg_ctrllen_left<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl com">/* Update the original message length */</span>
	omsg<span class="hl opt">-&gt;</span>msg_controllen <span class="hl opt">=</span> msg_ctrllen_filled<span class="hl opt">;</span>
	omsg<span class="hl opt">-&gt;</span>msg_flags <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_flags<span class="hl opt">;</span>
<span class="hl ppc">#endif</span>
	omsg<span class="hl opt">-&gt;</span>msg_iovlen <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_iovlen<span class="hl opt">;</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl com">/*</span>
<span class="hl com">	 * From the manpage:</span>
<span class="hl com">	 *</span>
<span class="hl com">	 * The  msg_name  field  points  to a caller-allocated buffer that is</span>
<span class="hl com">	 * used to return the source address if the socket is unconnected.  The</span>
<span class="hl com">	 * caller should set msg_namelen to the size of this buffer before this</span>
<span class="hl com">	 * call; upon return from a successful call, msg_name will contain the</span>
<span class="hl com">	 * length of the returned address.  If the application  does  not  need</span>
<span class="hl com">	 * to know the source address, msg_name can be specified as NULL.</span>
<span class="hl com">	 */</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>type <span class="hl opt">==</span> SOCK_STREAM<span class="hl opt">) {</span>
		omsg<span class="hl opt">-&gt;</span>msg_namelen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
	<span class="hl opt">}</span> <span class="hl kwa">else if</span> <span class="hl opt">(</span>omsg<span class="hl opt">-&gt;</span>msg_name <span class="hl opt">!=</span> NULL <span class="hl opt">&amp;&amp;</span>
	           omsg<span class="hl opt">-&gt;</span>msg_namelen <span class="hl opt">!=</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span>
	           omsg<span class="hl opt">-&gt;</span>msg_namelen <span class="hl opt">&gt;=</span> msg<span class="hl opt">.</span>msg_namelen<span class="hl opt">) {</span>
		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>omsg<span class="hl opt">-&gt;</span>msg_name<span class="hl opt">,</span> msg<span class="hl opt">.</span>msg_name<span class="hl opt">,</span> msg<span class="hl opt">.</span>msg_namelen<span class="hl opt">);</span>
		omsg<span class="hl opt">-&gt;</span>msg_namelen <span class="hl opt">=</span> msg<span class="hl opt">.</span>msg_namelen<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">recvmsg</span><span class="hl opt">(</span><span class="hl kwb">int</span> sockfd<span class="hl opt">,</span> <span class="hl kwb">struct</span> msghdr <span class="hl opt">*</span>msg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_recvmsg</span><span class="hl opt">(</span>sockfd<span class="hl opt">,</span> msg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   SENDMSG</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_sendmsg</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> msghdr <span class="hl opt">*</span>omsg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> sockaddr_un un_addr<span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> sockaddr_un <span class="hl opt">*</span>to_un <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">const struct</span> sockaddr <span class="hl opt">*</span>to <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwb">int</span> bcast <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_sendmsg</span><span class="hl opt">(</span>s<span class="hl opt">,</span> omsg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>un_addr<span class="hl opt">);</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>connected <span class="hl opt">==</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		msg<span class="hl opt">.</span>msg_name <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_name<span class="hl opt">;</span>             <span class="hl com">/* optional address */</span>
		msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_namelen<span class="hl opt">;</span>       <span class="hl com">/* size of address */</span>
	<span class="hl opt">}</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_iov<span class="hl opt">;</span>               <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_iovlen<span class="hl opt">;</span>         <span class="hl com">/* # elements in msg_iov */</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">&gt;</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span> msg<span class="hl opt">.</span>msg_control <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl com">/* omsg is a const so use a local buffer for modifications */</span>
		<span class="hl kwb">uint8_t</span> cmbuf<span class="hl opt">[</span>omsg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">];</span>

		<span class="hl kwd">memcpy</span><span class="hl opt">(</span>cmbuf<span class="hl opt">,</span> omsg<span class="hl opt">-&gt;</span>msg_control<span class="hl opt">,</span> omsg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">);</span>

		msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> cmbuf<span class="hl opt">;</span>       <span class="hl com">/* ancillary data, see below */</span>
		msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_controllen<span class="hl opt">;</span> <span class="hl com">/* ancillary data buffer len */</span>
	<span class="hl opt">}</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> omsg<span class="hl opt">-&gt;</span>msg_flags<span class="hl opt">;</span>           <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">, &amp;</span>to_un<span class="hl opt">, &amp;</span>to<span class="hl opt">, &amp;</span>bcast<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>bcast<span class="hl opt">) {</span>
		<span class="hl kwb">struct</span> stat st<span class="hl opt">;</span>
		<span class="hl kwb">unsigned int</span> iface<span class="hl opt">;</span>
		<span class="hl kwb">unsigned int</span> prt <span class="hl opt">=</span> <span class="hl kwd">ntohs</span><span class="hl opt">(((</span><span class="hl kwb">const struct</span> sockaddr_in <span class="hl opt">*)(</span><span class="hl kwb">const void</span> <span class="hl opt">*)</span>to<span class="hl opt">)-&gt;</span>sin_port<span class="hl opt">);</span>
		<span class="hl kwb">char</span> type<span class="hl opt">;</span>
		<span class="hl kwb">size_t</span> i<span class="hl opt">,</span> len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwb">uint8_t</span> <span class="hl opt">*</span>buf<span class="hl opt">;</span>
		off_t ofs <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwb">size_t</span> avail <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>
		<span class="hl kwb">size_t</span> remain<span class="hl opt">;</span>
		<span class="hl kwb">char</span> <span class="hl opt">*</span>swrap_dir <span class="hl opt">=</span> NULL<span class="hl opt">;</span>

		<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">.</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
			avail <span class="hl opt">+=</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		len <span class="hl opt">=</span> avail<span class="hl opt">;</span>
		remain <span class="hl opt">=</span> avail<span class="hl opt">;</span>

		<span class="hl com">/* we capture it as one single packet */</span>
		buf <span class="hl opt">= (</span><span class="hl kwb">uint8_t</span> <span class="hl opt">*)</span><span class="hl kwd">malloc</span><span class="hl opt">(</span>remain<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(!</span>buf<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt; (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">.</span>msg_iovlen<span class="hl opt">;</span> i<span class="hl opt">++) {</span>
			<span class="hl kwb">size_t</span> this_time <span class="hl opt">=</span> <span class="hl kwd">MIN</span><span class="hl opt">(</span>remain<span class="hl opt">, (</span><span class="hl kwb">size_t</span><span class="hl opt">)</span>msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_len<span class="hl opt">);</span>
			<span class="hl kwd">memcpy</span><span class="hl opt">(</span>buf <span class="hl opt">+</span> ofs<span class="hl opt">,</span>
			       msg<span class="hl opt">.</span>msg_iov<span class="hl opt">[</span>i<span class="hl opt">].</span>iov_base<span class="hl opt">,</span>
			       this_time<span class="hl opt">);</span>
			ofs <span class="hl opt">+=</span> this_time<span class="hl opt">;</span>
			remain <span class="hl opt">-=</span> this_time<span class="hl opt">;</span>
		<span class="hl opt">}</span>

		type <span class="hl opt">=</span> SOCKET_TYPE_CHAR_UDP<span class="hl opt">;</span>

		swrap_dir <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_dir</span><span class="hl opt">();</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap_dir <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
			<span class="hl kwd">free</span><span class="hl opt">(</span>buf<span class="hl opt">);</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwa">for</span><span class="hl opt">(</span>iface<span class="hl opt">=</span><span class="hl num">0</span><span class="hl opt">;</span> iface <span class="hl opt">&lt;=</span> MAX_WRAPPED_INTERFACES<span class="hl opt">;</span> iface<span class="hl opt">++) {</span>
			<span class="hl kwd">swrap_un_path</span><span class="hl opt">(&amp;</span>un_addr<span class="hl opt">,</span> swrap_dir<span class="hl opt">,</span> type<span class="hl opt">,</span> iface<span class="hl opt">,</span> prt<span class="hl opt">);</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">stat</span><span class="hl opt">(</span>un_addr<span class="hl opt">.</span>sun_path<span class="hl opt">, &amp;</span>st<span class="hl opt">) !=</span> <span class="hl num">0</span><span class="hl opt">)</span> <span class="hl kwa">continue</span><span class="hl opt">;</span>

			msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>un_addr<span class="hl opt">;</span>           <span class="hl com">/* optional address */</span>
			msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span>un_addr<span class="hl opt">);</span> <span class="hl com">/* size of address */</span>

			<span class="hl com">/* ignore the any errors in broadcast sends */</span>
			<span class="hl kwd">libc_sendmsg</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>swrap_dir<span class="hl opt">);</span>

		<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> to<span class="hl opt">,</span> SWRAP_SENDTO<span class="hl opt">,</span> buf<span class="hl opt">,</span> len<span class="hl opt">);</span>
		<span class="hl kwd">free</span><span class="hl opt">(</span>buf<span class="hl opt">);</span>

		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl kwa">return</span> len<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_sendmsg</span><span class="hl opt">(</span>s<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> flags<span class="hl opt">);</span>

	<span class="hl kwd">swrap_sendmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> to<span class="hl opt">,</span> ret<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">sendmsg</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> msghdr <span class="hl opt">*</span>omsg<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_sendmsg</span><span class="hl opt">(</span>s<span class="hl opt">,</span> omsg<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   READV</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_readv</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>vector<span class="hl opt">,</span> <span class="hl kwb">int</span> count<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> swrap_address saddr <span class="hl opt">= {</span>
		<span class="hl opt">.</span>sa_socklen <span class="hl opt">=</span> <span class="hl kwa">sizeof</span><span class="hl opt">(</span><span class="hl kwb">struct</span> sockaddr_storage<span class="hl opt">)</span>
	<span class="hl opt">};</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si <span class="hl opt">==</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_readv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> vector<span class="hl opt">,</span> count<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">= &amp;</span>saddr<span class="hl opt">.</span>sa<span class="hl opt">.</span>s<span class="hl opt">;</span> <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> saddr<span class="hl opt">.</span>sa_socklen<span class="hl opt">;</span>      <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">=</span> <span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">struct</span> iovec<span class="hl opt">,</span> vector<span class="hl opt">);</span> <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> count<span class="hl opt">;</span>        <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">== -</span>ENOTSOCK<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl kwd">libc_readv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> vector<span class="hl opt">,</span> count<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_readv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">,</span> msg<span class="hl opt">.</span>msg_iovlen<span class="hl opt">);</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_recvmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">,</span> ret<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">readv</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>vector<span class="hl opt">,</span> <span class="hl kwb">int</span> count<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_readv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> vector<span class="hl opt">,</span> count<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************************************************************</span>
<span class="hl com"> *   WRITEV</span>
<span class="hl com"> ***************************************************************************/</span>

<span class="hl kwb">static</span> ssize_t <span class="hl kwd">swrap_writev</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>vector<span class="hl opt">,</span> <span class="hl kwb">int</span> count<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> msghdr msg<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> iovec tmp<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> sockaddr_un un_addr<span class="hl opt">;</span>
	ssize_t ret<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> <span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>s<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(!</span>si<span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_writev</span><span class="hl opt">(</span>s<span class="hl opt">,</span> vector<span class="hl opt">,</span> count<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	tmp<span class="hl opt">.</span>iov_base <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	tmp<span class="hl opt">.</span>iov_len <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>

	<span class="hl kwd">ZERO_STRUCT</span><span class="hl opt">(</span>msg<span class="hl opt">);</span>
	msg<span class="hl opt">.</span>msg_name <span class="hl opt">=</span> NULL<span class="hl opt">;</span>           <span class="hl com">/* optional address */</span>
	msg<span class="hl opt">.</span>msg_namelen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>           <span class="hl com">/* size of address */</span>
	msg<span class="hl opt">.</span>msg_iov <span class="hl opt">=</span> <span class="hl kwd">discard_const_p</span><span class="hl opt">(</span><span class="hl kwb">struct</span> iovec<span class="hl opt">,</span> vector<span class="hl opt">);</span> <span class="hl com">/* scatter/gather array */</span>
	msg<span class="hl opt">.</span>msg_iovlen <span class="hl opt">=</span> count<span class="hl opt">;</span>        <span class="hl com">/* # elements in msg_iov */</span>
<span class="hl ppc">#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL</span>
	msg<span class="hl opt">.</span>msg_control <span class="hl opt">=</span> NULL<span class="hl opt">;</span>        <span class="hl com">/* ancillary data, see below */</span>
	msg<span class="hl opt">.</span>msg_controllen <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>        <span class="hl com">/* ancillary data buffer len */</span>
	msg<span class="hl opt">.</span>msg_flags <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span>             <span class="hl com">/* flags on received message */</span>
<span class="hl ppc">#endif</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_sendmsg_before</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">, &amp;</span>tmp<span class="hl opt">, &amp;</span>un_addr<span class="hl opt">,</span> NULL<span class="hl opt">,</span> NULL<span class="hl opt">,</span> NULL<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">&lt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>rc <span class="hl opt">== -</span>ENOTSOCK<span class="hl opt">) {</span>
			<span class="hl kwa">return</span> <span class="hl kwd">libc_readv</span><span class="hl opt">(</span>s<span class="hl opt">,</span> vector<span class="hl opt">,</span> count<span class="hl opt">);</span>
		<span class="hl opt">}</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_writev</span><span class="hl opt">(</span>s<span class="hl opt">,</span> msg<span class="hl opt">.</span>msg_iov<span class="hl opt">,</span> msg<span class="hl opt">.</span>msg_iovlen<span class="hl opt">);</span>

	<span class="hl kwd">swrap_sendmsg_after</span><span class="hl opt">(</span>s<span class="hl opt">,</span> si<span class="hl opt">, &amp;</span>msg<span class="hl opt">,</span> NULL<span class="hl opt">,</span> ret<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

ssize_t <span class="hl kwd">writev</span><span class="hl opt">(</span><span class="hl kwb">int</span> s<span class="hl opt">,</span> <span class="hl kwb">const struct</span> iovec <span class="hl opt">*</span>vector<span class="hl opt">,</span> <span class="hl kwb">int</span> count<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_writev</span><span class="hl opt">(</span>s<span class="hl opt">,</span> vector<span class="hl opt">,</span> count<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * CLOSE</span>
<span class="hl com"> ***************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_close</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si <span class="hl opt">=</span> NULL<span class="hl opt">;</span>
	<span class="hl kwb">int</span> si_index<span class="hl opt">;</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>

	si_index <span class="hl opt">=</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>si_index <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_TRACE<span class="hl opt">,</span> <span class="hl str">&quot;Close wrapper for fd=</span><span class="hl ipl">%d</span><span class="hl str">&quot;</span><span class="hl opt">,</span> fd<span class="hl opt">);</span>
	<span class="hl kwd">reset_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>

	si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>si_index<span class="hl opt">);</span>

	<span class="hl kwd">swrap_mutex_lock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">libc_close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>

	<span class="hl kwd">swrap_dec_refcount</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">swrap_get_refcount</span><span class="hl opt">(</span>si<span class="hl opt">) &gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl com">/* there are still references left */</span>
		<span class="hl kwa">goto</span> out<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">&gt;</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span> si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa_socklen <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_CLOSE_SEND<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>myname<span class="hl opt">.</span>sa_socklen <span class="hl opt">&gt;</span> <span class="hl num">0</span> <span class="hl opt">&amp;&amp;</span> si<span class="hl opt">-&gt;</span>peername<span class="hl opt">.</span>sa_socklen <span class="hl opt">&gt;</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_CLOSE_RECV<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
		<span class="hl kwd">swrap_pcap_dump_packet</span><span class="hl opt">(</span>si<span class="hl opt">,</span> NULL<span class="hl opt">,</span> SWRAP_CLOSE_ACK<span class="hl opt">,</span> NULL<span class="hl opt">,</span> <span class="hl num">0</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>un_addr<span class="hl opt">.</span>sun_path<span class="hl opt">[</span><span class="hl num">0</span><span class="hl opt">] !=</span> <span class="hl str">&#39;\0&#39;</span><span class="hl opt">) {</span>
		<span class="hl kwd">unlink</span><span class="hl opt">(</span>si<span class="hl opt">-&gt;</span>un_addr<span class="hl opt">.</span>sun_path<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">swrap_set_next_free</span><span class="hl opt">(</span>si<span class="hl opt">,</span> first_free<span class="hl opt">);</span>
	first_free <span class="hl opt">=</span> si_index<span class="hl opt">;</span>

out<span class="hl opt">:</span>
	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwd">swrap_mutex_unlock</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>

	<span class="hl kwa">return</span> ret<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">close</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_close</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * DUP</span>
<span class="hl com"> ***************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_dup</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">int</span> dup_fd<span class="hl opt">,</span> idx<span class="hl opt">;</span>

	idx <span class="hl opt">=</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>idx <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_dup</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>idx<span class="hl opt">);</span>

	dup_fd <span class="hl opt">=</span> <span class="hl kwd">libc_dup</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>dup_fd <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwb">int</span> saved_errno <span class="hl opt">=</span> errno<span class="hl opt">;</span>
		errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">swrap_inc_refcount</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl com">/* Make sure we don&#39;t have an entry for the fd */</span>
	<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>dup_fd<span class="hl opt">);</span>

	<span class="hl kwd">set_socket_info_index</span><span class="hl opt">(</span>dup_fd<span class="hl opt">,</span> idx<span class="hl opt">);</span>

	<span class="hl kwa">return</span> dup_fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">dup</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_dup</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * DUP2</span>
<span class="hl com"> ***************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_dup2</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> newfd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">int</span> dup_fd<span class="hl opt">,</span> idx<span class="hl opt">;</span>

	idx <span class="hl opt">=</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>idx <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_dup2</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> newfd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>idx<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">==</span> newfd<span class="hl opt">) {</span>
		<span class="hl com">/*</span>
<span class="hl com">		 * According to the manpage:</span>
<span class="hl com">		 *</span>
<span class="hl com">		 * &quot;If oldfd is a valid file descriptor, and newfd has the same</span>
<span class="hl com">		 * value as oldfd, then dup2() does nothing, and returns newfd.&quot;</span>
<span class="hl com">		 */</span>
		<span class="hl kwa">return</span> newfd<span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span><span class="hl kwd">find_socket_info</span><span class="hl opt">(</span>newfd<span class="hl opt">)) {</span>
		<span class="hl com">/* dup2() does an implicit close of newfd, which we</span>
<span class="hl com">		 * need to emulate */</span>
		<span class="hl kwd">swrap_close</span><span class="hl opt">(</span>newfd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	dup_fd <span class="hl opt">=</span> <span class="hl kwd">libc_dup2</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> newfd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>dup_fd <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwb">int</span> saved_errno <span class="hl opt">=</span> errno<span class="hl opt">;</span>
		errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>
		<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">swrap_inc_refcount</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

	<span class="hl com">/* Make sure we don&#39;t have an entry for the fd */</span>
	<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>dup_fd<span class="hl opt">);</span>

	<span class="hl kwd">set_socket_info_index</span><span class="hl opt">(</span>dup_fd<span class="hl opt">,</span> idx<span class="hl opt">);</span>

	<span class="hl kwa">return</span> dup_fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">dup2</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> newfd<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_dup2</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> newfd<span class="hl opt">);</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * FCNTL</span>
<span class="hl com"> ***************************/</span>

<span class="hl kwb">static int</span> <span class="hl kwd">swrap_vfcntl</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> cmd<span class="hl opt">,</span> <span class="hl kwb">va_list</span> va<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">struct</span> socket_info <span class="hl opt">*</span>si<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">,</span> dup_fd<span class="hl opt">,</span> idx<span class="hl opt">;</span>

	idx <span class="hl opt">=</span> <span class="hl kwd">find_socket_info_index</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>idx <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwa">return</span> <span class="hl kwd">libc_vfcntl</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> cmd<span class="hl opt">,</span> va<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	si <span class="hl opt">=</span> <span class="hl kwd">swrap_get_socket_info</span><span class="hl opt">(</span>idx<span class="hl opt">);</span>

	<span class="hl kwa">switch</span> <span class="hl opt">(</span>cmd<span class="hl opt">) {</span>
	<span class="hl kwa">case</span> F_DUPFD<span class="hl opt">:</span>
		dup_fd <span class="hl opt">=</span> <span class="hl kwd">libc_vfcntl</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> cmd<span class="hl opt">,</span> va<span class="hl opt">);</span>
		<span class="hl kwa">if</span> <span class="hl opt">(</span>dup_fd <span class="hl opt">== -</span><span class="hl num">1</span><span class="hl opt">) {</span>
			<span class="hl kwb">int</span> saved_errno <span class="hl opt">=</span> errno<span class="hl opt">;</span>
			errno <span class="hl opt">=</span> saved_errno<span class="hl opt">;</span>
			<span class="hl kwa">return</span> <span class="hl opt">-</span><span class="hl num">1</span><span class="hl opt">;</span>
		<span class="hl opt">}</span>

		<span class="hl kwd">SWRAP_LOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl kwd">swrap_inc_refcount</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl kwd">SWRAP_UNLOCK_SI</span><span class="hl opt">(</span>si<span class="hl opt">);</span>

		<span class="hl com">/* Make sure we don&#39;t have an entry for the fd */</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>dup_fd<span class="hl opt">);</span>

		<span class="hl kwd">set_socket_info_index</span><span class="hl opt">(</span>dup_fd<span class="hl opt">,</span> idx<span class="hl opt">);</span>

		rc <span class="hl opt">=</span> dup_fd<span class="hl opt">;</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl kwa">default</span><span class="hl opt">:</span>
		rc <span class="hl opt">=</span> <span class="hl kwd">libc_vfcntl</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> cmd<span class="hl opt">,</span> va<span class="hl opt">);</span>
		<span class="hl kwa">break</span><span class="hl opt">;</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">int</span> <span class="hl kwd">fcntl</span><span class="hl opt">(</span><span class="hl kwb">int</span> fd<span class="hl opt">,</span> <span class="hl kwb">int</span> cmd<span class="hl opt">, ...)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">va_list</span> va<span class="hl opt">;</span>
	<span class="hl kwb">int</span> rc<span class="hl opt">;</span>

	<span class="hl kwd">va_start</span><span class="hl opt">(</span>va<span class="hl opt">,</span> cmd<span class="hl opt">);</span>

	rc <span class="hl opt">=</span> <span class="hl kwd">swrap_vfcntl</span><span class="hl opt">(</span>fd<span class="hl opt">,</span> cmd<span class="hl opt">,</span> va<span class="hl opt">);</span>

	<span class="hl kwd">va_end</span><span class="hl opt">(</span>va<span class="hl opt">);</span>

	<span class="hl kwa">return</span> rc<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * EVENTFD</span>
<span class="hl com"> ***************************/</span>

<span class="hl ppc">#ifdef HAVE_EVENTFD</span>
<span class="hl kwb">static int</span> <span class="hl kwd">swrap_eventfd</span><span class="hl opt">(</span><span class="hl kwb">int</span> count<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> fd<span class="hl opt">;</span>

	fd <span class="hl opt">=</span> <span class="hl kwd">libc_eventfd</span><span class="hl opt">(</span>count<span class="hl opt">,</span> flags<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>fd <span class="hl opt">!= -</span><span class="hl num">1</span><span class="hl opt">) {</span>
		<span class="hl kwd">swrap_remove_stale</span><span class="hl opt">(</span>fd<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwa">return</span> fd<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl ppc">#ifdef HAVE_EVENTFD_UNSIGNED_INT</span>
<span class="hl kwb">int</span> <span class="hl kwd">eventfd</span><span class="hl opt">(</span><span class="hl kwb">unsigned int</span> count<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl ppc">#else</span>
<span class="hl kwb">int</span> <span class="hl kwd">eventfd</span><span class="hl opt">(</span><span class="hl kwb">int</span> count<span class="hl opt">,</span> <span class="hl kwb">int</span> flags<span class="hl opt">)</span>
<span class="hl ppc">#endif</span>
<span class="hl opt">{</span>
	<span class="hl kwa">return</span> <span class="hl kwd">swrap_eventfd</span><span class="hl opt">(</span>count<span class="hl opt">,</span> flags<span class="hl opt">);</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span>

<span class="hl ppc">#ifdef HAVE_PLEDGE</span>
<span class="hl kwb">int</span> <span class="hl kwd">pledge</span><span class="hl opt">(</span><span class="hl kwb">const char</span> <span class="hl opt">*</span>promises<span class="hl opt">,</span> <span class="hl kwb">const char</span> <span class="hl opt">*</span>paths<span class="hl opt">[])</span>
<span class="hl opt">{</span>
	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>promises<span class="hl opt">;</span> <span class="hl com">/* unused */</span>
	<span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>paths<span class="hl opt">;</span> <span class="hl com">/* unused */</span>

	<span class="hl kwa">return</span> <span class="hl num">0</span><span class="hl opt">;</span>
<span class="hl opt">}</span>
<span class="hl ppc">#endif</span> <span class="hl com">/* HAVE_PLEDGE */</span><span class="hl ppc"></span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_thread_prepare</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl com">/*</span>
<span class="hl com">	 * This function should only be called here!!</span>
<span class="hl com">	 *</span>
<span class="hl com">	 * We bind all symobls to avoid deadlocks of the fork is</span>
<span class="hl com">	 * interrupted by a signal handler using a symbol of this</span>
<span class="hl com">	 * library.</span>
<span class="hl com">	 */</span>
	<span class="hl kwd">swrap_bind_symbol_all</span><span class="hl opt">();</span>

	SWRAP_LOCK_ALL<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_thread_parent</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	SWRAP_UNLOCK_ALL<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl kwb">static void</span> <span class="hl kwd">swrap_thread_child</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	SWRAP_UNLOCK_ALL<span class="hl opt">;</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * CONSTRUCTOR</span>
<span class="hl com"> ***************************/</span>
<span class="hl kwb">void</span> <span class="hl kwd">swrap_constructor</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">int</span> ret<span class="hl opt">;</span>

	<span class="hl com">/*</span>
<span class="hl com">	* If we hold a lock and the application forks, then the child</span>
<span class="hl com">	* is not able to unlock the mutex and we are in a deadlock.</span>
<span class="hl com">	* This should prevent such deadlocks.</span>
<span class="hl com">	*/</span>
	<span class="hl kwd">pthread_atfork</span><span class="hl opt">(&amp;</span>swrap_thread_prepare<span class="hl opt">,</span>
		       <span class="hl opt">&amp;</span>swrap_thread_parent<span class="hl opt">,</span>
		       <span class="hl opt">&amp;</span>swrap_thread_child<span class="hl opt">);</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>sockets_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>socket_reset_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>

	ret <span class="hl opt">=</span> <span class="hl kwd">socket_wrapper_init_mutex</span><span class="hl opt">(&amp;</span>first_free_mutex<span class="hl opt">);</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>ret <span class="hl opt">!=</span> <span class="hl num">0</span><span class="hl opt">) {</span>
		<span class="hl kwd">SWRAP_LOG</span><span class="hl opt">(</span>SWRAP_LOG_ERROR<span class="hl opt">,</span>
			  <span class="hl str">&quot;Failed to initialize pthread mutex&quot;</span><span class="hl opt">);</span>
		<span class="hl kwd">exit</span><span class="hl opt">(-</span><span class="hl num">1</span><span class="hl opt">);</span>
	<span class="hl opt">}</span>
<span class="hl opt">}</span>

<span class="hl com">/****************************</span>
<span class="hl com"> * DESTRUCTOR</span>
<span class="hl com"> ***************************/</span>

<span class="hl com">/*</span>
<span class="hl com"> * This function is called when the library is unloaded and makes sure that</span>
<span class="hl com"> * sockets get closed and the unix file for the socket are unlinked.</span>
<span class="hl com"> */</span>
<span class="hl kwb">void</span> <span class="hl kwd">swrap_destructor</span><span class="hl opt">(</span><span class="hl kwb">void</span><span class="hl opt">)</span>
<span class="hl opt">{</span>
	<span class="hl kwb">size_t</span> i<span class="hl opt">;</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>socket_fds_idx <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwa">for</span> <span class="hl opt">(</span>i <span class="hl opt">=</span> <span class="hl num">0</span><span class="hl opt">;</span> i <span class="hl opt">&lt;</span> socket_fds_max<span class="hl opt">; ++</span>i<span class="hl opt">) {</span>
			<span class="hl kwa">if</span> <span class="hl opt">(</span>socket_fds_idx<span class="hl opt">[</span>i<span class="hl opt">] != -</span><span class="hl num">1</span><span class="hl opt">) {</span>
				<span class="hl kwd">swrap_close</span><span class="hl opt">(</span>i<span class="hl opt">);</span>
			<span class="hl opt">}</span>
		<span class="hl opt">}</span>
		<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>socket_fds_idx<span class="hl opt">);</span>
	<span class="hl opt">}</span>

	<span class="hl kwd">SAFE_FREE</span><span class="hl opt">(</span>sockets<span class="hl opt">);</span>

	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>handle <span class="hl opt">!=</span> NULL<span class="hl opt">) {</span>
		<span class="hl kwd">dlclose</span><span class="hl opt">(</span>swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>handle<span class="hl opt">);</span>
	<span class="hl opt">}</span>
	<span class="hl kwa">if</span> <span class="hl opt">(</span>swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>socket_handle<span class="hl opt">) {</span>
		<span class="hl kwd">dlclose</span><span class="hl opt">(</span>swrap<span class="hl opt">.</span>libc<span class="hl opt">.</span>socket_handle<span class="hl opt">);</span>
	<span class="hl opt">}</span>
<span class="hl opt">}</span>

<span class="hl ppc">#if defined(HAVE__SOCKET) &amp;&amp; defined(HAVE__CLOSE)</span>
<span class="hl com">/*</span>
<span class="hl com"> * On FreeBSD 12 (and maybe other platforms)</span>
<span class="hl com"> * system libraries like libresolv prefix there</span>
<span class="hl com"> * syscalls with &#39;_&#39; in order to always use</span>
<span class="hl com"> * the symbols from libc.</span>
<span class="hl com"> *</span>
<span class="hl com"> * In the interaction with resolv_wrapper,</span>
<span class="hl com"> * we need to inject socket wrapper into libresolv,</span>
<span class="hl com"> * which means we need to private all socket</span>
<span class="hl com"> * related syscalls also with the &#39;_&#39; prefix.</span>
<span class="hl com"> *</span>
<span class="hl com"> * This is tested in Samba&#39;s &#39;make test&#39;,</span>
<span class="hl com"> * there we noticed that providing &#39;_read&#39;</span>
<span class="hl com"> * and &#39;_open&#39; would cause errors, which</span>
<span class="hl com"> * means we skip &#39;_read&#39;, &#39;_write&#39; and</span>
<span class="hl com"> * all non socket related calls without</span>
<span class="hl com"> * further analyzing the problem.</span>
<span class="hl com"> */</span>
<span class="hl ppc">#define SWRAP_SYMBOL_ALIAS(__sym, __aliassym) \</span>
<span class="hl ppc">	extern typeof(__sym) __aliassym __attribute__ ((alias(#__sym)))</span>

<span class="hl ppc">#ifdef HAVE_ACCEPT4</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>accept4<span class="hl opt">,</span> _accept4<span class="hl opt">);</span>
<span class="hl ppc">#endif</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>accept<span class="hl opt">,</span> _accept<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>bind<span class="hl opt">,</span> _bind<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>close<span class="hl opt">,</span> _close<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>connect<span class="hl opt">,</span> _connect<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>dup<span class="hl opt">,</span> _dup<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>dup2<span class="hl opt">,</span> _dup2<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>fcntl<span class="hl opt">,</span> _fcntl<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>getpeername<span class="hl opt">,</span> _getpeername<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>getsockname<span class="hl opt">,</span> _getsockname<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>getsockopt<span class="hl opt">,</span> _getsockopt<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>ioctl<span class="hl opt">,</span> _ioctl<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>listen<span class="hl opt">,</span> _listen<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>readv<span class="hl opt">,</span> _readv<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>recv<span class="hl opt">,</span> _recv<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>recvfrom<span class="hl opt">,</span> _recvfrom<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>recvmsg<span class="hl opt">,</span> _recvmsg<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>send<span class="hl opt">,</span> _send<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>sendmsg<span class="hl opt">,</span> _sendmsg<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>sendto<span class="hl opt">,</span> _sendto<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>setsockopt<span class="hl opt">,</span> _setsockopt<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>socket<span class="hl opt">,</span> _socket<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>socketpair<span class="hl opt">,</span> _socketpair<span class="hl opt">);</span>
<span class="hl kwd">SWRAP_SYMBOL_ALIAS</span><span class="hl opt">(</span>writev<span class="hl opt">,</span> _writev<span class="hl opt">);</span>

<span class="hl ppc">#endif</span> <span class="hl com">/* SOCKET_WRAPPER_EXPORT_UNDERSCORE_SYMBOLS */</span><span class="hl ppc"></span>
</code></pre></td></tr></table>
</div> <!-- class=content -->
<div class='footer'>generated by <a href='https://git.zx2c4.com/cgit/about/'>cgit </a> (<a href='https://git-scm.com/'>git 2.34.1</a>) at 2026-01-07 18:25:04 +0000</div>
</div> <!-- id=cgit -->
</body>
</html>