require 'httparty'
require 'appscript'
require 'timeout'

module ICuke
  class Simulator
    include HTTParty
    base_uri 'http://localhost:50000'
    
    class Error < StandardError; end
    
    def launch(project_file, options = {})
      options = {
        :target => nil,
        :configuration => 'Debug'
      }.merge(options)
      
      # If we don't kill the simulator first the rest of this function becomes
      # a no-op and we don't land on the applications first page
      simulator = Appscript.app('iPhone Simulator.app')
      simulator.quit if simulator.is_running?
      
      xcode = Appscript.app('Xcode.app')
      xcode.launch
      xcode.open project_file
      project = xcode.active_project_document.project
      
      initial_build_configuration_type = project.active_build_configuration_type.get
      project.active_build_configuration_type.set project.build_configuration_types[options[:configuration]]
      
      if options[:target]
        initial_target = project.active_target.get
        project.active_target.set project.targets[options[:target]]
      end
      
      executable = project.active_executable.get
      options[:env].each_pair do |name, value|
        executable.make :new => :environment_variable,
                        :with_properties => { :name => name, :value => value, :active => true }
      end
      project.launch_
      
      Timeout::timeout(30) do
        begin
          view
        rescue Errno::ECONNREFUSED
          sleep(0.1)
          retry
        end
      end
    ensure
      # Restore the active build settings
      if initial_build_configuration_type
        project.active_build_configuration_type.set initial_build_configuration_type
      end
      if initial_target
        project.active_target.set initial_target
      end
    end
    
    def quit
      Appscript.app('iPhone Simulator.app').quit
    end
    
    def view
      get('/view')
    end
    
    def record
      get '/record'
    end
    
    def stop
      get '/stop'
    end
    
    def save(path)
      get '/save', :query => URI.escape(path)
    end
    
    def load(path)
      get '/load', :query => URI.escape(path)
    end
    
    def play
      get '/play'
    end
    
    def fire_event(event)
      get '/event', :query => URI.escape(event.to_json)
    end
    
    def set_defaults(defaults)
      get '/defaults', :query => URI.escape(defaults.to_json)
    end
    
    private
    
    def get(path, options = {})
      response = self.class.get(path, options)
      if response.code != 200
        raise Simulator::Error, response.body
      end
      response.body
    end
  end
end