mcabber: mcabber/src/hooks.c annotate

annotate mcabber/src/hooks.c @ 524:05c0e55c4bb1

Pass message body to external command Introduce 2 new options: event_log_files & event_log_dir

author	Mikael Berthe <mikael@lilotux.net>
date	Sun, 20 Nov 2005 00:08:49 +0100
parents	e5008032edb8
children	56f641155579

rev	line source
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	1 /*
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	2 * hooks.c -- Hooks layer
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 391 diff changeset	3 *
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	4 * Copyright (C) 2005 Mikael Berthe <bmikael@lists.lilotux.net>
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	5 *
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	6 * This program is free software; you can redistribute it and/or modify
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	7 * it under the terms of the GNU General Public License as published by
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	8 * the Free Software Foundation; either version 2 of the License, or (at
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	9 * your option) any later version.
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	10 *
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	11 * This program is distributed in the hope that it will be useful, but
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	12 * WITHOUT ANY WARRANTY; without even the implied warranty of
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	14 * General Public License for more details.
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	15 *
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	16 * You should have received a copy of the GNU General Public License
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	17 * along with this program; if not, write to the Free Software
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	19 * USA
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	20 */
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	21
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	22 #include <sys/types.h>
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	23 #include <unistd.h>
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	24 #include <stdlib.h>
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	25
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	26 #include "hooks.h"
378 2e6c7b1440d1 Improve debugging/logging Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	27 #include "screen.h"
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	28 #include "roster.h"
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	29 #include "histolog.h"
325 ff6fb51bfd78 Handle "error" message type Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	30 #include "hbuf.h"
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	31 #include "settings.h"
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	32 #include "utils.h"
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	33
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	34 static char *extcmd;
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	35
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	36 inline void hk_message_in(const char jid, const char resname,
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	37 time_t timestamp, const char msg, const char type)
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	38 {
141 6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	39 int new_guy = FALSE;
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	40 int is_groupchat = FALSE; // groupchat message
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	41 int is_room = FALSE; // window is a room window
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	42 int log_muc_conf = FALSE;
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	43 int message_flags = 0;
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	44 guint rtype = ROSTER_TYPE_USER;
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	45 char wmsg = NULL, bmsg = NULL;
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	46 GSList *roster_usr;
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	47
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	48 if (type && !strcmp(type, "groupchat")) {
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	49 rtype = ROSTER_TYPE_ROOM;
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	50 is_groupchat = TRUE;
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	51 log_muc_conf = settings_opt_get_int("log_muc_conf");
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	52 if (!resname) {
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	53 message_flags = HBB_PREFIX_INFO;
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	54 resname = "";
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	55 }
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	56 wmsg = bmsg = g_strdup_printf("<%s> %s", resname, msg);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	57 } else {
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	58 wmsg = (char*) msg;
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	59 }
141 6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	60
6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	61 // If this user isn't in the roster, we add it
483 4a10c04ac2fb Fix a bug in roster_find() Mikael Berthe <mikael@lilotux.net> parents: 479 diff changeset	62 roster_usr = roster_find(jid, jidsearch, 0);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	63 if (!roster_usr) {
141 6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	64 new_guy = TRUE;
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	65 roster_usr = roster_add_user(jid, NULL, NULL, rtype);
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	66 if (!roster_usr) { // Shouldn't happen...
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	67 scr_LogPrint(LPRINT_LOGNORM, "ERROR: unable to add buddy!");
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	68 if (bmsg) g_free(bmsg);
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	69 return;
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	70 }
489 21ab22a60bcb Auto-convert a roster item to "room" type when receiving a groupchat message Mikael Berthe <mikael@lilotux.net> parents: 485 diff changeset	71 } else if (is_groupchat) {
21ab22a60bcb Auto-convert a roster item to "room" type when receiving a groupchat message Mikael Berthe <mikael@lilotux.net> parents: 485 diff changeset	72 // Make sure the type is ROOM
21ab22a60bcb Auto-convert a roster item to "room" type when receiving a groupchat message Mikael Berthe <mikael@lilotux.net> parents: 485 diff changeset	73 buddy_settype(roster_usr->data, ROSTER_TYPE_ROOM);
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	74 }
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	75
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	76 is_room = !!(buddy_gettype(roster_usr->data) & ROSTER_TYPE_ROOM);
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	77
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	78 if (!is_groupchat && is_room) {
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	79 // This is a private message from a room participant
479 b82428ac107d resname can be a null pointer in sme cases Mikael Berthe <mikael@lilotux.net> parents: 477 diff changeset	80 if (!resname) resname = "";
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	81 wmsg = bmsg = g_strdup_printf("PRIV#<%s> %s", resname, msg);
141 6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	82 }
6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	83
325 ff6fb51bfd78 Handle "error" message type Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	84 if (type && !strcmp(type, "error")) {
ff6fb51bfd78 Handle "error" message type Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	85 message_flags = HBB_PREFIX_ERR \| HBB_PREFIX_IN;
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 364 diff changeset	86 scr_LogPrint(LPRINT_LOGNORM, "Error message received from <%s>", jid);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	87 }
325 ff6fb51bfd78 Handle "error" message type Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	88
178 cfefae4b6de9 [/trunk] Changeset 190 by mikael mikael parents: 160 diff changeset	89 // Note: the hlog_write should not be called first, because in some
cfefae4b6de9 [/trunk] Changeset 190 by mikael mikael parents: 160 diff changeset	90 // cases scr_WriteIncomingMessage() will load the history and we'd
cfefae4b6de9 [/trunk] Changeset 190 by mikael mikael parents: 160 diff changeset	91 // have the message twice...
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	92 scr_WriteIncomingMessage(jid, wmsg, timestamp, message_flags);
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	93
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	94 // - We don't log the message if it is an error message
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	95 // - We don't log the message if it is a private conf. message
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	96 // - We don't log the message if it is groupchat message and the log_muc_conf
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	97 // option is off (and it is not a history line)
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	98 if (!(message_flags & HBB_PREFIX_ERR) &&
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	99 (!is_room \|\| (is_groupchat && log_muc_conf && !timestamp)))
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	100 hlog_write_message(jid, timestamp, FALSE, wmsg);
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	101
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	102 // External command
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	103 // - We do not call hk_ext_cmd() for history lines in MUC
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	104 // - We do call hk_ext_cmd() for private messages in a room
d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	105 if ((is_groupchat && !timestamp) \|\| !is_groupchat)
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	106 hk_ext_cmd(jid, (is_groupchat ? 'G' : 'M'), 'R', wmsg);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	107
146 50f23c38743a [/trunk] Changeset 158 by mikael mikael parents: 141 diff changeset	108 // We need to rebuild the list if the sender is unknown or
50f23c38743a [/trunk] Changeset 158 by mikael mikael parents: 141 diff changeset	109 // if the sender is offline/invisible and hide_offline_buddies is set
50f23c38743a [/trunk] Changeset 158 by mikael mikael parents: 141 diff changeset	110 if (new_guy \|\|
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	111 (buddy_getstatus(roster_usr->data, NULL) == offline &&
438 b44be19d6229 Handle multiple resources for the same buddy Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	112 buddylist_get_hide_offline_buddies()))
146 50f23c38743a [/trunk] Changeset 158 by mikael mikael parents: 141 diff changeset	113 {
141 6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	114 buddylist_build();
6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	115 update_roster = TRUE;
6533a231a65e [/trunk] Changeset 153 by mikael mikael parents: 120 diff changeset	116 }
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	117
477 d11e5ce2582c Improve hk_message_in() Mikael Berthe <mikael@lilotux.net> parents: 468 diff changeset	118 if (bmsg) g_free(bmsg);
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	119 }
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	120
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	121 // hk_message_out()
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	122 // nick should be set for private messages in a chat room, and null for
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	123 // normal messages.
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	124 inline void hk_message_out(const char jid, const char nick,
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	125 time_t timestamp, const char *msg)
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	126 {
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	127 char wmsg = NULL, bmsg = NULL;
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	128
485 55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	129 if (nick) wmsg = bmsg = g_strdup_printf("PRIV#<%s> %s", nick, msg);
55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	130 else wmsg = (char*)msg;
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	131
485 55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	132 // Note: the hlog_write should not be called first, because in some
55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	133 // cases scr_WriteOutgoingMessage() will load the history and we'd
55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	134 // have the message twice...
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	135 scr_WriteOutgoingMessage(jid, wmsg);
485 55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	136
55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	137 // We don't log private messages
55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	138 if (!nick) hlog_write_message(jid, timestamp, TRUE, msg);
55aa45eb7ece Fix a small display bug Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	139
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	140 // External command
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	141 hk_ext_cmd(jid, 'M', 'S', NULL);
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	142
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 483 diff changeset	143 if (bmsg) g_free(bmsg);
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	144 }
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	145
438 b44be19d6229 Handle multiple resources for the same buddy Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	146 inline void hk_statuschange(const char jid, const char resname, gchar prio,
b44be19d6229 Handle multiple resources for the same buddy Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	147 time_t timestamp, enum imstatus status,
b44be19d6229 Handle multiple resources for the same buddy Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	148 const char *status_msg)
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	149 {
510 6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	150 int buddy_format;
516 e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	151 int st_in_buf;
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	152 enum imstatus oldstat;
510 6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	153 char *bn = NULL;
438 b44be19d6229 Handle multiple resources for the same buddy Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	154 const char *rn = (resname ? resname : "default");
510 6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	155
516 e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	156 st_in_buf = settings_opt_get_int("show_status_in_buffer");
510 6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	157 buddy_format = settings_opt_get_int("buddy_format");
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	158 if (buddy_format) {
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	159 const char *name = roster_getname(jid);
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	160 if (name && strcmp(name, jid)) {
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	161 if (buddy_format == 1)
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	162 bn = g_strdup_printf("%s <%s/%s>", name, jid, rn);
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	163 else if (buddy_format == 2)
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	164 bn = g_strdup_printf("%s/%s", name, rn);
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	165 else if (buddy_format == 3)
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	166 bn = g_strdup_printf("%s", name);
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	167 }
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	168 }
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	169
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	170 if (!bn) {
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	171 bn = g_strdup_printf("<%s/%s>", jid, rn);
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	172 }
6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	173
516 e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	174 oldstat = roster_getstatus(jid, resname);
510 6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	175 scr_LogPrint(LPRINT_LOGNORM, "Buddy status has changed: [%c>%c] %s %s",
516 e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	176 imstatus2char[oldstat], imstatus2char[status], bn,
438 b44be19d6229 Handle multiple resources for the same buddy Mikael Berthe <mikael@lilotux.net> parents: 393 diff changeset	177 ((status_msg) ? status_msg : ""));
510 6c3cd3aa4a91 New 'buddy_format' option Mikael Berthe <mikael@lilotux.net> parents: 489 diff changeset	178 g_free(bn);
514 979eb0fe2969 Show status changes in buddy window, if it is open Mikael Berthe <mikael@lilotux.net> parents: 510 diff changeset	179
516 e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	180 if (st_in_buf == 2 \|\|
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	181 (st_in_buf == 1 && (status == offline \|\| oldstat == offline))) {
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	182 // Write the status change in the buddy's buffer, only if it already exists
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	183 if (scr_BuddyBufferExists(jid)) {
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	184 bn = g_strdup_printf("Buddy status has changed: [%c>%c] %s",
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	185 imstatus2char[oldstat], imstatus2char[status],
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	186 ((status_msg) ? status_msg : ""));
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	187 scr_WriteIncomingMessage(jid, bn, 0, HBB_PREFIX_INFO\|HBB_PREFIX_NOFLAG);
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	188 g_free(bn);
e5008032edb8 Add option 'show_status_in_buffer' Mikael Berthe <mikael@lilotux.net> parents: 514 diff changeset	189 }
514 979eb0fe2969 Show status changes in buddy window, if it is open Mikael Berthe <mikael@lilotux.net> parents: 510 diff changeset	190 }
979eb0fe2969 Show status changes in buddy window, if it is open Mikael Berthe <mikael@lilotux.net> parents: 510 diff changeset	191
468 644b8bf9ca4d Improve MUC presence messages handling Mikael Berthe <mikael@lilotux.net> parents: 458 diff changeset	192 roster_setstatus(jid, rn, prio, status, status_msg, role_none, NULL);
120 cfd3df636d5f [/trunk] Changeset 133 by mikael mikael parents: 118 diff changeset	193 buddylist_build();
cfd3df636d5f [/trunk] Changeset 133 by mikael mikael parents: 118 diff changeset	194 scr_DrawRoster();
221 73f6ce668ba8 [/trunk] Changeset 233 by mikael mikael parents: 213 diff changeset	195 hlog_write_status(jid, 0, status, status_msg);
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	196 // External command
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	197 hk_ext_cmd(jid, 'S', imstatus2char[status], NULL);
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	198 }
8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: diff changeset	199
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	200 inline void hk_mystatuschange(time_t timestamp,
318 45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 281 diff changeset	201 enum imstatus old_status, enum imstatus new_status, const char *msg)
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	202 {
318 45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 281 diff changeset	203 if (!msg && (old_status == new_status))
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	204 return;
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	205
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 364 diff changeset	206 scr_LogPrint(LPRINT_LOGNORM, "Your status has changed: [%c>%c] %s",
318 45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 281 diff changeset	207 imstatus2char[old_status], imstatus2char[new_status],
45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 281 diff changeset	208 ((msg) ? msg : ""));
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	209 //hlog_write_status(NULL, 0, status);
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	210 }
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 115 diff changeset	211
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	212
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	213 /* External commands */
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	214
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	215 // hk_ext_cmd_init()
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	216 // Initialize external command variable.
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	217 // Can be called with parameter NULL to reset and free memory.
281 f562b9af2de7 Add "const" specifier in prototypes Mikael Berthe <mikael@lilotux.net> parents: 221 diff changeset	218 void hk_ext_cmd_init(const char *command)
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	219 {
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	220 if (extcmd) {
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	221 g_free(extcmd);
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	222 extcmd = NULL;
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	223 }
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	224 if (command)
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	225 extcmd = g_strdup(command);
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	226 }
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	227
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	228 // hk_ext_cmd()
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	229 // Launch an external command (process) for the given event.
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	230 // For now, data should be NULL.
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	231 void hk_ext_cmd(const char jid, guchar type, guchar info, const char data)
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	232 {
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	233 pid_t pid;
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	234 char *arg_type = NULL;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	235 char *arg_info = NULL;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	236 char *arg_data = NULL;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	237 char status_str[2];
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	238 char *datafname = NULL;
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	239
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	240 if (!extcmd) return;
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	241
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	242 // Prepare arg_* (external command parameters)
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	243 switch (type) {
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	244 case 'M':
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	245 arg_type = "MSG";
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	246 if (info == 'R')
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	247 arg_info = "IN";
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	248 else if (info == 'S')
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	249 arg_info = "OUT";
453 39e173645f9c External command is called for MUC messages Mikael Berthe <mikael@lilotux.net> parents: 447 diff changeset	250 break;
39e173645f9c External command is called for MUC messages Mikael Berthe <mikael@lilotux.net> parents: 447 diff changeset	251 case 'G':
39e173645f9c External command is called for MUC messages Mikael Berthe <mikael@lilotux.net> parents: 447 diff changeset	252 arg_type = "MSG";
39e173645f9c External command is called for MUC messages Mikael Berthe <mikael@lilotux.net> parents: 447 diff changeset	253 arg_info = "MUC";
355 c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	254 break;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	255 case 'S':
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	256 arg_type = "STATUS";
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	257 if (strchr(imstatus2char, tolower(info))) {
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	258 status_str[0] = toupper(info);
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	259 status_str[1] = 0;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	260 arg_info = status_str;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	261 }
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	262 break;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	263 default:
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	264 return;
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	265 }
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	266
c5a7a7273986 Add some external actions Mikael Berthe <mikael@lilotux.net> parents: 325 diff changeset	267 if (!arg_type \|\| !arg_info) return;
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	268
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	269 if (strchr("MG", type) && data && settings_opt_get_int("event_log_files")) {
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	270 int fd;
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	271 const char *prefix;
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	272 prefix = settings_opt_get("event_log_dir");
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	273 if (!prefix)
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	274 prefix = ut_get_tmpdir();
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	275 datafname = g_strdup_printf("%s/mcabber-%d.XXXXXX", prefix, getpid());
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	276 // XXX Some old systems may require us to set umask first.
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	277 fd = mkstemp(datafname);
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	278 if (fd == -1) {
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	279 g_free(datafname);
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	280 datafname = NULL;
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	281 scr_LogPrint(LPRINT_LOGNORM,
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	282 "Unable to create temp file for external command.");
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	283 }
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	284 write(fd, data, strlen(data));
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	285 write(fd, "\n", 1);
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	286 close(fd);
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	287 arg_data = datafname;
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	288 }
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	289
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	290 if ((pid=fork()) == -1) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 364 diff changeset	291 scr_LogPrint(LPRINT_LOGNORM, "Fork error, cannot launch external command.");
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	292 if (datafname)
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	293 g_free(datafname);
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	294 return;
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	295 }
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	296
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	297 if (pid == 0) { // child
391 868a350fefca Fix "missing sentinel in function call" warning with gcc4 Mikael Berthe <mikael@lilotux.net> parents: 384 diff changeset	298 if (execl(extcmd, extcmd, arg_type, arg_info, jid, arg_data, NULL) == -1) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 364 diff changeset	299 // scr_LogPrint(LPRINT_LOGNORM, "Cannot execute external command.");
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	300 exit(1);
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	301 }
44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	302 }
524 05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	303 if (datafname)
05c0e55c4bb1 Pass message body to external command Mikael Berthe <mikael@lilotux.net> parents: 516 diff changeset	304 g_free(datafname);
160 44c6410b4845 [/trunk] Changeset 172 by mikael mikael parents: 146 diff changeset	305 }

Mercurial > ~mikael > mcabber > hg

annotate mcabber/src/hooks.c @ 524:05c0e55c4bb1