class Sahi::Browser

# File sahi.rb, line 65
def initialize(*args)
  @proxy_host = "localhost"
  @proxy_port = 9999
  if args.size == 3
    @browser_path = args[0]
    @browser_options = ars[1]
    @browser_executable = args[2]
  elsif args.size == 1
    @browser_type = args[0]
  end
  @popup_name = nil
  @domain_name = nil
  @sahisid = nil
  @print_steps = false
end

# File sahi.rb, line 327
def add_url_mock(url_pattern, clazz=nil) 
  clazz = "MockResponder_simple" if !clazz
  execute_step("_sahi._addMock(#{Utils.quoted(url_pattern)}, #{Utils.quoted(clazz)})")
end

# File sahi.rb, line 200
def browser_js=(js)
  exec_command("setBrowserJS", {"browserJS"=>js})
end

# File sahi.rb, line 204
def check_nil(s)
  return (s == "null")  ? nil : s
end

# File sahi.rb, line 81
def check_proxy()
  begin
    response("http://#{@proxy_host}:#{@proxy_port}/_s_/spr/blank.htm")
  rescue
    raise "Sahi proxy is not available. Please start the Sahi proxy."
  end
end

# File sahi.rb, line 363
def chrome?()
  return fetch_boolean("_sahi._isChrome()")
end

# File sahi.rb, line 277
def clear_last_alert()
  execute_step("_sahi._clearLastAlert()")
end

# File sahi.rb, line 287
def clear_last_confirm()
  execute_step("_sahi._clearLastConfirm()")
end

# File sahi.rb, line 317
def clear_last_downloaded_filename()
  execute_step("_sahi._clearLastDownloadedFileName()")
end

# File sahi.rb, line 302
def clear_last_prompt()
  execute_step("_sahi._clearLastPrompt()")
end

# File sahi.rb, line 209
def close()
  if popup?()
    execute_step("_sahi._closeWindow()");
  else
    exec_command("kill");
    #Process.kill(9, @pid) if @pid
  end
end

# File sahi.rb, line 191
def collect(els, attr=nil)
      if(attr == nil)
    return els.collect_similar()
  else
            return fetch("_sahi.collectAttributes(#{Utils.quoted(attr)}, #{Utils.quoted(els.to_type())}, #{els.to_identifiers()})").split(",___sahi___")
  end
end

# File sahi.rb, line 247
def domain(name)
  if (@browser_type != null)
    win = Browser.new(@browser_type)
  else
    win = Browser.new(@browser_path, @browser_options, @browser_executable)
  end

  win.proxy_host = @proxy_host
  win.proxy_port = @proxy_port
  win.sahisid = @sahisid
  win.print_steps = @print_steps
  win.popup_name = @popup_name
  win.domain_name = name
  return win
end

# File sahi.rb, line 267
def domain?()
  return @domain_name != nil
end

# File sahi.rb, line 112
def exec_command(cmd, qs={})
  res = response("http://#{@proxy_host}:#{@proxy_port}/_s_/dyn/Driver_" + cmd, {"sahisid"=>@sahisid}.update(qs))
  return res
end

# File sahi.rb, line 150
def execute_sahi(step)
  if popup?() 
    step = "_sahi._popup(#{Utils.quoted(@popup_name)})." + step
  end
  if domain?() 
    step = "_sahi._domain(#{Utils.quoted(@domain_name)})." + step
  end
  #puts step
  exec_command("setStep", {"step" => step, 'addSahi' => true})
  i = 0
  while (i < 500)
    sleep(0.1)
    i+=1
    check_done = exec_command("doneStep")
    done = "true".eql?(check_done)
    
    error = check_done.index("error:") == 0
    return if done
            if (error)
      raise check_done
            end        
  end      
end

# File sahi.rb, line 126
def execute_step(step)
  if popup?() 
    step = "_sahi._popup(#{Utils.quoted(@popup_name)})." + step
  end
  if domain?() 
    step = "_sahi._domain(#{Utils.quoted(@domain_name)})." + step
  end
  #puts step
  exec_command("setStep", {"step" => step})
  i = 0
  while (i < 500)
    sleep(0.1)
    i+=1
    check_done = exec_command("doneStep")
    done = "true".eql?(check_done)
    
    error = check_done.index("error:") == 0
    return if done
            if (error)
      raise check_done
            end        
  end      
end

# File sahi.rb, line 292
def expect_confirm(message, input)
  execute_step("_sahi._expectConfirm(#{Utils.quoted(message) }, #{input})")
