activesalesforce 0.0.2

data/README

@@ -0,0 +1,23 @@
+== Welcome to Active Salesforce
+
+  ActiveSalesforce is an extension to the Rails Framework that allows for the dynamic creation and management of 
+  ActiveRecord objects through the use of Salesforce meta-data and uses a Salesforce.com organization as the backing store.
+
+
+== Getting started
+
+1. TBD Add in info on editing scripts/generate and scripts/server + database.yml
+
+
+== Description of contents
+
+lib
+  Application specific libraries. Basically, any kind of custom code that doesn't
+  belong under controllers, models, or helpers. This directory is in the load path.
+  
+script
+  Helper scripts for automation and generation.
+
+test
+  Unit and functional tests along with fixtures.
+

data/lib/column_definition.rb

@@ -0,0 +1,82 @@
+=begin
+  ActiveSalesforce
+  Copyright (c) 2006 Doug Chasman
+
+  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.
+=end
+
+require 'rubygems'
+require_gem 'rails', ">= 1.0.0"
+
+#require 'active_record/connection_adapters/abstract_adapter'
+#require 'active_record/connection_adapters/abstract/schema_definitions'
+
+module ActiveRecord  
+  module ConnectionAdapters
+    class SalesforceColumn < Column
+      attr_reader :label, :readonly, :reference_to
+      
+      def initialize(field)
+        @name = field[:name]
+        @type = get_type(field[:type])
+        @limit = field[:length]
+        @label = field[:label]
+        
+        @text = [:string, :text].include? @type
+        @number = [:float, :integer].include? @type
+        
+        @readonly = (field[:updateable] != "true" or field[:createable] != "true")
+        
+        if field[:type] =~ /reference/i
+          @reference_to = field[:referenceTo]
+        end
+      end
+      
+      def get_type(field_type)
+          case field_type
+            when /int/i
+              :integer
+            when /currency|percent/i
+              :float
+            when /datetime/i
+              :datetime
+            when /date/i
+              :date
+            when /id|string|textarea/i
+              :text
+            when /phone|fax|email|url/i
+              :string
+            when /blob|binary/i
+              :binary
+            when /boolean/i
+              :boolean
+            when /picklist/i
+              :text
+            when /reference/i
+              :text
+          end
+      end
+      
+      def human_name
+        @label
+      end
+
+    end
+  end
+end    

data/lib/rforce.rb

