SDLRuby 0.1.0

data/lib/SDLRuby/sdl/sdl_render.rb

@@ -0,0 +1,35 @@
+module SDLRuby
+  module SDL
+    SDL_RENDERER_SOFTWARE = 0x00000001
+    SDL_RENDERER_ACCELERATED = 0x00000002
+    SDL_RENDERER_PRESENTVSYNC = 0x00000004
+    SDL_RENDERER_TARGETTEXTURE = 0x00000008
+    typealias "SDL_RendererFlags", "int"
+
+    SDL_RendererInfo = struct(
+      [
+        "const char *name",
+        "Uint32 flags",
+        "Uint32 num_texture_formats",
+        "Uint32 texture_formats[16]",
+        "int max_texture_width",
+        "int max_texture_height"
+      ]
+    )
+
+    SDL_FLIP_NONE = 0x00000000
+    SDL_FLIP_HORIZONTAL = 0x00000001
+    SDL_FLIP_VERTICAL = 0x00000002
+    typealias "SDL_RendererFlip", "int"
+
+    SDL_SCALEMODE_NEAREST = 0
+    SDL_SCALEMODE_LINEAR = 1
+    SDL_SCALEMODE_BEST = 2
+    typealias "SDL_ScaleMode", "int"
+
+    SDL_TEXTUREACCESS_STATIC = 0
+    SDL_TEXTUREACCESS_STREAMING = 1
+    SDL_TEXTUREACCESS_TARGET = 2
+    typealias "SDL_TextureAccess", "int"
+  end
+end

data/lib/SDLRuby/sdl/sdl_rw_ops.rb

@@ -0,0 +1,29 @@
+module SDLRuby
+  module SDL
+    SDL_RWOPS_UNKNOWN   = 0
+    SDL_RWOPS_WINFILE   = 1
+    SDL_RWOPS_STDFILE   = 2
+    SDL_RWOPS_JNIFILE   = 3
+    SDL_RWOPS_MEMORY    = 4
+    SDL_RWOPS_MEMORY_RO = 5
+
+    # アクセッサ用の構造体。実際のSDL_RWopsとは違い隠し領域のメンバーを含まない。
+    #
+    SDL_RWops = struct(
+      [
+        "void *size",
+        "void *seek",
+        "void *read",
+        "void *write",
+        "void *close",
+        "Uint32 type"
+      ]
+    )
+
+    SDL_RWops.module_eval do
+      class << self
+        undef malloc
+      end
+    end
+  end
+end

data/lib/SDLRuby/sdl/sdl_scancode.rb

