src/pEp_internal.h
author Krista 'DarthMama' Bennett <krista@pep.foundation>
Mon, 20 May 2019 07:33:05 +0200
branchENGINE-559
changeset 3730 922720c27d9a
parent 3729 1c6553767712
child 3750 318c86bc30b0
permissions -rw-r--r--
ENGINE-559: first running version that passes the old tests - need to test the new functionality, but hey, it didn't explode. Theoretically, we now keep track of the latest pEp version received from pEp users.
vb@1517
     1
// This file is under GNU General Public License 3.0
vb@1517
     2
// see LICENSE.txt
vb@1517
     3
krista@3051
     4
#define PEP_ENGINE_VERSION "1.1.1"
vb@908
     5
vb@908
     6
// maximum attachment size to import as key 1MB, maximum of 20 attachments
vb@908
     7
vb@908
     8
#define MAX_KEY_SIZE (1024 * 1024)
vb@908
     9
#define MAX_KEYS_TO_IMPORT  20
vb@24
    10
krista@2612
    11
#define KEY_EXPIRE_DELTA (60 * 60 * 24 * 365)
krista@2612
    12
vb@233
    13
// this is 20 trustwords with 79 chars max
vb@251
    14
#define MAX_TRUSTWORDS_SPACE (20 * 80)
vb@24
    15
vb@24
    16
// XML parameters string
vb@24
    17
#define PARMS_MAX 32768
vb@24
    18
vb@24
    19
// maximum busy wait time in ms
vb@24
    20
#define BUSY_WAIT_TIME 5000
vb@24
    21
vb@24
    22
// maximum line length for reading gpg.conf
vb@24
    23
#define MAX_LINELENGTH 1024
vb@24
    24
vb@24
    25
// default keyserver
vb@450
    26
#ifndef DEFAULT_KEYSERVER
vb@24
    27
#define DEFAULT_KEYSERVER "hkp://keys.gnupg.net"
vb@450
    28
#endif
vb@450
    29
vb@450
    30
// crashdump constants
vb@450
    31
#ifndef CRASHDUMP_DEFAULT_LINES
vb@450
    32
#define CRASHDUMP_DEFAULT_LINES 100
vb@450
    33
#endif
vb@450
    34
#define CRASHDUMP_MAX_LINES 32767
vb@24
    35
krista@2045
    36
// p≡p full string, NUL-terminated
krista@2045
    37
#ifndef PEP_SUBJ_STRING
krista@2045
    38
#define PEP_SUBJ_STRING {0x70,0xE2,0x89,0xA1,0x70,0x00}
krista@2045
    39
#define PEP_SUBJ_BYTELEN 5
krista@2045
    40
#endif
krista@2045
    41
krista@2078
    42
#ifndef PEP_SUBJ_KEY
krista@2078
    43
#define PEP_SUBJ_KEY "Subject: "
krista@2078
    44
#define PEP_SUBJ_KEY_LC "subject: "
krista@2078
    45
#define PEP_SUBJ_KEY_LEN 9
krista@2078
    46
#endif
krista@2078
    47
krista@2120
    48
#ifndef PEP_MSG_WRAP_KEY
krista@2120
    49
#define PEP_MSG_WRAP_KEY "pEp-Wrapped-Message-Info: "
krista@2120
    50
#define PEP_MSG_WRAP_KEY_LC "pep-wrapped-message-info: "
krista@2120
    51
#define PEP_MSG_WRAP_KEY_LEN 26
krista@2078
    52
#endif
krista@2078
    53
krista@3723
    54
#ifndef X_PEP_MSG_WRAP_KEY
krista@3723
    55
#define X_PEP_MSG_WRAP_KEY "X-pEp-Wrapped-Message-Info"
krista@3723
    56
#endif
krista@2078
    57
krista@3723
    58
#ifndef X_PEP_SNDR_FPR_KEY
krista@3723
    59