@@ -0,0 +1,226 @@
+require 'net/https'
+require 'uri'
+require 'rexml/document'
+require 'rexml/xpath'
+require 'rubygems'
+require_gem 'builder'
+
+=begin
+  RForce v0.1
+  Copyright (c) 2005 Ian Dees
+
+  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.
+=end
+
+#  RForce is a simple Ruby binding to the SalesForce CRM system.
+#  Rather than enforcing adherence to the sforce.com schema,
+#  RForce assumes you are familiar with the API.  Ruby method names
+#  become SOAP method names.  Nested Ruby hashes become nested
+#  XML elements.  
+#  
+#  Example:
+#
+#    binding = RForce::Binding.new 'na1-api.salesforce.com'
+#    binding.login 'username', 'password'
+#    answer = binding.search(
+#      :searchString =>
+#        'find {Some Account Name} in name fields returning account(id)')
+#    account_id = answer.searchResponse.result.searchRecords.record.Id
+#
+#    opportunity = {
+#      :accountId => account_id,
+#      :amount => "10.00",
+#      :name => "New sale",
+#      :closeDate => "2005-09-01",
+#      :stageName => "Closed Won"
+#    }
+#
+#    binding.create 'sObject {"xsi:type" => "Opportunity"}' => opportunity
+#
+module RForce
+
+  #Allows indexing hashes like method calls: hash.key
+  #to supplement the traditional way of indexing: hash[key]
+  module FlashHash
+    def method_missing(method, *args)
+      self[method]
+    end
+  end
+
+  #Turns an XML response from the server into a Ruby
+  #object whose methods correspond to nested XML elements.
+  class SoapResponse
+    include FlashHash
+
+    #Parses an XML string into structured data.
+    def initialize(content)
+      document = REXML::Document.new content
+      node = REXML::XPath.first document, '//soapenv:Body'
+      @parsed = SoapResponse.parse node
+    end
+
+    #Allows this object to act like a hash (and therefore
+    #as a FlashHash via the include above).
+    def [](symbol)
+      @parsed[symbol]
+    end
+  
+    #Digests an XML DOM node into nested Ruby types.
+    def SoapResponse.parse(node)
+      #Convert text nodes into simple strings.
+      return node.text unless node.has_elements?
+
+      #Convert nodes with children into FlashHashes.
+      elements = {}
+      class << elements
+        include FlashHash
+      end
+    
+      #Add all the element's children to the hash.
+      node.each_element do |e|
+        name = e.name.to_sym
+        
+        case elements[name]
+          #The most common case: unique child element tags.
+          when NilClass: elements[name] = parse(e)
+          
+          #Non-unique child elements become arrays:
+          
+          #We've already created the array: just
+          #add the element.
+          when Array: elements[name] << parse(e)
+          
+          #We haven't created the array yet: do so,
+          #then put the existing element in, followed
+          #by the new one.
+          else
+            elements[name] = [elements[name]]
+            elements[name] << parse(e)
+        end
+      end
+    
+      return elements
+    end
+  end
+
+  #Implements the connection to the SalesForce server.
+  class Binding
+    #Fill in the guts of this typical SOAP envelope
+    #with the session ID and the body of the SOAP request.
+    Envelope = <<-HERE
+<?xml version="1.0" encoding="utf-8" ?>
+<env:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+    xmlns:env="http://schemas.xmlsoap.org/soap/envelope/"
+    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <env:Header>
+    <SessionHeader>
+      <sessionId>%s</sessionId>
+    </SessionHeader>
+  </env:Header>
+  <env:Body>
+    %s
+  </env:Body>
+</env:Envelope>
+    HERE
+
+    #Connect to the server securely.
+    def initialize(url)
+      @url = URI.parse(url)
+      @server = Net::HTTP.new(@url.host, @url.port)
+      @server.use_ssl = @url.scheme == 'https'
+      
+      # run ruby with -d to see SOAP wiredumps.
+      @server.set_debug_output $stderr if $DEBUG
+      
+      @session_id = ''
+    end
+  
+    #Log in to the server and remember the session ID
+    #returned to us by SalesForce.
+    def login(user, pass)
+      response = call_remote(:login, [:username, user, :password, pass])
+
+      raise "Incorrect user name / password [#{response.fault}]" unless response.loginResponse
+      @session_id = response.loginResponse.result.sessionId
+      response
+    end
+  
+    #Call a method on the remote server.  Arguments can be
+    #a hash or (if order is important) an array of alternating
+    #keys and values.
+    def call_remote(method, args)
+      #Create XML text from the arguments.
+      expanded = ''
+      @builder = Builder::XmlMarkup.new(:target => expanded)
+      expand({method => args}, 'urn:partner.soap.sforce.com')
+
+      #Fill in the blanks of the SOAP envelope with our
+      #session ID and the expanded XML of our request.
+      request = (Envelope % [@session_id, expanded])
+
+      #Send the request to the server and read the response.    
+      response = @server.post2(@url.path, request, {'SOAPAction' => method.to_s, 'content-type' => 'text/xml'})
+      SoapResponse.new(response.body)
+    end
+  
+    #Turns method calls on this object into remote SOAP calls.
+    def method_missing(method, *args)
+      unless args.size == 1 && [Hash, Array].include?(args[0].class)
+        raise 'Expected 1 Hash or Array argument'
+      end
+
+      call_remote method, args[0]    
+    end
+  
+    #Expand Ruby data structures into XML.
+    def expand(args, xmlns = nil)
+      #Nest arrays: [:a, 1, :b, 2] => [[:a, 1], [:b, 2]]
+      if (args.class == Array)
+        args.each_index{|i| args[i, 2] = [args[i, 2]]}
+      end
+    
+      args.each do |key, value|
+        attributes = xmlns ? {:xmlns => xmlns} : {}
+
+		#If the XML tag requires attributes,
+		#the tag name will contain a space
+		#followed by a string representation
+		#of a hash of attributes.
+		#
+		#e.g. 'sObject {"xsi:type" => "Opportunity"}'
+		#becomes <sObject xsi:type="Opportunity>...</sObject>
+        if key.is_a? String
+           key, modifier = key.split(' ', 2)
+           
+           attributes.merge!(eval(modifier)) if modifier
+        end
+        
+        #Create an XML element and fill it with this
+        #value's sub-items.
+        case value
+          when Hash, Array
+            @builder.tag!(key, attributes) do expand value; end
+          
+          when String
+            @builder.tag!(key, attributes) { @builder.text! value }
+        end
+      end
+    end
+  end
+end

