sdl2_ffi 0.0.6 → 0.0.7

data/test/unit/sdl2/test_events.rb

@@ -1,31 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/events'
-
-describe SDL2 do
-  
-  it 'has the SDL_events.h API' do
-    [
-      :peep_events,
-      :has_event,
-      :has_events,
-      :flush_event,
-      :flush_events,
-      :poll_event,
-      :wait_event,
-      :wait_event_timeout,
-      :push_event,
-      :set_event_filter,
-      :get_event_filter,
-      :add_event_watch,
-      :del_event_watch,
-      :filter_events,
-      :event_state,
-      :register_events    
-    ].each do |function|
-      assert_respond_to SDL2, function
-    end
-    
-  end
-  
-end

data/test/unit/sdl2/test_haptic.rb

@@ -1,27 +0,0 @@
-require_relative '../../test_helper'
-require 'sdl2/haptic'
-
-describe 'SDL2' do
-  
-  it 'has the SDL_haptic.h API' do
-    skip 'Not yet implemented'
-  end
-  
-  it 'can run the documented example: Haptic Direction' do
-    direction = SDL2::Haptic::Direction.new
-    
-    # Cartesian directions
-    direction.type = SDL2::Haptic::CARTESIAN # Using cartesian direction encoding.
-    direction.dir[0] = 0 # X position
-    direction.dir[1] = 1 # Y position
-    
-    # Polar directions
-    direction.type = SDL2::Haptic::POLAR #We'll be using polar direction encoding.
-    direction.dir[0] = 18000 # Polar only uses first parameter
-    
-    # Spherical coordinates
-    direction.type = SDL2::Haptic::SPHERICAL # Spherical encoding
-    direction.dir[0] = 9000 # Since we only have two axes we don't need more parameters
-  end
-  
-end

data/test/unit/sdl2/test_hints.rb

@@ -1,50 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/hints'
-
-describe SDL2 do
-  
-  it 'has hints' do
-    assert_respond_to SDL2, :clear_hints
-    assert_respond_to SDL2, :get_hint
-    assert_respond_to SDL2, :set_hint
-    
-    assert_equal 'constant', defined?(SDL2::HINT::FRAMEBUFFER_ACCELERATION)
-    assert_equal 'constant', defined?(SDL2::HINT::IDLE_TIMER_DISABLED)
-    assert_equal 'constant', defined?(SDL2::HINT::ORIENTATIONS)
-    assert_equal 'constant', defined?(SDL2::HINT::RENDER_DRIVER)
-    assert_equal 'constant', defined?(SDL2::HINT::RENDER_OPENGL_SHADERS)
-    assert_equal 'constant', defined?(SDL2::HINT::RENDER_SCALE_QUALITY)
-    assert_equal 'constant', defined?(SDL2::HINT::RENDER_VSYNC)
-
-    assert SDL2.set_hint("My Hint", "My Value")
-    assert_kind_of String, SDL2.get_hint("My Hint")
-    assert_equal "My Value", SDL2.get_hint("My Hint")
-    
-    [:default, :normal, :override].each do |priority|
-      assert SDL2.set_hint_with_priority("#{priority}Hint", "#{priority}Value", priority)
-    end    
-    
-  end
-  
-  describe SDL2::Hint do
-    
-    it 'has hash access' do
-      assert SDL2::Hint.respond_to?(:[])
-      assert SDL2::Hint.respond_to?(:[]=)
-        
-      assert_equal "My Value", SDL2::Hint["My Hint"] = "My Value"
-      assert_equal "My Value", SDL2::Hint["My Hint"]
-        
-      [:default, :normal, :override].each do |priority|
-        assert_equal "#{priority}Value", SDL2::Hint.set_with_priority("#{priority}Hint","#{priority}Value",priority)
-      end
-    end
-  
-  end
-  
-  
-  
-  
-  
-end

data/test/unit/sdl2/test_image.rb

