glue 0.21.2 → 0.22.0

data/CHANGELOG

@@ -1,3 +1,71 @@
+07-08-2005  George Moschovitis <gm@navel.gr>
+
+  * doc/RELEASES: updated.
+  
+  * lib/glue/mailer/incoming.rb: Added some comments about setting
+  the MTA.
+  
+  * moved mail to mailer, rearanged.
+  
+  * lib/glue/mail/handler.rb: template_root setting.
+
+  * lib/glue/mail/outgoing.rb (#initialize): handle template_root.
+
+06-08-2005  George Moschovitis <gm@navel.gr>
+
+  * test/glue/tc_mail.rb: passes.
+  
+  * lib/glue/mail/handler.rb: introduced,
+  copied settings from nitro/main.
+
+  * lib/glue/mail/outgoing.rb: introduced,
+  copied stuff from nitro/mail.
+  
+  * lib/glue/mail/incoming.rb: introduced,
+  (##receive): implemented,
+  (#receive): implemented.
+  
+  * lib/glue/mail.rb: moved from nitro,
+  (#parse_headers): implemented,
+  (##new_from_encoded): implemented,
+  better parsing in parse headers.
+  
+05-08-2005  George Moschovitis <gm@navel.gr>
+
+  * lib/glue/template.rb: small fixes.
+  
+  * removed wee related stuff.
+
+04-08-2005  George Moschovitis <gm@navel.gr>
+
+  * lib/glue/template.rb: copied from nitro,
+  renamed render_template to eval_template,
+  (Template##render): added helper.
+  
+  * lib/glue/fixture.rb (Fixtures##[]=): added,
+  'test/fixture' the default root_dir,
+  keep sorted objects
+  (#parse_yaml): extra pass sorts objects,
+  Added templating support in fixture files.
+
+03-08-2005  George Moschovitis <gm@navel.gr>
+
+  * test/glue/tc_fixture.rb: implemented,
+  added tests for global mode.
+  
+  * lib/glue/fixture.rb: introduced,
+  extend from Hash,
+  (#instantiate): implemented,
+  (#parse_yaml): implemented,
+  (#parse_csv): implemented,
+  dont store in @objects.
+  (Fixtures): introduced as helpers,
+  fixes to support csv.
+
+01-08-2005  George Moschovitis <gm@navel.gr>
+
+  * lig/glue/aspects.rb (#apply_advices): alias.
+
 24-07-2005  George Moschovitis <gm@navel.gr>
 
   * Rakefile: updated.

data/README

@@ -1,4 +1,4 @@
-= Glue 0.21.2 README
+= Glue 0.22.0 README
 
 Useful utilites and methods.
 
@@ -6,13 +6,13 @@ Useful utilites and methods.
 == Purpose
 
 Useful libraries are stored here. An attempt is made to 
-graduate mature libraries to the more general Facets
+graduate smaller libraries to the more general Facets
 ruby project.
 
 
 == Licence
 
-Copyright (c) 2004-2005, George 'gmosx' Moschovitis.
+Copyright (c) 2004-2005, George 'gmosx' Moschovitis (http://www.gmosx.com)
 Copyright (c) 2004-2005, Navel Ltd (http://www.navel.gr)
 
 Glue (http://www.rubyforge.org/projects/nitro) is copyrighted free 

data/doc/RELEASES

@@ -1,3 +1,12 @@
+== Version 0.22.0
+
+* New mailer implementation.
+
+* Moved template here.
+
+* Generalized fixture support.
+
+
 == Version 0.21.2
 
 This is a bug fix release. 

data/lib/glue.rb

@@ -61,7 +61,7 @@ module Glue
 
   # The version.
 
-  Version = '0.21.2'
+  Version = '0.22.0'
   
   # Library path.
 

data/lib/glue/aspects.rb

@@ -65,6 +65,10 @@ module Aspects
     end
   end
 
+  class << self
+    alias_method :apply_advices, :wrap
+  end
+
   # Include Modules that define advices.
 
   def self.include_advice_modules(target)

data/lib/glue/fixture.rb

@@ -0,0 +1,152 @@
+require 'facet/object/constant'
+require 'facet/string/underscore'
+require 'facet/string/demodulize'
+
+require 'glue/configuration'
+require 'glue/template'
+
+module Glue
+
+# A collection of helper methods.
+
+class Fixtures
+  # The directory where the fixtures are located.
+  
+  setting :root_dir, :default => 'test/fixture', :doc => 'The directory where the fixtures are located'
+
+  @fixtures = {}
+  
+  class << self
+  
+    def load(*classes)
+      for klass in classes
+        f = Fixture.new(klass).load
+        @fixtures[f.name] = f
+      end
+    end  
+
+    def [](klass)
+      @fixtures[klass]
+    end
+    
+    def []=(klass, fixture)
+      @fixtures[klass] = fixture
+    end
+    
+    def method_missing(sym)
+      if f = @fixtures[sym.to_s]
+        return f
+      end
+      super
+    end  
+  end
+end
+
+# Fixtures is a fancy word for ‘sample data’. Fixtures allow you 
+# to populate your database with predefined data. Fixtures are
+# typically used during testing or when providing initial data
+# (bootstrap data) for a live application.
+#
+# A Fixture is a collection (Hash) of objects.
+
+class Fixture < Hash
+
+  # The name of this Fixture.
+  
+  attr_accessor :name
+  
+  # The class that the Fixtures refer to.
+  
+  attr_accessor :klass
+
+  # Used to keep the order.
+  
+  attr_accessor :objects
+  
+  
+  def initialize(klass, options = { } )
+    @klass = klass
+    @name = class_to_name(klass)
+    @objects = []    
+    load(options[:root_dir] || options[:root] || Fixtures.root_dir)
+  end
+
+  def load(root_dir = Fixtures.root_dir)
+    raise("The fixture root director '#{root_dir}' doesn't exits") unless File.exist?(root_dir)
+
+    if path = "#{root_dir}/#{@name}.yml" and File.exist?(path)
+      parse_yaml(path)
+    end
+    
+    if path = "#{root_dir}/#{@name}.csv" and File.exist?(path)
+      parse_csv(path)
+    end
+    
+    return self
+  end
+  
+  # Parse a fixture file in YAML format.
+  
+  def parse_yaml(path)
+    require 'yaml'
+
+    str = Template.new.render(File.read(path))
+    
+    if yaml = YAML::load(str)
+      for name, data in yaml
+        self[name] = instantiate(data)
+      end
+    end
+
+    # sort the objects.
+        
+    str.scan(/^(\w*?):$/).each do |key|
+      @objects << self[key.to_s]
+    end
+  end
+
+  # Parse a fixture file in CSV format. Many RDBM systems and 
+  # Spreadsheets can export to CVS, so this is a rather useful
+  # format.
+  
+  def parse_csv(path)
+    require 'csv'
+
+    str = Template.new.render(File.read(path))
+    
+    reader = CSV::Reader.create(str)
+    header = reader.shift
+
+    reader.each_with_index do |row, i|
+      data = {}
+      row.each_with_index do |cell, j| 
+        data[header[j].to_s.strip] = cell.to_s.strip 
+      end
+      self["#{@name}_#{i+1}"] = obj = instantiate(data)
+      @objects << obj
+    end
+  end
+  
+private    
+
+  # Instantiate an actual object from the Fixture data.
+    
+  def instantiate(data)
+    obj = @klass.allocate
+    
+    for key, value in data
+      obj.instance_variable_set("@#{key}", value)
+    end
+    
+    return obj
+  end
+
+  def class_to_name(klass)
+    klass.to_s.demodulize.underscore
+  end  
+  
+end
+
+end
+
+# * George Moschovitis <gm@navel.gr>

data/lib/glue/mail.rb

@@ -0,0 +1,162 @@
+require 'net/smtp'
+
+module Glue
+
+# Encapsulates an email message.
+
+class Mail
+
+  # The default charset.
+
+  setting :default_charset, :default => 'utf-8', :doc => 'The default character set'
+
+  # Encode the subject?
+
+  setting :encode_subject, :default => false, :doc => 'Encode the subject?' 
+
+  # Sender, can be an array.
+
+  attr_accessor :from
+
+  # The list of the recipients, can be arrays.
+  
+  attr_accessor :to, :cc, :bcc
+
+  # The subject
+
+  attr_accessor :subject
+
+  # The body of the message.
+
+  attr_accessor :body
+
+  # Reply to.
+
+  attr_accessor :reply_to
+
+  # Sent on
+
+  attr_accessor :sent_on
+
+  # Encode the subject?
+
+  attr_accessor :encode_subject
+  
+  # The charset used to encode the message.
+
+  attr_accessor :charset
+
+  # Additional headers
+
+  attr_accessor :headers
+
+  def initialize(from = nil, to = nil, subject = nil, body = nil)
+    @from, @to, @subject, @body = from, to, subject, body
+    @headers = {}
+  end
+
+  def parse_headers
+    @from = @headers['From']
+    @to = @headers['To']
+    @cc = @headers['Cc']
+    @bcc = @headers['Bcc']
+    @subject = @headers['Subject']
+  end
+
+  # Accept string or IO.
+  
+  def self.new_from_encoded(encoded)
+    if encoded.is_a? String
+      require 'stringio'
+      encoded = StringIO.new(encoded)
+    end
+
+    f = encoded
+    
+    # the following code is copied from mailread.rb
+    
+    unless defined? f.gets
+      f = open(f, "r")
+      opened = true
+    end
+
+    _headers = {}
+    _body = []
+    begin
+      while line = f.gets()
+        line.chop!
+        next if /^From /=~line  # skip From-line
+        break if /^$/=~line     # end of header
+
+        if /^(\S+?):\s*(.*)/=~line
+          (attr = $1).capitalize!
+          _headers[attr] = $2
+        elsif attr
+          line.sub!(/^\s*/, '')
+          _headers[attr] += "\n" + line
+        end
+      end
+  
+      return unless line
+
+      while line = f.gets()
+        break if /^From /=~line
+        _body.push(line)
+      end
+    ensure
+      f.close if opened
+    end
+
+    mail = Mail.new
+    mail.headers = _headers
+    mail.body = _body.join("\n")
+    mail.parse_headers
+    
+    return mail
+  end  
+
+  def [](key)
+    @headers[key]
+  end
+
+  def []=(key, value)
+    @headers[key] = value
+  end
+  
+  # Returns the Mail message in encoded format.
+
+  def encoded
+    raise 'No body defined' unless @body
+    raise 'No sender defined' unless @from
+    raise 'No recipients defined' unless @to
+
+    # gmosx: From is typically NOT an array.
+
+    from = @from.is_a?(Array) ? @from.join(', ') : @from
+    buf = "From: #{from}\n"
+    
+    to = @to.is_a?(Array) ? @to.join(', ') : @to
+    buf << "To: #{to}\n"
+    
+    if @cc
+      cc = @cc.is_a?(Array) ? @cc.join(', ') : @cc
+      buf << "Cc: #{cc}\n"
+    end
+    
+    if @bcc
+      bcc = @bcc.is_a?(Array) ? @bcc.join(', ') : @bcc
+      buf << "Bcc: #{bcc}\n"
+    end
+    
+    buf << "Subject: #@subject\n" if @subject
+    
+    buf << "\n"  
+    buf << @body
+
+    return buf
+  end
+end
+
+end
+
+# * George Moschovitis <gm@navel.gr>

data/lib/glue/mailer.rb

@@ -0,0 +1,51 @@
+require 'glue/mail'
+require 'glue/mailer/incoming'
+require 'glue/mailer/outgoing'  
+require 'glue/configuration'
+
+module Glue
+
+# Handles incoming and outgoing emails. Can be called from
+# a Controller or a standalone script (target of the MTA).
+
+class Mailer < Mail
+  include IncomingMailer
+  include OutgoingMailer
+  
+  # The outgoing mail server configuration.
+
+  setting :server, :default => {
+    :address => 'localhost',
+    :port => 25,
+    :domain => 'localhost.localdomain',
+    :username => nil,
+    :password => nil,
+    :authentication => nil
+  }, :doc => 'The outgoing server configuration'
+  
+  # The delivery method. The following options are
+  # supported:
+  #
+  # * :smtp
+  # * :sendmail
+  # * :test
+
+  setting :delivery_method, :default => :smtp, :doc => 'The delivery method'
+    
+  # Disable deliveries, useful for testing.
+
+  setting :disable_deliveries, :default => false, :doc => 'Dissable deliveries?'
+
+  # The default template root.
+  
+  setting :template_root, :default => 'template/mail', :doc => 'The default template root'
+  
+  # An array to store the delivered mails, useful
+  # for testing.
+
+  cattr_accessor :deliveries; @@deliveries = []  
+end
+
+end
+
+# * George Moschovitis <gm@navel.gr>

data/lib/glue/mailer/incoming.rb

@@ -0,0 +1,45 @@
+module Glue
+
+# Add support for incoming mail handling.
+#
+# You need to setup your MTA to support incoming email
+# handling. Here is an example for Postfix. Edit these files:
+#
+# /etc/postfix/master.cf:
+# mailman  unix  -       n       n       -       -       pipe
+#    flags= user=nobody argv=/path/to/ruby /path/to/app/script/runner.rb Mailer.receive(STDIN)
+#
+# /etc/postfix/main.cf:
+# transport_maps = hash:/etc/postfix/transport
+# virtual_mailbox_domains = lists.yourdomain.com
+#
+# /etc/postfix/transport:
+# lists.yourdomain.com    mailman:
+#
+# Then run:
+#
+# sudo postmap transport
+# sudo postfix stop
+# sudo postfix start
+
+module IncomingMailer
+  def self.included(base)
+    base.extend ClassMethods
+  end
+  
+  # You can overide this class for specialized handling.
+  
+  def receive(mail)
+  end
+  
+  module ClassMethods
+    def receive(encoded)
+      mail = Glue::Mail.new_from_encoded(encoded)
+      self.new.receive(mail)
+    end
+  end
+end
+
+end
+
+# * George Moschovitis <gm@navel.gr>

data/lib/glue/mailer/outgoing.rb

@@ -0,0 +1,123 @@
+module Glue
+
+# Add support for outgoing mail handling.
+
+module OutgoingMailer
+  # The root directory where the templates reside.
+
+  attr_accessor :template_root
+  
+  def self.included(base)
+    base.extend ClassMethods
+  end
+
+  def initialize(from = nil, to = nil, subject = nil, body = FileTemplate.new)
+    super
+    @charset = Mailer.default_charset.dup
+    @encode_subject = Mailer.encode_subject
+    @template_root = Mailer.template_root
+  end
+  
+  module ClassMethods
+    def method_missing(method_symbol, *params) #:nodoc:
+      case method_symbol.id2name
+        when /^create_([_a-z]*)/
+          create_from_method($1, *params)
+        when /^deliver_([_a-z]*)/
+          begin
+            deliver(send("create_" + $1, *params))
+          rescue Object => e
+            raise e # FIXME
+          end
+      end        
+    end
+
+    def mail(from, to, subject, body, timestamp = nil, headers = {}, encode = Mail.encode_subject, charset = Mail.default_charset) #:nodoc:
+      deliver(create(from, to, subject, body, timestamp, headers, charset))
+    end
+
+    def create(from, to, subject, body, timestamp = nil, headers = {}, encode = Mail.encode_subject, charset = Mail.default_charset) #:nodoc:
+      m = Mail.new
+      m.to, m.subject, m.body, m.from = to, ( encode ? quoted_printable(subject, charset) : subject ), body, from
+      # m.date = timestamp.respond_to?("to_time") ? timestamp.to_time : (timestamp || Time.now)    
+      # m.set_content_type "text", "plain", { "charset" => charset }
+      headers.each do |k, v|
+        m[k] = v
+      end
+      return m
+    end
+
+    def deliver(mail) #:nodoc:
+      # gmosx, FIXME: for some STUPID reason, delivery_method
+      # returns nil, investigate.
+      Mailer.delivery_method = :smtp
+      unless Mailer.disable_deliveries
+        send("perform_delivery_#{Mailer.delivery_method}", mail) 
+      end
+    end
+                                  
+    def quoted_printable(text, charset) #:nodoc:
+      text = text.gsub( /[^a-z ]/i ) { "=%02x" % $&[0] }.gsub( / /, "_" )
+      "=?#{charset}?Q?#{text}?="
+    end
+                              
+    private
+
+    def create_from_method(method_name, *params)
+      mailer = new
+
+      mailer.send(method_name, *params)
+
+      unless mailer.body.is_a?(String)
+        mailer.body = render_body(method_name, mailer)
+      end
+
+      mail = create(
+        mailer.from, mailer.to, mailer.subject, 
+        mailer.body, mailer.sent_on, 
+        mailer.headers, mailer.charset
+      )
+
+      mail.cc = mailer.cc if mailer.cc
+      mail.bcc = mailer.bcc if mailer.bcc
+
+      return mail
+    end
+
+    # Render the body by expanding the template
+    
+    def render_body(method_name, mailer)
+      mailer.body.template_filename = "#{mailer.template_root}/#{method_name.to_s}.xhtml"
+      return mailer.body.process
+    end
+
+    # Deliver emails using SMTP.
+    
+    def perform_delivery_smtp(mail) # :nodoc:
+      c = Mailer.server
+      Net::SMTP.start(c[:address], c[:port], c[:domain], c[:username], c[:password], c[:authentication]) do |smtp|
+        smtp.send_message(mail.encoded, mail.from, mail.to)
+      end
+    end
+
+    # Deliver emails using sendmail.
+    
+    def perform_delivery_sendmail(mail) # :nodoc:
+      IO.popen('/usr/sbin/sendmail -i -t', 'w+') do |sm|
+        sm.print(mail.encoded)
+        sm.flush
+      end                                          
+    end
+    
+    # Used for testing, does not actually send the 
+    # mail.
+    
+    def perform_delivery_test(mail) # :nodoc:
+      deliveries << mail
+    end
+  end  
+end
+
+end
+
+# * George Moschovitis <gm@navel.gr>

data/lib/glue/template.rb

@@ -0,0 +1,211 @@
+require 'glue/flexob'
+require 'glue/configuration'
+
+module Glue
+
+# A template is a text file with embeded Ruby code. The template
+# processor converts the original text file to ruby code and
+# then evaluates this code to produce the result of the 
+# template transformation.
+
+module TemplateMixin
+
+  # Convert a template to actual Ruby code, ready to be 
+  # evaluated.
+  #
+  # [+template+] 
+  #    The template as a String.
+  #
+  # [+buffer+]
+  #    The variable to act as a buffer where the ruby code
+  #   for this template will be generated. Passed as a|
+  #    String.
+  #
+  #  [+base_dir+]
+  #    The base directory where the templates reside.
+  
+  def compile_template(template, buffer = '@out', base_dir = Dir.pwd)
+    text = template.dup
+
+    # Strip the xml header! (interracts with the following gsub!)
+    text.gsub!(/<\?xml.*\?>/, "")
+
+    # Statically include sub-template files.
+    # The target file is included at compile time.
+    #
+    # gmosx: must be xformed before the <?r pi.
+    #
+    # Example:    
+    # <?include href="root/myfile.sx" ?>
+    
+    text.gsub!(/<\?include href=["|'](.*?)["|'](.*)\?>/) do |match|
+      text = File.read("#{base_dir}/#$1")
+      text.gsub!(/<\?xml.*\?>/, '')
+      text.gsub!(/<\/?root(.*?)>/m, ' ');
+      text
+    end
+
+    # Transform include instructions <include href="xxx" />
+    # must be transformed before the processinc instructions.
+    # Useful to include fragments cached on disk
+    #
+    # gmosx, FIXME: NOT TESTED! test and add caching.
+    # add load_statically_included fixes.
+
+    text.gsub!(/<include href=["|'](.*?)["|'](.*)(.?)\/>/) do |match|
+      "<?r File.read( '\#\{@dispatcher.root\}/#$1' ?>"
+    end
+    
+    # xform render/inject instructions <render href="xxx" />
+    # must be transformed before the processinc instructions.
+
+    text.gsub!(/<inject href=["|'](.*?)["|'](.*)(.?)\/>/) do |match|
+      "<?r render '/#$1' ?>"
+    end
+    
+    text.gsub!(/<render href=["|'](.*?)["|'](.*)(.?)\/>/) do |match|
+      "<?r render '/#$1' ?>"
+    end
+
+    # Remove <root> elements. typically removed by xslt but lets
+    # play it safe. The <root> element is typically added to
+    # template files to make them XHTML valid.
+    
+    text.gsub!(/<(\/)?root>/, '')
+    
+    # Transform the processing instructions, use <?r as
+    # a marker.
+    
+    text.gsub!(/\?>/, "; #{buffer} << %^")
+    text.gsub!(/<\?r(\s?)/, "^; ")
+    
+    # Transform alternative code tags. 
+    # (very useful in xsl stylesheets)
+    
+    text.gsub!(/<\/ruby>/, "; #{buffer} << %^")
+    text.gsub!(/<ruby>/, "^; ")
+
+    # Also handle erb/asp/jsp style tags. Those tags
+    # *cannot* be used with an xslt stylesheet.
+
+    text.gsub!(/%>/, "; #{buffer} << %^")
+    text.gsub!(/<%/, "^; ")
+
+    # Alterative versions of interpolation.
+    # (very useful in xsl stylesheets)
+    # Example: #\my_val\
+    
+    text.gsub!(/\#\\(.*?)\\/, '#{\1}')
+
+    # Alternative for entities.
+    # (useful in xsl stylesheets)
+    # Examples: %nbsp;, %rquo;
+
+    text.gsub!(/%(\S*?);/, '&\1;')
+
+    # Compile time ruby code. This code is evaluated when
+    # compiling the template and the result injected directly
+    # into the result. Usefull for example to prevaluate
+    # localization. Just use the #[] marker instead of #{}.
+    
+    text.gsub!(/\#\[(.*?)\]/) do |match|
+      eval($1)
+    end
+    
+    text =  "#{buffer} << %^" + text + "^"
+
+    return text
+  end
+
+  # Evaluate the template.
+  #
+  # [+ruby+]
+  #    A String containing the compiled template
+  #    code.
+  #
+  #  [+binding+]
+  #    The evaluation binding for the rendering.
+
+  def evaluate_template(ruby, the_binding = nil)
+    eval(ruby, the_binding)
+  end
+
+  # Compile and render the template.
+  
+  def process_template(template, buffer = '@out', the_binding = nil)
+    evaluate_template(compile_template(template, buffer), the_binding)
+  end
+
+end
+
+# A helper class that provides access to the Template methods
+# as singleton methods.
+
+class Template
+  
+  # The default root directory where template files reside.
+  
+  setting :root, :default => 'public', :doc => 'The default root directory where template files reside'
+  
+  # The default template name.
+  
+  setting :default, :default => 'index', :doc => 'The default template name'
+  
+  # The default template file extension.
+  
+  setting :extension, :default => 'xhtml', :doc => 'The default template file extension'
+
+  class << self
+    include TemplateMixin
+    alias_method :compile, :compile_template
+    alias_method :transform, :compile_template
+    alias_method :evaluate, :evaluate_template
+    alias_method :process, :process_template
+  end
+  
+  include TemplateMixin
+  
+  # Helper.
+  
+  def render(template)
+    str = ''
+    process_template(template, 'str', binding)
+    return str
+  end
+end
+
+# A Template that reads from files and also 
+# provides a simple but effective caching scheme.
+# An intuitive binding mechanism provides the
+# expansion environment.
+
+class FileTemplate < Flexob
+  include TemplateMixin
+
+  @@compiled_template_cache = {}
+
+  attr_accessor :template_filename
+
+  def initialize(filename = nil)
+    super
+    @template_filename = filename
+  end
+  
+  def process
+    __out__ = ''
+    
+    unless compiled = @@compiled_template_cache[@template_filename]
+      template = File.read(@template_filename)
+      compiled = compile_template(template, '__out__')
+      @@compiled_template_cache[@template_filename] = compiled
+    end
+    
+    evaluate_template(compiled, binding)  
+    
+    return __out__
+  end
+end
+
+end
+
+# * George Moschovitis <gm@navel.gr>

data/lib/glue/validation.rb

@@ -1,7 +1,3 @@
-# * George Moschovitis  <gm@navel.gr>
-# (c) 2004-2005 Navel, all rights reserved.
-# $Id: validation.rb 182 2005-07-22 10:07:50Z gmosx $
-
 module Glue 
 
 # Implements a meta-language for validating managed
@@ -459,3 +455,4 @@ class Module # :nodoc: all
   include Glue::Validation::MetaLanguage
 end
 
+# * George Moschovitis  <gm@navel.gr>

data/test/fixture/article.csv

@@ -0,0 +1,3 @@
+title, body
+This is cool, The body
+Another, ..litle article

data/test/fixture/article.yml

@@ -0,0 +1,13 @@
+Wow:
+  title: this works
+  body: as well!!
+  
+Test:
+  title: I love this
+  body: just great
+  
+<% 5.times do |i| %>
+Auto#{i}:
+  title: title #{i}
+  body: body #{i}
+<% end %>

data/test/fixture/user.yml

@@ -0,0 +1,12 @@
+george:
+  name: George
+  age: 30
+
+stella:
+  name: Stella
+  age: 29
+
+renos:
+  oid: 17
+  name: Renos
+  age: 29

data/test/glue/tc_fixture.rb

@@ -0,0 +1,43 @@
+$:.unshift File.join(File.dirname(__FILE__), 'lib')
+
+require 'test/unit'
+require 'glue/fixture'
+
+class TestFixture < Test::Unit::TestCase # :nodoc: all
+  include Glue
+
+  class User
+    attr_accessor :name
+    attr_accessor :age
+  end
+
+  class Article
+    attr_accessor :title
+    attr_accessor :body
+  end
+        
+  def test_all
+    users = Fixture.new(User)
+    
+    assert_equal 3, users.size
+    george = users['george']
+    assert_equal 30, george.age
+    assert_equal 'Renos', users['renos'].name
+
+    articles = Fixture.new(Article)
+    
+    assert_equal 9, articles.size
+    assert_equal 'This is cool', articles['article_1'].title
+    assert_equal 'Another', articles['article_2'].title
+    assert_equal 'I love this', articles['Test'].title
+    
+    assert_equal 'title 3', articles['Auto3'].title
+  end
+
+  def test_global
+    Fixtures.load User, Article    
+    assert_equal 3, Fixtures.user.size
+    assert_equal 'This is cool', Fixtures.article['article_1'].title
+  end
+    
+end

data/test/glue/tc_mail.rb

@@ -0,0 +1,98 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
+
+$NITRO_NO_ENVIRONMENT = true
+
+require 'test/unit'
+require 'ostruct'
+
+require 'nitro'
+require 'glue/configuration'
+require 'glue/mailer'
+
+class TestCaseMail < Test::Unit::TestCase # :nodoc: all
+  include Glue
+  
+  class DummyMailer < Mailer
+    def initialize 
+      super
+      @bcc = 'gm@navel.gr'
+      @template_root = 'test/public/dummy_mailer'
+    end
+
+    def registration(to, username, token)
+      @to = to 
+      @from = 'system@navel.gr'
+      @subject = 'Nitro.com registration'
+      @cc = 'gm@navel.gr'
+      @body.username = username
+      @body.token = token
+    end
+
+    def greek(to)
+      @to = to 
+      @from = 'system@navel.gr'
+      @subject = 'Ελληνικός Τίτλος'
+      @cc = 'gm@navel.gr'
+      @body = 'Τί έγινε ρε παιδιά;'
+    end
+  end
+=begin
+  class DummyController < Controller
+    # mailer DummyMailer
+
+    def register
+      token = 999
+      deliver_registration('gmosx@navel.gr', 'gmosx', token)
+    end
+  end
+=end
+  def test_mail
+    m = Glue::Mail.new 'gmosx@navel.gr', 'drak@navel.gr', 'A simple test', 'This is the body of the message'
+    expected = %{From: gmosx@navel.gr
+To: drak@navel.gr
+Subject: A simple test
+
+This is the body of the message}
+    assert_equal expected, m.encoded
+
+    m.to = %w{ renos@navel.gr stella@navel.gr }
+    expected = %{From: gmosx@navel.gr
+To: renos@navel.gr, stella@navel.gr
+Subject: A simple test
+
+This is the body of the message}
+    assert_equal expected, m.encoded
+
+  end
+=begin
+  def test_mailer
+    assert_equal 0, DummyMailer.deliveries.size 
+
+    Mailer.server[:address] = 'mail.navel.gr'
+#   assert_equal 'mail.navel.gr', DummyMailer.server[:address]
+
+    Mailer.delivery_method = :test
+    Mailer.template_root = File.join(File.dirname(__FILE__), '..', 'root', 'dummy_mailer')
+    token = 999
+    DummyMailer.deliver_registration('gm@navel.gr', 'gmosx', token)
+    assert_equal 1, DummyMailer.deliveries.size 
+    
+    expected = %{From: system@navel.gr
+To: gm@navel.gr
+Cc: gm@navel.gr
+Bcc: gm@navel.gr
+Subject: =?utf-8?Q?Nitro=2ecom_registration?=
+
+Hello gmosx
+
+how do you feel?
+
+Here is your <b>Token</b>: 999
+}
+    assert_equal expected, DummyMailer.deliveries[0].encoded
+
+    DummyMailer.deliver_greek('gm@navel.gr')
+    assert_equal 2, DummyMailer.deliveries.size 
+  end
+=end
+end

data/test/glue/tc_template.rb

@@ -0,0 +1,32 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
+
+require 'test/unit'
+require 'ostruct'
+
+require 'glue/template'
+
+class TestTemplate < Test::Unit::TestCase # :nodoc: all
+  include Glue
+    
+  def test_all
+    template = %q{
+      Hello #{user}
+
+      dont forget the following todo items:
+      
+      <?r for item in items ?>
+        <li>#{item}</li>
+      <?r end ?>
+    }
+
+    user = 'gmosx'
+    items = %w{ nitro is really great }
+    out = ''
+
+    Template.process(template, :out, binding)
+
+    assert_match %r{\<li\>nitro\</li\>}, out
+    assert_match %r{\<li\>really\</li\>}, out
+    assert_match %r{Hello gmosx}, out    
+  end
+end

data/test/public/dummy_mailer/registration.xhtml

@@ -0,0 +1,5 @@
+Hello #{username}
+
+how do you feel?
+
+Here is your <b>Token</b>: #{token}

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.11
 specification_version: 1
 name: glue
 version: !ruby/object:Gem::Version 
-  version: 0.21.2
-date: 2005-07-28 00:00:00 +03:00
+  version: 0.22.0
+date: 2005-08-07 00:00:00 +03:00
 summary: Glue utilities
 require_paths: 
   - lib
@@ -40,7 +40,6 @@ files:
   - lib/glue
   - lib/html
   - lib/glue.rb
-  - lib/facet
   - lib/vendor
   - lib/glue/logger.rb
   - lib/glue/array.rb
@@ -67,22 +66,24 @@ files:
   - lib/glue/helper.rb
   - lib/glue/settings.rb
   - lib/glue/builder.rb
+  - lib/glue/fixture.rb
   - lib/glue/cache.rb
-  - lib/glue/idgen
-  - lib/glue/idgen.rb
+  - lib/glue/mail.rb
   - lib/glue/snapshot.rb
-  - lib/glue/literal_method.rb
+  - lib/glue/mailer
+  - lib/glue/mailer.rb
+  - lib/glue/template.rb
   - lib/glue/builder/xml.rb
-  - lib/glue/idgen/md5.rb
-  - lib/glue/idgen/sequential.rb
+  - lib/glue/mailer/incoming.rb
+  - lib/glue/mailer/outgoing.rb
   - lib/html/document.rb
   - lib/html/node.rb
   - lib/html/version.rb
   - lib/html/tokenizer.rb
-  - lib/facet/object
-  - lib/facet/object/alias_class.rb
   - lib/vendor/blankslate.rb
   - test/glue
+  - test/fixture
+  - test/public
   - test/glue/tc_configuration.rb
   - test/glue/tc_strings.rb
   - test/glue/tc_validation.rb
@@ -99,7 +100,15 @@ files:
   - test/glue/tc_builder.rb
   - test/glue/tc_uri.rb
   - test/glue/tc_localization.rb
+  - test/glue/tc_fixture.rb
+  - test/glue/tc_mail.rb
+  - test/glue/tc_template.rb
   - test/glue/builder/tc_xml.rb
+  - test/fixture/user.yml
+  - test/fixture/article.yml
+  - test/fixture/article.csv
+  - test/public/dummy_mailer
+  - test/public/dummy_mailer/registration.xhtml
 test_files: []
 rdoc_options: 
   - "--main"

data/lib/facet/object/alias_class.rb

@@ -1,12 +0,0 @@
-
-# Alias a class.
-#
-# alias_class App, Server
-#--
-# by George Moschovitis
-#++
-
-def alias_class(new_class, old_class)
-  raise "Cannot alias a non class, '#{old_class}'" unless old_class.is_a?(Class)
-  const_set new_class, old_class
-end

data/lib/glue/idgen.rb

@@ -1,9 +0,0 @@
-# Abstract base class of all id generators.
-
-class Glue::IdGenerator
-  def next
-    raise "subclass responsibility"
-  end
-end
-
-# * Michael Neumann <mneumann@ntecs.de>

data/lib/glue/idgen/md5.rb

@@ -1,24 +0,0 @@
-# Returned ids might not be unique, but it should be very hard to guess the
-# next id.
-
-require 'glue/idgen'
-require 'digest/md5'
-
-class Glue::Md5IdGenerator < Glue::IdGenerator
-  def initialize(salt='ruby')
-    @salt = salt
-  end
-
-  def next
-    now = Time.now
-    md5 = Digest::MD5.new
-    md5.update(now.to_s)
-    md5.update(now.usec.to_s)
-    md5.update(rand(0).to_s)
-    md5.update($$.to_s)
-    md5.update(@salt.to_s)
-    md5.hexdigest
-  end
-end
-
-# * Michael Neumann <mneumann@ntecs.de>

data/lib/glue/idgen/sequential.rb

@@ -1,15 +0,0 @@
-# Returned ids are guaranteed to be unique, but they are easily guessable.
-
-require 'glue/idgen'
-
-class Glue::SequentialIdGenerator < Glue::IdGenerator
-  def initialize(initial_value=0)
-    @value = initial_value
-  end
-
-  def next
-    @value += 1
-  end
-end
-
-# * Michael Neumann <mneumann@ntecs.de>

data/lib/glue/literal_method.rb

@@ -1,44 +0,0 @@
-module Glue
-
-# A serializable method.
-#
-# For example, you can't marshal:
-#
-#   "ruby".method(:to_s)
-#
-# But you can:
-#
-#   Glue::LiteralMethodCallback.new("ruby", :to_s)
-#
-# or it's equivalent:
-#
-#   "ruby".literal_method(:to_s)
-
-class LiteralMethod
-  attr_reader :obj
-
-  def initialize(obj, method_id=:call, *args)
-    @obj, @method_id = obj, method_id
-    @args = args unless args.empty?
-  end
-
-  def call(*args, &block)
-    if @args
-      @obj.send(@method_id, *(@args+args), &block)
-    else
-       @obj.send(@method_id, *args, &block)
-    end
-  end
-
-  alias [] call
-end
-
-end # module Glue
-
-class Object
-  def literal_method(method_id, *args)
-    Glue::LiteralMethodCallback.new(self, method_id, *args)
-  end
-end
-
-# * Michael Neumann <mneumann@ntecs.de>