radiospiel-app 0.1.0

data/.document

@@ -0,0 +1,5 @@
+lib/**/*.rb
+bin/*
+- 
+features/**/*.feature
+LICENSE.txt

data/Gemfile

@@ -0,0 +1,20 @@
+source "http://rubygems.org"
+# Add dependencies required to use your gem here.
+# Example:
+#   gem "activesupport", ">= 2.3.5"
+
+gem "pg"
+gem "sqlite3"
+gem "redis"
+gem "micro_sql"
+gem "htmlentities"
+
+# Add dependencies to develop your gem here.
+# Include everything needed to run rake, tests, features, etc.
+group :development do
+  gem "bundler"
+  gem "jeweler"
+  gem 'simplecov', :require => false
+  gem "ruby-debug19"
+end
+

data/Gemfile.lock

@@ -0,0 +1,53 @@
+GEM
+  remote: http://rubygems.org/
+  specs:
+    archive-tar-minitar (0.5.2)
+    columnize (0.3.6)
+    git (1.2.5)
+    htmlentities (4.3.1)
+    jeweler (1.8.3)
+      bundler (~> 1.0)
+      git (>= 1.2.5)
+      rake
+      rdoc
+    json (1.6.6)
+    linecache19 (0.5.12)
+      ruby_core_source (>= 0.1.4)
+    micro_sql (0.3.0)
+      pg
+      sqlite3
+    multi_json (1.2.0)
+    pg (0.13.2)
+    rake (0.9.2.2)
+    rdoc (3.12)
+      json (~> 1.4)
+    redis (2.2.2)
+    ruby-debug-base19 (0.11.25)
+      columnize (>= 0.3.1)
+      linecache19 (>= 0.5.11)
+      ruby_core_source (>= 0.1.4)
+    ruby-debug19 (0.11.6)
+      columnize (>= 0.3.1)
+      linecache19 (>= 0.5.11)
+      ruby-debug-base19 (>= 0.11.19)
+    ruby_core_source (0.1.5)
+      archive-tar-minitar (>= 0.5.2)
+    simplecov (0.6.1)
+      multi_json (~> 1.0)
+      simplecov-html (~> 0.5.3)
+    simplecov-html (0.5.3)
+    sqlite3 (1.3.5)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bundler
+  htmlentities
+  jeweler
+  micro_sql
+  pg
+  redis
+  ruby-debug19
+  simplecov
+  sqlite3

data/LICENSE.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2012 radiospiel
+
+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.rdoc

@@ -0,0 +1,19 @@
+= app
+
+Description goes here.
+
+== Contributing to app
+ 
+* Check out the latest master to make sure the feature hasn't been implemented or the bug hasn't been fixed yet.
+* Check out the issue tracker to make sure someone already hasn't requested it and/or contributed it.
+* Fork the project.
+* Start a feature/bugfix branch.
+* Commit and push until you are happy with your contribution.
+* Make sure to add tests for it. This is important so I don't break it in a future version unintentionally.
+* Please try not to mess with the Rakefile, version, or history. If you want to have your own version, or is otherwise necessary, that is fine, but please isolate to its own commit so I can cherry-pick around it.
+
+== Copyright
+
+Copyright (c) 2012 radiospiel. See LICENSE.txt for
+further details.
+

data/Rakefile

@@ -0,0 +1,45 @@
+# encoding: utf-8
+
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'rake'
+
+require 'jeweler'
+Jeweler::Tasks.new do |gem|
+  # gem is a Gem::Specification... see http://docs.rubygems.org/read/chapter/20 for more options
+  gem.name = "radiospiel-app"
+  gem.homepage = "http://github.com/radiospiel/app"
+  gem.license = "MIT"
+  gem.summary = %Q{Application base code}
+  gem.description = %Q{Some basics that your application could benefit from.}
+  gem.email = "eno@open-lab.org"
+  gem.authors = ["radiospiel"]
+  # dependencies defined in Gemfile
+end
+Jeweler::RubygemsDotOrgTasks.new
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+task :default => :test
+
+require 'rdoc/task'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "micro_sql #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.1.0

data/app.gemspec

