budgie 0.1.0

data/lib/budgie/draw_palette.rb

@@ -0,0 +1,59 @@
+require 'opengl'
+
+module Budgie; class DrawPalette
+  include GL
+
+  def initialize(palette, camera)
+    @palette = palette
+    @camera = camera
+  end
+
+  def fixed?
+    !!@fixed
+  end
+
+  def fix
+    @fixed = @camera.dup
+    @fixed.step = 10
+    @fixed.forward
+  end
+
+  def release
+    @fixed = nil
+  end
+
+  def draw
+    return unless @fixed
+
+    glMatrixMode GL_MODELVIEW
+    glPushMatrix
+
+    glTranslatef @fixed.x, @fixed.y, @fixed.z
+    glRotatef -@fixed.alpha, 0, 1, 0
+
+    draw!
+
+    glPopMatrix
+  end
+
+  private
+
+  def draw!
+    size = (Math.sqrt @palette.colors).floor
+    glTranslatef -size / 2, -size / 2, 0
+    glBegin GL_QUADS
+    size.times do |x|
+    size.times do |y|
+      index = 16 * x + y
+      @palette.rgb(index) do |r, g, b|
+        glColor3ub r, g, b
+      end
+      glVertex3f x, y, 0
+      glVertex3f x + 1, y, 0
+      glVertex3f x + 1, y + 1, 0
+      glVertex3f x, y + 1, 0
+    end
+    end
+    glEnd
+  end
+end; end

data/lib/budgie/draw_partial.rb

@@ -0,0 +1,58 @@
+require 'opengl'
+require 'budgie/draw_cube'
+
+module Budgie; class DrawPartial
+  include GL
+
+  def initialize(draw_map, x, y, z)
+    @draw_map = draw_map
+    @map = draw_map.map
+    @size = draw_map.partial_size
+    @x = x
+    @y = y
+    @z = z
+    @list = glGenLists 1
+    @cube = DrawCube.new
+  end
+
+  def draw
+    glCallList @list
+  end
+
+  def compile
+    dx = @x * @size
+    dy = @y * @size
+    dz = @z * @size
+
+    glNewList @list, GL_COMPILE
+    @size.times do |x|
+    @size.times do |y|
+    @size.times do |z|
+      cx = x + dx
+      cy = y + dy
+      cz = z + dz
+      index = @map[cx, cy, cz]
+      cube cx, cy, cz, index if index
+    end
+    end
+    end
+    glEndList
+  end
+
+  private
+
+  def cube(x, y, z, index)
+    @draw_map.cube_color x, y, z, index
+    glPushMatrix
+    glTranslatef x, y, z
+    @cube.draw do
+      @cube.front  unless @map[x, y, z + 1]
+      @cube.back   unless @map[x, y, z - 1]
+      @cube.right  unless @map[x + 1, y, z]
+      @cube.left   unless @map[x - 1, y, z]
+      @cube.top    unless @map[x, y + 1, z]
+      @cube.bottom unless @map[x, y - 1, z]
+    end
+    glPopMatrix
+  end
+end; end

data/lib/budgie/draw_picker_cube.rb

@@ -0,0 +1,33 @@
+require 'budgie/draw_cube'
+
+module Budgie; class DrawPickerCube < DrawCube
+  def front
+    glColor3ub 2, 2, 3
+    super
+  end
+
+  def back
+    glColor3ub 2, 2, 1
+    super
+  end
+
+  def top
+    glColor3ub 2, 3, 2
+    super
+  end
+
+  def bottom
+    glColor3ub 2, 1, 2
+    super
+  end
+
+  def right
+    glColor3ub 3, 2, 2
+    super
+  end
+
+  def left
+    glColor3ub 1, 2, 2
+    super
+  end
+end; end

data/lib/budgie/draw_picker_map.rb