@@ -0,0 +1,255 @@
+module SDLRuby
+  module SDL
+    SDL_SCANCODE_UNKNOWN = 0
+    SDL_SCANCODE_A = 4
+    SDL_SCANCODE_B = 5
+    SDL_SCANCODE_C = 6
+    SDL_SCANCODE_D = 7
+    SDL_SCANCODE_E = 8
+    SDL_SCANCODE_F = 9
+    SDL_SCANCODE_G = 10
+    SDL_SCANCODE_H = 11
+    SDL_SCANCODE_I = 12
+    SDL_SCANCODE_J = 13
+    SDL_SCANCODE_K = 14
+    SDL_SCANCODE_L = 15
+    SDL_SCANCODE_M = 16
+    SDL_SCANCODE_N = 17
+    SDL_SCANCODE_O = 18
+    SDL_SCANCODE_P = 19
+    SDL_SCANCODE_Q = 20
+    SDL_SCANCODE_R = 21
+    SDL_SCANCODE_S = 22
+    SDL_SCANCODE_T = 23
+    SDL_SCANCODE_U = 24
+    SDL_SCANCODE_V = 25
+    SDL_SCANCODE_W = 26
+    SDL_SCANCODE_X = 27
+    SDL_SCANCODE_Y = 28
+    SDL_SCANCODE_Z = 29
+    SDL_SCANCODE_1 = 30
+    SDL_SCANCODE_2 = 31
+    SDL_SCANCODE_3 = 32
+    SDL_SCANCODE_4 = 33
+    SDL_SCANCODE_5 = 34
+    SDL_SCANCODE_6 = 35
+    SDL_SCANCODE_7 = 36
+    SDL_SCANCODE_8 = 37
+    SDL_SCANCODE_9 = 38
+    SDL_SCANCODE_0 = 39
+    SDL_SCANCODE_RETURN = 40
+    SDL_SCANCODE_ESCAPE = 41
+    SDL_SCANCODE_BACKSPACE = 42
+    SDL_SCANCODE_TAB = 43
+    SDL_SCANCODE_SPACE = 44
+    SDL_SCANCODE_MINUS = 45
+    SDL_SCANCODE_EQUALS = 46
+    SDL_SCANCODE_LEFTBRACKET = 47
+    SDL_SCANCODE_RIGHTBRACKET = 48
+    SDL_SCANCODE_BACKSLASH = 49
+    SDL_SCANCODE_NONUSHASH = 50
+    SDL_SCANCODE_SEMICOLON = 51
+    SDL_SCANCODE_APOSTROPHE = 52
+    SDL_SCANCODE_GRAVE = 53
+    SDL_SCANCODE_COMMA = 54
+    SDL_SCANCODE_PERIOD = 55
+    SDL_SCANCODE_SLASH = 56
+    SDL_SCANCODE_CAPSLOCK = 57
+    SDL_SCANCODE_F1 = 58
+    SDL_SCANCODE_F2 = 59
+    SDL_SCANCODE_F3 = 60
+    SDL_SCANCODE_F4 = 61
+    SDL_SCANCODE_F5 = 62
+    SDL_SCANCODE_F6 = 63
+    SDL_SCANCODE_F7 = 64
+    SDL_SCANCODE_F8 = 65
+    SDL_SCANCODE_F9 = 66
+    SDL_SCANCODE_F10 = 67
+    SDL_SCANCODE_F11 = 68
+    SDL_SCANCODE_F12 = 69
+    SDL_SCANCODE_PRINTSCREEN = 70
+    SDL_SCANCODE_SCROLLLOCK = 71
+    SDL_SCANCODE_PAUSE = 72
+    SDL_SCANCODE_INSERT = 73
+    SDL_SCANCODE_HOME = 74
+    SDL_SCANCODE_PAGEUP = 75
+    SDL_SCANCODE_DELETE = 76
+    SDL_SCANCODE_END = 77
+    SDL_SCANCODE_PAGEDOWN = 78
+    SDL_SCANCODE_RIGHT = 79
+    SDL_SCANCODE_LEFT = 80
+    SDL_SCANCODE_DOWN = 81
+    SDL_SCANCODE_UP = 82
+    SDL_SCANCODE_NUMLOCKCLEAR = 83
+    SDL_SCANCODE_KP_DIVIDE = 84
+    SDL_SCANCODE_KP_MULTIPLY = 85
+    SDL_SCANCODE_KP_MINUS = 86
+    SDL_SCANCODE_KP_PLUS = 87
+    SDL_SCANCODE_KP_ENTER = 88
+    SDL_SCANCODE_KP_1 = 89
+    SDL_SCANCODE_KP_2 = 90
+    SDL_SCANCODE_KP_3 = 91
+    SDL_SCANCODE_KP_4 = 92
+    SDL_SCANCODE_KP_5 = 93
+    SDL_SCANCODE_KP_6 = 94
+    SDL_SCANCODE_KP_7 = 95
+    SDL_SCANCODE_KP_8 = 96
+    SDL_SCANCODE_KP_9 = 97
+    SDL_SCANCODE_KP_0 = 98
+    SDL_SCANCODE_KP_PERIOD = 99
+    SDL_SCANCODE_NONUSBACKSLASH = 100
+    SDL_SCANCODE_APPLICATION = 101
+    SDL_SCANCODE_POWER = 102
+    SDL_SCANCODE_KP_EQUALS = 103
+    SDL_SCANCODE_F13 = 104
+    SDL_SCANCODE_F14 = 105
+    SDL_SCANCODE_F15 = 106
+    SDL_SCANCODE_F16 = 107
+    SDL_SCANCODE_F17 = 108
+    SDL_SCANCODE_F18 = 109
+    SDL_SCANCODE_F19 = 110
+    SDL_SCANCODE_F20 = 111
+    SDL_SCANCODE_F21 = 112
+    SDL_SCANCODE_F22 = 113
+    SDL_SCANCODE_F23 = 114
+    SDL_SCANCODE_F24 = 115
+    SDL_SCANCODE_EXECUTE = 116
+    SDL_SCANCODE_HELP = 117
+    SDL_SCANCODE_MENU = 118
+    SDL_SCANCODE_SELECT = 119
+    SDL_SCANCODE_STOP = 120
+    SDL_SCANCODE_AGAIN = 121
+    SDL_SCANCODE_UNDO = 122
+    SDL_SCANCODE_CUT = 123
+    SDL_SCANCODE_COPY = 124
+    SDL_SCANCODE_PASTE = 125
+    SDL_SCANCODE_FIND = 126
+    SDL_SCANCODE_MUTE = 127
+    SDL_SCANCODE_VOLUMEUP = 128
+    SDL_SCANCODE_VOLUMEDOWN = 129
+    SDL_SCANCODE_LOCKINGCAPSLOCK = 130
+    SDL_SCANCODE_LOCKINGNUMLOCK = 131
+    SDL_SCANCODE_LOCKINGSCROLLLOCK = 132
+    SDL_SCANCODE_KP_COMMA = 133
+    SDL_SCANCODE_KP_EQUALSAS400 = 134
+    SDL_SCANCODE_INTERNATIONAL1 = 135
+    SDL_SCANCODE_INTERNATIONAL2 = 136
+    SDL_SCANCODE_INTERNATIONAL3 = 137
+    SDL_SCANCODE_INTERNATIONAL4 = 138
+    SDL_SCANCODE_INTERNATIONAL5 = 139
+    SDL_SCANCODE_INTERNATIONAL6 = 140
+    SDL_SCANCODE_INTERNATIONAL7 = 141
+    SDL_SCANCODE_INTERNATIONAL8 = 142
+    SDL_SCANCODE_INTERNATIONAL9 = 143
+    SDL_SCANCODE_LANG1 = 144
+    SDL_SCANCODE_LANG2 = 145
+    SDL_SCANCODE_LANG3 = 146
+    SDL_SCANCODE_LANG4 = 147
+    SDL_SCANCODE_LANG5 = 148
+    SDL_SCANCODE_LANG6 = 149
+    SDL_SCANCODE_LANG7 = 150
+    SDL_SCANCODE_LANG8 = 151
+    SDL_SCANCODE_LANG9 = 152
+    SDL_SCANCODE_ALTERASE = 153
+    SDL_SCANCODE_SYSREQ = 154
+    SDL_SCANCODE_CANCEL = 155
+    SDL_SCANCODE_CLEAR = 156
+    SDL_SCANCODE_PRIOR = 157
+    SDL_SCANCODE_RETURN2 = 158
+    SDL_SCANCODE_SEPARATOR = 159
+    SDL_SCANCODE_OUT = 160
+    SDL_SCANCODE_OPER = 161
+    SDL_SCANCODE_CLEARAGAIN = 162
+    SDL_SCANCODE_CRSEL = 163
+    SDL_SCANCODE_EXSEL = 164
+    SDL_SCANCODE_KP_00 = 176
+    SDL_SCANCODE_KP_000 = 177
+    SDL_SCANCODE_THOUSANDSSEPARATOR = 178
+    SDL_SCANCODE_DECIMALSEPARATOR = 179
+    SDL_SCANCODE_CURRENCYUNIT = 180
+    SDL_SCANCODE_CURRENCYSUBUNIT = 181
+    SDL_SCANCODE_KP_LEFTPAREN = 182
+    SDL_SCANCODE_KP_RIGHTPAREN = 183
+    SDL_SCANCODE_KP_LEFTBRACE = 184
+    SDL_SCANCODE_KP_RIGHTBRACE = 185
+    SDL_SCANCODE_KP_TAB = 186
+    SDL_SCANCODE_KP_BACKSPACE = 187
+    SDL_SCANCODE_KP_A = 188
+    SDL_SCANCODE_KP_B = 189
+    SDL_SCANCODE_KP_C = 190
+    SDL_SCANCODE_KP_D = 191
+    SDL_SCANCODE_KP_E = 192
+    SDL_SCANCODE_KP_F = 193
+    SDL_SCANCODE_KP_XOR = 194
+    SDL_SCANCODE_KP_POWER = 195
+    SDL_SCANCODE_KP_PERCENT = 196
+    SDL_SCANCODE_KP_LESS = 197
+    SDL_SCANCODE_KP_GREATER = 198
+    SDL_SCANCODE_KP_AMPERSAND = 199
+    SDL_SCANCODE_KP_DBLAMPERSAND = 200
+    SDL_SCANCODE_KP_VERTICALBAR = 201
+    SDL_SCANCODE_KP_DBLVERTICALBAR = 202
+    SDL_SCANCODE_KP_COLON = 203
+    SDL_SCANCODE_KP_HASH = 204
+    SDL_SCANCODE_KP_SPACE = 205
+    SDL_SCANCODE_KP_AT = 206
+    SDL_SCANCODE_KP_EXCLAM = 207
+    SDL_SCANCODE_KP_MEMSTORE = 208
+    SDL_SCANCODE_KP_MEMRECALL = 209
+    SDL_SCANCODE_KP_MEMCLEAR = 210
+    SDL_SCANCODE_KP_MEMADD = 211
+    SDL_SCANCODE_KP_MEMSUBTRACT = 212
+    SDL_SCANCODE_KP_MEMMULTIPLY = 213
+    SDL_SCANCODE_KP_MEMDIVIDE = 214
+    SDL_SCANCODE_KP_PLUSMINUS = 215
+    SDL_SCANCODE_KP_CLEAR = 216
+    SDL_SCANCODE_KP_CLEARENTRY = 217
+    SDL_SCANCODE_KP_BINARY = 218
+    SDL_SCANCODE_KP_OCTAL = 219
+    SDL_SCANCODE_KP_DECIMAL = 220
+    SDL_SCANCODE_KP_HEXADECIMAL = 221
+    SDL_SCANCODE_LCTRL = 224
+    SDL_SCANCODE_LSHIFT = 225
+    SDL_SCANCODE_LALT = 226
+    SDL_SCANCODE_LGUI = 227
+    SDL_SCANCODE_RCTRL = 228
+    SDL_SCANCODE_RSHIFT = 229
+    SDL_SCANCODE_RALT = 230
+    SDL_SCANCODE_RGUI = 231
+    SDL_SCANCODE_MODE = 257
+    SDL_SCANCODE_AUDIONEXT = 258
+    SDL_SCANCODE_AUDIOPREV = 259
+    SDL_SCANCODE_AUDIOSTOP = 260
+    SDL_SCANCODE_AUDIOPLAY = 261
+    SDL_SCANCODE_AUDIOMUTE = 262
+    SDL_SCANCODE_MEDIASELECT = 263
+    SDL_SCANCODE_WWW = 264
+    SDL_SCANCODE_MAIL = 265
+    SDL_SCANCODE_CALCULATOR = 266
+    SDL_SCANCODE_COMPUTER = 267
+    SDL_SCANCODE_AC_SEARCH = 268
+    SDL_SCANCODE_AC_HOME = 269
+    SDL_SCANCODE_AC_BACK = 270
+    SDL_SCANCODE_AC_FORWARD = 271
+    SDL_SCANCODE_AC_STOP = 272
+    SDL_SCANCODE_AC_REFRESH = 273
+    SDL_SCANCODE_AC_BOOKMARKS = 274
+    SDL_SCANCODE_BRIGHTNESSDOWN = 275
+    SDL_SCANCODE_BRIGHTNESSUP = 276
+    SDL_SCANCODE_DISPLAYSWITCH = 277
+    SDL_SCANCODE_KBDILLUMTOGGLE = 278
+    SDL_SCANCODE_KBDILLUMDOWN = 279
+    SDL_SCANCODE_KBDILLUMUP = 280
+    SDL_SCANCODE_EJECT = 281
+    SDL_SCANCODE_SLEEP = 282
+    SDL_SCANCODE_APP1 = 283
+    SDL_SCANCODE_APP2 = 284
+    SDL_SCANCODE_AUDIOREWIND = 285
+    SDL_SCANCODE_AUDIOFASTFORWARD = 286
+    SDL_SCANCODE_SOFTLEFT = 287
+    SDL_SCANCODE_SOFTRIGHT = 288
+    SDL_SCANCODE_CALL = 289
+    SDL_SCANCODE_ENDCALL = 290
+    SDL_NUM_SCANCODES = 512
+  end
+end

