mirror of
https://github.com/profanity-im/profanity.git
synced 2024-09-22 19:45:54 -04:00
381 lines
10 KiB
C
381 lines
10 KiB
C
/*
|
|
* gpg.c
|
|
*
|
|
* Copyright (C) 2012 - 2015 James Booth <boothj5@gmail.com>
|
|
*
|
|
* This file is part of Profanity.
|
|
*
|
|
* Profanity 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, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* Profanity 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 Profanity. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
* In addition, as a special exception, the copyright holders give permission to
|
|
* link the code of portions of this program with the OpenSSL library under
|
|
* certain conditions as described in each individual source file, and
|
|
* distribute linked combinations including the two.
|
|
*
|
|
* You must obey the GNU General Public License in all respects for all of the
|
|
* code used other than OpenSSL. If you modify file(s) with this exception, you
|
|
* may extend this exception to your version of the file(s), but you are not
|
|
* obligated to do so. If you do not wish to do so, delete this exception
|
|
* statement from your version. If you delete this exception statement from all
|
|
* source files in the program, then also delete it here.
|
|
*
|
|
*/
|
|
|
|
#include <locale.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
|
|
#include <glib.h>
|
|
#include <gpgme.h>
|
|
|
|
#include "pgp/gpg.h"
|
|
#include "log.h"
|
|
|
|
#define PGP_SIGNATURE_HEADER "-----BEGIN PGP SIGNATURE-----"
|
|
#define PGP_SIGNATURE_FOOTER "-----END PGP SIGNATURE-----"
|
|
#define PGP_MESSAGE_HEADER "-----BEGIN PGP MESSAGE-----"
|
|
#define PGP_MESSAGE_FOOTER "-----END PGP MESSAGE-----"
|
|
|
|
static const char *libversion;
|
|
static GHashTable *fingerprints;
|
|
|
|
static char* _remove_header_footer(char *str, const char * const footer);
|
|
static char* _add_header_footer(const char * const str, const char * const header, const char * const footer);
|
|
|
|
void
|
|
p_gpg_init(void)
|
|
{
|
|
libversion = gpgme_check_version(NULL);
|
|
log_debug("GPG: Found gpgme version: %s", libversion);
|
|
gpgme_set_locale(NULL, LC_CTYPE, setlocale(LC_CTYPE, NULL));
|
|
|
|
fingerprints = g_hash_table_new_full(g_str_hash, g_str_equal, g_free, g_free);
|
|
}
|
|
|
|
void
|
|
p_gpg_close(void)
|
|
{
|
|
g_hash_table_destroy(fingerprints);
|
|
}
|
|
|
|
GSList *
|
|
p_gpg_list_keys(void)
|
|
{
|
|
gpgme_error_t error;
|
|
gpgme_ctx_t ctx;
|
|
gpgme_key_t key;
|
|
GSList *result = NULL;
|
|
|
|
error = gpgme_new(&ctx);
|
|
if (error) {
|
|
log_error("GPG: Could not list keys. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
return NULL;
|
|
}
|
|
|
|
error = gpgme_op_keylist_start(ctx, NULL, 1);
|
|
if (error == GPG_ERR_NO_ERROR) {
|
|
while (!error) {
|
|
error = gpgme_op_keylist_next(ctx, &key);
|
|
if (error) {
|
|
break;
|
|
}
|
|
|
|
ProfPGPKey *p_pgpkey = malloc(sizeof(ProfPGPKey));
|
|
p_pgpkey->id = strdup(key->subkeys->keyid);
|
|
p_pgpkey->name = strdup(key->uids->uid);
|
|
p_pgpkey->fp = strdup(key->subkeys->fpr);
|
|
|
|
result = g_slist_append(result, p_pgpkey);
|
|
|
|
gpgme_key_release(key);
|
|
}
|
|
} else {
|
|
log_error("GPG: Could not list keys. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
}
|
|
|
|
gpgme_release(ctx);
|
|
|
|
return result;
|
|
}
|
|
|
|
GHashTable *
|
|
p_gpg_fingerprints(void)
|
|
{
|
|
return fingerprints;
|
|
}
|
|
|
|
const char*
|
|
p_gpg_libver(void)
|
|
{
|
|
return libversion;
|
|
}
|
|
|
|
void
|
|
p_gpg_free_key(ProfPGPKey *key)
|
|
{
|
|
if (key) {
|
|
free(key->id);
|
|
free(key->name);
|
|
free(key->fp);
|
|
free(key);
|
|
}
|
|
}
|
|
|
|
gboolean
|
|
p_gpg_available(const char * const barejid)
|
|
{
|
|
char *fp = g_hash_table_lookup(fingerprints, barejid);
|
|
return (fp != NULL);
|
|
}
|
|
|
|
void
|
|
p_gpg_verify(const char * const barejid, const char *const sign)
|
|
{
|
|
if (!sign) {
|
|
return;
|
|
}
|
|
|
|
gpgme_ctx_t ctx;
|
|
gpgme_error_t error = gpgme_new(&ctx);
|
|
if (error) {
|
|
log_error("GPG: Failed to create gpgme context. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
return;
|
|
}
|
|
|
|
gpgme_data_t sign_data;
|
|
gpgme_data_t plain_data;
|
|
char *sign_with_header_footer = _add_header_footer(sign, PGP_SIGNATURE_HEADER, PGP_SIGNATURE_FOOTER);
|
|
gpgme_data_new_from_mem(&sign_data, sign_with_header_footer, strlen(sign_with_header_footer), 1);
|
|
gpgme_data_new(&plain_data);
|
|
|
|
error = gpgme_op_verify(ctx, sign_data, NULL, plain_data);
|
|
if (error) {
|
|
log_error("GPG: Failed to verify. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release(ctx);
|
|
return;
|
|
}
|
|
|
|
gpgme_verify_result_t result = gpgme_op_verify_result(ctx);
|
|
if (result) {
|
|
if (result->signatures) {
|
|
log_debug("Fingerprint found for %s: %s ", barejid, result->signatures->fpr);
|
|
g_hash_table_replace(fingerprints, strdup(barejid), strdup(result->signatures->fpr));
|
|
}
|
|
}
|
|
|
|
gpgme_data_release(sign_data);
|
|
gpgme_data_release(plain_data);
|
|
}
|
|
|
|
char*
|
|
p_gpg_sign(const char * const str, const char * const fp)
|
|
{
|
|
gpgme_ctx_t ctx;
|
|
gpgme_error_t error = gpgme_new(&ctx);
|
|
if (error) {
|
|
log_error("GPG: Failed to create gpgme context. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_key_t key = NULL;
|
|
error = gpgme_get_key(ctx, fp, &key, 1);
|
|
if (error || key == NULL) {
|
|
log_error("GPG: Failed to get key. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release (ctx);
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_signers_clear(ctx);
|
|
error = gpgme_signers_add(ctx, key);
|
|
if (error) {
|
|
log_error("GPG: Failed to load signer. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release(ctx);
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_data_t str_data;
|
|
gpgme_data_t signed_data;
|
|
char *str_or_empty = NULL;
|
|
if (str) {
|
|
str_or_empty = strdup(str);
|
|
} else {
|
|
str_or_empty = strdup("");
|
|
}
|
|
gpgme_data_new_from_mem(&str_data, str_or_empty, strlen(str_or_empty), 1);
|
|
gpgme_data_new(&signed_data);
|
|
|
|
gpgme_set_armor(ctx,1);
|
|
error = gpgme_op_sign(ctx,str_data,signed_data,GPGME_SIG_MODE_DETACH);
|
|
if (error) {
|
|
log_error("GPG: Failed to sign string. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release(ctx);
|
|
return NULL;
|
|
}
|
|
|
|
char *result = NULL;
|
|
gpgme_data_release(str_data);
|
|
|
|
size_t len = 0;
|
|
char *signed_str = gpgme_data_release_and_get_mem(signed_data, &len);
|
|
if (signed_str) {
|
|
signed_str[len] = 0;
|
|
result = _remove_header_footer(signed_str, PGP_SIGNATURE_FOOTER);
|
|
}
|
|
gpgme_free(signed_str);
|
|
gpgme_release(ctx);
|
|
free(str_or_empty);
|
|
|
|
return result;
|
|
}
|
|
|
|
char *
|
|
p_gpg_encrypt(const char * const barejid, const char * const message)
|
|
{
|
|
char *fp = g_hash_table_lookup(fingerprints, barejid);
|
|
|
|
if (!fp) {
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_key_t keys[2];
|
|
|
|
keys[0] = NULL;
|
|
keys[1] = NULL;
|
|
|
|
gpgme_ctx_t ctx;
|
|
gpgme_error_t error = gpgme_new(&ctx);
|
|
if (error) {
|
|
log_error("GPG: Failed to create gpgme context. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_key_t key;
|
|
error = gpgme_get_key(ctx, fp, &key, 0);
|
|
if (error || key == NULL) {
|
|
log_error("GPG: Failed to get key. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release(ctx);
|
|
return NULL;
|
|
}
|
|
|
|
keys[0] = key;
|
|
|
|
gpgme_data_t plain;
|
|
gpgme_data_t cipher;
|
|
gpgme_data_new_from_mem(&plain, message, strlen(message), 1);
|
|
gpgme_data_new(&cipher);
|
|
|
|
gpgme_set_armor(ctx, 1);
|
|
error = gpgme_op_encrypt(ctx, keys, GPGME_ENCRYPT_ALWAYS_TRUST, plain, cipher);
|
|
if (error) {
|
|
log_error("GPG: Failed to encrypt message. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release(ctx);
|
|
return NULL;
|
|
}
|
|
gpgme_data_release(plain);
|
|
|
|
char *cipher_str = NULL;
|
|
char *result = NULL;
|
|
size_t len;
|
|
cipher_str = gpgme_data_release_and_get_mem(cipher, &len);
|
|
if (cipher_str) {
|
|
result = _remove_header_footer(cipher_str, PGP_MESSAGE_FOOTER);
|
|
}
|
|
|
|
gpgme_free(cipher_str);
|
|
gpgme_release(ctx);
|
|
|
|
return result;
|
|
}
|
|
|
|
char *
|
|
p_gpg_decrypt(const char * const barejid, const char * const cipher)
|
|
{
|
|
char *cipher_with_headers = _add_header_footer(cipher, PGP_MESSAGE_HEADER, PGP_MESSAGE_FOOTER);
|
|
|
|
gpgme_ctx_t ctx;
|
|
gpgme_error_t error = gpgme_new(&ctx);
|
|
if (error) {
|
|
log_error("GPG: Failed to create gpgme context. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_data_t plain_data;
|
|
gpgme_data_t cipher_data;
|
|
gpgme_data_new_from_mem (&cipher_data, cipher_with_headers, strlen(cipher_with_headers), 1);
|
|
gpgme_data_new(&plain_data);
|
|
|
|
error = gpgme_op_decrypt(ctx, cipher_data, plain_data);
|
|
if (error) {
|
|
log_error("GPG: Failed to encrypt message. %s %s", gpgme_strsource(error), gpgme_strerror(error));
|
|
gpgme_release(ctx);
|
|
return NULL;
|
|
}
|
|
|
|
gpgme_data_release(cipher_data);
|
|
|
|
size_t len = 0;
|
|
char *plain_str = gpgme_data_release_and_get_mem(plain_data, &len);
|
|
char *result = NULL;
|
|
if (plain_str) {
|
|
plain_str[len] = 0;
|
|
result = g_strdup(plain_str);
|
|
}
|
|
gpgme_free(plain_str);
|
|
|
|
gpgme_release(ctx);
|
|
|
|
return result;
|
|
}
|
|
|
|
static char*
|
|
_remove_header_footer(char *str, const char * const footer)
|
|
{
|
|
int pos = 0;
|
|
int newlines = 0;
|
|
|
|
while (newlines < 3) {
|
|
if (str[pos] == '\n') {
|
|
newlines++;
|
|
}
|
|
pos++;
|
|
|
|
if (str[pos] == '\0') {
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
char *stripped = strdup(&str[pos]);
|
|
char *footer_start = g_strrstr(stripped, footer);
|
|
footer_start[0] = '\0';
|
|
|
|
return stripped;
|
|
}
|
|
|
|
static char*
|
|
_add_header_footer(const char * const str, const char * const header, const char * const footer)
|
|
{
|
|
GString *result_str = g_string_new("");
|
|
|
|
g_string_append(result_str, header);
|
|
g_string_append(result_str, "\n\n");
|
|
g_string_append(result_str, str);
|
|
g_string_append(result_str, "\n");
|
|
g_string_append(result_str, footer);
|
|
|
|
char *result = result_str->str;
|
|
g_string_free(result_str, FALSE);
|
|
|
|
return result;
|
|
}
|