@@ -1,9 +0,0 @@
-require 'sdl2/image'
-
-describe SDL2::Image do
-  
-  it 'has the SDL_image.h API' do
-    skip "Not yet implemented"
-  end
-  
-end

data/test/unit/sdl2/test_init.rb

@@ -1,29 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/init'
-
-describe SDL2 do
-  
-  after do
-    SDL2.quit()
-  end
-  
-  it 'can initialize everything' do
-    assert_equal SDL2.init(SDL2::INIT::EVERYTHING), 0
-  end
-  
-  it 'can initialize, check, and quit subsystems' do
-    assert_equal SDL2.init(SDL2::INIT::VIDEO), 0 # Only turn on video.
-    assert SDL2.was_init(SDL2::INIT::VIDEO) != 0, 'Video is initialized.'
-    refute SDL2.was_init(SDL2::INIT::AUDIO) != 0, 'Audio is not initialized'
-    assert_equal SDL2.init_sub_system(SDL2::INIT::AUDIO), 0 #Then turn on audio.
-    assert SDL2.was_init(SDL2::INIT::AUDIO) != 0, 'Audio is initialized.'
-    SDL2.quit_sub_system(SDL2::INIT::VIDEO)
-    refute SDL2.was_init(SDL2::INIT::VIDEO) != 0, 'Video is not initialized'    
-  end
-    
-  it 'can quit' do
-    assert SDL2.respond_to?(:quit)
-  end
-    
-end

data/test/unit/sdl2/test_keyboard.rb

@@ -1,9 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/keyboard'
-
-describe SDL2 do
-  
-  
-  
-end

data/test/unit/sdl2/test_log.rb

@@ -1,80 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/init'
-require 'sdl2/log'
-
-
-describe SDL2 do
-  before do
-    SDL2.init(SDL2::INIT::EVERYTHING)
-  end
-  
-  after do
-    SDL2.quit()
-  end
-  it 'has the log API' do    
-    [
-      :log, :log_critical, :log_debug, :log_error, :log_get_output_function,
-      :log_get_priority, :log_info, :log_message, :log_message_v, :log_reset_priorities,
-      :log_set_all_priority, :log_set_output_function, :log_set_priority, :log_verbose, :log_warn
-    ].each do |function|
-      assert_respond_to SDL2, function
-    end
-  end
-  
-  it 'logs messages' do    
-    SDL2.log('Hello World %d', :int, 6384) # API Version  
-    SDL2::Log << 'Hello World' # Object Oriented Version
-            
-    SDL2.log_critical(:application, 'Test %d', :int, 1234)
-    SDL2::Log.critical(:error, 'Test %f', :float, 2.0)
-    
-    SDL2.log_debug(:assert, 'Test %s', :string, 'String')
-    SDL2::Log.debug(:system, 'Test %c', :char, 'C'.chr().to_i)
-    
-    SDL2.log_error(:audio, 'Test %d', :int, 2)
-    SDL2::Log.error(:video, 'Test %f', :float, 63.84)
-    
-    SDL2.log_warn(:render, 'Test %d', :int, 6)
-    SDL2::Log.warn(:input, 'Test %f', :float, 88.21212)
-    
-    SDL2.log_verbose(:input, 'Test %d', :int, 8)
-    SDL2::Log.verbose(:test, 'Test %f', :float, 1234.5)
-        
-  end
-#  
-#  it 'lets you get the output function and data pointer' do
-#  
-#    
-#  end
-#  @@called = false
-#  TestFunc = Proc.new do ||
-#    puts "Test Function Called!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
-#    @@called = true
-#  end
-#  
-#  TEST_DATA = FFI::Pointer.new :string, 1
-#  
-#  
-#  it 'lets you set the output function and data pointer' do
-#    SDL2.log_set_output_function(TestFunc, TEST_DATA)
-#  end
-#  
-  it 'lets you set the log priority' do
-    [
-      :application, :error, :assert, :system,
-      :audio, :video, :render, :input, :test, :custom
-    ].each do |category|
-      [
-        :verbose, :debug, :info, :warn, :error, :critical      
-      ].each do |priority|
-        SDL2::Log.set_priority(category, priority)
-        assert_equal priority, SDL2::Log.get_priority(category)
-      end 
-      
-    end
-    SDL2::Log.set_priority(:application, :verbose)
-    
-  end
-  
-end

