adviser 0.0.1

data/History.txt

@@ -0,0 +1,6 @@
+=== 0.0.1 / 2009-05-14
+
+* 1 major enhancement
+  * Initial Features
+  
+  

data/Manifest.txt

@@ -0,0 +1,7 @@
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+bin/adviser
+lib/adviser.rb
+test/test_adviser.rb

data/README.txt

@@ -0,0 +1,82 @@
+= adviser
+
+http://adviser.rubyforge.com
+
+== DESCRIPTION:
+
+A very simple library to provide AOP concepts to Ruby.
+
+== SYNOPSIS:
+
+Here's an incredibly goofy example of how one might use Adviser.
+
+  require 'adviser'
+
+  class Speaker
+    def initialize
+      puts @intro || "*awkward pause*"
+    end
+  
+    def main_point
+      puts "Eh.. I seem to have misplaced my notes."
+    end
+  end
+
+  # Let's create a teleprompter for our speaker.
+
+  advise Speaker do
+    before :initialize do
+      @intro = "Hello!"
+    end
+  
+    instead :main_point do
+      puts "Ruby is awesome."
+    end
+  
+    after :main_point do
+      puts "Goodbye!"
+    end
+  end
+
+  s = Speaker.new
+  s.main_point
+
+Output without adviser:
+
+  *awkward pause*
+  Eh.. I seem to have misplaced my notes.
+
+Output with adviser:
+
+  Hello!
+  Ruby is awesome.
+  Goodbye!
+
+== INSTALL:
+
+  sudo gem install adviser
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2009 FIX
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,22 @@
+# -*- ruby -*-
+
+require 'rubygems'
+require 'hoe'
+require './lib/adviser.rb'
+
+Hoe.new('adviser', Adviser::VERSION) do |p|
+  # p.rubyforge_name = 'adviserx' # if different than lowercase project name
+  # p.developer('FIX', 'FIX@example.com')
+  
+  p.name = "adviser"
+  p.author = "Bryan Powell"
+  p.description = "A very simple library to provide AOP concepts to Ruby."
+  p.email = 'bryan@metabahn.com'
+  p.summary = "AOP For Ruby"
+  p.url = "http://metabahn.com"
+  # p.clean_globs = ['test/actual'] # Remove this directory on "rake clean"
+  p.remote_rdoc_dir = '' # Release to root
+  # p.changes = p.paragraphs_of('CHANGELOG', 0..1).join("\n\n")
+end
+
+# vim: syntax=Ruby

data/bin/adviser

@@ -0,0 +1,3 @@
+#!/usr/bin/env ruby
+
+abort "you need to write me"

data/lib/adviser.rb

@@ -0,0 +1,74 @@
+class Adviser
+  VERSION = '0.0.1'
+end
+
+class << self
+  def advise(object, &block)
+    @object = object
+    Proc.new(&block).call
+  end
+  
+  def instead(method, &block)
+    @object.__create_instead(method, Proc.new(&block))
+  end
+  
+  def before(method, &block)
+    @object.__create_before(method, Proc.new(&block))
+  end
+  
+  def after(method, &block)
+    @object.__create_after(method, Proc.new(&block))
+  end
+end
+
+class Object
+  private
+  
+  def self.__create_instead(method, proc)
+    id = __id(proc)    
+    
+    __alias(method, id)    
+    define_method method, proc
+  end
+    
+  def self.__create_before(method, proc)    
+    args  = __args(method)
+    id    = __id(proc)
+    
+    __alias(method, id)
+    define_method :"__before_#{method}_#{id}", proc
+    class_eval %{
+      def #{method}#{args}
+        __before_#{method}_#{id}#{args}
+        __previous_#{method}_#{id}#{args}
+      end
+    }
+  end
+  
+  def self.__create_after(method, proc)
+    args  = __args(method)    
+    id    = __id(proc)
+    
+    __alias(method, id)
+    define_method :"__after_#{method}_#{id}", proc
+    class_eval %{
+      def #{method}#{args}
+        res = __previous_#{method}_#{id}#{args}
+        __after_#{method}_#{id}#{args}
+        res
+      end
+    }
+  end
+  
+  def self.__alias(method, id)
+    alias_method :"__previous_#{method}_#{id}", method
+  end
+  
+  def self.__args(method)
+    instance_method(method).arity == 0 ? '' : '(*args)'
+  end
+  
+  def self.__id(proc)
+    "%04x" % proc.object_id
+  end
+end

data/test/test_adviser.rb

@@ -0,0 +1,8 @@
+require "test/unit"
+require "adviser"
+
+class TestAdviser < Test::Unit::TestCase
+  def test_sanity
+    flunk "write tests or I will kneecap you"
+  end
+end

metadata

@@ -0,0 +1,71 @@
+--- !ruby/object:Gem::Specification 
+name: adviser
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Bryan Powell
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-05-14 00:00:00 -05:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.12.2
+    version: 
+description: A very simple library to provide AOP concepts to Ruby.
+email: bryan@metabahn.com
+executables: 
+- adviser
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- bin/adviser
+- lib/adviser.rb
+- test/test_adviser.rb
+has_rdoc: true
+homepage: http://metabahn.com
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: adviser
+rubygems_version: 1.3.1
+signing_key: 
+specification_version: 2
+summary: AOP For Ruby
+test_files: 
+- test/test_adviser.rb