@@ -0,0 +1,97 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = "app"
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["radiospiel"]
+  s.date = "2012-04-03"
+  s.description = "Some basics that your application could benefit from."
+  s.email = "eno@open-lab.org"
+  s.extra_rdoc_files = [
+    "LICENSE.txt",
+    "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+    "Gemfile",
+    "Gemfile.lock",
+    "LICENSE.txt",
+    "README.rdoc",
+    "Rakefile",
+    "VERSION",
+    "app.tmproj",
+    "config/app.yml",
+    "lib/app.rb",
+    "lib/app/app.rb",
+    "lib/app/app/cache.rb",
+    "lib/app/app/config.rb",
+    "lib/app/app/logger.rb",
+    "lib/app/app/root.rb",
+    "lib/core-extensions/benchmark-logger.rb",
+    "lib/core-extensions/cgi_ext.rb",
+    "lib/core-extensions/object_ext.rb",
+    "lib/core-extensions/string_ext.rb",
+    "lib/core-extensions/string_without_accents.rb",
+    "lib/core-extensions/tls.rb",
+    "lib/core-extensions/uids.rb",
+    "lib/extensions/http.rb",
+    "lib/extensions/zz_geocoder.rb",
+    "script/watchr",
+    "test/app_test.rb",
+    "test/cache_test.rb",
+    "test/cgi_ext_test.rb",
+    "test/config.yml",
+    "test/config_test.rb",
+    "test/helper.rb",
+    "test/string_ext_test.rb",
+    "test/tls_test.rb",
+    "test/uid_test.rb"
+  ]
+  s.homepage = "http://github.com/radiospiel/appbase"
+  s.licenses = ["MIT"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = "1.8.17"
+  s.summary = "Application base code"
+
+  if s.respond_to? :specification_version then
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<pg>, [">= 0"])
+      s.add_runtime_dependency(%q<sqlite3>, [">= 0"])
+      s.add_runtime_dependency(%q<redis>, [">= 0"])
+      s.add_runtime_dependency(%q<micro_sql>, [">= 0"])
+      s.add_runtime_dependency(%q<htmlentities>, [">= 0"])
+      s.add_development_dependency(%q<bundler>, [">= 0"])
+      s.add_development_dependency(%q<jeweler>, [">= 0"])
+      s.add_development_dependency(%q<simplecov>, [">= 0"])
+      s.add_development_dependency(%q<ruby-debug19>, [">= 0"])
+    else
+      s.add_dependency(%q<pg>, [">= 0"])
+      s.add_dependency(%q<sqlite3>, [">= 0"])
+      s.add_dependency(%q<redis>, [">= 0"])
+      s.add_dependency(%q<micro_sql>, [">= 0"])
+      s.add_dependency(%q<htmlentities>, [">= 0"])
+      s.add_dependency(%q<bundler>, [">= 0"])
+      s.add_dependency(%q<jeweler>, [">= 0"])
+      s.add_dependency(%q<simplecov>, [">= 0"])
+      s.add_dependency(%q<ruby-debug19>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<pg>, [">= 0"])
+    s.add_dependency(%q<sqlite3>, [">= 0"])
+    s.add_dependency(%q<redis>, [">= 0"])
+    s.add_dependency(%q<micro_sql>, [">= 0"])
+    s.add_dependency(%q<htmlentities>, [">= 0"])
+    s.add_dependency(%q<bundler>, [">= 0"])
+    s.add_dependency(%q<jeweler>, [">= 0"])
+    s.add_dependency(%q<simplecov>, [">= 0"])
+    s.add_dependency(%q<ruby-debug19>, [">= 0"])
+  end
+end
+

data/app.tmproj

