KirbyBase 2.6 → 2.6.1

data/examples/memo_test/memo_test.rb

@@ -1,74 +1,74 @@
-# This script is an example of how you can use KirbyBase's new Memo field
-# type.
-
-require 'kirbybase'
-
-db = KirbyBase.new { |d| d.memo_blob_path = './memos' }
-
-#db = KirbyBase.new(:client, 'localhost', 44444)    
-
-
-# If table exists, delete it.
-db.drop_table(:plane) if db.table_exists?(:plane)
-
-# Create a table.
-plane_tbl = db.create_table(:plane, :name, :String, :country, :String, 
- :speed, :Integer, :range, :Integer, :descr, :Memo)
-
-# Create a long string field with embedded newlines for the memo contents.
-memo_string = <<END_OF_STRING
-The P-51 Mustang was the premier Allied fighter aircraft of World War II.
-It's performance and long range allowed it to escort Allied strategic
-bombers on raids deep inside Germany.
-END_OF_STRING
-
-# Create an instance of KBMemo for the memo field.
-memo = KBMemo.new(db, 'P-51.txt', memo_string)
-
-# Insert the new record, including the memo field.
-plane_tbl.insert('P-51', 'USA', 403, 1201, memo)
- 
-# Insert another record. 
-memo_string = <<END_OF_STRING
-The FW-190 was a World War II German fighter.  It was used primarily as an
-interceptor against Allied strategic bombers.
-END_OF_STRING
-
-memo = KBMemo.new(db, 'FW-190.txt', memo_string)
-plane_tbl.insert('FW-190', 'Germany', 399, 499, memo)
-
-# Select all records, print name, country, speed and range on first line.
-# Then, print contents of memo field below.
-plane_tbl.select.each { |r|
-    puts "Name: %s  Country: %s  Speed: %d  Range: %d\n\n" % [r.name, 
-     r.country, r.speed, r.range]
-    puts r.descr.contents
-    puts "\n" + "-" * 75 + "\n\n"
-}
-
-
-puts "\n\nNow we will change the memo for the P-51:\n\n"
-
-# Grab the P-51's record.
-rec = plane_tbl.select { |r| r.name == 'P-51' }.first
-
-# Grab the contents of the memo field and add a line to it.
-memo = rec.descr
-memo.contents += "This last line should show up if the memo was changed.\n"
-
-# Now, update the record with the changed contents of the memo field.
-plane_tbl.update {|r| r.name == 'P-51'}.set(:descr => memo)
-
-# Do another select to show that the memo field indeed changed.
-puts plane_tbl.select { |r| r.name == 'P-51' }.first.descr.contents
-
-
-puts "\n\nNow we will change every record's memo field:\n\n"
-
-plane_tbl.update_all { |r|
-    r.descr.contents += "I have added a line to the %s memo.\n\n" % r.name
-}
-
-# Do another select to show that the memo field for each record has
-# indeed changed.
-plane_tbl.select.each { |r| puts r.descr.contents }
+# This script is an example of how you can use KirbyBase's new Memo field
+# type.
+
+require 'kirbybase'
+
+db = KirbyBase.new { |d| d.memo_blob_path = './memos' }
+
+#db = KirbyBase.new(:client, 'localhost', 44444)    
+
+
+# If table exists, delete it.
+db.drop_table(:plane) if db.table_exists?(:plane)
+
+# Create a table.
+plane_tbl = db.create_table(:plane, :name, :String, :country, :String, 
+ :speed, :Integer, :range, :Integer, :descr, :Memo)
+
+# Create a long string field with embedded newlines for the memo contents.
+memo_string = <<END_OF_STRING
+The P-51 Mustang was the premier Allied fighter aircraft of World War II.
+It's performance and long range allowed it to escort Allied strategic
+bombers on raids deep inside Germany.
+END_OF_STRING
+
+# Create an instance of KBMemo for the memo field.
+memo = KBMemo.new(db, 'P-51.txt', memo_string)
+
+# Insert the new record, including the memo field.
+plane_tbl.insert('P-51', 'USA', 403, 1201, memo)
+ 
+# Insert another record. 
+memo_string = <<END_OF_STRING
+The FW-190 was a World War II German fighter.  It was used primarily as an
+interceptor against Allied strategic bombers.
+END_OF_STRING
+
+memo = KBMemo.new(db, 'FW-190.txt', memo_string)
+plane_tbl.insert('FW-190', 'Germany', 399, 499, memo)
+
+# Select all records, print name, country, speed and range on first line.
+# Then, print contents of memo field below.
+plane_tbl.select.each { |r|
+    puts "Name: %s  Country: %s  Speed: %d  Range: %d\n\n" % [r.name, 
+     r.country, r.speed, r.range]
+    puts r.descr.contents
+    puts "\n" + "-" * 75 + "\n\n"
+}
+
+
+puts "\n\nNow we will change the memo for the P-51:\n\n"
+
+# Grab the P-51's record.
+rec = plane_tbl.select { |r| r.name == 'P-51' }.first
+
+# Grab the contents of the memo field and add a line to it.
+memo = rec.descr
+memo.contents += "This last line should show up if the memo was changed.\n"
+
+# Now, update the record with the changed contents of the memo field.
+plane_tbl.update {|r| r.name == 'P-51'}.set(:descr => memo)
+
+# Do another select to show that the memo field indeed changed.
+puts plane_tbl.select { |r| r.name == 'P-51' }.first.descr.contents
+
+
+puts "\n\nNow we will change every record's memo field:\n\n"
+
+plane_tbl.update_all { |r|
+    r.descr.contents += "I have added a line to the %s memo.\n\n" % r.name
+}
+
+# Do another select to show that the memo field for each record has
+# indeed changed.
+plane_tbl.select.each { |r| puts r.descr.contents }

