activeobject 0.0.3

data/CHANGE

@@ -0,0 +1,10 @@
+v0.0.1  2009-9-21
+- initial release
+
+v0.0.2  2009-9-24
+- 针对TC和TT数据库新增all类方法，方便获取类的所有对象
+- ActiveObject对象添加to_json方法
+- ActiveObject对象添加to_xml方法
+
+v0.0.3  2009-9-25
+- 修复对象to_json时没有包含对象id

data/Interface_desc

@@ -0,0 +1,21 @@
+ActiveRecord的功能分析：
+
+1、 CRUD --> 序列化 --> 跟踪变更
+2、 验证
+3、 回调 --> 观察器
+4、 关联
+5、 集合
+6、 事务
+
+
+OKM（对象-key/value映射)要完成的事项：
+1、实现对象的持久化。这里面包含以下几部分：
+	* 对象的序列化与反序列化： 通过序列化和反序列化，使得对象能作为value被保存。
+	* 对象的CRUD： 通过CRUD能将序列化的对象保存、读取序列化的对象以及删除已经保存的对象。
+	* 对象的变更跟踪: 通过对对象的变更跟踪，在save时能确定是否需要进行保存操作。对于没有变更的对象不需要执行保存操作。
+
+2、实现对象的验证。
+
+2、实现对象的回调和观察器模式。
+
+3、实现对象的关联。

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Aaron Zhang
+
+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/README

@@ -0,0 +1,72 @@
+= Active Object -- 基于Ruby的对象-key/value映射
+
+	Active Object是用来访问LightCloud/TokyoCabinet/TokyoTyrant的工具，实现了持久化数据与对象的映射。
+
+== 主要特性
+
+* 自定义持久化属性.
+
+	class User < ActiveObject::Base
+		attribute :name,:email
+	end
+
+* 建立对象引用，消除冗余.
+
+	class User < ActiveObject::Base
+		attribute :name,:email
+
+		has_one :icon             #=> 表示每个人有一张肖像
+		has_many :friends         #=> 表示每个人可以有多个朋友
+	end
+
+	class Icon < ActiveObject::Base
+		attribute :content
+	end
+
+	class Friend < ActiveObject::Base
+		attribute :friend_name,:remark,:created_at
+		has_one :user
+	end
+
+* 可以对对象应用验证规则，而且对新对象或存在的对象应用不同的验证规则.
+
+	class User < ActiveObject::Base
+		attribute :name,:email
+
+		validates_presence_of :name,:email
+	end
+
+* 回调.
+
+	class User < ActiveObject::Base
+		before_destroy do |object|
+			puts object
+		end
+	end
+
+* 观察器.
+	class UserObserver < ActiveObject::Observer
+		def after_create(user)
+			puts user
+		end
+	end
+
+* 多级继承
+	class User < ActiveObject::Base;end
+	class Account < User;end
+
+
+== 示例
+
+	在Rails中应用Active Object
+
+	在环境文件的最后加入下列代码(假设LightCloud配置文件与环境文件在同一个目录下)：
+
+		require 'activeobject'
+		ActiveObject::Base.configure :LC,File.join(File.dirname(__FILE__),'light_cloud.yml')
+
+	在项目中使用观察器
+
+	在环境文件的最后加入下列代码:
+		ActiveObject::Base.observers = :account_observer
+		ActiveObject::Base.instantiate_observers

data/Rakefile.rb

@@ -0,0 +1,9 @@
+require 'rake'
+require 'rake/testtask'
+require 'rake/rdoctask'
+
+Rake::TestTask.new do |t|
+	t.libs << "spec"
+	t.test_files = FileList['spec/case/*_test.rb']
+	t.verbose = true
+end

data/active-object.gemspec

