Ticket #53: bitlbee-recode.2.diff

irc.c

@@ -116 +116 @@
         set_add( irc, "buddy_sendbuffer", "false", set_eval_bool );
         set_add( irc, "buddy_sendbuffer_delay", "200", set_eval_int );
         set_add( irc, "charset", "iso8859-1", set_eval_charset );
+        set_add( irc, "oscar_recode_charset", "iso8859-1", set_eval_oscar_recode_charset );
         set_add( irc, "debug", "false", set_eval_bool );
         set_add( irc, "default_target", "root", NULL );
         set_add( irc, "display_namechanges", "false", set_eval_bool );

protocols/oscar/oscar.c

@@ -1029 +1029 @@
         return 1;
 }
 
+extern GSList *irc_connection_list;
+
 static int incomingim_chan1(aim_session_t *sess, aim_conn_t *conn, aim_userinfo_t *userinfo, struct aim_incomingim_ch1_args *args) {
+        char *src="";
         char *tmp = g_malloc(BUF_LONG + 1);
         struct gaim_connection *gc = sess->aux_data;
         int flags = 0;
@@ -1038 +1041 @@
                 flags |= IM_FLAG_AWAY;
         
         if ((args->icbmflags & AIM_IMFLAGS_UNICODE) || (args->icbmflags & AIM_IMFLAGS_ISO_8859_1)) {
-                char *src;
                 
                 if (args->icbmflags & AIM_IMFLAGS_UNICODE)
                         src = "UNICODEBIG";
                 else
-                        src = "ISO8859-1";
+                {
+                        char *cs;
+                        irc_t *irc = (irc_t*)irc_connection_list->data;
+                        if( ( cs = set_getstr( irc, "oscar_recode_charset" ) ) && ( g_strcasecmp( cs, "utf-8" ) != 0 ) )
+                                src = cs;
+                        else
+                                src = "iso88590-1";
+                }
                 
                 /* Try to use iconv first to convert the message to UTF8 - which is what BitlBee expects */
                 if (do_iconv(src, "UTF-8", args->msg, tmp, args->msglen, BUF_LONG) >= 0) {
@@ -1063 +1072 @@
                                 }
                         }
                 } else {
-                        g_snprintf(tmp, BUF_LONG, "%s", args->msg);
+                        char *cs;
+                        irc_t *irc = (irc_t*)irc_connection_list->data;
+                        if( ( cs = set_getstr( irc, "oscar_recode_charset" ) ) && ( g_strcasecmp( cs, "utf-8" ) != 0 ) )
+                                src = cs;
+                        else
+                                src = "iso88590-1";
+                        if (do_iconv(src, "UTF-8", args->msg, tmp, args->msglen, BUF_LONG) < 0) {
+                                g_snprintf(tmp, BUF_LONG, "[1%s]%s", src, args->msg);
+                        }
                 }
-        } else
-                g_snprintf(tmp, BUF_LONG, "%s", args->msg);
-        
+        } else {
+                char *cs;
+                irc_t *irc = (irc_t*)irc_connection_list->data;
+                if( ( cs = set_getstr( irc, "oscar_recode_charset" ) ) && ( g_strcasecmp( cs, "utf-8" ) != 0 ) )
+                        src = cs;
+                else
+                        src = "iso88590-1";
+                if (do_iconv(src, "UTF-8", args->msg, tmp, args->msglen, BUF_LONG) < 0) {
+                        g_snprintf(tmp, BUF_LONG, "[2%s]%s", src, args->msg);
+                }
+        }
+
         strip_linefeed(tmp);
         serv_got_im(gc, userinfo->sn, tmp, flags, time(NULL), -1);
         g_free(tmp);

util.c

@@ -453 +453 @@
         iconv_close( cd );
         return( value );
 }
+
+char *set_eval_oscar_recode_charset( irc_t *irc, set_t *set, char *value )
+{
+        iconv_t cd;
+
+        if ( g_strncasecmp( value, "none", 4 ) == 0 )
+                return( value );
+
+        cd = iconv_open( "UTF-8", value );
+        if( cd == (iconv_t) -1 )
+                return( NULL );
+
+        iconv_close( cd );
+        return( value );
+}

util.h

@@ -46 +46 @@
 
 G_MODULE_EXPORT signed int do_iconv( char *from_cs, char *to_cs, char *src, char *dst, size_t size, size_t maxbuf );
 char *set_eval_charset( irc_t *irc, set_t *set, char *value );
+char *set_eval_oscar_recode_charset( irc_t *irc, set_t *set, char *value );
 
 #endif