data/lib/salesforce_active_record.rb

@@ -0,0 +1,131 @@
+=begin
+  ActiveSalesforce
+  Copyright (c) 2006 Doug Chasman
+
+  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.
+=end
+
+require 'xsd/datatypes'
+require 'soap/soap'
+
+require File.dirname(__FILE__) + '/sobject_attributes'
+
+
+module ActiveRecord
+  # Active Records will automatically record creation and/or update timestamps of database objects
+  # if fields of the names created_at/created_on or updated_at/updated_on are present. This module is
+  # automatically included, so you don't need to do that manually.
+  #
+  # This behavior can be turned off by setting <tt>ActiveRecord::Base.record_timestamps = false</tt>.
+  # This behavior can use GMT by setting <tt>ActiveRecord::Base.timestamps_gmt = true</tt>
+  module SalesforceRecord 
+    include SOAP, XSD
+
+    NS1 = 'urn:partner.soap.sforce.com'
+    NS2 = "urn:sobject.partner.soap.sforce.com"    
+
+    def self.append_features(base) # :nodoc:
+      super
+
+      base.class_eval do
+        alias_method :create, :create_with_sforce_api
+        alias_method :update, :update_with_sforce_api
+      end
+    end    
+      
+    def create_with_sforce_api
+      return if not @attributes.changed?
+      puts "create_with_sforce_api creating #{self.class}"
+      connection.create(:sObjects => create_sobject())
+    end
+
+    def update_with_sforce_api
+      return if not @attributes.changed?
+      puts "update_with_sforce_api updating #{self.class}('#{self.Id}')"
+      connection.update(:sObjects => create_sobject())
+    end
+    
+    def create_sobject()
+      fields = @attributes.changed_fields
+
+      sobj = [ 'type { :xmlns => "urn:sobject.partner.soap.sforce.com" }', self.class.name ]
+      sobj << 'Id { :xmlns => "urn:sobject.partner.soap.sforce.com" }' << self.Id if self.Id    
+            
+      # now add any changed fields
+      fieldValues = {}
+      fields.each do |fieldName|
+        value = @attributes[fieldName]
+        sobj << fieldName.to_sym << value if value
+      end
+      
+      sobj
+    end
+
+  end 
+  
+  class Base
+    set_inheritance_column nil
+    lock_optimistically = false
+    record_timestamps = false
+    default_timezone = :utc
+    
+    def after_initialize() 
+      if not @attributes.is_a?(Salesforce::SObjectAttributes)
+        # Insure that SObjectAttributes is always used for our atttributes
+        originalAttributes = @attributes 
+        
+        @attributes = Salesforce::SObjectAttributes.new(connection.columns_map(self.class.table_name))
+        
+        originalAttributes.each { |name, value| self[name] = value }
+      end
+    end
+  
+    def self.table_name
+      class_name_of_active_record_descendant(self)
+    end
+    
+    def self.primary_key
+      "Id"
+    end
+  
+    def self.construct_finder_sql(options)
+      soql = "SELECT #{column_names.join(', ')} FROM #{table_name} "
+      add_conditions!(soql, options[:conditions])
+      soql
+    end
+    
+    def self.construct_conditions_from_arguments(attribute_names, arguments)
+      conditions = []
+      attribute_names.each_with_index { |name, idx| conditions << "#{name} #{attribute_condition(arguments[idx])} " }
+      [ conditions.join(" AND "), *arguments[0...attribute_names.length] ]
+    end
+    
+    def self.count(conditions = nil, joins = nil)
+        soql  = "SELECT Id FROM #{table_name} "
+        add_conditions!(soql, conditions)
+        
+        count_by_sql(soql)
+    end
+    
+    def self.count_by_sql(soql)
+      connection.select_all(soql, "#{name} Count").length
+    end  
+
+  end
+end

