mcabber: mcabber/src/settings.c annotate

annotate mcabber/src/settings.c @ 364:33b8e801ffa6

Merge changeset 315 (65aa05520556)

author	Mikael Berthe <mikael@lilotux.net>
date	Sun, 24 Jul 2005 15:13:53 +0100
parents	d8f147d6e872 871e53769084
children	bd5638c21834

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
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	3 *
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	4 * Copyright (C) 2005 Mikael Berthe <bmikael@lists.lilotux.net>
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
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	22 #include <strings.h>
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	23 #include <stdlib.h>
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	24 #include <ctype.h>
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	25
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	26 #include "settings.h"
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	27 #include "commands.h"
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	28 #include "utils.h"
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	29 #include "screen.h"
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	30
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	31 static GSList *option;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	32 static GSList *alias;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	33 static GSList *binding;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	34
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	35
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	36 typedef struct {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	37 gchar *name;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	38 gchar *value;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	39 } T_setting;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	40
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 294 diff changeset	41 static inline GSList **get_list_ptr(guint type)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	42 {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	43 if (type == SETTINGS_TYPE_OPTION) return &option;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	44 else if (type == SETTINGS_TYPE_ALIAS) return &alias;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	45 else if (type == SETTINGS_TYPE_BINDING) return &binding;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	46 return NULL;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	47 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	48
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	49 // Return a pointer to the node with the requested key, or NULL if none found
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 294 diff changeset	50 static GSList settings_find(GSList list, const gchar *key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	51 {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	52 GSList *ptr;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	53
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	54 if (!list) return NULL;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	55
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	56 for (ptr = list ; ptr; ptr = g_slist_next(ptr))
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	57 if (!strcasecmp(key, ((T_setting*)ptr->data)->name))
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	58 break;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	59
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	60 return ptr;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	61 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	62
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	63 /* -- */
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	64
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	65 // cfg_read_file(filename)
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	66 // Read and parse config file "filename". If filename is NULL,
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	67 // try to open the configuration file at the default locations.
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	68 //
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	69 int cfg_read_file(char *filename)
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	70 {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	71 FILE *fp;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	72 char *buf;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	73 char line, eol;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	74 unsigned int ln = 0;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	75 int err = 0;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	76
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	77 if (!filename) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	78 // Use default config file locations
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	79 char *home = getenv("HOME");
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	80 if (!home) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	81 ut_WriteLog("Can't find home dir!\n");
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	82 fprintf(stderr, "Can't find home dir!\n");
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	83 return -1;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	84 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	85 filename = g_new(char, strlen(home)+24);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	86 sprintf(filename, "%s/.mcabber/mcabberrc", home);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	87 if ((fp = fopen(filename, "r")) == NULL) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	88 // 2nd try...
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	89 sprintf(filename, "%s/.mcabberrc", home);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	90 if ((fp = fopen(filename, "r")) == NULL) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	91 fprintf(stderr, "Cannot open config file!\n");
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	92 return -1;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	93 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	94 }
362 d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	95 // Check configuration file permissions
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	96 // As it could contain sensitive data, we make it user-readable only
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	97 checkset_perm(filename, TRUE);
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	98 // Check mcabber dir. There we just warn, we don't change the modes
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	99 sprintf(filename, "%s/.mcabber/", home);
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	100 checkset_perm(filename, FALSE);
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	101 g_free(filename);
362 d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	102 } else {
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	103 if ((fp = fopen(filename, "r")) == NULL) {
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	104 perror("fopen (cfg_file())");
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	105 return -1;
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	106 }
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	107 // Check configuration file permissions (see above)
d8f147d6e872 Check directory and config file permissions Mikael Berthe <mikael@lilotux.net> parents: 341 diff changeset	108 checkset_perm(filename, TRUE);
341 dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	109 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	110
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	111 buf = g_new(char, 512);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	112
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	113 while (fgets(buf+1, 511, fp) != NULL) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	114 // 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	115 line = buf+1;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	116 ln++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	117
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	118 // Strip leading spaces
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	119 while (isspace(*line))
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	120 line++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	121
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	122 // Make eol point to the last char of the line
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	123 for (eol = line ; *eol ; eol++)
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	124 ;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	125 if (eol > line)
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	126 eol--;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	127
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	128 // Strip trailing spaces
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	129 while (eol > line && isspace(*eol))
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	130 *eol-- = 0;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	131
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	132 // Ignore empty lines and comments
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	133 if ((line == '\n') \|\| (line == '\0') \|\| (*line == '#'))
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	134 continue;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	135
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	136 if ((strchr(line, '=') != NULL)) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	137 // Only accept the set, alias and bind commands
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	138 if (strncmp(line, "set ", 4) &&
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	139 strncmp(line, "bind ", 5) &&
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	140 strncmp(line, "alias ", 6)) {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	141 scr_LogPrint("Error in configuration file (l. %d): bad command", ln);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	142 err++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	143 continue;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	144 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	145 *(--line) = '/'; // Set the leading '/' to build a command line
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	146 process_command(line); // Process the command
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	147 } else {
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	148 scr_LogPrint("Error in configuration file (l. %d): no assignment", ln);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	149 err++;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	150 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	151 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	152 g_free(buf);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	153 fclose(fp);
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	154 return err;
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	155 }
dea407d53fe6 Improve configuration file reading Mikael Berthe <mikael@lilotux.net> parents: 337 diff changeset	156
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	157 // parse_assigment(assignment, pkey, pval)
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	158 // Read assignment and split it to key, value
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	159 //
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	160 // 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	161 // 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	162 //
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	163 // 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	164 // to NULL and return FALSE.
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	165 //
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	166 // The called should g_free() pkey and pval (if not NULL) after use.
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	167 guint parse_assigment(gchar assignment, const gchar pkey, const gchar *pval)
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	168 {
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	169 char key, val, t, p;
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	170
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	171 pkey = pval = NULL;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	172
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	173 key = assignment;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	174 // Remove leading spaces in option name
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	175 while ((!isalnum(key)) && (key != '=') && *key) {
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	176 //if (!isblank(*key))
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	177 // scr_LogPrint("Error in assignment parsing!");
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	178 key++;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	179 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	180 if (!*key) return FALSE; // Empty assignment
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	181
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	182 if (*key == '=') {
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	183 //scr_LogPrint("Cannot parse assignment!");
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	184 return FALSE;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	185 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	186 // Ok, key points to the option name
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	187
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	188 for (val = key+1 ; val && (val != '=') ; val++)
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	189 if (!isalnum(val) && !isblank(val) && (val != '_') && (val != '-')) {
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	190 // Key should only have alnum chars...
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	191 //scr_LogPrint("Error in assignment parsing!");
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	192 return FALSE;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	193 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	194 // Remove trailing spaces in option name:
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	195 for (t = val-1 ; t > key && isblank(*t) ; t--)
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	196 ;
293 d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	197 // Check for embedded whitespace characters
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	198 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	199 if (isblank(*p)) {
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	200 //scr_LogPrint("Error in assignment parsing!"
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	201 // " (Name should not contain space chars)");
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	202 return FALSE;
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	203 }
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	204 }
d0295e735768 Assignment lvalue (key, option name, alias...) cannnot contain spaces Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	205
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	206 *pkey = g_strndup(key, t+1-key);
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	207
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	208 if (!*val) return FALSE; // Not an assignment
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	209
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	210 // Remove leading and trailing spaces in option value:
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	211 for (val++; val && isblank(val) ; val++) ;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	212 for (t = val ; *t ; t++) ;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	213 for (t-- ; t >= val && isblank(*t) ; t--) ;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	214
282 87d6ac21cd1b Fix "Cannot unset option" bug Mikael Berthe <mikael@lilotux.net> parents: 281 diff changeset	215 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	216
337 3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	217 // 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	218 // removed and whitespace is not stripped
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	219 if ((t>val) && (val == '"' && t == '"')) {
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	220 val++;
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	221 t--;
3a25be278864 Values can be enclosed by quotes in assignments Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	222 }
280 68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	223 *pval = g_strndup(val, t+1-val);
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	224 return TRUE;
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	225 }
68ce34b4243b Add parse_assigment() function Mikael Berthe <mikael@lilotux.net> parents: 279 diff changeset	226
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	227 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	228 {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	229 GSList **plist;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	230 GSList *sptr;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	231 T_setting *setting;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	232
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	233 plist = get_list_ptr(type);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	234 if (!plist) return;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	235
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	236 sptr = settings_find(*plist, key);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	237 if (sptr) {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	238 // The setting has been found. We will update it or delete it.
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	239 setting = (T_setting*)sptr->data;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	240 if (setting->value)
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	241 g_free(setting->value);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	242 if (!value) {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	243 // Let's remove the setting
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	244 g_free(setting->name);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	245 plist = g_slist_delete_link(plist, sptr);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	246 } else {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	247 // Let's update the setting
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	248 setting->value = g_strdup(value);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	249 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	250 } else if (value) {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	251 setting = g_new(T_setting, 1);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	252 setting->name = g_strdup(key);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	253 setting->value = g_strdup(value);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	254 plist = g_slist_append(plist, setting);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	255 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	256 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	257
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	258 void settings_del(guint type, const gchar *key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	259 {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	260 settings_set(type, key, NULL);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	261 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	262
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	263 const gchar settings_get(guint type, const gchar key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	264 {
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	265 GSList **plist;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	266 GSList *sptr;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	267 T_setting *setting;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	268
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	269 plist = get_list_ptr(type);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	270 sptr = settings_find(*plist, key);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	271 if (!sptr) return NULL;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	272
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	273 setting = (T_setting*)sptr->data;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	274 return setting->value;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	275 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	276
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	277 int settings_get_int(guint type, const gchar *key)
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	278 {
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 280 diff changeset	279 const gchar *setval = settings_get(type, key);
279 f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	280
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	281 if (setval) return atoi(setval);
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	282 return 0;
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	283 }
f5dd437c057b Rewrite the settings system Mikael Berthe <mikael@lilotux.net> parents: diff changeset	284
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	285 // Return the command the key is bound to, or NULL.
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	286 const gchar *isbound(int key)
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	287 {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	288 gchar asciikey[16];
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	289 g_snprintf(asciikey, 15, "%d", key);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	290 return settings_get(SETTINGS_TYPE_BINDING, asciikey);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	291 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 282 diff changeset	292
294 871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	293 // settings_get_status_msg(status)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	294 // 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	295 // - 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	296 // return this message
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	297 // - 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	298 // generic user message), it is returned
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	299 // - if no user-defined message is found, return the mcabber default msg
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	300 // - if there is no default (offline, invisible), return an empty string
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	301 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	302 {
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	303 const gchar *rstatus = settings_opt_get("message");
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	304
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	305 if (rstatus) return rstatus;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	306
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	307 switch(status) {
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	308 case available:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	309 if ((rstatus = settings_opt_get("message_avail")) == NULL)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	310 rstatus = MSG_AVAIL;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	311 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	312
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	313 case freeforchat:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	314 if ((rstatus = settings_opt_get("message_free")) == NULL)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	315 rstatus = MSG_FREE;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	316 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	317
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	318 case dontdisturb:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	319 if ((rstatus = settings_opt_get("message_dnd")) == NULL)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	320 rstatus = MSG_DND;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	321 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	322
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	323 case notavail:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	324 if ((rstatus = settings_opt_get("message_notavail")) == NULL)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	325 rstatus = MSG_NOTAVAIL;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	326 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	327
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	328 case away:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	329 if ((rstatus = settings_opt_get("message_away")) == NULL)
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	330 rstatus = MSG_AWAY;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	331 break;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	332
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	333 default:
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	334 rstatus = "";
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	335 }
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	336 return rstatus;
871e53769084 Allow one status message per Jabber status Mikael Berthe <mikael@lilotux.net> parents: 293 diff changeset	337 }

Mercurial > ~mikael > mcabber > hg

annotate mcabber/src/settings.c @ 364:33b8e801ffa6