camping 1.2 → 1.3

data/lib/camping-unabridged.rb

@@ -1,10 +1,40 @@
-%w[rubygems active_record markaby metaid ostruct tempfile].each { |lib| require lib }
+# == About camping.rb
+#
+# Camping comes with two versions of its source code.  The code contained in
+# lib/camping.rb is compressed, stripped of whitespace, using compact algorithms
+# to keep it tight.  The unspoken rule is that camping.rb should be flowed with
+# no more than 80 characters per line and must not exceed four kilobytes.
+#
+# On the other hand, lib/camping-unabridged.rb contains the same code, laid out
+# nicely with piles of documentation everywhere.  This documentation is entirely
+# generated from lib/camping-unabridged.rb using RDoc and our "flipbook" template
+# found in the extras directory of any camping distribution.
+#
+# == Requirements
+#
+# Camping requires at least Ruby 1.8.2.
+#
+# Camping depends on the following libraries.  If you install through RubyGems,
+# these will be automatically installed for you.
+#
+# * ActiveRecord, used in your models.
+#   ActiveRecord is an object-to-relational database mapper with adapters
+#   for SQLite3, MySQL, PostgreSQL, SQL Server and more.
+# * Markaby, used in your views to describe HTML in plain Ruby.
+# * MetAid, a few metaprogramming methods which Camping uses.
+# * Tempfile, for storing file uploads.
+#
+# Camping also works well with Mongrel, the swift Ruby web server.
+# http://rubyforge.org/projects/mongrel  Mongrel comes with examples
+# in its <tt>examples/camping</tt> directory. 
+#
+%w[rubygems active_record markaby metaid tempfile].each { |lib| require lib }
 
 # == Camping 
 #
 # The camping module contains three modules for separating your application:
 #
-# * Camping::Models for storing classes derived from ActiveRecord::Base.
+# * Camping::Models for your database interaction classes, all derived from ActiveRecord::Base.
 # * Camping::Controllers for storing controller classes, which map URLs to code.
 # * Camping::Views for storing methods which generate HTML.
 #
@@ -20,9 +50,11 @@
 # in motion.
 #
 #   if __FILE__ == $0
-#     Camping::Models::Base.establish_connection :adapter => 'sqlite3', :database => 'blog3.db'
+#     Camping::Models::Base.establish_connection :adapter => 'sqlite3',
+#         :database => 'blog3.db'
 #     Camping::Models::Base.logger = Logger.new('camping.log')
-#     Camping.run
+#     Camping.create if Camping.respond_to? :create
+#     puts Camping.run
 #   end
 #
 # In the postamble, your job is to setup Camping::Models::Base (see: ActiveRecord::Base) 
@@ -32,11 +64,83 @@
 #
 # For other configurations, see 
 # http://code.whytheluckystiff.net/camping/wiki/PostAmbles
+#
+# == The <tt>create</tt> method
+#
+# Many postambles will check for your application's <tt>create</tt> method and will run it
+# when the web server starts up.  This is a good place to check for database tables and create
+# those tables to save users of your application from needing to manually set them up.
+#
+#   def Blog.create
+#     unless Blog::Models::Post.table_exists?
+#       ActiveRecord::Schema.define do
+#         create_table :blog_posts, :force => true do |t|
+#           t.column :id,       :integer, :null => false
+#           t.column :user_id,  :integer, :null => false
+#           t.column :title,    :string,  :limit => 255
+#           t.column :body,     :text
+#         end
+#       end
+#     end
+#   end 
+#
+# For more tips, see http://code.whytheluckystiff.net/camping/wiki/GiveUsTheCreateMethod.
 module Camping
   C = self