data/lib/SDLRuby/sdl/sdl_surface.rb

@@ -0,0 +1,27 @@
+module SDLRuby
+  module SDL
+    SDL_DONTFREE = 0x00000004
+
+    SDL_Surface = struct(
+      [
+        "Uint32 flags",
+        "SDL_PixelFormat* format",
+        "int w",
+        "int h",
+        "int pitch",
+        "void* pixels",
+        "void* userdata",
+        "int locked",
+        "void* list_blitmap",
+        { clip_rect: SDL_Rect },
+        "SDL_BlitMap* map",
+        "int refcount"
+      ]
+    )
+
+    extern "int SDL_UpperBlit(SDL_Surface * src, const SDL_Rect * srcrect,
+                              SDL_Surface * dst, SDL_Rect * dstrect)"
+    extern "int SDL_UpperBlitScaled(SDL_Surface * src, const SDL_Rect * srcrect,
+                                    SDL_Surface * dst, SDL_Rect * dstrect)"
+  end
+end

data/lib/SDLRuby/sdl/sdl_version.rb

@@ -0,0 +1,5 @@
+module SDLRuby
+  module SDL
+    SDL_version = struct ["Uint8 major", "Uint8 minor", "Uint8 patch"]
+  end
+end

data/lib/SDLRuby/sdl/sdl_video.rb

