ffi 1.0.0 → 1.17.1

data/lib/ffi/platform/x86_64-solaris/types.conf

@@ -0,0 +1,122 @@
+rbx.platform.typedef.*caddr_t = char
+rbx.platform.typedef.blkcnt64_t = long
+rbx.platform.typedef.blkcnt_t = long
+rbx.platform.typedef.blksize_t = int
+rbx.platform.typedef.clock_t = long
+rbx.platform.typedef.clockid_t = int
+rbx.platform.typedef.cnt_t = short
+rbx.platform.typedef.cpu_flag_t = ushort
+rbx.platform.typedef.ctid_t = int
+rbx.platform.typedef.daddr_t = long
+rbx.platform.typedef.datalink_id_t = uint
+rbx.platform.typedef.dev_t = ulong
+rbx.platform.typedef.diskaddr_t = ulong_long
+rbx.platform.typedef.disp_lock_t = uchar
+rbx.platform.typedef.fd_mask = long
+rbx.platform.typedef.fds_mask = long
+rbx.platform.typedef.fsblkcnt64_t = ulong
+rbx.platform.typedef.fsblkcnt_t = ulong
+rbx.platform.typedef.fsfilcnt64_t = ulong
+rbx.platform.typedef.fsfilcnt_t = ulong
+rbx.platform.typedef.gid_t = uint
+rbx.platform.typedef.hrtime_t = long_long
+rbx.platform.typedef.id_t = int
+rbx.platform.typedef.in_addr_t = uint
+rbx.platform.typedef.in_port_t = ushort
+rbx.platform.typedef.index_t = short
+rbx.platform.typedef.ino64_t = ulong
+rbx.platform.typedef.ino_t = ulong
+rbx.platform.typedef.int16_t = short
+rbx.platform.typedef.int32_t = int
+rbx.platform.typedef.int64_t = long
+rbx.platform.typedef.int8_t = char
+rbx.platform.typedef.int_fast16_t = int
+rbx.platform.typedef.int_fast32_t = int
+rbx.platform.typedef.int_fast64_t = long
+rbx.platform.typedef.int_fast8_t = char
+rbx.platform.typedef.int_least16_t = short
+rbx.platform.typedef.int_least32_t = int
+rbx.platform.typedef.int_least64_t = long
+rbx.platform.typedef.int_least8_t = char
+rbx.platform.typedef.intmax_t = long
+rbx.platform.typedef.intptr_t = long
+rbx.platform.typedef.ipaddr_t = uint
+rbx.platform.typedef.k_fltset_t = uint
+rbx.platform.typedef.key_t = int
+rbx.platform.typedef.len_t = ulong_long
+rbx.platform.typedef.lgrp_id_t = int
+rbx.platform.typedef.lock_t = uchar
+rbx.platform.typedef.longlong_t = long_long
+rbx.platform.typedef.major_t = uint
+rbx.platform.typedef.minor_t = uint
+rbx.platform.typedef.mode_t = uint
+rbx.platform.typedef.model_t = uint
+rbx.platform.typedef.nfds_t = ulong
+rbx.platform.typedef.nlink_t = uint
+rbx.platform.typedef.o_dev_t = short
+rbx.platform.typedef.o_gid_t = ushort
+rbx.platform.typedef.o_ino_t = ushort
+rbx.platform.typedef.o_mode_t = ushort
+rbx.platform.typedef.o_nlink_t = short
+rbx.platform.typedef.o_pid_t = short
+rbx.platform.typedef.o_uid_t = ushort
+rbx.platform.typedef.off64_t = long
+rbx.platform.typedef.off_t = long
+rbx.platform.typedef.offset_t = long_long
+rbx.platform.typedef.pad64_t = long
+rbx.platform.typedef.pfn_t = ulong
+rbx.platform.typedef.pgcnt_t = ulong
+rbx.platform.typedef.pid_t = int
+rbx.platform.typedef.poolid_t = int
+rbx.platform.typedef.pri_t = short
+rbx.platform.typedef.projid_t = int
+rbx.platform.typedef.pthread_key_t = uint
+rbx.platform.typedef.pthread_t = uint
+rbx.platform.typedef.ptrdiff_t = long
+rbx.platform.typedef.rlim64_t = ulong_long
+rbx.platform.typedef.rlim_t = ulong
+rbx.platform.typedef.sa_family_t = ushort
+rbx.platform.typedef.size_t = ulong
+rbx.platform.typedef.socklen_t = uint
+rbx.platform.typedef.spgcnt_t = long
+rbx.platform.typedef.ssize_t = long
+rbx.platform.typedef.suseconds_t = long
+rbx.platform.typedef.sysid_t = short
+rbx.platform.typedef.t_scalar_t = int
+rbx.platform.typedef.t_uscalar_t = uint
+rbx.platform.typedef.taskid_t = int
+rbx.platform.typedef.time_t = long
+rbx.platform.typedef.timer_t = int
+rbx.platform.typedef.u_char = uchar
+rbx.platform.typedef.u_int = uint
+rbx.platform.typedef.u_long = ulong
+rbx.platform.typedef.u_longlong_t = ulong_long
+rbx.platform.typedef.u_offset_t = ulong_long
+rbx.platform.typedef.u_short = ushort
+rbx.platform.typedef.uchar_t = uchar
+rbx.platform.typedef.uid_t = uint
+rbx.platform.typedef.uint = uint
+rbx.platform.typedef.uint16_t = ushort
+rbx.platform.typedef.uint32_t = uint
+rbx.platform.typedef.uint64_t = ulong
+rbx.platform.typedef.uint8_t = uchar
+rbx.platform.typedef.uint_fast16_t = uint
+rbx.platform.typedef.uint_fast32_t = uint
+rbx.platform.typedef.uint_fast64_t = ulong
+rbx.platform.typedef.uint_fast8_t = uchar
+rbx.platform.typedef.uint_least16_t = ushort
+rbx.platform.typedef.uint_least32_t = uint
+rbx.platform.typedef.uint_least64_t = ulong
+rbx.platform.typedef.uint_least8_t = uchar
+rbx.platform.typedef.uint_t = uint
+rbx.platform.typedef.uintmax_t = ulong
+rbx.platform.typedef.uintptr_t = ulong
+rbx.platform.typedef.ulong = ulong
+rbx.platform.typedef.ulong_t = ulong
+rbx.platform.typedef.unchar = uchar
+rbx.platform.typedef.upad64_t = ulong
+rbx.platform.typedef.use_t = uchar
+rbx.platform.typedef.useconds_t = uint
+rbx.platform.typedef.ushort = ushort
+rbx.platform.typedef.ushort_t = ushort
+rbx.platform.typedef.zoneid_t = int