-  S = File.read(__FILE__).gsub(/_{2}FILE_{2}/,__FILE__.dump)
+  F = __FILE__
+  S = IO.read(F).gsub(/_+FILE_+/,F.dump)
+
+  # An object-like Hash, based on ActiveSupport's HashWithIndifferentAccess.
+  # All Camping query string and cookie variables are loaded as this.
+  # 
+  # To access the query string, for instance, use the <tt>@input</tt> variable.
+  #
+  #   module Blog::Models
+  #     class Index < R '/'
+  #       def get
+  #         if page = @input.page.to_i > 0
+  #           page -= 1
+  #         end
+  #         @posts = Post.find :all, :offset => page * 20, :limit => 20
+  #         render :index
+  #       end
+  #     end
+  #   end
+  #
+  # In the above example if you visit <tt>/?page=2</tt>, you'll get the second
+  # page of twenty posts.  You can also use <tt>@input[:page]</tt> or <tt>@input['page']</tt>
+  # to get the value for the <tt>page</tt> query variable.
+  #
+  # Use the <tt>@cookies</tt> variable in the same fashion to access cookie variables.
+  class H < HashWithIndifferentAccess
+    def method_missing(m,*a)
+        if m.to_s =~ /=$/
+            self[$`] = a[0]
+        elsif a.empty?
+            self[m]
+        else
+            raise NoMethodError, "#{m}"
+        end
+    end
+  end
 
-  # Helpers contains methods available in your controllers and views.
+  # Helpers contains methods available in your controllers and views.  You may add
+  # methods of your own to this module, including many helper methods from Rails.
+  # This is analogous to Rails' <tt>ApplicationHelper</tt> module.
+  #
+  # == Using ActionPack Helpers
+  #
+  # If you'd like to include helpers from Rails' modules, you'll need to look up the
+  # helper module in the Rails documentation at http://api.rubyonrails.org/.
+  #
+  # For example, if you look up the <tt>ActionView::Helpers::FormHelper</tt> class,
+  # you'll find that it's loaded from the <tt>action_view/helpers/form_helper.rb</tt>
+  # file.  You'll need to have the ActionPack gem installed for this to work.
+  #
+  #   require 'action_view/helpers/form_helper.rb'
+  #
+  #   # This example is unfinished.. soon..
+  #
   module Helpers
     # From inside your controllers and views, you will often need to figure out
     # the route used to get to a certain controller +c+.  Pass the controller class
@@ -62,8 +166,8 @@ module Camping
     # you will need to use <tt>/</tt> (the slash method above).
     def R(c,*args)
       p = /\(.+?\)/
-      args.inject(c.urls.detect{|x|x.scan(p).size==args.size}.dup){|str,a|
-        str.sub(p,(a.method(a.class.primary_key)[] rescue a).to_s)
+      args.inject(c.urls.find{|x|x.scan(p).size==args.size}.dup){|str,a|
+        str.sub(p,(a.__send__(a.class.primary_key) rescue a).to_s)
       }
     end
     # Shows AR validation errors for the object passed. 
@@ -150,7 +254,7 @@ module Camping
     #
     module Base
       include Helpers
-      attr_accessor :input, :cookies, :headers, :body, :status, :root
+      attr_accessor :input, :cookies, :env, :headers, :body, :status, :root
       # Display a view, calling it by its method name +m+.  If a <tt>layout</tt>
       # method is found in Camping::Views, it will be used to wrap the HTML.
       #
@@ -170,15 +274,15 @@ module Camping
       #
       #   module Camping::Controllers
       #     class Info
-      #       def get; code ENV.inspect end
+      #       def get; code @env.inspect end
       #     end
       #   end
       #
       # If you have a <tt>layout</tt> method in Camping::Views, it will be used to
       # wrap the HTML.
-      def method_missing(m, *args, &blk)
-        str = m==:render ? markaview(*args, &blk):eval("markaby.#{m}(*args, &blk)")
-        str = markaview(:layout) { str } rescue nil
+      def method_missing(m, *a, &b)
+        str = m==:render ? markaview(*a, &b):eval("markaby.#{m}(*a, &b)")
+        str = markaview(:layout) { str } if Views.method_defined? :layout
         r(200, str.to_s)
       end
 
@@ -209,10 +313,10 @@ module Camping
       def r(s, b, h = {}); @status = s; @headers.merge!(h); @body = b; end
 
       def service(r, e, m, a) #:nodoc:
-        @status, @headers, @root = 200, {}, e['SCRIPT_NAME']
-        cook = C.cookie_parse(e['HTTP_COOKIE'] || e['COOKIE'])
+        @status, @env, @headers, @root = 200, e, {'Content-Type'=>'text/html'}, e['SCRIPT_NAME']
+        cook = C.kp(e['HTTP_COOKIE'])
         qs = C.qs_parse(e['QUERY_STRING'])
-        if "POST" == m
+        if "post" == m
           inp = r.read(e['CONTENT_LENGTH'].to_i)
           if %r|\Amultipart/form-data.*boundary=\"?([^\";,]+)|n.match(e['CONTENT_TYPE'])
             b = "--#$1"
@@ -224,7 +328,7 @@ module Camping
               fn = fh[:name]
               if fh[:filename]
                 fh[:type]=$1 if h =~ /^Content-Type: (.+?)(\r\n|\Z)/m
-                fh[:tempfile]=Tempfile.new("#{C}").instance_eval {binmode;write v;rewind;self}
+                fh[:tempfile]=Tempfile.new("C").instance_eval {binmode;write v;rewind;self}
               else
                 fh=v
               end
@@ -234,24 +338,23 @@ module Camping
             qs.merge!(C.qs_parse(inp))
           end
         end
-        @cookies, @input = [cook, qs].map{|_|OpenStruct.new(_)}
+        @cookies, @input = cook.dup, qs.dup
 
-        @body = method( m.downcase ).call(*a)
-        @headers['Set-Cookie'] = @cookies.marshal_dump.map { |k,v| "#{k}=#{C.escape(v)}; path=/" if v != cook[k] }.compact
+        @body = send(m, *a) if respond_to? m
+        @headers['Set-Cookie'] = @cookies.map { |k,v| "#{k}=#{C.escape(v)}; path=#{self/"/"}" if v != cook[k] }.compact
         self
       end
       def to_s #:nodoc:
-        "Status: #{@status}\n#{{'Content-Type'=>'text/html'}.merge(@headers).map{|k,v|v.to_a.map{|v2|"#{k}: #{v2}"}}.flatten.join("\n")}\n\n#{@body}"
+        "Status: #{@status}\n#{@headers.map{|k,v|[*v].map{|x|"#{k}: #{x}"}*"\n"}*"\n"}\n\n#{@body}"
       end
-      private
-      def markaby
+      def markaby #:nodoc:
           Mab.new( instance_variables.map { |iv| 
-            [iv[1..-1], instance_variable_get(iv)] }, {} )
+            [iv[1..-1], instance_variable_get(iv)] } )
       end
-      def markaview(m, *args, &blk)
-        b=markaby
-        b.method(m).call(*args, &blk)
-        b.to_s
+      def markaview(m, *a, &b) #:nodoc:
+        h=markaby
+        h.send(m, *a, &b)
+        h.to_s
       end
     end
 
@@ -273,7 +376,7 @@ module Camping
     #     end
     #   end
     #
-    class NotFound; def get(p); r(404, div{h1("#{C} Problem!")+h2("#{p} not found")}); end end
+    class NotFound; def get(p); r(404, div{h1("Cam\ping Problem!")+h2("#{p} not found")}); end end
 
     # The ServerError class is a special controller class for handling many (but not all) 500 errors.
     # If there is a parse error in Camping or in your application's source code, it will not be caught
@@ -298,7 +401,7 @@ module Camping
     #     end
     #   end
     #
-    class ServerError; include Base; def get(k,m,e); r(500, markaby.div{ h1 "#{C} Problem!"; h2 "#{k}.#{m}"; h3 "#{e.class} #{e.message}:"; ul { e.backtrace.each { |bt| li bt } } }) end end
+    class ServerError; include Base; def get(k,m,e); r(500, Mab.new { h1 "Cam\ping Problem!"; h2 "#{k}.#{m}"; h3 "#{e.class} #{e.message}:"; ul { e.backtrace.each { |bt| li bt } } }.to_s) end end
 
     class << self
       # Add routes to a controller class by piling them into the R method.
@@ -320,7 +423,7 @@ module Camping
       #
       # Most of the time the rules inferred by dispatch method Controllers::D will get you
       # by just fine.
-      def R(*urls); Class.new(R) { meta_def(:inherited) { |c| c.meta_def(:urls) { urls } } }; end
+      def R(*urls); Class.new(R) { meta_def(:urls) { urls } }; end
 
       # Dispatch routes to controller classes.  Classes are searched in no particular order.
       # For each class, routes are checked for a match based on their order in the routing list
@@ -366,54 +469,71 @@ module Camping
     #
     def unescape(s); s.tr('+', ' ').gsub(/((?:%[0-9a-fA-F]{2})+)/n){[$1.delete('%')].pack('H*')} end
 
-    # Parses a query string into an OpenStruct object.
+    # Parses a query string into an Camping::H object.
     #
     #   input = Camping.qs_parse("name=Philarp+Tremain&hair=sandy+blonde")
     #   input.name
     #     #=> "Philarp Tremaine"
     #
-    def qs_parse(qs, d = '&;'); (qs||'').split(/[#{d}] */n).
-        inject({}){|hsh, p|k, v = p.split('=',2).map {|v| unescape(v)}; hsh[k] = v unless v.blank?; hsh} end
+    # Also parses out the Hash-like syntax used in PHP and Rails and builds
+    # nested hashes from it.
+    #
+    #   input = Camping.qs_parse("post[id]=1&post[user]=_why")
+    #     #=> {'post' => {'id' => '1', 'user' => '_why'}}
+    #
+    def qs_parse(qs, d = '&;')
+        m = proc {|_,o,n|o.merge(n,&m)rescue([*o]<<n)}
+        (qs||'').
+            split(/[#{d}] */n).
+            inject(H[]) { |h,p| k, v=unescape(p).split('=',2)
+                h.merge(k.split(/[\]\[]+/).reverse.
+                    inject(v) { |x,i| H[i,x] },&m)
+            } 
+    end
 
     # Parses a string of cookies from the <tt>Cookie</tt> header.
-    def cookie_parse(s); c = qs_parse(s, ';,'); end
+    def kp(s); c = qs_parse(s, ';,'); end
 
     # Fields a request through Camping.  For traditional CGI applications, the method can be
     # executed without arguments.
     #
     #   if __FILE__ == $0
-    #     Camping::Models::Base.establish_connection :adapter => 'sqlite3', :database => 'blog3.db'
+    #     Camping::Models::Base.establish_connection :adapter => 'sqlite3',
+    #         :database => 'blog3.db'
     #     Camping::Models::Base.logger = Logger.new('camping.log')
-    #     Camping.run
+    #     puts Camping.run
     #   end
     #
+    # The Camping controller returned from <tt>run</tt> has a <tt>to_s</tt> method in case you
+    # are running from CGI or want to output the full HTTP output.  In the above example, <tt>puts</tt>
+    # will call <tt>to_s</tt> for you.
+    #
     # For FastCGI and Webrick-loaded applications, you will need to use a request loop, with <tt>run</tt>
     # at the center, passing in the read +r+ and write +w+ streams.  You will also need to mimick or
-    # replace <tt>ENV</tt> as part of your wrapper.
+    # pass in the <tt>ENV</tt> replacement as part of your wrapper.
     #
     #   if __FILE__ == $0
     #     require 'fcgi'
-    #       Camping::Models::Base.establish_connection :adapter => 'sqlite3', :database => 'blog3.db'
+    #       Camping::Models::Base.establish_connection :adapter => 'sqlite3',
+    #           :database => 'blog3.db'
     #       Camping::Models::Base.logger = Logger.new('camping.log')
     #       FCGI.each do |req|
-    #         ENV.replace req.env
-    #         Camping.run req.in, req.out
+    #         req.out << Camping.run req.in, req.env
     #         req.finish
     #       end
     #     end
     #   end
     #
-    def run(r=$stdin,w=$stdout)
-      w <<
-        begin
-          k, a = Controllers.D "/#{ENV['PATH_INFO']}".gsub(%r!/+!,'/')
-          m = ENV['REQUEST_METHOD']||"GET"
-          k.class_eval { include C; include Controllers::Base; include Models }
-          o = k.new
-          o.service(r, ENV, m, a)
-        rescue => e
-          Controllers::ServerError.new.service(r, ENV, "GET", [k,m,e])
-        end
+    def run(r=$stdin)
+      begin
+        k, a = Controllers.D "/#{e['PATH_INFO']}".gsub(%r!/+!,'/')
+        m = e['REQUEST_METHOD']||"GET"
+        k.send :include, C, Controllers::Base, Models
+        o = k.new
+        o.service(r, e, m.downcase, a)
+      rescue => x
+        Controllers::ServerError.new.service(r, e, "get", [k,m,x])
+      end
     end
   end
 
@@ -442,7 +562,23 @@ module Camping
   #   end
   #
   # Models cannot be referred to in Views at this time.
-  module Models; end
+  module Models
+      A = ActiveRecord
+      # Base is an alias for ActiveRecord::Base.  The big warning I'm going to give you
+      # about this: *Base overloads table_name_prefix.*  This means that if you have a
+      # model class Blog::Models::Post, it's table name will be <tt>blog_posts</tt>.
+      Base = A::Base
+
+      # The default prefix for Camping model classes is the topmost module name lowercase
+      # and followed with an underscore.
+      #
+      #   Tepee::Models::Page.table_name_prefix
+      #     #=> "tepee_pages"
+      #
+      def Base.table_name_prefix
+          "#{name[/^(\w+)/,1]}_".downcase.sub(/^(#{A}|camping)_/i,'')
+      end
+  end
 
   # Views is an empty module for storing methods which create HTML.  The HTML is described
   # using the Markaby language.
@@ -451,8 +587,7 @@ module Camping
   #
   # If your Views module has a <tt>layout</tt> method defined, it will be called with a block
   # which will insert content from your view.
-  module Views; include Controllers; include Helpers end
-  Models::Base = ActiveRecord::Base
+  module Views; include Controllers, Helpers end
   
   # The Mab class wraps Markaby, allowing it to run methods from Camping::Views
   # and also to replace :href and :action attributes in tags by prefixing the root

data/lib/camping.rb

@@ -1,49 +1,53 @@
-%w[rubygems active_record markaby metaid ostruct tempfile].each{|l|require l}
-module Camping;C=self;S=File.read(__FILE__).gsub(/_{2}FILE_{2}/,__FILE__.dump)
-module Helpers;def R c,*args;p=/\(.+?\)/;args.inject(c.urls.detect{|x|x.scan(p
-).size==args.size}.dup){|str,a|str.sub(p,(a.method(a.class.primary_key)[]rescue
+%w[rubygems active_record markaby metaid tempfile].each{|l|require l}
+module Camping;C=self;F=__FILE__;S=IO.read(F).gsub(/_+FILE_+/,F.dump)
+module Helpers;def R c,*args;p=/\(.+?\)/;args.inject(c.urls.find{|x|x.scan(p
+).size==args.size}.dup){|str,a|str.sub(p,(a.__send__(a.class.primary_key)rescue
 a).to_s)};end;def / p;p[/^\//]?@root+p:p end;def errors_for(o);ul.errors{o.
 errors.each_full{|er|li er}}unless o.errors.empty?;end;end;module Controllers
-module Base; include Helpers;attr_accessor :input,:cookies,:headers,:body,
-:status,:root;def method_missing(m,*args,&blk);str=m==:render ? markaview(*args,
-&blk):eval("markaby.#{m}(*args,&blk)");str=markaview(:layout){str}rescue nil;r(
+module Base; include Helpers;attr_accessor :input,:cookies,:env,:headers,:body,
+:status,:root;def method_missing(m,*a,&b);str=m==:render ? markaview(*a,
+&b):eval("markaby.#{m}(*a,&b)");str=markaview(:layout){str} if Views.method_defined? :layout;r(
 200,str.to_s);end;def r(s,b,h={});@status=s;@headers.merge!(h);@body=b;end;def 
 redirect(c,*args);c=R(c,*args)if c.respond_to?:urls;r(302,'','Location'=>self/c)
-end;def service(r,e,m,a)@status,@headers,@root=200,{},e['SCRIPT_NAME'];cook=C.kp(
-e['HTTP_COOKIE']);qs=C.qs_parse(e['QUERY_STRING']);if "POST"==m;inp=r.read(e[
+end;def service(r,e,m,a)@status,@env,@headers,@root=200,e,{'Content-Type'=>'text/html'},e['SCRIPT_NAME'];cook=C.kp(
+e['HTTP_COOKIE']);qs=C.qs_parse(e['QUERY_STRING']);if "post"==m;inp=r.read(e[
 'CONTENT_LENGTH'].to_i);if %r|\Amultipart/form-data.*boundary=\"?([^\";,]+)|n.
 match(e['CONTENT_TYPE']);b="--#$1";inp.split(/(?:\r?\n|\A)#{Regexp::quote(
 b)}(?:--)?\r\n/m).each{|pt|h,v=pt.split("\r\n\r\n",2);fh={};[:name,:filename].
 each{|x|fh[x]=$1 if h=~/^Content-Disposition: form-data;.*(?:\s#{x}="([^"]+)")\
 /m};fn=fh[:name];if fh[:filename];fh[:type]=$1 if h =~ /^Content-Type: (.+?)(\
-\r\n|\Z)/m;fh[:tempfile]=Tempfile.new("#{C}").instance_eval{binmode;write v
+\r\n|\Z)/m;fh[:tempfile]=Tempfile.new("C").instance_eval{binmode;write v
 rewind;self};else;fh=v;end;qs[fn]=fh if fn};else;qs.merge!(C.qs_parse(inp));end
-end;@cookies,@input=[cook,qs].map{|_|OpenStruct.new(_)};@body=method(m.downcase
-).call(*a);@headers["Set-Cookie"]=@cookies.marshal_dump.map{|k,v|"#{k}=#{C.
-escape(v)}; path=/" if v != cook[k]}.compact;self;end;def to_s;"Status: #{
-@status}\n#{{'Content-Type'=>'text/html'}.merge(@headers).map{|k,v|v.to_a.map{
-|v2|"#{k}: #{v2}"}}.flatten.join("\n")}\n\n#{@body}";end;def markaby;Mab.new(
-instance_variables.map{|iv|[iv[1..-1],instance_variable_get(iv)]},{});end;def 
-markaview(m,*args,&blk);b=markaby;b.method(m).call(*args, &blk);b.to_s
+end;@cookies, @input = cook.dup, qs.dup;@body=send(m,*a) if respond_to? m;@headers["Set-Cookie"]=@cookies.map{|k,v|"#{k}=#{C.
+escape(v)}; path=#{self/"/"}" if v != cook[k]}.compact;self;end;def to_s;"Status: #{
+@status}\n#{@headers.map{|k,v|[*v].map{
+|x|"#{k}: #{x}"}*"\n"}*"\n"}\n\n#{@body}";end;def markaby;Mab.new(
+instance_variables.map{|iv|[iv[1..-1],instance_variable_get(iv)]});end;def 
+markaview(m,*a,&b);h=markaby;h.send(m,*a,&b);h.to_s
 end;end;class R;include Base end;class 
-NotFound;def get(p);r(404,div{h1("#{C} Problem!")+h2("#{p} not found")});end
-end;class ServerError;include Base;def get(k,m,e);r(500,markaby.div{h1 "#{C} Problem!"
-h2 "#{k}.#{m}";h3 "#{e.class} #{e.message}:";ul{e.backtrace.each{|bt|li(bt)}}}
-)end end;class<<self;def R(*urls);Class.new(R){meta_def(:inherited){|c|c.
-meta_def(:urls){urls}}};end;def D(path);constants.inject(nil){|d,c|k=
+NotFound;def get(p);r(404,div{h1("Cam\ping Problem!")+h2("#{p} not found")});end
+end;class ServerError;include Base;def get(k,m,e);r(500,Mab.new{h1 "Cam\ping Problem!"
+h2 "#{k}.#{m}";h3 "#{e.class} #{e.message}:";ul{e.backtrace.each{|bt|li(bt)}}}.to_s
+)end end;class<<self;def R(*urls);Class.new(R){meta_def(:urls){urls}};end;def 
+D(path);constants.inject(nil){|d,c|k=
 const_get(c);k.meta_def(:urls){["/#{c.downcase}"]}if !(k<R);d||([k, $~[1..-1]
 ] if k.urls.find { |x| path =~ /^#{x}\/?$/ })}||[NotFound, [path]];end end end
 class<<self;def goes m;eval(S.gsub(/Camping/,m.to_s),TOPLEVEL_BINDING)end;def 
 escape s;s.to_s.gsub(/([^ a-zA-Z0-9_.-]+)/n){'%'+$1.unpack('H2'*$1.size).join(
 '%').upcase}.tr(' ','+') end;def unescape(s);s.tr('+', ' ').gsub(/((?:%[0-9a-f\
-A-F]{2})+)/n){[$1.delete('%')].pack('H*')} end;def qs_parse(qs,d ='&;');(qs||''
-).split(/[#{d}] */n).inject({}){|hsh, p|k,v=p.split('=',2).map{|v|unescape(v)}
-hsh[k]=v unless v.blank?;hsh} end; def kp(s);c=qs_parse(s,';,') end
-def run(r=$stdin,w=$stdout);w<<begin;k,a=Controllers.D "/#{ENV['PATH_INFO']}".
-gsub(%r!/+!,'/');m=ENV['REQUEST_METHOD']||"GET";k.class_eval{include C
-include Controllers::Base;include Models};o=k.new;o.service(r,ENV,m,a);rescue\
-=>e;Controllers::ServerError.new.service(r,ENV,"GET",[k,m,e]);end;end;end
-module Views; include Controllers; include Helpers end;module Models;end
-Models::Base=ActiveRecord::Base;class Mab<Markaby::Builder;include Views
+A-F]{2})+)/n){[$1.delete('%')].pack('H*')} end;def qs_parse qs,d='&;';m=proc{
+|_,o,n|o.merge(n,&m)rescue([*o]<<n)};qs.to_s.split(/[#{d}] */n).inject(H[]){
+|h,p|k,v=unescape(p).split('=',2);h.merge(k.split(/[\]\[]+/).reverse.inject(v){
+|x,i|H[i,x]},&m)}end;def kp(s);c=qs_parse(s,';,');end
+def run(r=$stdin,e=ENV);begin;k,a=Controllers.D "/#{e['PATH_INFO']}".
+gsub(%r!/+!,'/');m=e['REQUEST_METHOD']||"GET";k.send :include,C,Controllers::Base,
+Models;o=k.new;o.service(r,e,m.downcase,a);rescue\
+=>x;Controllers::ServerError.new.service(r,e,"get",[k,m,x]);end;end;end
+module Views; include Controllers,Helpers end;module Models
+A=ActiveRecord;Base=A::Base;def Base.table_name_prefix;"#{name[/^(\w+)/,1]}_".
+downcase.sub(/^(#{A}|camping)_/i,'');end;end
+class Mab<Markaby::Builder;include Views
 def tag!(*g,&b);h=g[-1];[:href,:action].each{|a|(h[a]=self/h[a])rescue 0}
-super;end;end;end
+super;end;end;class H<HashWithIndifferentAccess;def method_missing(m,*a)
+if m.to_s=~/=$/;self[$`]=a[0];elsif a.empty?;self[m];else;raise NoMethodError,
+"#{m}";end;end;end;end