end

# File sahi.rb, line 307
def expect_prompt(message, input)
  execute_step("_sahi._expectPrompt(#{Utils.quoted(message)}, #{Utils.quoted(input) })")
end

# File sahi.rb, line 179
    def fetch(expression) 
key = "___lastValue___" + Time.now.getutc.to_s;
execute_step("_sahi.setServerVarPlain('"+key+"', " + expression + ")")
return check_nil(exec_command("getVariable", {"key" => key}))
    end

# File sahi.rb, line 186
def fetch_boolean(expression)
  return fetch(expression) == "true"
end

# File sahi.rb, line 358
def firefox?()
  return fetch_boolean("_sahi._isFF()")
end

# File sahi.rb, line 353
def ie?()
  return fetch_boolean("_sahi._isIE()")
end

# File sahi.rb, line 108
def is_ready?
  return  "true".eql?(exec_command("isReady"))
end

# File sahi.rb, line 272
def last_alert()
  return fetch("_sahi._lastAlert()")
end

# File sahi.rb, line 282
def last_confirm()
  return fetch("_sahi._lastConfirm()")
end

# File sahi.rb, line 312
def last_downloaded_filename()
  return fetch("_sahi._lastDownloadedFileName()")
end

# File sahi.rb, line 297
def last_prompt()
  return fetch("_sahi._lastPrompt()")
end

# File sahi.rb, line 174
def method_missing(m, *args, &block)  
  return ElementStub.new(self, m.to_s, args)
end

# File sahi.rb, line 122
def navigate_to(url, force_reload=false)
  execute_step("_sahi._navigateTo(\"" + url + "\", "+ (force_reload.to_s()) +")");
end

# File sahi.rb, line 90
def open()
  check_proxy()
  @sahisid = Time.now.to_f
  start_url = "http://sahi.example.com/_s_/dyn/Driver_initialized"
  if (@browser_type != null)
    exec_command("launchPreconfiguredBrowser", {"browserType" => @browser_type, "startUrl" => start_url})
  else
    exec_command("launchAndPlayback", {"browser" => @browser, "browserOptions" => @browser_options, "browserExecutable" => @browser_executable, "startUrl" => start_url})
  end
  
  i = 0
  while (i < 500)
    i+=1
    break if is_ready?
    sleep(0.1)
  end
end

# File sahi.rb, line 373
def opera?()
  return fetch_boolean("_sahi._isOpera()")
end

# File sahi.rb, line 230
def popup(name)
  if (@browser_type != null)
    win = Browser.new(@browser_type)
  else
    win = Browser.new(@browser_path, @browser_options, @browser_executable)
  end

  win.proxy_host = @proxy_host
  win.proxy_port = @proxy_port
  win.sahisid = @sahisid
  win.print_steps = @print_steps
  win.popup_name = name
  win.domain_name = @domain_name
  return win
end

# File sahi.rb, line 263
def popup?()
  return @popup_name != nil
end

# File sahi.rb, line 333
  def remove_url_mock(url_pattern) 
execute_step("_sahi._removeMock(#{Utils.quoted(url_pattern)})")
  end

# File sahi.rb, line 117
def response(url, qs={})
  return Net::HTTP.post_form(URI.parse(url), qs).body
end

# File sahi.rb, line 368
def safari?()
  return fetch_boolean("_sahi._isSafari()")
end

# File sahi.rb, line 322
def save_downloaded(file_path)
  execute_step("_sahi._saveDownloadedAs(#{Utils.quoted(file_path)})")
end

# File sahi.rb, line 344
def selection_text(win = nil)
  if(win != nil)
    return fetch("_sahi._getSelectionText(#{win.to_s()})")
  else
    return fetch("_sahi._getSelectionText()")
  end  
end

# File sahi.rb, line 219
def speed=(ms)
  exec_command("setSpeed", {"speed"=>ms})
end

# File sahi.rb, line 224
def strict_visibility_check=(check)
  execute_step("_sahi._setStrictVisibilityCheck(#{check})")
end

# File sahi.rb, line 338
def title()
  return fetch("_sahi._title()")
end

# File sahi.rb, line 379
def wait(timeout) 
  total = 0;
  interval = 0.2;
  
  if !block_given?
    sleep(timeout)
    return
  end
  
  while (total < timeout)
    sleep(interval);
    total += interval;
    begin 
      return if yield
    rescue Exception=>e 
      puts e
    end
  end          
end