@@ -0,0 +1,95 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+	<key>currentDocument</key>
+	<string>lib/app/app/config.rb</string>
+	<key>documents</key>
+	<array>
+		<dict>
+			<key>expanded</key>
+			<true/>
+			<key>name</key>
+			<string>app</string>
+			<key>regexFolderFilter</key>
+			<string>!.*/(\.[^/]*|CVS|_darcs|_MTN|\{arch\}|blib|.*~\.nib|.*\.(framework|app|pbproj|pbxproj|xcode(proj)?|bundle))$</string>
+			<key>selected</key>
+			<true/>
+			<key>sourceDirectory</key>
+			<string></string>
+		</dict>
+	</array>
+	<key>fileHierarchyDrawerWidth</key>
+	<integer>221</integer>
+	<key>metaData</key>
+	<dict>
+		<key>Gemfile</key>
+		<dict>
+			<key>caret</key>
+			<dict>
+				<key>column</key>
+				<integer>17</integer>
+				<key>line</key>
+				<integer>8</integer>
+			</dict>
+			<key>firstVisibleColumn</key>
+			<integer>0</integer>
+			<key>firstVisibleLine</key>
+			<integer>0</integer>
+		</dict>
+		<key>lib/app/app/config.rb</key>
+		<dict>
+			<key>caret</key>
+			<dict>
+				<key>column</key>
+				<integer>21</integer>
+				<key>line</key>
+				<integer>27</integer>
+			</dict>
+			<key>firstVisibleColumn</key>
+			<integer>0</integer>
+			<key>firstVisibleLine</key>
+			<integer>0</integer>
+		</dict>
+		<key>lib/app/app/root.rb</key>
+		<dict>
+			<key>caret</key>
+			<dict>
+				<key>column</key>
+				<integer>0</integer>
+				<key>line</key>
+				<integer>6</integer>
+			</dict>
+			<key>firstVisibleColumn</key>
+			<integer>0</integer>
+			<key>firstVisibleLine</key>
+			<integer>0</integer>
+		</dict>
+		<key>lib/extensions/zz_geocoder.rb</key>
+		<dict>
+			<key>caret</key>
+			<dict>
+				<key>column</key>
+				<integer>21</integer>
+				<key>line</key>
+				<integer>8</integer>
+			</dict>
+			<key>firstVisibleColumn</key>
+			<integer>0</integer>
+			<key>firstVisibleLine</key>
+			<integer>0</integer>
+		</dict>
+	</dict>
+	<key>openDocuments</key>
+	<array>
+		<string>Gemfile</string>
+		<string>lib/app/app/config.rb</string>
+		<string>lib/app/app/root.rb</string>
+		<string>lib/extensions/zz_geocoder.rb</string>
+	</array>
+	<key>showFileHierarchyDrawer</key>
+	<true/>
+	<key>windowFrame</key>
+	<string>{{10, 0}, {1128, 746}}</string>
+</dict>
+</plist>

data/config/app.yml

@@ -0,0 +1,2 @@
+default:
+  cache: redis://localhost:6379/0

data/lib/app/app/cache.rb

@@ -0,0 +1,55 @@
+require_relative "config"
+
+#
+# This is a cache module, which keeps entries for a certain time period, 
+# stored away in a redis store.
+#
+# Entries are packed via Marshal.
+module App
+  module Cache
+    DEFAULT_MAX_AGE = 4 * 3600     # 4 hours.
+
+    attr :store, true
+    extend self
+    
+    def self.clear
+      store.flushdb
+    end
+
+    def self.cached(key, max_age = DEFAULT_MAX_AGE, &block)
+      redis = App::Cache.store
+      return yield if !store || !max_age
+
+      if marshalled = store.get(key)
+        Marshal.load(marshalled)
+      else
+        yield.tap { |v| 
+          store.set(key, Marshal.dump(v)) 
+          store.expire(key, max_age)
+        }
+      end
+    end
+
+    def self.setup
+      if !(cache_url = App.config[:cache])
+        App.logger.warn "No :cache configuration"
+      elsif !(self.store = connect_to_redis(cache_url))
+        App.logger.warn "Using cache at #{cache_url}"
+      end
+    end
+    
+    def self.connect_to_redis(url)
+      require "redis"
+      Redis.connect(:url => url)
+    rescue LoadError
+      App.logger.warn "Cannot load 'redis' gem (connecting to #{url})"
+      nil
+    end
+  end
+
+  def cached(key, max_age = Cache::DEFAULT_MAX_AGE, &block)
+    Cache.cached(key, max_age, &block)
+  end
+end
+
+App::Cache.setup

data/lib/app/app/config.rb

@@ -0,0 +1,56 @@
+require_relative "root"
+require_relative "logger"
+
+require "yaml"
+
+module App
+  module Config
+    def self.paths
+      [ "#{App.root}/config/app.yml", "#{App.root}/config.yml" ]
+    end
+
+    def self.read(path)
+      return unless File.exist?(path)
+      App.logger.info "Reading configuration from #{path}"
+      yaml = File.read(path)
+      YAML.load(yaml) || {}
+    end
+    
+    def self.load
+      config = paths.inject(nil) do |c, path|
+        c || read(path)
+      end
+
+      config ||= begin
+        App.logger.warn "No configuration found in #{App.root}"
+        {}
+      end
+    end
+
+    @@configurations = {}
+    
+    def self.current
+      @@configurations[App.root] ||= begin
+        config = self.load
+        default_settings = config["default"] || {}
+        current_settings = config[App.env] || {}
+        default_settings.update current_settings
+      end.extend(TreatSymbolsAsStrings)
+    end
+    
+    module TreatSymbolsAsStrings
+      def [](key)
+        fetch(key) do
+          case key
+          when Symbol then fetch(key.to_s, nil)
+          when String then fetch(key.to_sym, nil)
+          end
+        end
+      end
+    end
+  end
+
+  def config
+    Config.current
+  end
+end

