sinatra-authentication-oran 0.0.1

data/example/tc_app.rb

@@ -0,0 +1,16 @@
+require 'rubygems'
+require 'sinatra'
+require 'haml'
+require 'rufus/tokyo'
+require 'sinatra-authentication'
+
+use Rack::Session::Cookie, :secret => "heyhihello"
+TcUserTable.cabinet_path = File.dirname(__FILE__)
+
+set :environment, 'development'
+set :public, 'public'
+set :views,  'views'
+
+get '/' do
+  haml "= render_login_logout", :layout => :layout
+end

data/example/tc_sinbook.rb

@@ -0,0 +1,62 @@
+require 'rubygems'
+require 'haml'
+require 'sinbook'
+require 'rufus/tokyo'
+require 'sinatra'
+require 'sinatra-authentication'
+
+use Rack::Session::Cookie, :secret => "heyhihello"
+TcUserTable.cabinet_path = File.dirname(__FILE__)
+
+facebook do
+  api_key 'aa2db1b96cb7b57f0c5b1d4d3d8f0a22'
+  secret '21d94ee63969ae3b3f833689838ca00f'
+  app_id 48652736613
+  url 'peoplewithjetpacks.com:4568/'
+  callback 'peoplewithjetpacks.com:4568/'
+end
+
+set :port, 4568
+
+get '/' do
+  haml :main
+end
+
+get '/test' do
+  login_required
+  'hihihi'
+end
+
+__END__
+
+@@ layout
+%html{:xmlns=>"http://www.w3.org/1999/xhtml", :'xmlns:fb'=>"http://www.facebook.com/2008/fbml"}
+  %head
+    %title Welcome to my Facebook Connect website!
+    %script{:type => 'text/javascript', :src => 'http://static.ak.connect.facebook.com/js/api_lib/v0.4/FeatureLoader.js.php/en_US'}
+    %script{:type => 'text/javascript', :src => 'http://ajax.googleapis.com/ajax/libs/jquery/1.3.2/jquery.min.js'}
+    :javascript
+      $(document).ready(function(){
+        /* test facebook crap works with ajax */
+        $('.sinatra-authentication-login').click(function(){
+          $.get($(this).attr('href'), {}, function(data){
+            $('#test_box').html(data);
+          });
+          return false;
+        });
+      });
+  %body
+    = render_login_logout
+    = yield
+    :javascript
+      FB.init("#{fb.api_key}", "/receiver")
+    #test_box
+
+@@ main
+- if fb[:user]
+  Hi,
+  %fb:profile-pic{:uid => fb[:user]}
+  %fb:name{:uid => fb[:user], :useyou => 'false', :firstnameonly => 'true'}
+  !
+  %br/
+

data/lib/models/abstract_user.rb

@@ -0,0 +1,95 @@
+current_path = File.expand_path("..", __FILE__)
+if Object.const_defined?("DataMapper")
+  #require 'dm-core'
+  require 'dm-timestamps'
+  require 'dm-validations'
+  require File.join(current_path, 'datamapper_user')
+  require File.join(current_path, 'dm_adapter')
+elsif Object.const_defined?("Rufus") && Rufus.const_defined?("Tokyo")
+  require File.join(current_path, 'rufus_tokyo_user')
+  require File.join(current_path, 'tc_adapter')
+elsif Object.const_defined?("MongoMapper")
+  require File.join(current_path, 'mongomapper_user')
+  require File.join(current_path, 'mm_adapter')
+elsif Object.const_defined?("Sequel")
+  require File.join(current_path, 'sequel_user')
+  require File.join(current_path, 'sequel_adapter')
+elsif Object.const_defined?("Mongoid")
+  require File.join(current_path, 'mongoid_user')
+  require File.join(current_path, 'mongoid_adapter')
+end
+
+class User
+  if Object.const_defined?("DataMapper")
+    include DmAdapter
+  elsif Object.const_defined?("Rufus")
+    include TcAdapter
+  elsif Object.const_defined?("MongoMapper")
+    include MmAdapter 
+  elsif Object.const_defined?("Sequel")
+    include SequelAdapter
+  elsif Object.const_defined?("Mongoid")
+    include MongoidAdapter
+  elsif Object.const_defined?("ActiveRecord")
+    include ArAdapter
+  else
+    throw "you need to require either 'dm-core', 'mongo_mapper', 'sequel', 'mongoid', or 'rufus-tokyo' for sinatra-authentication to work"
+  end
+
+  def initialize(interfacing_class_instance)
+    @instance = interfacing_class_instance
+  end
+
+  def id
+    @instance.id
+  end
+
+  def self.authenticate(email, pass)
+    current_user = get(:email => email)
+    return nil if current_user.nil?
+    return current_user if User.encrypt(pass, current_user.salt) == current_user.hashed_password
+    nil
+  end
+
+  def db_instance
+    @instance
+  end
+
+  protected
+
+  def self.encrypt(pass, salt)
+    Digest::SHA1.hexdigest(pass+salt)
+  end
+
+  def self.random_string(len)
+    #generate a random password consisting of strings and digits
+    chars = ("a".."z").to_a + ("A".."Z").to_a + ("0".."9").to_a
+    newpass = ""
+    1.upto(len) { |i| newpass << chars[rand(chars.size-1)] }
+    return newpass
+  end
+
+  #def self.page_limit
+  #  20
+  #end
+
+  #def self.page_offset(page = 0)
+  #  page.to_i * self.page_limit
+  #end
+end
+
+class Hash
+  def stringify
+    inject({}) do |options, (key, value)|
+      options[key.to_s] = value.to_s
+      options
+    end
+  end
+
+  def stringify!
+    each do |key, value|
+      delete(key)
+      store(key.to_s, value.to_s)
+    end
+  end
+end

