#!/usr/bin/ruby
# script de visualisation 3D par script public pour MountyHall
#  par Tyrollus (johnatofjj.net)
#
#  args: -c nomdutroll sur lequel la vue est centree

require 'viewer3d'
require 'libmhsp'

filelist = ARGV
if ARGV.include? '-c'
	trollcentral = ARGV[ARGV.index_of('-c') + 1]
	filelist -= ['-c', trollcentral]
else
	trollcentral = 'Tyrollus'
end
filelist = Dir[MHInfo.local_cache_pfx + 'vue_*'] if filelist.empty?

class MHWorld
	attr_reader   :vue
	attr_accessor :viewer
	
	def initialize(vue)
		@vue = vue
		
		coords = @vue.cat.values.flatten.map { |v| [v.x, v.y, v.n] }
		@limits = coords.inject([nil]*6) { |l, c|
			3.times { |i|
				l[2*i] = c[i] if not l[2*i] or l[2*i] > c[i]
				l[2*i+1]=c[i] if not l[2*i+1] or l[2*i+1]<c[i]
			}
			l
		}
	end
	
	def render_all
		GL.Light GL::LIGHT0, GL::POSITION, [2, -5, 20]

		render_quadrillage

		@vue.cat['TROLLS'].each { |t|
			render_troll(t.x, t.y, t.n, 0.5)
		}
		@vue.cat['MONSTRES'].each { |m|
			render_monstre(m.x, m.y, m.n, 0.2)
		}
		# draw individual cavern limits, handle multiple objects per cavern
	end

	def render_quadrillage
		GL.Disable GL::LIGHTING
		GL.Color(1, 1, 1)
		radius = 1
		p = @viewer.pos.map { |e| e.floor }
		(p[0]-radius..p[0]+radius).each { |x| x += 0.5
		(p[1]-radius..p[1]+radius).each { |y| y += 0.5
		(p[2]-radius..p[2]+radius).each { |z| z += 0.5
		GL.PushMatrix
			GL.Translate(x, y, z)
			GLUT.WireCube(1)
		GL.PopMatrix
		}}}
		GL.Enable GL::LIGHTING
	end

	def render_troll(x, y, z, w=1)
		GL.Material GL::FRONT, GL::AMBIENT, [0, 0, 0, 0.5]
		GL.Material GL::FRONT, GL::DIFFUSE, [0.1, 0.35, 0.1, 0.1]
		GL.Material GL::FRONT, GL::SPECULAR, [0.45, 0.55, 0.45, 1]
		GL.Material GL::FRONT, GL::SHININESS, 0.25*128.0
		
		GL.PushMatrix
			GL.Translate x+0.5, y+0.5, z+0.5
			GLUT.SolidCube w
		GL.PopMatrix
	end

	def render_monstre(x, y, z, w=1)
		GL.Material GL::FRONT, GL::AMBIENT, [0, 0, 0, 1]
		GL.Material GL::FRONT, GL::DIFFUSE, [0.6, 0.15, 0.1, 1]
		GL.Material GL::FRONT, GL::SPECULAR, [0.45, 0.55, 0.45, 1]
		GL.Material GL::FRONT, GL::SHININESS, 0.25*128.0
		
		GL.PushMatrix
			GL.Translate x+0.5, y+0.5, z+0.5
			GLUT.SolidCube w
		GL.PopMatrix
	end
end

v = MHVueSP.new
filelist.each { |f| v.update File.read(f) }
v.parse

if trollcentral
	t = v.cat['TROLLS'].find { |t| t.nom == trollcentral }
	pos = [t.x+0.5, t.y, t.n+0.5]
end
pos ||= [0, 0, 0]

Viewer.new(MHWorld.new(v), pos, [0, 1, 0], [0, 0, 1]).run