/*
 * Copyright (c) 2003-2007 by FlashCode <flashcode@flashtux.org>
 * See README for License detail, AUTHORS for developers list.
 *
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 */

/* irc-input.c: IRC input data (read from user) */


#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <stdlib.h>
#include <string.h>

#include "../../core/weechat.h"
#include "irc.h"
#include "../../core/utf8.h"
#include "../../core/weechat-config.h"
#include "../../gui/gui.h"


/*
 * irc_input_user_message_display: display user message
 */

void
irc_input_user_message_display (t_gui_window *window, char *text)
{
    t_irc_nick *ptr_nick;

    IRC_BUFFER_GET_SERVER_CHANNEL(window->buffer);
    
    if ((ptr_channel->type == IRC_CHANNEL_TYPE_PRIVATE)
        || (ptr_channel->type == IRC_CHANNEL_TYPE_DCC_CHAT))
    {
        irc_display_nick (window->buffer, NULL, ptr_server->nick,
                          GUI_MSG_TYPE_NICK, 1,
                          GUI_COLOR(GUI_COLOR_CHAT_NICK_SELF), 0);
        gui_chat_printf_type (window->buffer,
                              GUI_MSG_TYPE_MSG,
                              NULL, -1,
                              "%s%s\n",
                              GUI_COLOR(GUI_COLOR_CHAT),
                              text);
    }
    else
    {
        ptr_nick = irc_nick_search (ptr_channel, ptr_server->nick);
        if (ptr_nick)
        {
            irc_display_nick (window->buffer, ptr_nick, NULL,
                              GUI_MSG_TYPE_NICK, 1, NULL, 0);
            gui_chat_printf_type (window->buffer,
                                  GUI_MSG_TYPE_MSG,
                                  NULL, -1,
                                  "%s%s\n",
                                  GUI_COLOR(GUI_COLOR_CHAT),
                                  text);
        }
        else
        {
            gui_chat_printf_error (ptr_server->buffer,
                                   _("%s cannot find nick for sending "
                                     "message\n"),
                                   WEECHAT_ERROR);
        }
    }
}

/*
 * irc_input_send_user_message: send a PRIVMSG message, and split it
 *                              if > 512 bytes
 */

void
irc_input_send_user_message (t_gui_window *window, char *text)
{
    int max_length;
    char *pos, *pos_next, *pos_max, *next, saved_char, *last_space;
    
    IRC_BUFFER_GET_SERVER_CHANNEL(window->buffer);
    
    if (!ptr_server || !ptr_channel || !text || !text[0])
        return;
    
    if (!ptr_server->is_connected)
    {
        gui_chat_printf_error (window->buffer,
                               _("%s you are not connected to server\n"),
                               WEECHAT_ERROR);
        return;
    }
    
    next = NULL;
    last_space = NULL;
    saved_char = '\0';
    
    max_length = 512 - 16 - 65 - 10 - strlen (ptr_server->nick) -
        strlen (ptr_channel->name);
    
    if (max_length > 0)
    {
        if ((int)strlen (text) > max_length)
        {
            pos = text;
            pos_max = text + max_length;
            while (pos && pos[0])
            {
                if (pos[0] == ' ')
                    last_space = pos;
                pos_next = utf8_next_char (pos);
                if (pos_next > pos_max)
                    break;
                pos = pos_next;
            }
            if (last_space && (last_space < pos))
                pos = last_space + 1;
            saved_char = pos[0];
            pos[0] = '\0';
            next = pos;
        }
    }
    
    irc_server_sendf_queued (ptr_server, "PRIVMSG %s :%s",
                             ptr_channel->name, text);
    irc_input_user_message_display (window, text);
    
    if (next)
    {
        next[0] = saved_char;
        irc_input_send_user_message (window, next);
    }
}

/*
 * irc_input_data: read data from user input
 *                 Return: PROTOCOL_RC_OK if ok
 *                         PROTOCOL_RC_KO if error
 */

int
irc_input_data (t_gui_window *window, char *data)
{
    char *data_with_colors;
    
    IRC_BUFFER_GET_CHANNEL(window->buffer);
    
    if (ptr_channel)
    {
        data_with_colors = (char *)irc_color_encode ((unsigned char *)data,
                                                     irc_cfg_irc_colors_send);
        
        if (ptr_channel->dcc_chat)
        {
            if (((t_irc_dcc *)(ptr_channel->dcc_chat))->sock < 0)
            {
                gui_chat_printf_error_nolog (window->buffer,
                                             "%s DCC CHAT is closed\n",
                                             WEECHAT_ERROR);
            }
            else
            {
                irc_dcc_chat_sendf ((t_irc_dcc *)(ptr_channel->dcc_chat),
                                    "%s\r\n",
                                    (data_with_colors) ? data_with_colors : data);
                irc_input_user_message_display (window,
                                                (data_with_colors) ?
                                                data_with_colors : data);
            }
        }
        else
            irc_input_send_user_message (window,
                                         (data_with_colors) ? data_with_colors : data);
        
        if (data_with_colors)
            free (data_with_colors);
    }
    else
    {
        gui_chat_printf_error_nolog (window->buffer,
                                     _("This buffer is not a channel!\n"));
        return PROTOCOL_RC_KO;
    }

    return PROTOCOL_RC_OK;
}