data/lib/app/app/logger.rb

@@ -0,0 +1,14 @@
+require "logger"
+
+module App
+  def self.logger
+    @logger
+  end
+
+  def self.logger=(logger)
+    logger.formatter = proc { |_, _, _, msg| "*** #{msg}\n" }
+    @logger = logger
+  end
+end
+
+App.logger = Logger.new(STDERR)

data/lib/app/app/root.rb

@@ -0,0 +1,36 @@
+
+module App
+  # -- app root ---------------------------------------------------------------
+  
+  module Root
+    def self.find_starting_in(dir)
+      if is_root?(dir)
+        dir 
+      elsif !dir.sub!(/\/[^\/]+$/, "")
+        nil
+      else
+        find_starting_in(dir)
+      end
+    end
+
+    def self.is_root?(dir)
+      File.exists?("#{dir}/config.ru") || 
+      File.exists?("#{dir}/Gemfile") ||
+      File.exists?("#{dir}/Procfile")
+    end
+    
+    def self.find
+      find_starting_in(Dir.getwd) || raise("Could not find application root for #{dir}")
+    end
+
+    def root=(root)
+      @root = root
+    end
+
+    def root
+      @root ||= Root.find.tap { |root| App.logger.warn "Application root is #{root}" }
+    end
+  end
+
+  extend Root
+end

data/lib/app/app.rb

@@ -0,0 +1,13 @@
+module App
+  extend self
+
+  attr :env, true
+
+  def env
+    @env ||= ENV["RACK_ENV"] || ENV["RAILS_ENV"] || "development"
+  end
+end
+
+Dir.glob("#{File.dirname(__FILE__)}/app/*.rb").sort.each do |file|
+  load file
+end

data/lib/app.rb

@@ -0,0 +1,9 @@
+require "micro_sql"
+
+Dir.glob("#{File.dirname(__FILE__)}/core-extensions/*.rb").sort.each do |file|
+  load file
+end
+
+Dir.glob("#{File.dirname(__FILE__)}/app/*.rb").sort.each do |file|
+  load file
+end

data/lib/core-extensions/benchmark-logger.rb

@@ -0,0 +1,24 @@
+require "logger"
+
+class Logger
+  class Benchmarker
+    attr :msg, true
+    
+    def initialize(msg)
+      @msg, @start = msg, Time.now
+    end
+    
+    def runtime
+      Time.now - @start
+    end
+  end
+  
+  def benchmark(msg = "Benchmark", opts = {}, &block)
+    benchmarker = Benchmarker.new(msg)
+    r = yield(benchmarker)
+    
+    runtime = benchmarker.runtime
+    warn "#{benchmarker.msg}: #{(runtime * 1000).to_i} msecs" if runtime > (opts[:minimum] || -1)
+    r
+  end
+end

data/lib/core-extensions/cgi_ext.rb

@@ -0,0 +1,9 @@
+require "cgi"
+
+class CGI
+  def self.url_for(url, params = nil)
+    return url unless params
+    params = params.map { |k,v| "#{k}=#{CGI.escape(v.to_s)}" }.join("&")
+    url.index("?") ? "#{url}&#{params}" : "#{url}?#{params}"
+  end
+end

data/lib/core-extensions/object_ext.rb

@@ -0,0 +1,8 @@
+class Object
+  def define_attribute(sym, value)
+    (class << self; self; end).class_eval do
+      define_method(sym) { value }
+    end
+    value
+  end
+end

data/lib/core-extensions/string_ext.rb