data/lib/models/activerecord_user.rb

@@ -0,0 +1,56 @@
+unless ActiveRecord::Base.connection.table_exists?("ar_users")
+  class CreateArUsers < ActiveRecord::Migration
+    def self.up
+      create_table :ar_users do |t|
+        t.string :email
+        t.string :hashed_password
+        t.string :salt
+        t.integer :permission_level
+        t.string :fb_uid
+
+        t.timestamps
+      end
+
+      add_index :ar_users, :email, :unique => true
+    end
+
+    def self.down
+      remove_index :ar_users, :email
+      drop_table :ar_users
+    end
+  end
+
+  CreateArUsers.up
+end
+
+#require 'logger'
+#ActiveRecord::Base.logger = Logger.new(STDOUT)
+
+class ArUser < ActiveRecord::Base
+
+  attr_accessor :password, :password_confirmation
+
+  validates_format_of :email, :with => /(\A(\s*)\Z)|(\A([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,})\Z)/i
+  validates_uniqueness_of :email
+  validates_presence_of :password_confirmation, :unless => Proc.new { |t| t.hashed_password }
+  validates_presence_of :password, :unless => Proc.new { |t| t.hashed_password }
+  validates_confirmation_of :password
+
+  def password=(pass)
+    @password = pass
+    self.salt = User.random_string(10) if !self.salt
+    self.hashed_password = User.encrypt(@password, self.salt)
+  end
+
+  def admin?
+    self.permission_level == -1 || self.id == 1
+  end
+
+  def site_admin?
+    self.id == 1
+  end
+
+  def to_ary
+    self.attributes.values
+  end
+end

data/lib/models/ar_adapter.rb

@@ -0,0 +1,66 @@
+module ArAdapter
+  def self.included(base)
+    base.extend ClassMethods
+    base.class_eval { include ArAdapter::InstanceMethods }
+  end
+
+  module ClassMethods
+    #pass all args to this
+    def all
+      result = ArUser.all(:order => ["created_at DESC"])
+      result.collect {|instance| self.new instance}
+    end
+
+    def get(hash)
+      if user = ArUser.where(hash).first
+        self.new user
+      else
+        nil
+      end
+    end
+
+    def set(attributes)
+      user = ArUser.new attributes
+      user.save
+      self.new user
+    end
+
+    def set!(attributes)
+      user = ArUser.new attributes
+      user.save!
+      self.new user
+    end
+
+    def delete(pk)
+      user = ArUser.first(pk).first
+      user.destroy
+      user.destroyed?
+    end
+  end
+
+  module InstanceMethods
+    def valid
+      @instance.valid?
+    end
+
+    def errors
+      @instance.errors.collect do |k,v|
+        "#{k} #{v}"
+      end.join(', ')
+    end
+
+    def update(attributes)
+      @instance.update_attributes attributes
+      #self
+    end
+
+    def saved
+      @instance.valid?
+    end
+
+    def method_missing(meth, *args, &block)
+      #cool I just found out * on an array turns the array into a list of args for a function
+      @instance.send(meth, *args, &block)
+    end
+  end
+end