@@ -0,0 +1,104 @@
+module SDLRuby
+  module SDL
+    # SDL_WindowFlags
+    #
+    SDL_WINDOW_FULLSCREEN = 0x00000001
+    SDL_WINDOW_OPENGL = 0x00000002
+    SDL_WINDOW_SHOWN = 0x00000004
+    SDL_WINDOW_HIDDEN = 0x00000008
+    SDL_WINDOW_BORDERLESS = 0x00000010
+    SDL_WINDOW_RESIZABLE = 0x00000020
+    SDL_WINDOW_MINIMIZED = 0x00000040
+    SDL_WINDOW_MAXIMIZED = 0x00000080
+    SDL_WINDOW_MOUSE_GRABBED = 0x00000100
+    SDL_WINDOW_INPUT_FOCUS = 0x00000200
+    SDL_WINDOW_MOUSE_FOCUS = 0x00000400
+    SDL_WINDOW_FULLSCREEN_DESKTOP = SDL_WINDOW_FULLSCREEN | 0x00001000
+    SDL_WINDOW_FOREIGN = 0x00000800
+    SDL_WINDOW_ALLOW_HIGHDPI = 0x00002000
+    SDL_WINDOW_MOUSE_CAPTURE    = 0x00004000
+    SDL_WINDOW_ALWAYS_ON_TOP    = 0x00008000
+    SDL_WINDOW_SKIP_TASKBAR     = 0x00010000
+    SDL_WINDOW_UTILITY          = 0x00020000
+    SDL_WINDOW_TOOLTIP          = 0x00040000
+    SDL_WINDOW_POPUP_MENU       = 0x00080000
+    SDL_WINDOW_KEYBOARD_GRABBED = 0x00100000
+    SDL_WINDOW_VULKAN           = 0x10000000
+    SDL_WINDOW_METAL            = 0x20000000
+    SDL_WINDOW_INPUT_GRABBED = SDL_WINDOW_MOUSE_GRABBED
+
+    # Window position
+    #
+    SDL_WINDOWPOS_UNDEFINED = 0x1FFF0000
+    SDL_WINDOWPOS_CENTERED = 0x2FFF0000
+
+    # SDL_HitTestResult
+    #
+    SDL_HITTEST_NORMAL = 0
+    SDL_HITTEST_DRAGGABLE = 1
+    SDL_HITTEST_RESIZE_TOPLEFT = 2
+    SDL_HITTEST_RESIZE_TOP = 3
+    SDL_HITTEST_RESIZE_TOPRIGHT = 4
+    SDL_HITTEST_RESIZE_RIGHT = 5
+    SDL_HITTEST_RESIZE_BOTTOMRIGHT = 6
+    SDL_HITTEST_RESIZE_BOTTOM = 7
+    SDL_HITTEST_RESIZE_BOTTOMLEFT = 8
+    SDL_HITTEST_RESIZE_LEFT = 9
+
+    # Display orientation
+    #
+    SDL_ORIENTATION_UNKNOWN = 0
+    SDL_ORIENTATION_LANDSCAPE = 1
+    SDL_ORIENTATION_LANDSCAPE_FLIPPED = 2
+    SDL_ORIENTATION_PORTRAIT = 3
+    SDL_ORIENTATION_PORTRAIT_FLIPPED = 4
+
+    # Window flash operation
+    #
+    SDL_FLASH_CANCEL = 0
+    SDL_FLASH_BRIEFLY = 1
+    SDL_FLASH_UNTIL_FOCUSED =2
+
+    SDL_DisplayMode = struct(
+      [
+        "Uint32 format",
+        "int w",
+        "int h",
+        "int refresh_rate",
+        "void *driverdata"
+      ]
+    )
+
+    # SDL_shape.h
+    #
+    SDL_NONSHAPEABLE_WINDOW = -1
+    SDL_INVALID_SHAPE_ARGUMENT = -2
+    SDL_WINDOW_LACKS_SHAPE = -3
+
+    # WindowShapeMode
+    #
+    ShapeModeDefault = 0
+    ShapeModeBinarizeAlpha = 1
+    ShapeModeReverseBinarizeAlpha = 2
+    ShapeModeColorKey = 3
+    typealias "WindowShapeMode", "int"
+
+    SDL_SHAPEMODEALPHA = -> (mode) {
+      mode == ShapeModeDefault || mode == ShapeModeBinarizeAlpha || mode == ShapeModeReverseBinarizeAlpha
+    }
+
+    SDL_WindowShapeParams = union(
+      [
+        "Uint8 binarizationCutoff",
+        { colorKey: SDL_Color }
+      ]
+    )
+
+    SDL_WindowShapeMode = struct(
+      [
+        "WindowShapeMode mode",
+        { parameters: SDL_WindowShapeParams }
+      ]
+    )
+  end
+end