@@ -0,0 +1,50 @@
+require "htmlentities"
+
+# -- decode HTML entities -----------------------------------------------------
+
+class String
+  module HtmlDecoder
+    def self.instance
+      @htmldecoder ||= HTMLEntities.new
+    end
+  end
+
+  def unhtml
+    HtmlDecoder.instance.decode self
+  end
+end
+
+# -- convert to UTF8 ----------------------------------------------------------
+
+require 'iconv'
+class String
+  def to_utf8
+    # require "charguess"
+    # encoding = CharGuess.guess(self)
+    # puts "encoding: #{encoding.inspect}"
+    # return self if !encoding || encoding == "UTF-8"
+
+    encoding = 'ISO-8859-1'
+    Iconv.conv('utf-8', encoding, self)
+  end
+end
+
+# -- remove accents -----------------------------------------------------------
+
+require_relative "./string_without_accents"
+
+class String
+  include WithoutAccents
+end
+
+class String
+  def sortkey
+    # Convert the key into an sortable ascii string
+    self.without_accents.                               # remove accents
+      downcase.
+      gsub(/^\s*(der|die|das|the|a|ein)\b\s*/, "").     # remove leading stop words
+      gsub(/[0-9]+/) { |s| "%03d" % s.to_i }.           # fill in leading zeroes
+      gsub(/[^a-z0-9]/, "")                             # keep only letters and digits
+  end
+end
+

data/lib/core-extensions/string_without_accents.rb

@@ -0,0 +1,92 @@
+# RemoveAccents version 1.0.3 (c) 2008-2009 Solutions Informatiques Techniconseils inc.
+# 
+# This module adds 2 methods to the string class. 
+# Up-to-date version and documentation available at:
+#
+# http://www.techniconseils.ca/en/scripts-remove-accents-ruby.php
+#
+# This script is available under the following license :
+# Creative Commons Attribution-Share Alike 2.5.
+#
+# See full license and details at :
+# http://creativecommons.org/licenses/by-sa/2.5/ca/
+#
+# Version history:
+#   * 1.0.3 : July 23 2009
+#               Corrected some incorrect character codes. Source is now wikipedia at:
+#                 http://en.wikipedia.org/wiki/ISO/IEC_8859-1#Related_character_maps
+#               Thanks to Raimon Fernandez for pointing out the incorrect codes.
+#   * 1.0.2 : October 29 2008
+#               Slightly optimized version of urlize - Jonathan Grenier (jgrenier@techniconseils.ca)
+#   * 1.0.1 : October 29 2008
+#               First public revision - Jonathan Grenier (jgrenier@techniconseils.ca)
+#
+
+module WithoutAccents
+  
+  # The extended characters map used by removeaccents. The accented characters 
+  # are coded here using their numerical equivalent to sidestep encoding issues.
+  # These correspond to ISO-8859-1 encoding.
+  ACCENTS_MAPPING = {
+    'E' => [200,201,202,203],
+    'e' => [232,233,234,235],
+    'A' => [192,193,194,195,196,197],
+    'a' => [224,225,226,227,228,229,230],
+    'C' => [199],
+    'c' => [231],
+    'O' => [210,211,212,213,214,216],
+    'o' => [242,243,244,245,246,248],
+    'I' => [204,205,206,207],
+    'i' => [236,237,238,239],
+    'U' => [217,218,219,220],
+    'u' => [249,250,251,252],
+    'N' => [209],
+    'n' => [241],
+    'Y' => [221],
+    'y' => [253,255],
+    'AE' => [306],
+    'ae' => [346],
+    'OE' => [188],
+    'oe' => [189]
+  }
+  
+  ACCENTS_MAPPING_REGEXPS = ACCENTS_MAPPING.map do |letter, accents|
+    packed = accents.pack('U*')
+    regexp = Regexp.new("[#{packed}]", nil) #, 'U')
+    
+    [letter, regexp]
+  end
+  
+  # Remove the accents from the string. Uses String::ACCENTS_MAPPING as the source map.
+  def without_accents
+    str = String.new(self)
+    ACCENTS_MAPPING_REGEXPS.each {|letter,regexp|
+      str.gsub!(regexp, letter)
+    }
+    str
+  end
+  
+=begin
+  
+  # Convert a string to a format suitable for a URL without ever using escaped characters.
+  # It calls strip, removeaccents, downcase (optional) then removes the spaces (optional)
+  # and finally removes any characters matching the default regexp (/[^-_A-Za-z0-9]/).
+  #
+  # Options
+  #
+  # * :downcase => call downcase on the string (defaults to true)
+  # * :convert_spaces => Convert space to underscore (defaults to false)
+  # * :regexp => The regexp matching characters that will be converting to an empty string (defaults to /[^-_A-Za-z0-9]/)
+  def urlize(options = {})
+    options[:downcase] ||= true
+    options[:convert_spaces] ||= false
+    options[:regexp] ||= /[^-_A-Za-z0-9]/
+    
+    str = self.strip.removeaccents
+    str.downcase! if options[:downcase]
+    str.gsub!(/\ /,'_') if options[:convert_spaces]
+    str.gsub(options[:regexp], '')
+  end
+=end
+
+end