#define X_PEP_SNDR_FPR_KEY "X-pEp-Sender-FPR"
krista@3723
    60
#endif
krista@3723
    61
 
vb@130
    62
#include "platform.h"
vb@130
    63
vb@24
    64
#ifdef WIN32
vb@24
    65
#define LOCAL_DB windoze_local_db()
vb@24
    66
#define SYSTEM_DB windoze_system_db()
vb@24
    67
#define LIBGPGME "libgpgme-11.dll"
vb@24
    68
#else // UNIX
vb@24
    69
#define _POSIX_C_SOURCE 200809L
vb@24
    70
#include <dlfcn.h>
krista@2684
    71
#ifdef NDEBUG
vb@24
    72
#define LOCAL_DB unix_local_db()
krista@2684
    73
#else
krista@2684
    74
#define LOCAL_DB unix_local_db(false)
krista@2684
    75
#endif
vb@24
    76
#ifndef SYSTEM_DB
vb@24
    77
#define SYSTEM_DB "/usr/share/pEp/system.db"
vb@24
    78
#endif
vb@24
    79
#ifndef LIBGPGME
vb@24
    80
#define LIBGPGME "libgpgme-pthread.so"
vb@24
    81
#endif
vb@24
    82
#endif
vb@24
    83
vb@24
    84
#include <locale.h>
vb@24
    85
#include <stdlib.h>
vb@24
    86
#include <string.h>
vb@24
    87
#include <assert.h>
vb@24
    88
#include <stdio.h>
edouard@1521
    89
#include <ctype.h>
krista@2176
    90
#include <math.h>
vb@24
    91
damiano@1997
    92
#ifdef SQLITE3_FROM_OS
damiano@1997
    93
#include <sqlite3.h>
damiano@1997
    94
#else
vb@24
    95
#include "sqlite3.h"
damiano@1997
    96
#endif
vb@24
    97
vb@24
    98
#include "pEpEngine.h"
Edouard@168
    99
Edouard@168
   100
// If not specified, build for GPG
neal@3191
   101
#ifndef USE_SEQUOIA
Edouard@168
   102
#ifndef USE_NETPGP
Edouard@168
   103
#ifndef USE_GPG
Edouard@168
   104
#define USE_GPG
Edouard@168
   105
#endif
Edouard@168
   106
#endif
neal@3191
   107
#endif
Edouard@168
   108
vb@3540
   109
#if defined(USE_SEQUOIA)
vb@3540
   110
#include "pgp_sequoia_internal.h"
vb@229
   111
#elif defined(USE_NETPGP)
Edouard@168
   112
#include "pgp_netpgp_internal.h"
vb@3540
   113
#elif defined(USE_GPG)
vb@3540
   114
#include "pgp_gpg_internal.h"
vb@24
   115
#endif
vb@24
   116
vb@292
   117
#include "keymanagement.h"
vb@28
   118
#include "cryptotech.h"
vb@28
   119
#include "transport.h"
vb@2847
   120
#include "sync_api.h"
vb@2830
   121
#include "Sync_func.h"
krista@2787
   122
krista@2947
   123
#include "key_reset.h"
vb@28
   124
vb@125
   125
#define NOT_IMPLEMENTED assert(0); return PEP_UNKNOWN_ERROR;
vb@24
   126
edouard@1603
   127
struct _pEpSession;
edouard@1603
   128
typedef struct _pEpSession pEpSession;
edouard@1603
   129