data/lib/salesforce_connection_adapter.rb

@@ -0,0 +1,212 @@
+=begin
+  ActiveSalesforce
+  Copyright (c) 2006 Doug Chasman
+
+  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.
+=end
+
+require 'rubygems'
+require_gem 'rails', ">= 1.0.0"
+
+require 'thread'
+
+require File.dirname(__FILE__) + '/salesforce_login'
+require File.dirname(__FILE__) + '/sobject_attributes'
+require File.dirname(__FILE__) + '/salesforce_active_record'
+require File.dirname(__FILE__) + '/column_definition'
+
+ActiveRecord::Base.class_eval do
+    include ActiveRecord::SalesforceRecord
+end
+
+
+module ActiveRecord    
+  class Base   
+    @@cache = {}
+
+    # Establishes a connection to the database that's used by all Active Record objects.
+    def self.salesforce_connection(config) # :nodoc:
+      puts "Using Salesforce connection!"
+
+      config = config.symbolize_keys
+
+      url = config[:url].to_s
+      username = config[:username].to_s
+      password = config[:password].to_s
+      
+      connection = @@cache["#{url}.#{username}.#{password}"]
+
+      if not connection
+        connection = SalesforceLogin.new(url, username, password).proxy 
+        @@cache["#{url}.#{username}.#{password}"] = connection
+        puts "Created new connection for [#{url}, #{username}]"
+      end
+            
+      #puts "connected to Salesforce as #{connection.getUserInfo(nil).result['userFullName']}"
+      
+      ConnectionAdapters::SalesforceAdapter.new(connection, logger, [url, username, password], config)
+    end
+  end
+  
+
+  module ConnectionAdapters
+    class SalesforceError < StandardError
+    end
+    
+    class SalesforceAdapter < AbstractAdapter
+
+      def initialize(connection, logger, connection_options, config)
+        super(connection, logger)
+        
+        @connection_options, @config = connection_options, config
+        @columns_name_map = {}
+      end
+
+      def adapter_name #:nodoc:
+        'Salesforce'
+      end
+
+      def supports_migrations? #:nodoc:
+        false
+      end
+
+
+      # QUOTING ==================================================
+
+      def quote(value, column = nil)
+        if value.kind_of?(String) && column && column.type == :binary
+          s = column.class.string_to_binary(value).unpack("H*")[0]
+          "x'#{s}'"
+        else
+          super
+        end
+      end
+
+      def quote_column_name(name) #:nodoc:
+        "`#{name}`"
+      end
+
+      def quote_string(string) #:nodoc:
+        string
+      end
+
+      def quoted_true
+        "TRUE"
+      end
+      
+      def quoted_false
+        "FALSE"
+      end
+
+
+      # CONNECTION MANAGEMENT ====================================
+
+      def active?
+        true
+      end
+
+      def reconnect!
+        connect
+      end
+
+
+      # DATABASE STATEMENTS ======================================
+
+      def select_all(soql, name = nil) #:nodoc:
+        log(soql, name)
+        
+        records = @connection.query(:queryString => soql).queryResponse.result.records
+        
+        records = [ records ] unless records.is_a?(Array)
+
+        result = []        
+        records.each do |record|
+          attributes = Salesforce::SObjectAttributes.new(columns_map(record[:type]), record)
+          result << attributes
+        end
+        
+        result
+      end
+
+      def select_one(sql, name = nil) #:nodoc:
+        result = select_all(sql, name)
+        result.nil? ? nil : result.first
+      end
+
+      def create(sobject, name = nil) #:nodoc:
+        result = @connection.create(sobject).createResponse.result
+        
+        raise SalesforceError, result.errors.message  unless result.success == "true"
+        
+        # @connection.affected_rows
+      end
+      
+      def update(sobject, name = nil) #:nodoc:
+        result = @connection.update(sobject).updateResponse.result
+
+        raise SalesforceError, result.errors.message  unless result.success == "true"
+        
+        # @connection.affected_rows
+      end
+      
+      alias_method :delete, :update 
+
+      def columns(table_name, name = nil)
+        columns = []
+        
+        metadata = @connection.describeSObject(:sObjectType => table_name).describeSObjectResponse.result
+        
+        metadata.fields.each do |field| 
+          columns << SalesforceColumn.new(field) 
+        end
+        
+        columns
+      end
+
+      def columns_map(table_name, name = nil)
+        columns_map = @columns_name_map[table_name]
+        return columns_map if columns_map
+
+        columns_map = {}
+        @columns_name_map[table_name] = columns_map
+        
+        columns(table_name).each { |column| columns_map[column.name] = column }
+        
+        columns_map
+      end
+
+      private
+
+        def select(sql, name = nil)
+          puts "select(#{sql}, (#{name}))"
+          @connection.query_with_result = true
+          result = execute(sql, name)
+          rows = []
+          if @null_values_in_each_hash
+            result.each_hash { |row| rows << row }
+          else
+            all_fields = result.fetch_fields.inject({}) { |fields, f| fields[f.name] = nil; fields }
+            result.each_hash { |row| rows << all_fields.dup.update(row) }
+          end
+          result.free
+          rows
+        end
+    end
+  end
+end