@@ -0,0 +1,74 @@
+require 'opengl'
+require 'budgie/map'
+require 'budgie/index'
+require 'budgie/draw_partial'
+
+# Splits map by 16x16x16 chunks and caches
+# drawing commands for each of them
+module Budgie; class DrawPickerMap
+  include GL
+
+  attr_reader :map, :partial_size
+
+  def initialize(map)
+    @map = map
+    @partial_size = 16
+    @partials = Map.new 1 + @map.max / @partial_size
+
+    compile
+  end
+
+  def update_partial(x, y, z)
+    x /= @partial_size
+    y /= @partial_size
+    z /= @partial_size
+    compile_partial x, y, z
+    # compile_partial x - 1, y, z
+    # compile_partial x + 1, y, z
+    # compile_partial x, y - 1, z
+    # compile_partial x, y + 1, z
+    # compile_partial x, y, z - 1
+    # compile_partial x, y, z + 1
+  end
+
+  def compile
+    @partials.each do |x, y, z|
+      compile_partial x, y, z
+    end
+  end
+
+  def draw
+    @partials.each do |x, y, z|
+      draw_partial x, y, z
+    end
+  end
+
+  def cube_color(x, y, z, index)
+    x = 1 + to_index(x)
+    y = 1 + to_index(y)
+    z = 1 + to_index(z)
+    glColor3ub x, y, z
+  end
+
+  private
+
+  include Index
+
+  def partial(x, y, z)
+    partial = @partials[x, y, z]
+    partial = @partials[x, y, z] = create_partial(x, y, z) unless partial
+    partial
+  end
+
+  def create_partial(x, y, z)
+    DrawPartial.new self, x, y, z
+  end
+
+  def compile_partial(x, y, z)
+    partial(x, y, z).compile
+  end
+
+  def draw_partial(x, y, z)
+    partial(x, y, z).draw
+  end
+end; end

data/lib/budgie/index.rb

@@ -0,0 +1,25 @@
+module Budgie; module Index
+  # Encodes negative values as positive ones
+  # 0 => 0
+  # 1 => 2
+  # 2 => 4
+  # -1 => 1
+  # -2 => 3
+  # etc
+  def to_index(value)
+    if value >= 0
+      2 * value
+    else
+      -(1 + 2 * value)
+    end
+  end
+
+  # Reverses #to
+  def from_index(value)
+    if value % 2 == 0
+      value / 2
+    else
+      -(1 + value) / 2
+    end
+  end
+end; end

data/lib/budgie/map.rb

@@ -0,0 +1,43 @@
+require 'budgie/index'
+require 'budgie/auto_array'
+
+# Generic 3d array with negative indexes
+# and auto-expand capability
+module Budgie; class Map
+  attr_reader :max
+
+  def initialize(max = 0)
+    @max = max
+    @data = AutoArray.new { AutoArray.new { Array.new } }
+  end
+
+  def [](x, y, z)
+    @data[to_index x][to_index y][to_index z]
+  end
+
+  def []=(x, y, z, value)
+    self.max = x
+    self.max = y
+    self.max = z
+    @data[to_index x][to_index y][to_index z] = value
+  end
+
+  def each(&block)
+    (-@max).upto(@max) do |x|
+    (-@max).upto(@max) do |y|
+    (-@max).upto(@max) do |z|
+      yield x, y, z, self[x, y, z]
+    end
+    end
+    end
+  end
+
+  private
+
+  include Index
+
+  def max=(value)
+    value = value.abs
+    @max = value if value > @max
+  end
+end; end

data/lib/budgie/palette.rb

@@ -0,0 +1,37 @@
+module Budgie; class Palette
+  attr_reader :colors
+
+  def initialize
+    @colors = 256
+    @red_colors = 8
+    @green_colors = 8
+    @blue_colors = 4
+  end
+
+  def white
+    @colors - 1
+  end
+
+  def rgb(index, &block)
+    index ||= 0
+    index %= @colors
+
+    r = index / @blue_colors / @green_colors
+    g = index / @blue_colors % @green_colors #/
+    b = index % @blue_colors
+
+    r = r * (@colors - 1) / (@red_colors - 1)
+    g = g * (@colors - 1) / (@green_colors - 1)
+    b = b * (@colors - 1) / (@blue_colors - 1)
+
+    yield r, g, b
+  end
+
+  def index(r, g, b)
+    r = r * @red_colors / @colors
+    g = g * @green_colors / @colors
+    b = b * @blue_colors / @colors
+
+    (r * @green_colors + g) * @blue_colors + b
+  end
+end; end

data/lib/budgie/scene.rb

