glue 0.0.1 → 0.13.0

data/CHANGELOG

@@ -0,0 +1,19 @@
+17-03-2005  George Moschovitis  <gm@navel.gr>
+
+	* Rakefile: updated and fixed bugs.
+
+	* test/*: changes to make the tests pass again.
+
+12-03-2005  George Moschovitis  <gm@navel.gr>
+
+	* test/glue/tc_validation.rb: added more tests.
+
+	* lib/glue/validation.rb (#validate_numeric): implemented,
+
+10-03-2005  George Moschovitis  <gm@navel.gr>
+
+	* lib/glue.rb: added Version.
+
+	* Rakefile: implemented.
+
+	* split from nitro CHANGELOG. 

data/INSTALL

@@ -0,0 +1,56 @@
+= Instalation with RubyGems
+
+1. Download and install RubyGems: 
+
+	http://rubygems.rubyforge.org
+
+2. Install the distribution:
+
+	gem install glue
+
+	When asked about the dependencies to include, only accept
+	the dependencies for the RDBMS backends you are planning
+	to use.
+
+3. Set environment variable (required to load RubyGems):
+
+	export RUBYOPT=-rubygems
+
+	You can add this in you .bashrc in Unix.
+
+	Alternatively you can run your applications with the -rubygem 
+	option:
+
+  ruby -rubygem xxx.rb
+
+= Installation without RubyGems using script.
+
+Installation without RubyGems is *strongly* discouraged.
+However, as Glue is all about freedom and possibilities,
+a standard installation script is provided.
+
+1. Switch to an administrator account 
+
+	For example in Unix:
+
+	$ su -
+
+2. Run the installation script.
+
+	$ ruby install.rb
+
+This installation script also installs some vendor libraries
+that you possibly have allready installed. Use with caution.
+
+= Manual installation.
+
+Uncompress your distribution (Unix example):
+
+$ cd my_dir
+$ tar xvfz glue-x.x.x.tar.gz
+
+Put the libray dir in the Ruby path (Unix example):
+
+$ export RUBYOPT='-I path/to/glue/lib'
+
+

data/README

@@ -0,0 +1,3 @@
+= Glue
+
+Useful utilites and methods.

data/Rakefile

@@ -1,14 +1,77 @@
-# -*- ruby -*-
+# * George Moschovitis  <gm@navel.gr>
+# (c) 2004-2005 Navel, all rights reserved.
+# $Id$
 
-require 'rubygems'
-require 'hoe'
-require './lib/glue.rb'
+require 'rake/rdoctask'
+require 'rake/testtask'
+require 'rake/gempackagetask'
 
-Hoe.new('glue', Glue::VERSION) do |p|
-  p.developer('Jordan Dobson', 'jordan.dobson@madebysquad.com')
-  p.extra_deps     = ['mechanize']
-  p.extra_deps     = ['httparty']
-  p.extra_dev_deps = ['mocha']
+task :default => :package
+
+# Run all tests.
+
+Rake::TestTask.new(:test_all) do |t|
+	t.libs << 'test'
+	t.test_files = FileList['test/**/tc*.rb']
+	t.verbose = true
+end
+
+# Generate RDoc documentation.
+
+Rake::RDocTask.new do |rd|
+	rd.main = 'README'
+	rd.rdoc_dir = 'doc/rdoc'
+	rd.rdoc_files.include('README', 'INSTALL', 'lib/**/*.rb')
+	rd.options << '--all --inline-source'
+end
+
+# Build gem.
+
+spec = Gem::Specification.new do |s|
+	s.name = 'glue'
+	if File.read('lib/glue.rb') =~ /Version\s+=\s+'(\d+\.\d+\.\d+)'/
+		s.version = $1 
+	else
+		raise 'No version found'
+	end
+	s.summary = 'Glue utilities'
+	s.description = 'A collection of utilities and useful classes'
+	s.add_dependency 'extensions', '>= 0.5'
+	s.add_dependency 'flexmock', '>= 0.0.3'
+
+	s.required_ruby_version = '>= 1.8.1'
+
+	s.files = FileList[
+		'[A-Z]*', 'install.rb', '{doc,lib,test,vendor}/**/*' 
+	].exclude('.svn/**/*').exclude('**/*.log').to_a
+
+	s.require_path = 'lib'
+	s.autorequire = 'glue'
+	
+	s.has_rdoc = true
+	s.extra_rdoc_files = FileList['[A-Z]*'].exclude('*.og').to_a
+	s.rdoc_options << '--main' << 'README' << '--title' << 'Glue Documentation'
+	s.rdoc_options << '--all' << '--inline-source'
+
+	s.test_files = []
+	
+	s.bindir = 'bin'
+
+	s.author = 'George Moschovitis'
+	s.email = 'gm@navel.gr'
+	s.homepage = 'http://nitro.rubyforge.org'
+	s.rubyforge_project = 'nitro'
+end
+
+Rake::GemPackageTask.new(spec) do |pkg|
+  pkg.package_dir = 'dist'
+  pkg.need_zip = true
+  pkg.need_tar = true
+end
+
+# Manual install (not recommended).
+
+task :install do
+  ruby 'install.rb'
 end
 