data/examples/record_class_test/record_class_test.rb

@@ -1,77 +1,77 @@
-#Test of returning result set composed of instances of user class.
-
-require 'kirbybase'
-
-class Foobar
-    attr_accessor(:recno, :name, :country, :role, :speed, :range,
-     :began_service, :still_flying, :alpha, :beta)
-     
-    def Foobar.kb_create(recno, name, country, role, speed, range,
-     began_service, still_flying)
-        name ||= 'No Name!'
-        speed ||= 0
-        began_service ||= Date.today
-        Foobar.new do |x|
-            x.recno = recno
-            x.name = name
-            x.country = country
-            x.role = role
-            x.speed = speed
-            x.range = range
-            x.began_service = began_service
-            x.still_flying = still_flying
-        end
-    end
-    
-    def initialize(&block)
-        instance_eval(&block)
-    end
-end 
-        
-# To run local, single-user, uncomment next line.
-db = KirbyBase.new 
-
-# If table exists, delete it.
-db.drop_table(:plane) if db.table_exists?(:plane)
-
-# Create a table.  Notice how you set record_class equal to your class.
-plane_tbl = db.create_table do |t|
-    t.name = :plane
-    t.field_defs = [:name, :String, :country, :String, :role, :String, 
-     :speed, :Integer, :range, :Integer, :began_service, :Date, 
-     :still_flying, :Boolean]
-    t.encrypt = false
-    t.record_class = Foobar
-end 
-
-plane_tbl = db.get_table(:plane)
-
-# Insert a record using an instance of Foobar.
-foo = Foobar.new do |x|
-    x.name = 'Spitfire'
-    x.country = 'Great Britain'
-    x.role = 'Fighter'
-    x.speed = 333
-    x.range = 454
-    x.began_service = Date.new(1936, 1, 1)
-    x.still_flying = true
-    x.alpha = "This variable won't be stored in KirbyBase."
-    x.beta = 'Neither will this one.'
-end
-plane_tbl.insert(foo)
-
-# Notice how select returns instances of Foobar, since it was defined as the
-# record class.
-recs = plane_tbl.select
-puts "Example using #kb_create"
-puts recs[0].class
-
-# Now we are going to change a couple of fields of the Spitfire's Foobar
-# object and update the Spitfire record in the Plane table with the updated 
-# Foobar object.
-recs[0].speed = 344
-recs[0].range = 555
-plane_tbl.update(recs[0]) {|r| r.name == 'Spitfire'}
-
-# Here's proof that the table was updated.
-p plane_tbl.select {|r| r.name == 'Spitfire'}
+#Test of returning result set composed of instances of user class.
+
+require 'kirbybase'
+
+class Foobar
+    attr_accessor(:recno, :name, :country, :role, :speed, :range,
+     :began_service, :still_flying, :alpha, :beta)
+     
+    def Foobar.kb_create(recno, name, country, role, speed, range,
+     began_service, still_flying)
+        name ||= 'No Name!'
+        speed ||= 0
+        began_service ||= Date.today
+        Foobar.new do |x|
+            x.recno = recno
+            x.name = name
+            x.country = country
+            x.role = role
+            x.speed = speed
+            x.range = range
+            x.began_service = began_service
+            x.still_flying = still_flying
+        end
+    end
+    
+    def initialize(&block)
+        instance_eval(&block)
+    end
+end 
+        
+# To run local, single-user, uncomment next line.
+db = KirbyBase.new 
+
+# If table exists, delete it.
+db.drop_table(:plane) if db.table_exists?(:plane)
+
+# Create a table.  Notice how you set record_class equal to your class.
+plane_tbl = db.create_table do |t|
+    t.name = :plane
+    t.field_defs = [:name, :String, :country, :String, :role, :String, 
+     :speed, :Integer, :range, :Integer, :began_service, :Date, 
+     :still_flying, :Boolean]
+    t.encrypt = false
+    t.record_class = Foobar
+end 
+
+plane_tbl = db.get_table(:plane)
+
+# Insert a record using an instance of Foobar.
+foo = Foobar.new do |x|
+    x.name = 'Spitfire'
+    x.country = 'Great Britain'
+    x.role = 'Fighter'
+    x.speed = 333
+    x.range = 454
+    x.began_service = Date.new(1936, 1, 1)
+    x.still_flying = true
+    x.alpha = "This variable won't be stored in KirbyBase."
+    x.beta = 'Neither will this one.'
+end
+plane_tbl.insert(foo)
+
+# Notice how select returns instances of Foobar, since it was defined as the
+# record class.
+recs = plane_tbl.select
+puts "Example using #kb_create"
+puts recs[0].class
+
+# Now we are going to change a couple of fields of the Spitfire's Foobar
+# object and update the Spitfire record in the Plane table with the updated 
+# Foobar object.
+recs[0].speed = 344
+recs[0].range = 555
+plane_tbl.update(recs[0]) {|r| r.name == 'Spitfire'}
+
+# Here's proof that the table was updated.
+p plane_tbl.select {|r| r.name == 'Spitfire'}