data/test/unit/sdl2/test_palette.rb

@@ -1,26 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/pixels' #defines SDL_Palette
-
-describe SDL2::Palette do
-  
-  before do
-    @palette = SDL2::Palette.create(32)
-  end
-  
-  after do
-    SDL2::Palette.release(@palette)
-  end
-  
-  it 'can be created' do
-    refute @palette.null?
-  end
-  
-  it 'can set colors from a ruby array of arrays' do    
-    @palette.set_colors([[255,0,0],[0,255,0],[0,0,255]])
-  end
-  
-  
-  
-  
-end

data/test/unit/sdl2/test_pixel_format.rb

@@ -1,38 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/pixels' # SDL_pixels.h defines SDL_PixelFormat
-
-require 'sdl2/pixel_format'
-
-describe SDL2::PixelFormat do
-
-  it 'can be created in all formats' do
-
-    SDL2::PIXELFORMAT.by_name.each do |format|
-      unless format == 0 # Skip "UNKOWN"
-        begin
-          pixel_format = SDL2::PixelFormat.create(format[1])
-          refute pixel_format.null?
-          assert_kind_of SDL2::PixelFormat, pixel_format
-        rescue RuntimeError => e
-          skip  "Problem with SDL2::PIXELFORMAT.#{format[0]}" #TODO: Fix broken PIXELFORMATS
-        end
-      end
-
-    end
-
-  end
-  
-  
-  it 'can get the name of all formats' do
-    
-    SDL2::PIXELFORMAT.by_name.each_pair do |k,v|
-      name = SDL2::PixelFormat.get_name(v)
-      #binding.pry    
-      assert_includes name, k.to_s      
-    end
-  end
-  
-  
-
-end

data/test/unit/sdl2/test_pixels.rb

@@ -1,24 +0,0 @@
-require_relative '../../test_helper'
-require 'sdl2/pixels'
-
-describe SDL2 do
-  it 'should have the SDL_pixels.h API' do
-    [
-      :get_pixel_format_name,
-      :pixel_format_enum_to_masks,
-      :masks_to_pixel_format_enum,
-      :alloc_format,
-      :free_format,
-      :alloc_palette,
-      :set_pixel_format_palette,
-      :set_palette_colors,
-      :free_palette,
-      :map_rgb,
-      :map_rgba,
-      :get_rgb,
-      :get_rgba,
-    ].each do |function|
-      assert_respond_to SDL2, function
-    end  
-  end
-end

data/test/unit/sdl2/test_power.rb

@@ -1,11 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/power'
-
-describe SDL2 do
-  
-  it 'has the SDL_power.h API' do
-    assert_respond_to SDL2, :get_power_info
-  end
-  
-end

data/test/unit/sdl2/test_rect.rb

@@ -1,19 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/rect'
-
-describe SDL2 do
-  
-  it 'has the SDL_rect.h API' do
-    [
-      :has_intersection,
-      :intersect_rect,    
-      :enclose_points,
-      :intersect_rect_and_line
-    ].each do |function|
-      assert_respond_to SDL2, function
-    end
-    
-  end
-  
-end

data/test/unit/sdl2/test_render.rb

