mcabber: mcabber/src/commands.c annotate

annotate mcabber/src/commands.c @ 585:7eff2c1481fa

Add "/room affil" and "/room role"

author	Mikael Berthe <mikael@lilotux.net>
date	Sat, 10 Dec 2005 18:34:51 +0100
parents	414fbf558f1e
children	49f132b434a3

rev	line source
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	1 /*
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	2 * commands.c -- user commands handling
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 384 diff changeset	3 *
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	4 * Copyright (C) 2005 Mikael Berthe <bmikael@lists.lilotux.net>
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	5 *
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	6 * This program is free software; you can redistribute it and/or modify
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	7 * it under the terms of the GNU General Public License as published by
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	8 * the Free Software Foundation; either version 2 of the License, or (at
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	9 * your option) any later version.
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	10 *
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	11 * This program is distributed in the hope that it will be useful, but
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	12 * WITHOUT ANY WARRANTY; without even the implied warranty of
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	14 * General Public License for more details.
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	15 *
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	16 * You should have received a copy of the GNU General Public License
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	17 * along with this program; if not, write to the Free Software
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	19 * USA
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	20 */
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	21
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	22 #include <string.h>
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	23
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	24 #include "commands.h"
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	25 #include "jabglue.h"
81 0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	26 #include "roster.h"
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	27 #include "screen.h"
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	28 #include "compl.h"
113 8ac67e951eab [/trunk] Changeset 127 by mikael mikael parents: 108 diff changeset	29 #include "hooks.h"
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	30 #include "hbuf.h"
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	31 #include "utils.h"
283 00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	32 #include "settings.h"
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	33
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	34 // Commands callbacks
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	35 static void do_roster(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	36 static void do_status(char *arg);
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	37 static void do_status_to(char *arg);
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	38 static void do_add(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	39 static void do_del(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	40 static void do_group(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	41 static void do_say(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	42 static void do_msay(char *arg);
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	43 static void do_say_to(char *arg);
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	44 static void do_buffer(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	45 static void do_clear(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	46 static void do_info(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	47 static void do_rename(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	48 static void do_move(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	49 static void do_set(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	50 static void do_alias(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	51 static void do_bind(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	52 static void do_connect(char *arg);
eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	53 static void do_disconnect(char *arg);
436 802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	54 static void do_rawxml(char *arg);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	55 static void do_room(char *arg);
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	56
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	57 // Global variable for the commands list
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	58 static GSList *Commands;
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	59
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	60
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	61 // cmd_add()
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	62 // Adds a command to the commands list and to the CMD completion list
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	63 void cmd_add(const char name, const char help,
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	64 guint flags_row1, guint flags_row2, void (*f)())
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	65 {
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	66 cmd *n_cmd = g_new0(cmd, 1);
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	67 strncpy(n_cmd->name, name, 32-1);
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	68 n_cmd->help = help;
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	69 n_cmd->completion_flags[0] = flags_row1;
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	70 n_cmd->completion_flags[1] = flags_row2;
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	71 n_cmd->func = f;
102 2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	72 Commands = g_slist_append(Commands, n_cmd);
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	73 // Add to completion CMD category
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	74 compl_add_category_word(COMPL_CMD, name);
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	75 }
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	76
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	77 // cmd_init()
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	78 // ...
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	79 void cmd_init(void)
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	80 {
124 6d2122c003c4 [/trunk] Changeset 137 by mikael mikael parents: 120 diff changeset	81 cmd_add("add", "Add a jabber user", COMPL_JID, 0, &do_add);
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	82 cmd_add("alias", "Add an alias", 0, 0, &do_alias);
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	83 cmd_add("bind", "Add an key binding", 0, 0, &do_bind);
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	84 cmd_add("buffer", "Manipulate current buddy's buffer (chat window)",
4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	85 COMPL_BUFFER, 0, &do_buffer);
108 7fb72bc13732 [/trunk] Changeset 122 by mikael mikael parents: 104 diff changeset	86 cmd_add("clear", "Clear the dialog window", 0, 0, &do_clear);
298 35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	87 cmd_add("connect", "Connect to the server", 0, 0, &do_connect);
205 e01bf6d9b4b8 [/trunk] Changeset 217 by mikael mikael parents: 191 diff changeset	88 cmd_add("del", "Delete the current buddy", 0, 0, &do_del);
298 35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	89 cmd_add("disconnect", "Disconnect from server", 0, 0, &do_disconnect);
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	90 cmd_add("group", "Change group display settings", COMPL_GROUP, 0, &do_group);
262 ab6f83a82811 Do not add /help to command completion, as it isn't implemented yet. mikael@frmp8452 parents: 260 diff changeset	91 //cmd_add("help", "Display some help", COMPL_CMD, 0, NULL);
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	92 cmd_add("info", "Show basic infos on current buddy", 0, 0, &do_info);
225 d5ae42cbe1fa [/trunk] Changeset 237 by mikael mikael parents: 221 diff changeset	93 cmd_add("move", "Move the current buddy to another group", COMPL_GROUPNAME,
d5ae42cbe1fa [/trunk] Changeset 237 by mikael mikael parents: 221 diff changeset	94 0, &do_move);
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	95 cmd_add("msay", "Send a multi-lines message to the selected buddy",
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	96 COMPL_MULTILINE, 0, &do_msay);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	97 cmd_add("room", "MUC actions command", COMPL_ROOM, 0, &do_room);
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	98 cmd_add("quit", "Exit the software", 0, 0, NULL);
436 802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	99 cmd_add("rawxml", "Send a raw XML string", 0, 0, &do_rawxml);
208 8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	100 cmd_add("rename", "Rename the current buddy", 0, 0, &do_rename);
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	101 //cmd_add("request_auth");
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	102 cmd_add("roster", "Manipulate the roster/buddylist", COMPL_ROSTER, 0,
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	103 &do_roster);
132 6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	104 cmd_add("say", "Say something to the selected buddy", 0, 0, &do_say);
488 9e8519078e00 Enable jid completion for /say_to Mikael Berthe <mikael@lilotux.net> parents: 486 diff changeset	105 cmd_add("say_to", "Say something to a specific buddy", COMPL_JID, 0,
9e8519078e00 Enable jid completion for /say_to Mikael Berthe <mikael@lilotux.net> parents: 486 diff changeset	106 &do_say_to);
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	107 //cmd_add("search");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	108 //cmd_add("send_auth");
310 29b27c8692ea Post-0.6.3 changes Mikael Berthe <mikael@lilotux.net> parents: 308 diff changeset	109 cmd_add("set", "Set/query an option value", 0, 0, &do_set);
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	110 cmd_add("status", "Show or set your status", COMPL_STATUS, 0, &do_status);
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	111 cmd_add("status_to", "Show or set your status for one recipient",
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	112 COMPL_JID, COMPL_STATUS, &do_status_to);
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	113
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	114 // Status category
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	115 compl_add_category_word(COMPL_STATUS, "online");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	116 compl_add_category_word(COMPL_STATUS, "avail");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	117 compl_add_category_word(COMPL_STATUS, "invisible");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	118 compl_add_category_word(COMPL_STATUS, "free");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	119 compl_add_category_word(COMPL_STATUS, "dnd");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	120 compl_add_category_word(COMPL_STATUS, "notavail");
9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	121 compl_add_category_word(COMPL_STATUS, "away");
103 93dcc4e15d4a [/trunk] Changeset 117 by mikael mikael parents: 102 diff changeset	122
93dcc4e15d4a [/trunk] Changeset 117 by mikael mikael parents: 102 diff changeset	123 // Roster category
93dcc4e15d4a [/trunk] Changeset 117 by mikael mikael parents: 102 diff changeset	124 compl_add_category_word(COMPL_ROSTER, "bottom");
265 49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	125 compl_add_category_word(COMPL_ROSTER, "top");
377 00809e3e327e Add "/roster up" and "/roster down" Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	126 compl_add_category_word(COMPL_ROSTER, "up");
00809e3e327e Add "/roster up" and "/roster down" Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	127 compl_add_category_word(COMPL_ROSTER, "down");
103 93dcc4e15d4a [/trunk] Changeset 117 by mikael mikael parents: 102 diff changeset	128 compl_add_category_word(COMPL_ROSTER, "hide_offline");
93dcc4e15d4a [/trunk] Changeset 117 by mikael mikael parents: 102 diff changeset	129 compl_add_category_word(COMPL_ROSTER, "show_offline");
290 f63839a4cb35 Add /roster toggle_offline Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	130 compl_add_category_word(COMPL_ROSTER, "toggle_offline");
330 a9013124ede6 Add "/roster alternate" Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	131 compl_add_category_word(COMPL_ROSTER, "alternate");
265 49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	132 compl_add_category_word(COMPL_ROSTER, "search");
236 72fd1273f2b7 [/trunk] Changeset 249 by mikael mikael parents: 232 diff changeset	133 compl_add_category_word(COMPL_ROSTER, "unread_first");
72fd1273f2b7 [/trunk] Changeset 249 by mikael mikael parents: 232 diff changeset	134 compl_add_category_word(COMPL_ROSTER, "unread_next");
127 0f7ec11efd06 [/trunk] Changeset 140 by mikael mikael parents: 124 diff changeset	135
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	136 // Roster category
508 5a2132ba2220 Add "/buffer up" and "/buffer down" Mikael Berthe <mikael@lilotux.net> parents: 506 diff changeset	137 compl_add_category_word(COMPL_BUFFER, "clear");
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	138 compl_add_category_word(COMPL_BUFFER, "bottom");
4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	139 compl_add_category_word(COMPL_BUFFER, "top");
508 5a2132ba2220 Add "/buffer up" and "/buffer down" Mikael Berthe <mikael@lilotux.net> parents: 506 diff changeset	140 compl_add_category_word(COMPL_BUFFER, "up");
5a2132ba2220 Add "/buffer up" and "/buffer down" Mikael Berthe <mikael@lilotux.net> parents: 506 diff changeset	141 compl_add_category_word(COMPL_BUFFER, "down");
370 dd9e2eb52916 Add /buffer search_{backward,forward} Mikael Berthe <mikael@lilotux.net> parents: 369 diff changeset	142 compl_add_category_word(COMPL_BUFFER, "search_backward");
dd9e2eb52916 Add /buffer search_{backward,forward} Mikael Berthe <mikael@lilotux.net> parents: 369 diff changeset	143 compl_add_category_word(COMPL_BUFFER, "search_forward");
464 e4840b288be0 Add "/buffer date" Mikael Berthe <mikael@lilotux.net> parents: 462 diff changeset	144 compl_add_category_word(COMPL_BUFFER, "date");
462 d580e87c11ed Add "/buffer %n" Mikael Berthe <mikael@lilotux.net> parents: 461 diff changeset	145 compl_add_category_word(COMPL_BUFFER, "%");
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	146
127 0f7ec11efd06 [/trunk] Changeset 140 by mikael mikael parents: 124 diff changeset	147 // Group category
240 723433a677f0 [/trunk] Changeset 253 by mikael mikael parents: 238 diff changeset	148 compl_add_category_word(COMPL_GROUP, "fold");
723433a677f0 [/trunk] Changeset 253 by mikael mikael parents: 238 diff changeset	149 compl_add_category_word(COMPL_GROUP, "unfold");
130 60694c9ddde3 [/trunk] Changeset 143 by mikael mikael parents: 129 diff changeset	150 compl_add_category_word(COMPL_GROUP, "toggle");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	151
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	152 // Multi-line (msay) category
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	153 compl_add_category_word(COMPL_MULTILINE, "abort");
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	154 compl_add_category_word(COMPL_MULTILINE, "begin");
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	155 compl_add_category_word(COMPL_MULTILINE, "send");
260 33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	156 compl_add_category_word(COMPL_MULTILINE, "verbatim");
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	157
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	158 // Room category
585 7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	159 compl_add_category_word(COMPL_ROOM, "affil");
571 d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	160 compl_add_category_word(COMPL_ROOM, "ban");
486 2a6a8ebb813b Add "/room invite" Mikael Berthe <mikael@lilotux.net> parents: 484 diff changeset	161 compl_add_category_word(COMPL_ROOM, "invite");
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	162 compl_add_category_word(COMPL_ROOM, "join");
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	163 compl_add_category_word(COMPL_ROOM, "kick");
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	164 compl_add_category_word(COMPL_ROOM, "leave");
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	165 compl_add_category_word(COMPL_ROOM, "names");
470 eaa2ad773192 Add "/room nick" Mikael Berthe <mikael@lilotux.net> parents: 469 diff changeset	166 compl_add_category_word(COMPL_ROOM, "nick");
490 af6e31e32d9e Add "/room privmsg" Mikael Berthe <mikael@lilotux.net> parents: 488 diff changeset	167 compl_add_category_word(COMPL_ROOM, "privmsg");
448 39a28cb59af3 Add "/room remove", to remove an old chatroom from the roster Mikael Berthe <mikael@lilotux.net> parents: 447 diff changeset	168 compl_add_category_word(COMPL_ROOM, "remove");
585 7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	169 compl_add_category_word(COMPL_ROOM, "role");
475 fa49ac0bb8f3 Add "/room topic", and display topic changes Mikael Berthe <mikael@lilotux.net> parents: 472 diff changeset	170 compl_add_category_word(COMPL_ROOM, "topic");
449 e08b0c2d0e54 Add "/room unlock" Mikael Berthe <mikael@lilotux.net> parents: 448 diff changeset	171 compl_add_category_word(COMPL_ROOM, "unlock");
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	172 compl_add_category_word(COMPL_ROOM, "whois");
95 9e6b7897ec37 [/trunk] Changeset 109 by mikael mikael parents: 94 diff changeset	173 }
94 9a4aa2797f02 [/trunk] Changeset 108 by mikael mikael parents: 81 diff changeset	174
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	175 // expandalias(line)
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	176 // If there is one, expand the alias in line and returns a new allocated line
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	177 // If no alias is found, returns line
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	178 // Note : if the returned pointer is different from line, the caller should
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	179 // g_free() the pointer after use
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	180 char expandalias(char line)
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	181 {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	182 const char p1, p2;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	183 char *word;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	184 const gchar *value;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	185 char *newline = line;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	186
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	187 // Ignore leading '/'
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	188 for (p1 = line ; *p1 == '/' ; p1++)
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	189 ;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	190 // Locate the end of the word
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	191 for (p2 = p1 ; p2 && (p2 != ' ') ; p2++)
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	192 ;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	193 // Extract the word
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	194 word = g_strndup(p1, p2-p1);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	195
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	196 // Look for an alias in the list
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	197 value = settings_get(SETTINGS_TYPE_ALIAS, (const char*)word);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	198 if (value) {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	199 // There is an alias to expand
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	200 newline = g_new(char, strlen(value)+strlen(p2)+2);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	201 *newline = '/';
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	202 strcpy(newline+1, value);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	203 strcat(newline, p2);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	204 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	205 g_free(word);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	206
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	207 return newline;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	208 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	209
102 2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	210 // cmd_get
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	211 // Finds command in the command list structure.
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	212 // Returns a pointer to the cmd entry, or NULL if command not found.
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	213 cmd cmd_get(const char command)
102 2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	214 {
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	215 const char p1, p2;
102 2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	216 char *com;
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	217 GSList *sl_com;
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	218
102 2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	219 // Ignore leading '/'
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	220 for (p1 = command ; *p1 == '/' ; p1++)
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	221 ;
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	222 // Locate the end of the command
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	223 for (p2 = p1 ; p2 && (p2 != ' ') ; p2++)
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	224 ;
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	225 // Copy the clean command
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	226 com = g_strndup(p1, p2-p1);
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	227
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	228 // Look for command in the list
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	229 for (sl_com=Commands; sl_com; sl_com = g_slist_next(sl_com)) {
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	230 if (!strcasecmp(com, ((cmd*)sl_com->data)->name))
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	231 break;
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	232 }
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	233 g_free(com);
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	234
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	235 if (sl_com) // Command has been found.
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	236 return (cmd*)sl_com->data;
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	237 return NULL;
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	238 }
2b4cc6bc5bf2 [/trunk] Changeset 116 by mikael mikael parents: 101 diff changeset	239
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	240 // send_message(msg)
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	241 // Write the message in the buddy's window and send the message on
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	242 // the network.
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	243 void send_message(const char *msg)
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	244 {
81 0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	245 const char *jid;
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 384 diff changeset	246
472 75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	247 if (!jb_getonline()) {
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	248 scr_LogPrint(LPRINT_NORMAL, "You are not connected");
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	249 return;
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	250 }
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	251
81 0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	252 if (!current_buddy) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	253 scr_LogPrint(LPRINT_NORMAL, "No buddy currently selected.");
81 0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	254 return;
0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	255 }
0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	256
0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	257 jid = CURRENT_JID;
0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	258 if (!jid) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	259 scr_LogPrint(LPRINT_NORMAL, "No buddy currently selected.");
81 0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	260 return;
0bd578421ce9 [/trunk] Changeset 95 by mikael mikael parents: 47 diff changeset	261 }
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	262
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	263 if (buddy_gettype(BUDDATA(current_buddy)) != ROSTER_TYPE_ROOM) {
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	264 // local part (UI, logging, etc.)
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	265 hk_message_out(jid, NULL, 0, msg);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	266 }
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	267
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	268 // Network part
475 fa49ac0bb8f3 Add "/room topic", and display topic changes Mikael Berthe <mikael@lilotux.net> parents: 472 diff changeset	269 jb_send_msg(jid, msg, buddy_gettype(BUDDATA(current_buddy)), NULL);
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	270 }
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	271
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	272 // process_command(line)
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	273 // Process a command line.
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	274 // Return 255 if this is the /quit command, and 0 for the other commands.
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	275 int process_command(char *line)
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	276 {
101 4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	277 char *p;
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	278 char *xpline;
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	279 cmd *curcmd;
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	280
101 4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	281 // Remove trailing spaces:
4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	282 for (p=line ; *p ; p++)
4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	283 ;
4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	284 for (p-- ; p>line && (*p == ' ') ; p--)
4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	285 *p = 0;
4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	286
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	287 // We do alias expansion here
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	288 if (scr_get_multimode() != 2)
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	289 xpline = expandalias(line);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	290 else
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	291 xpline = line; // No expansion in verbatim multi-line mode
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	292
101 4f3ad00b5187 [/trunk] Changeset 115 by mikael mikael parents: 98 diff changeset	293 // Command "quit"?
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	294 if ((!strncasecmp(xpline, "/quit", 5)) && (scr_get_multimode() != 2) )
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	295 if (!xpline[5] \|\| xpline[5] == ' ')
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	296 return 255;
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	297
260 33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	298 // If verbatim multi-line mode, we check if another /msay command is typed
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	299 if ((scr_get_multimode() == 2) && (strncasecmp(xpline, "/msay ", 6))) {
260 33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	300 // It isn't an /msay command
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	301 scr_append_multiline(xpline);
260 33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	302 return 0;
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	303 }
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	304
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	305 // Commands handling
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	306 curcmd = cmd_get(xpline);
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	307
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	308 if (!curcmd) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	309 scr_LogPrint(LPRINT_NORMAL, "Unrecognized command, sorry.");
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	310 if (xpline != line) g_free(xpline);
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	311 return 0;
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	312 }
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	313 if (!curcmd->func) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	314 scr_LogPrint(LPRINT_NORMAL, "Not yet implemented, sorry.");
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	315 if (xpline != line) g_free(xpline);
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	316 return 0;
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	317 }
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	318 // Lets go to the command parameters
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	319 for (p = xpline+1; p && (p != ' ') ; p++)
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	320 ;
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	321 // Skip spaces
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	322 while (p && (p == ' '))
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	323 p++;
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	324 // Call command-specific function
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	325 (*curcmd->func)(p);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	326 if (xpline != line) g_free(xpline);
47 7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	327 return 0;
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	328 }
7259a61e1a4b [/trunk] Changeset 63 by mikael mikael parents: diff changeset	329
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	330 // process_line(line)
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	331 // Process a command/message line.
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	332 // If this isn't a command, this is a message and it is sent to the
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	333 // currently selected buddy.
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	334 // Return 255 if the line is the /quit command, or 0.
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	335 int process_line(char *line)
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	336 {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	337 if (!*line) { // User only pressed enter
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	338 if (scr_get_multimode()) {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	339 scr_append_multiline("");
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	340 return 0;
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	341 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	342 if (current_buddy) {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	343 scr_set_chatmode(TRUE);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	344 buddy_setflags(BUDDATA(current_buddy), ROSTER_FLAG_LOCK, TRUE);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	345 scr_ShowBuddyWindow();
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	346 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	347 return 0;
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	348 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	349
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	350 if (*line != '/') {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	351 // This isn't a command
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	352 if (scr_get_multimode())
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	353 scr_append_multiline(line);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	354 else
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	355 do_say(line);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	356 return 0;
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	357 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	358
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	359 /* It is (probably) a command -- except for verbatim multi-line mode */
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	360 return process_command(line);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	361 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	362
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	363 /* Commands callback functions */
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	364 /* All these do_() functions will be called with a "arg" parameter /
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	365 /* (with arg not null) */
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	366
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	367 static void do_roster(char *arg)
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	368 {
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	369 if (!strcasecmp(arg, "top")) {
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	370 scr_RosterTop();
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	371 update_roster = TRUE;
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	372 } else if (!strcasecmp(arg, "bottom")) {
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	373 scr_RosterBottom();
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	374 update_roster = TRUE;
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	375 } else if (!strcasecmp(arg, "hide_offline")) {
120 cfd3df636d5f [/trunk] Changeset 133 by mikael mikael parents: 118 diff changeset	376 buddylist_set_hide_offline_buddies(TRUE);
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	377 if (current_buddy)
fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	378 buddylist_build();
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	379 update_roster = TRUE;
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	380 } else if (!strcasecmp(arg, "show_offline")) {
120 cfd3df636d5f [/trunk] Changeset 133 by mikael mikael parents: 118 diff changeset	381 buddylist_set_hide_offline_buddies(FALSE);
124 6d2122c003c4 [/trunk] Changeset 137 by mikael mikael parents: 120 diff changeset	382 buddylist_build();
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	383 update_roster = TRUE;
290 f63839a4cb35 Add /roster toggle_offline Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	384 } else if (!strcasecmp(arg, "toggle_offline")) {
f63839a4cb35 Add /roster toggle_offline Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	385 buddylist_set_hide_offline_buddies(-1);
f63839a4cb35 Add /roster toggle_offline Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	386 buddylist_build();
f63839a4cb35 Add /roster toggle_offline Mikael Berthe <mikael@lilotux.net> parents: 288 diff changeset	387 update_roster = TRUE;
236 72fd1273f2b7 [/trunk] Changeset 249 by mikael mikael parents: 232 diff changeset	388 } else if (!strcasecmp(arg, "unread_first")) {
72fd1273f2b7 [/trunk] Changeset 249 by mikael mikael parents: 232 diff changeset	389 scr_RosterUnreadMessage(0);
72fd1273f2b7 [/trunk] Changeset 249 by mikael mikael parents: 232 diff changeset	390 } else if (!strcasecmp(arg, "unread_next")) {
72fd1273f2b7 [/trunk] Changeset 249 by mikael mikael parents: 232 diff changeset	391 scr_RosterUnreadMessage(1);
330 a9013124ede6 Add "/roster alternate" Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	392 } else if (!strcasecmp(arg, "alternate")) {
a9013124ede6 Add "/roster alternate" Mikael Berthe <mikael@lilotux.net> parents: 318 diff changeset	393 scr_RosterJumpAlternate();
265 49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	394 } else if (!strncasecmp(arg, "search", 6)) {
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	395 char *string = arg+6;
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	396 if (string && (string != ' ')) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	397 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
265 49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	398 return;
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	399 }
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	400 while (*string == ' ')
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	401 string++;
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	402 if (!*string) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	403 scr_LogPrint(LPRINT_NORMAL, "What name or jid are you looking for?");
265 49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	404 return;
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	405 }
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	406 scr_RosterSearch(string);
49e9e02dd6d0 Add "/roster search" command mikael@frmp8452 parents: 262 diff changeset	407 update_roster = TRUE;
377 00809e3e327e Add "/roster up" and "/roster down" Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	408 } else if (!strcasecmp(arg, "up")) {
00809e3e327e Add "/roster up" and "/roster down" Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	409 scr_RosterUp();
00809e3e327e Add "/roster up" and "/roster down" Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	410 } else if (!strcasecmp(arg, "down")) {
00809e3e327e Add "/roster up" and "/roster down" Mikael Berthe <mikael@lilotux.net> parents: 374 diff changeset	411 scr_RosterDown();
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	412 } else
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	413 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
104 fe7257d251ac [/trunk] Changeset 118 by mikael mikael parents: 103 diff changeset	414 }
108 7fb72bc13732 [/trunk] Changeset 122 by mikael mikael parents: 104 diff changeset	415
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	416 // setstatus(recipient, arg)
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	417 // Set your Jabber status.
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	418 // - if recipient is not NULL, the status is sent to this contact only
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	419 // - arg must be "status message" (message is optional)
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	420 static void setstatus(const char recipient, const char arg)
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	421 {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	422 char **paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	423 char *status;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	424 char *msg;
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	425 enum imstatus st;
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	426
472 75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	427 if (!jb_getonline()) {
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	428 scr_LogPrint(LPRINT_NORMAL, "You are not connected");
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	429 return;
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	430 }
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	431
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	432 paramlst = split_arg(arg, 2, 0); // status, message
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	433 status = *paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	434 msg = *(paramlst+1);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	435
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	436 if (!status) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	437 free_arg_lst(paramlst);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	438 return;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	439 }
318 45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 310 diff changeset	440
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	441 if (!strcasecmp(status, "offline")) st = offline;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	442 else if (!strcasecmp(status, "online")) st = available;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	443 else if (!strcasecmp(status, "avail")) st = available;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	444 else if (!strcasecmp(status, "away")) st = away;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	445 else if (!strcasecmp(status, "invisible")) st = invisible;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	446 else if (!strcasecmp(status, "dnd")) st = dontdisturb;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	447 else if (!strcasecmp(status, "notavail")) st = notavail;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	448 else if (!strcasecmp(status, "free")) st = freeforchat;
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	449 else {
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	450 scr_LogPrint(LPRINT_NORMAL, "Unrecognized status!");
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	451 free_arg_lst(paramlst);
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	452 return;
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	453 }
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	454
528 2f714bd701a1 Do not use default status messages with /status_to Mikael Berthe <mikael@lilotux.net> parents: 519 diff changeset	455 // Use provided message, unless requested status is "invisible"
416 48e7808c4191 Allow offline status message Mikael Berthe <mikael@lilotux.net> parents: 402 diff changeset	456 if (msg && st != invisible) {
318 45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 310 diff changeset	457 if (!*msg) msg = NULL;
45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 310 diff changeset	458 } else
45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 310 diff changeset	459 msg = NULL;
45076d02eeef The /status command can specify a status message Mikael Berthe <mikael@lilotux.net> parents: 310 diff changeset	460
528 2f714bd701a1 Do not use default status messages with /status_to Mikael Berthe <mikael@lilotux.net> parents: 519 diff changeset	461 // If a recipient is specified, let's don't use default status messages
2f714bd701a1 Do not use default status messages with /status_to Mikael Berthe <mikael@lilotux.net> parents: 519 diff changeset	462 if (recipient && !msg)
2f714bd701a1 Do not use default status messages with /status_to Mikael Berthe <mikael@lilotux.net> parents: 519 diff changeset	463 msg = "";
2f714bd701a1 Do not use default status messages with /status_to Mikael Berthe <mikael@lilotux.net> parents: 519 diff changeset	464
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	465 jb_setstatus(st, recipient, msg);
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	466
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	467 free_arg_lst(paramlst);
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	468 }
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	469
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	470 static void do_status(char *arg)
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	471 {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	472 if (!*arg) {
519 5c338d31de56 Show current global status message in "/status" Mikael Berthe <mikael@lilotux.net> parents: 508 diff changeset	473 const char *sm = jb_getstatusmsg();
5c338d31de56 Show current global status message in "/status" Mikael Berthe <mikael@lilotux.net> parents: 508 diff changeset	474 scr_LogPrint(LPRINT_NORMAL, "Your status is: [%c] %s",
5c338d31de56 Show current global status message in "/status" Mikael Berthe <mikael@lilotux.net> parents: 508 diff changeset	475 imstatus2char[jb_getstatus()],
5c338d31de56 Show current global status message in "/status" Mikael Berthe <mikael@lilotux.net> parents: 508 diff changeset	476 (sm ? sm : ""));
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	477 return;
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	478 }
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	479 setstatus(NULL, arg);
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	480 }
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	481
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	482 static void do_status_to(char *arg)
5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	483 {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	484 char **paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	485 char jid, st, *msg;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	486
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	487 paramlst = split_arg(arg, 3, 1); // jid, status, [message]
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	488 jid = *paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	489 st = *(paramlst+1);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	490 msg = *(paramlst+2);
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	491
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	492 if (!jid \|\| !st) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	493 scr_LogPrint(LPRINT_NORMAL, "Wrong usage");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	494 } else if (check_jid_syntax(jid)) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	495 scr_LogPrint(LPRINT_NORMAL, "<%s> is not a valid Jabber id", jid);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	496 } else {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	497 char *cmd;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	498 if (!msg)
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	499 msg = "";
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	500 mc_strtolower(jid);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	501 cmd = g_strdup_printf("%s %s", st, msg);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	502 scr_LogPrint(LPRINT_LOGNORM, "Sending to <%s> /status %s", jid, cmd);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	503 setstatus(jid, cmd);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	504 g_free(cmd);
444 5927c3bfba13 Add /status_to command Mikael Berthe <mikael@lilotux.net> parents: 439 diff changeset	505 }
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	506 free_arg_lst(paramlst);
116 1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	507 }
1e7e59775f12 [/trunk] Changeset 130 by mikael mikael parents: 113 diff changeset	508
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	509 static void do_add(char *arg)
124 6d2122c003c4 [/trunk] Changeset 137 by mikael mikael parents: 120 diff changeset	510 {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	511 char **paramlst;
244 5f8b529412bd [/trunk] Changeset 257 by mikael mikael parents: 240 diff changeset	512 char id, nick;
472 75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	513
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	514 if (!jb_getonline()) {
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	515 scr_LogPrint(LPRINT_NORMAL, "You are not connected");
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	516 return;
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	517 }
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	518
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	519 paramlst = split_arg(arg, 2, 0); // jid, [nickname]
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	520 id = *paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	521 nick = *(paramlst+1);
244 5f8b529412bd [/trunk] Changeset 257 by mikael mikael parents: 240 diff changeset	522
452 dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	523 if (check_jid_syntax(id)) {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	524 if (!id)
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	525 scr_LogPrint(LPRINT_NORMAL, "Wrong usage");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	526 else
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	527 scr_LogPrint(LPRINT_NORMAL, "<%s> is not a valid Jabber id", id);
452 dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	528 } else {
dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	529 mc_strtolower(id);
dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	530 // 2nd parameter = optional nickname
dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	531 jb_addbuddy(id, nick, NULL);
dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	532 scr_LogPrint(LPRINT_LOGNORM, "Sent presence notification request to <%s>",
dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	533 id);
dfd9c62b3a39 Jabber Id syntax checks Mikael Berthe <mikael@lilotux.net> parents: 449 diff changeset	534 }
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	535 free_arg_lst(paramlst);
124 6d2122c003c4 [/trunk] Changeset 137 by mikael mikael parents: 120 diff changeset	536 }
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	537
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	538 static void do_del(char *arg)
206 766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	539 {
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	540 const char *jid;
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	541
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	542 if (*arg) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	543 scr_LogPrint(LPRINT_NORMAL, "Wrong usage");
206 766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	544 return;
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	545 }
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	546
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	547 if (!current_buddy) return;
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	548 jid = buddy_getjid(BUDDATA(current_buddy));
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	549 if (!jid) return;
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	550
540 887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	551 if (buddy_gettype(BUDDATA(current_buddy)) & ROSTER_TYPE_ROOM) {
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	552 // This is a chatroom
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	553 // If there are resources, we haven't left
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	554 if (buddy_isresource(BUDDATA(current_buddy))) {
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	555 scr_LogPrint(LPRINT_NORMAL, "You haven't left this room!");
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	556 return;
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	557 }
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	558 }
887c1bd37617 Prevent deletion from rooms we haven't left Mikael Berthe <mikael@lilotux.net> parents: 539 diff changeset	559
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	560 scr_LogPrint(LPRINT_LOGNORM, "Removing <%s>...", jid);
206 766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	561 jb_delbuddy(jid);
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	562 }
766167c0c57f [/trunk] Changeset 218 by mikael mikael parents: 205 diff changeset	563
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	564 static void do_group(char *arg)
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	565 {
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	566 gpointer group;
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	567 guint leave_windowbuddy;
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	568
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	569 if (!*arg) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	570 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	571 return;
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	572 }
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	573
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	574 if (!current_buddy) return;
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	575
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	576 group = buddy_getgroup(BUDDATA(current_buddy));
212 465d98d2f8e3 [/trunk] Changeset 224 by mikael mikael parents: 210 diff changeset	577 // We'll have to redraw the chat window if we're not currently on the group
465d98d2f8e3 [/trunk] Changeset 224 by mikael mikael parents: 210 diff changeset	578 // entry itself, because it means we'll have to leave the current buddy
465d98d2f8e3 [/trunk] Changeset 224 by mikael mikael parents: 210 diff changeset	579 // chat window.
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	580 leave_windowbuddy = (group != BUDDATA(current_buddy));
aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	581
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	582 if (!(buddy_gettype(group) & ROSTER_TYPE_GROUP)) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	583 scr_LogPrint(LPRINT_NORMAL, "You need to select a group");
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	584 return;
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	585 }
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	586
aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	587 if (!strcasecmp(arg, "expand") \|\| !strcasecmp(arg, "unfold")) {
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	588 buddy_setflags(group, ROSTER_FLAG_HIDE, FALSE);
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	589 } else if (!strcasecmp(arg, "shrink") \|\| !strcasecmp(arg, "fold")) {
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	590 buddy_setflags(group, ROSTER_FLAG_HIDE, TRUE);
130 60694c9ddde3 [/trunk] Changeset 143 by mikael mikael parents: 129 diff changeset	591 } else if (!strcasecmp(arg, "toggle")) {
60694c9ddde3 [/trunk] Changeset 143 by mikael mikael parents: 129 diff changeset	592 buddy_setflags(group, ROSTER_FLAG_HIDE,
60694c9ddde3 [/trunk] Changeset 143 by mikael mikael parents: 129 diff changeset	593 !(buddy_getflags(group) & ROSTER_FLAG_HIDE));
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	594 } else {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	595 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	596 return;
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	597 }
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	598
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	599 buddylist_build();
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	600 update_roster = TRUE;
166 aa5b635520ef [/trunk] Changeset 178 by mikael mikael parents: 164 diff changeset	601 if (leave_windowbuddy) scr_ShowBuddyWindow();
128 81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	602 }
81ccb1091dd8 [/trunk] Changeset 141 by mikael mikael parents: 127 diff changeset	603
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	604 static void do_say(char *arg)
132 6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	605 {
164 faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	606 gpointer bud;
132 6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	607
6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	608 scr_set_chatmode(TRUE);
164 faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	609
faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	610 if (!current_buddy) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	611 scr_LogPrint(LPRINT_NORMAL, "Who are you talking to??");
164 faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	612 return;
132 6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	613 }
164 faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	614
faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	615 bud = BUDDATA(current_buddy);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	616 if (!(buddy_gettype(bud) & (ROSTER_TYPE_USER\|ROSTER_TYPE_ROOM))) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	617 scr_LogPrint(LPRINT_NORMAL, "This is not a user");
164 faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	618 return;
faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	619 }
faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	620
faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	621 buddy_setflags(bud, ROSTER_FLAG_LOCK, TRUE);
faf534be8ff0 [/trunk] Changeset 176 by mikael mikael parents: 132 diff changeset	622 send_message(arg);
132 6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	623 }
6531bcf030ae [/trunk] Changeset 145 by mikael mikael parents: 130 diff changeset	624
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	625 static void do_msay(char *arg)
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	626 {
260 33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	627 /* Parameters: begin verbatim abort send */
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	628 gpointer bud;
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	629
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	630 if (!strcasecmp(arg, "abort")) {
315 65aa05520556 First Ctrl-C now also leaves multi-line message mode Mikael Berthe <mikael@lilotux.net> parents: 310 diff changeset	631 if (scr_get_multimode())
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	632 scr_LogPrint(LPRINT_NORMAL, "Leaving multi-line message mode");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	633 scr_set_multimode(FALSE);
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	634 return;
260 33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	635 } else if ((!strcasecmp(arg, "begin")) \|\| (!strcasecmp(arg, "verbatim"))) {
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	636 if (!strcasecmp(arg, "verbatim"))
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	637 scr_set_multimode(2);
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	638 else
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	639 scr_set_multimode(1);
33e1a05864a6 Add "verbatim multi-line" mode, with commands disabled mikael@frmp8452 parents: 244 diff changeset	640
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	641 scr_LogPrint(LPRINT_NORMAL, "Entered multi-line message mode.");
bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	642 scr_LogPrint(LPRINT_NORMAL, "Select a buddy and use \"/msay send\" "
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	643 "when your message is ready.");
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	644 return;
446 9f4e9e9aaf08 Minor changes & cleanup Mikael Berthe <mikael@lilotux.net> parents: 444 diff changeset	645 } else if (!*arg) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	646 scr_LogPrint(LPRINT_NORMAL, "Please read the manual before using "
bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	647 "the /msay command.");
bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	648 scr_LogPrint(LPRINT_NORMAL, "(Use \"/msay begin\" to enter "
bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	649 "multi-line mode...)");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	650 return;
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	651 } else if (strcasecmp(arg, "send")) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	652 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	653 return;
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	654 }
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	655
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	656 // send command
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	657
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	658 if (!scr_get_multimode()) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	659 scr_LogPrint(LPRINT_NORMAL, "No message to send. "
bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	660 "Use \"/msay begin\" first.");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	661 return;
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	662 }
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	663
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	664 scr_set_chatmode(TRUE);
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	665
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	666 if (!current_buddy) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	667 scr_LogPrint(LPRINT_NORMAL, "Who are you talking to??");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	668 return;
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	669 }
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	670
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	671 bud = BUDDATA(current_buddy);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	672 if (!(buddy_gettype(bud) & (ROSTER_TYPE_USER\|ROSTER_TYPE_ROOM))) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	673 scr_LogPrint(LPRINT_NORMAL, "This is not a user");
238 8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	674 return;
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	675 }
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	676
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	677 buddy_setflags(bud, ROSTER_FLAG_LOCK, TRUE);
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	678 send_message(scr_get_multiline());
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	679 scr_set_multimode(FALSE);
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	680 }
8e30b2bb380e [/trunk] Changeset 251 by mikael mikael parents: 236 diff changeset	681
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	682 static void do_say_to(char *arg)
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	683 {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	684 char **paramlst;
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	685 char jid, msg;
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	686 char bare_jid, p;
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	687
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	688 if (!jb_getonline()) {
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	689 scr_LogPrint(LPRINT_NORMAL, "You are not connected");
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	690 return;
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	691 }
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	692
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	693 paramlst = split_arg(arg, 2, 1); // jid, message
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	694 jid = *paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	695 msg = *(paramlst+1);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	696
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	697 if (check_jid_syntax(jid)) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	698 if (!jid)
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	699 scr_LogPrint(LPRINT_NORMAL, "Wrong usage");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	700 else
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	701 scr_LogPrint(LPRINT_NORMAL, "<%s> is not a valid Jabber id", jid);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	702 free_arg_lst(paramlst);
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	703 return;
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	704 }
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	705
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	706 if (!msg \|\| !*msg) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	707 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	708 free_arg_lst(paramlst);
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	709 return;
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	710 }
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	711
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	712 // We must use the bare jid in hk_message_out()
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	713 p = strchr(jid, '/');
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	714 if (p) bare_jid = g_strndup(jid, p - jid);
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	715 else bare_jid = jid;
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	716
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	717 // Jump to window, create one if needed
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	718 scr_RosterJumpJid(bare_jid);
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	719
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	720 // Check if we're sending a message to a conference room
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	721 // If not, we must make sure p is NULL, for hk_message_out()
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	722 if (p) {
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	723 if (roster_find(bare_jid, jidsearch, ROSTER_TYPE_ROOM)) p++;
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	724 else p = NULL;
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	725 }
00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	726
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	727 // local part (UI, logging, etc.)
484 00e2d3821a5b Display PRIV for private messages in a room when using /say_to Mikael Berthe <mikael@lilotux.net> parents: 480 diff changeset	728 hk_message_out(bare_jid, p, 0, msg);
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	729
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	730 // Network part
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	731 jb_send_msg(jid, msg, ROSTER_TYPE_USER, NULL);
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	732
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	733 if (p) g_free(bare_jid);
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	734 free_arg_lst(paramlst);
480 882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	735 }
882e1acae422 Add /say_to command Mikael Berthe <mikael@lilotux.net> parents: 475 diff changeset	736
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	737 // buffer_updown(updown, nblines)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	738 // updown: -1=up, +1=down
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	739 inline static void buffer_updown(int updown, char *nlines)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	740 {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	741 int nblines;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	742
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	743 if (!nlines \|\| !*nlines)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	744 nblines = 0;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	745 else
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	746 nblines = atoi(nlines);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	747
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	748 if (nblines >= 0)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	749 scr_BufferScrollUpDown(updown, nblines);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	750 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	751
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	752 static void buffer_search(int direction, char *arg)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	753 {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	754 if (!arg \|\| !*arg) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	755 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	756 return;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	757 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	758
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	759 scr_BufferSearch(direction, arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	760 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	761
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	762 static void buffer_date(char *date)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	763 {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	764 time_t t;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	765
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	766 if (!date \|\| !*date) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	767 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	768 return;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	769 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	770
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	771 strip_arg_special_chars(date);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	772
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	773 t = from_iso8601(date, 0);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	774 if (t)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	775 scr_BufferDate(t);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	776 else
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	777 scr_LogPrint(LPRINT_NORMAL, "Wrong parameter");
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	778 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	779
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	780 static void buffer_percent(char arg1, char arg2)
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	781 {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	782 // Basically, user has typed "%arg1 arg2"
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	783 // "%50" -> arg1 = 50, arg2 null pointer
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	784 // "% 50" -> arg1 = \0, arg2 = 50
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	785
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	786 if (!arg1 && (!arg2 \|\| !arg2)) { // No value
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	787 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	788 return;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	789 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	790
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	791 if (arg1 && arg2 && arg2) { // Two values
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	792 scr_LogPrint(LPRINT_NORMAL, "Wrong parameters");
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	793 return;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	794 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	795
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	796 scr_BufferPercent(atoi((*arg1 ? arg1 : arg2)));
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	797 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	798
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	799 static void do_buffer(char *arg)
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	800 {
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	801 char **paramlst;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	802 char *subcmd;
370 dd9e2eb52916 Add /buffer search_{backward,forward} Mikael Berthe <mikael@lilotux.net> parents: 369 diff changeset	803
471 82a27508fb85 Fix segfaults when using /buffer and /room while not connected Mikael Berthe <mikael@lilotux.net> parents: 470 diff changeset	804 if (!current_buddy) return;
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	805
446 9f4e9e9aaf08 Minor changes & cleanup Mikael Berthe <mikael@lilotux.net> parents: 444 diff changeset	806 if (buddy_gettype(BUDDATA(current_buddy)) & ROSTER_TYPE_GROUP) {
9f4e9e9aaf08 Minor changes & cleanup Mikael Berthe <mikael@lilotux.net> parents: 444 diff changeset	807 scr_LogPrint(LPRINT_NORMAL, "Groups have no buffer");
9f4e9e9aaf08 Minor changes & cleanup Mikael Berthe <mikael@lilotux.net> parents: 444 diff changeset	808 return;
9f4e9e9aaf08 Minor changes & cleanup Mikael Berthe <mikael@lilotux.net> parents: 444 diff changeset	809 }
9f4e9e9aaf08 Minor changes & cleanup Mikael Berthe <mikael@lilotux.net> parents: 444 diff changeset	810
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	811 paramlst = split_arg(arg, 2, 1); // subcmd, arg
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	812 subcmd = *paramlst;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	813 arg = *(paramlst+1);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	814
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	815 if (!subcmd \|\| !*subcmd) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	816 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	817 free_arg_lst(paramlst);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	818 return;
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	819 }
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	820
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	821 if (!strcasecmp(subcmd, "top")) {
361 51ff319947c3 Code cleanup/optimization Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	822 scr_BufferTopBottom(-1);
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	823 } else if (!strcasecmp(subcmd, "bottom")) {
361 51ff319947c3 Code cleanup/optimization Mikael Berthe <mikael@lilotux.net> parents: 336 diff changeset	824 scr_BufferTopBottom(1);
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	825 } else if (!strcasecmp(subcmd, "clear")) {
369 499170ed71c9 Rename some buffer commands, for homogeneity Mikael Berthe <mikael@lilotux.net> parents: 364 diff changeset	826 scr_BufferClear();
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	827 } else if (!strcasecmp(subcmd, "up")) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	828 buffer_updown(-1, arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	829 } else if (!strcasecmp(subcmd, "down")) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	830 buffer_updown(1, arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	831 } else if (!strcasecmp(subcmd, "search_backward")) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	832 buffer_search(-1, arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	833 } else if (!strcasecmp(subcmd, "search_forward")) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	834 buffer_search(1, arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	835 } else if (!strcasecmp(subcmd, "date")) {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	836 buffer_date(arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	837 } else if (*subcmd == '%') {
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	838 buffer_percent(subcmd+1, arg);
db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	839 } else {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	840 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	841 }
370 dd9e2eb52916 Add /buffer search_{backward,forward} Mikael Berthe <mikael@lilotux.net> parents: 369 diff changeset	842
558 db019a5f874f Split do_buffer() and use split_arg() Mikael Berthe <mikael@lilotux.net> parents: 557 diff changeset	843 free_arg_lst(paramlst);
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	844 }
4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	845
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	846 static void do_clear(char *arg) // Alias for "/buffer clear"
187 4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	847 {
4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	848 do_buffer("clear");
4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	849 }
4ce9ff808baa [/trunk] Changeset 199 by mikael mikael parents: 166 diff changeset	850
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	851 static void do_info(char *arg)
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	852 {
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	853 gpointer bud;
439 63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	854 const char jid, name;
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	855 guint type;
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	856 char *buffer;
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	857
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	858 if (!current_buddy) return;
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	859 bud = BUDDATA(current_buddy);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	860
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	861 jid = buddy_getjid(bud);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	862 name = buddy_getname(bud);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	863 type = buddy_gettype(bud);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	864
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	865 buffer = g_new(char, 128);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	866
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	867 if (jid) {
439 63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	868 GSList *resources;
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	869 char *typestr = "unknown";
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	870
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	871 snprintf(buffer, 127, "jid: <%s>", jid);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	872 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	873 if (name) {
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	874 snprintf(buffer, 127, "Name: %s", name);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	875 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	876 }
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	877
439 63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	878 if (type == ROSTER_TYPE_USER) typestr = "user";
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	879 else if (type == ROSTER_TYPE_ROOM) typestr = "chatroom";
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	880 else if (type == ROSTER_TYPE_AGENT) typestr = "agent";
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	881 snprintf(buffer, 127, "Type: %s", typestr);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	882 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
439 63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	883
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	884 resources = buddy_getresources(bud);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	885 for ( ; resources ; resources = g_slist_next(resources) ) {
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	886 gchar rprio;
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	887 enum imstatus rstatus;
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	888 const char *rst_msg;
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	889
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	890 rprio = buddy_getresourceprio(bud, resources->data);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	891 rstatus = buddy_getstatus(bud, resources->data);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	892 rst_msg = buddy_getstatusmsg(bud, resources->data);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	893
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	894 snprintf(buffer, 127, "Resource: [%c] (%d) %s", imstatus2char[rstatus],
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	895 rprio, (char*)resources->data);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	896 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	897 if (rst_msg) {
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	898 snprintf(buffer, 127, "Status message: %s", rst_msg);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	899 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	900 }
63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	901 }
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	902 } else {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	903 if (name) scr_LogPrint(LPRINT_NORMAL, "Name: %s", name);
bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	904 scr_LogPrint(LPRINT_NORMAL, "Type: %s",
439 63562fd409a1 /info can show multiple resources Mikael Berthe <mikael@lilotux.net> parents: 438 diff changeset	905 ((type == ROSTER_TYPE_GROUP) ? "group" : "unknown"));
191 24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	906 }
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	907
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	908 g_free(buffer);
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	909 }
24e6bcb589b0 [/trunk] Changeset 203 by mikael mikael parents: 187 diff changeset	910
504 321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	911 // room_names() is a variation of do_info(), for chatrooms only
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	912 static void room_names(gpointer bud, char *arg)
504 321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	913 {
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	914 const char *jid;
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	915 char *buffer;
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	916 GSList *resources;
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	917
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	918 if (*arg) {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	919 scr_LogPrint(LPRINT_NORMAL, "Unknown parameter");
504 321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	920 return;
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	921 }
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	922
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	923 jid = buddy_getjid(bud);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	924
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	925 buffer = g_new(char, 128);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	926 snprintf(buffer, 127, "Room members:");
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	927 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	928
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	929 resources = buddy_getresources(bud);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	930 for ( ; resources ; resources = g_slist_next(resources) ) {
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	931 enum imstatus rstatus;
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	932 const char *rst_msg;
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	933
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	934 rstatus = buddy_getstatus(bud, resources->data);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	935 rst_msg = buddy_getstatusmsg(bud, resources->data);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	936
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	937 snprintf(buffer, 127, "[%c] %s", imstatus2char[rstatus],
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	938 (char*)resources->data);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	939 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	940 if (rst_msg) {
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	941 snprintf(buffer, 127, "Status message: %s", rst_msg);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	942 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	943 }
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	944 }
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	945
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	946 g_free(buffer);
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	947 }
321ae11e7ddb Prettier display for "/room names" Mikael Berthe <mikael@lilotux.net> parents: 490 diff changeset	948
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	949 static void do_rename(char *arg)
208 8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	950 {
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	951 gpointer bud;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	952 const char jid, group;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	953 guint type;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	954 char newname, p;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	955
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	956 if (!*arg) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	957 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
208 8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	958 return;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	959 }
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	960
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	961 if (!current_buddy) return;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	962 bud = BUDDATA(current_buddy);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	963
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	964 jid = buddy_getjid(bud);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	965 group = buddy_getgroupname(bud);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	966 type = buddy_gettype(bud);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	967
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	968 if (type & ROSTER_TYPE_GROUP) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	969 scr_LogPrint(LPRINT_NORMAL, "You can't rename groups");
208 8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	970 return;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	971 }
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	972
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	973 newname = g_strdup(arg);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	974 // Remove trailing space
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	975 for (p = newname; *p; p++) ;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	976 while (p > newname && p == ' ') p = 0;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	977
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	978 strip_arg_special_chars(newname);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	979
208 8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	980 buddy_setname(bud, newname);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	981 jb_updatebuddy(jid, newname, group);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	982
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	983 g_free(newname);
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	984 update_roster = TRUE;
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	985 }
8b08f34922c5 [/trunk] Changeset 220 by mikael mikael parents: 206 diff changeset	986
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	987 static void do_move(char *arg)
210 f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	988 {
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	989 gpointer bud;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	990 const char jid, name;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	991 guint type;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	992 char newgroupname, p;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	993
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	994 if (!current_buddy) return;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	995 bud = BUDDATA(current_buddy);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	996
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	997 jid = buddy_getjid(bud);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	998 name = buddy_getname(bud);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	999 type = buddy_gettype(bud);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1000
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1001 if (type & ROSTER_TYPE_GROUP) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1002 scr_LogPrint(LPRINT_NORMAL, "You can't move groups!");
210 f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1003 return;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1004 }
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1005
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1006 newgroupname = g_strdup(arg);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1007 // Remove trailing space
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1008 for (p = newgroupname; *p; p++) ;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1009 while (p > newgroupname && p == ' ') p = 0;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1010
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1011 strip_arg_special_chars(newgroupname);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1012
210 f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1013 // Call to buddy_setgroup() should be at the end, as current implementation
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1014 // clones the buddy and deletes the old one (and thus, jid and name are
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1015 // freed)
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1016 jb_updatebuddy(jid, name, newgroupname);
506 74dcd0df532e "/move" does not jump to the buddy in the new group Mikael Berthe <mikael@lilotux.net> parents: 504 diff changeset	1017 scr_RosterUp();
210 f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1018 buddy_setgroup(bud, newgroupname);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1019
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1020 g_free(newgroupname);
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1021 update_roster = TRUE;
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1022 }
f64818ba3503 [/trunk] Changeset 222 by mikael mikael parents: 208 diff changeset	1023
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	1024 static void do_set(char *arg)
283 00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1025 {
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1026 guint assign;
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1027 const gchar option, value;
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 384 diff changeset	1028
283 00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1029 assign = parse_assigment(arg, &option, &value);
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1030 if (!option) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1031 scr_LogPrint(LPRINT_NORMAL, "Huh?");
283 00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1032 return;
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1033 }
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1034 if (!assign) {
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1035 // This is a query
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1036 value = settings_opt_get(option);
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1037 if (value) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1038 scr_LogPrint(LPRINT_NORMAL, "%s = [%s]", option, value);
283 00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1039 } else
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1040 scr_LogPrint(LPRINT_NORMAL, "Option %s is not set", option);
283 00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1041 return;
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1042 }
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1043 // Update the option
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1044 // XXX Maybe some options should be protected when user is connected
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1045 // (server, username, etc.). And we should catch some options here, too
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1046 // (hide_offline_buddies for ex.)
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1047 if (!value) {
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1048 settings_del(SETTINGS_TYPE_OPTION, option);
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1049 } else {
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1050 settings_set(SETTINGS_TYPE_OPTION, option, value);
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1051 }
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1052 }
00b2377539ac Add /set command (to get/set/unset options values) Mikael Berthe <mikael@lilotux.net> parents: 277 diff changeset	1053
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	1054 static void do_alias(char *arg)
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1055 {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1056 guint assign;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1057 const gchar alias, value;
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 384 diff changeset	1058
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1059 assign = parse_assigment(arg, &alias, &value);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1060 if (!alias) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1061 scr_LogPrint(LPRINT_NORMAL, "Huh?");
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1062 return;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1063 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1064 if (!assign) {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1065 // This is a query
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1066 value = settings_get(SETTINGS_TYPE_ALIAS, alias);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1067 if (value) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1068 scr_LogPrint(LPRINT_NORMAL, "%s = %s", alias, value);
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1069 } else
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1070 scr_LogPrint(LPRINT_NORMAL, "Alias '%s' does not exist", alias);
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1071 return;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1072 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1073 // Check the alias does not conflict with a registered command
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1074 if (cmd_get(alias)) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1075 scr_LogPrint(LPRINT_NORMAL, "'%s' is a reserved word!", alias);
285 edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1076 return;
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1077 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1078 // Update the alias
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1079 if (!value) {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1080 if (settings_get(SETTINGS_TYPE_ALIAS, alias)) {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1081 settings_del(SETTINGS_TYPE_ALIAS, alias);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1082 // Remove alias from the completion list
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1083 compl_del_category_word(COMPL_CMD, alias);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1084 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1085 } else {
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1086 // Add alias to the completion list, if not already in
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1087 if (!settings_get(SETTINGS_TYPE_ALIAS, alias))
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1088 compl_add_category_word(COMPL_CMD, alias);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1089 settings_set(SETTINGS_TYPE_ALIAS, alias, value);
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1090 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1091 }
edc263a5d350 Add /alias command Mikael Berthe <mikael@lilotux.net> parents: 283 diff changeset	1092
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	1093 static void do_bind(char *arg)
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1094 {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1095 guint assign;
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1096 const gchar keycode, value;
393 f8f3c7493457 Whitespace cleanup Mikael Berthe <mikael@lilotux.net> parents: 384 diff changeset	1097
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1098 assign = parse_assigment(arg, &keycode, &value);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1099 if (!keycode) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1100 scr_LogPrint(LPRINT_NORMAL, "Huh?");
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1101 return;
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1102 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1103 if (!assign) {
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1104 // This is a query
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1105 value = settings_get(SETTINGS_TYPE_BINDING, keycode);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1106 if (value) {
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1107 scr_LogPrint(LPRINT_NORMAL, "Key %s is bound to: %s", keycode, value);
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1108 } else
374 bd5638c21834 Improve logging system (traces) Mikael Berthe <mikael@lilotux.net> parents: 371 diff changeset	1109 scr_LogPrint(LPRINT_NORMAL, "Key %s is not bound", keycode);
288 1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1110 return;
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1111 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1112 // Update the key binding
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1113 if (!value)
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1114 settings_del(SETTINGS_TYPE_BINDING, keycode);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1115 else
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1116 settings_set(SETTINGS_TYPE_BINDING, keycode, value);
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1117 }
1eea0fa0955e Add /bind command Mikael Berthe <mikael@lilotux.net> parents: 285 diff changeset	1118
436 802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	1119 static void do_rawxml(char *arg)
802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	1120 {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1121 char **paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1122 char *subcmd;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1123
472 75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1124 if (!jb_getonline()) {
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1125 scr_LogPrint(LPRINT_NORMAL, "You are not connected");
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1126 return;
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1127 }
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1128
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1129 paramlst = split_arg(arg, 2, 1); // subcmd, arg
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1130 subcmd = *paramlst;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1131 arg = *(paramlst+1);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1132
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1133 if (!subcmd \|\| !*subcmd) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1134 scr_LogPrint(LPRINT_NORMAL, "Please read the manual page"
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1135 " before using /rawxml :-)");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1136 free_arg_lst(paramlst);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1137 return;
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1138 }
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1139
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1140 if (!strcasecmp(subcmd, "send")) {
461 1d8f5b3a5f2b Convert /rawxml argument to UTF8 Mikael Berthe <mikael@lilotux.net> parents: 454 diff changeset	1141 gchar *buffer;
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1142
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1143 if (!subcmd \|\| !*subcmd) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1144 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1145 free_arg_lst(paramlst);
461 1d8f5b3a5f2b Convert /rawxml argument to UTF8 Mikael Berthe <mikael@lilotux.net> parents: 454 diff changeset	1146 return;
1d8f5b3a5f2b Convert /rawxml argument to UTF8 Mikael Berthe <mikael@lilotux.net> parents: 454 diff changeset	1147 }
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1148
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1149 // We don't strip_arg_special_chars() here, because it would be a pain for
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1150 // the user to escape quotes in a XML stream...
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1151
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1152 buffer = to_utf8(arg);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1153 if (buffer) {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1154 scr_LogPrint(LPRINT_NORMAL, "Sending XML string");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1155 jb_send_raw(buffer);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1156 g_free(buffer);
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1157 } else {
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1158 scr_LogPrint(LPRINT_NORMAL, "Conversion error in XML string");
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1159 }
436 802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	1160 } else {
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1161 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
436 802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	1162 }
557 c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1163
c72a66dfd2d4 Use split_arg() in most commands Mikael Berthe <mikael@lilotux.net> parents: 555 diff changeset	1164 free_arg_lst(paramlst);
436 802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	1165 }
802da817a684 Add /rawxml command Mikael Berthe <mikael@lilotux.net> parents: 416 diff changeset	1166
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1167 // check_room_subcommand(arg, param_needed, buddy_must_be_a_room)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1168 // - Check if this is a room, if buddy_must_be_a_room is not null
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1169 // - Check there is at least 1 parameter, if param_needed is true
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1170 // - Return null if one of the checks fails, or a pointer to the first
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1171 // non-space character.
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1172 static char check_room_subcommand(char arg, bool param_needed,
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1173 gpointer buddy_must_be_a_room)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1174 {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1175 if (buddy_must_be_a_room &&
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1176 !(buddy_gettype(buddy_must_be_a_room) & ROSTER_TYPE_ROOM)) {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1177 scr_LogPrint(LPRINT_NORMAL, "This isn't a chatroom");
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1178 return NULL;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1179 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1180
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1181 if (param_needed) {
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1182 if (!arg) {
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1183 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1184 return NULL;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1185 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1186 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1187
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1188 if (arg)
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1189 return arg;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1190 else
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1191 return "";
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1192 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1193
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1194 static void room_join(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1195 {
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1196 char **paramlst;
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1197 char roomname, nick;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1198
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1199 paramlst = split_arg(arg, 2, 0); // roomid, nickname
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1200 roomname = *paramlst;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1201 nick = *(paramlst+1);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1202
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1203
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1204 if (!roomname \|\| strchr(roomname, '/')) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1205 scr_LogPrint(LPRINT_NORMAL, "Invalid room name");
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1206 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1207 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1208 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1209
565 89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1210 if (!nick \|\| !*nick) {
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1211 scr_LogPrint(LPRINT_NORMAL, "Missing parameter (nickname)");
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1212 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1213 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1214 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1215
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1216 // Note that roomname is part of the array allocated by split_arg(),
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1217 // so we can modify it.
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1218 mc_strtolower(roomname);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1219 jb_room_join(roomname, nick);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1220
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1221 buddylist_build();
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1222 update_roster = TRUE;
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1223 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1224 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1225
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1226 static void room_invite(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1227 {
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1228 char **paramlst;
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1229 const gchar *roomname;
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1230 char* jid;
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1231
570 29806b0fe830 Some parsing improvements Mikael Berthe <mikael@lilotux.net> parents: 568 diff changeset	1232 paramlst = split_arg(arg, 2, 1); // jid, [reason]
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1233 jid = *paramlst;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1234 arg = *(paramlst+1);
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1235 // An empty reason is no reason...
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1236 if (arg && !*arg)
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1237 arg = NULL;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1238
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1239 if (!jid \|\| !*jid) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1240 scr_LogPrint(LPRINT_NORMAL, "Missing or incorrect parameter");
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1241 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1242 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1243 }
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1244
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1245 roomname = buddy_getjid(bud);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1246 jb_room_invite(roomname, jid, arg);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1247 scr_LogPrint(LPRINT_LOGNORM, "Invitation sent to <%s>", jid);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1248 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1249 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1250
585 7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1251 static void room_affil(gpointer bud, char *arg)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1252 {
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1253 char **paramlst;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1254 gchar jid, rolename;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1255 struct role_affil ra;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1256 const char *roomid = buddy_getjid(bud);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1257
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1258 paramlst = split_arg(arg, 3, 1); // jid, new_affil, [reason]
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1259 jid = *paramlst;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1260 rolename = *(paramlst+1);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1261 arg = *(paramlst+2);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1262
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1263 if (!jid \|\| !jid \|\| !rolename \|\| !rolename) {
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1264 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1265 free_arg_lst(paramlst);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1266 return;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1267 }
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1268
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1269 ra.type = type_affil;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1270 ra.val.affil = affil_none;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1271 for (; ra.val.affil < imaffiliation_size; ra.val.affil++)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1272 if (!strcasecmp(rolename, straffil[ra.val.affil]))
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1273 break;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1274
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1275 if (ra.val.affil < imaffiliation_size)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1276 jb_room_setattrib(roomid, jid, NULL, ra, arg);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1277 else
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1278 scr_LogPrint(LPRINT_NORMAL, "Wrong affiliation parameter");
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1279
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1280 free_arg_lst(paramlst);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1281 }
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1282
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1283 static void room_role(gpointer bud, char *arg)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1284 {
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1285 char **paramlst;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1286 gchar jid, rolename;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1287 struct role_affil ra;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1288 const char *roomid = buddy_getjid(bud);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1289
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1290 paramlst = split_arg(arg, 3, 1); // jid, new_role, [reason]
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1291 jid = *paramlst;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1292 rolename = *(paramlst+1);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1293 arg = *(paramlst+2);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1294
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1295 if (!jid \|\| !jid \|\| !rolename \|\| !rolename) {
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1296 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1297 free_arg_lst(paramlst);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1298 return;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1299 }
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1300
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1301 ra.type = type_role;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1302 ra.val.role = role_none;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1303 for (; ra.val.role < imrole_size; ra.val.role++)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1304 if (!strcasecmp(rolename, strrole[ra.val.role]))
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1305 break;
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1306
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1307 if (ra.val.role < imrole_size)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1308 jb_room_setattrib(roomid, jid, NULL, ra, arg);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1309 else
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1310 scr_LogPrint(LPRINT_NORMAL, "Wrong role parameter");
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1311
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1312 free_arg_lst(paramlst);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1313 }
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1314
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1315
571 d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1316 // The expected argument is a Jabber id
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1317 static void room_ban(gpointer bud, char *arg)
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1318 {
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1319 char **paramlst;
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1320 gchar *jid;
584 414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1321 struct role_affil ra;
571 d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1322 const char *roomid = buddy_getjid(bud);
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1323
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1324 paramlst = split_arg(arg, 2, 1); // jid, [reason]
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1325 jid = *paramlst;
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1326 arg = *(paramlst+1);
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1327
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1328 if (!jid \|\| !*jid) {
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1329 scr_LogPrint(LPRINT_NORMAL, "Missing parameter (Jabber id)");
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1330 free_arg_lst(paramlst);
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1331 return;
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1332 }
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1333
584 414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1334 ra.type = type_affil;
414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1335 ra.val.affil = affil_outcast;
414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1336
414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1337 jb_room_setattrib(roomid, jid, NULL, ra, arg);
571 d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1338
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1339 free_arg_lst(paramlst);
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1340 }
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1341
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1342 // The expected argument is a nickname
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1343 static void room_kick(gpointer bud, char *arg)
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1344 {
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1345 char **paramlst;
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1346 gchar *nick;
584 414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1347 struct role_affil ra;
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1348 const char *roomid = buddy_getjid(bud);
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1349
571 d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1350 paramlst = split_arg(arg, 2, 1); // nickname, [reason]
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1351 nick = *paramlst;
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1352 arg = *(paramlst+1);
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1353
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1354 if (!nick \|\| !*nick) {
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1355 scr_LogPrint(LPRINT_NORMAL, "Missing parameter (nickname)");
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1356 free_arg_lst(paramlst);
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1357 return;
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1358 }
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1359
584 414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1360 ra.type = type_role;
414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1361 ra.val.affil = role_none;
414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1362
414fbf558f1e jb_room_setattrib() Mikael Berthe <mikael@lilotux.net> parents: 580 diff changeset	1363 jb_room_setattrib(roomid, NULL, nick, ra, arg);
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1364
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1365 free_arg_lst(paramlst);
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1366 }
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1367
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1368 static void room_leave(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1369 {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1370 gchar roomid, utf8_nickname;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1371
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1372 utf8_nickname = to_utf8(buddy_getnickname(bud));
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1373 roomid = g_strdup_printf("%s/%s", buddy_getjid(bud), utf8_nickname);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1374 jb_setstatus(offline, roomid, arg);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1375 g_free(utf8_nickname);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1376 g_free(roomid);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1377 buddy_setnickname(bud, NULL);
566 467fec046a9b MUC: Reset topic when leaving a room Mikael Berthe <mikael@lilotux.net> parents: 565 diff changeset	1378 buddy_settopic(bud, NULL);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1379 buddy_del_all_resources(bud);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1380 scr_LogPrint(LPRINT_LOGNORM, "You have left %s", buddy_getjid(bud));
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1381 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1382
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1383 static void room_nick(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1384 {
565 89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1385 if (!arg \|\| !*arg) {
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1386 const char *nick = buddy_getnickname(bud);
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1387 if (nick)
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1388 scr_LogPrint(LPRINT_NORMAL, "Your nickname is: %s", nick);
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1389 else
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1390 scr_LogPrint(LPRINT_NORMAL, "You have no nickname");
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1391 } else {
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1392 gchar *cmd;
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1393 cmd = g_strdup_printf("%s %s", buddy_getjid(bud), arg);
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1394 room_join(bud, cmd);
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1395 g_free(cmd);
89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1396 }
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1397 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1398
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1399 static void room_privmsg(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1400 {
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1401 char **paramlst;
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1402 gchar nick, cmd;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1403
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1404 paramlst = split_arg(arg, 2, 0); // nickname, message
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1405 nick = *paramlst;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1406 arg = *(paramlst+1);
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1407
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1408 if (!nick \|\| !nick \|\| !arg \|\| !arg) {
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1409 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1410 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1411 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1412 }
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1413
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1414 cmd = g_strdup_printf("%s/%s %s", buddy_getjid(bud), nick, arg);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1415 do_say_to(cmd);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1416 g_free(cmd);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1417 free_arg_lst(paramlst);
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1418 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1419
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1420 static void room_remove(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1421 {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1422 if (*arg) {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1423 scr_LogPrint(LPRINT_NORMAL, "Unknown parameter");
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1424 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1425 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1426
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1427 // Quick check: if there are resources, we haven't left
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1428 if (buddy_isresource(bud)) {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1429 scr_LogPrint(LPRINT_NORMAL, "You haven't left this room!");
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1430 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1431 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1432 // Delete the room
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1433 roster_del_user(buddy_getjid(bud));
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1434 buddylist_build();
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1435 update_roster = TRUE;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1436 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1437
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1438 static void room_topic(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1439 {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1440 gchar *msg;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1441
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1442 // If no parameter is given, display the current topic
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1443 if (!*arg) {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1444 const char *topic = buddy_gettopic(bud);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1445 if (topic)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1446 scr_LogPrint(LPRINT_NORMAL, "Topic: %s", topic);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1447 else
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1448 scr_LogPrint(LPRINT_NORMAL, "No topic has been set");
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1449 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1450 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1451
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1452 // Set the topic
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1453 msg = g_strdup_printf("/me has set the topic to: %s", arg);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1454 jb_send_msg(buddy_getjid(bud), msg, ROSTER_TYPE_ROOM, arg);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1455 g_free(msg);
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1456 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1457
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1458 static void room_unlock(gpointer bud, char *arg)
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1459 {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1460 if (*arg) {
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1461 scr_LogPrint(LPRINT_NORMAL, "Unknown parameter");
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1462 return;
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1463 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1464
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1465 jb_room_unlock(buddy_getjid(bud));
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1466 }
ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1467
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1468 static void room_whois(gpointer bud, char *arg)
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1469 {
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1470 char **paramlst;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1471 gchar nick, buffer;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1472 const char jid, realjid;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1473 const char *rst_msg;
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1474 gchar rprio;
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1475 enum imstatus rstatus;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1476 enum imrole role;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1477 enum imaffiliation affil;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1478
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1479 char *strroles[] = { "none", "moderator", "participant", "visitor" };
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1480 char *straffil[] = { "none", "owner", "admin", "member", "outcast" };
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1481
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1482 paramlst = split_arg(arg, 1, 0); // nickname
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1483 nick = *paramlst;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1484
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1485 if (!nick \|\| !*nick) {
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1486 scr_LogPrint(LPRINT_NORMAL, "Missing parameter (nickname)");
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1487 free_arg_lst(paramlst);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1488 return;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1489 }
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1490
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1491 jid = buddy_getjid(bud);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1492 rstatus = buddy_getstatus(bud, nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1493
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1494 if (rstatus == offline) {
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1495 scr_LogPrint(LPRINT_NORMAL, "No such member: %s", nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1496 free_arg_lst(paramlst);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1497 return;
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1498 }
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1499
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1500 rprio = buddy_getresourceprio(bud, nick);
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1501 rst_msg = buddy_getstatusmsg(bud, nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1502 if (!rst_msg) rst_msg = "";
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1503
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1504 role = buddy_getrole(bud, nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1505 affil = buddy_getaffil(bud, nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1506 realjid = buddy_getrjid(bud, nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1507
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1508 buffer = g_new(char, 128);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1509
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1510 snprintf(buffer, 127, "Whois [%s]", nick);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1511 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1512 snprintf(buffer, 127, "Status : [%c] %s", imstatus2char[rstatus],
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1513 rst_msg);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1514 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1515
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1516 if (realjid) {
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1517 snprintf(buffer, 127, "JID : <%s>", realjid);
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1518 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1519 }
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1520
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1521 snprintf(buffer, 127, "Role : %s", strroles[role]);
1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1522 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1523 snprintf(buffer, 127, "Affiliat.: %s", straffil[affil]);
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1524 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1525 snprintf(buffer, 127, "Priority : %d", rprio);
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1526 scr_WriteIncomingMessage(jid, buffer, 0, HBB_PREFIX_INFO);
575 1b8e024c3a10 Improve /room whois Mikael Berthe <mikael@lilotux.net> parents: 572 diff changeset	1527 scr_WriteIncomingMessage(jid, "End of WHOIS", 0, HBB_PREFIX_INFO);
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1528
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1529 g_free(buffer);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1530 free_arg_lst(paramlst);
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1531 }
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1532
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1533 static void do_room(char *arg)
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1534 {
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1535 char **paramlst;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1536 char *subcmd;
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1537 gpointer bud;
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1538
472 75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1539 if (!jb_getonline()) {
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1540 scr_LogPrint(LPRINT_NORMAL, "You are not connected");
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1541 return;
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1542 }
75442262c082 Disable some commands when not connected Mikael Berthe <mikael@lilotux.net> parents: 471 diff changeset	1543
471 82a27508fb85 Fix segfaults when using /buffer and /room while not connected Mikael Berthe <mikael@lilotux.net> parents: 470 diff changeset	1544 if (!current_buddy) return;
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1545 bud = BUDDATA(current_buddy);
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1546
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1547 paramlst = split_arg(arg, 2, 1); // subcmd, arg
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1548 subcmd = *paramlst;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1549 arg = *(paramlst+1);
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1550
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1551 if (!subcmd \|\| !*subcmd) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1552 scr_LogPrint(LPRINT_NORMAL, "Missing parameter");
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1553 free_arg_lst(paramlst);
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1554 return;
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1555 }
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1556
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1557 if (!strcasecmp(subcmd, "join")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1558 if ((arg = check_room_subcommand(arg, TRUE, NULL)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1559 room_join(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1560 } else if (!strcasecmp(subcmd, "invite")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1561 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1562 room_invite(bud, arg);
585 7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1563 } else if (!strcasecmp(subcmd, "affil")) {
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1564 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1565 room_affil(bud, arg);
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1566 } else if (!strcasecmp(subcmd, "role")) {
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1567 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
7eff2c1481fa Add "/room affil" and "/room role" Mikael Berthe <mikael@lilotux.net> parents: 584 diff changeset	1568 room_role(bud, arg);
571 d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1569 } else if (!strcasecmp(subcmd, "ban")) {
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1570 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
d63e6cbdc297 Add "/room ban" Mikael Berthe <mikael@lilotux.net> parents: 570 diff changeset	1571 room_ban(bud, arg);
568 eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1572 } else if (!strcasecmp(subcmd, "kick")) {
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1573 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
eb1df2371581 Add "/room kick" Mikael Berthe <mikael@lilotux.net> parents: 566 diff changeset	1574 room_kick(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1575 } else if (!strcasecmp(subcmd, "leave")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1576 if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1577 room_leave(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1578 } else if (!strcasecmp(subcmd, "names")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1579 if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1580 room_names(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1581 } else if (!strcasecmp(subcmd, "nick")) {
565 89c347b3e4c1 MUC: Make "/room nick" display the current nickname Mikael Berthe <mikael@lilotux.net> parents: 558 diff changeset	1582 if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1583 room_nick(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1584 } else if (!strcasecmp(subcmd, "privmsg")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1585 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1586 room_privmsg(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1587 } else if (!strcasecmp(subcmd, "remove")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1588 if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1589 room_remove(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1590 } else if (!strcasecmp(subcmd, "unlock")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1591 if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1592 room_unlock(bud, arg);
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1593 } else if (!strcasecmp(subcmd, "topic")) {
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1594 if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL)
552 ba5271b49f21 Split do_room() Mikael Berthe <mikael@lilotux.net> parents: 549 diff changeset	1595 room_topic(bud, arg);
572 afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1596 } else if (!strcasecmp(subcmd, "whois")) {
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1597 if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL)
afc2bd38b15c Implement affiliations handling, add "/room whois" Mikael Berthe <mikael@lilotux.net> parents: 571 diff changeset	1598 room_whois(bud, arg);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1599 } else {
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1600 scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!");
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1601 }
554 2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1602
2424bbf0a6db Some more work on do_room() Mikael Berthe <mikael@lilotux.net> parents: 552 diff changeset	1603 free_arg_lst(paramlst);
447 03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1604 }
03bb57383cea Initial Multi-User Chat support Mikael Berthe <mikael@lilotux.net> parents: 446 diff changeset	1605
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	1606 static void do_connect(char *arg)
298 35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1607 {
35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1608 mcabber_connect();
35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1609 }
35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1610
336 eb994ee40029 Make some functions static Mikael Berthe <mikael@lilotux.net> parents: 330 diff changeset	1611 static void do_disconnect(char *arg)
298 35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1612 {
35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1613 jb_disconnect();
35cda94e570d Add /connect and /disconnect commands Mikael Berthe <mikael@lilotux.net> parents: 290 diff changeset	1614 }
576 8b3db0b555a1 Add Vim modelines Mikael Berthe <mikael@lilotux.net> parents: 575 diff changeset	1615
580 fed6d1e4d7a9 Fix modelines Mikael Berthe <mikael@lilotux.net> parents: 576 diff changeset	1616 /* vim: set expandtab cindent cinoptions=>2\:2(0: For Vim users... */

Mercurial > ~mikael > mcabber > hg

annotate mcabber/src/commands.c @ 585:7eff2c1481fa