data/examples/record_class_test/record_class_test2.rb

@@ -1,38 +1,38 @@
 #Test of returning result set composed of instances of user class.  This
 #example differs from the first in that there is no kb_create method, so
 #KirbyBase will default to create a new instance of the record's custom
-#class and setting each instance attribute to each field's value.
-
-require 'kirbybase'
-
-class Foobar
-    attr_accessor(:recno, :name, :country, :role, :speed, :range,
-     :began_service, :still_flying)
-end 
-        
-# To run local, single-user, uncomment next line.
-db = KirbyBase.new 
-
-# If table exists, delete it.
-db.drop_table(:plane) if db.table_exists?(:plane)
-
-# Create a table.  Notice how you set record_class equal to your class.
-plane_tbl = db.create_table do |t|
-    t.name = :plane
-    t.field_defs = [:name, :String, :country, :String, :role, :String, 
-     :speed, :Integer, :range, :Integer, :began_service, :Date, 
-     :still_flying, :Boolean]
-    t.encrypt = false
-    t.record_class = Foobar
-end 
-
-plane_tbl = db.get_table(:plane)
-
+#class and setting each instance attribute to each field's value.
+
+require 'kirbybase'
+
+class Foobar
+    attr_accessor(:recno, :name, :country, :role, :speed, :range,
+     :began_service, :still_flying)
+end 
+        
+# To run local, single-user, uncomment next line.
+db = KirbyBase.new 
+
+# If table exists, delete it.
+db.drop_table(:plane) if db.table_exists?(:plane)
+
+# Create a table.  Notice how you set record_class equal to your class.
+plane_tbl = db.create_table do |t|
+    t.name = :plane
+    t.field_defs = [:name, :String, :country, :String, :role, :String, 
+     :speed, :Integer, :range, :Integer, :began_service, :Date, 
+     :still_flying, :Boolean]
+    t.encrypt = false
+    t.record_class = Foobar
+end 
+
+plane_tbl = db.get_table(:plane)
+
 # Insert a record.
 plane_tbl.insert('Spitfire','Great Britain','Fighter',333,454,
- Date.new(1936, 1, 1),true)
-
+ Date.new(1936, 1, 1),true)
+
 # Notice how select returns instances of Foobar, even there is no 