@@ -0,0 +1,105 @@
+require 'opengl'
+require 'budgie/change_map'
+require 'budgie/draw.rb'
+require 'budgie/draw_map.rb'
+require 'budgie/draw_palette'
+require 'budgie/checker_texture'
+
+module Budgie; class Scene
+  extend Forwardable
+  include GL
+
+  attr_reader :map, :palette, :camera, :selection, :draw_map, :draw_picker_map
+
+  def_delegators :@draw_palette, :fixed?, :fix, :release
+  def_delegators :@change_map, :place, :replace, :remove
+
+  def initialize(app)
+    @map = app.map
+    @camera = app.camera
+    @palette = app.palette
+    @selection = app.selection
+
+    @draw = Draw.new app
+    @draw_map = DrawMap.new @map, @palette
+    @draw_palette = DrawPalette.new @palette, @camera
+    @draw_picker_map = DrawPickerMap.new @map
+
+    @change_map = ChangeMap.new self
+    @checker_texture = CheckerTexture.new
+
+    glClearColor 0, 0, 0, 0
+    glClearDepth 1.0
+
+    glCullFace GL_FRONT
+    glDepthFunc GL_LEQUAL
+    glShadeModel GL_SMOOTH
+    glLightfv GL_LIGHT1, GL_AMBIENT,  [0.25, 0.25, 0.25, 1.0]
+    glLightfv GL_LIGHT2, GL_DIFFUSE,  [0.5, 0.5, 0.5, 1.0]
+    glLightfv GL_LIGHT3, GL_DIFFUSE,  [0.25, 0.25, 0.25, 1.0]
+  end
+
+  def display
+    before_display
+
+    with GL_DEPTH_TEST, GL_CULL_FACE do
+      with GL_LIGHTING, GL_TEXTURE_2D, GL_COLOR_MATERIAL, GL_LIGHT1, GL_LIGHT2, GL_LIGHT3 do
+        @checker_texture.bind
+        @draw_map.draw
+        @checker_texture.unbind
+      end
+
+      with GL_POLYGON_OFFSET_FILL do
+        @draw.selection @selection
+      end
+    end
+
+    @draw_palette.draw
+    @draw.ortho { @draw.crosshair_with_outline }
+  end
+
+  def picker
+    before_display
+    with GL_DEPTH_TEST, GL_CULL_FACE do
+      @draw_picker_map.draw
+    end
+  end
+
+  def color_picker
+    before_display
+    with GL_DEPTH_TEST, GL_CULL_FACE do
+      @draw_map.draw
+    end
+    @draw_palette.draw
+  end
+
+  def normal_picker
+    before_display
+    with GL_DEPTH_TEST, GL_CULL_FACE do
+      @draw.picker_cube_at @selection.x, @selection.y, @selection.z
+    end
+  end
+
+  private
+
+  def before_display
+    glClear GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT
+
+    glMatrixMode GL_MODELVIEW
+    glLoadIdentity
+    glScalef 1, 1, -1
+
+    glRotatef @camera.beta,  1, 0, 0
+    glRotatef @camera.alpha, 0, 1, 0
+    glTranslatef -@camera.x, -@camera.y, -@camera.z
+
+    glLightfv GL_LIGHT2, GL_POSITION, [@camera.x, @map.max * @map.max, @camera.z, 1.0]
+    glLightfv GL_LIGHT3, GL_POSITION, [@camera.x, @camera.y, @camera.z, 1.0]
+  end
+
+  def with(*states, &block)
+    states.each { |state| glEnable state }
+    yield
+    states.each { |state| glDisable state }
+  end
+end; end

data/lib/budgie/selection.rb

@@ -0,0 +1,45 @@
+require 'budgie/index'
+
+module Budgie; class Selection
+  attr_accessor :x, :y, :z, :normal_x, :normal_y, :normal_z, :selected, :r, :g, :b
+
+  def initialize
+    @x = @y = @z = @normal_x = @normal_y = @normal_z = @r = @g = @b = 0
+    @selected = false
+  end
+
+  def new_x
+    @x + @normal_x
+  end
+
+  def new_y
+    @y + @normal_y
+  end
+
+  def new_z
+    @z + @normal_z
+  end
+
+  # Nothing is selected when color is [0, 0, 0]
+  # Everything else maps to [x, y, z] indexes of the map
+  def from_color(r, g, b)
+    @selected = r * g * b != 0
+    if @selected
+      @x = from_index(r - 1)
+      @y = from_index(g - 1)
+      @z = from_index(b - 1)
+    end
+  end
+
+  # Cube normals can be [-1|0|1, -1|0|1, -1|0|1]
+  # Normals are encoded like [1|2|3, 1|2|3, 1|2|3]
+  def normal_from_color(r, g, b)
+    @normal_x = r - 2
+    @normal_y = g - 2
+    @normal_z = b - 2
+  end
+
+  private
+
+  include Index
+end; end

data/lib/budgie/settings.rb

@@ -0,0 +1,17 @@
+module Budgie; class Settings
+  attr_reader :keymap, :free_mouse_mode_key, :palette_key
+
+  def initialize
+    @keymap = {
+      "\e" => 'escape',
+      'w' => 'forward',
+      's' => 'backward',
+      'a' => 'left',
+      'd' => 'right',
+      ' ' => 'up',
+      'c' => 'down'
+    }
+    @free_mouse_mode_key = 'f'
+    @palette_key = 'e'
+  end
+end; end

data/lib/budgie/store_map.rb

@@ -0,0 +1,90 @@
+require 'oily_png'
+require 'budgie/map'
+
+module Budgie; class StoreMap
+  def initialize(filename, palette)
+    @filename = filename
+    @palette = palette
+  end
+
+  def create
+    map = Map.new
+    map[0, 0, 0] = @palette.white
+    map
+  end
+
+  def load
+    return create unless file_exists?
+
+    png = load_png
+    size = png.width
+    max = size / 2
+
+    map = Map.new
+
+    size.times do |x|
+    size.times do |y|
+    size.times do |z|
+      png_x = x
+      png_y = size * (z + 1) - (y + 1)
+      color = png[png_x, png_y] rescue nil
+      color = color_to_index color
+      map[x - max, y - max, z - max] = color if color
+    end
+    end
+    end
+
+    return map
+  end
+
+  def save(map)
+    max = map.max
+    size = 2 * max + 1 # [-max, max] including boundaries
+
+    width = size
+    height = size * size
+    png = new_png width, height
+
+    map.each do |x, y, z, index|
+      x += max
+      y += max
+      z += max
+      png_x = x
+      png_y = width * (z + 1) - (y + 1)
+      png[png_x, png_y] = index_to_color index
+    end
+
+    png.save @filename
+  end
+
+  private
+
+  def file_exists?
+    File.exists? @filename
+  end
+
+  def new_png(width, height)
+    ChunkyPNG::Image.new(width, height, ChunkyPNG::Color::TRANSPARENT)
+  end
+
+  def load_png
+    ChunkyPNG::Image.from_file(@filename)
+  end
+
+  def index_to_color(index)
+    return ChunkyPNG::Color::TRANSPARENT unless index
+    @palette.rgb(index) do |r, g, b|
+      return ChunkyPNG::Color.rgba r, g, b, 0xff
+    end
+  end
+
+  def color_to_index(color)
+    return nil unless color
+    r = ChunkyPNG::Color.r color
+    g = ChunkyPNG::Color.g color
+    b = ChunkyPNG::Color.b color
+    a = ChunkyPNG::Color.a color
+    return nil unless a > 0
+    return @palette.index r, g, b
+  end
+end; end

metadata

@@ -0,0 +1,120 @@
+--- !ruby/object:Gem::Specification
+name: budgie
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- 4r2r
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-04-26 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: opengl
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: glu
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: glut
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: oily_png
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: ''
+email: arthrrr@gmail.com
+executables:
+- budgie
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/budgie
+- lib/budgie/draw_map.rb
+- lib/budgie/draw_picker_cube.rb
+- lib/budgie/camera.rb
+- lib/budgie/index.rb
+- lib/budgie/application.rb
+- lib/budgie/auto_array.rb
+- lib/budgie/palette.rb
+- lib/budgie/draw_palette.rb
+- lib/budgie/checker_texture.rb
+- lib/budgie/settings.rb
+- lib/budgie/draw_partial.rb
+- lib/budgie/scene.rb
+- lib/budgie/map.rb
+- lib/budgie/draw_cube.rb
+- lib/budgie/draw.rb
+- lib/budgie/selection.rb
+- lib/budgie/change_map.rb
+- lib/budgie/draw_picker_map.rb
+- lib/budgie/store_map.rb
+homepage: https://github.com/4r2r/budgie
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.0.3
+signing_key: 
+specification_version: 4
+summary: Voxel editor similar to creative mode from minecraft
+test_files: []