require 'forwardable'

require 'facet/kernel/assign_with'

require 'nitro/cgi'
require 'nitro/cgi/request'
require 'nitro/cgi/response'
require 'nitro/render'
require 'nitro/session'

module Nitro
  
# Encapsulates an HTTP processing cycle context. Integrates the 
# HTTP Request, the HTTP Response and the Render used to 
# generate the response body.
# 
# The Context object can be accessed by the context, request or 
# response aliases. You can use the alias that makes sense 
# every time.

class Context
  include Request
  include Response
  include Render

  # The cache/store used to back global variables.
  
  setting :global_cache_class, :default => ($NITRO_GLOBAL_CACHE_CLASS || MemoryCache), :doc => 'The store used to back global variables'

  # 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 = Http::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
    if @session
      # Ugly hack: need to use AOP instead
      if @session.has_key?(:FLASH)
        @session[:FLASH].clean
      end
      
      # INVESTIGATE: is this needed?      
      @session.sync 
    end
  end
  alias_method :finish, :close

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

  def out
    return @out if @out == ''
    if @rendering_errors
      @out = ''
      render '/error'
    end
    @out
  end

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

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

  # Access global variables. In a distributed server scenario,
  # these variables can reside outside of the process.
  
  def global
    return $global
  end
  alias_method :application, :global

  # Lookup the controller for this request.
  #--
  # FIXME: improve this! BUGGY
  #++

  def controller
    @dispatcher.controllers[@base || '/'] 
  end

  # Automagically populate an object from request parameters.
  # This is a truly dangerous method.
  #
  # === Options
  #
  # * name
  # * force_boolean
  #
  # === Example
  #
  # request.fill(User.new)
  #
  # Prefer to use the following form:
  #
  # User.new.assign_with(request)
  
  def fill(obj, options = {})
    Property.populate_object(obj, @params, options)
  end
  alias_method :populate, :fill
  alias_method :assign, :fill  
  
end

# Forwards to the context
# 
# use in Nitro::Action

module ContextHelper
  extend Forwardable

  attr_accessor :context

  def_delegators :@context, :controller, :request, :response, :session, :out
end

end

# * George Moschovitis <gm@navel.gr>