struct _pEpSession {
vb@24
   130
    const char *version;
vb@2833
   131
    messageToSend_t messageToSend;
vb@2833
   132
Edouard@168
   133
#ifdef USE_GPG
vb@24
   134
    gpgme_ctx_t ctx;
vb@229
   135
#elif defined(USE_NETPGP)
Edouard@252
   136
    pEpNetPGPSession ctx;
neal@3191
   137
#elif defined(USE_SEQUOIA)
neal@3191
   138
    sqlite3 *key_db;
neal@3212
   139
    struct {
neal@3212
   140
        sqlite3_stmt *begin_transaction;
neal@3212
   141
        sqlite3_stmt *commit_transaction;
neal@3212
   142
        sqlite3_stmt *rollback_transaction;
neal@3212
   143
        sqlite3_stmt *tpk_find;
neal@3212
   144
        sqlite3_stmt *tsk_find;
neal@3212
   145
        sqlite3_stmt *tpk_find_by_keyid;
neal@3212
   146
        sqlite3_stmt *tsk_find_by_keyid;
neal@3212
   147
        sqlite3_stmt *tpk_find_by_email;
neal@3212
   148
        sqlite3_stmt *tsk_find_by_email;
neal@3212
   149
        sqlite3_stmt *tpk_all;
neal@3212
   150
        sqlite3_stmt *tsk_all;
neal@3212
   151
        sqlite3_stmt *tpk_save_insert_primary;
neal@3212
   152
        sqlite3_stmt *tpk_save_insert_subkeys;
neal@3212
   153
        sqlite3_stmt *tpk_save_insert_userids;
neal@3212
   154
    } sq_sql;
vb@24
   155
#endif
vb@24
   156
vb@62
   157
    PEP_cryptotech_t *cryptotech;
vb@3699
   158
    PEP_CIPHER_SUITE cipher_suite;
vb@3689
   159
vb@62
   160
    PEP_transport_t *transports;
vb@28
   161
vb@24
   162
    sqlite3 *db;
vb@24
   163
    sqlite3 *system_db;
vb@24
   164
vb@24
   165
    sqlite3_stmt *log;
vb@233
   166
    sqlite3_stmt *trustword;
vb@24
   167
    sqlite3_stmt *get_identity;
krista@2461
   168
    sqlite3_stmt *get_identity_without_trust_check;
krista@2461
   169
    sqlite3_stmt *get_identities_by_address;
krista@2966
   170
    sqlite3_stmt *get_identities_by_userid;
krista@2893
   171
    sqlite3_stmt *get_identities_by_main_key_id;
krista@1799
   172
    sqlite3_stmt *replace_identities_fpr;
krista@2461
   173
    sqlite3_stmt *replace_main_user_fpr;
krista@2461
   174
    sqlite3_stmt *get_main_user_fpr;
krista@2461
   175
    sqlite3_stmt *refresh_userid_default_key;
krista@2948
   176
    sqlite3_stmt *delete_key;
krista@2461
   177
    sqlite3_stmt *remove_fpr_as_default;
vb@24
   178
    sqlite3_stmt *set_person;
krista@2480
   179
    sqlite3_stmt *update_person;
krista@2965
   180
    sqlite3_stmt *delete_person;
krista@2480
   181
    sqlite3_stmt *exists_person;    
vb@2833
   182
    sqlite3_stmt *set_as_pEp_user;
vb@2833
   183
    sqlite3_stmt *is_pEp_user;
krista@3730
   184
    sqlite3_stmt *upgrade_pEp_version_by_user_id;
krista@2747
   185
    sqlite3_stmt *add_into_social_graph;
krista@2752
   186
    sqlite3_stmt *get_own_address_binding_from_contact;
krista@2752
   187
    sqlite3_stmt *set_revoke_contact_as_notified;
krista@2752
   188
    sqlite3_stmt *get_contacted_ids_from_revoke_fpr;
krista@2752
   189
    sqlite3_stmt *was_id_for_revoke_contacted;
krista@2800
   190
    sqlite3_stmt *get_last_contacted;
krista@3420
   191
    // sqlite3_stmt *set_device_group;
krista@3420
   192
    // sqlite3_stmt *get_device_group;
vb@24
   193
    sqlite3_stmt *set_pgp_keypair;
krista@2478
   194
    sqlite3_stmt *set_identity_entry;
krista@2480
   195
    sqlite3_stmt *update_identity_entry;
krista@2480
   196
    sqlite3_stmt *exists_identity_entry;        
vb@932
   197
    sqlite3_stmt *set_identity_flags;
edouard@1394
   198
    sqlite3_stmt *unset_identity_flags;
krista@3729
   199
    sqlite3_stmt *set_pEp_version;    
vb@24
   200
    sqlite3_stmt *set_trust;
krista@2542
   201
    sqlite3_stmt *update_trust;
krista@2480
   202
    sqlite3_stmt *exists_trust_entry;
vb@2834
   203
    sqlite3_stmt *update_trust_to_pEp;
krista@1799
   204
    sqlite3_stmt *update_trust_for_fpr;
vb@24
   205
    sqlite3_stmt *get_trust;
krista@2967
   206
    sqlite3_stmt *get_trust_by_userid;
vb@251
   207
    sqlite3_stmt *least_trust;
krista@2593
   208
    sqlite3_stmt *mark_compromised;
Edouard@409
   209
    sqlite3_stmt *reset_trust;
vb@450
   210
    sqlite3_stmt *crashdump;
vb@458
   211
    sqlite3_stmt *languagelist;
vb@458
   212
    sqlite3_stmt *i18n_token;
krista@2461
   213
    sqlite3_stmt *replace_userid;
fdik@494
   214
fdik@494
   215
    // blacklist
fdik@494
   216
    sqlite3_stmt *blacklist_add;
fdik@494
   217
    sqlite3_stmt *blacklist_delete;
fdik@494
   218
    sqlite3_stmt *blacklist_is_listed;
fdik@494
   219
    sqlite3_stmt *blacklist_retrieve;
Edouard@584
   220
    
krista@2893
   221
    // Keys
Edouard@584
   222
    sqlite3_stmt *own_key_is_listed;
krista@3346
   223
    sqlite3_stmt *is_own_address;
vb@955
   224
    sqlite3_stmt *own_identities_retrieve;
edouard@1394
   225
    sqlite3_stmt *own_keys_retrieve;
krista@2461
   226
    sqlite3_stmt *get_user_default_key;
krista@2893
   227
    sqlite3_stmt *get_all_keys_for_user;
krista@2461
   228
        
krista@2461
   229
    sqlite3_stmt *get_default_own_userid;
krista@2461
   230
krista@2893
   231
krista@2461
   232
//    sqlite3_stmt *set_own_key;
vb@292
   233
vb@632
   234
    // sequence value
vb@633
   235
    sqlite3_stmt *sequence_value1;
vb@633
   236
    sqlite3_stmt *sequence_value2;
vb@632
   237
edouard@1236
   238
    // revoked keys
Edouard@693
   239
    sqlite3_stmt *set_revoked;
Edouard@693
   240
    sqlite3_stmt *get_revoked;
krista@2752
   241
    sqlite3_stmt *get_replacement_fpr;
Edouard@693
   242
krista@2471
   243
    // mistrusted
krista@2471
   244
    sqlite3_stmt* add_mistrusted_key;
krista@2471
   245
    sqlite3_stmt* is_mistrusted_key;    
krista@2471
   246
    sqlite3_stmt* delete_mistrusted_key;
krista@2471
   247
    
krista@2461
   248
    // aliases
krista@2461
   249
    sqlite3_stmt *get_userid_alias_default;
krista@2461
   250
    sqlite3_stmt *add_userid_alias;
krista@2461
   251
Edouard@693
   252
    // callbacks
vb@292
   253
    examine_identity_t examine_identity;
vb@292
   254
    void *examine_management;
krista@2271
   255
    notifyHandshake_t notifyHandshake;
vb@2839
   256
    inject_sync_event_t inject_sync_event;
vb@2839
   257
    retrieve_next_sync_event_t retrieve_next_sync_event;
vb@464
   258
vb@2830
   259
    // pEp Sync
vb@3375
   260
    void *sync_management;
vb@3375
   261
    void *sync_obj;
vb@2830
   262
    struct Sync_state_s sync_state;
vb@2830
   263
    struct own_Sync_state_s own_sync_state;
vb@2830
   264
vb@2830
   265
//     void* sync_state_payload;
vb@2830
   266
//     char sync_uuid[37];
vb@2830
   267
//     time_t LastCannotDecrypt;
vb@2830
   268
//     time_t LastUpdateRequest;
vb@690
   269
vb@464
   270
    // runtime config
vb@464
   271
vb@464
   272
    bool passive_mode;
vb@464
   273
    bool unencrypted_subject;
vb@1819
   274
    bool service_log;
Edouard@720
   275
    
roker@1722
   276
#ifdef DEBUG_ERRORSTACK
roker@1722
   277
    stringlist_t* errorstack;
roker@1722
   278
#endif
edouard@1603
   279
};
vb@48
   280