@@ -0,0 +1,50 @@
+# -*- encoding: utf-8 -*-
+module DirExt
+	# 根据指定的目录获取该目录下所有的文件路径(不包含隐藏文件)
+	# 例如:
+	# 	files_path_to_s('/home/Aaron/sample')     => 会列出sample目录下所有文件的路径
+	#
+	def files_path_to_s(dirname)
+		path_array = files_path(dirname)
+		path_array.flatten!
+	end
+
+	protected
+		def files_path(dirname,path_array=[])
+			files = Dir.entries(dirname)
+			files.delete('.')
+			files.delete('..')
+			files.delete_if{|file| file =~ /^\./}
+			files.each do |f|
+				if File.directory?(File.join(dirname,f))
+					path_array << files_path(File.join(dirname,f))
+				else
+					path_array << File.join(dirname,f)
+				end
+			end
+			path_array
+		end
+end
+
+Gem::Specification::Class.send :include,DirExt
+
+Gem::Specification.new do |s|
+	s.name = %{activeobject}
+	s.version = '0.0.3'
+	s.description = 'Active Object是用来访问LightCloud/TokyoCabinet/TokyoTyrant的工具，实现了持久化数据与对象的映射。 它类似于ActiveRecord，提供一组访问LightCloud/TokyoCabinet/TokyoTyrant的方法以及验证规则、回调函数和观察器。'
+	s.homepage = "http://www.tokyocabinet.com"
+	s.rubyforge_project = %q{activeobject}
+	s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+	s.summary = 'Active Object是用来访问LightCloud/TokyoCabinet/TokyoTyrant的工具，实现了持久化数据与对象的映射。 它类似于ActiveRecord，提供一组访问LightCloud/TokyoCabinet/TokyoTyrant的方法以及验证规则、回调函数和观察器。'
+
+	s.email = ["yalong1976@gmail.com"]
+  s.authors = ["yalong zhang"]
+	s.files = files_path_to_s(File.dirname(__FILE__)).delete_if{|path| path =~ /.gem$/}
+  s.require_paths = ["lib"]
+  s.required_ruby_version = Gem::Requirement.new(">= 1.8.6")
+  s.rubygems_version = %q{1.3.4}
+  s.add_dependency(%q<lightcloud>)
+  s.add_dependency(%q<rufus-tokyo>)
+  s.add_dependency(%q<uuid>)
+  s.add_dependency(%q<json>)
+end

data/examples/account.rb

@@ -0,0 +1,69 @@
+class Account < ActiveObject::Base
+
+	set_attributes :email,:name,:encrypted_password,:salt
+
+	attr_accessor :password
+
+	validates_presence_of     :email, :message=>'电子邮箱不能为空!'
+	validates_format_of       :email, :with => /(\A(\s*)\Z)|(\A([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,})\Z)/i,   :message => '无效的电子邮件格式'
+	validates_presence_of     :password,:message =>'密码不能为空'
+  validates_length_of       :password, :within => 6..40, :too_short => '密码太短', :too_long =>'密码过长'
+	validates_confirmation_of :password, :message => '两次输入的密码不匹配!'
+
+
+	before_save :encrypt_password
+	before_save :default_name
+
+  # 通过账号和未加密的密码验证用户.  返回用户或者nil.
+  def self.authenticate(email, password)
+    u = find(email)
+    u && u.authenticated?(password) ? u : nil
+  end
+
+  # 根据salt加密数据.
+  def self.encrypt(password, salt)
+    Digest::SHA1.hexdigest("--#{salt}--#{password}--")
+  end
+
+  # 根据用户salt加密用户的密码
+  def encrypt(password)
+    self.class.encrypt(password, salt)
+  end
+
+  # 校验密码认证是否通过
+  def authenticated?(password)
+    encrypted_password == encrypt(password)
+  end
+
+  def change_password(password,password_confirmation)
+    self.password= password
+    self.password_confirmation = password_confirmation
+    self.save
+  end
+
+  # 让系统记住当前账号，使下次登录是不需要输入账号和密码。
+  def remember_me
+    remember_me_for 2.weeks
+  end
+
+  def remember_me_for(time)
+    remember_me_until time.from_now.utc
+  end
+
+  def remember_me_until(time)
+  	Token.create(:email=>self.email,:token=>encrypt("#{email}--#{time}"),:expires_at=>time)
+  end
+
+  protected
+    # before filter
+    def encrypt_password
+      return if password.blank?
+      self.salt = Digest::SHA1.hexdigest("--#{Time.now.to_s}--#{email}--") if new_record?
+      self.encrypted_password = encrypt(password)
+    end
+
+    def default_name
+      return if email.blank?
+      self.name = email[0,email.index('@')] if self.name.blank? && email.index('@')
+    end
+end

