Class: Mapi::Message::VcardConverter

Inherits:
Object
  • Object
show all
Includes:
Vpim
Defined in:
lib/mapi/convert/contact.rb

Constant Summary collapse

VCARD_MAP =

a very incomplete mapping, but its a start… can’t find where to set a lot of stuff, like zipcode, jobtitle etc

{
  # these are all standard mapi properties
  :name => [
    {
      :given   => :given_name,
      :family    => :surname,
      :fullname  => :subject
    }
  ],
  # outlook seems to eschew the mapi properties this time,
  # like postal_address, street_address, home_address_city
  # so we use the named properties
  :addr => [
    {
      :location  => 'work',
      :street    => :business_address_street,
      :locality  => proc do |props|
        [props.business_address_city, props.business_address_state].compact * ', '
      end
    }
  ],

  # right type? maybe date
  :birthday  => :birthday,
  :nickname  => :nickname

  # photo available?
  # FIXME finish, emails, telephones etc
}

Instance Attribute Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(msg) ⇒ VcardConverter

Returns a new instance of VcardConverter.



57
58
59
 
# File 'lib/mapi/convert/contact.rb', line 57

def initialize msg
  @msg = msg
end

Instance Attribute Details

#msg ⇒ Object (readonly)

Returns the value of attribute msg.



56
57
58
 
# File 'lib/mapi/convert/contact.rb', line 56

def msg
  @msg
end

Instance Method Details

#convert ⇒ Object 



95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
 
# File 'lib/mapi/convert/contact.rb', line 95

def convert
  Vpim::Vcard::Maker.make2 do |m|
    # handle name
    [:name, :addr].each do |type|
      VCARD_MAP[type].each do |hash|
        next unless props = get_properties(hash)
        m.send "add_#{type}" do |n|
          props.each { |key, value| n.send "#{key}=", value }
        end
      end
    end

    (VCARD_MAP.keys - [:name, :addr]).each do |key|
      value = get_property VCARD_MAP[key]
      m.send "#{key}=", value if value
    end

    # the rest of the stuff is custom

    url = get_property(:webpage) || get_property(:business_home_page)
    m.add_field field('URL', url) if url
    m.add_field field('X-EVOLUTION-FILE-AS', get_property(:file_under)) if get_property(:file_under)

    addr = get_property(:email_email_address) || get_property(:email_original_display_name)
    if addr
      m.add_email addr do |e|
        e.format ='x400' unless msg.props.email_addr_type == 'SMTP'
      end
    end

    if org = get_property(:company_name)
      m.add_field field('ORG', get_property(:company_name))
    end

    # TODO: imaddress
  end
end

#field(name, *args) ⇒ Object 



61
62
63
 
# File 'lib/mapi/convert/contact.rb', line 61

def field name, *args
  DirectoryInfo::Field.create name, Vpim.encode_text_list(args)
end

#get_properties(hash) ⇒ Object 



80
81
82
83
84
85
86
87
88
89
90
91
92
93
 
# File 'lib/mapi/convert/contact.rb', line 80

def get_properties hash
  constants = {}
  others = {}
  hash.each do |to, from|
    if String === from
      constants[to] = from
    else
      value = get_property from
      others[to] = value if value
    end
  end
  return nil if others.empty?
  others.merge constants
end

#get_property(key) ⇒ Object 



65
66
67
68
69
70
71
72
73
74
75
76
77
78
 
# File 'lib/mapi/convert/contact.rb', line 65

def get_property key
  if String === key
    return key
  elsif key.respond_to? :call
    value = key.call msg.props
  else
    value = msg.props[key]
  end
  if String === value and value.empty?
    nil
  else
    value
  end
end