sdl2_ffi 0.0.4 → 0.0.5

data/spec/functional/lazy_foo_tutorial/lazy_foo_05_color_keying_spec.rb

@@ -0,0 +1,41 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/image'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson05/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+describe "LazyFoo.net: Lesson 05: Color Keying" do
+  
+  before do
+    SDL2::init!(:EVERYTHING)
+    @window = Window.create(subject, :CENTERED, :CENTERED, 640, 480)
+    @screen = @window.surface
+    
+    @background = @screen.convert(Image.load!(img_path('background.jpg')))
+      
+    @foo = @screen.convert(Image.load!(img_path('foo.jpg')))
+      
+    @foo.color_key = @foo.format.map_rgb([0, 0xff, 0xff])
+    
+    @screen.blit_in(@background)
+    @screen.blit_in(@foo)
+    
+    @window.update_surface
+        
+      
+  end
+  
+  after do
+    @background.free
+    @foo.free
+    quit()
+    
+  end
+  
+  it "draws the sprite using a color key" do
+    verify(format: :png) do
+      @screen
+    end
+  end
+  
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_06_clip_blitting_and_sprite_sheets_spec.rb

@@ -0,0 +1,41 @@
+require_relative 'lazy_foo_helper'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson04/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+describe "LazyFoo.net: Lesson 06: Clip Blitting and Sprite Sheets" do
+  before do
+    SDL2.init!(:EVERYTHING)
+    @window = Window.create(subject, :CENTERED, :CENTERED, 640, 480)
+    @screen = @window.surface
+
+    @sprites = Array.new(4) do |idx|
+      SDL2::Rect.cast(
+      x: (idx % 2) * 100,
+      y: (idx / 2) * 100,
+      w: 100, h: 100
+      )
+    end
+
+    @dots = @screen.convert(Image.load(img_path('sprites.jpg')))
+    @dots.color_key = {r: 0, g: 0xFF, b: 0xFF}
+
+    @screen.fill_rect(@screen.rect, {r: 0xFF, g: 0xFF, b: 0xFF})
+    
+    @screen.blit_in(@dots, @sprites[0], {x: 0,   y: 0})
+    @screen.blit_in(@dots, @sprites[1], {x: 540, y: 0})
+    @screen.blit_in(@dots, @sprites[2], {x: 0,   y: 380})
+    @screen.blit_in(@dots, @sprites[3], {x: 540, y: 380})
+
+    @window.update_surface
+  end
+
+  after do
+    @dots.free
+    
+    quit()
+  end
+
+  it "draws the clipped sprites to the screen" do
+    verify(){@screen}
+  end
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_07_true_type_fonts_spec.rb

@@ -0,0 +1,56 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/ttf'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson07/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+describe "LazyFoo.net: Lesson 07: True Type Fonts" do
+  
+  before do
+    
+    #binding.pry
+    SDL2.init!(:EVERYTHING)
+    @window = Window.create(subject, :CENTERED, :CENTERED, 640, 480)
+    @screen = @window.surface
+    TTF.init!
+    
+    @background = @screen.convert(Image.load(img_path('background.png')))
+    
+    font_path = fixture('fonts/GaroaHackerClubeBold.otf')
+    
+    @font = TTF::Font.open(font_path, 64)
+    
+    #@textColor = Color.cast({r: 255,g: 255,b: 255,a: 255})
+    @textColor = Color.cast(r: 255, g: 0, b: 0, a: 255)    
+        
+    @message = @font.render_text_blended_wrapped("The quick brown fox jumps over the lazy dog", 480, @textColor)
+    #@message = @screen.convert(@message)
+    
+    @background.blit_out(@screen, @screen.rect)
+    @message.blit_out(@screen, x: 0, y: 150)
+    
+    @window.update_surface
+    
+    #delay(1000)
+  end
+  
+  after do
+    @background.free
+    @message.free
+    @font.free
+    quit()
+  end
+
+  it "loads a true type font" do
+    expect(@font).to be_a SDL2::TTF::Font
+  end
+    
+  it "writes a message to a surface" do
+    verify(){@message}
+  end
+  
+  it "draws the message to the screen" do
+    verify(){@screen}
+  end
+
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_08_key_presses_spec.rb

@@ -0,0 +1,120 @@
+require_relative 'lazy_foo_helper'
+
+require 'sdl2/ttf'
+
+#ORIGINAL: http://lazyfoo.net/SDL_tutorials/lesson08/index.php
+# Adapted for Ruby & SDL 2.0 as functional test by BadQuanta
+describe "LazyFoo.net: Lesson 08: Key Presses" do
+
+  before do
+    SDL2.init!(:EVERYTHING)
+    @window = Window.create(subject, :CENTERED, :CENTERED, 640, 480)
+    @screen = @window.surface
+
+    @background = @screen.convert(Image.load!(img_path('background.png')))
+
+    @font = TTF::Font.open(fixture('fonts/GaroaHackerClubeBold.otf'),28)
+
+    @upMessage = @font.render_text_solid("Up was pressed")
+    @downMessage = @font.render_text_solid("Down was pressed")
+    @leftMessage = @font.render_text_solid("Left was pressed")
+    @rightMessage = @font.render_text_solid("Right was pressed")
+    @quit = false
+
+    @events = [
+      SDL2::KeyboardEvent.cast(
+      type: SDL2::EVENTTYPE::KEYDOWN,
+      keysym: Keysym.cast(sym: SDL2::KEYCODE::UP)
+      ),
+      SDL2::KeyboardEvent.cast(
+      type: SDL2::EVENTTYPE::KEYDOWN,
+      keysym: Keysym.cast(sym: SDL2::KEYCODE::DOWN)
+      ),
+
+      SDL2::KeyboardEvent.cast(
+      type: SDL2::EVENTTYPE::KEYDOWN,
+      keysym: Keysym.cast(sym: SDL2::KEYCODE::LEFT)
+      ),
+
+      SDL2::KeyboardEvent.cast(
+      type: SDL2::EVENTTYPE::KEYDOWN,
+      keysym: Keysym.cast(sym: SDL2::KEYCODE::RIGHT)
+      ),
+      SDL2::QuitEvent.cast(type: SDL2::EVENTTYPE::QUIT)
+    ]
+
+    @background.blit_out(@screen) # Clear screen.
+
+    enum = @events.each
+    until @quit do
+      @message = nil
+
+      while (event = Event.poll())
+        puts event.type
+
+        if event.type == :KEYDOWN
+          case event.key.keysym.sym
+            when :UP then
+              @message = @upMessage
+            when :DOWN then
+              @message = @downMessage
+            when :LEFT then
+              @message = @leftMessage
+            when :RIGHT then
+              @message = @rightMessage
+          end
+        elsif event.type == :QUIT
+          @quit = true
+        end
+      end
+
+      unless @message.nil? || @message.null?
+        @background.blit_out(@screen) # Draw over old message
+
+        @message.blit_out(@screen, {
+          x: (@screen.w - @message.w) / 2,
+          y: (@screen.h - @message.h) / 2
+        })
+
+      end
+
+      # Insert some fake events for testing:
+      @window.update_surface()
+
+      # If you want to see it run, uncomment
+      #delay(300)
+
+      #binding.pry
+      begin
+        SDL2.push_event(SDL2::Event.cast(enum.next))
+      rescue StopIteration
+        puts "NO MORE EVENTS"
+
+      end
+
+    end
+
+  end
+
+  it "rendered the up message" do
+    verify(){@upMessage}
+  end
+
+  it "rendered the down message" do
+    verify(){@downMessage}
+  end
+
+  it "rendered the left message" do
+    verify(){@leftMessage}
+  end
+
+  it "rendered the right message" do
+    verify(){@rightMessage}
+  end
+
+
+  after do
+    quit()
+  end
+
+end

data/spec/functional/lazy_foo_tutorial/lazy_foo_helper.rb

@@ -0,0 +1,6 @@
+require_relative '../../spec_helper'
+
+require 'sdl2'
+require 'sdl2/image'
+
+include SDL2

data/spec/png_writer.rb

@@ -0,0 +1,21 @@
+require 'approvals'
+
+class Approvals::Writers::PngWriter < Approvals::Writers::BinaryWriter
+  
+  WRITE_PROC = Proc.new do |data, file|
+    # Bind to prototype
+    FileUtils.mkdir_p(File.dirname(file))
+    SDL2::Image.save_png(data,file)
+  end
+  
+  DETECT_PROC = Proc.new do |subject|    
+    subject.kind_of? SDL2::Surface
+  end
+  
+  def initialize()
+    super(format: :png, extension: 'png', write: WRITE_PROC, detect: DETECT_PROC) 
+  end
+  
+end
+
+Approvals::Writers::PngWriter.instance # Should register writer.

data/spec/spec_helper.rb

@@ -0,0 +1,23 @@
+require 'approvals'
+require 'approvals/rspec'
+require_relative 'png_writer'
+require 'sdl2/image'
+require 'pry'
+
+ImagesPath = File.expand_path('../fixtures/images', __FILE__)
+
+def img_path(filename)
+  path = File.expand_path(filename, ImagesPath)
+  raise "Missing Image File: #{path}!" unless File.exist?(path)
+  return path  
+end
+
+FixturesPath = File.expand_path('../fixtures',__FILE__)
+
+def fixture(filename)
+  path = File.expand_path(filename, FixturesPath)
+  raise "Missing Fixture File: #{path}!" unless File.exist?(path)
+  return path
+end
+
+

data/spec/unit/sdl2/color_spec.rb

@@ -0,0 +1,46 @@
+require_relative '../unit_helper'
+
+describe SDL2::Color do
+  before :each do
+    SDL2.init!(:EVERYTHING)
+    @window = SDL2::Window.create(subject.to_s, :CENTERED, :CENTERED, 100, 100)
+    @screen = @window.surface
+    @color = SDL2::Color.new
+  end
+  
+  it 'looks RED when it should' do
+    @color.set(255,0,0,255)
+  end
+  
+  it 'looks GREEN when it should' do
+    @color.set(0,255,0,255)
+  end
+  
+  it 'looks BLUE when it should' do
+    @color.set(0,0,255,255)
+  end
+  
+  it 'should cast hashes properly' do
+    @color = SDL2::Color.cast({r: 255, g: 0, b: 0, a: 255})
+    expect(@color.r).to eq(255)
+    expect(@color.g).to eq(0)
+    expect(@color.b).to eq(0)
+    expect(@color.a).to eq(255)
+  end
+  
+  
+  it 'should cast arrays properly' do
+    @color = SDL2::Color.cast([0, 255, 255, 255])
+    expect(@color.r).to eq(0)
+    expect(@color.g).to eq(255)
+    expect(@color.b).to eq(255)
+    expect(@color.a).to eq(255)
+  end
+    
+  after :each do
+    @screen.fill_rect(@screen.rect, @color)
+    @window.update_surface()
+    verify(){@screen} 
+    SDL2.quit()
+  end
+end

data/spec/unit/unit_helper.rb

@@ -0,0 +1,3 @@
+require_relative '../spec_helper'
+
+# TODO: Refactor common unit testing needs here.

data/test/functional/examples/lazyfoo.net_s/test_clip_blitting_and_sprite_sheets.rb

@@ -0,0 +1,50 @@
+require_relative '../../../test_helper'
+
+describe "LazyFoo.net's Examples" do
+
+  it "runs the clip blitting and sprite sheets example" do
+
+    require 'sdl2'
+    require 'sdl2/image'
+    SDL2.init(:EVERYTHING)
+
+    @window = SDL2::Window.create('Clip blitting and sprite sheets',
+    :CENTERED,:CENTERED,640,480)
+
+    @screen = @window.surface
+
+    clip = Array.new{SDL2::Rect.new}
+
+    sprite_rect = Array.new(4)do |idx|
+      s = SDL2::Rect.new
+      s.x= (idx % 2)* 100
+      s.y= (idx / 2) *100
+      s.w= 100
+      s.h= 100
+      s
+    end
+
+    puts sprite_rect[0]
+    puts sprite_rect[1]
+    puts sprite_rect[2]
+    puts sprite_rect[3]
+    
+    dots = @screen.convert(SDL2::Image.load(fixture('sprites.jpg')))
+    
+    @screen.fill_rect(@screen.clip_rect, [0xFF, 0xFF, 0xFF])
+    
+    #binding.pry
+    @screen.blit_in(dots, [0,0], sprite_rect[0])
+    @screen.blit_in(dots, [540,0], sprite_rect[1])
+    @screen.blit_in(dots, [0, 380], sprite_rect[2])
+    @screen.blit_in(dots, [540, 380], sprite_rect[3])
+    
+    @window.update_surface
+    
+    Approvals.verify(@screen, format: :bmp, name: "clip blitting and sprite sheets")
+    
+    SDL2.quit()
+
+  end
+
+end

data/test/functional/examples/lazyfoo.net_s/test_color_keying.rb

@@ -0,0 +1,42 @@
+require_relative '../../../test_helper'
+
+def path_for(something)
+  File.expand_path(something, FIXTURE_DIR)
+end
+
+describe "Color Keying" do
+  it "runs LazyFoo.net's Color Keying example" do
+    require 'sdl2'
+    require 'sdl2/image'
+    
+    def load_image(filename)
+      loadedImage = SDL2::Image.load!(path_for(filename))
+      optimizedImage = @screen.convert(loadedImage)
+      loadedImage.free
+      
+      return optimizedImage
+    end
+    
+    @window = SDL2::Window.create("Color Keying",:CENTERED,:CENTERED,640,480)
+    @screen = @window.surface
+    
+    background = load_image('background.jpg')
+    
+    foo = load_image('foo.jpg')
+        
+    foo.color_key = foo.format.map_rgb([0, 0xFF, 0xFF])
+    
+    @screen.blit_in(background)
+    @screen.blit_in(foo)
+    
+    @window.update_surface
+    
+    Approvals.verify(@screen, format: :png, name: "Color Keying Example")
+    
+    background.free
+    foo.free
+    
+    SDL2.quit()
+  end
+
+end