data/lib/core-extensions/tls.rb

@@ -0,0 +1,16 @@
+class Module
+  def thread_local_attribute(name, &block)
+    proc = Proc.new if block_given?
+    key = "tls:#{name}"
+
+    singleton_class.class_eval do
+      define_method(name) do
+        Thread.current[key] ||= proc ? proc.call : nil
+      end
+
+      define_method("#{name}=") do |value|
+        Thread.current[key] = value
+      end
+    end
+  end
+end

data/lib/core-extensions/uids.rb

@@ -0,0 +1,26 @@
+require "digest/md5"
+require "forwardable"
+
+class String
+  def crc32
+    Zlib.crc32(self)
+  end
+
+  def md5
+    Digest::MD5.hexdigest(self)
+  end
+
+  # return a 64 bit uid
+  def uid64
+    md5.unpack("LL").inject { |a,b| (a << 31) + b }
+  end
+end
+
+class Hash
+  extend Forwardable
+  delegate [:uid64, :crc32, :md5] => :calculate_stable_hashable
+  
+  def calculate_stable_hashable
+    map { |k,v| "#{k.inspect}:#{v.inspect}" }.sort.join("//")
+  end
+end

data/lib/extensions/http.rb

@@ -0,0 +1,22 @@
+require 'net/http'
+
+# The Http module defines a 
+# 
+#   Http.get(url)
+#
+# method.
+module Http
+  extend self
+
+  # the default expiration time for get requests.
+  attr :max_age
+  
+  def get(url, max_age = HTTP.max_age)
+    LOGGER.benchmark("[GET] #{url}", :minimum => 20) do 
+      Cache.cached(url, max_age) do
+        uri = URI(url)
+        Net::HTTP.get(uri)
+      end
+    end
+  end
+end

data/lib/extensions/zz_geocoder.rb

@@ -0,0 +1,36 @@
+require "cgi"
+require "json"
+require "micro_sql"
+
+# A basic, caching, geocoder
+module Geocoder
+  extend self
+  
+  TIME_TO_LIVE = 3600
+  
+  def geocode(address)
+    Geocoder.cached(address) { __geocode__(address) }
+  end
+  
+  private
+  
+  def __geocode__(address)
+    url = "http://maps.google.com/maps/geo?q=#{CGI.escape(address)}&output=json&oe=utf-8"
+
+    json = Http.get(url)
+    data = JSON.parse(json)
+
+    status = data["Status"]
+    if status["code"] != 200
+      LOGGER.warn "Geocoding failed for '#{address}' with status #{status["code"]}"
+      return
+    end
+    
+    data["Placemark"].first["Point"]["coordinates"]
+  end
+  
+  def self.cached(key, &block)
+    @cache ||= MicroSql.create("#{ENV["HOME"]}/geocoder.sqdb").key_value_table("geocache")
+    @cache.cached(key, TIME_TO_LIVE, &block)
+  end
+end

data/script/watchr

@@ -0,0 +1,28 @@
+#!/usr/bin/env ruby
+require 'rb-fsevent'
+
+if ARGV.length < 2
+  STDERR.puts "watchr dir ruby-parameter(s)..."
+  abort
+end
+
+paths = ARGV.shift.split(",")
+$args = ARGV.dup
+
+
+def do_ruby
+  STDERR.puts $args.join(" ")
+  STDERR.puts "=" * 80
+  
+  system(*$args)
+end
+
+puts "Initial run"
+do_ruby
+
+fsevent = FSEvent.new
+fsevent.watch paths do |directories|
+  puts "Detected change inside: #{directories.inspect}"
+  do_ruby
+end
+fsevent.run

data/test/app_test.rb

