mcabber: mcabber/mcabber/settings.c annotate

annotate mcabber/mcabber/settings.c @ 1909:9c14153e2580

Do not display unhandled IQ result messages to the log window We display the message only in the debug log file, because these messages are usually ignored anyway (ideally we would create a handler explicitly when sending the initial IQ request). Thanks to VarLog for the report!

author	Mikael Berthe <mikael@lilotux.net>
date	Sun, 18 Apr 2010 14:14:05 +0200
parents	e6d355e50d7a
children	dd65a18dc480

rev	line source
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	1 /*
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	2 * settings.c -- Configuration stuff
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 378 diff changeset	3 *
1729 e6e89b1d7831 Minor style and header updates Mikael Berthe <mikael@lilotux.net> parents: 1673 diff changeset	4 * Copyright (C) 2005-2010 Mikael Berthe <mikael@lilotux.net>
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	5 *
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	6 * This program is free software; you can redistribute it and/or modify
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	7 * it under the terms of the GNU General Public License as published by
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	8 * the Free Software Foundation; either version 2 of the License, or (at
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	9 * your option) any later version.
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	10 *
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	11 * This program is distributed in the hope that it will be useful, but
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	12 * WITHOUT ANY WARRANTY; without even the implied warranty of
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	14 * General Public License for more details.
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	15 *
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	16 * You should have received a copy of the GNU General Public License
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	17 * along with this program; if not, write to the Free Software
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	19 * USA
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	20 */
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	21
1598 a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	22 #include <stdio.h>
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	23 #include <stdlib.h>
1598 a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	24 #include <string.h>
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	25
1607 14690e624e9d Add modules Myhailo Danylenko <isbear@ukrpost.net> parents: 1599 diff changeset	26 #include "config.h"
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	27 #include "settings.h"
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	28 #include "commands.h"
378 2e6c7b1440d1 Improve debugging/logging Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	29 #include "logprint.h"
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	30 #include "otr.h"
1598 a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	31 #include "utils.h"
a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	32 #include "xmpp.h"
1653 fca9a4c17432 Improve UI latency and CPU usage Myhailo Danylenko <isbear@ukrpost.net> parents: 1611 diff changeset	33 #include "main.h"
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	34
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	35 // Maximum line length
1278 c3107650d165 Allow longer lines in config file Mikael Berthe <mikael@lilotux.net> parents: 1272 diff changeset	36 // (probably best to use the same value as INPUTLINE_LENGTH)
c3107650d165 Allow longer lines in config file Mikael Berthe <mikael@lilotux.net> parents: 1272 diff changeset	37 #define CONFLINE_LENGTH 1024
c3107650d165 Allow longer lines in config file Mikael Berthe <mikael@lilotux.net> parents: 1272 diff changeset	38
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	39 static GHashTable *option;
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	40 static GHashTable *alias;
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	41 static GHashTable *binding;
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	42 static GHashTable *guards;
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	43
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	44 #ifdef HAVE_GPGME /* PGP settings */
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	45 static GHashTable *pgpopt;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	46
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	47 typedef struct {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	48 gchar pgp_keyid; / KeyId the contact is supposed to use */
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	49 guint pgp_disabled; /* If TRUE, PGP is disabled for outgoing messages */
1197 6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	50 guint pgp_force; /* If TRUE, PGP is used w/o negotiation */
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	51 } T_pgpopt;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	52 #endif
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	53
1768 d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	54 typedef struct {
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	55 settings_guard_t guard;
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	56 } installed_guard_t;
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	57
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	58 #ifdef HAVE_LIBOTR
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	59 static GHashTable *otrpolicy;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	60 static enum otr_policy default_policy;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	61 #endif
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	62
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	63 static inline GHashTable *get_hash(guint type)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	64 {
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	65 if (type == SETTINGS_TYPE_OPTION) return option;
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	66 else if (type == SETTINGS_TYPE_ALIAS) return alias;
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	67 else if (type == SETTINGS_TYPE_BINDING) return binding;
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	68 #ifdef HAVE_LIBOTR
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	69 else if (type == SETTINGS_TYPE_OTR) return otrpolicy;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	70 #endif
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	71 return NULL;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	72 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	73
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	74 /* -- */
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	75
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	76 void settings_init(void)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	77 {
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	78 option = g_hash_table_new_full(&g_str_hash, &g_str_equal, &g_free, &g_free);
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	79 alias = g_hash_table_new_full(&g_str_hash, &g_str_equal, &g_free, &g_free);
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	80 binding = g_hash_table_new_full(&g_str_hash, &g_str_equal, &g_free, &g_free);
1768 d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	81 guards = g_hash_table_new_full(&g_str_hash, &g_str_equal, &g_free, &g_free);
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	82 #ifdef HAVE_GPGME
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	83 pgpopt = g_hash_table_new(&g_str_hash, &g_str_equal);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	84 #endif
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	85 #ifdef HAVE_LIBOTR
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	86 otrpolicy = g_hash_table_new(&g_str_hash, &g_str_equal);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	87 #endif
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	88 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	89
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	90 // cfg_read_file(filename, mainfile)
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	91 // Read and parse config file "filename". If filename is NULL,
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	92 // try to open the configuration file at the default locations.
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	93 // mainfile must be set to TRUE for the startup config file.
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	94 // If mainfile is TRUE, the permissions of the configuration file will
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	95 // be fixed if they're insecure.
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	96 //
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	97 int cfg_read_file(char *filename, guint mainfile)
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	98 {
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	99 static unsigned int runtime;
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	100 FILE *fp;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	101 char *buf;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	102 char line, eol;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	103 unsigned int ln = 0;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	104 int err = 0;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	105
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	106 if (!filename) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	107 // Use default config file locations
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	108 char *home;
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	109 GString *sfilename;
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	110
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	111 if (!mainfile) {
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	112 scr_LogPrint(LPRINT_LOGNORM, "No file name provided");
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	113 return -1;
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	114 }
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	115
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	116 home = getenv("HOME");
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	117 if (!home) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 364 diff changeset	118 scr_LogPrint(LPRINT_LOG, "Can't find home dir!");
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	119 fprintf(stderr, "Can't find home dir!\n");
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	120 err = -1;
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	121 goto cfg_read_file_return;
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	122 }
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	123 sfilename = g_string_new("");
d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	124 g_string_printf(sfilename, "%s/.mcabber/mcabberrc", home);
d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	125 if ((fp = fopen(sfilename->str, "r")) == NULL) {
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	126 // 2nd try...
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	127 g_string_printf(sfilename, "%s/.mcabberrc", home);
d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	128 if ((fp = fopen(sfilename->str, "r")) == NULL) {
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	129 fprintf(stderr, "Cannot open config file!\n");
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	130 g_string_free(sfilename, TRUE);
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	131 err = -1;
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	132 goto cfg_read_file_return;
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	133 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	134 }
362 d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	135 // Check configuration file permissions
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	136 // As it could contain sensitive data, we make it user-readable only.
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	137 checkset_perm(sfilename->str, TRUE);
d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	138 scr_LogPrint(LPRINT_LOGNORM, "Reading %s", sfilename->str);
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	139 // Check mcabber dir. Here we just warn, we don't change the modes.
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	140 g_string_printf(sfilename, "%s/.mcabber/", home);
d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	141 checkset_perm(sfilename->str, FALSE);
d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	142 g_string_free(sfilename, TRUE);
362 d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	143 } else {
1383 d9606bd03144 Small code cleanup Mikael Berthe <mikael@lilotux.net> parents: 1359 diff changeset	144 // filename was specified
362 d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	145 if ((fp = fopen(filename, "r")) == NULL) {
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	146 const char *msg = "Cannot open configuration file";
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	147 if (mainfile)
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	148 perror(msg);
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	149 else
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	150 scr_LogPrint(LPRINT_LOGNORM, "%s (%s).", msg, filename);
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	151 err = -2;
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	152 goto cfg_read_file_return;
362 d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	153 }
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	154 // Check configuration file permissions (see above)
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	155 // We don't change the permissions if that's not the main file.
1214 9f5c5f176953 Do not check file permissions when using /source Mikael Berthe <mikael@lilotux.net> parents: 1205 diff changeset	156 if (mainfile)
9f5c5f176953 Do not check file permissions when using /source Mikael Berthe <mikael@lilotux.net> parents: 1205 diff changeset	157 checkset_perm(filename, TRUE);
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	158 scr_LogPrint(LPRINT_LOGNORM, "Reading %s", filename);
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	159 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	160
1278 c3107650d165 Allow longer lines in config file Mikael Berthe <mikael@lilotux.net> parents: 1272 diff changeset	161 buf = g_new(char, CONFLINE_LENGTH+1);
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	162
1278 c3107650d165 Allow longer lines in config file Mikael Berthe <mikael@lilotux.net> parents: 1272 diff changeset	163 while (fgets(buf+1, CONFLINE_LENGTH, fp) != NULL) {
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	164 // The first char is reserved to add a '/', to make a command line
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	165 line = buf+1;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	166 ln++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	167
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	168 // Strip leading spaces
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	169 while (isspace(*line))
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	170 line++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	171
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	172 // Make eol point to the last char of the line
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	173 for (eol = line ; *eol ; eol++)
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	174 ;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	175 if (eol > line)
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	176 eol--;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	177
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	178 // Strip trailing spaces
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	179 while (eol > line && isspace(*eol))
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	180 *eol-- = 0;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	181
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	182 // Ignore empty lines and comments
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	183 if ((line == '\n') \|\| (line == '\0') \|\| (*line == '#'))
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	184 continue;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	185
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	186 // We only allow assignments line, except for commands "pgp", "source",
1607 14690e624e9d Add modules Myhailo Danylenko <isbear@ukrpost.net> parents: 1599 diff changeset	187 // "color", "load" and "otrpolicy", unless we're in runtime (i.e. not startup).
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	188 if (runtime \|\|
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	189 (strchr(line, '=') != NULL) \|\|
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	190 startswith(line, "pgp ", FALSE) \|\|
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	191 startswith(line, "source ", FALSE) \|\|
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	192 startswith(line, "color ", FALSE) \|\|
1607 14690e624e9d Add modules Myhailo Danylenko <isbear@ukrpost.net> parents: 1599 diff changeset	193 #ifdef MODULES_ENABLE
1736 15e1f3957786 Misc. small style changes Mikael Berthe <mikael@lilotux.net> parents: 1735 diff changeset	194 startswith(line, "module ", FALSE) \|\|
1607 14690e624e9d Add modules Myhailo Danylenko <isbear@ukrpost.net> parents: 1599 diff changeset	195 #endif
1732 4e57d6275a86 Allow status command in the configuration file Mikael Berthe <mikael@lilotux.net> parents: 1729 diff changeset	196 startswith(line, "status ", FALSE) \|\|
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	197 startswith(line, "otrpolicy", FALSE)) {
1519 ac5a2c262098 Cosmetics Mikael Berthe <mikael@lilotux.net> parents: 1414 diff changeset	198 // Only accept a few "safe" commands
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	199 if (!runtime &&
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	200 !startswith(line, "set ", FALSE) &&
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	201 !startswith(line, "bind ", FALSE) &&
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	202 !startswith(line, "alias ", FALSE) &&
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	203 !startswith(line, "pgp ", FALSE) &&
1272 033576acac4c Add configurable roster colors (Michal 'vorner' Vaner) Mikael Berthe <mikael@lilotux.net> parents: 1214 diff changeset	204 !startswith(line, "source ", FALSE) &&
1732 4e57d6275a86 Allow status command in the configuration file Mikael Berthe <mikael@lilotux.net> parents: 1729 diff changeset	205 !startswith(line, "status ", FALSE) &&
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	206 !startswith(line, "color ", FALSE) &&
1607 14690e624e9d Add modules Myhailo Danylenko <isbear@ukrpost.net> parents: 1599 diff changeset	207 #ifdef MODULES_ENABLE
1736 15e1f3957786 Misc. small style changes Mikael Berthe <mikael@lilotux.net> parents: 1735 diff changeset	208 !startswith(line, "module ", FALSE) &&
1607 14690e624e9d Add modules Myhailo Danylenko <isbear@ukrpost.net> parents: 1599 diff changeset	209 #endif
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	210 !startswith(line, "otrpolicy ", FALSE)) {
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	211 scr_LogPrint(LPRINT_LOGNORM, "Error in configuration file (l. %d): "
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	212 "this command can't be used here", ln);
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	213 err++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	214 continue;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	215 }
967 303408ef5e5d Configurable command character Alexis Hildebrandt parents: 895 diff changeset	216 // Set the leading COMMAND_CHAR to build a command line
303408ef5e5d Configurable command character Alexis Hildebrandt parents: 895 diff changeset	217 // and process the command
303408ef5e5d Configurable command character Alexis Hildebrandt parents: 895 diff changeset	218 *(--line) = COMMAND_CHAR;
1359 7daf906fbcdc The command /quit can be used in bindings, hooks and sourced files Mikael Berthe <mikael@lilotux.net> parents: 1358 diff changeset	219 if (process_command(line, TRUE) == 255)
7daf906fbcdc The command /quit can be used in bindings, hooks and sourced files Mikael Berthe <mikael@lilotux.net> parents: 1358 diff changeset	220 mcabber_set_terminate_ui();
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	221 } else {
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	222 scr_LogPrint(LPRINT_LOGNORM, "Error in configuration file (l. %d): "
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	223 "this is not an assignment", ln);
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	224 err++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	225 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	226 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	227 g_free(buf);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	228 fclose(fp);
1192 7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	229
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	230 if (filename)
7b8765c10abb New command: /source Mikael Berthe <mikael@lilotux.net> parents: 1187 diff changeset	231 scr_LogPrint(LPRINT_LOGNORM, "Loaded %s.", filename);
1358 005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	232
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	233 cfg_read_file_return:
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	234 // If we're done with the main file parsing, we can assume that
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	235 // the next time this function is called will be at run time.
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	236 if (mainfile)
005df14df743 Extend command /source Mikael Berthe <mikael@lilotux.net> parents: 1299 diff changeset	237 runtime = TRUE;
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	238 return err;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	239 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	240
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	241 // parse_assigment(assignment, pkey, pval)
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	242 // Read assignment and split it to key, value
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	243 //
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	244 // If this is an assignment, the function will return TRUE and
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	245 // set pkey and pval (*pval is set to NULL if value field is empty).
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	246 //
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	247 // If this isn't a assignment (no = char), the function will set *pval
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	248 // to NULL and return FALSE.
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	249 //
774 46304b773a44 Remove useless checks before g_free() calls Mikael Berthe <mikael@lilotux.net> parents: 764 diff changeset	250 // The caller should g_free() pkey and pval (if not NULL) after use.
1074 b2fc694a8228 Fix a few memory leaks after calls to parse_assigment() Mikael Berthe <mikael@lilotux.net> parents: 1070 diff changeset	251 guint parse_assigment(gchar assignment, gchar pkey, gchar *pval)
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	252 {
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	253 char key, val, t, p;
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	254
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	255 pkey = pval = NULL;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	256
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	257 key = assignment;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	258 // Remove leading spaces in option name
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	259 while ((!isalnum(key)) && (key != '=') && *key) {
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	260 key++;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	261 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	262 if (!*key) return FALSE; // Empty assignment
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	263
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	264 if (*key == '=') {
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	265 return FALSE;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	266 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	267 // Ok, key points to the option name
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	268
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	269 for (val = key+1 ; val && (val != '=') ; val++)
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	270 if (!isalnum(val) && !isblank(val) && (val != '_') && (val != '-')) {
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	271 // Key should only have alnum chars...
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	272 return FALSE;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	273 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	274 // Remove trailing spaces in option name:
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	275 for (t = val-1 ; t > key && isblank(*t) ; t--)
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	276 ;
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	277 // Check for embedded whitespace characters
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	278 for (p = key; p < t; p++) {
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	279 if (isblank(*p)) {
1729 e6e89b1d7831 Minor style and header updates Mikael Berthe <mikael@lilotux.net> parents: 1673 diff changeset	280 // Name should not contain space chars...
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	281 return FALSE;
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	282 }
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	283 }
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	284
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	285 *pkey = g_strndup(key, t+1-key);
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	286
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	287 if (!*val) return FALSE; // Not an assignment
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	288
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	289 // Remove leading and trailing spaces in option value:
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	290 for (val++; val && isblank(val) ; val++) ;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	291 for (t = val ; *t ; t++) ;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	292 for (t-- ; t >= val && isblank(*t) ; t--) ;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	293
282 87d6ac21cd1b Fix "Cannot unset option" bug Mikael Berthe <mikael@lilotux.net> parents: 281 diff changeset	294 if (t < val) return TRUE; // no value (variable reset for example)
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	295
337 3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	296 // If the value begins and ends with quotes ("), these quotes are
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	297 // removed and whitespace is not stripped
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	298 if ((t>val) && (val == '"' && t == '"')) {
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	299 val++;
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	300 t--;
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	301 }
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	302 *pval = g_strndup(val, t+1-val);
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	303 return TRUE;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	304 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	305
1768 d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	306 gboolean settings_set_guard(const gchar *key, settings_guard_t guard)
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	307 {
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	308 if (!guard)
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	309 g_hash_table_remove(guards, key);
1768 d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	310 else {
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	311 installed_guard_t *iguard = g_hash_table_lookup(guards, key);
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	312 if (iguard)
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	313 return FALSE;
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	314 iguard = g_new(installed_guard_t, 1);
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	315 iguard->guard = guard;
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	316 g_hash_table_insert(guards, g_strdup(key), iguard);
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	317 }
d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	318 return TRUE;
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	319 }
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	320
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	321 void settings_del_guard(const gchar *key)
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	322 {
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	323 settings_set_guard(key, NULL);
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	324 }
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	325
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	326 void settings_opt_set_raw(const gchar key, const gchar value)
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	327 {
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	328 if (!value)
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	329 g_hash_table_remove(option, key);
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	330 else
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	331 g_hash_table_insert(option, g_strdup(key), g_strdup(value));
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	332 }
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	333
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	334 void settings_set(guint type, const gchar key, const gchar value)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	335 {
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	336 GHashTable *hash;
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	337 gchar *dup_value = NULL;
1794 58d1390f28ca Fix ignore of NULL guard retval (introduced in d80a9e32ab1a) Myhailo Danylenko <isbear@ukrpost.net> parents: 1768 diff changeset	338 installed_guard_t *guard = NULL;
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	339
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	340 if (type == SETTINGS_TYPE_OPTION) {
1794 58d1390f28ca Fix ignore of NULL guard retval (introduced in d80a9e32ab1a) Myhailo Danylenko <isbear@ukrpost.net> parents: 1768 diff changeset	341 guard = g_hash_table_lookup(guards, key);
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	342 if (guard)
1768 d80a9e32ab1a Refuse to replace existing guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1736 diff changeset	343 dup_value = guard->guard(key, value);
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	344 }
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	345
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	346 hash = get_hash(type);
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	347 if (!hash)
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	348 return;
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	349
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	350 if (!value && !dup_value)
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	351 g_hash_table_remove(hash, key);
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	352 else if (!guard)
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	353 g_hash_table_insert(hash, g_strdup(key), g_strdup(value));
1673 552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	354 else if (dup_value)
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	355 g_hash_table_insert(hash, g_strdup(key), dup_value);
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	356 else
552da310b83e Add option guards Myhailo Danylenko <isbear@ukrpost.net> parents: 1668 diff changeset	357 g_hash_table_remove(option, key);
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	358 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	359
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	360 void settings_del(guint type, const gchar *key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	361 {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	362 settings_set(type, key, NULL);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	363 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	364
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	365 const gchar settings_get(guint type, const gchar key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	366 {
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	367 GHashTable *hash;
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	368
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	369 hash = get_hash(type);
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	370 if (!hash)
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	371 return NULL;
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	372
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	373 return g_hash_table_lookup(hash, key);
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	374 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	375
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	376 int settings_get_int(guint type, const gchar *key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	377 {
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	378 const gchar *setval = settings_get(type, key);
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	379
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	380 if (setval) return atoi(setval);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	381 return 0;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	382 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	383
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	384 // settings_get_status_msg(status)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	385 // Return a string with the current status message:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	386 // - if there is a user-defined message ("message" option),
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	387 // return this message
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	388 // - if there is a user-defined message for the given status (and no
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	389 // generic user message), it is returned
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	390 // - if no message is found, return NULL
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	391 const gchar *settings_get_status_msg(enum imstatus status)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	392 {
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	393 const gchar *rstatus = settings_opt_get("message");
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	394
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	395 if (rstatus) return rstatus;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	396
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	397 switch(status) {
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	398 case available:
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	399 rstatus = settings_opt_get("message_avail");
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	400 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	401
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	402 case freeforchat:
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	403 rstatus = settings_opt_get("message_free");
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	404 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	405
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	406 case dontdisturb:
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	407 rstatus = settings_opt_get("message_dnd");
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	408 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	409
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	410 case notavail:
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	411 rstatus = settings_opt_get("message_notavail");
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	412 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	413
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	414 case away:
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	415 rstatus = settings_opt_get("message_away");
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	416 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	417
521 cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	418 default: // offline, invisible
cc8c969ab6e5 "/status" changes Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	419 break;
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	420 }
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	421 return rstatus;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	422 }
576 8b3db0b555a1 Add Vim modelines Mikael Berthe <mikael@lilotux.net> parents: 521 diff changeset	423
867 7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	424 // settings_foreach(type, pfunction, param)
1661 64a7428afcb3 Print list of options with '/set' Myhailo Danylenko <isbear@ukrpost.net> parents: 1653 diff changeset	425 // Call pfunction(key, value, param) for each setting with requested type.
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	426 void settings_foreach(guint type, void (pfunc)(char k, char v, void param),
867 7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	427 void *param)
7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	428 {
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	429 GHashTable *hash;
867 7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	430
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	431 hash = get_hash(type);
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	432 if (!hash)
9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	433 return;
867 7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	434
1070 9eaacc0ad3a2 Use a hash for settings Mikael Berthe <mikael@lilotux.net> parents: 1068 diff changeset	435 g_hash_table_foreach(hash, (GHFunc)pfunc, param);
867 7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	436 }
7f056c566569 Commands /alias & /bind list the key bindings and aliases Mikael Berthe <mikael@lilotux.net> parents: 780 diff changeset	437
1004 b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	438
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	439 // default_muc_nickname()
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	440 // Return the user's default nickname
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	441 // The caller should free the string after use
1395 d431cd75eb53 Use bookmarked nickname when manually joining a room Mikael Berthe <mikael@lilotux.net> parents: 1383 diff changeset	442 char default_muc_nickname(const char roomid)
1004 b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	443 {
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	444 char *nick;
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	445
1598 a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	446 nick = (char*)xmpp_get_bookmark_nick(roomid);
1395 d431cd75eb53 Use bookmarked nickname when manually joining a room Mikael Berthe <mikael@lilotux.net> parents: 1383 diff changeset	447 if (nick)
d431cd75eb53 Use bookmarked nickname when manually joining a room Mikael Berthe <mikael@lilotux.net> parents: 1383 diff changeset	448 return g_strdup(nick);
d431cd75eb53 Use bookmarked nickname when manually joining a room Mikael Berthe <mikael@lilotux.net> parents: 1383 diff changeset	449
1004 b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	450 // We try the "nickname" option, then the username part of the jid.
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	451 nick = (char*)settings_opt_get("nickname");
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	452 if (nick)
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	453 return g_strdup(nick);
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	454
1611 f9bf561e54d0 Use the username for authentication, added jid_get_username() to utils.c franky parents: 1607 diff changeset	455 nick = jid_get_username(settings_opt_get("jid"));
1004 b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	456 return nick;
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	457 }
b57a01ffeed6 Use existing conference bookmarks Mikael Berthe <mikael@lilotux.net> parents: 967 diff changeset	458
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	459
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	460 /* PGP settings */
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	461
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	462 // settings_pgp_setdisabled(jid, value)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	463 // Enable/disable PGP encryption for jid.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	464 // (Set value to TRUE to disable encryption)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	465 void settings_pgp_setdisabled(const char *bjid, guint value)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	466 {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	467 #ifdef HAVE_GPGME
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	468 T_pgpopt *pgpdata;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	469 pgpdata = g_hash_table_lookup(pgpopt, bjid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	470 if (!pgpdata) {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	471 // If value is 0, we do not need to create a structure (that's
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	472 // the default value).
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	473 if (value) {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	474 pgpdata = g_new0(T_pgpopt, 1);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	475 pgpdata->pgp_disabled = value;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	476 g_hash_table_insert(pgpopt, g_strdup(bjid), pgpdata);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	477 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	478 } else {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	479 pgpdata->pgp_disabled = value;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	480 // We could remove the key/value if pgp_disabled is 0 and
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	481 // pgp_keyid is NULL, actually.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	482 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	483 #endif
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	484 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	485
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	486 // settings_pgp_getdisabled(jid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	487 // Return TRUE if PGP encryption should be disabled for jid.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	488 guint settings_pgp_getdisabled(const char *bjid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	489 {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	490 #ifdef HAVE_GPGME
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	491 T_pgpopt *pgpdata;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	492 pgpdata = g_hash_table_lookup(pgpopt, bjid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	493 if (pgpdata)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	494 return pgpdata->pgp_disabled;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	495 else
1197 6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	496 return FALSE; // Default: not disabled
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	497 #else
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	498 return TRUE; // No PGP support, let's say it's disabled.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	499 #endif
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	500 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	501
1197 6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	502 // settings_pgp_setforce(jid, value)
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	503 // Force (or not) PGP encryption for jid.
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	504 // When value is TRUE, PGP support will be assumed for the remote client.
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	505 void settings_pgp_setforce(const char *bjid, guint value)
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	506 {
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	507 #ifdef HAVE_GPGME
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	508 T_pgpopt *pgpdata;
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	509 pgpdata = g_hash_table_lookup(pgpopt, bjid);
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	510 if (!pgpdata) {
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	511 // If value is 0, we do not need to create a structure (that's
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	512 // the default value).
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	513 if (value) {
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	514 pgpdata = g_new0(T_pgpopt, 1);
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	515 pgpdata->pgp_force = value;
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	516 g_hash_table_insert(pgpopt, g_strdup(bjid), pgpdata);
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	517 }
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	518 } else {
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	519 pgpdata->pgp_force = value;
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	520 }
1565 bff9633e38ee Fix segfault in command /pgp (reported by Maxim Vuets) Mikael Berthe <mikael@lilotux.net> parents: 1519 diff changeset	521 if (value && pgpdata && !pgpdata->pgp_keyid)
1197 6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	522 scr_LogPrint(LPRINT_NORMAL, "Warning: the Key Id is not set!");
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	523 #endif
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	524 }
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	525
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	526 // settings_pgp_getforce(jid)
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	527 // Return TRUE if PGP enforcement is set for jid.
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	528 guint settings_pgp_getforce(const char *bjid)
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	529 {
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	530 #ifdef HAVE_GPGME
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	531 T_pgpopt *pgpdata;
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	532 pgpdata = g_hash_table_lookup(pgpopt, bjid);
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	533 if (pgpdata)
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	534 return pgpdata->pgp_force;
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	535 else
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	536 return FALSE; // Default
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	537 #else
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	538 return FALSE; // No PGP support
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	539 #endif
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	540 }
6f602d3270a4 Add /pgp [-]force Mikael Berthe <mikael@lilotux.net> parents: 1192 diff changeset	541
1065 230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	542 // settings_pgp_setkeyid(jid, keyid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	543 // Set the PGP KeyId for user jid.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	544 // Use keyid = NULL to erase the previous KeyId.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	545 void settings_pgp_setkeyid(const char bjid, const char keyid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	546 {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	547 #ifdef HAVE_GPGME
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	548 T_pgpopt *pgpdata;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	549 pgpdata = g_hash_table_lookup(pgpopt, bjid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	550 if (!pgpdata) {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	551 // If keyid is NULL, we do not need to create a structure (that's
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	552 // the default value).
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	553 if (keyid) {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	554 pgpdata = g_new0(T_pgpopt, 1);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	555 pgpdata->pgp_keyid = g_strdup(keyid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	556 g_hash_table_insert(pgpopt, g_strdup(bjid), pgpdata);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	557 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	558 } else {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	559 g_free(pgpdata->pgp_keyid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	560 if (keyid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	561 pgpdata->pgp_keyid = g_strdup(keyid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	562 else
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	563 pgpdata->pgp_keyid = NULL;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	564 // We could remove the key/value if pgp_disabled is 0 and
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	565 // pgp_keyid is NULL, actually.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	566 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	567 #endif
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	568 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	569
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	570 // settings_pgp_getkeyid(jid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	571 // Get the PGP KeyId for user jid.
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	572 const char settings_pgp_getkeyid(const char bjid)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	573 {
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	574 #ifdef HAVE_GPGME
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	575 T_pgpopt *pgpdata;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	576 pgpdata = g_hash_table_lookup(pgpopt, bjid);
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	577 if (pgpdata)
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	578 return pgpdata->pgp_keyid;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	579 #endif
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	580 return NULL;
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	581 }
230dca34dbea Extand pgp_data structure Mikael Berthe <mikael@lilotux.net> parents: 1004 diff changeset	582
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	583 /* otr settings */
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	584
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	585 #ifdef HAVE_LIBOTR
1598 a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	586 static void remove_default_policies(char k, char policy, void *defaultp)
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	587 {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	588 if ((enum otr_policy )policy == (enum otr_policy )defaultp) {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	589 g_free((enum otr_policy *) policy);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	590 g_hash_table_remove(otrpolicy, k);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	591 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	592 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	593 #endif
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	594
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	595 void settings_otr_setpolicy(const char *bjid, guint value)
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	596 {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	597 #ifdef HAVE_LIBOTR
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	598 enum otr_policy *otrdata;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	599
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	600 if (!bjid) {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	601 default_policy = value;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	602 /* refresh hash */
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	603 settings_foreach(SETTINGS_TYPE_OTR, &remove_default_policies, &value);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	604 return;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	605 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	606
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	607 otrdata = g_hash_table_lookup(otrpolicy, bjid);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	608
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	609 if (value == default_policy) {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	610 if (otrdata) {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	611 g_free(otrdata);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	612 g_hash_table_remove(otrpolicy, bjid);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	613 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	614 } else if (otrdata) {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	615 *otrdata = value;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	616 } else {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	617 otrdata = g_new(enum otr_policy, 1);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	618 *otrdata = value;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	619 g_hash_table_insert(otrpolicy, g_strdup(bjid), otrdata);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	620 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	621 #endif
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	622 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	623
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	624 guint settings_otr_getpolicy(const char *bjid)
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	625 {
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	626 #ifdef HAVE_LIBOTR
1598 a087125d8fc8 Replace libjabber with loudmouth franky parents: 1565 diff changeset	627 enum otr_policy *otrdata;
1299 3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	628 if (!bjid)
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	629 return default_policy;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	630
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	631 otrdata = g_hash_table_lookup(otrpolicy, bjid);
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	632 if (otrdata)
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	633 return *otrdata;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	634 else
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	635 return default_policy;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	636 #else
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	637 return 0;
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	638 #endif
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	639 }
3b338a5c01fc OTR support Frank Zschockelt <mcabber_otr[at]freakysoft.de> parents: 1278 diff changeset	640
1141 5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	641 guint get_max_history_blocks(void)
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	642 {
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	643 int max_num_of_blocks = settings_opt_get_int("max_history_blocks");
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	644 if (max_num_of_blocks < 0)
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	645 max_num_of_blocks = 0;
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	646 else if (max_num_of_blocks == 1)
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	647 max_num_of_blocks = 2;
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	648 return (guint)max_num_of_blocks;
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	649 }
5be2408a6534 Add option "max_history_blocks" Mikael Berthe <mikael@lilotux.net> parents: 1074 diff changeset	650
1811 e6d355e50d7a Update Vim modelines Mikael Berthe <mikael@lilotux.net> parents: 1794 diff changeset	651 /* vim: set et cindent cinoptions=>2\:2(0 ts=2 sw=2: For Vim users... */

Mercurial > ~mikael > mcabber > hg

annotate mcabber/mcabber/settings.c @ 1909:9c14153e2580