DuckCorp » CyborgHood

require 'cyborghood/objects/ldap'

class DnsDomain < Delegator

attr_reader :ldap, :name

def initialize(name)

@name = name

raise "invalid zone name" unless self.is_valid?

# may not exist (if creating a new one)

begin

@ldap = LdapDnsDomain.find(name)

rescue

@ldap = nil

end

end

def self.is_valid?(name)

name =~ /^[a-z0-9.-]+\.[a-z]{2,4}$/

end

def is_valid?

self.class.is_valid?(@name)

end

def hosted?

not @ldap.nil?

end

def managed_by?(user)

@ldap.managers.include? user.ldap.dn

end

def __getobj__

@ldap

end

def self.find_by_manager(user)

list = LdapDnsDomain.find(:all, :attribute => 'manager', :value => user.ldap.dn)

list.collect do |l_dom|

domain = allocate

domain.instance_variable_set("@ldap", l_dom)

end

end

end

class Person < Delegator

attr_reader :ldap

def self.find_by_fingerprint(fingerprint)

list = LdapPerson.find(:all, :attribute => 'keyFingerPrint', :value => fingerprint)

case list.size

when 0

nil

when 1

person = allocate

person.instance_variable_set("@ldap", list.first)

person

else

logger.warn "Multiple users match in database, so i guess there is a mistake. It is safer to skip..."

nil

end

end

def __getobj__

@ldap

end

end

class LdapDnsDomain < ActiveLdap::Base

ldap_mapping :dn_attribute => 'cn', :prefix => '', :classes => ['genericDomain']

def managers

list = self.manager

return [] if list.nil?

return list.collect{|dn| dn.to_s } if list.is_a? Array

return [list.to_s]

end

end

class LdapPerson < ActiveLdap::Base

ldap_mapping :dn_attribute => 'uid', :prefix => '', :classes => ['person', 'extInetOrgPerson']

end

require 'cyborghood/objects'