data/examples/light_cloud.yml

@@ -0,0 +1,18 @@
+# LightCloud的配置文件,用于初始化LightCloud
+#  示例
+#  user:
+#    lookup_one:
+#    - 127.0.0.1:41401
+#    - 127.0.0.1:41402
+#    storage_one:
+#    - 127.0.0.1:44401
+#    - 127.0.0.1:44402
+#
+
+user:
+  lookup_one:
+  - 127.0.0.1:30001
+  - 127.0.0.1:33001
+  storage_one:
+  - 127.0.0.1:20001
+  - 127.0.0.1:24001

data/examples/test.rb

@@ -0,0 +1,3 @@
+require '/home/Aaron/railsspace/tools/activeobject/lib/active_support'
+
+puts [].to_json

data/examples/user.rb

@@ -0,0 +1,112 @@
+require 'pathname'
+require File.join(File.dirname(__FILE__),'..','lib','active-object')
+
+#ActiveObject::Base.configurations = File.join(File.dirname(__FILE__),'light_cloud.yml')
+ActiveObject::Base.configure :TC,File.join(File.dirname(Pathname.new(__FILE__).realpath),'data.tch')
+#ActiveObject::Base.configure :LC,File.join(File.dirname(Pathname.new(__FILE__).realpath),'light_cloud.yml')
+#ActiveObject::Base.configure :TT,'http://127.0.0.1:55555'
+
+class Icon < ActiveObject::Base
+	attribute :path
+end
+
+class Friend < ActiveObject::Base
+  attribute :name
+end
+
+
+class Account < ActiveObject::Base
+  primary_key :email
+	attribute :email,:name,:encrypted_password,:salt
+
+	has_one :icon
+
+	has_many :friends
+
+	attr_accessor :password
+
+	validates_presence_of     :email, :message=>'电子邮箱不能为空!'
+	validates_format_of       :email, :with => /(\A(\s*)\Z)|(\A([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,})\Z)/i,   :message => '无效的电子邮件格式'
+	validates_presence_of     :password,:message =>'密码不能为空'
+  validates_length_of       :password, :within => 6..40, :too_short => '密码太短', :too_long =>'密码过长'
+	validates_confirmation_of :password, :message => '两次输入的密码不匹配!'
+
+
+	before_save :encrypt_password
+	before_save :default_name
+
+  # 通过账号和未加密的密码验证用户.  返回用户或者nil.
+  def self.authenticate(email, password)
+    u = find(email)
+    u && u.authenticated?(password) ? u : nil
+  end
+
+  # 根据salt加密数据.
+  def self.encrypt(password, salt)
+    Digest::SHA1.hexdigest("--#{salt}--#{password}--")
+  end
+
+  # 根据用户salt加密用户的密码
+  def encrypt(password)
+    self.class.encrypt(password, salt)
+  end
+
+  # 校验密码认证是否通过
+  def authenticated?(password)
+    encrypted_password == encrypt(password)
+  end
+
+  def change_password(password,password_confirmation)
+    self.password= password
+    self.password_confirmation = password_confirmation
+    self.save
+  end
+
+  # 让系统记住当前账号，使下次登录是不需要输入账号和密码。
+  def remember_me
+    remember_me_for 2.weeks
+  end
+
+  def remember_me_for(time)
+    remember_me_until time.from_now.utc
+  end
+
+  def remember_me_until(time)
+  	Token.create(:email=>self.email,:token=>encrypt("#{email}--#{time}"),:expires_at=>time)
+  end
+
+  protected
+    # before filter
+    def encrypt_password
+      return if password.blank?
+      self.salt = Digest::SHA1.hexdigest("--#{Time.now.to_s}--#{email}--") if new_record?
+      self.encrypted_password = encrypt(password)
+    end
+
+    def default_name
+      return if email.blank?
+      self.name = email[0,email.index('@')] if self.name.blank? && email.index('@')
+    end
+end
+
+u =  Account.new(:email=>'aaron@nonobo.com',:password=>'111111',:password_confirmation=>'111111')
+
+
+
+icon = Icon.create(:path=>"/home/Aaron")
+
+
+u.icon = icon
+
+friend = Friend.create(:name=>'kame')
+
+u.friends.append(friend)
+
+u.friends.append(Friend.create(:name=>'jim'))
+
+u.save
+
+
+a =  Account.find(u.id)
+
+p a