data/lib/ffi/platform/x86_64-windows/types.conf

@@ -0,0 +1,52 @@
+rbx.platform.typedef.__time32_t = long
+rbx.platform.typedef.__time64_t = long_long
+rbx.platform.typedef._dev_t = uint
+rbx.platform.typedef._ino_t = ushort
+rbx.platform.typedef._mode_t = ushort
+rbx.platform.typedef._off64_t = long_long
+rbx.platform.typedef._off_t = long
+rbx.platform.typedef._pid_t = long_long
+rbx.platform.typedef._sigset_t = ulong_long
+rbx.platform.typedef.dev_t = uint
+rbx.platform.typedef.errno_t = int
+rbx.platform.typedef.ino_t = ushort
+rbx.platform.typedef.int16_t = short
+rbx.platform.typedef.int32_t = int
+rbx.platform.typedef.int64_t = long_long
+rbx.platform.typedef.int8_t = char
+rbx.platform.typedef.int_fast16_t = short
+rbx.platform.typedef.int_fast32_t = int
+rbx.platform.typedef.int_fast64_t = long_long
+rbx.platform.typedef.int_fast8_t = char
+rbx.platform.typedef.int_least16_t = short
+rbx.platform.typedef.int_least32_t = int
+rbx.platform.typedef.int_least64_t = long_long
+rbx.platform.typedef.int_least8_t = char
+rbx.platform.typedef.intmax_t = long_long
+rbx.platform.typedef.intptr_t = long_long
+rbx.platform.typedef.mode_t = ushort
+rbx.platform.typedef.off32_t = long
+rbx.platform.typedef.off64_t = long_long
+rbx.platform.typedef.off_t = long_long
+rbx.platform.typedef.pid_t = long_long
+rbx.platform.typedef.ptrdiff_t = long_long
+rbx.platform.typedef.rsize_t = ulong_long
+rbx.platform.typedef.size_t = ulong_long
+rbx.platform.typedef.ssize_t = long_long
+rbx.platform.typedef.time_t = long_long
+rbx.platform.typedef.uint16_t = ushort
+rbx.platform.typedef.uint64_t = ulong_long
+rbx.platform.typedef.uint8_t = uchar
+rbx.platform.typedef.uint_fast16_t = ushort
+rbx.platform.typedef.uint_fast32_t = uint
+rbx.platform.typedef.uint_fast64_t = ulong_long
+rbx.platform.typedef.uint_fast8_t = uchar
+rbx.platform.typedef.uint_least16_t = ushort
+rbx.platform.typedef.uint_least64_t = ulong_long
+rbx.platform.typedef.uint_least8_t = uchar
+rbx.platform.typedef.uintmax_t = ulong_long
+rbx.platform.typedef.uintptr_t = ulong_long
+rbx.platform.typedef.useconds_t = uint
+rbx.platform.typedef.wchar_t = ushort
+rbx.platform.typedef.wctype_t = ushort
+rbx.platform.typedef.wint_t = ushort