data/lib/models/datamapper_user.rb

@@ -0,0 +1,43 @@
+class DmUser
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :email, String, :length => (5..40), :unique => true, :format => :email_address
+  property :hashed_password, String
+  property :salt, String
+  #Was DateTime should be DateTime?
+  property :created_at, Time
+  property :permission_level, Integer, :default => 1
+  if Sinatra.const_defined?('FacebookObject')
+    property :fb_uid, String
+  end
+
+  attr_accessor :password, :password_confirmation
+  #protected equievelant? :protected => true doesn't exist in dm 0.10.0
+  #protected :id, :salt
+  #doesn't behave correctly, I'm not even sure why I did this.
+
+  validates_presence_of :password_confirmation, :unless => Proc.new { |t| t.hashed_password }
+  validates_presence_of :password, :unless => Proc.new { |t| t.hashed_password }
+  validates_confirmation_of :password
+
+  def password=(pass)
+    @password = pass
+    self.salt = User.random_string(10) if !self.salt
+    self.hashed_password = User.encrypt(@password, self.salt)
+  end
+
+  def admin?
+    self.permission_level == -1 || self.id == 1
+  end
+
+  def site_admin?
+    self.id == 1
+  end
+
+  protected
+
+  def method_missing(m, *args)
+    return false
+  end
+end

data/lib/models/dm_adapter.rb

@@ -0,0 +1,61 @@
+module DmAdapter
+  def self.included(base)
+    base.extend ClassMethods
+    base.class_eval { include DmAdapter::InstanceMethods }
+  end
+
+  module ClassMethods
+    #pass all args to this
+    def all
+      result = DmUser.all(:order => [:created_at.desc])
+      result.collect {|instance| self.new instance}
+    end
+
+    def get(hash)
+      if user = DmUser.first(hash)
+        self.new user
+      else
+        nil
+      end
+    end
+
+    def set(attributes)
+      user = DmUser.new attributes
+      user.save
+      self.new user
+    end
+
+    def set!(attributes)
+      user = DmUser.new attributes
+      user.save!
+      self.new user
+    end
+
+    def delete(pk)
+      user = DmUser.first(:id => pk)
+      user.destroy
+    end
+  end
+
+  module InstanceMethods
+    def valid
+      @instance.valid?
+    end
+
+    def errors
+      @instance.errors.collect do |k,v|
+        "#{k} #{v}"
+      end.join(', ')
+    end
+
+    def update(attributes)
+      @instance.update attributes
+      #self
+    end
+
+    def method_missing(meth, *args, &block)
+      #cool I just found out * on an array turns the array into a list of args for a function
+      @instance.send(meth, *args, &block)
+    end
+  end
+end

data/lib/models/mm_adapter.rb

@@ -0,0 +1,65 @@
+module MmAdapter 
+  def self.included(base)
+    base.extend ClassMethods
+    base.class_eval { include MmAdapter::InstanceMethods }
+  end
+
+  module ClassMethods
+    def all
+      result = MmUser.all(:order => 'created_at desc')
+      result.collect {|instance| self.new instance}
+    end
+
+    def get(hash)
+      if user = MmUser.first(hash)
+        self.new user
+      else
+        nil
+      end
+    end
+
+    def set(attributes)
+      #puts attributes.inspect
+      user = MmUser.new attributes
+      user.id = nil unless user.save
+      self.new user
+    end
+
+    def set!(attributes)
+      user = MmUser.new attributes
+      user.save(:validate => false)
+      self.new user
+    end
+
+    def delete(pk)
+      user = MmUser.first(:id => pk)
+      #returns nil on success. Is this correct? Will it return something else on failure?
+      user.destroy
+      user.destroyed?
+    end
+  end
+
+  module InstanceMethods
+    def valid
+      @instance.valid?
+    end
+
+    def update(attributes)
+      @instance.update_attributes attributes
+      @instance.save
+    end
+
+    def saved
+      @instance.valid?
+    end
+
+    def errors
+      @instance.errors.full_messages.join(', ')
+    end
+
+    def method_missing(meth, *args, &block)
+      #cool I just found out * on an array turns the array into a list of args for a function
+      @instance.send(meth, *args, &block)
+    end
+  end
+end