HANDLE CYahooProto::AddToList( int flags, PROTOSEARCHRESULT* psr )
{
debugLogA("[YahooAddToList] Flags: %d", flags);
if (!m_bLoggedIn) {
debugLogA("[YahooAddToList] WARNING: WE ARE OFFLINE!");
return 0;
}
if (psr == NULL || psr->cbSize != sizeof( PROTOSEARCHRESULT )) {
debugLogA("[YahooAddToList] Empty data passed?");
return 0;
}
char *id = psr->flags & PSR_UNICODE ? mir_utf8encodeW((wchar_t*)psr->id) : mir_utf8encode((char*)psr->id);
HANDLE hContact = getbuddyH(id);
if (hContact != NULL) {
if (db_get_b(hContact, "CList", "NotOnList", 0)) {
debugLogA("[YahooAddToList] Temporary Buddy:%s already on our buddy list", id);
//return 0;
} else {
debugLogA("[YahooAddToList] Buddy:%s already on our buddy list", id);
mir_free(id);
return 0;
}
} else if (flags & PALF_TEMPORARY) { /* not on our list */
debugLogA("[YahooAddToList] Adding Temporary Buddy:%s ", id);
}
int protocol = psr->reserved[0];
debugLogA("Adding buddy:%s", id);
hContact = add_buddy(id, id, protocol, flags);
mir_free(id);
return hContact;
}
void process_message_from_server(unsigned char *in_data, int data_lenght)
{
//see what kind of data we got
switch (in_data[PROTOCOL])
{
case RAW_TEXT:
{
// do filtering and ignoring
data_lenght=filter_or_ignore_text(&in_data[3],data_lenght-3)+3;
if(data_lenght > 3)
{
//how to display it
if(interface_mode!=interface_opening)
put_text_in_buffer(&in_data[3],data_lenght-3,0);
else put_text_in_buffer(&in_data[3],data_lenght-3,54);
//lets log it
write_to_log(&in_data[3],data_lenght-3);
}
}
break;
case SMALL_WINDOW_TEXT:
{
add_text_to_small_text_buffer(in_data+3, data_lenght-3);
display_small_text_window();
}
break;
case ADD_NEW_ACTOR:
{
add_actor_from_server(&in_data[3]);
}
break;
case ADD_NEW_ENHANCED_ACTOR:
{
add_enhanced_actor_from_server(&in_data[3]);
}
break;
case ADD_ACTOR_COMMAND:
{
add_command_to_actor(*((short *)(in_data+3)),in_data[5]);
}
break;
case REMOVE_ACTOR:
{
destroy_actor(*((short *)(in_data+3)));
}
break;
case KILL_ALL_ACTORS:
{
destroy_all_actors();
}
break;
case NEW_MINUTE:
{
game_minute=*((short *)(in_data+3));
new_minute();
}
break;
case LOG_IN_OK:
{
interface_mode=interface_game;
previously_logged_in=1;
}
break;
case HERE_YOUR_STATS:
{
get_the_stats((Sint16 *)(in_data+3));
}
break;
case SEND_PARTIAL_STAT:
{
get_partial_stat(*((Uint8 *)(in_data+3)),*((Sint32 *)(in_data+4)));
}
break;
case GET_KNOWLEDGE_LIST:
{
get_knowledge_list(*(Uint16 *)(in_data+1)-1, in_data+3);
}
break;
case GET_NEW_KNOWLEDGE:
{
get_new_knowledge(*(Uint16 *)(in_data+3));
}
break;
case HERE_YOUR_INVENTORY:
{
get_your_items(in_data+3);
}
break;
case GET_NEW_INVENTORY_ITEM:
{
get_new_inventory_item(in_data+3);
}
break;
case REMOVE_ITEM_FROM_INVENTORY:
{
remove_item_from_inventory(*((Uint8 *)(in_data+3)));
}
break;
case INVENTORY_ITEM_TEXT:
{
put_small_text_in_box(&in_data[3],data_lenght-3,6*51+100,items_string);
if(!(get_show_window(items_win)||get_show_window(trade_win)))
{
put_text_in_buffer(&in_data[3],data_lenght-3,0);
}
}
break;
case GET_KNOWLEDGE_TEXT:
{
put_small_text_in_box(&in_data[3],data_lenght-3,6*51+150,knowledge_string);
}
break;
case CHANGE_MAP:
{
current_sector=-1;
if(map_file_name[0]!=0)
save_map(map_file_name);
object_under_mouse=-1;//to prevent a nasty crash, while looking for bags, when we change the map
close_dialogue(); // close the dialogue window if open
destroy_all_particles();
if(!load_map(&in_data[4])){ // creating map if it does not exist
int size=(in_data[3]&0x1f)<<4;
new_map(size,size);
dungeon=(in_data[3]&0x20)?1:0;
strcpy(map_file_name,&in_data[4]);
save_map(map_file_name);
}
kill_local_sounds();
#ifndef NO_MUSIC
playing_music=0;
#endif //NO_MUSIC
get_map_playlist();
have_a_map=1;
//also, stop the rain
seconds_till_rain_starts=-1;
seconds_till_rain_stops=-1;
is_raining=0;
rain_sound=0;//kill local sounds also kills the rain sound
weather_light_offset=0;
rain_light_offset=0;
}
break;
case GET_TELEPORTERS_LIST:
{
add_teleporters_from_list(&in_data[3]);
}
break;
case PLAY_MUSIC:
{
if(!no_sound)play_music(*((short *)(in_data+3)));
}
break;
case PLAY_SOUND:
{
if(!no_sound)add_sound_object(*((short *)(in_data+3)),*((short *)(in_data+5)),*((short *)(in_data+7)),*((char *)(in_data+9)),*((short *)(in_data+10)));
}
break;
case TELEPORT_OUT:
{
add_particle_sys_at_tile("./particles/teleport_in.part",*((short *)(in_data+3)),*((short *)(in_data+5)));
if(!no_sound)add_sound_object(snd_tele_out,*((short *)(in_data+3)),*((short *)(in_data+5)),1,0);
}
break;
case TELEPORT_IN:
{
add_particle_sys_at_tile("./particles/teleport_in.part",*((short *)(in_data+3)),*((short *)(in_data+5)));
if(!no_sound)add_sound_object(snd_tele_in,*((short *)(in_data+3)),*((short *)(in_data+5)),1,0);
}
break;
case LOG_IN_NOT_OK:
{
sprintf(log_in_error_str,"%s: %s",reg_error_str,invalid_pass);
}
break;
case REDEFINE_YOUR_COLORS:
{
strcpy(log_in_error_str,redefine_your_colours);
}
break;
case YOU_DONT_EXIST:
{
sprintf(log_in_error_str,"%s: %s",reg_error_str,char_dont_exist);
}
break;
case CREATE_CHAR_NOT_OK:
{
sprintf(create_char_error_str,"%s: %s",reg_error_str,char_name_in_use);
return;
}
break;
case CREATE_CHAR_OK:
{
login_from_new_char();
}
break;
case YOU_ARE:
{
yourself=*((short *)(in_data+3));
}
break;
case START_RAIN:
{
seconds_till_rain_starts=*((Uint8 *)(in_data+3));
seconds_till_rain_stops=-1;
}
break;
case STOP_RAIN:
{
seconds_till_rain_stops=*((Uint8 *)(in_data+3));
seconds_till_rain_starts=-1;
}
break;
case THUNDER:
{
add_thunder(rand()%5,*((Uint8 *)(in_data+3)));
}
break;
case SYNC_CLOCK:
{
server_time_stamp=*((int *)(in_data+3));
client_time_stamp=SDL_GetTicks();
client_server_delta_time=server_time_stamp-client_time_stamp;
}
break;
case PONG:
{
Uint8 str[160];
sprintf(str,"%s: %i MS",server_latency, SDL_GetTicks()-*((Uint32 *)(in_data+3)));
log_to_console(c_green1,str);
}
break;
case UPGRADE_NEW_VERSION:
{
log_to_console(c_red1,update_your_client);
log_to_console(c_red1,(char*)web_update_address);
}
break;
case UPGRADE_TOO_OLD:
{
log_to_console(c_red1,client_ver_not_supported);
log_to_console(c_red1,(char*)web_update_address);
this_version_is_invalid=1;
}
break;
case GET_NEW_BAG:
{
put_bag_on_ground(*((Uint16 *)(in_data+3)),*((Uint16 *)(in_data+5)),*((Uint8 *)(in_data+7)));
}
break;
case GET_BAGS_LIST:
{
add_bags_from_list(&in_data[3]);
}
break;
case SPAWN_BAG_PARTICLES:
{
add_particle_sys_at_tile("./particles/bag_in.part",*((Uint16 *)(in_data+3)),*((Uint16 *)(in_data+5)));
}
break;
case GET_NEW_GROUND_ITEM:
{
get_bag_item(in_data+3);
}
break;
case HERE_YOUR_GROUND_ITEMS:
{
get_bags_items_list(&in_data[3]);
}
break;
case CLOSE_BAG:
{
hide_window(ground_items_win);
}
break;
case REMOVE_ITEM_FROM_GROUND:
{
remove_item_from_ground(in_data[3]);
}
break;
case DESTROY_BAG:
{
remove_bag(in_data[3]);
}
break;
case NPC_TEXT:
{
put_small_text_in_box(&in_data[3],data_lenght-3,dialogue_menu_x_len-70,dialogue_string);
display_dialogue();
if(in_data[3]>=127 && in_data[4]>=127)
{
add_questlog(&in_data[4],data_lenght-4);
}
}
break;
case SEND_NPC_INFO:
{
my_strcp(npc_name,&in_data[3]);
cur_portrait=in_data[23];
}
break;
case NPC_OPTIONS_LIST:
{
build_response_entries(&in_data[3],*((Uint16 *)(in_data+1)));
}
break;
case GET_TRADE_ACCEPT:
{
if(!in_data[3])trade_you_accepted=1;
else
trade_other_accepted=1;
}
break;
case GET_TRADE_REJECT:
{
if(!in_data[3])trade_you_accepted=0;
else
trade_other_accepted=0;
}
break;
case GET_TRADE_EXIT:
{
hide_window(trade_win);
}
break;
case GET_YOUR_TRADEOBJECTS:
{
get_your_trade_objects(in_data+3);
}
break;
case GET_TRADE_OBJECT:
{
put_item_on_trade(in_data+3);
}
break;
case REMOVE_TRADE_OBJECT:
{
remove_item_from_trade(in_data+3);
}
break;
case GET_TRADE_PARTNER_NAME:
{
get_trade_partner_name(&in_data[3],*((Uint16 *)(in_data+1))-1);
}
break;
case GET_ACTOR_DAMAGE:
{
get_actor_damage(*((Uint16 *)(in_data+3)),in_data[5]);
}
break;
case GET_ACTOR_HEAL:
{
get_actor_heal(*((Uint16 *)(in_data+3)),in_data[5]);
}
break;
case ACTOR_UNWEAR_ITEM:
{
unwear_item_from_actor(*((Uint16 *)(in_data+3)),in_data[5]);
}
break;
case ACTOR_WEAR_ITEM:
{
actor_wear_item(*((Uint16 *)(in_data+3)),in_data[5],in_data[6]);
}
break;
case NPC_SAY_OVERTEXT:
{
add_displayed_text_to_actor(
get_actor_ptr_from_id( *((Uint16 *)(in_data+3)) ), in_data+5 );
}
break;
case BUDDY_EVENT:
{
if(in_data[3]==1)
add_buddy(&in_data[5],in_data[4],data_lenght-5);
else if(in_data[3]==0)
del_buddy(&in_data[4],data_lenght-4);
}
break;
// BARREN MOON NEW MESSAGES
case THIS_IS_ACTIVE_SECTOR:
active_sector=*((Uint16 *)(in_data+3));
break;
case GET_TILE_DATA:
get_tile_data(in_data+3);
break;
case GET_3D_OBJECTS:
get_3d_objects(in_data+3);
break;
case GET_2D_OBJECTS:
get_2d_objects(in_data+3);
break;
case GET_LIGHT_OBJECTS:
get_light_objects(in_data+3);
break;
case GET_PARTICLE_OBJECTS:
get_particle_objects(in_data+3);
break;
case GET_3D_OBJECTS_FULL_ROTATION:
get_3d_objects_full_rotation(in_data+3);
break;
case GET_CHECKSUMS:
{
actor *actor=pf_get_our_actor();
get_checksums(in_data+3, sector_get(actor->x_pos,actor->y_pos));
break;
}
case ADD_3D_OBJECT:
add_3d_object(in_data+3);
break;
case ADD_3D_OBJECT_FULL_ROTATION:
add_3d_object_fullrotation(in_data+3);
break;
case DELETE_3D_OBJECT:
delete_3d_object(in_data+3);
break;
case REPLACE_3D_OBJECT:
replace_3d_object(in_data+3);
break;
case ADD_2D_OBJECT:
add_2d_object(in_data+3);
break;
case DELETE_2D_OBJECT:
delete_2d_object(in_data+3);
break;
case REPLACE_2D_OBJECT:
replace_2d_object(in_data+3);
break;
case ADD_LIGHT:
add_lights(in_data+3);
break;
case DELETE_LIGHT:
delete_light(in_data+3);
break;
case ADD_PARTICLE:
add_particle(in_data+3);
break;
case DELETE_PARTICLE:
delete_particle(in_data+3);
break;
case REPLACE_PARTICLE:
replace_particle(in_data+3);
break;
default:
{
/* Unknown data type?? */;
}
break;
}
}
void handle_client( void* addrnew_client)
{
/* Handles each new client request */
int new_client=(int)addrnew_client;
char *buf=(char*)malloc(sizeof(char)*255);
int n;
/* First we send a welcome message of the server, just for information */
Serv_Msg *s_m = (Serv_Msg *)malloc(sizeof(Serv_Msg));
Cred cr;
Cred *cr1, *cr_recv;
Cl_Msg *c_m = (Cl_Msg *)malloc(sizeof(Cl_Msg));
ChatRoom *chat_room;
strcpy(s_m->wm, "Welcome to AASVAR Chat Server! Enjoy\nIdentify yourself to the server.");
send(new_client, s_m, sizeof(Serv_Msg), 0);
while(1){
if( (n= recv( new_client, c_m, sizeof(Cl_Msg), 0)) !=-1 && n !=0)
{
cr = find_cr_by_client_id(bl, new_client);
switch(c_m->type){
/* Logon process */
/* Existing user */
case EXIST_USER:
if(is_exist_buddy(bl, c_m->cr) && !is_signed_in(bl, c_m->cr) && check_cred(bl, c_m->cr)){
sign_on_buddy(bl, c_m->cr, new_client);
strcpy(s_m->m, c_m->cr.u_name);
s_m->l_r = OLD_SIGNED_IN;
}
else if(is_exist_buddy(bl, c_m->cr)){
s_m->l_r = SIGNED_IN_OR_PASS;
}
else s_m->l_r = DO_NOT_EXIST;
s_m->type = LOGIN_RES;
send(new_client, s_m, sizeof(Serv_Msg), 0);
break;
case NEW_USER:
if(is_exist_buddy(bl, c_m->cr))
s_m->l_r = OLD_EXIST;
else{
add_buddy(bl, c_m->cr, new_client);
sign_on_buddy(bl, c_m->cr, new_client);
strcpy(s_m->m, c_m->cr.u_name);
s_m->l_r = NEW_CREATED;
}
s_m->type = LOGIN_RES;
send(new_client, s_m, sizeof(Serv_Msg), 0);
break;
case GET_BL:
/* Send the current buddy list with all signed on users */
get_buddy_list(bl, s_m);
s_m->type = BL_RES;
send(new_client, s_m, sizeof(Serv_Msg), 0);
break;
case IM_REQ_CL:
/* Tries to generate an IM b/w two connecting entities */
/* Check again if the buddy exist in the queue */
if(is_exist_buddy(bl, c_m->cr)){
s_m->type = IM_REQ_SERV;
cr = find_cr_by_client_id(bl, new_client);
/* Send a packet to the receiver to ack the packet */
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
else printf("Buddy not found!");
break;
case IM_ACK_CL:
break;
case CHAT_ROOM_CREAT_REQ_CL:
/* Starts a new chat room */
chat_room = create_chat_room(chat_rooms, cr.u_name);
add_cr_to_chat_room(chat_room, cr);
s_m->type = CHAT_ROOM_CREAT;
sprintf(s_m->m, "Chat room with name %s created!\n", chat_room->name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
break;
case CHAT_ROOM_JOIN_REQ_CL:
/* Search the chat room with the specified name */
chat_room = find_chat_room(chat_rooms, c_m->chat_room_name);
if(chat_room != NULL){
add_cr_to_chat_room(chat_room, cr);
s_m->type = CHAT_ROOM_JOINED;
sprintf(s_m->m, "Chat room %s joined!\n", chat_room->name);
}
else{
s_m->type = ERR;
sprintf(s_m->m, "No chat room with name %s found!\n", c_m->chat_room_name);
}
send(new_client, s_m, sizeof(Serv_Msg), 0);
break;
case CHAT_ROOM_SEND_MSG:
/* Sends a message to all clients in the chat room */
if((chat_room =find_chat_room(chat_rooms, c_m->chat_room_name))!=NULL&& is_user_added_chat_room(chat_room, cr))
broadcast_chat_msg(chat_room, c_m->cm, cr);
else if(chat_room == NULL){
s_m->type = ERR;
sprintf(s_m->m, "No chat room with name %s found!\n", c_m->chat_room_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
else{
s_m->type = ERR;
sprintf(s_m->m, "You are not added!\n", c_m->chat_room_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
break;
case IM_START_REQ:
/* Asks the other client if it is okay to start IM */
cr1 = find_cr_by_name(bl, c_m->im.cr.u_name);
if(cr1){
s_m->type = IM_START_CONF;
s_m->im.cr = find_cr_by_client_id(bl, new_client);
send(cr1->socket_id, s_m, sizeof(Serv_Msg), 0);
}
else{
s_m->type = ERR;
sprintf(s_m->m, "The user %s does not exist!\n", c_m->im.cr.u_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
break;
case SIGN_OUT_CL:
/* Locate the user */
cr = find_cr_by_client_id(bl, new_client);
sign_out_buddy(bl, cr);
s_m->type = SIGN_OUT_CONF;
sprintf(s_m->m, "You have been successfully signed out!\n");
send(new_client, s_m, sizeof(Serv_Msg), 0);
break;
case IM_SEND:
/* Locate the user requested */
cr = find_cr_by_client_id(bl, new_client);
cr_recv = find_cr_by_name(bl,c_m->im.cr.u_name);
if(!cr_recv){
/* User not found! */
s_m->type = ERR;
sprintf(s_m->m, "The user %s does not exist\n", c_m->im.cr.u_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
else if(!is_signed_in(bl, *cr_recv)){
s_m->type = ERR;
sprintf(s_m->m, "The user %s is offline!\n", c_m->im.cr.u_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
else{
s_m->im = c_m->im;
s_m->im.cr = cr;
s_m->type = IM_RECV;
send(cr_recv->socket_id, s_m, sizeof(Serv_Msg), 0);
}
break;
case FILE_XFER_SEND:
/* Locate the user requested */
cr_recv = find_cr_by_name(bl,c_m->cr.u_name);
if(!cr_recv){
/* User not found! */
s_m->type = ERR;
sprintf(s_m->m, "The user %s does not exist\n", c_m->im.cr.u_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
else if(!is_signed_in(bl, *cr_recv)){
s_m->type = ERR;
sprintf(s_m->m, "The user %s is offline!\n", c_m->im.cr.u_name);
send(new_client, s_m, sizeof(Serv_Msg), 0);
}
else{
s_m->fx = c_m->fx;
s_m->type = FILE_XFER_RECV;
send(cr_recv->socket_id, s_m, sizeof(Serv_Msg), 0);
}
break;
}
}
else if (n == 0){
cr = find_cr_by_client_id(bl, new_client);
printf("Client %s has quit: removing from list\n", cr.u_name);
sign_out_buddy(bl, cr);
s_m->type = SIGN_OUT_CONF;
return;
}
else
{ perror("cant get message, exiting\n");
exit(1);
}
}
}
GList *fb_get_buddies_friend_list (FacebookAccount *fba,
const gchar *uid, JsonArray *friend_list_ids)
{
GSList *buddies;
GSList *cur;
GHashTable *cur_groups;
int i;
GList *final_buddies, *cur_buddy;
PurpleGroup *fb_group;
PurpleBuddy *buddy;
final_buddies = NULL;
buddies = purple_find_buddies(fba->account, uid);
// If we're already in the buddy list, stop. Ignore FB info because
// it will be incorrect.
if (atoll(uid) == fba->uid && buddies != NULL) {
purple_debug_info("facebook",
"already have buddies for self, not adding\n");
for (cur = buddies; cur != NULL; cur = cur->next)
{
final_buddies = g_list_append(
final_buddies, cur->data);
}
g_slist_free(buddies);
return final_buddies;
}
//Do we want to ignore groups?
if (!purple_account_get_bool(fba->account, "facebook_use_groups", TRUE))
{
if (buddies != NULL) {
//Copy the slist into the list
for (cur = buddies; cur != NULL; cur = cur->next)
{
final_buddies = g_list_append(
final_buddies, cur->data);
}
g_slist_free(buddies);
return final_buddies;
} else {
buddy = purple_buddy_new(fba->account, uid, NULL);
fb_group = purple_find_group(DEFAULT_GROUP_NAME);
if (fb_group == NULL)
{
fb_group = purple_group_new(DEFAULT_GROUP_NAME);
purple_blist_add_group(fb_group, NULL);
}
purple_blist_add_buddy(buddy, NULL, fb_group, NULL);
final_buddies = g_list_append(final_buddies, buddy);
return final_buddies;
}
}
// Determine what buddies exist and what groups they are in.
cur_groups = g_hash_table_new_full(g_str_hash, g_str_equal,
g_free, NULL);
for (cur = buddies; cur != NULL; cur = cur->next)
{
const gchar *group_name;
group_name = purple_group_get_name(purple_buddy_get_group(
(PurpleBuddy *)cur->data));
group_name = purple_normalize_nocase(NULL, group_name);
g_hash_table_insert(cur_groups, g_strdup(group_name), cur->data);
}
g_slist_free(buddies);
// Create/insert necessary buddies
if (friend_list_ids) {
for (i = 0; i < json_array_get_length(friend_list_ids); i++)
{
const gchar *friend_list_id;
friend_list_id = json_node_get_string(
json_array_get_element(friend_list_ids, i));
buddy = add_buddy(fba, friend_list_id, uid, cur_groups);
final_buddies = g_list_append(final_buddies, buddy);
}
} else {
// No friend list data, so we use the default group.
final_buddies = g_list_append(final_buddies,
add_buddy(fba, "-1", uid, cur_groups));
}
// Figure out which groups/buddies are not represented.
for (cur_buddy = final_buddies; cur_buddy != NULL;
cur_buddy = cur_buddy->next)
{
const gchar *group_name = purple_group_get_name(purple_buddy_get_group(
(PurpleBuddy *)cur_buddy->data));
g_hash_table_remove(cur_groups, purple_normalize_nocase(NULL, group_name));
}
// Delete remaining buddies to maintain sync state with server.
g_hash_table_foreach(cur_groups, destroy_buddy, fba);
// Cleanup!
g_hash_table_destroy(cur_groups);
return final_buddies;
}
void CYahooProto::ext_got_im(const char *me, const char *who, int protocol, const char *msg,
long tm, int stat, int utf8, int buddy_icon,
const char *seqn, int sendn)
{
char *umsg;
const char *c = msg;
int oidx = 0;
LOG(("YAHOO_GOT_IM id:%s %s: %s (len: %d) tm:%lu stat:%i utf8:%i buddy_icon: %i", me, who, msg, lstrlenA(msg), tm, stat, utf8, buddy_icon));
if (stat == 2) {
char z[1024];
mir_snprintf(z, SIZEOF(z), "Error sending message to %s", who);
LOG((z));
ShowError( TranslateT("Yahoo Error"), _A2T(z));
return;
}
if (!msg) {
LOG(("Empty Incoming Message, exiting."));
return;
}
if (getByte("IgnoreUnknown", 0)) {
/*
* Check our buddy list to see if we have it there. And if it's not on the list then we don't accept any IMs.
*/
if (getbuddyH(who) == NULL) {
LOG(("Ignoring unknown user messages. User '%s'. Dropping Message.", who));
return;
}
}
if ( BuddyIgnored( who )) {
LOG(("User '%s' on our Ignore List. Dropping Message.", who));
return;
}
// make a bigger buffer for \n -> \r\n conversion (x2)
umsg = (char *) alloca(lstrlenA(msg) * 2 + 1);
while ( *c != '\0') {
// Strip the font tag
if (!_strnicmp(c,"<font ",6) || !_strnicmp(c,"</font>",6) ||
// strip the fade tag
!_strnicmp(c, "<FADE ",6) || !_strnicmp(c,"</FADE>",7) ||
// strip the alternate colors tag
!_strnicmp(c, "<ALT ",5) || !_strnicmp(c, "</ALT>",6)) {
while ((*c++ != '>') && (*c != '\0'));
} else
// strip ANSI color combination
if ((*c == 0x1b) && (*(c+1) == '[')) {
while ((*c++ != 'm') && (*c != '\0'));
} else
if (*c != '\0') {
umsg[oidx++] = *c;
/* Adding \r to \r\n conversion */
if (*c == '\r' && *(c + 1) != '\n')
umsg[oidx++] = '\n';
c++;
}
}
umsg[oidx++]= '\0';
/* Need to strip off formatting stuff first. Then do all decoding/converting */
LOG(("%s: %s", who, umsg));
HANDLE hContact = add_buddy(who, who, protocol, PALF_TEMPORARY);
//setWord(hContact, "yprotoid", protocol);
Set_Protocol(hContact, protocol);
PROTORECVEVENT pre = { 0 };
pre.flags = (utf8) ? PREF_UTF : 0;
if (tm) {
HANDLE hEvent = db_event_last(hContact);
if (hEvent) { // contact has events
DWORD dummy;
DBEVENTINFO dbei = { sizeof (dbei) };
dbei.pBlob = (BYTE*)&dummy;
dbei.cbBlob = 2;
if (!db_event_get(hEvent, &dbei))
// got that event, if newer than ts then reset to current time
if ((DWORD)tm < dbei.timestamp) tm = (long)time(NULL);
}
pre.timestamp = (DWORD)time(NULL);
if ((DWORD)tm < pre.timestamp)
pre.timestamp = tm;
}
else pre.timestamp = (DWORD)time(NULL);
pre.szMessage = umsg;
pre.lParam = 0;
// Turn off typing
CallService(MS_PROTO_CONTACTISTYPING, (WPARAM) hContact, PROTOTYPE_CONTACTTYPING_OFF);
ProtoChainRecvMsg(hContact, &pre);
// ack the message we just got
if (seqn)
yahoo_send_im_ack(m_id, me, who, seqn, sendn);
if (buddy_icon < 0) return;
//?? Don't generate floods!!
setByte(hContact, "AvatarType", (BYTE)buddy_icon);
if (buddy_icon != 2)
reset_avatar(hContact);
else if (getDword(hContact, "PictCK", 0) == 0) /* request the buddy image */
request_avatar(who);
}
static int ServiceParseYmsgrLink(WPARAM wParam, LPARAM lParam)
{
char *arg = (char*)lParam;
UNREFERENCED_PARAMETER(wParam);
if (arg == NULL) return 1; /* sanity check */
/*
add user: ymsgr:addfriend?ID
send message: ymsgr:sendim?ID&m=MESSAGE
add chatroom: ymsgr:chat?ROOM
*/
/* skip leading prefix */
arg = strchr(arg, ':');
if (arg == NULL) return 1; /* parse failed */
for (++arg; *arg == '/'; ++arg);
/* add a contact to the list */
if (!_strnicmp(arg, "addfriend?", 10)) {
char *tok, *id = NULL;
ADDCONTACTSTRUCT acs;
PROTOSEARCHRESULT psr;
if (*(arg += 10) == 0) return 1; /* parse failed */
tok = strtok(arg, "&"); /* first token */
if (tok != NULL) id = Netlib_UrlDecode(tok);
if (id == NULL || *id == 0) return 1; /* parse failed */
if (getbuddyH(id) == NULL) { /* does not yet check if id is current user */
acs.handleType = HANDLE_SEARCHRESULT;
acs.szProto = yahooProtocolName;
acs.psr = &psr;
memset(&psr, 0, sizeof(PROTOSEARCHRESULT));
psr.cbSize = sizeof(PROTOSEARCHRESULT);
psr.nick.t = id;
CallService(MS_ADDCONTACT_SHOW, 0, (LPARAM)&acs);
}
return 0;
}
/* send a message to a contact */
else if (!_strnicmp(arg, "sendim?", 7)) {
char *tok, *id = NULL, *msg = NULL;
MCONTACT hContact;
if (*(arg += 7) == 0) return 1; /* parse failed */
tok = strtok(arg, "&"); /* first token */
if (tok != NULL) id = tok;
while (tok != NULL) {
if (!_strnicmp(tok, "m=", 2) && *(tok + 2) != 0)
msg = Netlib_UrlDecode(tok + 2);
tok = strtok(NULL, "&"); /* next token */
}
if (id == NULL || *id == 0) return 1; /* parse failed */
if (ServiceExists(MS_MSG_SENDMESSAGE)) { /* does not yet check if sn is current user */
hContact = add_buddy(id, id, PALF_TEMPORARY); /* ensure contact is on list */
if (hContact != NULL)
CallService(MS_MSG_SENDMESSAGE, hContact, (LPARAM)msg);
}
return 0;
}
/* open a chatroom */
else if (!_strnicmp(arg, "chat?", 5)) {
char *tok, *rm = NULL;
if (*(arg += 5) == 0) return 1; /* parse failed */
tok = strtok(arg, "&"); /* first token */
if (tok != NULL) rm = Netlib_UrlDecode(tok);
if (rm == NULL) return 1; /* parse failed */
/* not yet implemented (rm contains name of chatroom)*/
return 0;
}
return 1; /* parse failed */
}
