liars 0.0.1

data/Rakefile

@@ -0,0 +1,69 @@
+require 'rake'
+require 'rake/clean'
+require 'rake/gempackagetask'
+require 'rake/rdoctask'
+require 'fileutils'
+include FileUtils
+
+NAME = "liars"
+VERS = "0.0.1"
+CLEAN.include ['**/.*.sw?', '*.gem', '.config']
+RDOC_OPTS = ['--quiet', '--title', "Camping, the Documentation",
+    "--opname", "index.html",
+    "--line-numbers", 
+    "--main", "README",
+    "--inline-source"]
+
+# platform = if ENV['HOME'] then "POSIX" elsif ENV['APPDATA'] then "MSWIN" end
+
+desc "将liars gem打包"
+task :default => [:package]
+task :package => [:clean]
+
+task :doc => [:before_doc, :rdoc, :after_doc]
+
+Rake::RDocTask.new do |rdoc|
+    rdoc.rdoc_dir = 'doc/rdoc'
+    rdoc.options += RDOC_OPTS
+    rdoc.template = "extras/flipbook_rdoc.rb"
+    rdoc.main = "README"
+    rdoc.title = "Liars文档"
+    rdoc.rdoc_files.add ['README', 'CHANGELOG','lib/*.rb']
+end
+
+spec =
+    Gem::Specification.new do |s|
+        s.name = NAME
+        s.version = VERS
+        s.platform = Gem::Platform::RUBY
+        s.has_rdoc = true
+        s.extra_rdoc_files = ["README", "CHANGELOG"]
+        s.rdoc_options += RDOC_OPTS + ['--exclude', '^(examples|extras)\/']
+        s.summary = "最小化的MVC框架"
+        s.description = s.summary
+        s.author = "luonet"
+        s.email = 'luonet@safore.com'
+        s.homepage = 'http://www.safore.com/'
+        s.executables = ['liars']
+
+        s.files = %w(CHANGELOG README Rakefile liars.rb) +
+          Dir.glob("{bin,doc,test,lib,extras}/**/*")
+        
+        s.require_path = "."
+	s.autorequire = 'liars'
+        s.bindir = "bin"
+    end
+
+Rake::GemPackageTask.new(spec) do |p|
+    p.need_tar = ENV['APPDATA'].nil?
+    p.gem_spec = spec
+end
+
+task :install do
+  sh %{rake package}
+  sh %{sudo gem install pkg/#{NAME}-#{VERS}}
+end
+
+task :uninstall => [:clean] do
+  sh %{sudo gem uninstall #{NAME}}
+end

data/bin/liars

@@ -0,0 +1,112 @@
+#!/usr/bin/env ruby
+require 'delegate'
+require 'optparse'
+require 'ostruct'
+
+require 'stringio'
+require 'yaml'
+require 'liars'
+
+conf = OpenStruct.new(:host => '0.0.0.0', :port => 2008, :db => Liars::DbEngine.db_name)
+
+if conf.rc and File.exists?( conf.rc )
+  YAML.load_file(conf.rc).each do |k,v|
+    conf.send("#{k}=", v)
+  end 
+end
+
+opts = OptionParser.new do |opts|
+  opts.banner = "用法: liars example.rb..."
+  opts.define_head "Liars, 超小型的Ruby MVC Web开发框架 Ruby #{RUBY_VERSION} (#{RUBY_RELEASE_DATE}) [#{RUBY_PLATFORM}]"
+  opts.separator ""
+  opts.separator " 选项列表:"
+
+  opts.on("-h", "--host HOSTNAME", "Web服务器绑定地址(默认为#{conf.host})") { |conf.host| }
+  opts.on("-p", "--port NUM", "Web服务器绑定端口(默认为#{conf.port})") { |conf.port| }
+  opts.on("-d", "--database FILE", "数据库文件(默认为#{conf.db})") { |conf.db| }
+  opts.on("-c", "--console", "运行在irb模式") { conf.server = :console }
+  opts.on("-s", "--scaffold FILE", "快速创建一个模板") do |conf.scaffold|
+    conf.scaffold =~ /^(\w+)(\.rb)?$/
+    File.open("#{Dir.pwd}/#{$1}.rb", 'w') do |f|
+      class_name = $1.singularize.camelize
+      f.puts <<-EOF
+module Liars
+  # Model ======================================================================
+  class #{class_name} < M
+  end
+
+  # Controller =================================================================
+  class #{class_name}C < C
+    route_of :index, '/'
+    def index
+      render
+    end
+  end
+
+  # View =======================================================================
+  class #{class_name}V < V
+    def layout
+      html do
+    	head { title 'Liars never tell lies!' }
+    	body do
+          yield
+    	end
+      end
+    end  
+    
+    def index
+      h1 { a '#{class_name}', :href => "/" }
+    end
+  end
+end
+      EOF
+    end
+    puts "模板文件#{$1}.rb创建成功"
+    exit
+  end
+
+  opts.separator ""
+  opts.separator "其他选项:"
+  
+  opts.on_tail("-?", "--help", "显示帮助信息") do
+    puts opts
+    exit
+  end
+  
+  opts.on_tail("-v", "--version", "显示版本信息") do
+    class << Gem; attr_accessor :loaded_specs; end
+    puts Gem.loaded_specs['liars'].version
+    exit
+  end
+end
+
+opts.parse! ARGV
+if ARGV.length < 1
+  puts opts
+  exit
+else
+  ARGV.each {|f| require "#{Dir.pwd}/#{f}" }
+end
+
+if conf.server == :console
+  ARGV.clear
+  require 'irb' 
+  require 'irb/completion' 
+  ENV['IRBRC'] = ".irbrc" if File.exists? ".irbrc"
+  IRB.start 
+else
+  # 建立数据库
+  Liars::DbEngine.db_name = conf.db
+  Liars::DbEngine.create_db
+
+  # Mount the root
+  s = WEBrick::HTTPServer.new(:BindAddress => conf.host, :Port => conf.port)
+  s.mount "/", Liars::LiarsHandler, Liars::C
+
+  # Server up
+  trap(:INT) do
+    s.shutdown
+    Liars::DbEngine.write_db
+  end
+  s.start
+end

data/extras/flipbook_rdoc.rb

@@ -0,0 +1,491 @@
+CAMPING_EXTRAS_DIR = File.expand_path(File.dirname(__FILE__))
+
+module Generators
+class HTMLGenerator
+    def generate_html
+      @files_and_classes = {
+        'allfiles'     => gen_into_index(@files),
+        'allclasses'   => gen_into_index(@classes),
+        "initial_page" => main_url,
+        'realtitle'    => CGI.escapeHTML(@options.title),
+        'charset'      => @options.charset
+      }
+
+      # the individual descriptions for files and classes
+      gen_into(@files)
+      gen_into(@classes)
+      gen_main_index
+      
+      # this method is defined in the template file
+      write_extra_pages if defined? write_extra_pages
+    end
+
+    def gen_into(list)
+      hsh = @files_and_classes.dup
+      list.each do |item|
+        if item.document_self
+          op_file = item.path
+          hsh['root'] = item.path.split("/").map { ".." }[1..-1].join("/")
+          item.instance_variable_set("@values", hsh)
+          File.makedirs(File.dirname(op_file))
+          File.open(op_file, "w") { |file| item.write_on(file) }
+        end
+      end
+    end
+
+    def gen_into_index(list)
+      res = []
+      list.each do |item|
+        hsh = item.value_hash
+        hsh['href'] = item.path
+        hsh['name'] = item.index_name
+        res << hsh
+      end
+      res
+    end
+
+    def gen_main_index
+      template = TemplatePage.new(RDoc::Page::INDEX)
+      File.open("index.html", "w") do |f|
+        values = @files_and_classes.dup
+        if @options.inline_source
+          values['inline_source'] = true
+        end
+        template.write_html_on(f, values)
+      end
+      ['Camping.gif', 'permalink.gif'].each do |img|
+          ipath = File.join(CAMPING_EXTRAS_DIR, img)
+          File.copy(ipath, img)
+      end
+    end
+end
+end
+
+
+module RDoc
+module Page
+######################################################################
+#
+# The following is used for the -1 option
+#
+
+FONTS = "verdana,arial,'Bitstream Vera Sans',helvetica,sans-serif"
+
+STYLE = %{
+    body, th, td {
+        font: normal 14px verdana,arial,'Bitstream Vera Sans',helvetica,sans-serif;
+        line-height: 160%;
+        padding: 0; margin: 0;
+        margin-bottom: 30px;
+        /* background-color: #402; */
+        background-color: #694;
+    }
+    h1, h2, h3, h4 {
+        font-family: Utopia, Georgia, serif;
+        font-weight: bold;
+        letter-spacing: -0.018em;
+    }
+    h1 { font-size: 24px; margin: .15em 1em 0 0 }
+    h2 { font-size: 24px }
+    h3 { font-size: 19px }
+    h4 { font-size: 17px; font-weight: normal; }
+    h4.ruled { border-bottom: solid 1px #CC9; }
+    h2.ruled { padding-top: 35px; border-top: solid 1px #AA5; }
+
+    /* Link styles */
+    :link, :visited {
+        color: #00b;
+    }
+    :link:hover, :visited:hover {
+        background-color: #eee;
+        color: #B22;
+    }
+    #fullpage {
+        width: 720px;
+        margin: 0 auto;
+    }
+    .page_shade, .page {
+        padding: 0px 5px 5px 0px;
+        background-color: #fcfcf9;
+        border: solid 1px #983;
+    }
+    .page {
+        margin-left: -5px;
+        margin-top: -5px;
+        padding: 20px 35px;
+    }
+    .page .header {
+        float: right;
+        color: #777;
+        font-size: 10px;
+    }
+    .page h1, .page h2, .page h3 {
+        clear: both;
+        text-align: center;
+    }
+    #pager {
+        padding: 10px 4px;
+        color: white;
+        font-size: 11px;
+    }
+    #pager :link, #pager :visited {
+        color: #bfb;
+        padding: 0px 5px;
+    }
+    #pager :link:hover, #pager :visited:hover {
+        background-color: #262;
+        color: white;
+    }
+    #logo { float: left; }
+    #menu { background-color: #dfa; padding: 4px 12px; margin: 0; }
+    #menu h3 { padding: 0; margin: 0; }
+    #menu #links { float: right; }
+    pre { font-weight: bold; color: #730; }
+    tt { color: #703; font-size: 12pt; }
+    .dyn-source { background-color: #775915; padding: 4px 8px; margin: 0; display: none; }
+    .dyn-source pre  { color: #DDDDDD; font-size: 8pt; }
+    .source-link     { text-align: right; font-size: 8pt; }
+    .ruby-comment    { color: green; font-style: italic }
+    .ruby-constant   { color: #CCDDFF; font-weight: bold; }
+    .ruby-identifier { color: #CCCCCC;  }
+    .ruby-ivar       { color: #BBCCFF; }
+    .ruby-keyword    { color: #EEEEFF; font-weight: bold }
+    .ruby-node       { color: #FFFFFF; }
+    .ruby-operator   { color: #CCCCCC;  }
+    .ruby-regexp     { color: #DDFFDD; }
+    .ruby-value      { color: #FFAAAA; font-style: italic }
+    .kw { color: #DDDDFF; font-weight: bold }
+    .cmt { color: #CCFFCC; font-style: italic }
+    .str { color: #EECCCC; font-style: italic }
+    .re  { color: #EECCCC; }
+}
+
+CONTENTS_XML = %{
+IF:description
+%description%
+ENDIF:description
+
+IF:requires
+<h4>Requires:</h4>
+<ul>
+START:requires
+IF:aref
+<li><a href="%aref%">%name%</a></li>
+ENDIF:aref
+IFNOT:aref
+<li>%name%</li>
+ENDIF:aref 
+END:requires
+</ul>
+ENDIF:requires
+
+IF:attributes
+<h4>Attributes</h4>
+<table>
+START:attributes
+<tr><td>%name%</td><td>%rw%</td><td>%a_desc%</td></tr>
+END:attributes
+</table>
+ENDIF:attributes
+
+IF:includes
+<h4>Includes</h4>
+<ul>
+START:includes
+IF:aref
+<li><a href="%aref%">%name%</a></li>
+ENDIF:aref
+IFNOT:aref
+<li>%name%</li>
+ENDIF:aref 
+END:includes
+</ul>
+ENDIF:includes
+
+START:sections
+IF:method_list
+<h2 class="ruled">Methods</h2>
+START:method_list
+IF:methods
+START:methods
+<h4 class="ruled">%type% %category% method: 
+IF:callseq
+<strong><a name="%aref%">%callseq%</a></strong> <a href="#%aref%"><img src="%root%/permalink.gif" border="0" title="Permalink to %callseq%" /></a>
+ENDIF:callseq
+IFNOT:callseq
+<strong><a name="%aref%">%name%%params%</a></strong> <a href="#%aref%"><img src="%root%/permalink.gif" border="0" title="Permalink to %type% %category% method: %name%" /></a></h4>
+ENDIF:callseq
+
+IF:m_desc
+%m_desc%
+ENDIF:m_desc
+
+IF:sourcecode
+<div class="sourcecode">
+  <p class="source-link">[ <a href="javascript:toggleSource('%aref%_source')" id="l_%aref%_source">show source</a> ]</p>
+  <div id="%aref%_source" class="dyn-source">
+<pre>
+%sourcecode%
+</pre>
+  </div>
+</div>
+ENDIF:sourcecode
+END:methods
+ENDIF:methods
+END:method_list
+ENDIF:method_list
+END:sections
+}
+
+############################################################################
+
+
+BODY = %{
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
+<html>
+<head>
+  <title>
+IF:title
+  %realtitle% &raquo; %title%
+ENDIF:title
+IFNOT:title
+  %realtitle%
+ENDIF:title
+  </title>
+  <meta http-equiv="Content-Type" content="text/html; charset=%charset%" />
+  <link rel="stylesheet" href="%style_url%" type="text/css" media="screen" />
+    <script language="JavaScript" type="text/javascript">
+    // <![CDATA[
+
+    function toggleSource( id )
+    {
+    var elem
+    var link
+
+    if( document.getElementById )
+    {
+    elem = document.getElementById( id )
+    link = document.getElementById( "l_" + id )
+    }
+    else if ( document.all )
+    {
+    elem = eval( "document.all." + id )
+    link = eval( "document.all.l_" + id )
+    }
+    else
+    return false;
+
+    if( elem.style.display == "block" )
+    {
+    elem.style.display = "none"
+    link.innerHTML = "show source"
+    }
+    else
+    {
+    elem.style.display = "block"
+    link.innerHTML = "hide source"
+    }
+    }
+
+    function openCode( url )
+    {
+    window.open( url, "SOURCE_CODE", "width=400,height=400,scrollbars=yes" )
+    }
+    // ]]>
+    </script>
+</head>
+<body>
+<div id="menu">
+<div id="links">
+    <a href="http://redhanded.hobix.com/bits/campingAMicroframework.html">backstory</a> |
+    <a href="http://code.whytheluckystiff.net/camping/">wiki</a> |
+    <a href="http://code.whytheluckystiff.net/camping/newticket">bugs</a> |
+    <a href="http://code.whytheluckystiff.net/svn/camping/">svn</a>
+</div>
+<h3 class="title">%title%</h3>
+</div>
+<div id="fullpage">
+<div id="logo"><img src="%root%/Camping.gif" /></div>
+<div id="pager">
+<strong>Files:</strong>
+START:allfiles
+<a href="%root%/%href%" value="%title%">%name%</a>
+END:allfiles
+IF:allclasses
+|
+<strong>classes:</strong>
+START:allclasses
+<a href="%root%/%href%" title="%title%">%name%</a>
+END:allclasses
+ENDIF:allclasses
+</ul>
+</div>
+
+    !INCLUDE!
+
+</div>
+</body>
+</html>
+}
+
+###############################################################################
+
+FILE_PAGE = <<_FILE_PAGE_
+<div id="%full_path%" class="page_shade">
+<div class="page">
+<div class="header">
+  <div class="path">%full_path% / %dtm_modified%</div>
+</div>
+#{CONTENTS_XML}
+</div>
+</div>
+_FILE_PAGE_
+
+###################################################################
+
+CLASS_PAGE = %{
+<div id="%full_name%" class="page_shade">
+<div class="page">
+IF:parent
+<h3>%classmod% %full_name% &lt; HREF:par_url:parent:</h3>
+ENDIF:parent
+IFNOT:parent
+<h3>%classmod% %full_name%</h3>
+ENDIF:parent
+
+IF:infiles
+(in files
+START:infiles
+HREF:full_path_url:full_path:
+END:infiles
+)
+ENDIF:infiles
+} + CONTENTS_XML + %{
+</div>
+</div>
+}
+
+###################################################################
+
+METHOD_LIST = %{
+IF:includes
+<div class="tablesubsubtitle">Included modules</div><br>
+<div class="name-list">
+START:includes
+    <span class="method-name">HREF:aref:name:</span>
+END:includes
+</div>
+ENDIF:includes
+
+IF:method_list
+START:method_list
+IF:methods
+<table cellpadding=5 width="100%">
+<tr><td class="tablesubtitle">%type% %category% methods</td></tr>
+</table>
+START:methods
+<table width="100%" cellspacing = 0 cellpadding=5 border=0>
+<tr><td class="methodtitle">
+<a name="%aref%">
+IF:callseq
+<b>%callseq%</b>
+ENDIF:callseq
+IFNOT:callseq
+ <b>%name%</b>%params%
+ENDIF:callseq
+IF:codeurl
+<a href="%codeurl%" target="source" class="srclink">src</a>
+ENDIF:codeurl
+</a></td></tr>
+</table>
+IF:m_desc
+<div class="description">
+%m_desc%
+</div>
+ENDIF:m_desc
+IF:aka
+<div class="aka">
+This method is also aliased as
+START:aka
+<a href="%aref%">%name%</a>
+END:aka
+</div>
+ENDIF:aka
+IF:sourcecode
+<div class="sourcecode">
+  <p class="source-link">[ <a href="javascript:toggleSource('%aref%_source')" id="l_%aref%_source">show source</a> ]</p>
+  <div id="%aref%_source" class="dyn-source">
+<pre>
+%sourcecode%
+</pre>
+  </div>
+</div>
+ENDIF:sourcecode
+END:methods
+ENDIF:methods
+END:method_list
+ENDIF:method_list
+}
+
+
+########################## Index ################################
+
+FR_INDEX_BODY = %{
+!INCLUDE!
+}
+
+FILE_INDEX = %{
+<html>
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=%charset%">
+<style>
+<!--
+  body {
+background-color: #ddddff;
+     font-family: #{FONTS}; 
+       font-size: 11px; 
+      font-style: normal;
+     line-height: 14px; 
+           color: #000040;
+  }
+div.banner {
+  background: #0000aa;
+  color:      white;
+  padding: 1;
+  margin: 0;
+  font-size: 90%;
+  font-weight: bold;
+  line-height: 1.1;
+  text-align: center;
+  width: 100%;
+}
+  
+-->
+</style>
+<base target="docwin">
+</head>
+<body>
+<div class="banner">%list_title%</div>
+START:entries
+<a href="%href%">%name%</a><br>
+END:entries
+</body></html>
+}
+
+CLASS_INDEX = FILE_INDEX
+METHOD_INDEX = FILE_INDEX
+
+INDEX = %{
+<HTML>
+<HEAD>
+<META HTTP-EQUIV="refresh" content="0;URL=%initial_page%">
+<TITLE>%realtitle%</TITLE>
+</HEAD>
+<BODY>
+Click <a href="%initial_page%">here</a> to open the Camping docs.
+</BODY>
+</HTML>
+}
+
+end
+end

data/liars.rb

@@ -0,0 +1,8 @@
+require 'lib/core_ext'
+require 'lib/db'
+require 'lib/model'
+require 'lib/controller'
+require 'lib/view'
+require 'lib/model'
+require 'lib/server'
+require 'webrick/httpserver'

data/lib/controller.rb

@@ -0,0 +1,102 @@
+module Liars
+  class C
+    attr_accessor :body, :headers, :status, :params, :cookies
+
+    class << self
+      def inherited(child); (@@subclasses ||= []) << child;  end
+      def subclasses; @@subclasses; end
+
+      def run(r=$stdin, e=ENV)
+	route = e['PATH_INFO']
+	@@subclasses.each do |klass|
+	  action, args = klass.get_action_and_args(route)
+	  if action
+	    controller = klass.new(r, e, e['REQUEST_METHOD']||"GET") 
+	    return controller.send(action, *args) && controller
+	  end
+	end
+      end
+
+      def route_of(action, *routes)
+	@@routes ||= {}
+	@@routes[action] = routes
+      end
+
+      # 实际上是返回一个action的名称和这个action所有可能用到的参数列表
+      # 如edit上映射的route是'/edit/(\d+)'，而实际访问的路径是'/edit/1'时
+      # 1将会被作为一个参数传给edit方法
+      def get_action_and_args(route)
+	@@routes.each do |action, action_routes|
+	  action_routes.find do |r| 
+	    match = Regexp.new("^#{r}$").match(route)
+	    return action, match[1..-1] if match
+	  end
+        end
+      end
+    end
+
+    def initialize(r, e, m)
+      @status, @method, @env, @headers, @root = 200, m.downcase, e, 
+	{'Content-Type'=>'text/html'}, e["SCRIPT_NAME"].sub(/\/$/,'')
+      @params = qsp(e["QUERY_STRING"])
+      @cookies = kp(e["HTTP_COOKIE"])
+      @params.merge!(qsp(r.read)) if @method == "post"
+    end
+
+    def redirect_to(url)
+      r(302,'','Location'=>url)
+    end
+
+    # A quick means of setting this controller's status, body and headers.
+    # Used internally by Camping, but... by all means...
+    #
+    #   r(302, '', 'Location' => self / "/view/12")
+    #
+    # Is equivalent to:
+    #
+    #   redirect "/view/12"
+    #
+    def r(s, b, h = {}); @status = s; @headers.merge!(h); @body = b; end 
+    # URL escapes a string.
+    #
+    #   Camping.escape("I'd go to the museum straightway!")  
+    #     #=> "I%27d+go+to+the+museum+straightway%21"
+    #
+    def escape(s); s.to_s.gsub(/[^ \w.-]+/n){'%'+($&.unpack('H2'*$&.size)*'%').upcase}.tr(' ', '+') end
+
+    # Unescapes a URL-encoded string.
+    #
+    #   Camping.un("I%27d+go+to+the+museum+straightway%21") 
+    #     #=> "I'd go to the museum straightway!"
+    #
+    def un(s); s.tr('+', ' ').gsub(/%([\da-f]{2})/in){[$1].pack('H*')} end
+
+    def qsp(qs, d='&;')
+      (qs || '').split(/[#{d}] */n).inject({}) do |h, p|
+	k, v = un(p).split('=', 2)
+	if (k = k.split(/[\]\[]+/)).length == 1
+	  h[k[0].to_sym] = v
+	else
+	  (h[k[0].to_sym] ||= {})[k[1].to_sym] = v
+	end
+	h
+      end
+    end
+
+    def kp(s); qsp(s, ';,'); end 
+    
+    def render(action=(caller[0]=~/`(\w+)'/;$1))
+      # 查找当前controller对应的view，然后根据action来找到渲染方法
+      name = (self.class.to_s =~ /(\w+)(C|Controller)$/; $1)
+      view_class = eval("#{name}View") rescue eval("#{name}V")
+      view_instance = view_class.new
+      instance_variables.each do |iv|
+	view_instance.instance_variable_set(iv, instance_variable_get(iv))
+      end
+      render_result = view_instance.respond_to?(:layout) ?
+	view_instance.send(:layout, &view_instance.method(action)) :
+	view_instance.send(action)
+      @body = view_instance.stream || render_result
+    end
+  end
+end

data/lib/core_ext.rb

@@ -0,0 +1,45 @@
+class Array
+  def extract_options!
+    last.is_a?(Hash) ? pop : {}
+  end
+end
+
+class String
+  def singularize
+    case self
+    when /ies$/ then $` + "y"
+    when /s$/ then $`
+    else self.dup
+    end
+  end
+
+  def pluralize
+    case self
+    when /y$/ then $` + "ies"
+    when /s$/ then self + "es"
+    else self + "s"
+    end
+  end
+
+  def camelize
+    self.gsub(/\/(.?)/) { "::#{$1.upcase}" }.gsub(/(?:^|_)(.)/) { $1.upcase }
+  end
+
+  def underscore
+    self.gsub(/::/, '/').
+      gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
+      gsub(/([a-z\d])([A-Z])/,'\1_\2').
+      tr("-", "_").
+      downcase
+  end
+end
+
+class Symbol
+  %w[singularize pluralize camelize underscore].each do |change_type|
+    class_eval <<-EOF
+      def #{change_type}
+        self.to_s.#{change_type}.to_sym
+      end
+    EOF
+  end
+end

data/lib/db.rb

@@ -0,0 +1,120 @@
+require 'yaml'
+
+module Liars
+  # 暂定为这样的一个数据结构
+  # {
+  #   :User => {
+  #     :max_id => 2,
+  #     :records => [
+  #       { :id => 1, :name => 'luoxin', :roles_ids => [1,2] },
+  #       { :id => 2, :name => 'luonet', :roles_ids => [1] }
+  #     ]
+  #   },
+  #   :Role => {
+  #     :max_id => 2,
+  #     :records => [
+  #       { :id => 1, :name => 'admin' },
+  #       { :id => 2, :name => 'guest' }
+  #     ]
+  #   }
+  # }
+  #
+  class DbEngine
+    class << self
+      def all_models
+	@all_models ||= []
+      end
+
+      def db_name
+	@db_name || "db.yaml"
+      end
+
+      def db_name=(name)
+	@db_name = name
+      end
+      
+      def create_db
+	return if File.exists?(db_name)
+	data = all_models.inject({}) do |data_hash, model|
+	  data_hash[model.to_s.to_sym] = { :max_id=>0, :records=>[] }
+	  data_hash
+	end
+	write_db(data)
+      end
+      
+      def write_db(data=nil)
+	File.open(db_name, "w") {|f| YAML.dump((data || @db_data), f)}
+      end
+
+      def db_data
+	@db_data ||= YAML.load_file(db_name)
+      end
+
+      def records_of(klass)
+	db_data[klass.to_s.to_sym][:records]
+      end
+
+      def record_of(obj)
+	records_of(obj.class).find {|x| x[:id] == obj.id} if obj.id
+      end
+
+      def increase_max_id_of(klass)
+	db_data[klass.to_s.to_sym][:max_id] += 1
+      end
+
+      def find(klass, ids)
+	case ids
+	when [] then []
+	when :all then records_of(klass).collect {|r| klass.new(r)}
+	when Array then find_records(klass, ids).collect! {|r| klass.new(r)}
+	else find_records(klass, [ids]).collect! {|r| klass.new(r)}.first
+        end
+      end
+
+      def find_records(klass, ids)
+	records_of(klass).select {|x| ids.include? x[:id]}
+      end
+
+      def insert(obj)
+	records_of(obj.class) << obj.data
+	obj
+      end
+
+      def delete(obj)
+	records_of(obj.class).delete_if {|x| x[:id] == obj.id }
+      end
+
+      def update(obj)
+	record_of(obj).merge!(obj.data)
+	obj
+      end
+
+      def save(obj)
+	if obj.new?
+	  obj.instance_variable_set("@id", increase_max_id_of(obj.class)) 
+	  new_record = true
+	end
+	save_associations(obj)
+	new_record ? insert(obj) : update(obj)
+      end
+
+      def save_associations(obj)
+	obj.class.associations.each do |assoc|
+	  assoc_type, assoc_name = assoc
+	  save_has_many_associations(obj, assoc_name) if assoc_type == :has_many
+        end
+      end
+
+      def save_has_many_associations(obj, assoc_name)
+	assoc_objs = obj.instance_variable_get("@#{assoc_name}_obj") || []
+	assoc_ids = []
+	assoc_objs.each do |assoc_obj|
+	  assoc_obj.instance_variable_set("@#{obj.class.to_s.underscore.sub(/.*\//, '')}", obj.id)
+	  assoc_obj.save
+	  assoc_ids << assoc_obj.id
+	end
+	obj.instance_variable_set("@#{assoc_name}", assoc_ids)
+      end
+    end
+  end
+end

data/lib/example.rb

@@ -0,0 +1,190 @@
+module Liars
+  # Model ======================================================================
+  class Article < M
+    has_field :title
+    has_field :content
+    has_many :comments
+  end
+
+  class Comment < M
+    has_field :title
+    has_field :content
+    belongs_to :article
+  end
+
+  class ArticleC < C
+    route_of :index, '/', '/index', '/default'
+    def index
+      @articles = Article.find(:all)
+      render
+    end
+
+    route_of :show, '/show/(\d+)'
+    def show(id)
+      @article = Article.find(id.to_i)
+      render
+    end
+    
+    route_of :create, '/create'
+    def create
+      Article.create(params[:article])
+      redirect_to '/'
+    end
+
+    route_of :add_comment, '/add_comment/(\d+)'
+    def add_comment(id)
+      @article = Article.find(id.to_i)
+      @article.comments << Comment.create(params[:comment])
+      @article.save
+      redirect_to "/show/#{id}"
+    end
+    
+    route_of :style, '/styles.css'
+    def style
+      @headers["Content-Type"] = "text/css; charset=utf-8"
+      @body = %[
+  	  body {
+  	      font-family: Utopia, Georga, serif;
+  	  }
+  	  h1 {
+  	      background-color: #fef;
+  	      margin: 0; padding: 10px;
+  	  }
+  	  div {
+  	      padding: 10px;
+  	  }
+      ]
+    end 
+  end
+
+  class ArticleV < V
+    def layout
+      html do
+    	head do
+    	  title 'Liars never tell lies!'
+    	  link :rel => 'stylesheet', :type => 'text/css', 
+    	    :href => '/styles.css', :media => 'screen'
+    	end
+    	body do
+    	  h1 { a 'Articles', :href => "http://www.google.cn" }
+    	  div do
+    	    yield
+    	  end
+    	end
+      end
+    end  
+    
+    def index
+      h1 'Articles'
+      hr
+      @articles.each do |ar|
+	b ar.title
+	p ar.content
+	a 'show comments', :href=> "/show/#{ar.id}" 
+	hr
+      end
+      form :action=>'/create', :method=>'Post' do
+	input :type=>'text', :name=>'article[title]'; br
+	textarea '', :name=>'article[content]'; br
+	input :type=>'submit'
+      end
+    end
+
+    def show
+      h1 'Articles'
+      a 'index', :href=> "/" 
+      hr
+      b @article.title
+      p @article.content
+      h1 'Comments'
+      hr 
+      @article.comments.each do |c|
+	b c.title
+	p c.content
+      end
+      hr
+      form :action=> "/add_comment/#{@article.id}", :method=>'Post' do
+	input :type=>'text', :name=>'comment[title]'; br
+	textarea '', :name=>'comment[content]'; br
+	input :type=>'submit'
+      end
+    end
+  end
+
+  #  # Controller =================================================================
+  #  class BlogC < C
+  #    route_of :index, '/', '/index', '/default', '/home'
+  #    def index
+  #      @time = Time.now
+  #      render
+  #    end
+  #
+  #    route_of :edit, '/edit/(\d+)'
+  #    def edit(id)
+  #      @user = params[:user]
+  #      @people = [1,2,3,4]
+  #      render
+  #    end
+  #    
+  #    route_of :style, '/styles.css'
+  #    def style
+  #      @headers["Content-Type"] = "text/css; charset=utf-8"
+  #      @body = %[
+  #	  body {
+  #	      font-family: Utopia, Georga, serif;
+  #	  }
+  #	  h1 {
+  #	      background-color: #fef;
+  #	      margin: 0; padding: 10px;
+  #	  }
+  #	  div {
+  #	      padding: 10px;
+  #	  }
+  #      ]
+  #    end
+  #  end
+  #
+  #  # View =======================================================================
+  #  class BlogV < V
+  #    def layout
+  #      html do
+  #	head do
+  #	  title 'Liars never tell lies!'
+  #	  link :rel => 'stylesheet', :type => 'text/css', 
+  #	    :href => '/styles.css', :media => 'screen'
+  #	end
+  #	body do
+  #	  h1 { a 'blog', :href => "http://www.google.cn" }
+  #	  div do
+  #	    yield
+  #	  end
+  #	end
+  #      end
+  #    end 
+  #    
+  #    def index
+  #      form :action=>'/edit/3', :method=>'Post' do
+  #	label "name"
+  #	input :type=>:text, :name=>'user[name]'
+  #	label "age"
+  #	input :type=>:text, :name=>'user[age]'
+  #	input :type=>:submit
+  #      end
+  #    end
+  #
+  #    def edit
+  #      if @user
+  #	h1 "The user name is #{@user[:name]}"
+  #	h1 "The user age is #{@user[:age]}"
+  #      end
+  #      @people.each do |pl|
+  #	p "I am #{pl}"
+  #      end
+  #      input :type=>:text
+  #      div :class=>"luoxin" do
+  #	input :type=>:text
+  #	input :type=>:button, :value=>"luoxin"
+  #      end
+  #    end
+  #  end
+end

data/lib/model.rb

@@ -0,0 +1,99 @@
+module Liars
+  # 目前实现了has_many和belongs_to关系
+  # 如假设user和role是一对多的关系
+  # u = Liars::User.new(:name=>'luoxin')
+  # u.roles << Liars::Role.new(:name=>'admin')
+  # u.save 
+  # 则对象已自动建立了关联，以后可以通过u.roles和u.roles[0].user来访问关联对象
+  # 目前的实现存在着许多bug
+  # 首先，如果是通过给从属对象赋主对象值，保存从属对象时主对象不会有从对象的引用
+  # 比如role.user = u
+  # 调用role.save时user并不会保存，因此role上保存有user的引用但user上并没有role的引用
+  # 这里的一个解决方案是判断user是不是新对象，如果是新对象则不保存，如果不是新对象则仅保存关联关系
+  # 另外，通过user.roles << role加入role时，再调用role.user时并不会马上产生效果，这是因为<<还是常规的数组方法，
+  # 要实现立即的效果应该再定义一个Association类集成至数组但改变了其中很多方法的定义
+  class M
+    attr_reader :id
+
+    def initialize(fields={})
+      fields.each {|k, v| instance_variable_set("@#{k}", v)}
+    end
+
+    class << self
+      def inherited(child)
+	DbEngine.all_models << child
+      end
+
+      def fields
+	@fields ||= [:id]
+      end
+
+      def associations
+	(@associations ||= [])
+      end
+
+      def fields_and_associations
+	fields + associations.collect {|x| x[1]}
+      end
+
+      def create(fields={})
+	self.new(fields).save
+      end
+
+      def find(ids)
+	DbEngine.find(self, ids)
+      end
+
+      def has_field(name)
+	attr_accessor name
+	fields << name
+      end
+
+      def has_many(name)
+	class_name = name.singularize.camelize
+	associations << [:has_many, name]
+	class_eval <<-EOF
+          def #{name}
+            @#{name} ||= []
+            @#{name}_obj ||= DbEngine.find(#{class_name}, @#{name})
+          end
+          
+          def #{name}=(value)
+            @#{name}_obj = value
+          end
+	EOF
+      end
+
+      def belongs_to(name)
+	class_name = name.camelize
+	associations << [:belongs_to, name]
+	class_eval <<-EOF
+          def #{name}
+            @#{name}_obj ||= DbEngine.find(#{class_name}, @#{name})
+          end
+          
+          def #{name}=(value)
+            @#{name} = value.id
+            @#{name}_obj = value
+          end
+	EOF
+      end
+    end
+
+    def save
+      DbEngine.save(self)
+    end
+    
+    def new?
+      @id == nil
+    end
+
+    def data
+      self.class.fields_and_associations.inject({}) {|h, f| h[f] = instance_variable_get("@#{f}"); h}
+    end
+
+    def destroy
+      DbEngine.delete(self)
+    end
+  end
+end

data/lib/server.rb

@@ -0,0 +1,24 @@
+require 'webrick'
+require 'webrick/httpservlet/abstract.rb'
+
+module Liars
+  class LiarsHandler < WEBrick::HTTPServlet::DefaultFileHandler
+    def initialize(server, klass)
+      super(server, klass)
+      @klass = klass
+    end
+    # Handler for WEBrick requests (also aliased as do_POST).
+    def service(req, resp)
+      controller = @klass.run((req.body && StringIO.new(req.body)), req.meta_vars)
+      resp.body = controller.body.to_s
+      resp.status = controller.status
+      controller.headers.each do |k, v|
+	unless k =~ /^X-SENDFILE$/i
+	  [*v].each do |vi|
+	    resp[k] = vi
+	  end
+	end
+      end
+    end
+  end
+end

data/lib/view.rb

@@ -0,0 +1,28 @@
+module Liars
+  class V
+    attr_reader :stream
+    def tag(*args, &b)
+      @stream ||= ""
+      tag_name = args.shift
+      attrs = args.extract_options!
+      attrs = attrs.collect {|k,v| "#{k}=\"#{v}\""}.join(" ")
+      text = args[0]
+      if block_given? 
+	@stream += "<#{tag_name} #{attrs}>#{text}"
+	b.call
+	@stream += "</#{tag_name}>"
+      else
+	@stream += (text ? "<#{tag_name} #{attrs}>#{text}</#{tag_name}>" : "<#{tag_name} #{attrs}/>") 
+      end
+      @stream
+    end
+
+    %w[html body head title h1 h2 h3 form div p input table tr td tbody link a b span label hr br textarea].each do |tag_name|
+      class_eval <<-EOF
+        def #{tag_name}(*args, &b)
+          tag(*(args.unshift('#{tag_name}')), &b)
+        end
+      EOF
+    end
+  end
+end

metadata

@@ -0,0 +1,89 @@
+--- !ruby/object:Gem::Specification 
+name: liars
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- luonet
+autorequire: liars
+bindir: bin
+cert_chain: []
+
+date: 2010-03-16 00:00:00 +08:00
+default_executable: 
+dependencies: []
+
+description: !binary |
+  5pyA5bCP5YyW55qETVZD5qGG5p62
+
+email: luonet@safore.com
+executables: 
+- liars
+extensions: []
+
+extra_rdoc_files: 
+- README
+- CHANGELOG
+files: 
+- CHANGELOG
+- README
+- Rakefile
+- liars.rb
+- bin/liars
+- lib/server.rb
+- lib/controller.rb
+- lib/core_ext.rb
+- lib/view.rb
+- lib/example.rb
+- lib/db.rb
+- lib/model.rb
+- extras/flipbook_rdoc.rb
+has_rdoc: true
+homepage: http://www.safore.com/
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --quiet
+- --title
+- Camping, the Documentation
+- --opname
+- index.html
+- --line-numbers
+- --main
+- README
+- --inline-source
+- --exclude
+- ^(examples|extras)\/
+require_paths: 
+- .
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: !binary |
+  5pyA5bCP5YyW55qETVZD5qGG5p62
+
+test_files: []
+