rcap-rails-generators 1.3

data/lib/generators/rcap/models/templates/models/area.rb

@@ -0,0 +1,156 @@
+# An Area object is valid if
+# * it has an area description
+# * all Circle objects contained in circles are valid
+# * all Geocode objects contained in geocodes are valid
+# * all Polygon objects contained in polygons are valid
+# * altitude has a value if ceiling is set
+class Area < ActiveRecord::Base
+  include Validation
+
+	belongs_to :item
+
+	# Area Description - Textual description of area.
+	attr_accessor( :area_desc )
+	# Expressed in feet above sea level
+  attr_accessor( :altitude )
+	# Expressed in feet above sea level.
+	attr_accessor( :ceiling )
+	# Collection of Circle objects
+  attr_reader( :circles )
+	# Collection of Geocode objects
+	attr_reader( :geocodes )
+	# Collection of Polygon objects
+	attr_reader( :polygons )
+
+  validates_presence_of( :area_desc )
+  validates_collection_of( :circles, :geocodes, :polygons )
+  validates_dependency_of( :ceiling, :on => :altitude )
+
+  XML_ELEMENT_NAME       = 'area'     # :nodoc:
+  AREA_DESC_ELEMENT_NAME = 'areaDesc' # :nodoc:
+  ALTITUDE_ELEMENT_NAME  = 'altitude' # :nodoc:
+  CEILING_ELEMENT_NAME   = 'ceiling'  # :nodoc:
+
+  XPATH           = "cap:#{ XML_ELEMENT_NAME }"       # :nodoc:
+  AREA_DESC_XPATH = "cap:#{ AREA_DESC_ELEMENT_NAME }" # :nodoc:
+  ALTITUDE_XPATH  = "cap:#{ ALTITUDE_ELEMENT_NAME }"  # :nodoc:
+  CEILING_XPATH   = "cap:#{ CEILING_ELEMENT_NAME }"   # :nodoc:
+
+  def initialize( attributes = {})
+    @area_desc = attributes[ :area_desc ]
+    @altitude  = attributes[ :altitude ]
+    @ceiling   = attributes[ :ceiling ]
+    @circles   = Array( attributes[ :circles ])
+    @geocodes  = Array( attributes[ :geocodes ])
+    @polygons  = Array( attributes[ :polygons ])
+  end
+
+  def to_xml_element # :nodoc:
+    xml_element = REXML::Element.new( XML_ELEMENT_NAME )
+    xml_element.add_element( AREA_DESC_ELEMENT_NAME ).add_text( @area_desc.to_s )
+    add_to_xml_element = lambda do |element, object|
+      element.add_element( object.to_xml_element )
+      element
+    end
+    @polygons.inject( xml_element, &add_to_xml_element )
+    @circles.inject( xml_element, &add_to_xml_element )
+    @geocodes.inject( xml_element, &add_to_xml_element )
+    xml_element.add_element( ALTITUDE_ELEMENT_NAME ).add_text( @altitude.to_s ) unless self.altitude.blank?
+    xml_element.add_element( CEILING_ELEMENT_NAME ).add_text( @ceiling.to_s )   unless self.altitude.blank?
+    xml_element
+  end
+
+  def to_xml # :nodoc:
+    self.to_xml_element.to_s
+  end
+
+	# Implements an equality operator for the Area object. Two Area objects are equal if all their attributes are equal.
+	def ==( other )
+		comparison_attributes = lambda{ |area| [ area.area_desc, area.altitude, area.ceiling, area.circles, area.geocodes, area.polygons ]}
+		comparison_attributes.call( self ) == comparison_attributes.call( other )
+	end
+
+	def inspect # :nodoc:
+    area_inspect =  <<EOF
+Area Description: #{ self.area_desc }
+Polygons:
+#{ self.polygons.map{ |polygon| "  " + polygon.inspect }.join("\n" )}
+Circles:          #{ self.circles.inspect }
+Geocodes:         #{ self.geocodes.inspect }
+EOF
+    RCAP.format_lines_for_inspect( 'AREA', area_inspect )
+	end
+
+	# Returns a string representation of the area of the form
+	#  area_desc
+  def to_s
+    self.area_desc
+  end
+
+  def self.from_xml_element( area_xml_element ) # :nodoc:
+    RCAP::Area.new( :area_desc => RCAP.xpath_text( area_xml_element, AREA_DESC_XPATH ),
+										:altitude  => (( alt = RCAP.xpath_text( area_xml_element, ALTITUDE_XPATH )) ? alt.to_f : nil ),
+										:ceiling   => (( ceil = RCAP.xpath_text( area_xml_element, CEILING_XPATH )) ? ceil.to_f : nil ),
+										:circles   => RCAP.xpath_match( area_xml_element, RCAP::Circle::XPATH ).map{ |circle_element| RCAP::Circle.from_xml_element( circle_element )},
+										:geocodes  => RCAP.xpath_match( area_xml_element, RCAP::Geocode::XPATH ).map{ |geocode_element| RCAP::Geocode.from_xml_element( geocode_element )},
+										:polygons  => RCAP.xpath_match( area_xml_element, RCAP::Polygon::XPATH ).map{ |polygon_element| RCAP::Polygon.from_xml_element( polygon_element )})
+  end
+
+   AREA_DESC_YAML = 'Area Description' # :nodoc:
+   ALTITUDE_YAML  = 'Altitude'         # :nodoc:
+   CEILING_YAML   = 'Ceiling'          # :nodoc:
+   CIRCLES_YAML   = 'Circles'          # :nodoc:
+   GEOCODES_YAML  = 'Geocodes'         # :nodoc:
+   POLYGONS_YAML  = 'Polygons'         # :nodoc:
+
+   def to_yaml( options = {} ) # :nodoc:
+     circles_yaml = self.circles.map{ |circle| [ circle.lattitude, circle.longitude, circle.radius ]}
+     def circles_yaml.to_yaml_style; :inline; end
+
+     RCAP.attribute_values_to_hash(
+       [ AREA_DESC_YAML,  self.area_desc ],
+       [ ALTITUDE_YAML,   self.altitude ],
+       [ CEILING_YAML,    self.ceiling ],
+       [ CIRCLES_YAML,    circles_yaml ],
+       [ GEOCODES_YAML,   self.geocodes.inject({}){|h,geocode| h.merge( geocode.name => geocode.value )}],
+       [ POLYGONS_YAML,   self.polygons ]
+     ).to_yaml( options )
+   end
+
+   def from_yaml_data( area_yaml_data )  # :nodoc:
+     Area.new(
+       :area_desc => area_yaml_data[ AREA_DESC_YAML ],
+       :altitude  => area_yaml_data[ ALTITUDE_YAML ],
+       :ceiling   => area_yaml_data[ CEILING_YAML ],
+       :circles   => Array( area_yaml_data[ CIRCLES_YAML ]).map{ |circle_yaml_data| RCAP::Circle.from_yaml_data( circle_yaml_data )},
+       :geocodes  => Array( area_yaml_data[ GEOCODES_YAML ]).map{ |name, value| RCAP::Geocode.new( :name => name, :value => value )},
+       :polygons  => Array( area_yaml_data[ POLYGONS_YAML ]).map{ |polyon_yaml_data| RCAP::Polygon.from_yaml_data( polyon_yaml_data )}
+     )
+   end
+
+   AREA_DESC_KEY = 'area_desc'  # :nodoc:
+   ALTITUDE_KEY  = 'altitude'   # :nodoc:
+   CEILING_KEY   = 'ceiling'    # :nodoc:
+   CIRCLES_KEY   = 'circles'    # :nodoc:
+   GEOCODES_KEY  = 'geocodes'   # :nodoc:
+   POLYGONS_KEY  = 'polygons'   # :nodoc:
+
+   def to_h # :nodoc:
+     { AREA_DESC_KEY => self.area_desc,
+       ALTITUDE_KEY  => self.altitude,
+       CEILING_KEY   => self.ceiling,
+       CIRCLES_KEY   => self.circles.map{ |circle| circle.to_h },
+       GEOCODES_KEY  => self.geocodes.map{ |geocode| geocode.to_h },
+       POLYGONS_KEY  => self.polygons.map{ |polygon| polygon.to_h }}
+   end
+
+   def self.from_h( area_hash ) # :nodoc:
+     self.new(
+      :area_desc => area_hash[ AREA_DESC_KEY ],
+      :altitude  => area_hash[ ALTITUDE_KEY ],
+      :ceiling   => area_hash[ CEILING_KEY ],
+      :circles   => area_hash[ CIRCLES_KEY ].map{ |circle_hash| RCAP::Circle.from_h( circle_hash )},
+      :geocodes  => area_hash[ GEOCODES_KEY ].map{ |geocode_hash| RCAP::Geocode.from_h( geocode_hash )},
+      :polygons  => area_hash[ POLYGONS_KEY ].map{ |polygon_hash| RCAP::Polygon.from_h( polygon_hash )})
+   end
+end

data/lib/generators/rcap/models/templates/models/circle.rb

@@ -0,0 +1,76 @@
+# A Circle object is valid if
+# * it has a valid lattitude and longitude
+# * it has a radius with a value greater than zero
+class Circle < Point
+  include Validation
+
+	# Expresed in kilometers
+	attr_accessor( :radius )
+
+  validates_presence_of( :radius )
+  validates_numericality_of( :radius , :greater_than => 0 )
+
+  XML_ELEMENT_NAME = 'circle' # :nodoc:
+
+  XPATH = 'cap:circle' # :nodoc:
+
+  def initialize( attributes = {} )
+    super( attributes )
+    @radius = attributes[ :radius ]
+  end
+
+	# Returns a string representation of the circle of the form
+	#  lattitude,longitude,radius
+  def to_s  # :nodoc:
+    "#{ self.lattitude },#{ self.longitude },#{ self.radius }"
+  end
+
+  def inspect # :nodoc:
+    "(#{ self.lattitude},#{ self.longitude },#{ self.radius })"
+  end
+
+  def to_xml_element # :nodoc:
+    xml_element = REXML::Element.new( XML_ELEMENT_NAME )
+    xml_element.add_text( self.to_s )
+    xml_element
+  end
+
+  def to_xml # :nodoc:
+    self.to_xml_element.to_s
+  end
+
+  def self.parse_circle_string( circle_string ) # :nodoc:
+    lattitude, longitude, radius = circle_string.split( ',' )
+    [ lattitude, longitude, radius ].map{ |e| e.to_f }
+  end
+
+  def self.from_xml_element( circle_xml_element ) # :nodoc:
+    lattitude, longitude, radius = self.parse_circle_string( circle_xml_element.text )
+    circle = self.new( :lattitude => lattitude,
+                       :longitude => longitude,
+                       :radius => radius )
+  end
+
+	# Two circles are equivalent if their lattitude, longitude and radius are equal.
+  def ==( other )
+    [ self.lattitude, self.longitude, self.radius ] == [ other.lattitude, other.longitude, other.radius ]
+  end
+
+  def self.from_yaml_data( circle_yaml_data ) # :nodoc:
+    lattitude, longitude,radius = circle_yaml_data
+    self.new( :lattitude => lattitude, :longitude => longitude, :radius => radius )
+  end
+
+  RADIUS_KEY    = 'radius' # :nodoc:
+  LATTITUDE_KEY = 'lattitude' # :nodoc:
+  LONGITUDE_KEY = 'longitude' # :nodoc:
+  def to_h # :nodoc:
+    RCAP.attribute_values_to_hash( [ RADIUS_KEY, self.radius ],
+                                   [ LATTITUDE_KEY, self.lattitude ],
+                                   [ LONGITUDE_KEY, self.longitude ])
+  end
+
+  def self.from_h( circle_hash ) # :nodoc:
+    self.new( :radius => circle_hash[ RADIUS_KEY ], :lattitude => circle_hash[ LATTITUDE_KEY ], :longitude => circle_hash[ LONGITUDE_KEY ])
+  end
+end

data/lib/generators/rcap/models/templates/models/event_code.rb

@@ -0,0 +1,20 @@
+module RCAP
+  class EventCode < Parameter
+
+    XML_ELEMENT_NAME = 'eventCode' # :nodoc:
+
+		XPATH = "cap:#{ XML_ELEMENT_NAME }" # :nodoc:
+
+    def to_xml_element # :nodoc:
+      xml_element = REXML::Element.new( XML_ELEMENT_NAME )
+      xml_element.add_element( NAME_ELEMENT_NAME ).add_text( self.name )
+      xml_element.add_element( VALUE_ELEMENT_NAME ).add_text( self.value )
+      xml_element
+    end
+
+		def self.from_xml_element( event_code_xml_element ) # :nodoc:
+			EventCode.new( :name  => RCAP.xpath_text( event_code_xml_element, NAME_XPATH ),
+										 :value => RCAP.xpath_text( event_code_xml_element, VALUE_XPATH ))
+		end
+  end
+end

data/lib/generators/rcap/models/templates/models/geocode.rb

@@ -0,0 +1,20 @@
+module RCAP
+  class Geocode < Parameter
+
+    XML_ELEMENT_NAME = 'geocode' # :nodoc:
+
+    XPATH = "cap:#{ XML_ELEMENT_NAME }" # :nodoc:
+    
+    def to_xml_element # :nodoc:
+      xml_element = REXML::Element.new( XML_ELEMENT_NAME )
+      xml_element.add_element( NAME_ELEMENT_NAME ).add_text( @name )
+      xml_element.add_element( VALUE_ELEMENT_NAME ).add_text( @value )
+      xml_element
+    end
+
+    def self.from_xml_element( geocode_xml_element ) # :nodoc:
+      self.new( :name  => RCAP.xpath_text( geocode_xml_element, NAME_XPATH ),
+                :value => RCAP.xpath_text( geocode_xml_element, VALUE_XPATH ))
+    end
+  end
+end

data/lib/generators/rcap/models/templates/models/info.rb

@@ -0,0 +1,452 @@
+# In Info object is valid if
+# * it has an event
+# * it has an urgency with a valid value
+# * it has a severity with a valid value
+# * it has a certainty with a valid value
+# * all categories are valid and categories has at minimum 1 entry
+# * all Resource objects in the resources collection are valid
+# * all Area objects in the areas collection are valid
+#
+class Info < ActiveRecord::Base
+  include Validation
+
+  belongs_to :alert
+  has_many :areas
+  has_many :resources
+
+  serialize :categories
+  serialize :response_types
+  serialize :event_codes
+  serialize :parameters
+
+  before_create :set_language
+
+  CATEGORY_GEO       = "Geo"       # :nodoc:
+  CATEGORY_MET       = "Met"       # :nodoc:
+  CATEGORY_SAFETY    = "Safety"    # :nodoc:
+  CATEGORY_SECURITY  = "Security"  # :nodoc:
+  CATEGORY_RESCUE    = "Rescue"    # :nodoc:
+  CATEGORY_FIRE      = "Fire"      # :nodoc:
+  CATEGORY_HEALTH    = "Health"    # :nodoc:
+  CATEGORY_ENV       = "Env"       # :nodoc:
+  CATEGORY_TRANSPORT = "Transport" # :nodoc:
+  CATEGORY_INFRA     = "Infra"     # :nodoc:
+  CATEGORY_CBRNE     = "CBRNE"     # :nodoc:
+  CATEGORY_OTHER     = "Other"     # :nodoc:
+	# Valid values for categories
+  VALID_CATEGORIES = [ CATEGORY_GEO, CATEGORY_MET, CATEGORY_SAFETY,
+    CATEGORY_SECURITY, CATEGORY_RESCUE,   CATEGORY_FIRE, CATEGORY_HEALTH,
+    CATEGORY_ENV, CATEGORY_TRANSPORT, CATEGORY_INFRA, CATEGORY_CBRNE,
+    CATEGORY_OTHER ]
+
+  RESPONSE_TYPE_SHELTER  = "Shelter"  # :nodoc:
+  RESPONSE_TYPE_EVACUATE = "Evacuate" # :nodoc:
+  RESPONSE_TYPE_PREPARE  = "Prepare"  # :nodoc:
+  RESPONSE_TYPE_EXECUTE  = "Execute"  # :nodoc:
+  RESPONSE_TYPE_MONITOR  = "Monitor"  # :nodoc:
+  RESPONSE_TYPE_ASSESS   = "Assess"   # :nodoc:
+  RESPONSE_TYPE_NONE     = "None"     # :nodoc:
+	# Valid values for response_type
+  VALID_RESPONSE_TYPES = [ RESPONSE_TYPE_SHELTER, RESPONSE_TYPE_EVACUATE,
+    RESPONSE_TYPE_PREPARE, RESPONSE_TYPE_EXECUTE, RESPONSE_TYPE_MONITOR,
+    RESPONSE_TYPE_ASSESS, RESPONSE_TYPE_NONE ]
+
+  URGENCY_IMMEDIATE = "Immediate" # :nodoc:
+  URGENCY_EXPECTED  = "Expected"  # :nodoc:
+  URGENCY_FUTURE    = "Future"    # :nodoc:
+  URGENCY_PAST      = "Past"      # :nodoc:
+  URGENCY_UNKNOWN   = "Unknown"   # :nodoc:
+	# Valid values for urgency
+  VALID_URGENCIES = [ URGENCY_IMMEDIATE, URGENCY_EXPECTED, URGENCY_FUTURE,
+    URGENCY_PAST, URGENCY_UNKNOWN ]
+
+  SEVERITY_EXTREME  = "Extreme"  # :nodoc:
+  SEVERITY_SEVERE   = "Severe"   # :nodoc:
+  SEVERITY_MODERATE = "Moderate" # :nodoc:
+  SEVERITY_MINOR    = "Minor"    # :nodoc:
+  SEVERITY_UNKNOWN  = "Unknown"  # :nodoc:
+	# Valid values for severity
+  VALID_SEVERITIES = [ SEVERITY_EXTREME, SEVERITY_SEVERE, SEVERITY_MODERATE,
+    SEVERITY_MINOR, SEVERITY_UNKNOWN ]
+
+  CERTAINTY_OBSERVED = "Observed" # :nodoc:
+  CERTAINTY_LIKELY   = "Likely"   # :nodoc:
+  CERTAINTY_POSSIBLE = "Possible" # :nodoc:
+  CERTAINTY_UNLIKELY = "Unlikely" # :nodoc:
+  CERTAINTY_UNKNOWN  = "Unknown"  # :nodoc:
+	# Valid valies for certainty
+  VALID_CERTAINTIES = [ CERTAINTY_OBSERVED, CERTAINTY_LIKELY,
+    CERTAINTY_POSSIBLE, CERTAINTY_UNLIKELY, CERTAINTY_UNKNOWN ]
+
+  XML_ELEMENT_NAME           = 'info'         # :nodoc:
+  LANGUAGE_ELEMENT_NAME      = 'language'     # :nodoc:
+  CATEGORY_ELEMENT_NAME      = 'category'     # :nodoc:
+  EVENT_ELEMENT_NAME         = 'event'        # :nodoc:
+  RESPONSE_TYPE_ELEMENT_NAME = 'responseType' # :nodoc:
+  URGENCY_ELEMENT_NAME       = 'urgency'      # :nodoc:
+  SEVERITY_ELEMENT_NAME      = 'severity'     # :nodoc:
+  CERTAINTY_ELEMENT_NAME     = 'certainty'    # :nodoc:
+  AUDIENCE_ELEMENT_NAME      = 'audience'     # :nodoc:
+  EVENT_CODE_ELEMENT_NAME    = 'eventCode'    # :nodoc:
+  EFFECTIVE_ELEMENT_NAME     = 'effective'    # :nodoc:
+  ONSET_ELEMENT_NAME         = 'onset'        # :nodoc:
+  EXPIRES_ELEMENT_NAME       = 'expires'      # :nodoc:
+  SENDER_NAME_ELEMENT_NAME   = 'sernderName'  # :nodoc:
+  HEADLINE_ELEMENT_NAME      = 'headline'     # :nodoc:
+  DESCRIPTION_ELEMENT_NAME   = 'description'  # :nodoc:
+  INSTRUCTION_ELEMENT_NAME   = 'instruction'  # :nodoc:
+  WEB_ELEMENT_NAME           = 'web'          # :nodoc:
+  CONTACT_ELEMENT_NAME       = 'contact'      # :nodoc:
+
+  XPATH               = "cap:#{ XML_ELEMENT_NAME }"           # :nodoc:
+  LANGUAGE_XPATH      = "cap:#{ LANGUAGE_ELEMENT_NAME }"      # :nodoc:
+  EVENT_XPATH         = "cap:#{ EVENT_ELEMENT_NAME }"         # :nodoc:
+  URGENCY_XPATH       = "cap:#{ URGENCY_ELEMENT_NAME }"       # :nodoc:
+  RESPONSE_TYPE_XPATH = "cap:#{ RESPONSE_TYPE_ELEMENT_NAME }" # :nodoc:
+  CATEGORY_XPATH      = "cap:#{ CATEGORY_ELEMENT_NAME }"      # :nodoc:
+  SEVERITY_XPATH      = "cap:#{ SEVERITY_ELEMENT_NAME }"      # :nodoc:
+  CERTAINTY_XPATH     = "cap:#{ CERTAINTY_ELEMENT_NAME }"     # :nodoc:
+  AUDIENCE_XPATH      = "cap:#{ AUDIENCE_ELEMENT_NAME }"      # :nodoc:
+  EVENT_CODE_XPATH    = "cap:#{ EVENT_CODE_ELEMENT_NAME }"    # :nodoc:
+  EFFECTIVE_XPATH     = "cap:#{ EFFECTIVE_ELEMENT_NAME }"     # :nodoc:
+  ONSET_XPATH         = "cap:#{ ONSET_ELEMENT_NAME }"         # :nodoc:
+  EXPIRES_XPATH       = "cap:#{ EXPIRES_ELEMENT_NAME }"       # :nodoc:
+  SENDER_NAME_XPATH   = "cap:#{ SENDER_NAME_ELEMENT_NAME }"   # :nodoc:
+  HEADLINE_XPATH      = "cap:#{ HEADLINE_ELEMENT_NAME }"      # :nodoc:
+  DESCRIPTION_XPATH   = "cap:#{ DESCRIPTION_ELEMENT_NAME }"   # :nodoc:
+  INSTRUCTION_XPATH   = "cap:#{ INSTRUCTION_ELEMENT_NAME }"   # :nodoc:
+  WEB_XPATH           = "cap:#{ WEB_ELEMENT_NAME }"           # :nodoc:
+  CONTACT_XPATH       = "cap:#{ CONTACT_ELEMENT_NAME }"       # :nodoc:
+
+  DEFAULT_LANGUAGE = 'en-US'
+
+  validates_presence_of( :event, :urgency, :severity, :certainty )
+  validates_length_of( :categories, :minimum => 1 )
+  validates_inclusion_of( :certainty, :allow_nil => true, :in => VALID_CERTAINTIES, :message => "can only be assigned the following values: #{ VALID_CERTAINTIES.join(', ') }")
+  validates_inclusion_of( :severity, :allow_nil  => true, :in => VALID_SEVERITIES,  :message => "can only be assigned the following values: #{ VALID_SEVERITIES.join(', ') }" )
+  validates_inclusion_of( :urgency, :allow_nil   => true, :in => VALID_URGENCIES,   :message => "can only be assigned the following values: #{ VALID_URGENCIES.join(', ') }" )
+  validates_inclusion_of_members_of( :response_types, :in  => VALID_RESPONSE_TYPES, :allow_blank => true )
+  validates_inclusion_of_members_of( :categories,     :in  => VALID_CATEGORIES,     :allow_blank => true )
+  validates_collection_of( :resources, :areas )
+
+  #   attr_accessor( :event )
+  # # Value can only be one of VALID_URGENCIES
+  # attr_accessor( :urgency )
+  # # Value can only be one of VALID_SEVERITIES
+  # attr_accessor( :severity )
+  # # Value can only be one of VALID_CERTAINTIES
+  # attr_accessor( :certainty )
+  # attr_accessor( :language )
+  # attr_accessor( :audience )
+  # # Effective start time of information
+  # attr_accessor( :effective )
+  # # Expected start of event
+  # attr_accessor( :onset )
+  # # Effective expiry time of information
+  # attr_accessor( :expires )
+  # attr_accessor( :sender_name )
+  # attr_accessor( :headline )
+  # attr_accessor( :description )
+  # attr_accessor( :instruction )
+  # attr_accessor( :web )
+  # attr_accessor( :contact )
+  #
+  # # Collection of textual categories; elements can be one of VALID_CATEGORIES
+  #   attr_reader( :categories )
+  # #  Collection of textual response types
+  # attr_reader( :response_types )
+  # # Collectoin of EventCode objects
+  # attr_reader( :event_codes )
+  # # Collection of Parameter objects
+  # attr_reader( :parameters )
+  # # Collection of Resource objects
+  # attr_reader( :resources )
+  # # Collection of Area objects
+  # attr_reader( :areas )
+
+  # def initialize( attributes = {} )
+  #   @language       = attributes[ :language ] || DEFAULT_LANGUAGE
+  #   @categories     = Array( attributes[ :categories ])
+  #   @event          = attributes [ :event ]
+  #   @response_types = Array( attributes[ :response_types ])
+  #   @urgency        = attributes[ :urgency ]
+  #   @severity       = attributes[ :severity ]
+  #   @certainty      = attributes[ :certainty ]
+  #   @effective      = attributes[ :effective ]
+  #   @onset          = attributes[ :onset ]
+  #   @expires        = attributes[ :expires ]
+  #   @event_codes    = Array( attributes[ :event_codes ])
+  #   @sender_name    = attributes[ :sender_name ]
+  #   @headline       = attributes[ :headline ]
+  #   @description    = attributes[ :description ]
+  #   @instruction    = attributes[ :instruction ]
+  #   @web            = attributes[ :web ]
+  #   @contact        = attributes[ :contact ]
+  #   @parameters     = Array( attributes[ :parameters ])
+  #   @resources      = Array( attributes[ :resources ])
+  #   @areas          = Array( attributes[ :areas ])
+  # end
+
+  def to_xml_element # :nodoc:
+    xml_element = REXML::Element.new( XML_ELEMENT_NAME )
+    xml_element.add_element( LANGUAGE_ELEMENT_NAME ).add_text( self.language ) if self.language
+    @categories.each do |category|
+      xml_element.add_element( CATEGORY_ELEMENT_NAME ).add_text( category )
+    end
+    xml_element.add_element( EVENT_ELEMENT_NAME ).add_text( self.event )
+    @response_types.each do |response_type|
+      xml_element.add_element( RESPONSE_TYPE_ELEMENT_NAME ).add_text( response_type )
+    end
+    xml_element.add_element( URGENCY_ELEMENT_NAME ).add_text( self.urgency )
+    xml_element.add_element( SEVERITY_ELEMENT_NAME ).add_text( self.severity )
+    xml_element.add_element( CERTAINTY_ELEMENT_NAME ).add_text( self.certainty )
+    xml_element.add_element( AUDIENCE_ELEMENT_NAME ).add_text( self.audience ) if self.audience
+    @event_codes.each do |event_code|
+      xml_element.add_element( event_code.to_xml_element )
+    end
+    xml_element.add_element( EFFECTIVE_ELEMENT_NAME ).add_text( self.effective_at.to_s_for_cap ) if self.effective_at
+    xml_element.add_element( ONSET_ELEMENT_NAME ).add_text( self.onset_at.to_s_for_cap )         if self.onset_at
+    xml_element.add_element( EXPIRES_ELEMENT_NAME ).add_text( self.expires_at.to_s_for_cap )     if self.expires_at
+    xml_element.add_element( SENDER_NAME_ELEMENT_NAME ).add_text( self.sender_name )          if self.sender_name
+    xml_element.add_element( HEADLINE_ELEMENT_NAME ).add_text( self.headline )                if self.headline
+    xml_element.add_element( DESCRIPTION_ELEMENT_NAME ).add_text( self.description )          if self.description
+    xml_element.add_element( INSTRUCTION_ELEMENT_NAME ).add_text( self.instruction )          if self.instruction
+    xml_element.add_element( WEB_ELEMENT_NAME ).add_text( self.web )                          if self.web
+    xml_element.add_element( CONTACT_ELEMENT_NAME ).add_text( self.contact )                  if self.contact
+    @parameters.each do |parameter|
+      xml_element.add_element( parameter.to_xml_element )
+    end
+    @resources.each do |resource|
+      xml_element.add_element( resource.to_xml_element )
+    end
+    @areas.each do |area|
+      xml_element.add_element( area.to_xml_element )
+    end
+    xml_element
+  end
+
+  def to_xml # :nodoc:
+    self.to_xml_element.to_s
+  end
+
+	def inspect # :nodoc:
+		info_inspect = <<EOF
+Language:       #{ self.language }
+Categories:     #{ self.categories.to_s_for_cap }
+Event:          #{ self.event }
+Response Types: #{ self.response_types.to_s_for_cap }
+Urgency:        #{ self.urgency }
+Severity:       #{ self.severity }
+Certainty:      #{ self.certainty }
+Audience:       #{ self.audience }
+Event Codes:    #{ self.event_codes.inspect }
+Effective:      #{ self.effective_at }
+Onset:          #{ self.onset_at }
+Expires:        #{ self.expires_at }
+Sender Name:    #{ self.sender_name }
+Headline:       #{ self.headline }
+Description:
+#{ self.description.to_s.lines.map{ |line| "  " + line }.join }
+Instruction:    #{ self.instruction }
+Web:            #{ self.web }
+Contact:        #{ self.contact }
+Parameters:
+#{ self.parameters.map{ |parameter| parameter.inspect }.join( "\n" )}
+Resources:
+#{ self.resources.map{ |resource| "  " + resource.inspect }.join( "\n" )}
+Area:
+#{ self.areas.map{ |area| "  #{ area }" }.join( "\n" )}
+EOF
+    RCAP.format_lines_for_inspect( 'INFO', info_inspect )
+	end
+
+	# Returns a string representation of the event of the form
+	#  event(urgency/severity/certainty)
+  def to_s
+    "#{ self.event }(#{ self.urgency }/#{ self.severity }/#{ self.certainty })"
+  end
+
+  def self.from_xml_element( info_xml_element ) # :nodoc:
+    self.new(
+      :language       => RCAP.xpath_text( info_xml_element, LANGUAGE_XPATH ) || DEFAULT_LANGUAGE,
+      :categories     => RCAP.xpath_match( info_xml_element, CATEGORY_XPATH ).map{ |element| element.text },
+      :event          => RCAP.xpath_text( info_xml_element, EVENT_XPATH ),
+      :response_types => RCAP.xpath_match( info_xml_element, RESPONSE_TYPE_XPATH ).map{ |element| element.text },
+      :urgency        => RCAP.xpath_text( info_xml_element, URGENCY_XPATH ),
+      :severity       => RCAP.xpath_text( info_xml_element, SEVERITY_XPATH ),
+      :certainty      => RCAP.xpath_text( info_xml_element, CERTAINTY_XPATH ),
+      :audience       => RCAP.xpath_text( info_xml_element, AUDIENCE_XPATH ),
+      :effective_at      => (( effective = RCAP.xpath_first( info_xml_element, EFFECTIVE_XPATH )) ? DateTime.parse( effective.text ) : nil ),
+      :onset_at          => (( onset = RCAP.xpath_first( info_xml_element, ONSET_XPATH )) ? DateTime.parse( onset.text ) : nil ),
+      :expires_at        => (( expires = RCAP.xpath_first( info_xml_element, EXPIRES_XPATH )) ? DateTime.parse( expires.text ) : nil ),
+      :sender_name    => RCAP.xpath_text( info_xml_element, SENDER_NAME_XPATH ),
+      :headline       => RCAP.xpath_text( info_xml_element, HEADLINE_XPATH ),
+      :description    => RCAP.xpath_text( info_xml_element, DESCRIPTION_XPATH ),
+      :instruction    => RCAP.xpath_text( info_xml_element, INSTRUCTION_XPATH ),
+      :web            => RCAP.xpath_text( info_xml_element, WEB_XPATH ),
+      :contact        => RCAP.xpath_text( info_xml_element, CONTACT_XPATH ),
+      :event_codes    => RCAP.xpath_match( info_xml_element, RCAP::EventCode::XPATH ).map{ |element| RCAP::EventCode.from_xml_element( element )},
+      :parameters     => RCAP.xpath_match( info_xml_element, RCAP::Parameter::XPATH ).map{ |element| RCAP::Parameter.from_xml_element( element )},
+      :resources      => RCAP.xpath_match( info_xml_element, RCAP::Resource::XPATH ).map{ |element| RCAP::Resource.from_xml_element( element )},
+      :areas          => RCAP.xpath_match( info_xml_element, RCAP::Area::XPATH ).map{ |element| RCAP::Area.from_xml_element( element )}
+    )
+  end
+
+  LANGUAGE_YAML       = 'Language'       # :nodoc:
+  CATEGORIES_YAML     = 'Categories'     # :nodoc:
+  EVENT_YAML          = 'Event'          # :nodoc:
+  RESPONSE_TYPES_YAML = 'Response Types' # :nodoc:
+  URGENCY_YAML        = 'Urgency'        # :nodoc:
+  SEVERITY_YAML       = 'Severity'       # :nodoc:
+  CERTAINTY_YAML      = 'Certainty'      # :nodoc:
+  AUDIENCE_YAML       = 'Audience'       # :nodoc:
+  EFFECTIVE_YAML      = 'Effective'      # :nodoc:
+  ONSET_YAML          = 'Onset'          # :nodoc:
+  EXPIRES_YAML        = 'Expires'        # :nodoc:
+  SENDER_NAME_YAML    = 'Sender Name'    # :nodoc:
+  HEADLINE_YAML       = 'Headline'       # :nodoc:
+  DESCRIPTION_YAML    = 'Description'    # :nodoc:
+  INSTRUCTION_YAML    = 'Instruction'    # :nodoc:
+  WEB_YAML            = 'Web'            # :nodoc:
+  CONTACT_YAML        = 'Contact'        # :nodoc:
+  EVENT_CODES_YAML    = 'Event Codes'    # :nodoc:
+  PARAMETERS_YAML     = 'Parameters'     # :nodoc:
+  RESOURCES_YAML      = 'Resources'      # :nodoc:
+  AREAS_YAML          = 'Areas'          # :nodoc:
+
+  def to_yaml( options = {} ) # :nodoc:
+    response_types_yaml = self.response_types
+    def response_types_yaml.to_yaml_style; :inline; end
+
+    categories_yaml = self.categories
+    def categories_yaml.to_yaml_style; :inline; end
+
+    parameter_to_hash = lambda{ |hash, parameter| hash.merge( parameter.name => parameter.value )}
+
+    RCAP.attribute_values_to_hash(
+      [ LANGUAGE_YAML,       self.language ],
+      [ CATEGORIES_YAML,     categories_yaml ],
+      [ EVENT_YAML,          self.event ],
+      [ RESPONSE_TYPES_YAML, response_types_yaml ],
+      [ URGENCY_YAML,        self.urgency ],
+      [ SEVERITY_YAML,       self.severity ],
+      [ CERTAINTY_YAML,      self.certainty ],
+      [ AUDIENCE_YAML,       self.audience ],
+      [ EFFECTIVE_YAML,      self.effective_at ],
+      [ ONSET_YAML,          self.onset_at ],
+      [ EXPIRES_YAML,        self.expires_at ],
+      [ SENDER_NAME_YAML,    self.sender_name ],
+      [ HEADLINE_YAML,       self.headline ],
+      [ DESCRIPTION_YAML,    self.description ],
+      [ INSTRUCTION_YAML,    self.instruction ],
+      [ WEB_YAML,            self.web ],
+      [ CONTACT_YAML,        self.contact ],
+      [ EVENT_CODES_YAML,    self.event_codes.inject({}, &parameter_to_hash )],
+      [ PARAMETERS_YAML,     self.parameters.inject({}, &parameter_to_hash )],
+      [ RESOURCES_YAML,      self.resources ],
+      [ AREAS_YAML,          self.areas ]
+    ).to_yaml( options )
+  end
+
+  def self.from_yaml_data( info_yaml_data ) # :nodoc:
+    self.new(
+      :language       => info_yaml_data [ LANGUAGE_YAML ],
+      :categories     => info_yaml_data [ CATEGORIES_YAML ],
+      :event          => info_yaml_data [ EVENT_YAML ],
+      :response_types => info_yaml_data [ RESPONSE_TYPES_YAML ],
+      :urgency        => info_yaml_data [ URGENCY_YAML ],
+      :severity       => info_yaml_data [ SEVERITY_YAML ],
+      :certainty      => info_yaml_data [ CERTAINTY_YAML ],
+      :audience       => info_yaml_data [ AUDIENCE_YAML ],
+      :effective_at      => ( effective = info_yaml_data[ EFFECTIVE_YAML ]).blank? ? nil : DateTime.parse( effective.to_s ),
+      :onset_at          => ( onset = info_yaml_data[ ONSET_YAML ]).blank? ? nil : DateTime.parse( onset.to_s ),
+      :expires_at        => ( expires = info_yaml_data[ EXPIRES_YAML ]).blank? ? nil : DateTime.parse( expires.to_s ),
+      :sender_name    => info_yaml_data [ SENDER_NAME_YAML ],
+      :headline       => info_yaml_data [ HEADLINE_YAML ],
+      :description    => info_yaml_data [ DESCRIPTION_YAML ],
+      :instruction    => info_yaml_data [ INSTRUCTION_YAML ],
+      :web            => info_yaml_data [ WEB_YAML ],
+      :contact        => info_yaml_data [ CONTACT_YAML ],
+      :event_codes    => Array( info_yaml_data [ EVENT_CODES_YAML ]).map{ |name,value| RCAP::EventCode.new( :name => name, :value => value )},
+      :parameters     => Array( info_yaml_data [ PARAMETERS_YAML ]).map{ |parameter_yaml_data| RCAP::Parameter.new( :name => name, :value => value )},
+      :resources      => Array( info_yaml_data [ RESOURCES_YAML ]).map{ |resource_yaml_data| RCAP::Resource.from_yaml_data( resource_yaml_data )},
+      :areas          => Array( info_yaml_data [ AREAS_YAML ]).map{ |area_yaml_data| RCAP::Area.from_yaml_data( area_yaml_data )}
+    )
+  end
+
+  LANGUAGE_KEY       = 'language'       # :nodoc:
+  CATEGORIES_KEY     = 'categories'     # :nodoc:
+  EVENT_KEY          = 'event'          # :nodoc:
+  RESPONSE_TYPES_KEY = 'response_types' # :nodoc:
+  URGENCY_KEY        = 'urgency'        # :nodoc:
+  SEVERITY_KEY       = 'severity'       # :nodoc:
+  CERTAINTY_KEY      = 'certainty'      # :nodoc:
+  AUDIENCE_KEY       = 'audience'       # :nodoc:
+  EFFECTIVE_KEY      = 'effective'      # :nodoc:
+  ONSET_KEY          = 'onset'          # :nodoc:
+  EXPIRES_KEY        = 'expires'        # :nodoc:
+  SENDER_NAME_KEY    = 'sender_name'    # :nodoc:
+  HEADLINE_KEY       = 'headline'       # :nodoc:
+  DESCRIPTION_KEY    = 'description'    # :nodoc:
+  INSTRUCTION_KEY    = 'instruction'    # :nodoc:
+  WEB_KEY            = 'web'            # :nodoc:
+  CONTACT_KEY        = 'contact'        # :nodoc:
+  RESOURCES_KEY      = 'resources'      # :nodoc:
+  EVENT_CODES_KEY    = 'event_codes'    # :nodoc:
+  PARAMETERS_KEY     = 'parameters'     # :nodoc:
+  AREAS_KEY          = 'areas'          # :nodoc:
+
+  def to_h # :nodoc:
+    RCAP.attribute_values_to_hash( [ LANGUAGE_KEY,       self.language ],
+                                   [ CATEGORIES_KEY,     self.categories ],
+                                   [ EVENT_KEY,          self.event ],
+                                   [ RESPONSE_TYPES_KEY, self.response_types ],
+                                   [ URGENCY_KEY,        self.urgency ],
+                                   [ SEVERITY_KEY,       self.severity ],
+                                   [ CERTAINTY_KEY,      self.certainty ],
+                                   [ AUDIENCE_KEY,       self.audience ],
+                                   [ EFFECTIVE_KEY,      RCAP.to_s_for_cap( self.effective_at )],
+                                   [ ONSET_KEY,          RCAP.to_s_for_cap( self.onset_at )],
+                                   [ EXPIRES_KEY,        RCAP.to_s_for_cap( self.expires_at )],
+                                   [ SENDER_NAME_KEY,    self.sender_name ],
+                                   [ HEADLINE_KEY,       self.headline ],
+                                   [ DESCRIPTION_KEY,    self.description ],
+                                   [ INSTRUCTION_KEY,    self.instruction ],
+                                   [ WEB_KEY,            self.web ],
+                                   [ CONTACT_KEY,        self.contact ],
+                                   [ RESOURCES_KEY,      self.resources.map{ |resource| resource.to_h } ],
+                                   [ EVENT_CODES_KEY,    self.event_codes.map{ |event_code| event_code.to_h } ],
+                                   [ PARAMETERS_KEY,     self.parameters.map{ |parameter| parameter.to_h } ],
+                                   [ AREAS_KEY,          self.areas.map{ |area| area.to_h }])
+  end
+
+  def self.from_h( info_hash ) # :nodoc:
+    self.new( :language       => info_hash[ LANGUAGE_KEY ],
+              :categories     => info_hash[ CATEGORIES_KEY ],
+              :event          => info_hash[ EVENT_KEY ],
+              :response_types => info_hash[ RESPONSE_TYPES_KEY ],
+              :urgency        => info_hash[ URGENCY_KEY ],
+              :severity       => info_hash[ SEVERITY_KEY ],
+              :certainty      => info_hash[ CERTAINTY_KEY ],
+              :audience       => info_hash[ AUDIENCE_KEY ],
+              :effective_at      => RCAP.parse_datetime( info_hash[ EFFECTIVE_KEY ]),
+              :onset_at          => RCAP.parse_datetime( info_hash[ ONSET_KEY ]),
+              :expires_at        => RCAP.parse_datetime( info_hash[ EXPIRES_KEY ]),
+              :sender_name    => info_hash[ SENDER_NAME_KEY ],
+              :headline       => info_hash[ HEADLINE_KEY ],
+              :description    => info_hash[ DESCRIPTION_KEY ],
+              :instruction    => info_hash[ INSTRUCTION_KEY ],
+              :web            => info_hash[ WEB_KEY ],
+              :contact        => info_hash[ CONTACT_KEY ],
+              :resources      => Array( info_hash[ RESOURCES_KEY ]).map{ |resource_hash| RCAP::Resource.from_h( resource_hash ) },
+              :event_codes    => Array( info_hash[ EVENT_CODES_KEY ]).map{ |event_code_hash| RCAP::EventCode.from_h( event_code_hash )},
+              :parameters     => Array( info_hash[ PARAMETERS_KEY ]).map{ |parameter_hash| RCAP::Parameter.from_h( parameter_hash )},
+              :areas          => Array( info_hash[ AREAS_KEY ]).map{ |area_hash| RCAP::Area.from_h( area_hash )})
+  end
+
+  private
+
+  def set_language
+    language = DEFAULT_LANGUAGE unless language
+  end
+end