-# kb_create method.
-recs = plane_tbl.select
+# kb_create method.
+recs = plane_tbl.select
 p recs.first

data/examples/rename_column_test/rename_column_test.rb

@@ -1,46 +1,46 @@
-# This script is an example of how to rename a column.
-#
-require 'kirbybase'
-
-db = KirbyBase.new
-
-# If table exists, delete it.
-db.drop_table(:address_book) if db.table_exists?(:address_book)
-
-address_book_tbl = db.create_table(:address_book,
- :firstname, :String, :lastname, :String, :street_address, :String,
- :city, :String, :phone, :String, :category, :String
-)
-
-# Insert some contact info records.
-address_book_tbl.insert('Bruce', 'Wayne', '1234 Bat Cave', 'Gotham City',
- '111-111-1111', 'Super Hero')
-address_book_tbl.insert('Bugs', 'Bunny', '1234 Rabbit Hole', 'The Forest',
- '222-222-2222', 'Cartoon Character')
-address_book_tbl.insert('George', 'Bush', '1600 Pennsylvania Ave',
- 'Washington', '333-333-3333', 'President')
-address_book_tbl.insert('Silver', 'Surfer', '1234 Galaxy Way',
- 'Any City', '444-444-4444', 'Super Hero')
-
-address_book_tbl.select { |r| r.category == 'Super Hero' }.each { |r|
-    puts '%s %s %s' % [r.firstname, r.lastname, r.phone]
-}
-puts;puts
-
-address_book_tbl.rename_column(:phone, :phone_no)
-
-begin
-    address_book_tbl.select { |r| r.category == 'Super Hero' }.each { |r|
-        puts '%s %s %s' % [r.firstname, r.lastname, r.phone]
-    }
-rescue StandardError => e
-    puts e
-    puts;puts
-end
-
-address_book_tbl.select { |r| r.category == 'Super Hero' }.each { |r|
-    puts '%s %s %s' % [r.firstname, r.lastname, r.phone_no]
-}
-puts;puts
-
+# This script is an example of how to rename a column.
+#
+require 'kirbybase'
+
+db = KirbyBase.new
+
+# If table exists, delete it.
+db.drop_table(:address_book) if db.table_exists?(:address_book)
+
+address_book_tbl = db.create_table(:address_book,
+ :firstname, :String, :lastname, :String, :street_address, :String,
+ :city, :String, :phone, :String, :category, :String
+)
+
+# Insert some contact info records.
+address_book_tbl.insert('Bruce', 'Wayne', '1234 Bat Cave', 'Gotham City',
+ '111-111-1111', 'Super Hero')
+address_book_tbl.insert('Bugs', 'Bunny', '1234 Rabbit Hole', 'The Forest',
+ '222-222-2222', 'Cartoon Character')
+address_book_tbl.insert('George', 'Bush', '1600 Pennsylvania Ave',
+ 'Washington', '333-333-3333', 'President')
+address_book_tbl.insert('Silver', 'Surfer', '1234 Galaxy Way',
+ 'Any City', '444-444-4444', 'Super Hero')
+
+address_book_tbl.select { |r| r.category == 'Super Hero' }.each { |r|
+    puts '%s %s %s' % [r.firstname, r.lastname, r.phone]
+}
+puts;puts
+
+address_book_tbl.rename_column(:phone, :phone_no)
+
+begin
+    address_book_tbl.select { |r| r.category == 'Super Hero' }.each { |r|
+        puts '%s %s %s' % [r.firstname, r.lastname, r.phone]
+    }
+rescue StandardError => e
+    puts e
+    puts;puts
+end
+
+address_book_tbl.select { |r| r.category == 'Super Hero' }.each { |r|
+    puts '%s %s %s' % [r.firstname, r.lastname, r.phone_no]
+}
+puts;puts
+
 p address_book_tbl.field_names