roker@1722
   281
vb@62
   282
PEP_STATUS init_transport_system(PEP_SESSION session, bool in_first);
vb@62
   283
void release_transport_system(PEP_SESSION session, bool out_last);
vb@48
   284
krista@1639
   285
/* NOT to be exposed to the outside!!! */
krista@1639
   286
PEP_STATUS encrypt_only(
krista@1639
   287
        PEP_SESSION session, const stringlist_t *keylist, const char *ptext,
krista@1639
   288
        size_t psize, char **ctext, size_t *csize
krista@1639
   289
);
krista@1639
   290
krista@2047
   291
#if defined(NDEBUG) || defined(NOLOG)
vb@216
   292
#define DEBUG_LOG(TITLE, ENTITY, DESC)
vb@216
   293
#else
huss@1571
   294
#ifdef ANDROID
huss@1571
   295
#include <android/log.h>
vb@1819
   296
#define  LOG_MORE(...)  __android_log_print(ANDROID_LOG_DEBUG, "pEpEngine", " %s :: %s :: %s :: %s ", __VA_ARGS__);
edouard@1630
   297
#else
edouard@1630
   298
#include <stdio.h>
vb@1819
   299
#define  LOG_MORE(...)  fprintf(stderr, "pEpEngine DEBUG_LOG('%s','%s','%s','%s')\n", __VA_ARGS__);
huss@1571
   300
