bind-zone-parser 0.0.0 → 0.0.1

data/lib/bind/zone_parser.rl

@@ -32,6 +32,9 @@
   action srv            { record[:type] = :srv }
   action cname          { record[:type] = :cname }
 
+  action store_opt_ttl  { @ttl = record[:ttl] }
+  action store_opt_origin { @origin = record[:domain] }
+
   sp           = space+;
   newline      = "\n";
   comment      = space* ";" [^\n]* newline;
@@ -83,11 +86,17 @@
                | soa_record
                | srv_record;
 
-  main        := (newline | comment | record)*;
+  opt_ttl      = "$TTL" sp ttl %store_opt_ttl;
+  opt_origin   = "$ORIGIN" sp fqdname %store_opt_origin;
+  option       = (opt_ttl | opt_origin) endofline;
+
+  main        := (newline | comment | option | record)*;
 }%%
 
 module Bind
   class ZoneParser
+    attr_reader :ttl, :origin
+
     def self.parse(zone)
       new.parse(zone)
     end

data/test/examples/example.com.db

@@ -1,5 +1,6 @@
 ; Zone database file for example.com zone
 
+$ORIGIN example.com.
 @		86400	IN SOA	ns1.example.com. hostmaster (
 					 2010080201    ; Serial number
 					 3600          ; Refresh

data/test/test_zone.rb

@@ -1,13 +1,31 @@
 require 'helper'
 
 class TestBindZone < Test::Unit::TestCase
-  context ".load_file" do
+  context "Bind::Zone" do
     setup do
       @zone_file = File.expand_path('../examples/example.com.db', __FILE__)
-    end
-    should "return new zone with the records from the file" do
       @zone = Bind::Zone.load_file(@zone_file)
-      assert !@zone.records.empty?
+    end
+    context ".load_file" do
+      should "return new zone with the records from the file" do
+        assert !@zone.records.empty?
+      end
+    end
+    context "#origin" do
+      should "get origin from zone $ORIGIN definition" do
+        assert_equal "example.com.", @zone.origin
+      end
+    end
+    context "#records" do
+      setup do
+        @records = @zone.records
+      end
+      should "not be empty" do
+        assert !@records.empty?
+      end
+      should "change any blank owners to named" do
+        assert @records.all? { |r| r[:owner] != "" }
+      end
     end
   end
 end

data/test/test_zone_parser.rb

@@ -160,5 +160,25 @@ EOF
         assert @zone_parser.parse(multiline)
       end
     end
+    context "Options" do
+      context "$TTL option" do
+        should "parse the option" do
+          assert @zone_parser.parse("$TTL 144000\n")
+        end
+        should "store the result" do
+          @zone_parser.parse("$TTL 144000\n")
+          assert_equal 144000, @zone_parser.ttl
+        end
+      end
+      context "$ORIGIN option" do
+        should "parse the option" do
+          assert @zone_parser.parse("$ORIGIN example.com.\n")
+        end
+        should "store the result" do
+          @zone_parser.parse("$ORIGIN example.com.\n")
+          assert_equal "example.com.", @zone_parser.origin
+        end
+      end
+    end
   end
 end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: bind-zone-parser
 version: !ruby/object:Gem::Version 
-  hash: 31
+  hash: 29
   prerelease: false
   segments: 
   - 0
   - 0
-  - 0
-  version: 0.0.0
+  - 1
+  version: 0.0.1
 platform: ruby
 authors: 
 - Geoff Garside
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-08-25 00:00:00 +01:00
+date: 2010-08-26 00:00:00 +01:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency