beezwax 0.2.0 → 0.3.0

data/VERSION

@@ -1 +1 @@
-0.2.0
+0.3.0

data/lib/btrieve/btrieve_record.rb

@@ -21,6 +21,61 @@ class BtrieveRecord
   def delete
     btr_op(@session, DELETE, @btrieve_table.pos_buffer, NULL_BUFFER, NULL_BUFFER, NULL_KEY)
   end
+  
+  def get_relation_bindings(key)
+    table_map=@session.relations[@btrieve_table.tablename]
+    raise Exception.new("No relations defined for table #{@btrieve_table.tablename}") if table_map.nil?
+    relation=table_map[key]
+    raise Exception.new("No relation found named #{key.to_s} in table #{@btrieve_table.tablename}") if relation.nil?
+    bindings=relation[:join].inject({}) do |map,join|
+      value=join[1][:match]
+      map[join[0]]=join[1][:source]==:table ? self[value] : value
+      map
+    end
+    {:table=>relation[:target],:index=>relation[:index],:bindings=>bindings}
+  end
+  
+  def get_relations_bindings(keys)
+    keys.inject({}){|map,key|map[key]=self.get_relation_bindings(key);map}
+  end
+  
+  def get_all_relations_bindings()
+    relations=@session.relations[@btrieve_table.tablename]||={}
+    get_relations_bindings(relations.keys)
+  end
+  
+  def get_relation(key)
+    match=get_relation_bindings(key)
+    target_table=BtrieveTable.new(relation[:target], @session)
+    index_number=relation[:index]
+    target_table.find(match,index_number)
+  end
+  
+  def get_relations(keys)
+    keys.inject({}){|map,key|map[key]=self.get_relation(key);map}
+  end
+  
+  def get_all_relations()
+    relations=@session.relations[@btrieve_table.tablename]||={}
+    get_relations(relations.keys)
+  end
+  
+  def get_mapping(key)
+    table_map=@session.mappings[@btrieve_table.tablename]
+    raise Exception.new("No mappings defined for table #{@btrieve_table.tablename}") if table_map.nil?
+    mapping=table_map[key]
+    raise Exception.new("No mapping found named #{key.to_s} in table #{@btrieve_table.tablename}") if mapping.nil?
+    @session.mapping_functions[mapping[:transform]].call(self[mapping[:column]])
+  end
+  
+  def get_mappings(keys)
+    keys.inject({}){|map,key|map[key]=self.get_mapping(key);map}
+  end
+  
+  def get_all_mappings()
+    mappings=@session.mappings[@btrieve_table.tablename]||={}
+    get_mappings(mappings.keys)
+  end
 
   def get_attributes(keys)
     keys.inject({}){|vals, key| vals[key]=self[key]; vals}
@@ -60,13 +115,10 @@ class BtrieveRecord
   def [](key_name)
     schema_key=get_schema_key(key_name)
     return nil if(schema_key.nil?)
-    raw_data=@data_buffer.unpack(schema_key[:unpacker])[0]
-    btrieve_map = @session.btrieve_map
-    btrieve_map.up(@btrieve_table.tablename, key_name, raw_data)
+    @data_buffer.unpack(schema_key[:unpacker])[0]
   end
   
-  def []=(key_name, raw_data)
-    value=@session.btrieve_map.down(@btrieve_table.tablename, key_name, raw_data)
+  def []=(key_name, value)
     schema_key = get_schema_key(key_name)
     packer_string = schema_key[:unpacker]
     match = packer_string.match(/@(\d+)([a-zA-Z]+)(\d*)/)

data/lib/btrieve/btrieve_session.rb

@@ -2,7 +2,7 @@ class BtrieveSession
   SESSIONS = {}
   include Btrieve
   attr_reader :pathname, :client_id, :cache, :model_classes, :btrieve_schema
-  attr_accessor :btrieve_map
+  attr_accessor :mappings, :mapping_functions, :relations
 
   def self.set_context(pathname)
     session = get_session
@@ -44,7 +44,6 @@ class BtrieveSession
     @client_id = "#{0.chr*12}#{[0x5257].pack('S')}#{rand(65535)}"
     btr_op(self, SET_DIRECTORY, NULL_BUFFER, NULL_BUFFER, @pathname, NULL_KEY)
     @btrieve_schema = BtrieveSchema.new(self)