#endif
edouard@1630
   301
#define DEBUG_LOG(TITLE, ENTITY, DESC) {\
vb@1819
   302
    log_event(session, (TITLE), (ENTITY), (DESC), "debug " __FILE__ ":" S_LINE);\
vb@1819
   303
    LOG_MORE((TITLE), (ENTITY), (DESC), __FILE__ ":" S_LINE)\
edouard@1630
   304
}
vb@216
   305
#endif
vb@216
   306
edouard@1746
   307
typedef enum _normalize_hex_rest_t {
edouard@1746
   308
    accept_hex,
edouard@1746
   309
    ignore_hex,
edouard@1746
   310
    reject_hex
edouard@1746
   311
} normalize_hex_res_t;
edouard@1746
   312
edouard@1746
   313
static inline normalize_hex_res_t _normalize_hex(char *hex) 
edouard@1746
   314
{
edouard@1746
   315
    if (*hex >= '0' && *hex <= '9')
edouard@1746
   316
        return accept_hex;
edouard@1746
   317
edouard@1746
   318
    if (*hex >= 'A' && *hex <= 'F') {
edouard@1746
   319
        *hex += 'a' - 'A';
edouard@1746
   320
        return accept_hex;
edouard@1746
   321
    }
edouard@1746
   322
edouard@1746
   323
    if (*hex >= 'a' && *hex <= 'f') 
edouard@1746
   324
        return accept_hex;
edouard@1746
   325
edouard@1746
   326
    if (*hex == ' ') 
edouard@1746
   327
        return ignore_hex;
edouard@1746
   328
edouard@1746
   329
    return reject_hex;
edouard@1746
   330
}
edouard@1746
   331
edouard@1521
   332