-# vim: syntax=Ruby

data/doc/AUTHORS

@@ -0,0 +1,16 @@
+MAIN DEVELOPER:
+
+* George Moschovitis  <gm@navel.gr>
+	Project leader, architecture and design, code, 
+	documentation, maintainer.
+	
+IDEAS, ADDITIONAL CODING, SUPPORT:
+
+* Michael Neumann  <mneumann@ntecs.de>
+	Design, additional coding and bug reports.
+
+* Gavin Sinclair <gsinclair@soyabean.com.au>
+	Logger#trace method.
+
+* Thomas Quas  <tquas@yahoo.com>
+	Ideas, bug reports, unit tests.

data/doc/LICENSE

@@ -0,0 +1,33 @@
+The BSD License
+
+Copyright (c) 2004-2005, George 'tml' Moschovitis.
+Copyright (c) 2004-2005, Navel Ltd. (http://www.navel.gr)
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without 
+modification, are permitted provided that the following conditions are 
+met:
+
+* Redistributions of source code must retain the above copyright 
+notice, this list of conditions and the following disclaimer.
+	
+* Redistributions in binary form must reproduce the above copyright 
+notice, this list of conditions and the following disclaimer in the 
+documentation and/or other materials provided with the distribution.
+	
+* Neither the name of Navel nor the names of its contributors may be 
+used to endorse or promote products derived from this software 
+without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 
+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 
+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 
+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 
+OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 
+SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED 
+TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 
+PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 
+LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+

data/doc/RELEASES

@@ -0,0 +1,5 @@
+== Version 0.13.0 was released on 17/03/2005.
+
+The first release as a standalone gem.
+
+* Additional validations.

data/install.rb

@@ -0,0 +1,47 @@
+#!/usr/bin/env ruby
+
+# * George Moschovitis  <gm@navel.gr>
+# (c) 2004-2005 Navel, all rights reserved.
+# $Id$
+
+require 'rbconfig'
+require 'ftools'
+
+dst_dir = Config::CONFIG['sitelibdir']
+
+Dir.chdir('lib') do
+	Dir['**/*.rb'].each do |file|
+		File.mkpath File.join(dst_dir, File.dirname(file)), true
+		File.install file, File.join(dst_dir, file), 0644, true
+	end
+end
+
+# gmosx: this is potentially dangerous, rethink.
+
+Dir.chdir('vendor') do
+	Dir['**/*.rb'].each do |file|
+		File.mkpath File.join(dst_dir, File.dirname(file)), true
+		File.install file, File.join(dst_dir, file), 0644, true
+	end
+end
+
+puts %{
+
+
+---
+Congratulations, you have successfully installed Og!
+The libraries where installed in '#{dst_dir}'. 
+
+You probably need to install the Glue library 
+as well. (http://nitro.rubyforge.org)
+
+To verify that everything works correctly, try to run an 
+example by issuing:
+
+$ cd examples
+$ ruby run.rb
+
+at the command line.
+
+Enjoy the magic of Og!
+}

data/lib/glue.rb

@@ -1,64 +1,62 @@
-require 'rubygems'
-require 'httparty'
-require 'nokogiri'
-require 'open-uri'
+# = Glue
+#
+# General libraries used by various projects.
+#
+# George Moschovitis  <gm@navel.gr>
+# (c) 2004-2005 Navel, all rights reserved.
+# $Id: glue.rb 300 2005-03-16 13:23:10Z gmosx $
+
+require 'English'
+require 'pp'
+
+require 'glue/property'
+require 'glue/attribute'
+
+# The standard namespace module.
+
+module N; end
+
+class NilClass
+
+	# quite usefull for error tolerant apps.
+	# a bit dangerous? Will have to rethink this.
+	
+	def empty?
+		return true
+	end
+end
+
+class Class
+	#--
+	# gmosx: is this really needed?
+	#++
+	
+	def to_i
+		return self.hash
+	end
+end
+
+module Kernel
+
+	# Pretty prints an exception/error object
+	# usefull for helpfull debug messages
+	#
+	# Input:
+	# The Exception/StandardError object
+	#
+	# Output:
+	# the pretty printed string
+	
+	def pp_exception(ex)
+		return %{#{ex.message}\n\tBACKTRACE:\n\t#{ex.backtrace.join("\n\t")}\n\tLOGGED FROM:\n\t#{caller[0]}}
+	end
+
+end
 
 module Glue
 
-  VERSION = '0.0.1'
-  DOMAIN  = 'gluenow.com'
+	# The version.
 
-  class AuthError < StandardError;                   end
-  class FormatHelper; include HTTParty; format :xml; end
+	Version = '0.13.0'
 
-  class API < Glue::FormatHelper
-  
-    POST   = '/api/post'
-    USER   = '/api/user'
-
-    def initialize subdomain, user, pass
-      raise  AuthError, 'Username, Password or Account subdomain is blank.' \
-        if subdomain.empty? || user.empty? || pass.empty?
-      @auth   = { :username => user, :password => pass }
-      @site   = "#{subdomain}.#{DOMAIN}"
-      self.class.base_uri @site
-    end
-
-    def valid_site?
-      Nokogiri::HTML(open("http://#{@site}")).at('body#login') ? true : false
-    end
-
-    def user_info
-      self.class.post(USER, :query => {}, :basic_auth => @auth)
-    end
-
-    def post title, body, *opts
-      self.class.post(
-        POST,
-        :query      =>  {
-        :title      =>  title,
-        :body       =>  body,
-        :draft      =>  opts.include?( :draft  )  ,
-        :author     =>  opts.include?( :author )  },
-        :basic_auth =>  @auth
-      )
-    end
-
-  end
-  
-  class RSS < Glue::FormatHelper
-
-    NEWS = '/news/rss'
-    
-    def initialize subdomain
-      raise  AuthError, 'Account Subdomain is missing or blank' if subdomain.empty?
-      self.class.base_uri "#{subdomain}.#{DOMAIN}"
-    end
-    
-    def feed limit=999, page=1
-      self.class.get("#{NEWS}?limit=#{limit}&page=#{page}")
-    end
-  
-  end
-
-end
+end

data/lib/glue/array.rb

@@ -0,0 +1,61 @@
+# * George Moschovitis  <gm@navel.gr>
+# (c) 2002-2005 Navel, all rights reserved.
+# $Id: array.rb 282 2005-03-10 12:24:53Z gmosx $
+
+require 'sync'
+
+module N
+
+# A thread-safe array. We use a sync object instead of a 
+# mutex, because it is re-entrant. An exclusive lock is 
+# needed when writing, a shared lock IS NEEDED when reading.
+
+class SafeArray < Array
+	
+	attr :sync
+
+	# gmosx: delegator is not used.
+	
+	def initialize(delegator = nil)
+		@sync = Sync.new()
+	end
+
+	def << (value)
+		return @sync.synchronize(Sync::SH) { super }		
+	end
+	
+	def delete_if(&block) 
+		return @sync.synchronize(Sync::SH) { super }				
+	end
+	
+	def [](key)
+		return @sync.synchronize(Sync::SH) { super }
+	end
+
+	def []=(key, value)
+		return @sync.synchronize(Sync::EX) { super }
+	end
+
+	def delete(key)
+		return @sync.synchronize(Sync::EX) { super }
+	end
+
+	def clear
+		@sync.synchronize(Sync::EX) {	super }
+	end
+
+	def size
+		return @sync.synchronize(Sync::SH) { super }
+	end
+
+	def shift
+		return @sync.synchronize(::Sync::EX) { super }
+	end
+
+	def unshift(el)
+		return @sync.synchronize(::Sync::EX) { super }
+	end
+		
+end
+
+end