data/lib/ffi/platform.rb

@@ -1,108 +1,184 @@
 #
 # Copyright (C) 2008, 2009 Wayne Meissner
-# All rights reserved.
 #
 # This file is part of ruby-ffi.
 #
 # All rights reserved.
 #
-# This code is free software: you can redistribute it and/or modify it under
-# the terms of the GNU Lesser General Public License version 3 only, as
-# published by the Free Software Foundation.
-#
-# This code is distributed in the hope that it will be useful, but WITHOUT
-# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License
-# version 3 for more details.
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
 #
-# You should have received a copy of the GNU Lesser General Public License
-# version 3 along with this work.  If not, see <http://www.gnu.org/licenses/>.
+# * Redistributions of source code must retain the above copyright notice, this
+#   list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright notice
+#   this list of conditions and the following disclaimer in the documentation
+#   and/or other materials provided with the distribution.
+# * Neither the name of the Ruby FFI project nor the names of its contributors
+#   may be used to endorse or promote products derived from this software
+#   without specific prior written permission.
 #
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.#
 
 require 'rbconfig'
+require_relative 'compat'
+
 module FFI
   class PlatformError < LoadError; end
 
+  # This module defines different constants and class methods to play with
+  # various platforms.
   module Platform
-    OS = case Config::CONFIG['host_os'].downcase
+    OS = FFI.make_shareable(case RbConfig::CONFIG['host_os'].downcase
     when /linux/
       "linux"
     when /darwin/
       "darwin"
     when /freebsd/
       "freebsd"
+    when /netbsd/
+      "netbsd"
     when /openbsd/
       "openbsd"
+    when /dragonfly/
+      "dragonflybsd"
     when /sunos|solaris/
       "solaris"
-    when /win|mingw/
+    when /mingw|mswin/
       "windows"
     else
-      Config::CONFIG['host_os'].downcase
-    end
+      RbConfig::CONFIG['host_os'].downcase
+    end)
+
+    OSVERSION = RbConfig::CONFIG['host_os'].gsub(/[^\d]/, '').to_i
 