// Space tolerant and case insensitive fingerprint string compare
edouard@1746
   333
static inline PEP_STATUS _compare_fprs(
edouard@1746
   334
        const char* fpra,
edouard@1746
   335
        size_t fpras,
edouard@1746
   336
        const char* fprb,
edouard@1746
   337
        size_t fprbs,
edouard@1746
   338
        int* comparison)
edouard@1746
   339
{
edouard@1746
   340
edouard@1746
   341
    size_t ai = 0;
edouard@1746
   342
    size_t bi = 0;
edouard@1746
   343
    size_t significant = 0;
edouard@1746
   344
    int _comparison = 0;
edouard@1746
   345
    const int _FULL_FINGERPRINT_LENGTH = 40;
edouard@1746
   346
   
edouard@1746
   347
    // First compare every non-ignored chars until an end is reached
edouard@1746
   348
    while(ai < fpras && bi < fprbs)
edouard@1746
   349
    {
edouard@1746
   350
        char fprac = fpra[ai];
edouard@1746
   351
        char fprbc = fprb[bi];
edouard@1746
   352
        normalize_hex_res_t fprah = _normalize_hex(&fprac);
edouard@1746
   353
        normalize_hex_res_t fprbh = _normalize_hex(&fprbc);
edouard@1746
   354
edouard@1746
   355
        if(fprah == reject_hex || fprbh == reject_hex)
edouard@1746
   356
            return PEP_ILLEGAL_VALUE;
edouard@1746
   357
edouard@1746
   358
        if ( fprah == ignore_hex )
edouard@1746
   359
        {
edouard@1746
   360
            ai++;
edouard@1746
   361
        }
edouard@1746
   362
        else if ( fprbh == ignore_hex )
edouard@1746
   363
        {
edouard@1746
   364
            bi++;
edouard@1746
   365
        }
edouard@1746
   366
        else
edouard@1746
   367
        {
edouard@1746
   368
            if(fprac != fprbc && _comparison == 0 )
edouard@1746
   369
            {
edouard@1746
   370
                _comparison = fprac > fprbc ? 1 : -1;
edouard@1746
   371
            }
edouard@1746
   372
edouard@1746
   373
            significant++;
edouard@1746
   374
            ai++;
edouard@1746
   375
            bi++;
edouard@1746
   376
edouard@1746
   377
        } 
edouard@1746
   378
    }
edouard@1746
   379
edouard@1746
   380
    // Bail out if we didn't got enough significnt chars
edouard@1746
   381
    if (significant != _FULL_FINGERPRINT_LENGTH )
edouard@1746
   382
        return PEP_TRUSTWORDS_FPR_WRONG_LENGTH;
edouard@1746
   383
edouard@1746
   384
    // Then purge remaining chars, all must be ignored chars
edouard@1746
   385
    while ( ai < fpras )
edouard@1746
   386
    {
edouard@1746
   387
        char fprac = fpra[ai];
edouard@1746
   388
        normalize_hex_res_t fprah = _normalize_hex(&fprac);
edouard@1746
   389
        if( fprah == reject_hex )
edouard@1746
   390
            return PEP_ILLEGAL_VALUE;
edouard@1746
   391
        if ( fprah != ignore_hex )
edouard@1746
   392
            return PEP_TRUSTWORDS_FPR_WRONG_LENGTH;
edouard@1746
   393
        ai++;
edouard@1746
   394
    }
edouard@1746
   395
    while ( bi < fprbs )
edouard@1746
   396
    {
edouard@1746
   397
        char fprbc = fprb[bi];
edouard@1746
   398
        normalize_hex_res_t fprbh = _normalize_hex(&fprbc);
edouard@1746
   399
        if( fprbh == reject_hex )
edouard@1746
   400
            return PEP_ILLEGAL_VALUE;
edouard@1746
   401
        if ( fprbh != ignore_hex )
edouard@1746
   402
            return PEP_TRUSTWORDS_FPR_WRONG_LENGTH;
edouard@1746
   403
        bi++;
edouard@1746
   404
    }
edouard@1746
   405
edouard@1746
   406
    *comparison = _comparison;
edouard@1746
   407
    return PEP_STATUS_OK;
edouard@1746
   408
}
edouard@1746
   409
edouard@1521
   410
static inline int _same_fpr(
edouard@1521
   411
        const char* fpra,
edouard@1521
   412
        size_t fpras,
edouard@1521
   413
        const char* fprb,
edouard@1521
   414
        size_t fprbs
edouard@1521
   415
    )
edouard@1521
   416
{
edouard@1746
   417
    // illegal values are ignored, and considered not same.
edouard@1746
   418
    int comparison = 1;
edouard@1746
   419
edouard@1746
   420
    _compare_fprs(fpra, fpras, fprb, fprbs, &comparison);
edouard@1746
   421
edouard@1746
   422
    return comparison == 0;
edouard@1521
   423
}
roker@1722
   424
krista@2045
   425
// size is the length of the bytestr that's coming in. This is really only intended
krista@2045
   426
// for comparing two full strings. If charstr's length is different from bytestr_size,
krista@2045
   427
// we'll return a non-zero value.
krista@2045
   428
static inline int _unsigned_signed_strcmp(const unsigned char* bytestr, const char* charstr, int bytestr_size) {
krista@2045
   429
    int charstr_len = strlen(charstr);
krista@2045
   430
    if (charstr_len != bytestr_size)
krista@2045
   431
        return -1; // we don't actually care except that it's non-zero
krista@2045
   432
    return memcmp(bytestr, charstr, bytestr_size);
krista@2045
   433
}
krista@2045
   434
krista@2045
   435
// This is just a horrible example of C type madness. UTF-8 made me do it.
vb@2834
   436
static inline char* _pEp_subj_copy() {
krista@2285
   437
#ifndef WIN32
vb@2834
   438
    unsigned char pEpstr[] = PEP_SUBJ_STRING;
krista@2045
   439
    void* retval = calloc(1, sizeof(unsigned char)*PEP_SUBJ_BYTELEN + 1);
vb@2834
   440
    memcpy(retval, pEpstr, PEP_SUBJ_BYTELEN);
krista@2045
   441
    return (char*)retval;
krista@2285
   442
#else
krista@2285
   443
    return strdup("pEp");
krista@2285
   444
#endif
krista@2045
   445
}
krista@2045
   446
krista@2461
   447
static inline bool is_me(PEP_SESSION session, pEp_identity* test_ident) {
krista@2461
   448
    bool retval = false;
krista@2461
   449
    if (test_ident && test_ident->user_id) {
krista@2461
   450
        char* def_id = NULL;
krista@2461
   451
        get_default_own_userid(session, &def_id);
krista@2461
   452
        if (test_ident->me || 
krista@2461
   453
            (def_id && strcmp(def_id, test_ident->user_id) == 0)) {
krista@2461
   454
            retval = true;
krista@2461
   455
        }
krista@2461
   456
        free(def_id);
krista@2461
   457
    }
krista@2461
   458
    return retval;
krista@2461
   459
}
krista@2461
   460
krista@3730
   461
static inline float pEp_version_numeric(const char* version_str) {
krista@3730
   462
    float retval = 0;    
krista@3730
   463
        
krista@3730
   464
    if (!version_str || sscanf(version_str, "%f", &retval) != 1)
krista@3730
   465
        return 0;
krista@3730
   466
        
krista@3730
   467
    return retval;    
krista@3730
   468
}
krista@3730
   469
krista@3730
   470
static inline void pEp_version_major_minor(const char* version_str, unsigned int* major, unsigned int* minor) {
krista@3730
   471
    if (!major || !minor)
krista@3730
   472
        return;
krista@3730
   473
                
krista@3730
   474
    if (!version_str || sscanf(version_str, "%u.%u", major, minor) != 2) {
krista@3730
   475
        *major = 0;
krista@3730
   476
        *minor = 0;
krista@3730
   477
    }
krista@3730
   478
        
krista@3730
   479
    return;    
krista@3730
   480
}
krista@3730
   481
krista@3730
   482
static inline int compare_versions(unsigned int first_maj, unsigned int first_min,
krista@3730
   483
                                   unsigned int second_maj, unsigned int second_min) {
krista@3730
   484
    if (first_maj > second_maj)
krista@3730
   485
        return 1;
krista@3730
   486
    if (first_maj < second_maj)
krista@3730
   487
        return -1;
krista@3730
   488
    if (first_min > second_min)
krista@3730
   489
        return 1;
krista@3730
   490
    if (first_min < second_min)
krista@3730
   491
        return -1;
krista@3730
   492
    return 0;    
krista@3730
   493
}
krista@3730
   494
krista@3730
   495
static inline void set_min_version(unsigned int first_maj, unsigned int first_minor,
krista@3730
   496
                                   unsigned int second_maj, unsigned int second_minor,
krista@3730
   497
                                   unsigned int* result_maj, unsigned int* result_minor) {
krista@3730
   498
    int result = compare_versions(first_maj, first_minor, second_maj, second_minor);
krista@3730
   499
    if (result < 0) {
krista@3730
   500
        *result_maj = first_maj;
krista@3730
   501
        *result_minor = first_minor;
krista@3730
   502
    }
krista@3730
   503
    else {
krista@3730
   504
        *result_maj = second_maj;
krista@3730
   505
        *result_minor = second_minor;
krista@3730
   506
    }    
krista@3730
   507
}
krista@3730
   508
krista@3730
   509
static inline void set_max_version(unsigned int first_maj, unsigned int first_minor,
krista@3730
   510
                                   unsigned int second_maj, unsigned int second_minor,
krista@3730
   511
                                   unsigned int* result_maj, unsigned int* result_minor) {
krista@3730
   512
    int result = compare_versions(first_maj, first_minor, second_maj, second_minor);
krista@3730
   513
    if (result > 0) {
krista@3730
   514
        *result_maj = first_maj;
krista@3730
   515
        *result_minor = first_minor;
krista@3730
   516
    }
krista@3730
   517
    else {
krista@3730
   518
        *result_maj = second_maj;
krista@3730
   519
        *result_minor = second_minor;
krista@3730
   520
    }    
krista@3730
   521
}
krista@3730
   522
krista@2461
   523
#ifndef EMPTYSTR
krista@2461
   524
#define EMPTYSTR(STR) ((STR) == NULL || (STR)[0] == '\0')
krista@2461
   525
#endif
krista@2461
   526
krista@2549
   527
#ifndef IS_PGP_CT
krista@2549
   528
#define IS_PGP_CT(CT) (((CT) | PEP_ct_confirmed) == PEP_ct_OpenPGP)
krista@2549
   529
#endif
krista@2549
   530
krista@2461
   531
#ifndef _MIN
krista@2461
   532
#define _MIN(A, B) ((B) > (A) ? (A) : (B))
krista@2461
   533
#endif
krista@2461
   534
#ifndef _MAX
krista@2461
   535
#define _MAX(A, B) ((B) > (A) ? (B) : (A))
krista@2461
   536
#endif
krista@2461
   537
krista@2176
   538
// These are globals used in generating message IDs and should only be
krista@2176
   539
// computed once, as they're either really constants or OS-dependent
krista@2176
   540
krista@2467
   541
extern int _pEp_rand_max_bits;
krista@2467
   542
extern double _pEp_log2_36;
krista@2176
   543
krista@2176
   544
static inline void _init_globals() {
vb@2571
   545
    _pEp_rand_max_bits = (int) ceil(log2((double) RAND_MAX));
krista@2176
   546
    _pEp_log2_36 = log2(36);
krista@2176
   547
}