@@ -0,0 +1,56 @@
+require 'helper'
+
+class TestApp < Test::Unit::TestCase
+  def test_root
+    expected = File.expand_path("#{File.dirname(__FILE__)}/..")
+    
+    assert_equal expected, App::Root.find_starting_in(File.dirname(__FILE__))
+    assert_equal expected, App::Root.find
+    assert_equal expected, App.root
+
+    App.root = "foo"
+    assert_equal "foo", App.root
+
+    App.root = nil
+    assert_equal expected, App.root
+  end
+
+  def test_object_attributes
+    a = {}
+    assert_raise(NoMethodError) {  
+      a.foo
+    }
+    
+    a.define_attribute :foo, "bar"
+    assert_equal("bar", a.foo)
+
+    a.define_attribute :foo, "baz"
+    assert_equal("baz", a.foo)
+
+    a.define_attribute :foo, nil
+    assert_equal(nil, a.foo)
+  end
+
+  def test_benchmark_logger
+    r = []
+    
+    logger = Logger.new(STDERR)
+    logger.formatter = proc { |_, _, _, msg| r << msg; nil }
+    
+    foo = logger.benchmark {
+      "foo"
+    }
+    assert_equal("foo", foo)
+    assert_equal(["Benchmark: 0 msecs"], r)
+
+    r = []
+    foo = logger.benchmark("message") { "foo" }
+    assert_equal("foo", foo)
+    assert_equal(["message: 0 msecs"], r)
+
+    r = []
+    foo = logger.benchmark("message", :minimum => 1) { "foo" }
+    assert_equal("foo", foo)
+    assert_equal([], r)
+  end
+end

data/test/cache_test.rb

@@ -0,0 +1,28 @@
+require 'helper'
+
+class CacheTest < Test::Unit::TestCase
+  def test_caching
+    unless App::Cache.store
+      App.logger.warn "No cache configed. Skipping cache tests"
+      return
+    end
+    
+    App::Cache.clear
+    
+    done = 0
+    r = App.cached("six") do 
+      done += 1
+      2 * 3
+    end
+
+    assert_equal(6, r)
+    
+    r = App.cached("six") do 
+      done += 1
+      2 * 3
+    end
+
+    assert_equal(1, done)
+    assert_equal(6, r)
+  end
+end

data/test/cgi_ext_test.rb

@@ -0,0 +1,19 @@
+# encoding: utf-8
+
+require 'helper'
+
+class CgiExtTest < Test::Unit::TestCase
+  def test_url_for
+    assert_equal "/abc",              CGI.url_for("/abc")
+    assert_equal "/abc?p=12",         CGI.url_for("/abc", :p => 12)
+    assert_equal "/abc?a=1&b=1&p=12", CGI.url_for("/abc?a=1&b=1", :p => 12)
+    assert_equal "/abc?p=1&p=12",     CGI.url_for("/abc?p=1", :p => 12)
+  end
+
+  def test_url_for_escaping
+    assert_equal "/abc?p=foo+bar",        CGI.url_for("/abc", :p => "foo bar")
+    assert_equal "/abc?p=foo+%3E+bar",    CGI.url_for("/abc", :p => "foo > bar")
+    assert_equal "/abc?p=foo+%26+bar",    CGI.url_for("/abc", :p => "foo & bar")
+    assert_equal "/abc?p=foo+%C3%A4+bar", CGI.url_for("/abc", :p => "foo ä bar")
+  end
+end

data/test/config.yml

@@ -0,0 +1,7 @@
+default:
+  abc: "abc"
+  dummy: "dummy"
+
+test:
+  abc: "def"
+

data/test/config_test.rb

@@ -0,0 +1,13 @@
+require 'helper'
+
+class TestConfig < Test::Unit::TestCase
+  def test_read_from_test_config
+    App.root = File.dirname __FILE__
+  
+    expected = {"abc"=>"def", "dummy"=>"dummy"}
+    assert_equal(expected, App.config)
+
+    assert_equal("def", App.config[:abc])
+    assert_equal("def", App.config["abc"])
+  end
+end

data/test/helper.rb

@@ -0,0 +1,28 @@
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+
+require 'ruby-debug'
+require 'simplecov'
+require 'test/unit'
+SimpleCov.start do
+  add_filter "test/helper.rb"
+end
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+
+require 'app'
+App.env = "test"
+
+App.logger.level = Logger::ERROR
+MicroSql.logger = App.logger
+
+class Test::Unit::TestCase
+end

data/test/string_ext_test.rb

@@ -0,0 +1,15 @@
+# encoding: utf-8
+
+require 'helper'
+
+class StringExtTest < Test::Unit::TestCase
+  def test_html_decode
+    assert_equal("a", "a".unhtml)
+    assert_equal("ä", "&auml;".unhtml)
+  end
+
+  def test_sortkey
+    assert_equal("actual", "actual".sortkey)
+    assert_equal("schreck003012", "der schreck 3/12".sortkey)
+  end
+end

data/test/tls_test.rb