-    ARCH = case CPU.downcase
-    when /amd64|x86_64/
+    CPU = FFI.make_shareable(RbConfig::CONFIG['host_cpu'])
+
+    ARCH = FFI.make_shareable(case CPU.downcase
+    when /amd64|x86_64|x64/
       "x86_64"
-    when /i?86|x86|i86pc/
+    when /i\d86|x86|i86pc/
       "i386"
+    when /ppc64|powerpc64/
+      "powerpc64"
     when /ppc|powerpc/
       "powerpc"
+    when /sparcv9|sparc64/
+      "sparcv9"
+    when /arm64|aarch64/  # MacOS calls it "arm64", other operating systems "aarch64"
+      "aarch64"
+    when /^arm/
+      if OS == "darwin"   # Ruby before 3.0 reports "arm" instead of "arm64" as host_cpu on darwin
+        "aarch64"
+      else
+        "arm"
+      end
     else
-      Config::CONFIG['host_cpu']
-    end
+      RbConfig::CONFIG['host_cpu']
+    end)
 
     private
+    # @param [String) os
+    # @return [Boolean]
+    # Test if current OS is +os+.
     def self.is_os(os)
       OS == os
     end
-    
-    NAME = "#{ARCH}-#{OS}"
+
+    IS_GNU = defined?(GNU_LIBC)
     IS_LINUX = is_os("linux")
     IS_MAC = is_os("darwin")
     IS_FREEBSD = is_os("freebsd")
+    IS_NETBSD = is_os("netbsd")
     IS_OPENBSD = is_os("openbsd")
+    IS_DRAGONFLYBSD = is_os("dragonfly")
+    IS_SOLARIS = is_os("solaris")
     IS_WINDOWS = is_os("windows")
-    IS_BSD = IS_MAC || IS_FREEBSD || IS_OPENBSD
-    CONF_DIR = File.dirname(__FILE__)
-    public
+    IS_BSD = IS_MAC || IS_FREEBSD || IS_NETBSD || IS_OPENBSD || IS_DRAGONFLYBSD
 
-    
+    # Add the version for known ABI breaks
+    name_version = "12" if IS_FREEBSD && OSVERSION >= 12 # 64-bit inodes
 
-    LIBPREFIX = IS_WINDOWS ? '' : 'lib'
+    NAME = FFI.make_shareable("#{ARCH}-#{OS}#{name_version}")
+    CONF_DIR = FFI.make_shareable(File.join(File.dirname(__FILE__), 'platform', NAME))
 
-    LIBSUFFIX = case OS
+    public
+
+    LIBPREFIX = FFI.make_shareable(case OS
+    when /windows|msys/
+      ''
+    when /cygwin/
+      'cyg'
+    else
+      'lib'
+    end)
+
+    LIBSUFFIX = FFI.make_shareable(case OS
     when /darwin/
       'dylib'
     when /linux|bsd|solaris/
       'so'
-    when /windows/
+    when /windows|cygwin|msys/
       'dll'
     else
       # Punt and just assume a sane unix (i.e. anything but AIX)
       'so'
-    end
+    end)
 
-    LIBC = if IS_WINDOWS
-      "msvcrt.dll"
-    elsif IS_LINUX
-      "libc.so.6"
+    LIBC = FFI.make_shareable(if IS_WINDOWS
+      crtname = RbConfig::CONFIG["RUBY_SO_NAME"][/msvc\w+/] || 'ucrtbase'
+      "#{crtname}.dll"
+    elsif IS_GNU
+      GNU_LIBC
+    elsif OS == 'cygwin'
+      "cygwin1.dll"
+    elsif OS == 'msys'
+      # Not sure how msys 1.0 behaves, tested on MSYS2.
+      "msys-2.0.dll"
     else
       "#{LIBPREFIX}c.#{LIBSUFFIX}"
+    end)
+
+    LITTLE_ENDIAN = 1234 unless defined?(LITTLE_ENDIAN)
+    BIG_ENDIAN = 4321 unless defined?(BIG_ENDIAN)
+    unless defined?(BYTE_ORDER)
+      BYTE_ORDER = [0x12345678].pack("I") == [0x12345678].pack("N") ? BIG_ENDIAN : LITTLE_ENDIAN
     end
 