data/lib/SDLRuby/sdl.rb

@@ -0,0 +1,192 @@
+require "fiddle/import"
+
+module SDLRuby
+  module SDL
+    extend Fiddle::Importer
+
+    dlload "SDL2"
+
+    SDL_DESTROY_RENDERER = import_symbol("SDL_DestroyRenderer").to_int
+    SDL_DESTROY_TEXTURE = import_symbol("SDL_DestroyTexture").to_int
+
+    # SDL_freeはSDL_SetMemoryFunctionsで設定された関数を使用する。
+    # SDL側のメモリーを開放する場合はFiddle::PointerへSDL_FREEを設定してよい。
+    #
+    SDL_FREE = SDL.import_symbol("SDL_free").to_int
+    SDL_FREE_CURSOR = import_symbol("SDL_FreeCursor").to_int
+    SDL_FREE_FORMAT = import_symbol("SDL_FreeFormat").to_int
+    SDL_FREE_PALETTE = import_symbol("SDL_FreePalette").to_int
+    SDL_FREE_RW = import_symbol("SDL_FreeRW").to_int
+    SDL_FREE_SURFACE = import_symbol("SDL_FreeSurface").to_int
+
+    def self.tmp_value(*a, &)
+      raise ArgumentError if a.empty?
+
+      a.map { |ty|
+        st = create_value(ty)
+        st.to_ptr.free = Fiddle::RUBY_FREE
+        st
+      } => vals
+
+      v = vals.one? ? vals.first : vals
+      block_given? ? yield(*v) : v
+    end
+
+    require_relative 'sdl/sdl'
+    require_relative 'sdl_error'
+
+    require_relative 'audio'
+    require_relative 'cursor'
+    require_relative 'display'
+    require_relative 'event'
+    require_relative 'hint'
+    require_relative 'keyboard'
+    require_relative 'mouse'
+    require_relative 'palette'
+    require_relative 'pixel_formatter'
+    require_relative 'rect'
+    require_relative 'renderer'
+    require_relative 'rw_ops'
+    require_relative 'surface'
+    require_relative 'text_input'
+    require_relative 'texture'
+    require_relative 'window'
+
+    class << self
+      # sdl
+      #
+      def init(flags = nil)
+        err = SDL.SDL_Init(flags || SDL_INIT_EVERYTHING)
+        raise SDLError if err < 0
+      end
+
+      def init?(flags) = SDL.WasInit(flags).nonzero?
+
+      def quit = SDL.SDL_Quit
+
+      # clipboard
+      #
+      def clipboard_text
+        ptr = SDL.SDL_GetClipboardText
+        raise SDLError if ptr.null?
+
+        ptr.free = SDL_FREE
+        ptr.to_s.force_encoding("UTF-8")
+      end
+
+      def clipboard_text? = SDL.SDL_HasClipboardText == 1
+
+      def clipboard_text=(s)
+        err = SDL.SDL_SetClipboardText(s.encord("UTF-8"))
+        raise SDLError if err < 0
+      end
+
+      # cpu info
+      #
+      def cpu_cache_line_size = SDL.SDL_GetCPUCacheLineSize
+
+      def cpu_count = SDL.SDL_GetCPUCount
+
+      def system_ram = SDL.SDL_GetSystemRAM
+
+      # error
+      #
+      def last_error_message = SDL.SDL_GetError.to_s
+
+      def last_error_message=(s)
+        SDL.SDL_SetError(s.gsub(/%/, "%%"), nil)
+      end
+
+      # filesystem
+      #
+      def base_path
+        ptr = SDL.SDL_GetBasePath
+        raise SDLError if ptr.null?
+
+        ptr.free = SDL_FREE
+        ptr.to_s
+      end
+
+      # locale
+      #
+      # 失敗の時 nil を戻す。
+      #
+      def locales
+        ptr = SDL.SDL_GetPreferredLocales
+        return if ptr.null?
+
+        ptr.free = SDL_FREE
+        pitch = SDL_Locale.size
+        (0..).inject([]) do |memo, i|
+          st = SDL_Locale.new(ptr + i * pitch)
+          break memo if st.language.null?
+          memo << [st.language.to_s, st.country.to_s]
+        end
+      end
+
+      # message box
+      #
+      def alert(message, title = nil, flags: nil, window: nil)
+        err = SDL.SDL_ShowSimpleMessageBox(flags,
+                                           title.to_s.encode("UTF-8"),
+                                           message.to_s.encode("UTF-8"),
+                                           window)
+        raise SDLError if err < 0
+      end
+
+      def error_alert(message, title = "Error")
+        alert(message, title, flags: SDL_MESSAGEBOX_ERROR)
+      end
+
+      def warn_alert(message, title = "Warning")
+        alert(message, title, flags: SDL_MESSAGEBOX_WARNING)
+      end
+
+      def info_alert(message, title = "Information")
+        alert(message, title, flags: SDL_MESSAGEBOX_INFORMATION)
+      end
+
+      # misc
+      #
+      def open_url(url)
+        raise SDLError if SDL.SDL_OpenURL(url) < 0
+      end
+
+      # platform
+      #
+      def platform = SDL.SDL_GetPlatform.to_s
+
+      # timer
+      #
+      def ticks = SDL.SDL_GetTicks
+
+      # version
+      #
+      def revision = SDL.SDL_GetRevision.to_s
+
+      def version
+        st = SDL_version.malloc(Fiddle::RUBY_FREE)
+        SDL.SDL_GetVersion(st)
+        st.to_a.join(".")
+      end
+
+      # video
+      #
+      def video_driver
+        (ptr = SDL.SDL_GetCurrentVideoDriver).null? ? nil : ptr.to_s
+      end
+
+      def screen_saver=(b)
+        b ? SDL.SDL_EnableScreenSaver : SDL.SDL_DisableScreenSaver
+      end
+
+      def screen_saver? = SDL.SDL_IsScreenSaverEnabled != 0
+
+      def video_drivers
+        SDL.SDL_GetNumVideoDrivers.times.map do |i|
+          (ptr = SDL.SDL_GetVideoDriver(i)).null? ? nil : ptr.to_s
+        end
+      end
+    end
+  end
+end