@@ -0,0 +1,35 @@
+# encoding: utf-8
+
+require 'helper'
+
+class TlsTest < Test::Unit::TestCase
+  thread_local_attribute :tester
+  thread_local_attribute :dynamic do  "dynamic" end
+  thread_local_attribute :dynamic2 do "dynamic2" end
+  
+  def test_get_and_set
+    assert_equal(nil, TlsTest.tester)
+    TlsTest.tester = 1
+    assert_equal(1, TlsTest.tester)
+
+    assert_equal("dynamic", TlsTest.dynamic)
+  end
+  
+  def test_thread_locality
+    Thread.new {
+      assert_equal(nil, TlsTest.tester)
+      TlsTest.tester = 1
+      assert_equal(1, TlsTest.tester)
+
+      assert_equal("dynamic", TlsTest.dynamic)
+    }.join
+    
+    Thread.new {
+      assert_equal(nil, TlsTest.tester)
+      TlsTest.tester = 1
+      assert_equal(1, TlsTest.tester)
+
+      assert_equal("dynamic", TlsTest.dynamic)
+    }.join
+  end
+end

data/test/uid_test.rb

@@ -0,0 +1,17 @@
+# encoding: utf-8
+
+require 'helper'
+
+class UidTest < Test::Unit::TestCase
+  def test_string_uids
+    assert_equal(578656804,                           "actual".crc32)
+    assert_equal("5157e3c765af93679ea07052f30f0a6e",  "actual".md5)
+    assert_equal(1989069975706612581,                 "actual".uid64)
+  end
+
+  def test_hash_uids
+    assert_equal(2929690870,                          {1=>1}.crc32)
+    assert_equal("d0bd571dc19c083d82f023c9666c5574",  {1=>1}.md5)
+    assert_equal(3616698580463597365,                 {1=>1}.uid64)
+  end
+end

metadata

@@ -0,0 +1,184 @@
+--- !ruby/object:Gem::Specification
+name: radiospiel-app
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+  prerelease: 
+platform: ruby
+authors:
+- radiospiel
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-04-03 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: pg
+  requirement: &70231006859040 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *70231006859040
+- !ruby/object:Gem::Dependency
+  name: sqlite3
+  requirement: &70231006858260 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *70231006858260
+- !ruby/object:Gem::Dependency
+  name: redis
+  requirement: &70231006857520 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *70231006857520
+- !ruby/object:Gem::Dependency
+  name: micro_sql
+  requirement: &70231006854220 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *70231006854220
+- !ruby/object:Gem::Dependency
+  name: htmlentities
+  requirement: &70231006853600 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *70231006853600
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: &70231006852760 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70231006852760
+- !ruby/object:Gem::Dependency
+  name: jeweler
+  requirement: &70231006851660 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70231006851660
+- !ruby/object:Gem::Dependency
+  name: simplecov
+  requirement: &70231006830480 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70231006830480
+- !ruby/object:Gem::Dependency
+  name: ruby-debug19
+  requirement: &70231006829160 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70231006829160
+description: Some basics that your application could benefit from.
+email: eno@open-lab.org
+executables: []
+extensions: []
+extra_rdoc_files:
+- LICENSE.txt
+- README.rdoc
+files:
+- .document
+- Gemfile
+- Gemfile.lock
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- VERSION
+- app.gemspec
+- app.tmproj
+- config/app.yml
+- lib/app.rb
+- lib/app/app.rb
+- lib/app/app/cache.rb
+- lib/app/app/config.rb
+- lib/app/app/logger.rb
+- lib/app/app/root.rb
+- lib/core-extensions/benchmark-logger.rb
+- lib/core-extensions/cgi_ext.rb
+- lib/core-extensions/object_ext.rb
+- lib/core-extensions/string_ext.rb
+- lib/core-extensions/string_without_accents.rb
+- lib/core-extensions/tls.rb
+- lib/core-extensions/uids.rb
+- lib/extensions/http.rb
+- lib/extensions/zz_geocoder.rb
+- script/watchr
+- test/app_test.rb
+- test/cache_test.rb
+- test/cgi_ext_test.rb
+- test/config.yml
+- test/config_test.rb
+- test/helper.rb
+- test/string_ext_test.rb
+- test/tls_test.rb
+- test/uid_test.rb
+homepage: http://github.com/radiospiel/app
+licenses:
+- MIT
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+      segments:
+      - 0
+      hash: -159245804892419013
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.17
+signing_key: 
+specification_version: 3
+summary: Application base code
+test_files: []