src/miranda/miranda-buddy.c

   1 /**
   2  * @file miranda-buddy.c
   3  *
   4  * pidgin-sipe
   5  *
   6  * Copyright (C) 2010-12 SIPE Project <http://sipe.sourceforge.net/>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  */
  22
  23 #include <windows.h>
  24 #include <stdio.h>
  25
  26 #include <glib.h>
  27
  28 #include "miranda-version.h"
  29 #include "newpluginapi.h"
  30 #include "m_protosvc.h"
  31 #include "m_protoint.h"
  32 #include "m_protomod.h"
  33 #include "m_database.h"
  34 #include "m_clist.h"
  35
  36 #include "sipe-common.h"
  37 #include "sipe-backend.h"
  38 #include "sipe-core.h"
  39 #include "miranda-private.h"
  40
  41 #define ADD_PROP(key,value) g_hash_table_insert(info_to_property_table, (gpointer)key, value)
  42
  43 static GHashTable *info_to_property_table = NULL;
  44
  45 static void
  46 init_property_hash(void)
  47 {
  48         info_to_property_table = g_hash_table_new(NULL, NULL);
  49
  50 //      ADD_PROP(SIPE_BUDDY_INFO_DISPLAY_NAME, ALIAS_PROP);
  51         ADD_PROP(SIPE_BUDDY_INFO_EMAIL       , "e-mail");
  52         ADD_PROP(SIPE_BUDDY_INFO_WORK_PHONE  , "CompanyPhone");
  53 //      ADD_PROP(SIPE_BUDDY_INFO_WORK_PHONE_DISPLAY, PHONE_DISPLAY_PROP);
  54 //      ADD_PROP(SIPE_BUDDY_INFO_SITE        , SITE_PROP);
  55         ADD_PROP(SIPE_BUDDY_INFO_COMPANY     , "Company");
  56         ADD_PROP(SIPE_BUDDY_INFO_DEPARTMENT  , "CompanyDepartment");
  57         ADD_PROP(SIPE_BUDDY_INFO_JOB_TITLE   , "CompanyPosition");
  58 //      ADD_PROP(SIPE_BUDDY_INFO_OFFICE      , OFFICE_PROP);
  59         ADD_PROP(SIPE_BUDDY_INFO_STREET      , "CompanyStreet");
  60         ADD_PROP(SIPE_BUDDY_INFO_CITY        , "CompanyCity");
  61         ADD_PROP(SIPE_BUDDY_INFO_STATE       , "CompanyState");
  62         ADD_PROP(SIPE_BUDDY_INFO_ZIPCODE     , "CompanyZIP");
  63         ADD_PROP(SIPE_BUDDY_INFO_COUNTRY     , "CompanyCountry");
  64
  65         /* Summary values:
  66 SetValue(hwndDlg,IDC_NICK,hContact,szProto,"Nick",0);
  67 SetValue(hwndDlg,IDC_FIRSTNAME,hContact,szProto,"FirstName",0);
  68 SetValue(hwndDlg,IDC_LASTNAME,hContact,szProto,"LastName",0);
  69 SetValue(hwndDlg,IDC_EMAIL,hContact,szProto,"e-mail",0);
  70 SetValue(hwndDlg,IDC_AGE,hContact,szProto,"Age",SVS_ZEROISUNSPEC);
  71 SetValue(hwndDlg,IDC_GENDER,hContact,szProto,"Gender",SVS_GENDER);
  72 SetValue(hwndDlg,IDC_DOBDAY,hContact,szProto,"BirthDay",0);
  73 SetValue(hwndDlg,IDC_DOBMONTH,hContact,szProto,"BirthMonth",SVS_MONTH);
  74 SetValue(hwndDlg,IDC_DOBYEAR,hContact,szProto,"BirthYear",0);
  75
  76                 Location values:
  77 SetValue(hwndDlg,IDC_STREET,hContact,szProto,"Street",SVS_ZEROISUNSPEC);
  78 SetValue(hwndDlg,IDC_CITY,hContact,szProto,"City",SVS_ZEROISUNSPEC);
  79 SetValue(hwndDlg,IDC_STATE,hContact,szProto,"State",SVS_ZEROISUNSPEC);
  80 SetValue(hwndDlg,IDC_ZIP,hContact,szProto,"ZIP",SVS_ZEROISUNSPEC);
  81 SetValue(hwndDlg,IDC_COUNTRY,hContact,szProto,"Country",SVS_COUNTRY);
  82 SetValue(hwndDlg,IDC_LANGUAGE1,hContact,szProto,"Language1",SVS_ZEROISUNSPEC);
  83 SetValue(hwndDlg,IDC_LANGUAGE2,hContact,szProto,"Language2",SVS_ZEROISUNSPEC);
  84 SetValue(hwndDlg,IDC_LANGUAGE3,hContact,szProto,"Language3",SVS_ZEROISUNSPEC);
  85 SetValue(hwndDlg,IDC_TIMEZONE,hContact,szProto,"Timezone",SVS_TIMEZONE);
  86
  87                 Work values:
  88 SetValue(hwndDlg,IDC_COMPANY,hContact,szProto,"Company",SVS_ZEROISUNSPEC);
  89 SetValue(hwndDlg,IDC_DEPARTMENT,hContact,szProto,"CompanyDepartment",SVS_ZEROISUNSPEC);
  90 SetValue(hwndDlg,IDC_POSITION,hContact,szProto,"CompanyPosition",SVS_ZEROISUNSPEC);
  91 SetValue(hwndDlg,IDC_STREET,hContact,szProto,"CompanyStreet",SVS_ZEROISUNSPEC);
  92 SetValue(hwndDlg,IDC_CITY,hContact,szProto,"CompanyCity",SVS_ZEROISUNSPEC);
  93 SetValue(hwndDlg,IDC_STATE,hContact,szProto,"CompanyState",SVS_ZEROISUNSPEC);
  94 SetValue(hwndDlg,IDC_ZIP,hContact,szProto,"CompanyZIP",SVS_ZEROISUNSPEC);
  95 SetValue(hwndDlg,IDC_COUNTRY,hContact,szProto,"CompanyCountry",SVS_COUNTRY);
  96 SetValue(hwndDlg,IDC_WEBPAGE,hContact,szProto,"CompanyHomepage",SVS_ZEROISUNSPEC);
  97
  98                 Background:
  99 SetValue(hwndDlg,IDC_WEBPAGE,hContact,szProto,"Homepage",SVS_ZEROISUNSPEC);
 100
 101                 Contact:
 102 if(DBGetContactSettingTString(hContact,szProto,"e-mail",&dbv))
 103 mir_snprintf(idstr, SIZEOF(idstr), "e-mail%d", i );
 104 mir_snprintf(idstr, SIZEOF(idstr), "Mye-mail%d",i);
 105 if(!DBGetContactSettingTString(hContact,szProto,"Phone",&dbv)) {
 106 if(!DBGetContactSettingTString(hContact,szProto,"Fax",&dbv)) {
 107 if(!DBGetContactSettingTString(hContact,szProto,"Cellular",&dbv)) {
 108 if(!DBGetContactSettingTString(hContact,szProto,"CompanyPhone",&dbv)) {
 109 if(!DBGetContactSettingTString(hContact,szProto,"CompanyFax",&dbv)) {
 110 mir_snprintf(idstr, SIZEOF(idstr), "MyPhone%d",i);
 111
 112         */
 113 }
 114
 115 static const gchar *
 116 sipe_info_to_miranda_property(sipe_buddy_info_fields info)
 117 {
 118         if (!info_to_property_table)
 119                 init_property_hash();
 120         return (const char *)g_hash_table_lookup(info_to_property_table, (gconstpointer)info);
 121 }
 122
 123 sipe_backend_buddy sipe_miranda_buddy_find(SIPPROTO *pr,
 124                                            const gchar *name,
 125                                            const gchar *group)
 126 {
 127         HANDLE hContact;
 128
 129         hContact = (HANDLE)CallService(MS_DB_CONTACT_FINDFIRST, 0, 0);
 130         while (hContact) {
 131                 gchar* szProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
 132                 if (szProto != NULL && !lstrcmpA(szProto, pr->proto.m_szModuleName)) {
 133                         DBVARIANT dbv;
 134                         if ( !DBGetContactSettingString( hContact, pr->proto.m_szModuleName, SIP_UNIQUEID, &dbv )) {
 135                                 int tCompareResult = lstrcmpiA( dbv.pszVal, name );
 136                                 DBFreeVariant( &dbv );
 137                                 if ( !tCompareResult ) {
 138                                         if (!group)
 139                                         {
 140                                                 SIPE_DEBUG_INFO("buddy_name <%s> group <%s> found <%08x>", name, group, hContact);
 141                                                 return hContact;
 142                                         }
 143
 144                                         if ( !DBGetContactSettingStringUtf(hContact, "CList", "Group", &dbv )) {
 145                                                 int tCompareResult = lstrcmpiA( dbv.pszVal, group );
 146                                                 DBFreeVariant( &dbv );
 147                                                 if ( !tCompareResult )
 148                                                 {
 149                                                         SIPE_DEBUG_INFO("buddy_name <%s> group <%s> found <%08x> in group", name, group, hContact);
 150                                                         return hContact;
 151                                                 }
 152                                         } else {
 153                                                 SIPE_DEBUG_INFO("buddy_name <%s> group <%s> ERROR getting contact group", name, group);
 154                                                 return NULL;
 155                                         }
 156                                 }
 157                         }
 158                 }
 159                 hContact = (HANDLE)CallService(MS_DB_CONTACT_FINDNEXT, (WPARAM)hContact, 0);
 160         }
 161
 162         SIPE_DEBUG_INFO("buddy_name <%s> group <%s> NOT FOUND", name, group);
 163         return NULL;
 164 }
 165 sipe_backend_buddy sipe_backend_buddy_find(struct sipe_core_public *sipe_public,
 166                                            const gchar *name,
 167                                            const gchar *group)
 168 {
 169         return sipe_miranda_buddy_find(sipe_public->backend_private, name, group);
 170 }
 171
 172 GSList* sipe_miranda_buddy_find_all(SIPPROTO *pr,
 173                                     const gchar *buddy_name,
 174                                     const gchar *group_name)
 175 {
 176         GSList *res = NULL;
 177         HANDLE hContact;
 178
 179         hContact = (HANDLE)CallService(MS_DB_CONTACT_FINDFIRST, 0, 0);
 180         while (hContact) {
 181                 gchar* szProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
 182                 if (szProto != NULL && !lstrcmpA(szProto, pr->proto.m_szModuleName)) {
 183                         if (DBGetContactSettingByte(hContact, pr->proto.m_szModuleName, "ChatRoom", 0) == 0) {
 184                                 DBVARIANT dbv;
 185                                 if (!buddy_name)
 186                                         res = g_slist_append(res, hContact);
 187                                 else if ( !DBGetContactSettingString( hContact, pr->proto.m_szModuleName, SIP_UNIQUEID, &dbv )) {
 188                                         int tCompareResult = lstrcmpiA( dbv.pszVal, buddy_name );
 189                                         DBFreeVariant( &dbv );
 190                                         if ( !tCompareResult ) {
 191                                                 if (!group_name)
 192                                                         res = g_slist_append(res, hContact);
 193
 194                                                 else if ( !DBGetContactSettingStringUtf(hContact, "CList", "Group", &dbv )) {
 195                                                         int tCompareResult = lstrcmpiA( dbv.pszVal, group_name );
 196                                                         DBFreeVariant( &dbv );
 197                                                         if ( !tCompareResult )
 198                                                                 res = g_slist_append(res, hContact);
 199                                                 }
 200                                         }
 201                                 } else {
 202                                         SIPE_DEBUG_INFO_NOFORMAT("Could not get SIP id from contact");
 203                                 }
 204                         }
 205                 }
 206                 hContact = (HANDLE)CallService(MS_DB_CONTACT_FINDNEXT, (WPARAM)hContact, 0);
 207         }
 208
 209         SIPE_DEBUG_INFO("name <%s> group <%s> found <%d> buddies", buddy_name, group_name, g_slist_length(res));
 210         return res;
 211 }
 212
 213 GSList* sipe_backend_buddy_find_all(struct sipe_core_public *sipe_public,
 214                                     const gchar *buddy_name,
 215                                     const gchar *group_name)
 216 {
 217         return sipe_miranda_buddy_find_all(sipe_public->backend_private, buddy_name, group_name);
 218 }
 219
 220 gchar* sipe_backend_buddy_get_name(struct sipe_core_public *sipe_public,
 221                                    const sipe_backend_buddy who)
 222 {
 223         DBVARIANT dbv;
 224         HANDLE hContact = (HANDLE)who;
 225         gchar *alias;
 226         SIPPROTO *pr = sipe_public->backend_private;
 227         const gchar *module = pr->proto.m_szModuleName;
 228
 229         if ( !DBGetContactSettingString( hContact, module, SIP_UNIQUEID, &dbv )) {
 230                 alias = g_strdup(dbv.pszVal);
 231                 DBFreeVariant( &dbv );
 232                 return alias;
 233         }
 234
 235         return NULL;
 236 }
 237
 238 gchar* sipe_backend_buddy_get_alias(struct sipe_core_public *sipe_public,
 239                                     const sipe_backend_buddy who)
 240 {
 241         DBVARIANT dbv;
 242         HANDLE hContact = (HANDLE)who;
 243         gchar *alias;
 244         SIPPROTO *pr = sipe_public->backend_private;
 245         const gchar *module = pr->proto.m_szModuleName;
 246
 247         if ( DBGetContactSettingString( hContact, module, "Nick", &dbv )
 248           && DBGetContactSettingString( hContact, module, "Alias", &dbv )
 249           && DBGetContactSettingString( hContact, module, SIP_UNIQUEID, &dbv ))
 250                         return NULL;
 251
 252         alias = g_strdup(dbv.pszVal);
 253         DBFreeVariant( &dbv );
 254         return alias;
 255 }
 256
 257 gchar* sipe_backend_buddy_get_server_alias(struct sipe_core_public *sipe_public,
 258                                            const sipe_backend_buddy who)
 259 {
 260         DBVARIANT dbv;
 261         HANDLE hContact = (HANDLE)who;
 262         char *alias;
 263         SIPPROTO *pr = sipe_public->backend_private;
 264         const gchar *module = pr->proto.m_szModuleName;
 265
 266         if ( !DBGetContactSettingString( hContact, module, "Alias", &dbv )) {
 267                 alias = g_strdup(dbv.pszVal);
 268                 DBFreeVariant( &dbv );
 269                 return alias;
 270         }
 271
 272         return NULL;
 273 }
 274
 275 gchar* sipe_backend_buddy_get_local_alias(struct sipe_core_public *sipe_public,
 276                                            const sipe_backend_buddy who)
 277 {
 278         DBVARIANT dbv;
 279         HANDLE hContact = (HANDLE)who;
 280         char *alias;
 281         SIPPROTO *pr = sipe_public->backend_private;
 282         const gchar *module = pr->proto.m_szModuleName;
 283
 284         if ( DBGetContactSettingString( hContact, module, "Nick", &dbv )
 285           && DBGetContactSettingString( hContact, module, SIP_UNIQUEID, &dbv ))
 286                         return NULL;
 287
 288         alias = g_strdup(dbv.pszVal);
 289         DBFreeVariant( &dbv );
 290         return alias;
 291 }
 292
 293 gchar* sipe_backend_buddy_get_group_name(struct sipe_core_public *sipe_public,
 294                                          const sipe_backend_buddy who)
 295 {
 296         DBVARIANT dbv;
 297         HANDLE hContact = (HANDLE)who;
 298         gchar *alias;
 299         SIPPROTO *pr = sipe_public->backend_private;
 300         const gchar *module = pr->proto.m_szModuleName;
 301
 302         if ( !DBGetContactSettingString( hContact, "CList", "Group", &dbv )) {
 303                 alias = g_strdup(dbv.pszVal);
 304                 DBFreeVariant( &dbv );
 305                 return alias;
 306         }
 307
 308         return NULL;
 309 }
 310
 311 guint sipe_backend_buddy_get_status(struct sipe_core_public *sipe_public,
 312                                            const gchar *uri)
 313 {
 314         SIPPROTO *pr = sipe_public->backend_private;
 315         sipe_backend_buddy buddy = sipe_backend_buddy_find(sipe_public, uri, NULL);
 316         WORD rv = SIPE_ACTIVITY_UNSET;
 317
 318         sipe_miranda_getWord(pr, buddy, "Status", &rv);
 319         return MirandaStatusToSipe(rv);
 320 }
 321
 322 void sipe_backend_buddy_set_alias(struct sipe_core_public *sipe_public,
 323                                   const sipe_backend_buddy who,
 324                                   const gchar *alias)
 325 {
 326         SIPPROTO *pr = sipe_public->backend_private;
 327         HANDLE hContact = (HANDLE)who;
 328
 329         SIPE_DEBUG_INFO("Set alias of contact <%08x> to <%s>", who, alias);
 330         sipe_miranda_setContactStringUtf( pr, hContact, "Nick", alias );
 331 }
 332
 333 void sipe_backend_buddy_set_server_alias(struct sipe_core_public *sipe_public,
 334                                          const sipe_backend_buddy who,
 335                                          const gchar *alias)
 336 {
 337         HANDLE hContact = (HANDLE)who;
 338         SIPPROTO *pr = sipe_public->backend_private;
 339
 340         SIPE_DEBUG_INFO("Set alias of contact <%08x> to <%s>", who, alias);
 341         sipe_miranda_setContactStringUtf( pr, hContact, "Alias", alias );
 342 }
 343
 344 gchar* sipe_backend_buddy_get_string(struct sipe_core_public *sipe_public,
 345                                      sipe_backend_buddy buddy,
 346                                      const sipe_buddy_info_fields key)
 347 {
 348         SIPPROTO *pr = sipe_public->backend_private;
 349         const gchar *module = pr->proto.m_szModuleName;
 350         const gchar *prop_name = sipe_info_to_miranda_property(key);
 351         char *tmp;
 352         char *prop_str;
 353
 354         if (!prop_name)
 355                 return NULL;
 356
 357         tmp = sipe_miranda_getContactString(pr, buddy, prop_name);
 358         prop_str = g_strdup(tmp);
 359         mir_free(tmp);
 360
 361         return prop_str;
 362 }
 363
 364 void sipe_backend_buddy_set_string(struct sipe_core_public *sipe_public,
 365                                    sipe_backend_buddy buddy,
 366                                    const sipe_buddy_info_fields key,
 367                                    const gchar *val)
 368 {
 369         SIPPROTO *pr = sipe_public->backend_private;
 370         const gchar *module = pr->proto.m_szModuleName;
 371         const gchar *prop_name = sipe_info_to_miranda_property(key);
 372
 373         SIPE_DEBUG_INFO("buddy <%08x> key <%d = %s> val <%s>", buddy, key, prop_name, val);
 374         if (!prop_name)
 375                 return;
 376
 377         sipe_miranda_setContactString(pr, buddy, prop_name, val);
 378 }
 379
 380 void sipe_backend_buddy_refresh_properties(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 381                                            SIPE_UNUSED_PARAMETER const gchar *uri)
 382 {
 383         /* nothing to do here: already taken care of by Miranda */
 384 }
 385
 386 void sipe_backend_buddy_list_processing_start(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public)
 387 {
 388 }
 389
 390 void sipe_backend_buddy_list_processing_finish(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public)
 391 {
 392 }
 393
 394 sipe_backend_buddy sipe_backend_buddy_add(struct sipe_core_public *sipe_public,
 395                                           const gchar *name,
 396                                           const gchar *alias,
 397                                           const gchar *groupname)
 398 {
 399         SIPPROTO *pr = sipe_public->backend_private;
 400         HANDLE hContact;
 401
 402         SIPE_DEBUG_INFO("Adding miranda contact for buddy <%s> alias <%s> in <%s>", name, alias, groupname);
 403         hContact = ( HANDLE )CallService( MS_DB_CONTACT_ADD, 0, 0 );
 404         CallService( MS_PROTO_ADDTOCONTACT, ( WPARAM )hContact,( LPARAM )pr->proto.m_szModuleName );
 405         sipe_miranda_setContactString( pr, hContact, SIP_UNIQUEID, name ); // name
 406         if (alias) sipe_miranda_setContactStringUtf( pr, hContact, "Nick", alias );
 407         DBWriteContactSettingString( hContact, "CList", "Group", groupname );
 408         sipe_miranda_setContactString( pr, hContact, "Group", groupname );
 409         return (sipe_backend_buddy)hContact;
 410 }
 411
 412 void sipe_backend_buddy_remove(struct sipe_core_public *sipe_public,
 413                                const sipe_backend_buddy who)
 414 {
 415         CallService( MS_DB_CONTACT_DELETE, (WPARAM)who, 0 );
 416 }
 417
 418 void sipe_backend_buddy_request_authorization(struct sipe_core_public *sipe_public,
 419                                               const gchar *who,
 420                                               const gchar *alias,
 421                                               gboolean on_list,
 422                                               sipe_backend_buddy_request_authorization_cb auth_cb,
 423                                               sipe_backend_buddy_request_authorization_cb deny_cb,
 424                                               void *data)
 425 {
 426         SIPPROTO *pr = sipe_public->backend_private;
 427         CCSDATA ccs;
 428         PROTORECVEVENT pre = {0};
 429         HANDLE hContact;
 430         BYTE *pblob;
 431
 432         hContact = sipe_backend_buddy_find( sipe_public, who, NULL );
 433         if (!hContact)
 434         {
 435                 SIPE_DEBUG_INFO("Adding miranda contact for incoming talker <%s>", who);
 436                 hContact = ( HANDLE )CallService( MS_DB_CONTACT_ADD, 0, 0 );
 437                 CallService( MS_PROTO_ADDTOCONTACT, ( WPARAM )hContact,( LPARAM )pr->proto.m_szModuleName );
 438                 DBWriteContactSettingByte( hContact, "CList", "NotOnList", 1 );
 439                 sipe_miranda_setContactString( pr, hContact, SIP_UNIQUEID, who ); // name
 440         }
 441
 442         ccs.szProtoService      = PSR_AUTH;
 443         ccs.hContact            = hContact;
 444         ccs.wParam              = 0;
 445         ccs.lParam              = (LPARAM) &pre;
 446
 447         pre.flags               = PREF_UTF;
 448         pre.timestamp           = time(NULL);
 449         pre.lParam              = sizeof(DWORD)+sizeof(HANDLE)+strlen(who)+strlen(alias)+5;
 450         pre.szMessage           = malloc(pre.lParam);
 451
 452         pblob = pre.szMessage;
 453
 454         *(DWORD*)pblob = 0; /* UIN */
 455         pblob += sizeof(DWORD);
 456
 457         *(HANDLE*)pblob = hContact; /* contact */
 458         pblob += sizeof(HANDLE);
 459
 460         strcpy(pblob, who); /* nick */
 461         pblob += strlen(pblob) + 1;
 462
 463         strcpy(pblob, alias); /* first name */
 464         pblob += strlen(pblob) + 1;
 465
 466         strcpy(pblob, ""); /* last name */
 467         pblob += strlen(pblob) + 1;
 468
 469         strcpy(pblob, ""); /* email */
 470         pblob += strlen(pblob) + 1;
 471
 472         strcpy(pblob, ""); /* msg */
 473         pblob += strlen(pblob) + 1;
 474
 475         CallService(MS_PROTO_CHAINRECV, 0, (LPARAM)&ccs);
 476
 477         _NIF();
 478         auth_cb(data);
 479 }
 480
 481 void sipe_backend_buddy_request_add(struct sipe_core_public *sipe_public,
 482                                     const gchar *who,
 483                                     const gchar *alias)
 484 {
 485         _NIF();
 486 }
 487
 488 gboolean sipe_backend_buddy_is_blocked(struct sipe_core_public *sipe_public,
 489                                        const gchar *who)
 490 {
 491         _NIF();
 492         return FALSE;
 493 }
 494
 495 void sipe_backend_buddy_set_blocked_status(struct sipe_core_public *sipe_public,
 496                                            const gchar *who,
 497                                            gboolean blocked)
 498 {
 499         _NIF();
 500 }
 501
 502 void sipe_backend_buddy_set_status(struct sipe_core_public *sipe_public,
 503                                    const gchar *who,
 504                                    guint activity)
 505 {
 506         SIPPROTO *pr = sipe_public->backend_private;
 507         GSList *contacts = sipe_backend_buddy_find_all(sipe_public, who, NULL);
 508
 509         CONTACTS_FOREACH(contacts)
 510                 sipe_miranda_setWord(pr, hContact, "Status", SipeStatusToMiranda(activity));
 511         CONTACTS_FOREACH_END;
 512
 513 }
 514
 515 gboolean sipe_backend_buddy_group_add(struct sipe_core_public *sipe_public,
 516                                       const gchar *group_name)
 517 {
 518         TCHAR *mir_group_name = mir_a2t(group_name);
 519         HANDLE hGroup = (HANDLE)CallService(MS_CLIST_GROUPCREATE, 0, (LPARAM)mir_group_name);
 520         mir_free(mir_group_name);
 521         return (hGroup?TRUE:FALSE);
 522 }
 523
 524 gboolean sipe_backend_buddy_group_rename(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 525                                          SIPE_UNUSED_PARAMETER const gchar *old_name,
 526                                          SIPE_UNUSED_PARAMETER const gchar *new_name)
 527 {
 528         /* @TODO */
 529         return(FALSE);
 530 }
 531
 532 void sipe_backend_buddy_group_remove(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 533                                      SIPE_UNUSED_PARAMETER const gchar *group_name)
 534 {
 535         /* @TODO */
 536 }
 537
 538 struct sipe_backend_buddy_info *sipe_backend_buddy_info_start(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public)
 539 {
 540         return((struct sipe_backend_buddy_info *)g_hash_table_new_full(NULL,NULL,NULL,g_free));
 541 }
 542
 543 void sipe_backend_buddy_info_add(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 544                                  struct sipe_backend_buddy_info *info,
 545                                  sipe_buddy_info_fields description,
 546                                  const gchar *value)
 547 {
 548         g_hash_table_insert((GHashTable*)info, (gpointer)description, g_strdup(value));
 549 }
 550
 551 void sipe_backend_buddy_info_break(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 552                                    struct sipe_backend_buddy_info *info)
 553 {
 554         /* Nothin to do */
 555 }
 556
 557 static void set_if_defined(SIPPROTO *pr, GHashTable *store, HANDLE hContact, sipe_buddy_info_fields field, char *label)
 558 {
 559         char *value = (char *)g_hash_table_lookup(store, (gpointer)field);
 560         if (value)
 561                 sipe_miranda_setContactStringUtf(pr, hContact, label, value);
 562 }
 563
 564 void sipe_backend_buddy_info_finalize(struct sipe_core_public *sipe_public,
 565                                       struct sipe_backend_buddy_info *info,
 566                                       const gchar *uri)
 567 {
 568         SIPPROTO *pr = sipe_public->backend_private;
 569         HANDLE hContact = sipe_miranda_buddy_find(pr, uri, NULL); /* (HANDLE) data; */
 570         DBVARIANT dbv;
 571         GHashTable *results = (GHashTable*)info;
 572
 573         GHashTableIter iter;
 574         const char *id, *value;
 575
 576         g_hash_table_iter_init( &iter, results);
 577         while (g_hash_table_iter_next (&iter, (gpointer *)&id, (gpointer *)&value)) {
 578                 SIPE_DEBUG_INFO("miranda_sipe_get_info_cb: user info field <%d> = <%s>", id, value ? value : "(none)");
 579         }
 580         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_EMAIL, "e-mail");
 581         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_CITY, "City");
 582         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_STATE, "State");
 583         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_COUNTRY, "Country");
 584         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_COMPANY, "Company");
 585         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_JOB_TITLE, "CompanyPosition");
 586         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_WORK_PHONE, "CompanyPhone");
 587         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_STREET, "CompanyStreet");
 588         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_ZIPCODE, "CompanyZIP");
 589         set_if_defined(pr, results, hContact, SIPE_BUDDY_INFO_DEPARTMENT, "CompanyDepartment");
 590
 591         if ( !DBGetContactSettingString( hContact, pr->proto.m_szModuleName, SIP_UNIQUEID, &dbv )) {
 592                 GString *content = g_string_new(NULL);
 593                 WORD wstatus;
 594                 gchar *status;
 595 /*              GSList *info; */
 596                 gboolean is_online;
 597
 598                 sipe_miranda_getWord(pr, hContact, "Status", &wstatus);
 599                 status = (gchar*)CallService(MS_CLIST_GETSTATUSMODEDESCRIPTION, (WPARAM)wstatus, (LPARAM)GSMDF_PREFIXONLINE);
 600                 is_online = g_str_has_prefix(status, "Online: ") || !g_ascii_strcasecmp(status, "Online");
 601 /*
 602                 info = sipe_core_buddy_info(sipe_public,
 603                                             dbv.pszVal,
 604                                             g_str_has_prefix(status, "Online: ") ? status+8 : status,
 605                                             is_online);
 606
 607                 while (info) {
 608                         struct sipe_buddy_info *sbi = info->data;
 609                         g_string_append_printf(content, "%s: %s\r\n", sbi->label, sbi->text);
 610                         g_free(sbi->text);
 611                         g_free(sbi);
 612                         info = g_slist_delete_link(info, info);
 613                 }
 614                 sipe_miranda_setContactStringUtf(pr, hContact, "About", content->str);
 615 */
 616                 g_string_free(content, TRUE);
 617         }
 618
 619         sipe_miranda_SendBroadcast(pr, hContact, ACKTYPE_GETINFO, ACKRESULT_SUCCESS, (HANDLE) 1, (LPARAM) 0);
 620 }
 621
 622 struct sipe_backend_buddy_menu *sipe_backend_buddy_menu_start(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public)
 623 {
 624         return(NULL);
 625 }
 626
 627 struct sipe_backend_buddy_menu *sipe_backend_buddy_menu_add(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 628                                                             struct sipe_backend_buddy_menu *menu,
 629                                                             const gchar *label,
 630                                                             enum sipe_buddy_menu_type type,
 631                                                             gpointer parameter)
 632 {
 633         _NIF();
 634         return(NULL);
 635 }
 636
 637 struct sipe_backend_buddy_menu *sipe_backend_buddy_menu_separator(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 638                                                                   struct sipe_backend_buddy_menu *menu,
 639                                                                   const gchar *label)
 640 {
 641         _NIF();
 642         return(NULL);
 643 }
 644
 645 struct sipe_backend_buddy_menu *sipe_backend_buddy_sub_menu_add(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 646                                                                 struct sipe_backend_buddy_menu *menu,
 647                                                                 const gchar *label,
 648                                                                 struct sipe_backend_buddy_menu *sub)
 649 {
 650         _NIF();
 651         return(NULL);
 652 }
 653
 654 void sipe_backend_buddy_tooltip_add(SIPE_UNUSED_PARAMETER struct sipe_core_public *sipe_public,
 655                                     struct sipe_backend_buddy_tooltip *tooltip,
 656                                     const gchar *description,
 657                                     const gchar *value)
 658 {
 659         _NIF();
 660 }
 661
 662 int sipe_miranda_buddy_delete(SIPPROTO *pr, WPARAM wParam, LPARAM lParam)
 663 {
 664         DBVARIANT dbv;
 665         HANDLE hContact = (HANDLE)wParam;
 666         char *name;
 667         char *groupname;
 668
 669         SIPE_DEBUG_INFO("Deleting contact <%08x>", hContact);
 670
 671         if ( DBGetContactSettingString( hContact, pr->proto.m_szModuleName, SIP_UNIQUEID, &dbv ))
 672                 return 0;
 673
 674         name = g_strdup(dbv.pszVal);
 675         DBFreeVariant( &dbv );
 676
 677         if ( DBGetContactSettingString( hContact, "CList", "Group", &dbv ))
 678         {
 679                 g_free(name);
 680                 return 0;
 681         }
 682
 683         groupname = g_strdup(dbv.pszVal);
 684         DBFreeVariant( &dbv );
 685
 686         LOCK;
 687         sipe_core_buddy_remove(pr->sip, name, groupname);
 688         UNLOCK;
 689
 690         return 0;
 691 }
 692
 693 unsigned GetAwayMsgThread(SIPPROTO *pr, HANDLE hContact)
 694 {
 695         const gchar *status;
 696         gchar *name = sipe_miranda_getContactString(pr, hContact, SIP_UNIQUEID);
 697         gchar *tmp = NULL;
 698
 699         if (!name)
 700         {
 701                 SIPE_DEBUG_INFO("Could not find name for contact <%08x>", hContact);
 702                 sipe_miranda_SendProtoAck(pr, hContact, 1, ACKRESULT_FAILED, ACKTYPE_AWAYMSG, NULL);
 703                 return 0;
 704         }
 705
 706         LOCK;
 707         status = sipe_core_buddy_status(pr->sip,
 708                                         name,
 709                                         SIPE_ACTIVITY_BUSYIDLE,
 710                                         "dummy test string");
 711         UNLOCK;
 712
 713         if (status)
 714                 tmp = sipe_miranda_eliminate_html(status, strlen(status));
 715
 716         sipe_miranda_SendProtoAck(pr, hContact, 1, ACKRESULT_SUCCESS, ACKTYPE_AWAYMSG, tmp);
 717
 718         mir_free(tmp);
 719         mir_free(name);
 720         return 0;
 721 }
 722
 723 HANDLE
 724 sipe_miranda_GetAwayMsg( SIPPROTO *pr, HANDLE hContact )
 725 {
 726         CloseHandle((HANDLE)mir_forkthreadowner(&GetAwayMsgThread, pr, hContact, NULL ));
 727         return (HANDLE)1;
 728 }
 729
 730 int
 731 sipe_miranda_GetInfo( SIPPROTO *pr, HANDLE hContact, int infoType )
 732 {
 733         DBVARIANT dbv;
 734
 735         SIPE_DEBUG_INFO("GetInfo: infotype <%x>", infoType);
 736         if (!pr->sip) return 0;
 737
 738         if ( !DBGetContactSettingString( hContact, pr->proto.m_szModuleName, SIP_UNIQUEID, &dbv )) {
 739                 LOCK;
 740                 sipe_core_buddy_get_info(pr->sip, dbv.pszVal);
 741                 UNLOCK;
 742                 DBFreeVariant( &dbv );
 743         }
 744
 745         return 0;
 746 }
 747
 748 gboolean sipe_backend_uses_photo(void)
 749 {
 750         return FALSE;
 751 }
 752
 753 void sipe_backend_buddy_set_photo(struct sipe_core_public *sipe_public,
 754                                   const gchar *who,
 755                                   gpointer photo_data,
 756                                   gsize data_len,
 757                                   const gchar *photo_hash)
 758 {
 759         g_free(photo_data);
 760 }
 761
 762 const gchar *sipe_backend_buddy_get_photo_hash(struct sipe_core_public *sipe_public,
 763                                                const gchar *who)
 764 {
 765         const gchar *result = NULL;
 766         return result;
 767 }
 768
 769 /*
 770   Local Variables:
 771   mode: c
 772   c-file-style: "bsd"
 773   indent-tabs-mode: t
 774   tab-width: 8
 775   End:
 776 */