data/init.rb

@@ -0,0 +1,4 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require 'active-object'

data/lib/active-object.rb

@@ -0,0 +1,23 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+
+
+require 'rubygems'
+require 'lightcloud'
+require 'active_support'
+require 'active_object/base'
+require 'active_object/validations'
+require 'active_object/callbacks'
+require 'active_object/observer'
+require 'active_object/associations'
+require 'active_object/serialization'
+
+
+ActiveObject::Base.class_eval	do
+	include ActiveObject::Validations
+	include ActiveObject::Callbacks
+	include ActiveObject::Observing
+	include ActiveObject::Associations
+  include ActiveObject::Serialization
+end

data/lib/active_object/adapters/light_cloud.rb

@@ -0,0 +1,40 @@
+# 访问LightCloud的加载模块
+module ActiveObjectLightCloud
+
+	def self.included(base)
+		require 'lightcloud'
+		base.send "configurations=", YAML.load_file(base.configurations) if base.configurations.is_a?(String)
+		base.configurations.each do |key,value|
+		lookup_nodes, storage_nodes = LightCloud.generate_nodes(value)
+			LightCloud.init(lookup_nodes, storage_nodes,key)
+		end
+
+		base.extend ClassMethods
+		base.send :include, InstanceMethods
+	end
+
+	module ClassMethods
+		def delete(id)
+    	LightCloud.delete(self.id_to_key(id))
+    end
+
+		private
+      def load(id)
+				raw_record = LightCloud.get(self.id_to_key(id)) || raise(ActiveObject::ObjectNotFound)
+				deserialize_attributes(raw_record)
+      end
+	end
+
+	module InstanceMethods
+		private
+			def set
+				begin
+				 	LightCloud.set(@key,serialize_attributes)
+					true
+				rescue
+					false
+				end
+			end
+	end
+
+end

data/lib/active_object/adapters/tokyo_cabinet.rb

@@ -0,0 +1,48 @@
+
+# 访问TokyoCabinet的加载模块
+module ActiveObjectTokyoCabinet
+	def self.included(base)
+		require 'rufus/tokyo'
+
+		base.extend ClassMethods
+		base.send :include, InstanceMethods
+
+		base.send :adb=, Rufus::Tokyo::Cabinet.new(base.configurations)
+	end
+
+	module ClassMethods
+		mattr_accessor :adb
+		def delete(id)
+			adb.delete(self.id_to_key(id))
+		end
+
+		def all
+			keys = adb.keys(:prefix=>"#{self.to_s}_")
+			records = []
+			keys.each do |key|
+				records << find(key_to_id(key))
+			end
+			records
+		end
+
+		private
+
+      def load(id)
+				raw_record = adb[self.id_to_key(id)] || raise(ActiveObject::ObjectNotFound)
+				deserialize_attributes(raw_record)
+      end
+	end
+
+	module InstanceMethods
+		private
+			def set
+				begin
+				 	self.class.adb[@key]= serialize_attributes
+					true
+				rescue
+
+					false
+				end
+			end
+	end
+end

data/lib/active_object/adapters/tokyo_tyrant.rb

@@ -0,0 +1,14 @@
+# 访问TokyoTyrant的加载模块
+module ActiveObjectTokyoTyrant
+
+	def self.included(base)
+		require 'uri'
+		require 'rufus/tokyo'
+		uri  = URI.parse(base.configurations)
+
+		base.extend ActiveObjectTokyoCabinet::ClassMethods
+		base.send :include, ActiveObjectTokyoCabinet::InstanceMethods
+
+		base.send :adb=, Rufus::Tokyo::Tyrant.new(uri.host,uri.port)
+	end
+end