data/lib/SDLRuby/sdl_error.rb

@@ -0,0 +1,8 @@
+module SDLRuby
+  class SDLError < StandardError
+    def initialize(msg = nil)
+      super(msg || SDL.last_error_message)
+      SDL.SDL_ClearError
+    end
+  end
+end

data/lib/SDLRuby/surface/pixel_format.rb

@@ -0,0 +1,51 @@
+module SDLRuby
+  class Surface
+    class PixelFormat
+      include SDL
+      extend Forwardable
+
+      def initialize(ptr, add_ref: nil)
+        @st = SDL_PixelFormat.new(ptr, SDL_FREE_FORMAT)
+        @st.refcount += 1 if add_ref
+      end
+
+      def_delegators :@st, :format, :refcount, :to_ptr
+
+      def map(color)
+        if alpha?
+          r, g, b, a = *color, SDL_ALPHA_OPAQUE
+          SDL.SDL_MapRGBA(self, r, g, b, a)
+        else
+          r, g, b = *color
+          SDL.SDL_MapRGB(self, r, g, b)
+        end
+      end
+
+      alias to_pixel map
+
+      def palette
+        ptr = @st.palette
+        return if ptr.null?
+
+        Palette.new(ptr, add_ref: true)
+      end
+
+      def palette=(obj)
+        err = SDL.SDL_SetPixelFormatPalette(self, obj)
+        raise SDLError if err < 0
+      end
+
+      def to_color(pixel)
+        if alpha?
+          r, g, b, a = SDL.tmp_value("Uint8", "Uint8", "Uint8", "Uint8")
+          SDL.SDL_GetRGBA(pixel, self, r, g, b, a)
+          [r.value, g.value, b.value, a.value]
+        else
+          r, g, b = SDL.tmp_value("Uint8", "Uint8", "Uint8")
+          SDL.SDL_GetRGB(pixel, self, r, g, b)
+          [r.value, g.value, b.value]
+        end
+      end
+    end
+  end
+end