@@ -1,58 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/render'
-
-describe SDL2 do
-  SDL_render_H_API =     [
-    :create_renderer,
-    :create_software_renderer,
-    :create_texture,
-    :create_texture_from_surface,
-    :create_window_and_renderer,
-    :destroy_renderer,
-    :destroy_texture,
-    :get_num_render_drivers,
-    :get_render_draw_blend_mode,
-    :get_render_draw_color,
-    :get_render_driver_info,
-    :get_renderer,
-    :get_renderer_info,
-    :get_texture_alpha_mod,
-    :get_texture_blend_mode,
-    :get_texture_color_mod,
-    :lock_texture,
-    :query_texture,
-    :render_clear,
-    :render_copy,
-    :render_copy_ex,
-    :render_draw_line,
-    :render_draw_lines,
-    :render_draw_point,
-    :render_draw_points,
-    :render_draw_rect,
-    :render_draw_rects,
-    :render_fill_rect,
-    :render_fill_rects,
-    :render_get_clip_rect,
-    :render_get_viewport,
-    :render_present,
-    :render_read_pixels,
-    :render_set_clip_rect,
-    :render_set_viewport,
-    :set_render_draw_blend_mode,
-    :set_render_draw_color,
-    :set_render_target,
-    :set_texture_alpha_mod,
-    :set_texture_blend_mode,
-    :set_texture_color_mod,
-    :unlock_texture,
-    :update_texture
-  ]
-  
-  it 'has the SDL_render.h api' do
-    assert_equal 43, SDL_render_H_API.count
-    SDL_render_H_API.each do |function|
-      assert_respond_to SDL2, function      
-    end
-  end
-end

data/test/unit/sdl2/test_surface.rb

@@ -1,88 +0,0 @@
-require_relative '../../test_helper'
-
-require 'sdl2/surface'
-
-describe SDL2 do
-  it 'has the SDL_surface.h API' do
-    [
-      :create_rgb_surface,
-      :free_surface,
-      :set_surface_palette,
-      :lock_surface,
-      :unlock_surface,
-      :load_bmp_rw,
-      :load_bmp,
-      :save_bmp_rw,
-      :save_bmp,
-      :set_surface_rle,
-      :set_color_key,
-      :get_color_key,
-      :set_surface_color_mod,
-      :get_surface_color_mod,
-      :set_surface_alpha_mod,
-      :get_surface_alpha_mod,
-      :set_surface_blend_mode,
-      :get_surface_blend_mode,
-      :set_clip_rect,
-      :get_clip_rect,
-      :convert_surface,
-      :convert_surface_format,
-      :convert_pixels,
-      :fill_rect,
-      :fill_rects,
-      :upper_blit,
-      :blit_surface,
-      :lower_blit,
-      :soft_stretch,
-      :upper_blit_scaled,
-      :blit_scaled,
-      :lower_blit_scaled,
-    ].each do |function|
-      assert_respond_to SDL2, function
-    end
-  end  
-end
-
-describe SDL2::Surface do
-  
-  it 'rejects invalid pixel formats' do 
-    assert_raises RuntimeError do
-      # Try to create a 64bit depth image
-      SDL2::Surface.create_rgb(0, 100, 100, 64)
-    end
-  end
-  
-  it 'can be created with valid arguments' do
-    surfaces = 
-      [
-        SDL2::Surface.create_rgb(0, 100, 100, 4),
-        SDL2::Surface.create_rgb(0, 100, 100, 8),
-        SDL2::Surface.create_rgb(0,100,100,16)
-      ]
-    surfaces.each do |surface|
-      refute surface.null?
-      assert_kind_of SDL2::Surface, surface
-    end
-    assert_equal 4, surfaces[0].format.bits_per_pixel
-    assert_equal 8, surfaces[1].format.bits_per_pixel
-    assert_equal 16, surfaces[2].format.bits_per_pixel
-  end
-  
-  it 'can be freed' do
-    surface = SDL2::Surface.create_rgb(0, 100, 100, 4)
-    surface.free
-    skip("Don't know how to test this")
-  end
-  
-  it 'can get and set the palette' do
-    surface = SDL2::Surface.create_rgb(0, 100, 100, 4)
-    surface_palette = surface.palette
-    assert_kind_of SDL2::Palette, surface_palette
-    my_palette = SDL2::Palette.create(16)
-    
-    
-    surface.palette = my_palette
-    
-    assert_equal my_palette, surface.palette
-  end
-end