require 'nano/object/assign_with'

require 'nitro/request'
require 'nitro/response'
require 'nitro/render'
require 'nitro/session'
require 'nitro/adapter/cgi.rb'

module Nitro
  
# Encapsulates an HTTP processing cycle context.
# Integrates the Request and the Response.

class Context
  include Request
  include Response
  include Render

  # The configuration parameters.

  attr_accessor :conf

  # The session contains variables that stay alive 
  # for the full user session. Session variables
  # should be generally avoided. This variable
  # becomes populated ONLY if needed.

  attr_reader :session

  # The dispatcher.

  attr_accessor :dispatcher

  def initialize(conf)
    @conf = conf
    @dispatcher = @conf.dispatcher
    @context = self

    # initialize response.
    
    @status = CgiUtils::STATUS_OK
    @response_headers = { 'Content-Type' => 'text/html' }

    # initialize the output buffer.

    @out = OutputBuffer.new
  end

  # Close the context, should be called at the 
  # end of the HTTP request handling code.

  def close
    @session.sync if @session
  end
  alias_method :finish, :close

  #--
  # FIXME: something more elegant/efficient.
  #++

  def out
    if @out == '(error)'
      @out = ''
      render '/error'
      @out
    else
      @out
    end
  end

  # Lazy lookup of the session to avoid costly cookie
  # lookup when not needed.

  def session
    @session || @session = Session.lookup(self)
  end

  # Populate an object from request parameters.
  # This is a truly dangerous method.
  
  EXCLUDED_PARAMETERS = %w{ oid name }

  def fill(obj, name = nil)
    # If an class is passed create an instance.
    obj = obj.new if obj.is_a?(Class)
  
    @params.each do |param, val|
      begin
        # gmosx: DO NOT escape by default !!!
        if not EXCLUDED_PARAMETERS.include?(param)
          if val.is_a? Hash
            obj.send("__force_hash_#{param}", val)
          else
            obj.send("__force_#{param}", val)
          end
        end
      rescue NameError => ex
        next
      end
    end

    return obj
  end    
  alias_method :populate, :fill
  alias_method :assign, :fill  
end

end

# * George Moschovitis <gm@navel.gr>