-    @btrieve_map = BtrieveMap.new()
   end
 end
 

data/lib/btrieve/btrieve_table.rb

@@ -4,7 +4,7 @@ class BtrieveTable
   include Btrieve
   attr_reader :tablename, :session, :pos_buffer, :schema
 
-  def initialize(tablename, session, schema = nil)
+  def initialize(tablename, session, schema=nil)
     @tablename = tablename
     @session = session
     @pos_buffer = Btrieve.create_string_buffer(POS_BLOCK_SIZE)
@@ -14,6 +14,33 @@ class BtrieveTable
   def open(mode = NORMAL_MODE)
     btr_op(@session, OPEN, @pos_buffer, NULL_BUFFER, @schema[:filename], mode)
   end
+  
+  def mappings()
+    @session.mappings[@tablename] ||= {} 
+  end
+  
+  def add_mapping(attr_name, mapping_name, transform)
+    mappings[mapping_name.to_sym]={:column=>attr_name.to_sym,:transform=>transform.to_sym}
+  end
+  
+  def relations()
+    @session.relations[@tablename] ||= {}
+  end
+  
+  def add_relation(name, target_table, index, join)
+    relations[name.to_sym]={:target=>target_table.to_sym,:index=>index,:join=>join}
+  end
+  
+  def find(match, index_number)
+    unique=schema[:index_flags].map{|f|f&1==1}[index_number]
+    result=nil 
+    if(unique)
+      result=find_in_unique_index(match, index_numer) 
+    else
+      result=find_in_index(match, index_numer)
+    end
+    result
+  end
 
   def find_in_unique_index(match, index_number=nil)
     finder(match, index_number) do |key_buffer, index|
@@ -77,7 +104,7 @@ class BtrieveTable
   def self.url_to_tablename(url_tablename)
     url_tablename.gsub('.and.', ' & ').gsub('ac.', 'a/c ').gsub('es.o','es - o').gsub('.',' ')
   end
-
+  
   private
 
   def step_next
@@ -101,8 +128,7 @@ class BtrieveTable
     index = @schema[:indices][index_number]
     columns = @schema[:columns]
     key_components = index.inject([]) do |vals, key| 
-      datatype = BtrieveSchema.lookup(columns[key][:datatype], columns[key][:size])[:name]
-      puts "#{key}=>#{datatype}"
+      datatype = BtrieveSchema.lookup(columns[key][:datatype], columns[key][:size])[:name]      
       value = match[key]
       value = value.to_f if FLOAT_TYPES.include?(datatype)
       value = value.to_i if INTEGER_TYPES.include?(datatype)

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: beezwax
 version: !ruby/object:Gem::Version 
-  hash: 23
+  hash: 19
   prerelease: false
   segments: 
   - 0
-  - 2
+  - 3
   - 0
-  version: 0.2.0
+  version: 0.3.0
 platform: ruby
 authors: 
 - Patrick Lardin
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-08-25 00:00:00 -07:00
+date: 2010-08-29 00:00:00 -07:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -53,7 +53,6 @@ files:
 - lib/beezwax.rb
 - lib/btrieve/btrieve_const.rb
 - lib/btrieve/btrieve_core.rb
-- lib/btrieve/btrieve_map.rb
 - lib/btrieve/btrieve_model.rb
 - lib/btrieve/btrieve_record.rb
 - lib/btrieve/btrieve_schema.rb

data/lib/btrieve/btrieve_map.rb

@@ -1,28 +0,0 @@
-class BtrieveMap
-  include Btrieve
-
-  attr_accessor :mapping
-  
-  def initialize()
-    @mapping={}
-  end
-
-  def up(tablename, column_name, value)
-    db_cast(tablename, column_name, value, :up)
-  end
-
-  def down(tablename, column_name, value)
-    db_cast(tablename, column_name, value, :down)
-  end
-
-  private
-
-  def db_cast(tablename, column_name, value, mode)
-    table=mapping[tablename.to_s]
-    return value if(table.nil?)
-    column=table[column_name.to_s]
-    return value if(column.nil?)
-    column[mode].call(value)
-  end
-
-end