summaryrefslogtreecommitdiffstats
path: root/kfile-plugins/vcf/kfile_vcf.cpp
blob: 76b3383c652b4b8a9a547f7541af2969210b1571 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
/* This file is part of the KDE project
 * Copyright (C) 2002 Shane Wright <me@shanewright.co.uk>
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public
 * License as published by the Free Software Foundation version 2.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; see the file COPYING.  If not, write to
 * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 * Boston, MA 02110-1301, USA.
 *
 */

#include <kdebug.h>
#include <config.h>
#include "kfile_vcf.h"

#include <kprocess.h>
#include <klocale.h>
#include <kgenericfactory.h>
#include <kabc/vcardconverter.h>

#include <tqdict.h>
#include <tqfile.h>

typedef KGenericFactory<KVcfPlugin> VcfFactory;

K_EXPORT_COMPONENT_FACTORY(kfile_vcf, VcfFactory( "kfile_vcf" ))

KVcfPlugin::KVcfPlugin(TQObject *parent, const char *name,
                       const TQStringList &args)

    : KFilePlugin(parent, name, args)
{
    KFileMimeTypeInfo* info = addMimeTypeInfo( "text/x-vcard" );

    KFileMimeTypeInfo::GroupInfo* group = 0L;

    group = addGroupInfo(info, "Technical", i18n("Technical Details"));

    KFileMimeTypeInfo::ItemInfo* item;

    item = addItemInfo(group, "Name", i18n("Name"), TQVariant::String);
    item = addItemInfo(group, "Email", i18n("Email"), TQVariant::String);
    item = addItemInfo(group, "Telephone", i18n("Telephone"), TQVariant::String);
}


bool KVcfPlugin::readInfo( KFileMetaInfo& info, uint /*what*/ )
{
    TQFile file(info.path());

    if (!file.open(IO_ReadOnly))
    {
        kdDebug(7034) << "Couldn't open " << TQFile::encodeName(info.path()) << endl;
        return false;
    }

    // even the vcard thumbnail TQString::fromUtf8(buf_name));creator reads the full file ...
    // The following is partly copied from there
    TQString contents = file.readAll();
    file.close();

    KABC::VCardConverter converter;
    KABC::Addressee addr = converter.parseVCard(contents);

    KFileMetaInfoGroup group = appendGroup(info, "Technical");

    // prepare the text
    TQString name = addr.formattedName().simplifyWhiteSpace();
    if ( name.isEmpty() )
      name = addr.givenName() + " " + addr.familyName();
    name = name.simplifyWhiteSpace();

    if ( ! name.isEmpty() )
        appendItem(group, "Name", name);

    if ( ! addr.preferredEmail().isEmpty() )
        appendItem(group, "Email", addr.preferredEmail());

    KABC::PhoneNumber::List pnList = addr.phoneNumbers();
    TQStringList phoneNumbers;
    for (unsigned int no=0; no<pnList.count(); ++no) {
      TQString pn = pnList[no].number().simplifyWhiteSpace();
      if (!pn.isEmpty() && !phoneNumbers.contains(pn))
        phoneNumbers.append(pn);
    }
    if ( !phoneNumbers.isEmpty() )
        appendItem(group, "Telephone", phoneNumbers.join("\n"));

    return true;
}

#include "kfile_vcf.moc"