data/lib/salesforce_login.rb

@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+
+=begin
+  ActiveSalesforce
+  Copyright (c) 2006 Doug Chasman
+
+  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.
+=end
+
+require File.dirname(__FILE__) + '/rforce.rb'
+
+
+class SalesforceLogin
+  attr_reader :proxy
+  
+  def initialize(url, username, password) 
+    puts "SalesforceLogin.initialize()"
+
+    @proxy = RForce::Binding.new(url)
+    
+    login_result = @proxy.login(username, password).result
+  end
+end

data/lib/sobject_attributes.rb

@@ -0,0 +1,132 @@
+=begin
+  ActiveSalesforce
+  Copyright (c) 2006 Doug Chasman
+
+  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.
+=end
+
+require 'set'
+
+
+module Salesforce
+
+  class SObjectAttributes 
+    include Enumerable
+    
+    def initialize(columns, record = nil)
+      @columns = columns
+      @values = {}
+      
+      if record 
+        record.each do |name, value| 
+          # Replace nil element with nil
+          value = nil if value.respond_to?(:xmlattr_nil) and value.xmlattr_nil
+                             
+          # Ids are returned in an array with 2 duplicate entries...
+          value = value[0] if name == :Id
+              
+          self[name.to_s] = value
+        end
+      else
+        columns.values.each { |column| self[column.name] = nil }
+      end
+                 
+      clear_changed!
+    end
+    
+    def [](key)
+      @values[key].freeze
+    end
+    
+    def []=(key, value)
+      column = @columns[key]
+      return unless column
+      
+      value = nil if value == ""
+
+      return if @values[key] == value and @values.include?(key)
+      
+      originalClass = value.class
+      originalValue = value
+      
+      if value 
+        # Convert strings representation of dates and datetimes to date and time objects
+        case column.type
+          when :date
+            value = value.is_a?(Date) ? value : Date.parse(value)
+          when :datetime
+            value = value.is_a?(Time) ? value : Time.parse(value)
+          else
+            value = column.type_cast(value)
+        end
+      end
+
+      @values[key] = value
+      
+      #puts "setting #{key} = #{value} [#{originalValue}] (#{originalClass}, #{value.class})"
+      
+      if not column.readonly
+        @changed = Set.new unless @changed
+        @changed.add(key)
+      end
+    end
+    
+    def include?(key)
+      @values.include?(key)
+    end
+    
+    def has_key?(key)
+      @values.has_key?(key)
+    end
+    
+    def length
+      @values.length
+    end
+    
+    def keys
+      @values.keys
+    end
+    
+    def clear
+      @values.clear
+      clear_changed
+    end
+    
+    def clear_changed!
+      @changed = nil
+    end
+    
+    def changed?
+      @changed != nil
+    end
+    
+    def changed_fields
+      @changed
+    end
+    
+    
+    # Enumerable support
+    
+    def each(&block)
+      @values.each(&block)
+    end
+    
+  end
+
+end

data/test/unit/account_test.rb

@@ -0,0 +1,42 @@
+require File.join(File.dirname(__FILE__), '../../config/boot')
+require  '~/dev/activesfdc/trunk/ActiveSalesforce/src/salesforce_connection_adapter'
+require File.dirname(__FILE__) + '/../test_helper'
+
+
+
+class AccountTest < Test::Unit::TestCase
+
+  def test_get_account 
+    products = Account.find(:all)
+    #pp products
+      
+    products.each { |product| puts "#{product.Name}, #{product.Id}, #{product.LastModifiedById}, #{product.Description}" }
+  
+    acme = Account.find(:first, :conditions => ["Name = 'Acme'"])
+    puts acme.Name
+  
+    acme = Account.find_by_Id(acme.Id)
+    puts acme.Name
+
+    acme = Account.find_by_Name_and_LastModifiedById('salesforce.com', acme.LastModifiedById)
+    puts acme.Name
+  end
+
+  def test_update_account
+    #return
+    
+    acme = Account.find_by_Name('Acme')
+    puts acme.Name
+        
+    acme.Website = "http://www.dutchforce.com/myImage2.jpg"
+    
+    acme.save
+  end
+    
+  def test_xcreate_account
+    dutchCo = Account.new 
+    dutchCo.Name = "DutchCo"
+    dutchCo.save
+  end
+  
+end

data/test/unit/sobject_attributes_test.rb

@@ -0,0 +1,38 @@
+puts "Yahoo"
+
+require 'test/unit'
+require File.dirname(__FILE__) + '/../../src/sobject_attributes'
+
+class SobjectAttributesTest < Test::Unit::TestCase
+
+  def setup 
+    @attributes = Salesforce::SObjectAttributes.new 
+  end
+  
+  def test_add_values() 
+    assert((not @attributes.changed?))
+    
+    @attributes['name'] = 'value'    
+    assert(@attributes.changed?)
+    
+    assert_equal('value', @attributes['name'])
+    
+    assert_equal(Set.new('name'), @attributes.changed_fields)
+
+    @attributes.clear_changed!    
+    assert((not @attributes.changed?))
+    
+    assert_equal('value', @attributes['name'])
+  end
+  
+  def test_enumeration
+    10.times { |n| @attributes["name_#{n}"] = "value_#{n}" }
+    
+    assert_equal(10, @attributes.length)
+    
+    5.times { |n| @attributes["name_#{n + 10}"] = "value_#{n + 10}" }
+    
+    @attributes.each { |name, value| assert_equal(name[/_\d/],  value[/_\d/]) }
+  end
+  
+end

metadata

@@ -0,0 +1,71 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11
+specification_version: 1
+name: activesalesforce
+version: !ruby/object:Gem::Version 
+  version: 0.0.2
+date: 2006-01-18 00:00:00 -05:00
+summary: ActiveSalesforce is an extension to the Rails Framework that allows for the dynamic creation and management of ActiveRecord objects through the use of Salesforce meta-data and uses a Salesforce.com organization as the backing store.
+require_paths: 
+- lib
+email: dchasman@salesforce.com
+homepage: http://rubyforge.org/projects/activesfdc/
+rubyforge_project: 
+description: 
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+authors: 
+- Doug Chasman
+files: 
+- lib/salesforce_login.rb
+- lib/salesforce_active_record.rb
+- lib/column_definition.rb
+- lib/rforce.rb
+- lib/sobject_attributes.rb
+- lib/salesforce_connection_adapter.rb
+- test/unit
+- test/unit/sobject_attributes_test.rb
+- test/unit/account_test.rb
+- README
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: 
+- README
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rails
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.0.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: builder
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.2.4
+    version: