epp-client-afnic 0.11.0

data/ChangeLog

@@ -0,0 +1,5 @@
+2010-05-14 mat
+	* first release
+
+2010-05-04 mat
+	* Initial commit

data/EXAMPLE.AFNIC

@@ -0,0 +1,70 @@
+#!/usr/bin/env ruby
+
+require 'pp'
+require 'rubygems'
+require 'epp-client/afnic'
+
+c = EPPClient::AFNIC.new(
+  :client_id => '-test-.fr',
+  :password => 'pass',
+  :ssl_cert => 'server.crt',
+  :ssl_key => 'server.key',
+  :test => true
+)
+
+begin
+
+  c.open_connection
+  c.login
+  if c.msgQ_count > 0
+    pp msg = c.poll_req
+    pp c.poll_ack if Hash === msg[:obj]
+  end
+  pp c.domain_check('mat.fr', 'nonexistantdomain.fr', 'paris.fr', 'trafiquants.fr', 'toto.wf')
+  pp c.domain_info('afnic.fr')
+  # pas de contact check
+  pp c.contact_info('A7534') # legal
+  pp c.contact_info('CT214') # particulier
+  pp contact = c.contact_create( {
+    :email=>"foo@example.org",
+    :authInfo => "foobar",
+    :voice=>"+33.123456787",
+    :postalInfo=> { "loc"=> { :addr=> { :city=>"Paris", :cc=>"FR", :pc=>"75001", :street=>["BP 18", "1, rue Royale"] }, :name=>"Dupond", :org => 'FooBar Inc.' }, },
+    #:list => 'restrictedPublication',
+    #:individualInfos => {:birthDate => '1978-01-01', :birthCc => 'FR', :birthPc => '75013', :birthCity => 'Paris'},
+    #:firstName => 'Jean',
+    :legalEntityInfos=> {:siren=>"418565404", :legalStatus=>"company"},
+    #:legalEntityInfos=> {:siren=>"418565404", :legalStatus=>"association", :asso => { :decl => '2001-01-01', :publ => {:date => '2001-01-02', :announce => 5, :page => 3}}},
+    #:legalEntityInfos=> {:siren=>"418565404", :legalStatus=>"association", :asso => { :waldec => 2 }},
+  })
+  pp c.contact_info(contact[:id])
+  pp c.contact_update({
+    :id => contact[:id],
+    :chg => {
+    :email => 'bazar@example.com',
+  }})
+  pp c.contact_info(contact[:id])
+  pp c.contact_info(contact[:id])
+  pp c.domain_create({
+    :registrant => "A7534",
+    :contacts => {:tech => ["ADM3"], :admin => ["ADM3"]},
+    :name => "truc-#{$$}.fr",
+    :authInfo => "PN16IZ0V"
+  })
+  pp c.domain_info(:name => "truc-#{$$}.fr")
+  pp c.domain_update({
+    :name => "truc-#{$$}.fr",
+    #:chg => { :authInfo => 'bazar' },
+    :add => {
+      :ns => %w(ns1.absolight.net ns2.absolight.net ns3.absolight.net ns4.absolight.net),
+    },
+  })
+  pp c.domain_info(:name => "truc-#{$$}.fr")
+  pp c.domain_delete("truc-#{$$}.fr")
+  pp c.domain_info(:name => "truc-#{$$}.fr")
+  pp c.domain_restore(:name => "truc-#{$$}.fr")
+  pp c.domain_info(:name => "truc-#{$$}.fr")
+
+ensure
+  c.logout
+end

data/Gemfile

@@ -0,0 +1,6 @@
+source 'http://rubygems.org'
+
+# Specify your gem's dependencies in epp-client.gemspec
+Dir['*.gemspec'].each do |i|
+  gemspec :name => i.sub(/\.gemspec$/, '')
+end

data/MIT-LICENSE

@@ -0,0 +1,19 @@
+Copyright (C) 2010 Mathieu Arnold, Absolight
+
+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.

data/README

@@ -0,0 +1,5 @@
+An extensible EPP client library
+
+When possible, the objects that are received via EPP are translated to their
+equivalent in ruby, that is, dates in Date object, timestamps in DateTime
+objects.

data/Rakefile

@@ -0,0 +1,37 @@
+#!/usr/bin/env rake
+require 'rake'
+require 'rdoc/task'
+require 'rubygems/package_task'
+require "bundler/gem_helper"
+
+MY_GEMS = Dir['*.gemspec'].map {|g| g.sub(/.*-(.*)\.gemspec/, '\1')}
+
+MY_GEMS.each do |g|
+  namespace g do
+    Bundler::GemHelper.new(Dir.pwd, "epp-client-#{g}").install
+  end
+end
+
+namespace :all do
+  task :build   => MY_GEMS.map { |f| "#{f}:build"   }
+  task :install => MY_GEMS.map { |f| "#{f}:install" }
+  task :release => MY_GEMS.map { |f| "#{f}:release" }
+end
+
+task :build   => 'all:build'
+task :install => 'all:install'
+task :release => 'all:release'
+
+desc "Generate documentation for the Rails framework"
+Rake::RDocTask.new do |rdoc|
+  rdoc.rdoc_dir = 'doc/rdoc'
+  rdoc.title    = "Documentation"
+
+  rdoc.options << '--line-numbers' << '--inline-source'
+  rdoc.options << '--charset' << 'utf-8'
+
+  rdoc.rdoc_files.include('README')
+  rdoc.rdoc_files.include('ChangeLog')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+

data/epp-client-afnic.gemspec

@@ -0,0 +1,40 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../lib/epp-client/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.name          = 'epp-client-afnic'
+  gem.version       = EPPClient::VERSION
+  gem.date          = '2010-05-14'
+  gem.authors       = ['Mathieu Arnold']
+  gem.email         = ['m@absolight.fr']
+  gem.description   = 'AFNIC EPP client library.'
+  gem.summary       = 'AFNIC EPP client library'
+  gem.homepage       = "https://github.com/Absolight/epp-client"
+
+  gem.required_ruby_version = '>= 1.8.7'
+  gem.required_rubygems_version = ">= 1.3.6"
+
+  gem.files         = [
+    'ChangeLog',
+    'EXAMPLE.AFNIC',
+    'Gemfile',
+    'MIT-LICENSE',
+    'README',
+    'Rakefile',
+    'epp-client-afnic.gemspec',
+    'lib/epp-client/afnic.rb',
+    'vendor/afnic/frnic-1.0.xsd',
+    'vendor/afnic/frnic-1.1.xsd',
+    'vendor/afnic/frnic-1.2.xsd',
+  ]
+
+  gem.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  gem.require_paths = ['lib']
+
+  gem.add_development_dependency "bundler", ">= 1.0.0"
+  gem.add_dependency('nokogiri', '~> 1.4')
+  gem.add_dependency('builder',  '>= 2.1.2')
+  gem.add_dependency('epp-client-base',  "~> #{EPPClient::VERSION}")
+  gem.add_dependency('epp-client-rgp',  "~> #{EPPClient::VERSION}")
+  gem.add_dependency('epp-client-secdns',  "~> #{EPPClient::VERSION}")
+end

data/lib/epp-client/afnic.rb

@@ -0,0 +1,505 @@
+require 'epp-client/base'
+require 'epp-client/rgp'
+require 'epp-client/secdns'
+
+module EPPClient
+  class AFNIC < Base
+    SCHEMAS_AFNIC = %w[
+      frnic-1.2
+    ]
+
+    EPPClient::SCHEMAS_URL.merge!(SCHEMAS_AFNIC.inject({}) do |a,s|
+      a[s.sub(/-1\.2$/, '')] = "http://www.afnic.fr/xml/epp/#{s}" if s =~ /-1\.2$/
+      a[s] = "http://www.afnic.fr/xml/epp/#{s}"
+      a
+    end)
+
+    # Sets the default for AFNIC, that is, server and port, according to
+    # AFNIC's documentation.
+    # http://www.afnic.fr/doc/interface/epp
+    #
+    # ==== Optional Attributes
+    # [<tt>:test</tt>] sets the server to be the test server.
+    def initialize(args)
+      if args.delete(:test) == true
+	args[:server] ||= 'epp.test.nic.fr'
+      else
+	args[:server] ||= 'epp.nic.fr'
+      end
+      @services = EPPClient::SCHEMAS_URL.values_at('domain', 'contact')
+      args[:port] ||= 700
+      super(args)
+      @extensions << EPPClient::SCHEMAS_URL['frnic']
+    end
+
+    # Extends the base domain check so that the specific afnic check
+    # informations are processed, the additionnal informations are :
+    #
+    # [<tt>:reserved</tt>] the domain is a reserved name.
+    # [<tt>:rsvReason</tt>] the optional reason why the domain is reserved.
+    # [<tt>:forbidden</tt>] the domain is a forbidden name.
+    # [<tt>:fbdReason</tt>] the optional reason why the domain is forbidden.
+    def domain_check(*domains)
+      super # placeholder so that I can add some doc
+    end
+
+    def domain_check_process(xml) # :nodoc:
+      ret = super
+      xml.xpath('epp:extension/frnic:ext/frnic:resData/frnic:chkData/frnic:domain/frnic:cd', EPPClient::SCHEMAS_URL).each do |dom|
+	name = dom.xpath('frnic:name', EPPClient::SCHEMAS_URL)
+	hash = ret.select {|d| d[:name] == name.text}.first
+	hash[:reserved] = name.attr('reserved').value == "1"
+	unless (reason = dom.xpath('frnic:rsvReason', EPPClient::SCHEMAS_URL).text).empty?
+	  hash[:rsvReason] = reason
+	end
+	hash[:forbidden] = name.attr('forbidden').value == "1"
+	unless (reason = dom.xpath('frnic:fbdReason', EPPClient::SCHEMAS_URL).text).empty?
+	  hash[:fbdReason] = reason
+	end
+      end
+      return ret
+    end
+
+    # Extends the base domain info so that the specific afnic <tt>:status</tt>
+    # can be added.
+    def domain_info(domain)
+      super # placeholder so that I can add some doc
+    end
+
+    def domain_info_process(xml) #:nodoc:
+      ret = super
+      if (frnic_status = xml.xpath('epp:extension/frnic:ext/frnic:resData/frnic:infData/frnic:domain/frnic:status', EPPClient::SCHEMAS_URL)).size > 0
+	ret[:status] += frnic_status.map {|s| s.attr('s')}
+      end
+      ret
+    end
+
+    # parse legalEntityInfos content.
+    def legalEntityInfos(leI) #:nodoc:
+      ret = {}
+      ret[:legalStatus] = leI.xpath('frnic:legalStatus', EPPClient::SCHEMAS_URL).attr('s').value
+      if (r = leI.xpath("frnic:idStatus", EPPClient::SCHEMAS_URL)).size > 0
+	ret[:idStatus] = {:value => r.text}
+	ret[:idStatus][:when] = r.attr('when').value if r.attr('when')
+	ret[:idStatus][:source] = r.attr('source').value if r.attr('source')
+	end
+      %w(siren VAT trademark DUNS local).each do |val|
+	if (r = leI.xpath("frnic:#{val}", EPPClient::SCHEMAS_URL)).size > 0
+	  ret[val.to_sym] = r.text
+	end
+      end
+      if (asso = leI.xpath("frnic:asso", EPPClient::SCHEMAS_URL)).size > 0
+	ret[:asso] = {}
+	if (r = asso.xpath("frnic:waldec", EPPClient::SCHEMAS_URL)).size > 0
+	  ret[:asso][:waldec] = r.text
+	else
+	  if (decl = asso.xpath('frnic:decl', EPPClient::SCHEMAS_URL)).size > 0
+	    ret[:asso][:decl] = Date.parse(decl.text)
+	  end
+	  publ = asso.xpath('frnic:publ', EPPClient::SCHEMAS_URL)
+	  ret[:asso][:publ] = {
+	    :date => Date.parse(publ.text),
+	    :page => publ.attr('page').value,
+	  }
+	  if (announce = publ.attr('announce')) && announce.value != '0'
+	    ret[:asso][:publ][:announce] = announce.value
+	  end
+	end
+      end
+      ret
+    end
+    private :legalEntityInfos
+
+    # Extends the base contact info so that the specific afnic check
+    # informations are processed, the additionnal informations are :
+    #
+    # either :
+    # [<tt>:legalEntityInfos</tt>]
+    #   indicating that the contact is an organisation with the following
+    #   informations :
+    #   [<tt>:legalStatus</tt>]
+    #     should be either +company+, +association+ or +other+.
+    #   [<tt>:idStatus</tt>]
+    #     indicates the identification process status. Has optional
+    #     <tt>:when</tt> and <tt>:source</tt> attributes.
+    #   [<tt>:siren</tt>] contains the SIREN number of the organisation.
+    #   [<tt>:VAT</tt>]
+    #     is optional and contains the VAT number of the organisation.
+    #   [<tt>:trademark</tt>]
+    #     is optional and contains the trademark number of the organisation.
+    #   [<tt>:DUNS</tt>]
+    #     is optional and contains the Data Universal Numbering System number of
+    #     the organisation.
+    #   [<tt>:local</tt>]
+    #     is optional and contains an identifier local to the eligible country.
+    #   [<tt>:asso</tt>]
+    #     indicates the organisation is an association and contains either a
+    #     +waldec+ or a +decl+ and a +publ+ :
+    #     [<tt>:waldec</tt>] contains the waldec id of the association.
+    #     [<tt>:decl</tt>]
+    #       optionally indicate the date of the association was declared at the
+    #       prefecture.
+    #     [<tt>:publ</tt>]
+    #       contains informations regarding the publication in the "Journal
+    #       Officiel" :
+    #       [<tt>:date</tt>] the date of publication.
+    #       [<tt>:page</tt>] the page the announce is on.
+    #       [<tt>:announce</tt>] the announce number on the page (optional).
+    # [<tt>:individualInfos</tt>]
+    #   indicating that the contact is a person with the following
+    #   informations :
+    #   [<tt>:idStatus</tt>]
+    #     indicates the identification process status. Has optional
+    #     <tt>:when</tt> and <tt>:source</tt> attributes.
+    #   [<tt>:birthDate</tt>] the date of birth of the contact.
+    #   [<tt>:birthCity</tt>] the city of birth of the contact.
+    #   [<tt>:birthPc</tt>] the postal code of the city of birth.
+    #   [<tt>:birthCc</tt>] the country code of the place of birth.
+    #
+    # Additionnaly, when the contact is a person, there can be the following
+    # informations :
+    # [<tt>:firstName</tt>]
+    #   the first name of the person. (The last name being stored in the +name+
+    #   field in the +postalInfo+.)
+    # [<tt>:list</tt>]
+    #   with the value of +restrictedPublication+ mean that the element
+    #   diffusion should be restricted.
+    #
+    # Optionnaly, there can be :
+    # [<tt>:obsoleted</tt>]
+    #   the contact info is obsolete since/from the optional date <tt>:when</tt>.
+    # [<tt>:reachable</tt>]
+    #   the contact is reachable through the optional <tt>:media</tt> since/from
+    #   the optional date <tt>:when</tt>. The info having been specified by the
+    #   <tt>:source</tt>.
+    def contact_info(contact)
+      super # placeholder so that I can add some doc
+    end
+
+    def contact_info_process(xml) #:nodoc:
+      ret = super
+      if (contact = xml.xpath('epp:extension/frnic:ext/frnic:resData/frnic:infData/frnic:contact', EPPClient::SCHEMAS_URL)).size > 0
+	if (list = contact.xpath('frnic:list', EPPClient::SCHEMAS_URL)).size > 0
+	  ret[:list] = list.map {|l| l.text}
+	end
+	if (firstName = contact.xpath('frnic:firstName', EPPClient::SCHEMAS_URL)).size > 0
+	  ret[:firstName] = firstName.text
+	end
+	if (iI = contact.xpath('frnic:individualInfos', EPPClient::SCHEMAS_URL)).size > 0
+	  ret[:individualInfos] = {}
+	  ret[:individualInfos][:birthDate] = Date.parse(iI.xpath('frnic:birthDate', EPPClient::SCHEMAS_URL).text)
+	  if (r = iI.xpath("frnic:idStatus", EPPClient::SCHEMAS_URL)).size > 0
+	    ret[:individualInfos][:idStatus] = {:value => r.text}
+	    ret[:individualInfos][:idStatus][:when] = r.attr('when').value if r.attr('when')
+	    ret[:individualInfos][:idStatus][:source] = r.attr('source').value if r.attr('source')
+	  end
+	  %w(birthCity birthPc birthCc).each do |val|
+	    if (r = iI.xpath("frnic:#{val}", EPPClient::SCHEMAS_URL)).size > 0
+	      ret[:individualInfos][val.to_sym] = r.text
+	    end
+	  end
+	end
+	if (leI = contact.xpath('frnic:legalEntityInfos', EPPClient::SCHEMAS_URL)).size > 0
+	  ret[:legalEntityInfos] = legalEntityInfos(leI)
+	end
+	if (obsoleted = contact.xpath('frnic:obsoleted', EPPClient::SCHEMAS_URL)).size > 0
+	  if obsoleted.text != '0'
+	    ret[:obsoleted] = {}
+	    ret[:obsoleted][:when] = DateTime.parse(v_when.value) if v_when = obsoleted.attr('when')
+	  end
+	end
+	if (reachable = contact.xpath('frnic:reachable', EPPClient::SCHEMAS_URL)).size > 0
+	  if reachable.text != '0'
+	    ret[:reachable] = {}
+	    if v_when = reachable.attr('when')
+	      ret[:reachable][:when] = DateTime.parse(v_when.value)
+	    end
+	    if media = reachable.attr('media')
+	      ret[:reachable][:media] = media.value
+	    end
+	    if source = reachable.attr('source')
+	      ret[:reachable][:source] = source.value
+	    end
+	  end
+	end
+      end
+      ret
+    end
+
+    def contact_create_xml(contact) #:nodoc:
+      ret = super
+
+      ext = extension do |xml|
+	xml.ext( :xmlns => EPPClient::SCHEMAS_URL['frnic']) do
+	  xml.create do
+	    xml.contact do
+	      if contact.key?(:legalEntityInfos)
+		lEI = contact[:legalEntityInfos]
+		xml.legalEntityInfos do
+		  xml.idStatus(lEI[:idStatus]) if lEI.key?(:idStatus)
+		  xml.legalStatus(:s => lEI[:legalStatus])
+		  [:siren, :VAT, :trademark, :DUNS, :local].each do |val|
+		    if lEI.key?(val)
+		      xml.__send__(val, lEI[val])
+		    end
+		  end
+		  if lEI.key?(:asso)
+		    asso = lEI[:asso]
+		    xml.asso do
+		      if asso.key?(:waldec)
+			xml.waldec(asso[:waldec])
+		      else
+			xml.decl(asso[:decl]) if asso.key?(:decl)
+			attrs = {:page => asso[:publ][:page]}
+			attrs[:announce] = asso[:publ][:announce] if asso[:publ].key?(:announce)
+			xml.publ(attrs, asso[:publ][:date])
+		      end
+		    end
+		  end
+		end
+	      else
+		if contact.key?(:list)
+		  xml.list(contact[:list])
+		end
+		if contact.key?(:individualInfos)
+		  iI = contact[:individualInfos]
+		  xml.individualInfos do
+		    xml.idStatus(iI[:idStatus]) if iI.key?(:idStatus)
+		    xml.birthDate(iI[:birthDate])
+		    if iI.key?(:birthCity)
+		      xml.birthCity(iI[:birthCity])
+		    end
+		    if iI.key?(:birthPc)
+		      xml.birthPc(iI[:birthPc])
+		    end
+		    xml.birthCc(iI[:birthCc])
+		  end
+		end
+		if contact.key?(:firstName)
+		  xml.firstName(contact[:firstName])
+		end
+	      end
+	      if contact.key?(:reachable)
+		if Hash === (reachable = contact[:reachable])
+		  xml.reachable(reachable, 1)
+		else
+		  raise ArgumentError, "reachable has to be a Hash"
+		end
+	      end
+	    end
+	  end
+	end
+      end
+
+      insert_extension(ret, ext)
+    end
+
+    # Extends the base contact create so that the specific afnic create
+    # informations can be sent, the additionnal informations are :
+    #
+    # either :
+    # [<tt>:legalEntityInfos</tt>]
+    #   indicating that the contact is an organisation with the following
+    #   informations :
+    #   [<tt>:idStatus</tt>]
+    #     indicates the identification process status.
+    #   [<tt>:legalStatus</tt>]
+    #     should be either +company+, +association+ or +other+.
+    #   [<tt>:siren</tt>] contains the SIREN number of the organisation.
+    #   [<tt>:VAT</tt>]
+    #     is optional and contains the VAT number of the organisation.
+    #   [<tt>:trademark</tt>]
+    #     is optional and contains the trademark number of the organisation.
+    #   [<tt>:DUNS</tt>]
+    #     is optional and contains the Data Universal Numbering System number of
+    #     the organisation.
+    #   [<tt>:local</tt>]
+    #     is optional and contains an identifier local to the eligible country.
+    #   [<tt>:asso</tt>]
+    #     indicates the organisation is an association and contains either a
+    #     +waldec+ or a +decl+ and a +publ+ :
+    #     [<tt>:waldec</tt>] contains the waldec id of the association.
+    #     [<tt>:decl</tt>]
+    #       optionally indicate the date of the association was declared at the
+    #       prefecture.
+    #     [<tt>:publ</tt>]
+    #       contains informations regarding the publication in the "Journal
+    #       Officiel" :
+    #       [<tt>:date</tt>] the date of publication.
+    #       [<tt>:page</tt>] the page the announce is on.
+    #       [<tt>:announce</tt>] the announce number on the page (optional).
+    # [<tt>:individualInfos</tt>]
+    #   indicating that the contact is a person with the following
+    #   informations :
+    #   [<tt>:idStatus</tt>]
+    #     indicates the identification process status.
+    #   [<tt>:birthDate</tt>] the date of birth of the contact.
+    #   [<tt>:birthCity</tt>] the city of birth of the contact.
+    #   [<tt>:birthPc</tt>] the postal code of the city of birth.
+    #   [<tt>:birthCc</tt>] the country code of the place of birth.
+    #
+    # Additionnaly, when the contact is a person, there can be the following
+    # informations :
+    # [<tt>:firstName</tt>]
+    #   the first name of the person. (The last name being stored in the +name+
+    #   field in the +postalInfo+.)
+    # [<tt>:list</tt>]
+    #   with the value of +restrictedPublication+ mean that the element
+    #   diffusion should be restricted.
+    #
+    # Optionnaly, there can be :
+    # [<tt>:reachable</tt>]
+    #   the contact is reachable through the optional <tt>:media</tt>.
+    #
+    # The returned information contains new keys :
+    # [<tt>:idStatus</tt>]
+    #   indicates the identification process status. It's only present when the
+    #   created contact was created with the +:individualInfos+ or
+    #   +:legalEntityInfos+ extensions.
+    # [<tt>:nhStatus</tt>]
+    #   is a boolean indicating wether the contact is really new, or if there
+    #   was already a contact with the exact same informations in the database,
+    #   in which case, it has been returned.
+    def contact_create(contact)
+      super # placeholder so that I can add some doc
+    end
+
+    def contact_create_process(xml) #:nodoc:
+      ret = super
+      if (creData = xml.xpath('epp:extension/frnic:ext/frnic:resData/frnic:creData', EPPClient::SCHEMAS_URL)).size > 0
+	ret[:nhStatus] = creData.xpath('frnic:nhStatus', EPPClient::SCHEMAS_URL).attr('new').value == '1'
+	ret[:idStatus] = creData.xpath('frnic:idStatus', EPPClient::SCHEMAS_URL).text
+      end
+      ret
+    end
+
+    # Make sure there's no <tt>:ns</tt>, <tt>:dsData</tt> or <tt>:keyData</tt>
+    # records, AFNIC's servers sends quite a strange error when there is.
+    def domain_create(args)
+      raise ArgumentError, "You can't create a domain with ns records, you must do an update afterwards" if args.key?(:ns)
+      raise ArgumentError, "You can't create a domain with ds or key records, you must do an update afterwards" if args.key?(:dsData) || args.key?(:keyData)
+      super
+    end
+
+    # Raises an exception, as contacts are deleted with a garbage collector.
+    def contact_delete(args)
+      raise NotImplementedError, "Contacts are deleted with a garbage collector"
+    end
+
+    def contact_update_xml(args) #:nodoc:
+      ret = super
+
+      if [:add, :rem].any? {|c| args.key?(c) && [:list, :reachable, :idStatus].any? {|k| args[c].key?(k)}}
+	ext = extension do |xml|
+	  xml.ext( :xmlns => EPPClient::SCHEMAS_URL['frnic']) do
+	    xml.update do
+	      xml.contact do
+		[:add, :rem].each do |c|
+		  if args.key?(c) && [:list, :reachable, :idStatus].any? {|k| args[c].key?(k)}
+		    xml.__send__(c) do
+		      if args[c].key?(:list)
+			xml.list(args[c][:list])
+		      end
+		      if args[c].key?(:idStatus)
+			xml.idStatus(args[c][:idStatus])
+		      end
+		      if args[c].key?(:reachable)
+			if Hash === (reachable = args[c][:reachable])
+			  xml.reachable(reachable, 1)
+			else
+			  raise ArgumentError, "reachable has to be a Hash"
+			end
+		      end
+		    end
+		  end
+		end
+	      end
+	    end
+	  end
+	end
+
+	return insert_extension(ret, ext)
+      else
+	return ret
+      end
+    end
+
+    # Extends the base contact update so that the specific afnic update
+    # informations can be sent, the additionnal informations are :
+    #
+    # [<tt>:add</tt>/<tt>:rem</tt>]
+    #   adds or removes the following datas :
+    #   [<tt>:list</tt>]
+    #     with the value of +restrictedPublication+ mean that the element
+    #     diffusion should/should not be restricted.
+    #   [<tt>:idStatus</tt>]
+    #     indicates the identification process status.
+    #   [<tt>:reachable</tt>]
+    #     the contact is reachable through the optional <tt>:media</tt>.
+    def contact_update(args)
+      super # placeholder so that I can add some doc
+    end
+
+    # Extends the base domain update so that afnic's weirdnesses can be taken
+    # into account.
+    #
+    # AFNIC does not support ns/hostObj, only ns/hostAttr/Host*, so, take care
+    # of this here.
+    # Also, you can only do one of the following at a time :
+    # * update contacts
+    # * update name servers
+    # * update status & authInfo
+    def domain_update(args)
+      if args.key?(:chg) && args[:chg].key?(:registrant)
+	raise ArgumentError, "You need to do a trade or recover operation to change the registrant"
+      end
+      has_contacts = args.key?(:add) && args[:add].key?(:contacts) || args.key?(:add) && args[:add].key?(:contacts)
+      has_ns = args.key?(:add) && args[:add].key?(:ns) || args.key?(:add) && args[:add].key?(:ns)
+      has_other = args.key?(:add) && args[:add].key?(:status) || args.key?(:add) && args[:add].key?(:status) || args.key?(:chg) && args[:chg].key?(:authInfo)
+      if [has_contacts, has_ns, has_other].select {|v| v}.size > 1
+	raise ArgumentError, "You can't update all that at one time"
+      end
+      [:add, :rem].each do |ar|
+	if args.key?(ar) && args[ar].key?(:ns) && String === args[ar][:ns].first
+	  args[ar][:ns] = args[ar][:ns].map {|ns| {:hostName => ns}}
+	end
+      end
+      super
+    end
+
+    # Extends the base poll req to be able to parse quallification response
+    # extension.
+    def poll_req
+      super # placeholder so that I can add some doc
+    end
+
+    def poll_req_process(xml) #:nodoc:
+      ret = super(xml)
+      if (quaData = xml.xpath('epp:extension/frnic:resData/frnic:quaData', EPPClient::SCHEMAS_URL)).size > 0
+	if (contact = xml.xpath('frnic:contact', EPPClient::SCHEMAS_URL)).size > 0
+	  cret = {:id => contact.xpath('frnic:id', EPPClient::SCHEMAS_URL).text}
+	  qP = contact.xpath('frnic:qualificationProcess', EPPClient::SCHEMAS_URL)
+	  cret[:qualificationProcess][:s] = qP.attr('s').value
+	  cret[:qualificationProcess][:lang] = qP.attr('lang').value if qP.attr('lang')
+	  if (leI = contact.xpath('frnic:legalEntityInfos', EPPClient::SCHEMAS_URL)).size > 0
+	    ret[:legalEntityInfos] = legalEntityInfos(leI)
+	  end
+	  reach = contact.xpath('frnic:reachability', EPPClient::SCHEMAS_URL)
+	  cret[:reachability] = {:reStatus => reach.xpath('frnic:reStatus', EPPClient::SCHEMAS_URL).text}
+	  if (voice = reach.xpath('frnic:voice', EPPClient::SCHEMAS_URL)).size > 0
+	    cret[:reachability][:voice] = voice.text
+	  end
+	  if (email = reach.xpath('frnic:email', EPPClient::SCHEMAS_URL)).size > 0
+	    cret[:reachability][:email] = email.text
+	  end
+	  ret[:quaData] = {:contact => cret}
+	end
+      end
+      ret
+    end
+
+    # keep that at the end.
+    include EPPClient::RGP
+    include EPPClient::SecDNS
+  end
+end