Mercurial > hg
view mcabber/src/commands.c @ 1363:32077249de77
Warn if a MUC room without bookmark is renamed
author | Mikael Berthe <mikael@lilotux.net> |
---|---|
date | Sun, 11 Nov 2007 18:49:43 +0100 |
parents | 9ee58f91d19e |
children | c7e709719c43 |
line wrap: on
line source
/* * commands.c -- user commands handling * * Copyright (C) 2005-2007 Mikael Berthe <mikael@lilotux.net> * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or (at * your option) any later version. * * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 * USA */ #include <string.h> #include "commands.h" #include "help.h" #include "jabglue.h" #include "roster.h" #include "screen.h" #include "compl.h" #include "hooks.h" #include "hbuf.h" #include "utils.h" #include "settings.h" #include "events.h" #include "otr.h" #define IMSTATUS_AWAY "away" #define IMSTATUS_ONLINE "online" #define IMSTATUS_OFFLINE "offline" #define IMSTATUS_FREE4CHAT "free" #define IMSTATUS_INVISIBLE "invisible" #define IMSTATUS_AVAILABLE "avail" #define IMSTATUS_NOTAVAILABLE "notavail" #define IMSTATUS_DONOTDISTURB "dnd" // Return value container for the following functions static int retval_for_cmds; // Commands callbacks static void do_roster(char *arg); static void do_status(char *arg); static void do_status_to(char *arg); static void do_add(char *arg); static void do_del(char *arg); static void do_group(char *arg); static void do_say(char *arg); static void do_msay(char *arg); static void do_say_to(char *arg); static void do_buffer(char *arg); static void do_clear(char *arg); static void do_info(char *arg); static void do_rename(char *arg); static void do_move(char *arg); static void do_set(char *arg); static void do_alias(char *arg); static void do_bind(char *arg); static void do_connect(char *arg); static void do_disconnect(char *arg); static void do_rawxml(char *arg); static void do_room(char *arg); static void do_authorization(char *arg); static void do_version(char *arg); static void do_request(char *arg); static void do_event(char *arg); static void do_help(char *arg); static void do_pgp(char *arg); static void do_iline(char *arg); static void do_screen_refresh(char *arg); static void do_chat_disable(char *arg); static void do_source(char *arg); static void do_color(char *arg); static void do_otr(char *arg); static void do_otrpolicy(char *arg); static void do_say_internal(char *arg, int parse_flags); // Global variable for the commands list static GSList *Commands; // cmd_add() // Adds a command to the commands list and to the CMD completion list static void cmd_add(const char *name, const char *help, guint flags_row1, guint flags_row2, void (*f)(char*)) { cmd *n_cmd = g_new0(cmd, 1); strncpy(n_cmd->name, name, 32-1); n_cmd->help = help; n_cmd->completion_flags[0] = flags_row1; n_cmd->completion_flags[1] = flags_row2; n_cmd->func = f; Commands = g_slist_append(Commands, n_cmd); // Add to completion CMD category compl_add_category_word(COMPL_CMD, name); } // cmd_init() // Commands table initialization // !!! // After changing commands names and it arguments names here, you must change // ones in init_bindings()! // void cmd_init(void) { cmd_add("add", "Add a jabber user", COMPL_JID, 0, &do_add); cmd_add("alias", "Add an alias", 0, 0, &do_alias); cmd_add("authorization", "Manage subscription authorizations", COMPL_AUTH, COMPL_JID, &do_authorization); cmd_add("bind", "Add an key binding", 0, 0, &do_bind); cmd_add("buffer", "Manipulate current buddy's buffer (chat window)", COMPL_BUFFER, 0, &do_buffer); cmd_add("chat_disable", "Disable chat mode", 0, 0, &do_chat_disable); cmd_add("clear", "Clear the dialog window", 0, 0, &do_clear); cmd_add("connect", "Connect to the server", 0, 0, &do_connect); cmd_add("del", "Delete the current buddy", 0, 0, &do_del); cmd_add("disconnect", "Disconnect from server", 0, 0, &do_disconnect); cmd_add("event", "Process an event", COMPL_EVENTSID, COMPL_EVENTS, &do_event); cmd_add("group", "Change group display settings", COMPL_GROUP, 0, &do_group); cmd_add("help", "Display some help", COMPL_CMD, 0, &do_help); cmd_add("iline", "Manipulate input buffer", 0, 0, &do_iline); cmd_add("info", "Show basic info on current buddy", 0, 0, &do_info); cmd_add("move", "Move the current buddy to another group", COMPL_GROUPNAME, 0, &do_move); cmd_add("msay", "Send a multi-lines message to the selected buddy", COMPL_MULTILINE, 0, &do_msay); cmd_add("otr", "Manage OTR settings", COMPL_OTR, COMPL_JID, &do_otr); cmd_add("otrpolicy", "Manage OTR policies", COMPL_JID, COMPL_OTRPOLICY, &do_otrpolicy); cmd_add("pgp", "Manage PGP settings", COMPL_PGP, COMPL_JID, &do_pgp); cmd_add("quit", "Exit the software", 0, 0, NULL); cmd_add("rawxml", "Send a raw XML string", 0, 0, &do_rawxml); cmd_add("rename", "Rename the current buddy", 0, 0, &do_rename); cmd_add("request", "Send a Jabber IQ request", COMPL_REQUEST, COMPL_JID, &do_request); cmd_add("room", "MUC actions command", COMPL_ROOM, 0, &do_room); cmd_add("roster", "Manipulate the roster/buddylist", COMPL_ROSTER, 0, &do_roster); cmd_add("say", "Say something to the selected buddy", 0, 0, &do_say); cmd_add("say_to", "Say something to a specific buddy", COMPL_JID, 0, &do_say_to); cmd_add("screen_refresh", "Redraw mcabber screen", 0, 0, &do_screen_refresh); //cmd_add("search"); cmd_add("set", "Set/query an option value", 0, 0, &do_set); cmd_add("source", "Read a configuration file", 0, 0, &do_source); cmd_add("status", "Show or set your status", COMPL_STATUS, 0, &do_status); cmd_add("status_to", "Show or set your status for one recipient", COMPL_JID, COMPL_STATUS, &do_status_to); cmd_add("version", "Show mcabber version", 0, 0, &do_version); cmd_add("color", "Set coloring options", COMPL_COLOR, 0, &do_color); // Status category compl_add_category_word(COMPL_STATUS, "online"); compl_add_category_word(COMPL_STATUS, "avail"); compl_add_category_word(COMPL_STATUS, "invisible"); compl_add_category_word(COMPL_STATUS, "free"); compl_add_category_word(COMPL_STATUS, "dnd"); compl_add_category_word(COMPL_STATUS, "notavail"); compl_add_category_word(COMPL_STATUS, "away"); compl_add_category_word(COMPL_STATUS, "offline"); // Roster category compl_add_category_word(COMPL_ROSTER, "bottom"); compl_add_category_word(COMPL_ROSTER, "top"); compl_add_category_word(COMPL_ROSTER, "up"); compl_add_category_word(COMPL_ROSTER, "down"); compl_add_category_word(COMPL_ROSTER, "group_prev"); compl_add_category_word(COMPL_ROSTER, "group_next"); compl_add_category_word(COMPL_ROSTER, "hide"); compl_add_category_word(COMPL_ROSTER, "show"); compl_add_category_word(COMPL_ROSTER, "toggle"); compl_add_category_word(COMPL_ROSTER, "display"); compl_add_category_word(COMPL_ROSTER, "hide_offline"); compl_add_category_word(COMPL_ROSTER, "show_offline"); compl_add_category_word(COMPL_ROSTER, "toggle_offline"); compl_add_category_word(COMPL_ROSTER, "item_lock"); compl_add_category_word(COMPL_ROSTER, "item_unlock"); compl_add_category_word(COMPL_ROSTER, "item_toggle_lock"); compl_add_category_word(COMPL_ROSTER, "alternate"); compl_add_category_word(COMPL_ROSTER, "search"); compl_add_category_word(COMPL_ROSTER, "unread_first"); compl_add_category_word(COMPL_ROSTER, "unread_next"); compl_add_category_word(COMPL_ROSTER, "note"); // Roster category compl_add_category_word(COMPL_BUFFER, "clear"); compl_add_category_word(COMPL_BUFFER, "bottom"); compl_add_category_word(COMPL_BUFFER, "top"); compl_add_category_word(COMPL_BUFFER, "up"); compl_add_category_word(COMPL_BUFFER, "down"); compl_add_category_word(COMPL_BUFFER, "search_backward"); compl_add_category_word(COMPL_BUFFER, "search_forward"); compl_add_category_word(COMPL_BUFFER, "date"); compl_add_category_word(COMPL_BUFFER, "%"); compl_add_category_word(COMPL_BUFFER, "purge"); compl_add_category_word(COMPL_BUFFER, "close"); compl_add_category_word(COMPL_BUFFER, "close_all"); compl_add_category_word(COMPL_BUFFER, "scroll_lock"); compl_add_category_word(COMPL_BUFFER, "scroll_unlock"); compl_add_category_word(COMPL_BUFFER, "scroll_toggle"); // Group category compl_add_category_word(COMPL_GROUP, "fold"); compl_add_category_word(COMPL_GROUP, "unfold"); compl_add_category_word(COMPL_GROUP, "toggle"); // Multi-line (msay) category compl_add_category_word(COMPL_MULTILINE, "abort"); compl_add_category_word(COMPL_MULTILINE, "begin"); compl_add_category_word(COMPL_MULTILINE, "send"); compl_add_category_word(COMPL_MULTILINE, "send_to"); compl_add_category_word(COMPL_MULTILINE, "toggle"); compl_add_category_word(COMPL_MULTILINE, "toggle_verbatim"); compl_add_category_word(COMPL_MULTILINE, "verbatim"); // Room category compl_add_category_word(COMPL_ROOM, "affil"); compl_add_category_word(COMPL_ROOM, "ban"); compl_add_category_word(COMPL_ROOM, "bookmark"); compl_add_category_word(COMPL_ROOM, "destroy"); compl_add_category_word(COMPL_ROOM, "invite"); compl_add_category_word(COMPL_ROOM, "join"); compl_add_category_word(COMPL_ROOM, "kick"); compl_add_category_word(COMPL_ROOM, "leave"); compl_add_category_word(COMPL_ROOM, "names"); compl_add_category_word(COMPL_ROOM, "nick"); compl_add_category_word(COMPL_ROOM, "privmsg"); compl_add_category_word(COMPL_ROOM, "remove"); compl_add_category_word(COMPL_ROOM, "role"); compl_add_category_word(COMPL_ROOM, "topic"); compl_add_category_word(COMPL_ROOM, "unban"); compl_add_category_word(COMPL_ROOM, "unlock"); compl_add_category_word(COMPL_ROOM, "whois"); // Authorization category compl_add_category_word(COMPL_AUTH, "allow"); compl_add_category_word(COMPL_AUTH, "cancel"); compl_add_category_word(COMPL_AUTH, "request"); compl_add_category_word(COMPL_AUTH, "request_unsubscribe"); // Request (query) category compl_add_category_word(COMPL_REQUEST, "last"); compl_add_category_word(COMPL_REQUEST, "time"); compl_add_category_word(COMPL_REQUEST, "vcard"); compl_add_category_word(COMPL_REQUEST, "version"); // Events category compl_add_category_word(COMPL_EVENTS, "accept"); compl_add_category_word(COMPL_EVENTS, "ignore"); compl_add_category_word(COMPL_EVENTS, "reject"); // PGP category compl_add_category_word(COMPL_PGP, "disable"); compl_add_category_word(COMPL_PGP, "enable"); compl_add_category_word(COMPL_PGP, "force"); compl_add_category_word(COMPL_PGP, "info"); compl_add_category_word(COMPL_PGP, "setkey"); // OTR category compl_add_category_word(COMPL_OTR, "start"); compl_add_category_word(COMPL_OTR, "stop"); compl_add_category_word(COMPL_OTR, "fingerprint"); compl_add_category_word(COMPL_OTR, "smpq"); compl_add_category_word(COMPL_OTR, "smpr"); compl_add_category_word(COMPL_OTR, "smpa"); compl_add_category_word(COMPL_OTR, "info"); compl_add_category_word(COMPL_OTR, "key"); // OTR Policy category compl_add_category_word(COMPL_OTRPOLICY, "plain"); compl_add_category_word(COMPL_OTRPOLICY, "manual"); compl_add_category_word(COMPL_OTRPOLICY, "opportunistic"); compl_add_category_word(COMPL_OTRPOLICY, "always"); // Color category compl_add_category_word(COMPL_COLOR, "roster"); compl_add_category_word(COMPL_COLOR, "muc"); compl_add_category_word(COMPL_COLOR, "mucnick"); } // expandalias(line) // If there is one, expand the alias in line and returns a new allocated line // If no alias is found, returns line // Note: if the returned pointer is different from line, the caller should // g_free() the pointer after use char *expandalias(const char *line) { const char *p1, *p2; char *word; const gchar *value; char *newline = (char*)line; // Ignore leading COMMAND_CHAR for (p1 = line ; *p1 == COMMAND_CHAR ; p1++) ; // Locate the end of the word for (p2 = p1 ; *p2 && (*p2 != ' ') ; p2++) ; // Extract the word word = g_strndup(p1, p2-p1); // Look for an alias in the list value = settings_get(SETTINGS_TYPE_ALIAS, (const char*)word); if (value) { // There is an alias to expand newline = g_new(char, strlen(value)+strlen(p2)+2); *newline = COMMAND_CHAR; strcpy(newline+1, value); strcat(newline, p2); } g_free(word); return newline; } // cmd_get // Finds command in the command list structure. // Returns a pointer to the cmd entry, or NULL if command not found. cmd *cmd_get(const char *command) { const char *p1, *p2; char *com; GSList *sl_com; // Ignore leading COMMAND_CHAR for (p1 = command ; *p1 == COMMAND_CHAR ; p1++) ; // Locate the end of the command for (p2 = p1 ; *p2 && (*p2 != ' ') ; p2++) ; // Copy the clean command com = g_strndup(p1, p2-p1); // Look for command in the list for (sl_com=Commands; sl_com; sl_com = g_slist_next(sl_com)) { if (!strcasecmp(com, ((cmd*)sl_com->data)->name)) break; } g_free(com); if (sl_com) // Command has been found. return (cmd*)sl_com->data; return NULL; } // process_command(line, iscmd) // Process a command line. // If iscmd is TRUE, process the command even if verbatim mmode is set; // it is intended to be used for key bindings. // Return 255 if this is the /quit command, and 0 for the other commands. int process_command(const char *line, guint iscmd) { char *p; char *xpline; cmd *curcmd; // We do alias expansion here if (iscmd || scr_get_multimode() != 2) xpline = expandalias(line); else xpline = (char*)line; // No expansion in verbatim multi-line mode // We want to use a copy if (xpline == line) xpline = g_strdup(line); // Remove trailing spaces: for (p=xpline ; *p ; p++) ; for (p-- ; p>xpline && (*p == ' ') ; p--) *p = 0; // Command "quit"? if ((iscmd || scr_get_multimode() != 2) && (!strncasecmp(xpline, mkcmdstr("quit"), strlen(mkcmdstr("quit"))))) { if (!xpline[5] || xpline[5] == ' ') { g_free(xpline); return 255; } } else if (iscmd && !strncasecmp(xpline, "quit", 4) && (!xpline[4] || xpline[4] == ' ')) { // If iscmd is true we can have the command without the command prefix // character (usually '/'). g_free(xpline); return 255; } // If verbatim multi-line mode, we check if another /msay command is typed if (!iscmd && scr_get_multimode() == 2 && (strncasecmp(xpline, mkcmdstr("msay "), strlen(mkcmdstr("msay "))))) { // It isn't an /msay command scr_append_multiline(xpline); g_free(xpline); return 0; } // Commands handling curcmd = cmd_get(xpline); if (!curcmd) { scr_LogPrint(LPRINT_NORMAL, "Unrecognized command. " "Please see the manual for a list of known commands."); g_free(xpline); return 0; } if (!curcmd->func) { scr_LogPrint(LPRINT_NORMAL, "This functionality is not yet implemented, sorry."); g_free(xpline); return 0; } // Lets go to the command parameters for (p = xpline+1; *p && (*p != ' ') ; p++) ; // Skip spaces while (*p && (*p == ' ')) p++; // Call command-specific function retval_for_cmds = 0; (*curcmd->func)(p); g_free(xpline); return retval_for_cmds; } // process_line(line) // Process a command/message line. // If this isn't a command, this is a message and it is sent to the // currently selected buddy. // Return 255 if the line is the /quit command, or 0. int process_line(const char *line) { if (!*line) { // User only pressed enter if (scr_get_multimode()) { scr_append_multiline(""); return 0; } if (current_buddy) { // Enter chat mode scr_set_chatmode(TRUE); scr_ShowBuddyWindow(); } return 0; } if (*line != COMMAND_CHAR) { // This isn't a command if (scr_get_multimode()) scr_append_multiline(line); else do_say_internal((char*)line, 0); return 0; } /* It is _probably_ a command -- except for verbatim multi-line mode */ return process_command(line, FALSE); } // Helper routine for buffer item_{lock,unlock,toggle_lock} // "lock" values: 1=lock 0=unlock -1=invert static void roster_buddylock(char *bjid, int lock) { gpointer bud = NULL; bool may_need_refresh = FALSE; // Allow special jid "" or "." (current buddy) if (bjid && (!*bjid || !strcmp(bjid, "."))) bjid = NULL; if (bjid) { // The JID has been specified. Quick check... if (check_jid_syntax(bjid)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", bjid); } else { // Find the buddy GSList *roster_elt; roster_elt = roster_find(bjid, jidsearch, ROSTER_TYPE_USER|ROSTER_TYPE_ROOM); if (roster_elt) bud = roster_elt->data; else scr_LogPrint(LPRINT_NORMAL, "This jid isn't in the roster."); may_need_refresh = TRUE; } } else { // Use the current buddy if (current_buddy) bud = BUDDATA(current_buddy); } // Update the ROSTER_FLAG_USRLOCK flag if (bud) { if (lock == -1) lock = !(buddy_getflags(bud) & ROSTER_FLAG_USRLOCK); buddy_setflags(bud, ROSTER_FLAG_USRLOCK, lock); if (may_need_refresh) { buddylist_build(); update_roster = TRUE; } } } // display_and_free_note(note, winId) // Display the note information in the winId buffer, and free note // (winId is a bare jid or NULL for the status window, in which case we // display the note jid too) static void display_and_free_note(struct annotation *note, const char *winId) { gchar tbuf[128]; GString *sbuf; guint msg_flag = HBB_PREFIX_INFO; /* We use the flag prefix_info for the first line, and prefix_cont for the other lines, for better readability */ if (!note) return; sbuf = g_string_new(""); if (!winId) { // We're writing to the status window, so let's show the jid too. g_string_printf(sbuf, "Annotation on <%s>", note->jid); scr_WriteIncomingMessage(winId, sbuf->str, 0, msg_flag, 0); msg_flag = HBB_PREFIX_INFO | HBB_PREFIX_CONT; } // If we have the creation date, display it if (note->cdate) { strftime(tbuf, sizeof(tbuf), "%Y-%m-%d %H:%M:%S", localtime(¬e->cdate)); g_string_printf(sbuf, "Note created %s", tbuf); scr_WriteIncomingMessage(winId, sbuf->str, 0, msg_flag, 0); msg_flag = HBB_PREFIX_INFO | HBB_PREFIX_CONT; } // If we have the modification date, display it // unless it's the same as the creation date if (note->mdate && note->mdate != note->cdate) { strftime(tbuf, sizeof(tbuf), "%Y-%m-%d %H:%M:%S", localtime(¬e->mdate)); g_string_printf(sbuf, "Note modified %s", tbuf); scr_WriteIncomingMessage(winId, sbuf->str, 0, msg_flag, 0); msg_flag = HBB_PREFIX_INFO | HBB_PREFIX_CONT; } // Note text g_string_printf(sbuf, "Note: %s", note->text); scr_WriteIncomingMessage(winId, sbuf->str, 0, msg_flag, 0); g_string_free(sbuf, TRUE); g_free(note->text); g_free(note->jid); g_free(note); } static void display_all_annotations(void) { GSList *notes; notes = jb_get_all_storage_rosternotes(); if (!notes) return; // Call display_and_free_note() for each note, // with winId = NULL (special window) g_slist_foreach(notes, (GFunc)&display_and_free_note, NULL); scr_setmsgflag_if_needed(SPECIAL_BUFFER_STATUS_ID, TRUE); update_roster = TRUE; g_slist_free(notes); } static void roster_note(char *arg) { const char *bjid; guint type; if (!current_buddy) return; bjid = buddy_getjid(BUDDATA(current_buddy)); type = buddy_gettype(BUDDATA(current_buddy)); if (!bjid && type == ROSTER_TYPE_SPECIAL && !arg) { // We're in the status window (the only special buffer currently) // Let's display all server notes display_all_annotations(); return; } if (!bjid || (type != ROSTER_TYPE_USER && type != ROSTER_TYPE_ROOM && type != ROSTER_TYPE_AGENT)) { scr_LogPrint(LPRINT_NORMAL, "This item can't have a note."); return; } if (arg && *arg) { // Set a note gchar *msg, *notetxt; msg = to_utf8(arg); if (!strcmp(msg, "-")) notetxt = NULL; // delete note else notetxt = msg; jb_set_storage_rosternotes(bjid, notetxt); g_free(msg); } else { // Display a note struct annotation *note = jb_get_storage_rosternotes(bjid, FALSE); if (note) { display_and_free_note(note, bjid); } else { scr_WriteIncomingMessage(bjid, "This item doesn't have a note.", 0, HBB_PREFIX_INFO, 0); } } } /* Commands callback functions */ /* All these do_*() functions will be called with a "arg" parameter */ /* (with arg not null) */ static void do_roster(char *arg) { char **paramlst; char *subcmd; paramlst = split_arg(arg, 2, 1); // subcmd, arg subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); free_arg_lst(paramlst); return; } if (!strcasecmp(subcmd, "top")) { scr_RosterTop(); update_roster = TRUE; } else if (!strcasecmp(subcmd, "bottom")) { scr_RosterBottom(); update_roster = TRUE; } else if (!strcasecmp(subcmd, "hide")) { scr_RosterVisibility(0); } else if (!strcasecmp(subcmd, "show")) { scr_RosterVisibility(1); } else if (!strcasecmp(subcmd, "toggle")) { scr_RosterVisibility(-1); } else if (!strcasecmp(subcmd, "hide_offline")) { buddylist_set_hide_offline_buddies(TRUE); if (current_buddy) buddylist_build(); update_roster = TRUE; } else if (!strcasecmp(subcmd, "show_offline")) { buddylist_set_hide_offline_buddies(FALSE); buddylist_build(); update_roster = TRUE; } else if (!strcasecmp(subcmd, "toggle_offline")) { buddylist_set_hide_offline_buddies(-1); buddylist_build(); update_roster = TRUE; } else if (!strcasecmp(subcmd, "display")) { scr_RosterDisplay(arg); } else if (!strcasecmp(subcmd, "item_lock")) { roster_buddylock(arg, 1); } else if (!strcasecmp(subcmd, "item_unlock")) { roster_buddylock(arg, 0); } else if (!strcasecmp(subcmd, "item_toggle_lock")) { roster_buddylock(arg, -1); } else if (!strcasecmp(subcmd, "unread_first")) { scr_RosterUnreadMessage(0); } else if (!strcasecmp(subcmd, "unread_next")) { scr_RosterUnreadMessage(1); } else if (!strcasecmp(subcmd, "alternate")) { scr_RosterJumpAlternate(); } else if (!strncasecmp(subcmd, "search", 6)) { strip_arg_special_chars(arg); if (!arg || !*arg) { scr_LogPrint(LPRINT_NORMAL, "What name or JID are you looking for?"); free_arg_lst(paramlst); return; } scr_RosterSearch(arg); update_roster = TRUE; } else if (!strcasecmp(subcmd, "up")) { scr_RosterUp(); } else if (!strcasecmp(subcmd, "down")) { scr_RosterDown(); } else if (!strcasecmp(subcmd, "group_prev")) { scr_RosterPrevGroup(); } else if (!strcasecmp(subcmd, "group_next")) { scr_RosterNextGroup(); } else if (!strcasecmp(subcmd, "note")) { roster_note(arg); } else scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); free_arg_lst(paramlst); } void do_color(char *arg) { char **paramlst; char *subcmd; paramlst = split_arg(arg, 2, 1); // subcmd, arg subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); free_arg_lst(paramlst); return; } if (!strcasecmp(subcmd, "roster")) { char *status, *wildcard, *color; char **arglist = split_arg(arg, 3, 0); status = *arglist; wildcard = to_utf8(arglist[1]); color = arglist[2]; if (status && !strcmp(status, "clear")) { // Not a color command, clear all scr_RosterClearColor(); update_roster = TRUE; } else { if (!status || !*status || !wildcard || !*wildcard || !color || !*color) { scr_LogPrint(LPRINT_NORMAL, "Missing argument"); } else { update_roster = scr_RosterColor(status, wildcard, color) || update_roster; } } free_arg_lst(arglist); g_free(wildcard); } else if (!strcasecmp(subcmd, "muc")) { char **arglist = split_arg(arg, 2, 0); char *free_muc = to_utf8(*arglist); const char *muc = free_muc, *mode = arglist[1]; if (!muc || !*muc) scr_LogPrint(LPRINT_NORMAL, "What MUC?"); else { if (!strcmp(muc, ".")) if (!(muc = CURRENT_JID)) scr_LogPrint(LPRINT_NORMAL, "No JID selected"); if (muc) { if (check_jid_syntax(muc) && strcmp(muc, "*")) scr_LogPrint(LPRINT_NORMAL, "Not a JID"); else { if (!mode || !*mode || !strcasecmp(mode, "on")) scr_MucColor(muc, MC_ALL); else if (!strcasecmp(mode, "preset")) scr_MucColor(muc, MC_PRESET); else if (!strcasecmp(mode, "off")) scr_MucColor(muc, MC_OFF); else if (!strcmp(mode, "-")) scr_MucColor(muc, MC_REMOVE); else scr_LogPrint(LPRINT_NORMAL, "Unknown coloring mode"); } } } free_arg_lst(arglist); g_free(free_muc); } else if (!strcasecmp(subcmd, "mucnick")) { char **arglist = split_arg(arg, 2, 0); const char *nick = *arglist, *color = arglist[1]; if (!nick || !*nick || !color || !*color) scr_LogPrint(LPRINT_NORMAL, "Missing argument"); else scr_MucNickColor(nick, color); free_arg_lst(arglist); } else scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); free_arg_lst(paramlst); } // setstatus(recipient, arg) // Set your Jabber status. // - if recipient is not NULL, the status is sent to this contact only // - arg must be "status message" (message is optional) void setstatus(const char *recipient, const char *arg) { char **paramlst; char *status; char *msg; enum imstatus st; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return; } paramlst = split_arg(arg, 2, 0); // status, message status = *paramlst; msg = *(paramlst+1); if (!status) { free_arg_lst(paramlst); return; } if (!strcasecmp(status, IMSTATUS_OFFLINE)) st = offline; else if (!strcasecmp(status, IMSTATUS_ONLINE)) st = available; else if (!strcasecmp(status, IMSTATUS_AVAILABLE)) st = available; else if (!strcasecmp(status, IMSTATUS_AWAY)) st = away; else if (!strcasecmp(status, IMSTATUS_INVISIBLE)) st = invisible; else if (!strcasecmp(status, IMSTATUS_DONOTDISTURB)) st = dontdisturb; else if (!strcasecmp(status, IMSTATUS_NOTAVAILABLE)) st = notavail; else if (!strcasecmp(status, IMSTATUS_FREE4CHAT)) st = freeforchat; else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized status!"); free_arg_lst(paramlst); return; } // Use provided message if (msg && !*msg) { msg = NULL; } // If a recipient is specified, let's don't use default status messages if (recipient && !msg) msg = ""; jb_setstatus(st, recipient, msg, FALSE); free_arg_lst(paramlst); } static void do_status(char *arg) { if (!*arg) { const char *sm = jb_getstatusmsg(); scr_LogPrint(LPRINT_NORMAL, "Your status is: [%c] %s", imstatus2char[jb_getstatus()], (sm ? sm : "")); return; } arg = to_utf8(arg); setstatus(NULL, arg); g_free(arg); } static void do_status_to(char *arg) { char **paramlst; char *fjid, *st, *msg; char *jid_utf8 = NULL; paramlst = split_arg(arg, 3, 1); // jid, status, [message] fjid = *paramlst; st = *(paramlst+1); msg = *(paramlst+2); if (!fjid || !st) { scr_LogPrint(LPRINT_NORMAL, "Please specify both a Jabber ID and a status."); free_arg_lst(paramlst); return; } // Allow things like /status_to "" away if (!*fjid || !strcmp(fjid, ".")) fjid = NULL; if (fjid) { // The JID has been specified. Quick check... if (check_jid_syntax(fjid)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", fjid); fjid = NULL; } else { // Convert jid to lowercase char *p = fjid; for ( ; *p && *p != JID_RESOURCE_SEPARATOR; p++) *p = tolower(*p); fjid = jid_utf8 = to_utf8(fjid); } } else { // Add the current buddy if (current_buddy) fjid = (char*)buddy_getjid(BUDDATA(current_buddy)); if (!fjid) scr_LogPrint(LPRINT_NORMAL, "Please specify a Jabber ID."); } if (fjid) { char *cmdline; if (!msg) msg = ""; msg = to_utf8(msg); cmdline = g_strdup_printf("%s %s", st, msg); scr_LogPrint(LPRINT_LOGNORM, "Sending to <%s> /status %s", fjid, cmdline); setstatus(fjid, cmdline); g_free(msg); g_free(cmdline); g_free(jid_utf8); } free_arg_lst(paramlst); } static void do_add(char *arg) { char **paramlst; char *id, *nick; char *jid_utf8 = NULL; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return; } paramlst = split_arg(arg, 2, 0); // jid, [nickname] id = *paramlst; nick = *(paramlst+1); if (!id) nick = NULL; // Allow things like: /add "" nick else if (!*id || !strcmp(id, ".")) id = NULL; if (id) { // The JID has been specified. Quick check... if (check_jid_syntax(id)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", id); id = NULL; } else { mc_strtolower(id); // Actually an UTF-8 id isn't needed because only the bare jid will // be used. id = jid_utf8 = to_utf8(id); } } else { // Add the current buddy if (current_buddy) id = (char*)buddy_getjid(BUDDATA(current_buddy)); if (!id) scr_LogPrint(LPRINT_NORMAL, "Please specify a Jabber ID."); } if (nick) nick = to_utf8(nick); if (id) { // 2nd parameter = optional nickname jb_addbuddy(id, nick, NULL); scr_LogPrint(LPRINT_LOGNORM, "Sent presence notification request to <%s>.", id); } g_free(jid_utf8); g_free(nick); free_arg_lst(paramlst); } static void do_del(char *arg) { const char *bjid; if (*arg) { scr_LogPrint(LPRINT_NORMAL, "This action does not require a parameter; " "the currently-selected buddy will be deleted."); return; } if (!current_buddy) return; bjid = buddy_getjid(BUDDATA(current_buddy)); if (!bjid) return; if (buddy_gettype(BUDDATA(current_buddy)) & ROSTER_TYPE_ROOM) { // This is a chatroom if (buddy_getinsideroom(BUDDATA(current_buddy))) { scr_LogPrint(LPRINT_NORMAL, "You haven't left this room!"); return; } } // Close the buffer scr_BufferPurge(1, NULL); scr_LogPrint(LPRINT_LOGNORM, "Removing <%s>...", bjid); jb_delbuddy(bjid); scr_UpdateBuddyWindow(); } static void do_group(char *arg) { gpointer group = NULL; guint leave_buddywindow; char **paramlst; char *subcmd; enum { group_unfold = 0, group_fold, group_toggle } group_state = 0; if (!*arg) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); return; } if (!current_buddy) return; paramlst = split_arg(arg, 2, 1); // subcmd, [arg] subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) goto do_group_return; // Should not happen anyway if (arg && *arg) { GSList *roster_elt; roster_elt = roster_find(arg, namesearch, ROSTER_TYPE_GROUP); if (roster_elt) group = buddy_getgroup(roster_elt->data); } else { group = buddy_getgroup(BUDDATA(current_buddy)); } if (!group) goto do_group_return; // We'll have to redraw the chat window if we're not currently on the group // entry itself, because it means we'll have to leave the current buddy // chat window. leave_buddywindow = (group != BUDDATA(current_buddy) && group == buddy_getgroup(BUDDATA(current_buddy))); if (!(buddy_gettype(group) & ROSTER_TYPE_GROUP)) { scr_LogPrint(LPRINT_NORMAL, "You need to select a group."); goto do_group_return; } if (!strcasecmp(subcmd, "expand") || !strcasecmp(subcmd, "unfold")) group_state = group_unfold; else if (!strcasecmp(subcmd, "shrink") || !strcasecmp(subcmd, "fold")) group_state = group_fold; else if (!strcasecmp(subcmd, "toggle")) group_state = group_toggle; else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); goto do_group_return; } if (group_state != group_unfold && leave_buddywindow) scr_RosterPrevGroup(); if (group_state == group_unfold) buddy_setflags(group, ROSTER_FLAG_HIDE, FALSE); else if (group_state == group_fold) buddy_setflags(group, ROSTER_FLAG_HIDE, TRUE); else if (group_state == group_toggle) buddy_setflags(group, ROSTER_FLAG_HIDE, !(buddy_getflags(group) & ROSTER_FLAG_HIDE)); buddylist_build(); update_roster = TRUE; do_group_return: free_arg_lst(paramlst); } static int send_message_to(const char *fjid, const char *msg, const char *subj, const char *type_overwrite) { char *bare_jid, *rp; char *hmsg; gint crypted; gint retval = 0; int isroom; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return 1; } if (!fjid || !*fjid) { scr_LogPrint(LPRINT_NORMAL, "You must specify a Jabber ID."); return 1; } if (!msg || !*msg) { scr_LogPrint(LPRINT_NORMAL, "You must specify a message."); return 1; } if (check_jid_syntax((char*)fjid)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", fjid); return 1; } // We must use the bare jid in hk_message_out() rp = strchr(fjid, JID_RESOURCE_SEPARATOR); if (rp) bare_jid = g_strndup(fjid, rp - fjid); else bare_jid = (char*)fjid; // Jump to window, create one if needed scr_RosterJumpJid(bare_jid); // Check if we're sending a message to a conference room // If not, we must make sure rp is NULL, for hk_message_out() isroom = !!roster_find(bare_jid, jidsearch, ROSTER_TYPE_ROOM); if (rp) { if (isroom) rp++; else rp = NULL; } isroom = isroom && (!rp || !*rp); // local part (UI, logging, etc.) if (subj) hmsg = g_strdup_printf("[%s]\n%s", subj, msg); else hmsg = (char*)msg; // Network part jb_send_msg(fjid, msg, (isroom ? ROSTER_TYPE_ROOM : ROSTER_TYPE_USER), subj, NULL, &crypted, type_overwrite); if (crypted == -1) { scr_LogPrint(LPRINT_LOGNORM, "Encryption error. Message was not sent."); retval = 1; goto send_message_to_return; } // Hook if (!isroom) hk_message_out(bare_jid, rp, 0, hmsg, crypted); send_message_to_return: if (hmsg != msg) g_free(hmsg); if (rp) g_free(bare_jid); return retval; } // send_message(msg, subj, type_overwrite) // Write the message in the buddy's window and send the message on // the network. static void send_message(const char *msg, const char *subj, const char *type_overwrite) { const char *bjid; if (!current_buddy) { scr_LogPrint(LPRINT_NORMAL, "No buddy is currently selected."); return; } bjid = CURRENT_JID; if (!bjid) { scr_LogPrint(LPRINT_NORMAL, "No buddy is currently selected."); return; } send_message_to(bjid, msg, subj, type_overwrite); } static const char *scan_mtype(char **arg) { //Try splitting it char **parlist = split_arg(*arg, 2, 1); const char *result = NULL; //Is it any good parameter? if (parlist && *parlist) { if (!strcmp("-n", *parlist)) { result = TMSG_NORMAL; } else if (!strcmp("-h", *parlist)) { result = TMSG_HEADLINE; } if (result || (!strcmp("--", *parlist))) *arg += strlen(*arg) - (parlist[1] ? strlen(parlist[1]) : 0); } //Anything found? -> skip it free_arg_lst(parlist); return result; } static void do_say_internal(char *arg, int parse_flags) { gpointer bud; const char *msgtype = NULL; scr_set_chatmode(TRUE); scr_ShowBuddyWindow(); if (!current_buddy) { scr_LogPrint(LPRINT_NORMAL, "Whom are you talking to? Please select a buddy."); return; } bud = BUDDATA(current_buddy); if (!(buddy_gettype(bud) & (ROSTER_TYPE_USER|ROSTER_TYPE_AGENT|ROSTER_TYPE_ROOM))) { scr_LogPrint(LPRINT_NORMAL, "This is not a user."); return; } buddy_setflags(bud, ROSTER_FLAG_LOCK, TRUE); if (parse_flags) msgtype = scan_mtype(&arg); arg = to_utf8(arg); send_message(arg, NULL, msgtype); g_free(arg); } static void do_say(char *arg) { do_say_internal(arg, 1); } static void do_msay(char *arg) { /* Parameters: begin verbatim abort send send_to */ char **paramlst; char *subcmd; paramlst = split_arg(arg, 2, 1); // subcmd, arg subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); scr_LogPrint(LPRINT_NORMAL, "Please read the manual before using " "the /msay command."); scr_LogPrint(LPRINT_NORMAL, "(Use \"%s begin\" to enter " "multi-line mode...)", mkcmdstr("msay")); goto do_msay_return; } if (!strcasecmp(subcmd, "toggle")) { if (scr_get_multimode()) subcmd = "send"; else subcmd = "begin"; } else if (!strcasecmp(subcmd, "toggle_verbatim")) { if (scr_get_multimode()) subcmd = "send"; else subcmd = "verbatim"; } if (!strcasecmp(subcmd, "abort")) { if (scr_get_multimode()) scr_LogPrint(LPRINT_NORMAL, "Leaving multi-line message mode."); scr_set_multimode(FALSE, NULL); goto do_msay_return; } else if ((!strcasecmp(subcmd, "begin")) || (!strcasecmp(subcmd, "verbatim"))) { bool verbat; gchar *subj_utf8 = to_utf8(arg); if (!strcasecmp(subcmd, "verbatim")) { scr_set_multimode(2, subj_utf8); verbat = TRUE; } else { scr_set_multimode(1, subj_utf8); verbat = FALSE; } scr_LogPrint(LPRINT_NORMAL, "Entered %smulti-line message mode.", verbat ? "VERBATIM " : ""); scr_LogPrint(LPRINT_NORMAL, "Select a buddy and use \"%s send\" " "when your message is ready.", mkcmdstr("msay")); if (verbat) scr_LogPrint(LPRINT_NORMAL, "Use \"%s abort\" to abort this mode.", mkcmdstr("msay")); g_free(subj_utf8); goto do_msay_return; } else if (strcasecmp(subcmd, "send") && strcasecmp(subcmd, "send_to")) { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); goto do_msay_return; } /* send/send_to command */ if (!scr_get_multimode()) { scr_LogPrint(LPRINT_NORMAL, "No message to send. " "Use \"%s begin\" first.", mkcmdstr("msay")); goto do_msay_return; } scr_set_chatmode(TRUE); scr_ShowBuddyWindow(); if (!strcasecmp(subcmd, "send_to")) { int err = FALSE; gchar *msg_utf8; const char *msg_type = scan_mtype(&arg); // Let's send to the specified JID. We leave now if there // has been an error (so we don't leave multi-line mode). arg = to_utf8(arg); msg_utf8 = to_utf8(scr_get_multiline()); if (msg_utf8) { err = send_message_to(arg, msg_utf8, scr_get_multimode_subj(), msg_type); g_free(msg_utf8); } g_free(arg); if (err) goto do_msay_return; } else { // Send to currently selected buddy gpointer bud; gchar *msg_utf8; if (!current_buddy) { scr_LogPrint(LPRINT_NORMAL, "Whom are you talking to?"); goto do_msay_return; } bud = BUDDATA(current_buddy); if (!(buddy_gettype(bud) & (ROSTER_TYPE_USER|ROSTER_TYPE_AGENT|ROSTER_TYPE_ROOM))) { scr_LogPrint(LPRINT_NORMAL, "This is not a user."); goto do_msay_return; } buddy_setflags(bud, ROSTER_FLAG_LOCK, TRUE); msg_utf8 = to_utf8(scr_get_multiline()); if (msg_utf8) { send_message(msg_utf8, scr_get_multimode_subj(), scan_mtype(&arg)); g_free(msg_utf8); } } scr_set_multimode(FALSE, NULL); scr_LogPrint(LPRINT_NORMAL, "You have left multi-line message mode."); do_msay_return: free_arg_lst(paramlst); } static void do_say_to(char *arg) { char **paramlst; char *fjid, *msg; const char *msg_type = NULL; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return; } msg_type = scan_mtype(&arg); paramlst = split_arg(arg, 2, 1); // jid, message fjid = *paramlst; msg = *(paramlst+1); if (!fjid || !strcmp(fjid, ".")) { scr_LogPrint(LPRINT_NORMAL, "Please specify a Jabber ID."); free_arg_lst(paramlst); return; } fjid = to_utf8(fjid); msg = to_utf8(msg); send_message_to(fjid, msg, NULL, msg_type); g_free(fjid); g_free(msg); free_arg_lst(paramlst); } // buffer_updown(updown, nblines) // updown: -1=up, +1=down inline static void buffer_updown(int updown, char *nlines) { int nblines; if (!nlines || !*nlines) nblines = 0; else nblines = atoi(nlines); if (nblines >= 0) scr_BufferScrollUpDown(updown, nblines); } static void buffer_search(int direction, char *arg) { if (!arg || !*arg) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); return; } scr_BufferSearch(direction, arg); } static void buffer_date(char *date) { time_t t; if (!date || !*date) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); return; } strip_arg_special_chars(date); t = from_iso8601(date, 0); if (t) scr_BufferDate(t); else scr_LogPrint(LPRINT_NORMAL, "The date you specified is " "not correctly formatted or invalid."); } static void buffer_percent(char *arg1, char *arg2) { // Basically, user has typed "%arg1 arg2" // "%50" -> arg1 = 50, arg2 null pointer // "% 50" -> arg1 = \0, arg2 = 50 if (!*arg1 && (!arg2 || !*arg2)) { // No value scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); return; } if (*arg1 && arg2 && *arg2) { // Two values scr_LogPrint(LPRINT_NORMAL, "Wrong parameters."); return; } scr_BufferPercent(atoi((*arg1 ? arg1 : arg2))); } static void do_buffer(char *arg) { char **paramlst; char *subcmd; if (!current_buddy) return; paramlst = split_arg(arg, 2, 1); // subcmd, arg subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); free_arg_lst(paramlst); return; } if (buddy_gettype(BUDDATA(current_buddy)) & ROSTER_TYPE_GROUP && strcasecmp(subcmd, "close_all")) { scr_LogPrint(LPRINT_NORMAL, "Groups have no buffer."); free_arg_lst(paramlst); return; } if (!strcasecmp(subcmd, "top")) { scr_BufferTopBottom(-1); } else if (!strcasecmp(subcmd, "bottom")) { scr_BufferTopBottom(1); } else if (!strcasecmp(subcmd, "clear")) { scr_BufferClear(); } else if (!strcasecmp(subcmd, "close")) { scr_BufferPurge(1, arg); } else if (!strcasecmp(subcmd, "close_all")) { scr_BufferPurgeAll(1); } else if (!strcasecmp(subcmd, "purge")) { scr_BufferPurge(0, arg); } else if (!strcasecmp(subcmd, "scroll_lock")) { scr_BufferScrollLock(1); } else if (!strcasecmp(subcmd, "scroll_unlock")) { scr_BufferScrollLock(0); } else if (!strcasecmp(subcmd, "scroll_toggle")) { scr_BufferScrollLock(-1); } else if (!strcasecmp(subcmd, "up")) { buffer_updown(-1, arg); } else if (!strcasecmp(subcmd, "down")) { buffer_updown(1, arg); } else if (!strcasecmp(subcmd, "search_backward")) { strip_arg_special_chars(arg); buffer_search(-1, arg); } else if (!strcasecmp(subcmd, "search_forward")) { strip_arg_special_chars(arg); buffer_search(1, arg); } else if (!strcasecmp(subcmd, "date")) { buffer_date(arg); } else if (*subcmd == '%') { buffer_percent(subcmd+1, arg); #ifdef DEBUG_ENABLE } else if (!strcasecmp(subcmd, "list")) { scr_BufferList(); #endif } else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); } free_arg_lst(paramlst); } static void do_clear(char *arg) // Alias for "buffer clear" { do_buffer("clear"); } static void do_info(char *arg) { gpointer bud; const char *bjid, *name; guint type, on_srv; char *buffer; enum subscr esub; if (!current_buddy) return; bud = BUDDATA(current_buddy); bjid = buddy_getjid(bud); name = buddy_getname(bud); type = buddy_gettype(bud); esub = buddy_getsubscription(bud); on_srv = buddy_getonserverflag(bud); buffer = g_new(char, 4096); if (bjid) { GSList *resources, *p_res; char *bstr = "unknown"; // Enter chat mode scr_set_chatmode(TRUE); scr_ShowBuddyWindow(); snprintf(buffer, 4095, "jid: <%s>", bjid); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); if (name) { snprintf(buffer, 4095, "Name: %s", name); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); } if (type == ROSTER_TYPE_USER) bstr = "user"; else if (type == ROSTER_TYPE_ROOM) bstr = "chatroom"; else if (type == ROSTER_TYPE_AGENT) bstr = "agent"; snprintf(buffer, 127, "Type: %s", bstr); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); if (!on_srv) { scr_WriteIncomingMessage(bjid, "(Local item, not on the server)", 0, HBB_PREFIX_INFO, 0); } if (esub == sub_both) bstr = "both"; else if (esub & sub_from) bstr = "from"; else if (esub & sub_to) bstr = "to"; else bstr = "none"; snprintf(buffer, 64, "Subscription: %s", bstr); if (esub & sub_pending) strcat(buffer, " (pending)"); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); resources = buddy_getresources(bud); if (!resources && type == ROSTER_TYPE_USER) { // No resource; display last status message, if any. const char *rst_msg = buddy_getstatusmsg(bud, ""); if (rst_msg) { snprintf(buffer, 4095, "Last status message: %s", rst_msg); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); } } for (p_res = resources ; p_res ; p_res = g_slist_next(p_res)) { gchar rprio; enum imstatus rstatus; const char *rst_msg; time_t rst_time; struct pgp_data *rpgp; rprio = buddy_getresourceprio(bud, p_res->data); rstatus = buddy_getstatus(bud, p_res->data); rst_msg = buddy_getstatusmsg(bud, p_res->data); rst_time = buddy_getstatustime(bud, p_res->data); rpgp = buddy_resource_pgp(bud, p_res->data); snprintf(buffer, 4095, "Resource: [%c] (%d) %s", imstatus2char[rstatus], rprio, (char*)p_res->data); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); if (rst_msg) { snprintf(buffer, 4095, "Status message: %s", rst_msg); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } if (rst_time) { char tbuf[128]; strftime(tbuf, sizeof(tbuf), "%Y-%m-%d %H:%M:%S", localtime(&rst_time)); snprintf(buffer, 127, "Status timestamp: %s", tbuf); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } #ifdef HAVE_GPGME if (rpgp && rpgp->sign_keyid) { snprintf(buffer, 4095, "PGP key id: %s", rpgp->sign_keyid); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); if (rpgp->last_sigsum) { gpgme_sigsum_t ss = rpgp->last_sigsum; snprintf(buffer, 4095, "Last PGP signature: %s", (ss & GPGME_SIGSUM_GREEN ? "good": (ss & GPGME_SIGSUM_RED ? "bad" : "unknown"))); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } } #endif g_free(p_res->data); } g_slist_free(resources); } else { /* Item has no jid */ if (name) scr_LogPrint(LPRINT_NORMAL, "Name: %s", name); scr_LogPrint(LPRINT_NORMAL, "Type: %s", type == ROSTER_TYPE_GROUP ? "group" : (type == ROSTER_TYPE_SPECIAL ? "special" : "unknown")); } g_free(buffer); // Tell the user if this item has an annotation. if (type == ROSTER_TYPE_USER || type == ROSTER_TYPE_ROOM || type == ROSTER_TYPE_AGENT) { struct annotation *note = jb_get_storage_rosternotes(bjid, TRUE); if (note) { // We do not display the note, we just tell the user. g_free(note->text); g_free(note->jid); g_free(note); scr_WriteIncomingMessage(bjid, "(This item has an annotation)", 0, HBB_PREFIX_INFO, 0); } } } // room_names() is a variation of do_info(), for chatrooms only static void room_names(gpointer bud, char *arg) { const char *bjid; char *buffer; GSList *resources, *p_res; enum { style_normal = 0, style_detail, style_short, style_quiet } style = 0; if (*arg) { if (!strcasecmp(arg, "--short")) style = style_short; else if (!strcasecmp(arg, "--quiet")) style = style_quiet; else if (!strcasecmp(arg, "--detail")) style = style_detail; else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); return; } } // Enter chat mode scr_set_chatmode(TRUE); scr_ShowBuddyWindow(); bjid = buddy_getjid(bud); buffer = g_new(char, 4096); strncpy(buffer, "Room members:", 127); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); resources = buddy_getresources(bud); for (p_res = resources ; p_res ; p_res = g_slist_next(p_res)) { enum imstatus rstatus; const char *rst_msg; rstatus = buddy_getstatus(bud, p_res->data); rst_msg = buddy_getstatusmsg(bud, p_res->data); if (style == style_short) { snprintf(buffer, 4095, "[%c] %s%s%s", imstatus2char[rstatus], (char*)p_res->data, rst_msg ? " -- " : "", rst_msg ? rst_msg : ""); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); } else { // (Style "normal", "detail" or "quiet") snprintf(buffer, 4095, "[%c] %s", imstatus2char[rstatus], (char*)p_res->data); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); if (rst_msg && style != style_quiet) { snprintf(buffer, 4095, "Status message: %s", rst_msg); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } if (style == style_detail) { enum imrole role = buddy_getrole(bud, p_res->data); enum imaffiliation affil = buddy_getaffil(bud, p_res->data); snprintf(buffer, 4095, "Role: %s", strrole[role]); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); if (affil != affil_none) { snprintf(buffer, 4095, "Affiliat.: %s", straffil[affil]); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } } } g_free(p_res->data); } g_slist_free(resources); g_free(buffer); } static void move_group_member(gpointer bud, void *groupnamedata) { const char *bjid, *name, *groupname; groupname = (char *)groupnamedata; bjid = buddy_getjid(bud); name = buddy_getname(bud); jb_updatebuddy(bjid, name, *groupname ? groupname : NULL); } static void do_rename(char *arg) { gpointer bud; const char *bjid, *group; guint type, on_srv; char *newname, *p; char *name_utf8; if (!current_buddy) return; bud = BUDDATA(current_buddy); bjid = buddy_getjid(bud); group = buddy_getgroupname(bud); type = buddy_gettype(bud); on_srv = buddy_getonserverflag(bud); if (type & ROSTER_TYPE_SPECIAL) { scr_LogPrint(LPRINT_NORMAL, "You can't rename this item."); return; } if (!*arg && !(type & ROSTER_TYPE_GROUP)) { scr_LogPrint(LPRINT_NORMAL, "Please specify a new name."); return; } if (!(type & ROSTER_TYPE_GROUP) && !on_srv) { scr_LogPrint(LPRINT_NORMAL, "Note: this item will be added to your server roster."); // If this is a MUC room w/o bookmark, let's give a small hint... if (!jb_is_bookmarked(bjid)) { scr_LogPrint(LPRINT_NORMAL, "You should add a room bookmark or it will not be " "recognized as a MUC room next time you run mcabber."); } } newname = g_strdup(arg); // Remove trailing space for (p = newname; *p; p++) ; while (p > newname && *p == ' ') *p = 0; strip_arg_special_chars(newname); name_utf8 = to_utf8(newname); if (type & ROSTER_TYPE_GROUP) { // Rename a whole group foreach_group_member(bud, &move_group_member, name_utf8); // Let's jump to the previous buddy, because this group name should // disappear when we receive the server answer. scr_RosterUp(); } else { // Rename a single buddy buddy_setname(bud, name_utf8); jb_updatebuddy(bjid, name_utf8, group); } g_free(name_utf8); g_free(newname); update_roster = TRUE; } static void do_move(char *arg) { gpointer bud; const char *bjid, *name, *oldgroupname; guint type; char *newgroupname, *p; char *group_utf8; if (!current_buddy) return; bud = BUDDATA(current_buddy); bjid = buddy_getjid(bud); name = buddy_getname(bud); type = buddy_gettype(bud); oldgroupname = buddy_getgroupname(bud); if (type & ROSTER_TYPE_GROUP) { scr_LogPrint(LPRINT_NORMAL, "You can't move groups!"); return; } if (type & ROSTER_TYPE_SPECIAL) { scr_LogPrint(LPRINT_NORMAL, "You can't move this item."); return; } newgroupname = g_strdup(arg); // Remove trailing space for (p = newgroupname; *p; p++) ; while (p > newgroupname && *p == ' ') *p-- = 0; strip_arg_special_chars(newgroupname); group_utf8 = to_utf8(newgroupname); if (strcmp(oldgroupname, group_utf8)) { jb_updatebuddy(bjid, name, *group_utf8 ? group_utf8 : NULL); scr_RosterUp(); buddy_setgroup(bud, group_utf8); } g_free(group_utf8); g_free(newgroupname); update_roster = TRUE; } static void do_set(char *arg) { guint assign; gchar *option, *value; gchar *option_utf8; assign = parse_assigment(arg, &option, &value); if (!option) { scr_LogPrint(LPRINT_NORMAL, "Set what option?"); return; } option_utf8 = to_utf8(option); g_free(option); if (!assign) { // This is a query const char *val = settings_opt_get(option_utf8); if (val) scr_LogPrint(LPRINT_NORMAL, "%s = [%s]", option_utf8, val); else scr_LogPrint(LPRINT_NORMAL, "Option %s is not set", option_utf8); g_free(option_utf8); return; } // Update the option // Maybe some options should be protected when user is connected (server, // username, etc.). And we should catch some options here, too // (hide_offline_buddies for ex.) if (!value) { settings_del(SETTINGS_TYPE_OPTION, option_utf8); } else { gchar *value_utf8 = to_utf8(value); settings_set(SETTINGS_TYPE_OPTION, option_utf8, value_utf8); g_free(value_utf8); g_free(value); } g_free(option_utf8); } static void dump_alias(char *k, char *v, void *param) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "Alias %s = %s", k, v); } static void do_alias(char *arg) { guint assign; gchar *alias, *value; assign = parse_assigment(arg, &alias, &value); if (!alias) { settings_foreach(SETTINGS_TYPE_ALIAS, &dump_alias, NULL); return; } if (!assign) { // This is a query const char *val = settings_get(SETTINGS_TYPE_ALIAS, alias); // NOTE: LPRINT_NOTUTF8 here, see below why it isn't encoded... if (val) scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "%s = %s", alias, val); else scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "Alias '%s' does not exist", alias); goto do_alias_return; } // Check the alias does not conflict with a registered command if (cmd_get(alias)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "'%s' is a reserved word!", alias); goto do_alias_return; } // Update the alias if (!value) { if (settings_get(SETTINGS_TYPE_ALIAS, alias)) { settings_del(SETTINGS_TYPE_ALIAS, alias); // Remove alias from the completion list compl_del_category_word(COMPL_CMD, alias); } } else { /* Add alias to the completion list, if not already in. NOTE: We're not UTF8-encoding "alias" and "value" here because UTF-8 is not yet supported in the UI... (and we use the values in the completion system) */ if (!settings_get(SETTINGS_TYPE_ALIAS, alias)) compl_add_category_word(COMPL_CMD, alias); settings_set(SETTINGS_TYPE_ALIAS, alias, value); g_free(value); } do_alias_return: g_free(alias); } static void dump_bind(char *k, char *v, void *param) { scr_LogPrint(LPRINT_NORMAL, "Key %4s is bound to: %s", k, v); } static void do_bind(char *arg) { guint assign; gchar *k_code, *value; assign = parse_assigment(arg, &k_code, &value); if (!k_code) { settings_foreach(SETTINGS_TYPE_BINDING, &dump_bind, NULL); return; } if (!assign) { // This is a query const char *val = settings_get(SETTINGS_TYPE_BINDING, k_code); if (val) scr_LogPrint(LPRINT_NORMAL, "Key %s is bound to: %s", k_code, val); else scr_LogPrint(LPRINT_NORMAL, "Key %s is not bound.", k_code); g_free(k_code); return; } // Update the key binding if (!value) { settings_del(SETTINGS_TYPE_BINDING, k_code); } else { gchar *value_utf8 = to_utf8(value); settings_set(SETTINGS_TYPE_BINDING, k_code, value_utf8); g_free(value_utf8); g_free(value); } g_free(k_code); } static void do_rawxml(char *arg) { char **paramlst; char *subcmd; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return; } paramlst = split_arg(arg, 2, 1); // subcmd, arg subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Please read the manual page" " before using /rawxml :-)"); free_arg_lst(paramlst); return; } if (!strcasecmp(subcmd, "send")) { gchar *buffer; if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); free_arg_lst(paramlst); return; } // We don't strip_arg_special_chars() here, because it would be a pain for // the user to escape quotes in a XML stream... buffer = to_utf8(arg); if (buffer) { scr_LogPrint(LPRINT_NORMAL, "Sending XML string"); jb_send_raw(buffer); g_free(buffer); } else { scr_LogPrint(LPRINT_NORMAL, "Conversion error in XML string."); } } else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); } free_arg_lst(paramlst); } // check_room_subcommand(arg, param_needed, buddy_must_be_a_room) // - Check if this is a room, if buddy_must_be_a_room is not null // - Check there is at least 1 parameter, if param_needed is true // - Return null if one of the checks fails, or a pointer to the first // non-space character. static char *check_room_subcommand(char *arg, bool param_needed, gpointer buddy_must_be_a_room) { if (buddy_must_be_a_room && !(buddy_gettype(buddy_must_be_a_room) & ROSTER_TYPE_ROOM)) { scr_LogPrint(LPRINT_NORMAL, "This isn't a conference room."); return NULL; } if (param_needed) { if (!arg) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); return NULL; } } if (arg) return arg; else return ""; } static void room_join(gpointer bud, char *arg) { char **paramlst; char *roomname, *nick, *pass; char *roomname_tmp = NULL; char *pass_utf8; paramlst = split_arg(arg, 3, 0); // roomid, nickname, password roomname = *paramlst; nick = *(paramlst+1); pass = *(paramlst+2); if (!roomname) nick = NULL; if (!nick) pass = NULL; if (!roomname || !strcmp(roomname, ".")) { // If the current_buddy is recognized as a room, the room name // can be omitted (or "." can be used). if (!bud || !(buddy_gettype(bud) & ROSTER_TYPE_ROOM)) { scr_LogPrint(LPRINT_NORMAL, "Please specify a room name."); free_arg_lst(paramlst); return; } roomname = (char*)buddy_getjid(bud); } else if (strchr(roomname, '/')) { scr_LogPrint(LPRINT_NORMAL, "Invalid room name."); free_arg_lst(paramlst); return; } else { // The room id has been specified. Let's convert it and use it. roomname_tmp = to_utf8(roomname); mc_strtolower(roomname_tmp); roomname = roomname_tmp; } // If no nickname is provided with the /join command, // we try to get a default nickname. if (!nick || !*nick) nick = default_muc_nickname(); else nick = to_utf8(nick); // If we still have no nickname, give up if (!nick || !*nick) { scr_LogPrint(LPRINT_NORMAL, "Please specify a nickname."); g_free(nick); free_arg_lst(paramlst); return; } pass_utf8 = to_utf8(pass); jb_room_join(roomname, nick, pass_utf8); scr_LogPrint(LPRINT_LOGNORM, "Sent a join request to <%s>...", roomname); g_free(roomname_tmp); g_free(nick); g_free(pass_utf8); buddylist_build(); update_roster = TRUE; free_arg_lst(paramlst); } static void room_invite(gpointer bud, char *arg) { char **paramlst; const gchar *roomname; char* fjid; gchar *reason_utf8; paramlst = split_arg(arg, 2, 1); // jid, [reason] fjid = *paramlst; arg = *(paramlst+1); // An empty reason is no reason... if (arg && !*arg) arg = NULL; if (!fjid || !*fjid) { scr_LogPrint(LPRINT_NORMAL, "Missing or incorrect Jabber ID."); free_arg_lst(paramlst); return; } roomname = buddy_getjid(bud); reason_utf8 = to_utf8(arg); jb_room_invite(roomname, fjid, reason_utf8); scr_LogPrint(LPRINT_LOGNORM, "Invitation sent to <%s>.", fjid); g_free(reason_utf8); free_arg_lst(paramlst); } static void room_affil(gpointer bud, char *arg) { char **paramlst; gchar *fjid, *rolename; struct role_affil ra; const char *roomid = buddy_getjid(bud); paramlst = split_arg(arg, 3, 1); // jid, new_affil, [reason] fjid = *paramlst; rolename = *(paramlst+1); arg = *(paramlst+2); if (!fjid || !*fjid || !rolename || !*rolename) { scr_LogPrint(LPRINT_NORMAL, "Please specify both a Jabber ID and a role."); free_arg_lst(paramlst); return; } ra.type = type_affil; ra.val.affil = affil_none; for (; ra.val.affil < imaffiliation_size; ra.val.affil++) if (!strcasecmp(rolename, straffil[ra.val.affil])) break; if (ra.val.affil < imaffiliation_size) { gchar *jid_utf8, *reason_utf8; jid_utf8 = to_utf8(fjid); reason_utf8 = to_utf8(arg); jb_room_setattrib(roomid, jid_utf8, NULL, ra, reason_utf8); g_free(jid_utf8); g_free(reason_utf8); } else scr_LogPrint(LPRINT_NORMAL, "Wrong affiliation parameter."); free_arg_lst(paramlst); } static void room_role(gpointer bud, char *arg) { char **paramlst; gchar *fjid, *rolename; struct role_affil ra; const char *roomid = buddy_getjid(bud); paramlst = split_arg(arg, 3, 1); // jid, new_role, [reason] fjid = *paramlst; rolename = *(paramlst+1); arg = *(paramlst+2); if (!fjid || !*fjid || !rolename || !*rolename) { scr_LogPrint(LPRINT_NORMAL, "Please specify both a Jabber ID and a role."); free_arg_lst(paramlst); return; } ra.type = type_role; ra.val.role = role_none; for (; ra.val.role < imrole_size; ra.val.role++) if (!strcasecmp(rolename, strrole[ra.val.role])) break; if (ra.val.role < imrole_size) { gchar *jid_utf8, *reason_utf8; jid_utf8 = to_utf8(fjid); reason_utf8 = to_utf8(arg); jb_room_setattrib(roomid, jid_utf8, NULL, ra, reason_utf8); g_free(jid_utf8); g_free(reason_utf8); } else scr_LogPrint(LPRINT_NORMAL, "Wrong role parameter."); free_arg_lst(paramlst); } // The expected argument is a Jabber id static void room_ban(gpointer bud, char *arg) { char **paramlst; gchar *fjid; gchar *jid_utf8, *reason_utf8; struct role_affil ra; const char *roomid = buddy_getjid(bud); paramlst = split_arg(arg, 2, 1); // jid, [reason] fjid = *paramlst; arg = *(paramlst+1); if (!fjid || !*fjid) { scr_LogPrint(LPRINT_NORMAL, "Please specify a Jabber ID."); free_arg_lst(paramlst); return; } ra.type = type_affil; ra.val.affil = affil_outcast; jid_utf8 = to_utf8(fjid); reason_utf8 = to_utf8(arg); jb_room_setattrib(roomid, jid_utf8, NULL, ra, reason_utf8); g_free(jid_utf8); g_free(reason_utf8); free_arg_lst(paramlst); } // The expected argument is a Jabber id static void room_unban(gpointer bud, char *arg) { gchar *fjid = arg; gchar *jid_utf8; struct role_affil ra; const char *roomid = buddy_getjid(bud); if (!fjid || !*fjid) { scr_LogPrint(LPRINT_NORMAL, "Please specify a Jabber ID."); return; } ra.type = type_affil; ra.val.affil = affil_none; jid_utf8 = to_utf8(fjid); jb_room_setattrib(roomid, jid_utf8, NULL, ra, NULL); g_free(jid_utf8); } // The expected argument is a nickname static void room_kick(gpointer bud, char *arg) { char **paramlst; gchar *nick; gchar *nick_utf8, *reason_utf8; struct role_affil ra; const char *roomid = buddy_getjid(bud); paramlst = split_arg(arg, 2, 1); // nickname, [reason] nick = *paramlst; arg = *(paramlst+1); if (!nick || !*nick) { scr_LogPrint(LPRINT_NORMAL, "Please specify a nickname."); free_arg_lst(paramlst); return; } ra.type = type_role; ra.val.affil = role_none; nick_utf8 = to_utf8(nick); reason_utf8 = to_utf8(arg); jb_room_setattrib(roomid, NULL, nick_utf8, ra, reason_utf8); g_free(nick_utf8); g_free(reason_utf8); free_arg_lst(paramlst); } void room_leave(gpointer bud, char *arg) { gchar *roomid, *desc; const char *nickname; nickname = buddy_getnickname(bud); if (!nickname) { scr_LogPrint(LPRINT_NORMAL, "You are not in this room."); return; } roomid = g_strdup_printf("%s/%s", buddy_getjid(bud), nickname); desc = to_utf8(arg); jb_setstatus(offline, roomid, desc, TRUE); g_free(desc); g_free(roomid); } static void room_nick(gpointer bud, char *arg) { if (!buddy_getinsideroom(bud)) { scr_LogPrint(LPRINT_NORMAL, "You are not in this room."); return; } if (!arg || !*arg) { const char *nick = buddy_getnickname(bud); if (nick) scr_LogPrint(LPRINT_NORMAL, "Your nickname is: %s", nick); else scr_LogPrint(LPRINT_NORMAL, "You have no nickname in this room."); } else { gchar *roomname, *roomname_tmp, *nick; roomname_tmp = g_strdup(buddy_getjid(bud)); mc_strtolower(roomname_tmp); roomname = to_utf8(roomname_tmp); g_free(roomname_tmp); nick = to_utf8(arg); jb_room_join(roomname, nick, NULL); g_free(roomname); g_free(nick); } } static void room_privmsg(gpointer bud, char *arg) { char **paramlst; gchar *fjid, *nick, *fjid_utf8, *msg; paramlst = split_arg(arg, 2, 1); // nickname, message nick = *paramlst; arg = *(paramlst+1); if (!nick || !*nick || !arg || !*arg) { scr_LogPrint(LPRINT_NORMAL, "Please specify both a Jabber ID and a message."); free_arg_lst(paramlst); return; } fjid = g_strdup_printf("%s/%s", buddy_getjid(bud), nick); fjid_utf8 = to_utf8(fjid); msg = to_utf8(arg); send_message_to(fjid_utf8, msg, NULL, NULL); g_free(fjid); g_free(fjid_utf8); g_free(msg); free_arg_lst(paramlst); } static void room_remove(gpointer bud, char *arg) { if (*arg) { scr_LogPrint(LPRINT_NORMAL, "This action does not require a parameter; " "the currently-selected room will be removed."); return; } // Quick check: if there are resources, we haven't left if (buddy_getinsideroom(bud)) { scr_LogPrint(LPRINT_NORMAL, "You haven't left this room!"); return; } // Delete the room roster_del_user(buddy_getjid(bud)); scr_UpdateBuddyWindow(); buddylist_build(); update_roster = TRUE; } static void room_topic(gpointer bud, char *arg) { gchar *msg; if (!buddy_getinsideroom(bud)) { scr_LogPrint(LPRINT_NORMAL, "You are not in this room."); return; } // If no parameter is given, display the current topic if (!*arg) { const char *topic = buddy_gettopic(bud); if (topic) scr_LogPrint(LPRINT_NORMAL, "Topic: %s", topic); else scr_LogPrint(LPRINT_NORMAL, "No topic has been set."); return; } arg = to_utf8(arg); // Set the topic msg = g_strdup_printf("%s has set the topic to: %s", mkcmdstr("me"), arg); jb_send_msg(buddy_getjid(bud), msg, ROSTER_TYPE_ROOM, arg, NULL, NULL, NULL); g_free(arg); g_free(msg); } static void room_destroy(gpointer bud, char *arg) { gchar *msg; if (arg && *arg) msg = to_utf8(arg); else msg = NULL; jb_room_destroy(buddy_getjid(bud), NULL, msg); g_free(msg); } static void room_unlock(gpointer bud, char *arg) { if (*arg) { scr_LogPrint(LPRINT_NORMAL, "Unknown parameter."); return; } jb_room_unlock(buddy_getjid(bud)); } // room_whois(..) // If interactive is TRUE, chatmode can be enabled. void room_whois(gpointer bud, char *arg, guint interactive) { char **paramlst; gchar *nick, *buffer; const char *bjid, *realjid; const char *rst_msg; gchar rprio; enum imstatus rstatus; enum imrole role; enum imaffiliation affil; time_t rst_time; paramlst = split_arg(arg, 1, 0); // nickname nick = *paramlst; if (!nick || !*nick) { scr_LogPrint(LPRINT_NORMAL, "Please specify a nickname."); free_arg_lst(paramlst); return; } nick = to_utf8(nick); if (interactive) { // Enter chat mode scr_set_chatmode(TRUE); scr_ShowBuddyWindow(); } bjid = buddy_getjid(bud); rstatus = buddy_getstatus(bud, nick); if (rstatus == offline) { scr_LogPrint(LPRINT_NORMAL, "No such member: %s", nick); free_arg_lst(paramlst); g_free(nick); return; } rst_time = buddy_getstatustime(bud, nick); rprio = buddy_getresourceprio(bud, nick); rst_msg = buddy_getstatusmsg(bud, nick); if (!rst_msg) rst_msg = ""; role = buddy_getrole(bud, nick); affil = buddy_getaffil(bud, nick); realjid = buddy_getrjid(bud, nick); buffer = g_new(char, 4096); snprintf(buffer, 4095, "Whois [%s]", nick); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO, 0); snprintf(buffer, 4095, "Status : [%c] %s", imstatus2char[rstatus], rst_msg); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); if (rst_time) { char tbuf[128]; strftime(tbuf, sizeof(tbuf), "%Y-%m-%d %H:%M:%S", localtime(&rst_time)); snprintf(buffer, 127, "Timestamp: %s", tbuf); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } if (realjid) { snprintf(buffer, 4095, "JID : <%s>", realjid); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } snprintf(buffer, 4095, "Role : %s", strrole[role]); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); snprintf(buffer, 4095, "Affiliat.: %s", straffil[affil]); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); snprintf(buffer, 4095, "Priority : %d", rprio); scr_WriteIncomingMessage(bjid, buffer, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); scr_WriteIncomingMessage(bjid, "End of WHOIS", 0, HBB_PREFIX_INFO, 0); g_free(buffer); g_free(nick); free_arg_lst(paramlst); } static void room_bookmark(gpointer bud, char *arg) { const char *roomid; const char *name = NULL, *nick = NULL; enum { bm_add = 0, bm_del = 1 } action = 0; int autojoin = 0; if (arg && *arg) { // /room bookmark [add|del] [[+|-]autojoin] char **paramlst; char **pp; paramlst = split_arg(arg, 2, 0); // At most 2 parameters for (pp = paramlst; *pp; pp++) { if (!strcasecmp(*pp, "add")) action = bm_add; else if (!strcasecmp(*pp, "del")) action = bm_del; else if (!strcasecmp(*pp, "-autojoin")) autojoin = 0; else if (!strcasecmp(*pp, "+autojoin") || !strcasecmp(*pp, "autojoin")) autojoin = 1; } free_arg_lst(paramlst); } roomid = buddy_getjid(bud); if (action == bm_add) { name = buddy_getname(bud); nick = buddy_getnickname(bud); } jb_set_storage_bookmark(roomid, name, nick, NULL, autojoin); } static void display_all_bookmarks(void) { GSList *bm, *bmp; GString *sbuf; bm = jb_get_all_storage_bookmarks(); if (!bm) return; sbuf = g_string_new(""); scr_WriteIncomingMessage(NULL, "List of MUC bookmarks:", 0, HBB_PREFIX_INFO, 0); for (bmp = bm; bmp; bmp = g_slist_next(bmp)) { g_string_printf(sbuf, "<%s>", (char*)bmp->data); scr_WriteIncomingMessage(NULL, sbuf->str, 0, HBB_PREFIX_INFO | HBB_PREFIX_CONT, 0); } scr_setmsgflag_if_needed(SPECIAL_BUFFER_STATUS_ID, TRUE); update_roster = TRUE; g_string_free(sbuf, TRUE); g_slist_free(bm); } static void do_room(char *arg) { char **paramlst; char *subcmd; gpointer bud; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return; } paramlst = split_arg(arg, 2, 1); // subcmd, arg subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); free_arg_lst(paramlst); return; } if (current_buddy) { bud = BUDDATA(current_buddy); } else { if (strcasecmp(subcmd, "join")) { free_arg_lst(paramlst); return; } // "room join" is a special case, we don't need to have a valid // current_buddy. bud = NULL; } if (!strcasecmp(subcmd, "join")) { if ((arg = check_room_subcommand(arg, FALSE, NULL)) != NULL) room_join(bud, arg); } else if (!strcasecmp(subcmd, "invite")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_invite(bud, arg); } else if (!strcasecmp(subcmd, "affil")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_affil(bud, arg); } else if (!strcasecmp(subcmd, "role")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_role(bud, arg); } else if (!strcasecmp(subcmd, "ban")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_ban(bud, arg); } else if (!strcasecmp(subcmd, "unban")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_unban(bud, arg); } else if (!strcasecmp(subcmd, "kick")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_kick(bud, arg); } else if (!strcasecmp(subcmd, "leave")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_leave(bud, arg); } else if (!strcasecmp(subcmd, "names")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_names(bud, arg); } else if (!strcasecmp(subcmd, "nick")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_nick(bud, arg); } else if (!strcasecmp(subcmd, "privmsg")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_privmsg(bud, arg); } else if (!strcasecmp(subcmd, "remove")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_remove(bud, arg); } else if (!strcasecmp(subcmd, "destroy")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_destroy(bud, arg); } else if (!strcasecmp(subcmd, "unlock")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_unlock(bud, arg); } else if (!strcasecmp(subcmd, "topic")) { if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_topic(bud, arg); } else if (!strcasecmp(subcmd, "whois")) { if ((arg = check_room_subcommand(arg, TRUE, bud)) != NULL) room_whois(bud, arg, TRUE); } else if (!strcasecmp(subcmd, "bookmark")) { if (!arg && !buddy_getjid(BUDDATA(current_buddy)) && buddy_gettype(BUDDATA(current_buddy)) == ROSTER_TYPE_SPECIAL) display_all_bookmarks(); else if ((arg = check_room_subcommand(arg, FALSE, bud)) != NULL) room_bookmark(bud, arg); } else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); } free_arg_lst(paramlst); } static void do_authorization(char *arg) { char **paramlst; char *subcmd; char *jid_utf8; if (!jb_getonline()) { scr_LogPrint(LPRINT_NORMAL, "You are not connected."); return; } paramlst = split_arg(arg, 2, 0); // subcmd, [jid] subcmd = *paramlst; arg = *(paramlst+1); if (!subcmd || !*subcmd) { scr_LogPrint(LPRINT_NORMAL, "Missing parameter."); goto do_authorization_return; } // Use the provided jid, if it looks valid if (arg) { if (!*arg) { // If no jid is provided, we use the current selected buddy arg = NULL; } else { if (check_jid_syntax(arg)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", arg); goto do_authorization_return; } } } if (!arg) { // Use the current selected buddy's jid gpointer bud; guint type; if (!current_buddy) goto do_authorization_return; bud = BUDDATA(current_buddy); jid_utf8 = arg = (char*)buddy_getjid(bud); type = buddy_gettype(bud); if (!(type & (ROSTER_TYPE_USER|ROSTER_TYPE_AGENT))) { scr_LogPrint(LPRINT_NORMAL, "Invalid buddy."); goto do_authorization_return; } } else { jid_utf8 = to_utf8(arg); } if (!strcasecmp(subcmd, "allow")) { jb_subscr_send_auth(jid_utf8); scr_LogPrint(LPRINT_LOGNORM, "<%s> is now allowed to receive your presence updates.", jid_utf8); } else if (!strcasecmp(subcmd, "cancel")) { jb_subscr_cancel_auth(jid_utf8); scr_LogPrint(LPRINT_LOGNORM, "<%s> will no longer receive your presence updates.", jid_utf8); } else if (!strcasecmp(subcmd, "request")) { jb_subscr_request_auth(jid_utf8); scr_LogPrint(LPRINT_LOGNORM, "Sent presence notification request to <%s>.", jid_utf8); } else if (!strcasecmp(subcmd, "request_unsubscribe")) { jb_subscr_request_cancel(jid_utf8); scr_LogPrint(LPRINT_LOGNORM, "Sent presence notification unsubscription request to <%s>.", jid_utf8); } else { scr_LogPrint(LPRINT_NORMAL, "Unrecognized parameter!"); } // Only free jid_utf8 if it has been allocated, i.e. if != arg. if (jid_utf8 && jid_utf8 != arg) g_free(jid_utf8); do_authorization_return: free_arg_lst(paramlst); } static void do_version(char *arg) { gchar *ver = mcabber_version(); scr_LogPrint(LPRINT_NORMAL, "This is mcabber version %s.", ver); g_free(ver); } static void do_request(char *arg) { char **paramlst; char *fjid, *type; enum iqreq_type numtype = iqreq_none; char *jid_utf8 = NULL; paramlst = split_arg(arg, 2, 0); // type, jid type = *paramlst; fjid = *(paramlst+1); if (type) { // Quick check... if (!strcasecmp(type, "version")) numtype = iqreq_version; else if (!strcasecmp(type, "time")) numtype = iqreq_time; else if (!strcasecmp(type, "last")) numtype = iqreq_last; else if (!strcasecmp(type, "vcard")) numtype = iqreq_vcard; else if (!strcasecmp(type, "show_list")) { // Undocumented command, for debugging purposes only jb_iqs_display_list(); free_arg_lst(paramlst); return; } } if (!type || !numtype) { scr_LogPrint(LPRINT_NORMAL, "Please specify a query type (version, time...)."); free_arg_lst(paramlst); return; } // Allow special jid "" or "." (current buddy) if (fjid && (!*fjid || !strcmp(fjid, "."))) fjid = NULL; if (fjid) { // The JID has been specified. Quick check... if (check_jid_syntax(fjid)) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", fjid); fjid = NULL; } else { // Convert jid to lowercase char *p; for (p = fjid; *p && *p != JID_RESOURCE_SEPARATOR; p++) *p = tolower(*p); fjid = jid_utf8 = to_utf8(fjid); } } else { // Add the current buddy if (current_buddy) fjid = (char*)buddy_getjid(BUDDATA(current_buddy)); if (!fjid) scr_LogPrint(LPRINT_NORMAL, "Please specify a Jabber ID."); } if (fjid) { switch (numtype) { case iqreq_version: case iqreq_time: case iqreq_last: case iqreq_vcard: jb_request(fjid, numtype); break; default: break; } } g_free(jid_utf8); free_arg_lst(paramlst); } static void do_event(char *arg) { char **paramlst; char *evid, *subcmd; int action = -1; GSList *evidlst; paramlst = split_arg(arg, 2, 0); // id, subcmd evid = *paramlst; subcmd = *(paramlst+1); if (!evid || !subcmd) { // Special case: /event list if (evid && !strcasecmp(evid, "list")) evs_display_list(); else scr_LogPrint(LPRINT_NORMAL, "Missing parameter. Usage: /event num action"); free_arg_lst(paramlst); return; } if (!strcasecmp(subcmd, "reject")) action = 0; else if (!strcasecmp(subcmd, "accept")) action = 1; else if (!strcasecmp(subcmd, "ignore")) action = 2; if (action == -1) { scr_LogPrint(LPRINT_NORMAL, "Wrong action parameter."); } else if (action >= 0 && action <= 2) { GSList *p; if (action == 2) { action = EVS_CONTEXT_CANCEL; } else { action += EVS_CONTEXT_USER; } if (!strcmp(evid, "*")) { // Use completion list evidlst = evs_geteventslist(FALSE); } else { // Let's create a slist with the provided event id evidlst = g_slist_append(NULL, g_strdup(evid)); } for (p = evidlst; p; p = g_slist_next(p)) { if (evs_callback(p->data, action) == -1) { scr_LogPrint(LPRINT_NORMAL, "Event %s not found.", p->data); } g_free(p->data); } g_slist_free(evidlst); } free_arg_lst(paramlst); } static void do_pgp(char *arg) { char **paramlst; char *fjid, *subcmd, *keyid; enum { pgp_none, pgp_enable, pgp_disable, pgp_setkey, pgp_force, pgp_info } op = 0; int force = FALSE; paramlst = split_arg(arg, 3, 0); // subcmd, jid, [key] subcmd = *paramlst; fjid = *(paramlst+1); keyid = *(paramlst+2); if (!subcmd) fjid = NULL; if (!fjid) keyid = NULL; if (subcmd) { if (!strcasecmp(subcmd, "enable")) op = pgp_enable; else if (!strcasecmp(subcmd, "disable")) op = pgp_disable; else if (!strcasecmp(subcmd, "setkey")) op = pgp_setkey; else if ((!strcasecmp(subcmd, "force")) || (!strcasecmp(subcmd, "+force"))) { op = pgp_force; force = TRUE; } else if (!strcasecmp(subcmd, "-force")) op = pgp_force; else if (!strcasecmp(subcmd, "info")) op = pgp_info; } if (!op) { scr_LogPrint(LPRINT_NORMAL, "Unrecognized or missing parameter!"); free_arg_lst(paramlst); return; } // Allow special jid "" or "." (current buddy) if (fjid && (!*fjid || !strcmp(fjid, "."))) fjid = NULL; if (fjid) { // The JID has been specified. Quick check... if (check_jid_syntax(fjid) || !strchr(fjid, '@')) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", fjid); fjid = NULL; } else { // Convert jid to lowercase and strip resource char *p; for (p = fjid; *p && *p != JID_RESOURCE_SEPARATOR; p++) *p = tolower(*p); if (*p == JID_RESOURCE_SEPARATOR) *p = '\0'; } } else { gpointer bud = NULL; if (current_buddy) bud = BUDDATA(current_buddy); if (bud) { guint type = buddy_gettype(bud); if (type & ROSTER_TYPE_USER) // Is it a user? fjid = (char*)buddy_getjid(bud); else scr_LogPrint(LPRINT_NORMAL, "The selected item should be a user."); } } if (fjid) { // fjid is actually a bare jid... guint disabled; GString *sbuf; switch (op) { case pgp_enable: case pgp_disable: settings_pgp_setdisabled(fjid, (op == pgp_disable ? TRUE : FALSE)); break; case pgp_force: settings_pgp_setforce(fjid, force); break; case pgp_setkey: settings_pgp_setkeyid(fjid, keyid); break; case pgp_info: sbuf = g_string_new(""); if (settings_pgp_getkeyid(fjid)) { g_string_printf(sbuf, "PGP Encryption key id: %s", settings_pgp_getkeyid(fjid)); scr_WriteIncomingMessage(fjid, sbuf->str, 0, HBB_PREFIX_INFO, 0); } disabled = settings_pgp_getdisabled(fjid); g_string_printf(sbuf, "PGP encryption is %s", (disabled ? "disabled" : "enabled")); scr_WriteIncomingMessage(fjid, sbuf->str, 0, HBB_PREFIX_INFO, 0); if (!disabled && settings_pgp_getforce(fjid)) { scr_WriteIncomingMessage(fjid, "Encryption enforced (no negotiation)", 0, HBB_PREFIX_INFO, 0); } g_string_free(sbuf, TRUE); break; default: break; } } else { scr_LogPrint(LPRINT_NORMAL, "Please specify a valid Jabber ID."); } free_arg_lst(paramlst); } static void do_otr(char *arg) { #ifdef HAVE_LIBOTR char **paramlst; char *fjid, *subcmd, *keyid; enum { otr_none, otr_start, otr_stop, otr_fpr, otr_smpq, otr_smpr, otr_smpa, otr_k, otr_info } op = 0; if (!otr_enabled()) { scr_LogPrint(LPRINT_LOGNORM, "Warning: OTR hasn't been enabled -- command ignored."); return; } paramlst = split_arg(arg, 3, 0); // subcmd, jid, [key] subcmd = *paramlst; fjid = *(paramlst+1); keyid = *(paramlst+2); if (!subcmd) fjid = NULL; if (!fjid) keyid = NULL; if (subcmd) { if (!strcasecmp(subcmd, "start")) op = otr_start; else if (!strcasecmp(subcmd, "stop")) op = otr_stop; else if (!strcasecmp(subcmd, "fingerprint")) op = otr_fpr; else if (!strcasecmp(subcmd, "smpq")) op = otr_smpq; else if (!strcasecmp(subcmd, "smpr")) op = otr_smpr; else if (!strcasecmp(subcmd, "smpa")) op = otr_smpa; else if (!strcasecmp(subcmd, "key")) op = otr_k; else if (!strcasecmp(subcmd, "info")) op = otr_info; } if (!op) { scr_LogPrint(LPRINT_NORMAL, "Unrecognized or missing parameter!"); free_arg_lst(paramlst); return; } if (op == otr_k) otr_key(); else { // Allow special jid "" or "." (current buddy) if (fjid && (!*fjid || !strcmp(fjid, "."))) fjid = NULL; if (fjid) { // The JID has been specified. Quick check... if (check_jid_syntax(fjid) || !strchr(fjid, '@')) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", fjid); fjid = NULL; } else { // Convert jid to lowercase and strip resource char *p; for (p = fjid; *p && *p != JID_RESOURCE_SEPARATOR; p++) *p = tolower(*p); if (*p == JID_RESOURCE_SEPARATOR) *p = '\0'; } } else { gpointer bud = NULL; if (current_buddy) bud = BUDDATA(current_buddy); if (bud) { guint type = buddy_gettype(bud); if (type & ROSTER_TYPE_USER) // Is it a user? fjid = (char*)buddy_getjid(bud); else scr_LogPrint(LPRINT_NORMAL, "The selected item should be a user."); } } if (fjid) { // fjid is actually a bare jid... switch (op) { case otr_start: otr_establish(fjid); break; case otr_stop: otr_disconnect(fjid); break; case otr_fpr: otr_fingerprint(fjid, keyid); break; case otr_smpq: otr_smp_query(fjid, keyid); break; case otr_smpr: otr_smp_respond(fjid, keyid); break; case otr_smpa: otr_smp_abort(fjid); break; case otr_info: otr_print_info(fjid); break; default: break; } } else scr_LogPrint(LPRINT_NORMAL, "Please specify a valid Jabber ID."); } free_arg_lst(paramlst); #else scr_LogPrint(LPRINT_NORMAL, "Please recompile mcabber with libotr enabled."); #endif /* HAVE_LIBOTR */ } #ifdef HAVE_LIBOTR static char * string_for_otrpolicy(enum otr_policy p) { switch (p) { case plain: return "plain"; case opportunistic: return "opportunistic"; case manual: return "manual"; case always: return "always"; default: return "unknown"; } } static void dump_otrpolicy(char * k, char * v, void * nothing) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "otrpolicy for %s: %s", k, string_for_otrpolicy(*(enum otr_policy*)v)); } #endif static void do_otrpolicy(char *arg) { #ifdef HAVE_LIBOTR char **paramlst; char *fjid, *policy; enum otr_policy p; paramlst = split_arg(arg, 2, 0); // [jid|default] policy fjid = *paramlst; policy = *(paramlst+1); if (!fjid && !policy) { scr_LogPrint(LPRINT_NORMAL, "default otrpolicy: %s", string_for_otrpolicy(settings_otr_getpolicy(NULL))); settings_foreach(SETTINGS_TYPE_OTR, &dump_otrpolicy, NULL); free_arg_lst(paramlst); return; } if (!policy) { scr_LogPrint(LPRINT_NORMAL, "Please call otrpolicy correctly: /otrpolicy (default|jid) " "(plain|manual|opportunistic|always)"); free_arg_lst(paramlst); return; } if (!strcasecmp(policy, "plain")) p = plain; else if (!strcasecmp(policy, "manual")) p = manual; else if (!strcasecmp(policy, "opportunistic")) p = opportunistic; else if (!strcasecmp(policy, "always")) p = always; else { /* Fail, we don't know _this_ policy*/ scr_LogPrint(LPRINT_NORMAL, "mcabber doesn't support _this_ policy!"); free_arg_lst(paramlst); return; } if (!strcasecmp(fjid, "default") || !strcasecmp(fjid, "*")) { /*set default policy*/ settings_otr_setpolicy(NULL, p); free_arg_lst(paramlst); return; } // Allow special jid "" or "." (current buddy) if (fjid && (!*fjid || !strcmp(fjid, "."))) fjid = NULL; if (fjid) { // The JID has been specified. Quick check... if (check_jid_syntax(fjid) || !strchr(fjid, '@')) { scr_LogPrint(LPRINT_NORMAL|LPRINT_NOTUTF8, "<%s> is not a valid Jabber ID.", fjid); fjid = NULL; } else { // Convert jid to lowercase and strip resource char *p; for (p = fjid; *p && *p != JID_RESOURCE_SEPARATOR; p++) *p = tolower(*p); if (*p == JID_RESOURCE_SEPARATOR) *p = '\0'; } } else { gpointer bud = NULL; if (current_buddy) bud = BUDDATA(current_buddy); if (bud) { guint type = buddy_gettype(bud); if (type & ROSTER_TYPE_USER) // Is it a user? fjid = (char*)buddy_getjid(bud); else scr_LogPrint(LPRINT_NORMAL, "The selected item should be a user."); } } if (fjid) settings_otr_setpolicy(fjid, p); else scr_LogPrint(LPRINT_NORMAL, "Please specify a valid Jabber ID."); free_arg_lst(paramlst); #else scr_LogPrint(LPRINT_NORMAL, "Please recompile mcabber with libotr enabled."); #endif /* HAVE_LIBOTR */ } /* !!! After changing the /iline arguments names here, you must change ones in init_bindings(). */ static void do_iline(char *arg) { if (!strcasecmp(arg, "fword")) { readline_forward_word(); } else if (!strcasecmp(arg, "bword")) { readline_backward_word(); } else if (!strcasecmp(arg, "word_fdel")) { readline_forward_kill_word(); } else if (!strcasecmp(arg, "word_bdel")) { readline_backward_kill_word(); } else if (!strcasecmp(arg, "word_upcase")) { readline_updowncase_word(1); } else if (!strcasecmp(arg, "word_downcase")) { readline_updowncase_word(0); } else if (!strcasecmp(arg, "word_capit")) { readline_capitalize_word(); } else if (!strcasecmp(arg, "fchar")) { readline_forward_char(); } else if (!strcasecmp(arg, "bchar")) { readline_backward_char(); } else if (!strcasecmp(arg, "char_fdel")) { readline_forward_kill_char(); } else if (!strcasecmp(arg, "char_bdel")) { readline_backward_kill_char(); } else if (!strcasecmp(arg, "char_swap")) { readline_transpose_chars(); } else if (!strcasecmp(arg, "hist_beginning_search_bwd")) { readline_hist_beginning_search_bwd(); } else if (!strcasecmp(arg, "hist_beginning_search_fwd")) { readline_hist_beginning_search_fwd(); } else if (!strcasecmp(arg, "hist_prev")) { readline_hist_prev(); } else if (!strcasecmp(arg, "hist_next")) { readline_hist_next(); } else if (!strcasecmp(arg, "iline_start")) { readline_iline_start(); } else if (!strcasecmp(arg, "iline_end")) { readline_iline_end(); } else if (!strcasecmp(arg, "iline_fdel")) { readline_forward_kill_iline(); } else if (!strcasecmp(arg, "iline_bdel")) { readline_backward_kill_iline(); } else if (!strcasecmp(arg, "send_multiline")) { readline_send_multiline(); } else if (!strcasecmp(arg, "iline_accept")) { retval_for_cmds = readline_accept_line(FALSE); } else if (!strcasecmp(arg, "iline_accept_down_hist")) { retval_for_cmds = readline_accept_line(TRUE); } else if (!strcasecmp(arg, "compl_cancel")) { readline_cancel_completion(); } else if (!strcasecmp(arg, "compl_do")) { readline_do_completion(); } } static void do_screen_refresh(char *arg) { readline_refresh_screen(); } static void do_chat_disable(char *arg) { readline_disable_chat_mode(); } static void do_source(char *arg) { static int recur_level; gchar *filename, *expfname; if (!*arg) { scr_LogPrint(LPRINT_NORMAL, "Missing filename."); return; } if (recur_level > 20) { scr_LogPrint(LPRINT_LOGNORM, "** Too many source commands!"); return; } filename = g_strdup(arg); strip_arg_special_chars(filename); expfname = expand_filename(filename); recur_level++; cfg_read_file(expfname, FALSE); recur_level--; g_free(filename); g_free(expfname); } static void do_connect(char *arg) { mcabber_connect(); } static void do_disconnect(char *arg) { jb_disconnect(); AutoConnection = false; } static void do_help(char *arg) { help_process(arg); } /* vim: set expandtab cindent cinoptions=>2\:2(0: For Vim users... */