+    # Test if current OS is a *BSD (include MAC)
+    # @return [Boolean]
     def self.bsd?
       IS_BSD
     end
 
+    # Test if current OS is Windows
+    # @return [Boolean]
     def self.windows?
       IS_WINDOWS
     end
 
+    # Test if current OS is Mac OS
+    # @return [Boolean]
     def self.mac?
       IS_MAC
     end
 
+    # Test if current OS is Solaris (Sun OS)
+    # @return [Boolean]
+    def self.solaris?
+      IS_SOLARIS
+    end
+
+    # Test if current OS is a unix OS
+    # @return [Boolean]
     def self.unix?
       !IS_WINDOWS
     end

data/lib/ffi/pointer.rb

@@ -1,97 +1,116 @@
 #
 # Copyright (C) 2008, 2009 Wayne Meissner
 # Copyright (c) 2007, 2008 Evan Phoenix
-# All rights reserved.
 #
 # This file is part of ruby-ffi.
 #
-# This code is free software: you can redistribute it and/or modify it under
-# the terms of the GNU Lesser General Public License version 3 only, as
-# published by the Free Software Foundation.
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
 #
-# This code is distributed in the hope that it will be useful, but WITHOUT
-# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License
-# version 3 for more details.
+# * Redistributions of source code must retain the above copyright notice, this
+#   list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright notice
+#   this list of conditions and the following disclaimer in the documentation
+#   and/or other materials provided with the distribution.
+# * Neither the name of the Ruby FFI project nor the names of its contributors
+#   may be used to endorse or promote products derived from this software
+#   without specific prior written permission.
 #
-# You should have received a copy of the GNU Lesser General Public License
-# version 3 along with this work.  If not, see <http://www.gnu.org/licenses/>.
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+# SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 #
 
 require 'ffi/platform'
+
+# NOTE: all method definitions in this file are conditional on
+# whether they are not already defined. This is needed because
+# some Ruby implementations (e.g., TruffleRuby) might already
+# provide these methods due to using FFI internally, and we
+# should not override them to avoid warnings.
+
 module FFI
   class Pointer
-    SIZE = Platform::ADDRESS_SIZE / 8
+
+    # Pointer size
+    SIZE = Platform::ADDRESS_SIZE / 8 unless const_defined?(:SIZE)
 
     # Return the size of a pointer on the current platform, in bytes
+    # @return [Integer]
     def self.size
       SIZE
-    end
-    # Write +obj+ as a C int at the memory pointed to.
-    def write_int(obj)
-      put_int32(0, obj)
-    end
-
-    # Read a C int from the memory pointed to.
-    def read_int
-      get_int32(0)
-    end
-
-    # Write +obj+ as a C long at the memory pointed to.
-    def write_long(obj)
-      put_long(0, obj)
-    end
-
-    # Read a C long from the memory pointed to.
-    def read_long
-      get_long(0)
-    end
-    # Write +obj+ as a C long long at the memory pointed to.
-    def write_long_long(obj)
-      put_int64(0, obj)
-    end
-
-    # Read a C long long from the memory pointed to.
-    def read_long_long
-      get_int64(0)
-    end
-
-    def read_pointer
-      get_pointer(0)
-    end
-    def write_pointer(ptr)
-      put_pointer(0, ptr)
-    end
-
-    def read_float
-      get_float32(0)
-    end
-    def write_float(obj)
-      put_float32(0, obj)
-    end
+    end unless respond_to?(:size)
 
+    # @param [nil,Integer] len length of string to return
+    # @return [String]
+    # Read pointer's contents as a string, or the first +len+ bytes of the
+    # equivalent string if +len+ is not +nil+.
     def read_string(len=nil)
       if len
+        return ''.b if len == 0
         get_bytes(0, len)
       else
         get_string(0)
       end
-    end
+    end unless method_defined?(:read_string)
+
+    # @param [Integer] len length of string to return
+    # @return [String]
+    # Read the first +len+ bytes of pointer's contents as a string.
+    #
+    # Same as:
+    #  ptr.read_string(len)  # with len not nil
     def read_string_length(len)
       get_bytes(0, len)
-    end
+    end unless method_defined?(:read_string_length)
+
+    # @return [String]
+    # Read pointer's contents as a string.
+    #
+    # Same as:
+    #  ptr.read_string  # with no len
     def read_string_to_null
       get_string(0)
-    end
+    end unless method_defined?(:read_string_to_null)
+
+    # @param [String] str string to write
+    # @param [Integer] len length of string to return
+    # @return [self]
+    # Write +len+ first bytes of +str+ in pointer's contents.
+    #
+    # Same as:
+    #  ptr.write_string(str, len)   # with len not nil
     def write_string_length(str, len)
       put_bytes(0, str, 0, len)
-    end
+    end unless method_defined?(:write_string_length)
+
+    # @param [String] str string to write
+    # @param [Integer] len length of string to return
+    # @return [self]
+    # Write +str+ in pointer's contents, or first +len+ bytes if
+    # +len+ is not +nil+.
     def write_string(str, len=nil)
       len = str.bytesize unless len
       # Write the string data without NUL termination
       put_bytes(0, str, 0, len)
-    end
-
+    end unless method_defined?(:write_string)
+
+    # @param [Type] type type of data to read from pointer's contents
+    # @param [Symbol] reader method to send to +self+ to read +type+
+    # @param [Integer] length
+    # @return [Array]
+    # Read an array of +type+ of length +length+.
+    # @example
+    #  ptr.read_array_of_type(TYPE_UINT8, :read_uint8, 4) # -> [1, 2, 3, 4]
     def read_array_of_type(type, reader, length)
       ary = []
       size = FFI.type_size(type)
@@ -101,40 +120,48 @@ module FFI
         tmp += size unless j == length-1 # avoid OOB
       }
       ary
-    end
-
+    end unless method_defined?(:read_array_of_type)
+
+    # @param [Type] type type of data to write to pointer's contents
+    # @param [Symbol] writer method to send to +self+ to write +type+
+    # @param [Array] ary
+    # @return [self]
+    # Write +ary+ in pointer's contents as +type+.
+    # @example
+    #  ptr.write_array_of_type(TYPE_UINT8, :put_uint8, [1, 2, 3 ,4])
     def write_array_of_type(type, writer, ary)
       size = FFI.type_size(type)
-      tmp = self
-      ary.each_with_index {|i, j|
-        tmp.send(writer, i)
-        tmp += size unless j == ary.length-1 # avoid OOB
+      ary.each_with_index { |val, i|
+        break unless i < self.size
+        self.send(writer, i * size, val)
       }
       self
-    end
-    def read_array_of_int(length)
-      get_array_of_int32(0, length)
-    end
-
-    def write_array_of_int(ary)
-      put_array_of_int32(0, ary)
-    end
-
-    def read_array_of_long(length)
-      get_array_of_long(0, length)
-    end
-
-    def write_array_of_long(ary)
-      put_array_of_long(0, ary)
-    end
-
-    def read_array_of_pointer(length)
-      read_array_of_type(:pointer, :read_pointer, length)
-    end
-
-    def write_array_of_pointer(ary)
-      write_array_of_type(:pointer, :write_pointer, ary)
-    end
+    end unless method_defined?(:write_array_of_type)
 
+    # @return [self]
+    def to_ptr
+      self
+    end unless method_defined?(:to_ptr)
+
+    # @param [Symbol,Type] type of data to read
+    # @return [Object]
+    # Read pointer's contents as +type+
+    #
+    # Same as:
+    #  ptr.get(type, 0)
+    def read(type)
+      get(type, 0)
+    end unless method_defined?(:read)
+
+    # @param [Symbol,Type] type of data to read
+    # @param [Object] value to write
+    # @return [nil]
+    # Write +value+ of type +type+ to pointer's content
+    #
+    # Same as:
+    #  ptr.put(type, 0)
+    def write(type, value)
+      put(type, 0, value)
+    end unless method_defined?(:write)
   end
 end