src/game/Mail.cpp

   1 /*
   2  * Copyright (C) 2005-2009 MaNGOS <http://getmangos.com/>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18
  19 #include "Mail.h"
  20 #include "WorldPacket.h"
  21 #include "WorldSession.h"
  22 #include "Opcodes.h"
  23 #include "Log.h"
  24 #include "World.h"
  25 #include "ObjectMgr.h"
  26 #include "Player.h"
  27 #include "UpdateMask.h"
  28 #include "Unit.h"
  29 #include "Language.h"
  30 #include "DBCStores.h"
  31
  32 void MailItem::deleteItem( bool inDB )
  33 {
  34     if(item)
  35     {
  36         if(inDB)
  37             CharacterDatabase.PExecute("DELETE FROM item_instance WHERE guid='%u'", item->GetGUIDLow());
  38
  39         delete item;
  40         item=NULL;
  41     }
  42 }
  43
  44 void WorldSession::HandleSendMail(WorldPacket & recv_data )
  45 {
  46     CHECK_PACKET_SIZE(recv_data,8+1+1+1+4+4+1+4+4+8+1);
  47
  48     uint64 mailbox, unk3;
  49     std::string receiver, subject, body;
  50     uint32 unk1, unk2, money, COD;
  51     uint8 unk4;
  52     recv_data >> mailbox;
  53     recv_data >> receiver;
  54
  55     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
  56         return;
  57
  58     // recheck
  59     CHECK_PACKET_SIZE(recv_data, 8+(receiver.size()+1)+1+1+4+4+1+4+4+8+1);
  60
  61     recv_data >> subject;
  62
  63     // recheck
  64     CHECK_PACKET_SIZE(recv_data, 8+(receiver.size()+1)+(subject.size()+1)+1+4+4+1+4+4+8+1);
  65
  66     recv_data >> body;
  67
  68     // recheck
  69     CHECK_PACKET_SIZE(recv_data, 8+(receiver.size()+1)+(subject.size()+1)+(body.size()+1)+4+4+1+4+4+8+1);
  70
  71     recv_data >> unk1;                                      // stationery?
  72     recv_data >> unk2;                                      // 0x00000000
  73
  74     MailItemsInfo mi;
  75
  76     uint8 items_count;
  77     recv_data >> items_count;                               // attached items count
  78
  79     if(items_count > 12)                                    // client limit
  80     {
  81         GetPlayer()->SendMailResult(0, MAIL_SEND, MAIL_ERR_TOO_MANY_ATTACHMENTS);
  82         return;
  83     }
  84
  85     // recheck
  86     CHECK_PACKET_SIZE(recv_data, 8+(receiver.size()+1)+(subject.size()+1)+(body.size()+1)+4+4+1+items_count*(1+8)+4+4+8+1);
  87
  88     if(items_count)
  89     {
  90         for(uint8 i = 0; i < items_count; ++i)
  91         {
  92             uint8  item_slot;
  93             uint64 item_guid;
  94             recv_data >> item_slot;
  95             recv_data >> item_guid;
  96             mi.AddItem(GUID_LOPART(item_guid), item_slot);
  97         }
  98     }
  99
 100     recv_data >> money >> COD;                              // money and cod
 101     recv_data >> unk3;                                      // const 0
 102     recv_data >> unk4;                                      // const 0
 103
 104     items_count = mi.size();                                // this is the real size after the duplicates have been removed
 105
 106     if (receiver.empty())
 107         return;
 108
 109     Player* pl = _player;
 110
 111     uint64 rc = 0;
 112     if(normalizePlayerName(receiver))
 113         rc = objmgr.GetPlayerGUIDByName(receiver);
 114
 115     if (!rc)
 116     {
 117         sLog.outDetail("Player %u is sending mail to %s (GUID: not existed!) with subject %s and body %s includes %u items, %u copper and %u COD copper with unk1 = %u, unk2 = %u",
 118             pl->GetGUIDLow(), receiver.c_str(), subject.c_str(), body.c_str(), items_count, money, COD, unk1, unk2);
 119         pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_RECIPIENT_NOT_FOUND);
 120         return;
 121     }
 122
 123     sLog.outDetail("Player %u is sending mail to %s (GUID: %u) with subject %s and body %s includes %u items, %u copper and %u COD copper with unk1 = %u, unk2 = %u", pl->GetGUIDLow(), receiver.c_str(), GUID_LOPART(rc), subject.c_str(), body.c_str(), items_count, money, COD, unk1, unk2);
 124
 125     if(pl->GetGUID() == rc)
 126     {
 127         pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_CANNOT_SEND_TO_SELF);
 128         return;
 129     }
 130
 131     uint32 cost = items_count ? 30 * items_count : 30;  // price hardcoded in client
 132
 133     uint32 reqmoney = cost + money;
 134
 135     if (pl->GetMoney() < reqmoney)
 136     {
 137         pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_NOT_ENOUGH_MONEY);
 138         return;
 139     }
 140
 141     Player *receive = objmgr.GetPlayer(rc);
 142
 143     uint32 rc_team = 0;
 144     uint8 mails_count = 0;                                  //do not allow to send to one player more than 100 mails
 145
 146     if(receive)
 147     {
 148         rc_team = receive->GetTeam();
 149         mails_count = receive->GetMailSize();
 150     }
 151     else
 152     {
 153         rc_team = objmgr.GetPlayerTeamByGUID(rc);
 154         QueryResult* result = CharacterDatabase.PQuery("SELECT COUNT(*) FROM mail WHERE receiver = '%u'", GUID_LOPART(rc));
 155         if(result)
 156         {
 157             Field *fields = result->Fetch();
 158             mails_count = fields[0].GetUInt32();
 159             delete result;
 160         }
 161     }
 162     //do not allow to have more than 100 mails in mailbox.. mails count is in opcode uint8!!! - so max can be 255..
 163     if (mails_count > 100)
 164     {
 165         pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_RECIPIENT_CAP_REACHED);
 166         return;
 167     }
 168     // test the receiver's Faction...
 169     if (!sWorld.getConfig(CONFIG_ALLOW_TWO_SIDE_INTERACTION_MAIL) && pl->GetTeam() != rc_team && GetSecurity() == SEC_PLAYER)
 170     {
 171         pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_NOT_YOUR_TEAM);
 172         return;
 173     }
 174
 175     uint32 rc_account = 0;
 176     if(receive)
 177         rc_account = receive->GetSession()->GetAccountId();
 178     else
 179         rc_account = objmgr.GetPlayerAccountIdByGUID(rc);
 180
 181     if (items_count)
 182     {
 183         for(MailItemMap::iterator mailItemIter = mi.begin(); mailItemIter != mi.end(); ++mailItemIter)
 184         {
 185             MailItem& mailItem = mailItemIter->second;
 186
 187             if(!mailItem.item_guidlow)
 188             {
 189                 pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_MAIL_ATTACHMENT_INVALID);
 190                 return;
 191             }
 192
 193             mailItem.item = pl->GetItemByGuid(MAKE_NEW_GUID(mailItem.item_guidlow, 0, HIGHGUID_ITEM));
 194             // prevent sending bag with items (cheat: can be placed in bag after adding equipped empty bag to mail)
 195             if(!mailItem.item)
 196             {
 197                 pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_MAIL_ATTACHMENT_INVALID);
 198                 return;
 199             }
 200
 201             if(!mailItem.item->CanBeTraded(true))
 202             {
 203                 pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_EQUIP_ERROR, EQUIP_ERR_MAIL_BOUND_ITEM);
 204                 return;
 205             }
 206
 207             if(mailItem.item->IsBoundAccountWide() && mailItem.item->IsSoulBound() && pl->GetSession()->GetAccountId() != rc_account)
 208             {
 209                 pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_EQUIP_ERROR, EQUIP_ERR_ARTEFACTS_ONLY_FOR_OWN_CHARACTERS);
 210                 return;
 211             }
 212
 213             if (mailItem.item->HasFlag(ITEM_FIELD_FLAGS, ITEM_FLAGS_CONJURED) || mailItem.item->GetUInt32Value(ITEM_FIELD_DURATION))
 214             {
 215                 pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_EQUIP_ERROR, EQUIP_ERR_MAIL_BOUND_ITEM);
 216                 return;
 217             }
 218
 219             if(COD && mailItem.item->HasFlag(ITEM_FIELD_FLAGS, ITEM_FLAGS_WRAPPED))
 220             {
 221                 pl->SendMailResult(0, MAIL_SEND, MAIL_ERR_CANT_SEND_WRAPPED_COD);
 222                 return;
 223             }
 224         }
 225     }
 226     pl->SendMailResult(0, MAIL_SEND, MAIL_OK);
 227
 228     uint32 itemTextId = 0;
 229     if (!body.empty())
 230     {
 231         itemTextId = objmgr.CreateItemText( body );
 232     }
 233
 234     pl->ModifyMoney( -int32(reqmoney) );
 235     pl->GetAchievementMgr().UpdateAchievementCriteria(ACHIEVEMENT_CRITERIA_TYPE_GOLD_SPENT_FOR_MAIL, cost);
 236
 237     bool needItemDelay = false;
 238
 239     if(items_count > 0 || money > 0)
 240     {
 241         if (items_count > 0)
 242         {
 243             for(MailItemMap::iterator mailItemIter = mi.begin(); mailItemIter != mi.end(); ++mailItemIter)
 244             {
 245                 MailItem& mailItem = mailItemIter->second;
 246                 if(!mailItem.item)
 247                     continue;
 248
 249                 mailItem.item_template = mailItem.item ? mailItem.item->GetEntry() : 0;
 250
 251                 if( GetSecurity() > SEC_PLAYER && sWorld.getConfig(CONFIG_GM_LOG_TRADE) )
 252                 {
 253                     sLog.outCommand(GetAccountId(), "GM %s (Account: %u) mail item: %s (Entry: %u Count: %u) to player: %s (Account: %u)",
 254                         GetPlayerName(), GetAccountId(), mailItem.item->GetProto()->Name1, mailItem.item->GetEntry(), mailItem.item->GetCount(), receiver.c_str(), rc_account);
 255                 }
 256
 257                 pl->MoveItemFromInventory(mailItem.item->GetBagSlot(), mailItem.item->GetSlot(), true);
 258                 CharacterDatabase.BeginTransaction();
 259                 mailItem.item->DeleteFromInventoryDB();     //deletes item from character's inventory
 260                 mailItem.item->SaveToDB();                  // recursive and not have transaction guard into self, item not in inventory and can be save standalone
 261                 // owner in data will set at mail receive and item extracting
 262                 CharacterDatabase.PExecute("UPDATE item_instance SET owner_guid = '%u' WHERE guid='%u'", GUID_LOPART(rc), mailItem.item->GetGUIDLow());
 263                 CharacterDatabase.CommitTransaction();
 264             }
 265
 266             // if item send to character at another account, then apply item delivery delay
 267             needItemDelay = pl->GetSession()->GetAccountId() != rc_account;
 268         }
 269
 270         if(money > 0 &&  GetSecurity() > SEC_PLAYER && sWorld.getConfig(CONFIG_GM_LOG_TRADE))
 271         {
 272             sLog.outCommand(GetAccountId(),"GM %s (Account: %u) mail money: %u to player: %s (Account: %u)",
 273                 GetPlayerName(), GetAccountId(), money, receiver.c_str(), rc_account);
 274         }
 275     }
 276
 277     // If theres is an item, there is a one hour delivery delay if sent to another account's character.
 278     uint32 deliver_delay = needItemDelay ? sWorld.getConfig(CONFIG_MAIL_DELIVERY_DELAY) : 0;
 279
 280     // will delete item or place to receiver mail list
 281     WorldSession::SendMailTo(receive, MAIL_NORMAL, MAIL_STATIONERY_NORMAL, pl->GetGUIDLow(), GUID_LOPART(rc), subject, itemTextId, &mi, money, COD, MAIL_CHECK_MASK_NONE, deliver_delay);
 282
 283     CharacterDatabase.BeginTransaction();
 284     pl->SaveInventoryAndGoldToDB();
 285     CharacterDatabase.CommitTransaction();
 286 }
 287
 288 //called when mail is read
 289 void WorldSession::HandleMailMarkAsRead(WorldPacket & recv_data )
 290 {
 291     CHECK_PACKET_SIZE(recv_data,8+4);
 292
 293     uint64 mailbox;
 294     uint32 mailId;
 295     recv_data >> mailbox;
 296
 297     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 298         return;
 299
 300     recv_data >> mailId;
 301     Player *pl = _player;
 302     Mail *m = pl->GetMail(mailId);
 303     if (m)
 304     {
 305         if (pl->unReadMails)
 306             --pl->unReadMails;
 307         m->checked = m->checked | MAIL_CHECK_MASK_READ;
 308         // m->expire_time = time(NULL) + (30 * DAY);  // Expire time do not change at reading mail
 309         pl->m_mailsUpdated = true;
 310         m->state = MAIL_STATE_CHANGED;
 311     }
 312 }
 313
 314 //called when client deletes mail
 315 void WorldSession::HandleMailDelete(WorldPacket & recv_data )
 316 {
 317     CHECK_PACKET_SIZE(recv_data,8+4);
 318
 319     uint64 mailbox;
 320     uint32 mailId;
 321     recv_data >> mailbox;
 322     recv_data >> mailId;
 323
 324     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 325         return;
 326
 327     Player* pl = _player;
 328     pl->m_mailsUpdated = true;
 329     Mail *m = pl->GetMail(mailId);
 330     if(m)
 331         m->state = MAIL_STATE_DELETED;
 332     pl->SendMailResult(mailId, MAIL_DELETED, MAIL_OK);
 333 }
 334
 335 void WorldSession::HandleMailReturnToSender(WorldPacket & recv_data )
 336 {
 337     CHECK_PACKET_SIZE(recv_data,8+4);
 338
 339     uint64 mailbox;
 340     uint32 mailId;
 341     recv_data >> mailbox;
 342
 343     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 344         return;
 345
 346     recv_data >> mailId;
 347     Player *pl = _player;
 348     Mail *m = pl->GetMail(mailId);
 349     if(!m || m->state == MAIL_STATE_DELETED || m->deliver_time > time(NULL))
 350     {
 351         pl->SendMailResult(mailId, MAIL_RETURNED_TO_SENDER, MAIL_ERR_INTERNAL_ERROR);
 352         return;
 353     }
 354     //we can return mail now
 355     //so firstly delete the old one
 356     CharacterDatabase.BeginTransaction();
 357     CharacterDatabase.PExecute("DELETE FROM mail WHERE id = '%u'", mailId);
 358                                                             // needed?
 359     CharacterDatabase.PExecute("DELETE FROM mail_items WHERE mail_id = '%u'", mailId);
 360     CharacterDatabase.CommitTransaction();
 361     pl->RemoveMail(mailId);
 362
 363     MailItemsInfo mi;
 364
 365     if(m->HasItems())
 366     {
 367         for(std::vector<MailItemInfo>::iterator itr2 = m->items.begin(); itr2 != m->items.end(); ++itr2)
 368         {
 369             Item *item = pl->GetMItem(itr2->item_guid);
 370             if(item)
 371                 mi.AddItem(item->GetGUIDLow(), item->GetEntry(), item);
 372             else
 373             {
 374                 //WTF?
 375             }
 376
 377             pl->RemoveMItem(itr2->item_guid);
 378         }
 379     }
 380
 381     SendReturnToSender(MAIL_NORMAL, GetAccountId(), m->receiver, m->sender, m->subject, m->itemTextId, &mi, m->money, m->mailTemplateId);
 382
 383     delete m;                                               //we can deallocate old mail
 384     pl->SendMailResult(mailId, MAIL_RETURNED_TO_SENDER, MAIL_OK);
 385 }
 386
 387 void WorldSession::SendReturnToSender(uint8 messageType, uint32 sender_acc, uint32 sender_guid, uint32 receiver_guid, const std::string& subject, uint32 itemTextId, MailItemsInfo *mi, uint32 money, uint16 mailTemplateId )
 388 {
 389     if(messageType != MAIL_NORMAL)                          // return only to players
 390     {
 391         mi->deleteIncludedItems(true);
 392         return;
 393     }
 394
 395     Player *receiver = objmgr.GetPlayer(MAKE_NEW_GUID(receiver_guid, 0, HIGHGUID_PLAYER));
 396
 397     uint32 rc_account = 0;
 398     if(!receiver)
 399         rc_account = objmgr.GetPlayerAccountIdByGUID(MAKE_NEW_GUID(receiver_guid, 0, HIGHGUID_PLAYER));
 400
 401     if(!receiver && !rc_account)                            // sender not exist
 402     {
 403         mi->deleteIncludedItems(true);
 404         return;
 405     }
 406
 407     // prepare mail and send in other case
 408     bool needItemDelay = false;
 409
 410     if(mi && !mi->empty())
 411     {
 412         // if item send to character at another account, then apply item delivery delay
 413         needItemDelay = sender_acc != rc_account;
 414
 415         // set owner to new receiver (to prevent delete item with sender char deleting)
 416         CharacterDatabase.BeginTransaction();
 417         for(MailItemMap::iterator mailItemIter = mi->begin(); mailItemIter != mi->end(); ++mailItemIter)
 418         {
 419             MailItem& mailItem = mailItemIter->second;
 420             mailItem.item->SaveToDB();                  // item not in inventory and can be save standalone
 421             // owner in data will set at mail receive and item extracting
 422             CharacterDatabase.PExecute("UPDATE item_instance SET owner_guid = '%u' WHERE guid='%u'", receiver_guid, mailItem.item->GetGUIDLow());
 423         }
 424         CharacterDatabase.CommitTransaction();
 425     }
 426
 427     // If theres is an item, there is a one hour delivery delay.
 428     uint32 deliver_delay = needItemDelay ? sWorld.getConfig(CONFIG_MAIL_DELIVERY_DELAY) : 0;
 429
 430     // will delete item or place to receiver mail list
 431     WorldSession::SendMailTo(receiver, MAIL_NORMAL, MAIL_STATIONERY_NORMAL, sender_guid, receiver_guid, subject, itemTextId, mi, money, 0, MAIL_CHECK_MASK_RETURNED,deliver_delay,mailTemplateId);
 432 }
 433
 434 //called when player takes item attached in mail
 435 void WorldSession::HandleMailTakeItem(WorldPacket & recv_data )
 436 {
 437     CHECK_PACKET_SIZE(recv_data,8+4+4);
 438
 439     uint64 mailbox;
 440     uint32 mailId;
 441     uint32 itemId;
 442     recv_data >> mailbox;
 443
 444     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 445         return;
 446
 447     recv_data >> mailId;
 448     recv_data >> itemId;                                    // item guid low?
 449     Player* pl = _player;
 450
 451     Mail* m = pl->GetMail(mailId);
 452     if(!m || m->state == MAIL_STATE_DELETED || m->deliver_time > time(NULL))
 453     {
 454         pl->SendMailResult(mailId, MAIL_ITEM_TAKEN, MAIL_ERR_INTERNAL_ERROR);
 455         return;
 456     }
 457
 458     // prevent cheating with skip client money check
 459     if(pl->GetMoney() < m->COD)
 460     {
 461         pl->SendMailResult(mailId, MAIL_ITEM_TAKEN, MAIL_ERR_NOT_ENOUGH_MONEY);
 462         return;
 463     }
 464
 465     Item *it = pl->GetMItem(itemId);
 466
 467     ItemPosCountVec dest;
 468     uint8 msg = _player->CanStoreItem( NULL_BAG, NULL_SLOT, dest, it, false );
 469     if( msg == EQUIP_ERR_OK )
 470     {
 471         m->RemoveItem(itemId);
 472         m->removedItems.push_back(itemId);
 473
 474         if (m->COD > 0)                                     //if there is COD, take COD money from player and send them to sender by mail
 475         {
 476             uint64 sender_guid = MAKE_NEW_GUID(m->sender, 0, HIGHGUID_PLAYER);
 477             Player *receive = objmgr.GetPlayer(sender_guid);
 478
 479             uint32 sender_accId = 0;
 480
 481             if( GetSecurity() > SEC_PLAYER && sWorld.getConfig(CONFIG_GM_LOG_TRADE) )
 482             {
 483                 std::string sender_name;
 484                 if(receive)
 485                 {
 486                     sender_accId = receive->GetSession()->GetAccountId();
 487                     sender_name = receive->GetName();
 488                 }
 489                 else
 490                 {
 491                     // can be calculated early
 492                     sender_accId = objmgr.GetPlayerAccountIdByGUID(sender_guid);
 493
 494                     if(!objmgr.GetPlayerNameByGUID(sender_guid,sender_name))
 495                         sender_name = objmgr.GetMangosStringForDBCLocale(LANG_UNKNOWN);
 496                 }
 497                 sLog.outCommand(GetAccountId(),"GM %s (Account: %u) receive mail item: %s (Entry: %u Count: %u) and send COD money: %u to player: %s (Account: %u)",
 498                     GetPlayerName(),GetAccountId(),it->GetProto()->Name1,it->GetEntry(),it->GetCount(),m->COD,sender_name.c_str(),sender_accId);
 499             }
 500             else if(!receive)
 501                 sender_accId = objmgr.GetPlayerAccountIdByGUID(sender_guid);
 502
 503             // check player existence
 504             if(receive || sender_accId)
 505             {
 506                 WorldSession::SendMailTo(receive, MAIL_NORMAL, MAIL_STATIONERY_NORMAL, m->receiver, m->sender, m->subject, 0, NULL, m->COD, 0, MAIL_CHECK_MASK_COD_PAYMENT);
 507             }
 508
 509             pl->ModifyMoney( -int32(m->COD) );
 510         }
 511         m->COD = 0;
 512         m->state = MAIL_STATE_CHANGED;
 513         pl->m_mailsUpdated = true;
 514         pl->RemoveMItem(it->GetGUIDLow());
 515
 516         uint32 count = it->GetCount();                      // save counts before store and possible merge with deleting
 517         pl->MoveItemToInventory(dest,it,true);
 518
 519         CharacterDatabase.BeginTransaction();
 520         pl->SaveInventoryAndGoldToDB();
 521         pl->_SaveMail();
 522         CharacterDatabase.CommitTransaction();
 523
 524         pl->SendMailResult(mailId, MAIL_ITEM_TAKEN, MAIL_OK, 0, itemId, count);
 525     }
 526     else
 527         pl->SendMailResult(mailId, MAIL_ITEM_TAKEN, MAIL_ERR_EQUIP_ERROR, msg);
 528 }
 529
 530 void WorldSession::HandleMailTakeMoney(WorldPacket & recv_data )
 531 {
 532     CHECK_PACKET_SIZE(recv_data,8+4);
 533
 534     uint64 mailbox;
 535     uint32 mailId;
 536     recv_data >> mailbox;
 537     recv_data >> mailId;
 538
 539     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 540         return;
 541
 542     Player *pl = _player;
 543
 544     Mail* m = pl->GetMail(mailId);
 545     if(!m || m->state == MAIL_STATE_DELETED || m->deliver_time > time(NULL))
 546     {
 547         pl->SendMailResult(mailId, MAIL_MONEY_TAKEN, MAIL_ERR_INTERNAL_ERROR);
 548         return;
 549     }
 550
 551     pl->SendMailResult(mailId, MAIL_MONEY_TAKEN, MAIL_OK);
 552
 553     pl->ModifyMoney(m->money);
 554     m->money = 0;
 555     m->state = MAIL_STATE_CHANGED;
 556     pl->m_mailsUpdated = true;
 557
 558     // save money and mail to prevent cheating
 559     CharacterDatabase.BeginTransaction();
 560     pl->SaveDataFieldToDB();                                // contains money
 561     pl->_SaveMail();
 562     CharacterDatabase.CommitTransaction();
 563 }
 564
 565 //called when player lists his received mails
 566 void WorldSession::HandleGetMailList(WorldPacket & recv_data )
 567 {
 568     CHECK_PACKET_SIZE(recv_data,8);
 569
 570     uint64 mailbox;
 571     recv_data >> mailbox;
 572
 573     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 574         return;
 575
 576     Player* pl = _player;
 577
 578     //load players mails, and mailed items
 579     if(!pl->m_mailsLoaded)
 580         pl ->_LoadMail();
 581
 582     // client can't work with packets > max int16 value
 583     const uint32 maxPacketSize = 32767;
 584
 585     uint32 mails_count = 0;                                 // real send to client mails amount
 586
 587     WorldPacket data(SMSG_MAIL_LIST_RESULT, (200));         // guess size
 588     data << uint8(0);                                       // mail's count
 589     time_t cur_time = time(NULL);
 590
 591     for(PlayerMails::iterator itr = pl->GetmailBegin(); itr != pl->GetmailEnd(); ++itr)
 592     {
 593         // skip deleted or not delivered (deliver delay not expired) mails
 594         if ((*itr)->state == MAIL_STATE_DELETED || cur_time < (*itr)->deliver_time)
 595             continue;
 596
 597         uint8 item_count = (*itr)->items.size();            // max count is MAX_MAIL_ITEMS (12)
 598
 599         size_t next_mail_size = 2+4+1+8+4*8+((*itr)->subject.size()+1)+1+item_count*(1+4+4+6*3*4+4+4+1+4+4+4);
 600
 601         if(data.wpos()+next_mail_size > maxPacketSize)
 602             break;
 603
 604         data << (uint16) 0x0040;                            // unknown 2.3.0, different values
 605         data << (uint32) (*itr)->messageID;                 // Message ID
 606         data << (uint8) (*itr)->messageType;                // Message Type
 607
 608         switch((*itr)->messageType)
 609         {
 610             case MAIL_NORMAL:                               // sender guid
 611                 data << uint64(MAKE_NEW_GUID((*itr)->sender, 0, HIGHGUID_PLAYER));
 612                 break;
 613             case MAIL_CREATURE:
 614             case MAIL_GAMEOBJECT:
 615             case MAIL_AUCTION:
 616                 data << (uint32) (*itr)->sender;            // creature/gameobject entry, auction id
 617                 break;
 618             case MAIL_ITEM:                                 // item entry (?) sender = "Unknown", NYI
 619                 break;
 620         }
 621
 622         data << (uint32) (*itr)->COD;                       // COD
 623         data << (uint32) (*itr)->itemTextId;                // sure about this
 624         data << (uint32) 0;                                 // unknown
 625         data << (uint32) (*itr)->stationery;                // stationery (Stationery.dbc)
 626         data << (uint32) (*itr)->money;                     // Gold
 627         data << (uint32) 0x04;                              // unknown, 0x4 - auction, 0x10 - normal
 628                                                             // Time
 629         data << (float)  ((*itr)->expire_time-time(NULL))/DAY;
 630         data << (uint32) (*itr)->mailTemplateId;            // mail template (MailTemplate.dbc)
 631         data << (*itr)->subject;                            // Subject string - once 00, when mail type = 3
 632
 633         data << (uint8) item_count;                         // client limit is 0x10
 634
 635         for(uint8 i = 0; i < item_count; ++i)
 636         {
 637             Item *item = pl->GetMItem((*itr)->items[i].item_guid);
 638             // item index (0-6?)
 639             data << (uint8)  i;
 640             // item guid low?
 641             data << (uint32) (item ? item->GetGUIDLow() : 0);
 642             // entry
 643             data << (uint32) (item ? item->GetEntry() : 0);
 644             for(uint8 j = 0; j < MAX_INSPECTED_ENCHANTMENT_SLOT; ++j)
 645             {
 646                 // unsure
 647                 data << (uint32) (item ? item->GetEnchantmentCharges((EnchantmentSlot)j) : 0);
 648                 // unsure
 649                 data << (uint32) (item ? item->GetEnchantmentDuration((EnchantmentSlot)j) : 0);
 650                 // unsure
 651                 data << (uint32) (item ? item->GetEnchantmentId((EnchantmentSlot)j) : 0);
 652             }
 653             // can be negative
 654             data << (uint32) (item ? item->GetItemRandomPropertyId() : 0);
 655             // unk
 656             data << (uint32) (item ? item->GetItemSuffixFactor() : 0);
 657             // stack count
 658             data << (uint32) (item ? item->GetCount() : 0);
 659             // charges
 660             data << (uint32) (item ? item->GetSpellCharges() : 0);
 661             // durability
 662             data << (uint32) (item ? item->GetUInt32Value(ITEM_FIELD_MAXDURABILITY) : 0);
 663             // durability
 664             data << (uint32) (item ? item->GetUInt32Value(ITEM_FIELD_DURABILITY) : 0);
 665             // unknown wotlk
 666             data << (uint8)  0;
 667         }
 668
 669         mails_count += 1;
 670     }
 671
 672     data.put<uint8>(0, mails_count);                        // set real send mails to client
 673     SendPacket(&data);
 674
 675     // recalculate m_nextMailDelivereTime and unReadMails
 676     _player->UpdateNextMailTimeAndUnreads();
 677 }
 678
 679 ///this function is called when client needs mail message body, or when player clicks on item which has ITEM_FIELD_ITEM_TEXT_ID > 0
 680 void WorldSession::HandleItemTextQuery(WorldPacket & recv_data )
 681 {
 682     CHECK_PACKET_SIZE(recv_data,4+4+4);
 683
 684     uint32 itemTextId;
 685     uint32 mailId;                                          //this value can be item id in bag, but it is also mail id
 686     uint32 unk;                                             //maybe something like state - 0x70000000
 687
 688     recv_data >> itemTextId >> mailId >> unk;
 689
 690     //some check needed, if player has item with guid mailId, or has mail with id mailId
 691
 692     sLog.outDebug("CMSG_ITEM_TEXT_QUERY itemguid: %u, mailId: %u, unk: %u", itemTextId, mailId, unk);
 693
 694     WorldPacket data(SMSG_ITEM_TEXT_QUERY_RESPONSE, (4+10));// guess size
 695     data << itemTextId;
 696     data << objmgr.GetItemText( itemTextId );
 697     SendPacket(&data);
 698 }
 699
 700 //used when player copies mail body to his inventory
 701 void WorldSession::HandleMailCreateTextItem(WorldPacket & recv_data )
 702 {
 703     CHECK_PACKET_SIZE(recv_data,8+4);
 704
 705     uint64 mailbox;
 706     uint32 mailId;
 707
 708     recv_data >> mailbox >> mailId;
 709
 710     if (!GetPlayer()->GetGameObjectIfCanInteractWith(mailbox, GAMEOBJECT_TYPE_MAILBOX))
 711         return;
 712
 713     Player *pl = _player;
 714
 715     Mail* m = pl->GetMail(mailId);
 716     if(!m || !m->itemTextId || m->state == MAIL_STATE_DELETED || m->deliver_time > time(NULL))
 717     {
 718         pl->SendMailResult(mailId, MAIL_MADE_PERMANENT, MAIL_ERR_INTERNAL_ERROR);
 719         return;
 720     }
 721
 722     Item *bodyItem = new Item;                              // This is not bag and then can be used new Item.
 723     if(!bodyItem->Create(objmgr.GenerateLowGuid(HIGHGUID_ITEM), MAIL_BODY_ITEM_TEMPLATE, pl))
 724     {
 725         delete bodyItem;
 726         return;
 727     }
 728
 729     bodyItem->SetUInt32Value( ITEM_FIELD_ITEM_TEXT_ID , m->itemTextId );
 730     bodyItem->SetUInt32Value( ITEM_FIELD_CREATOR, m->sender);
 731
 732     sLog.outDetail("HandleMailCreateTextItem mailid=%u",mailId);
 733
 734     ItemPosCountVec dest;
 735     uint8 msg = _player->CanStoreItem( NULL_BAG, NULL_SLOT, dest, bodyItem, false );
 736     if( msg == EQUIP_ERR_OK )
 737     {
 738         m->itemTextId = 0;
 739         m->state = MAIL_STATE_CHANGED;
 740         pl->m_mailsUpdated = true;
 741
 742         pl->StoreItem(dest, bodyItem, true);
 743         //bodyItem->SetState(ITEM_NEW, pl); is set automatically
 744         pl->SendMailResult(mailId, MAIL_MADE_PERMANENT, MAIL_OK);
 745     }
 746     else
 747     {
 748         pl->SendMailResult(mailId, MAIL_MADE_PERMANENT, MAIL_ERR_EQUIP_ERROR, msg);
 749         delete bodyItem;
 750     }
 751 }
 752
 753 //TODO Fix me! ... this void has probably bad condition, but good data are sent
 754 void WorldSession::HandleQueryNextMailTime(WorldPacket & /*recv_data*/ )
 755 {
 756     WorldPacket data(MSG_QUERY_NEXT_MAIL_TIME, 8);
 757
 758     if(!_player->m_mailsLoaded)
 759         _player->_LoadMail();
 760
 761     if( _player->unReadMails > 0 )
 762     {
 763         data << (uint32) 0;                                 // float
 764         data << (uint32) 0;                                 // count
 765         uint32 count = 0;
 766         for(PlayerMails::iterator itr = _player->GetmailBegin(); itr != _player->GetmailEnd(); ++itr)
 767         {
 768             Mail *m = (*itr);
 769             // not checked yet, already must be delivered
 770             if((m->checked & MAIL_CHECK_MASK_READ)==0 && (m->deliver_time <= time(NULL)))
 771             {
 772                 ++count;
 773
 774                 if(count > 2)
 775                 {
 776                     count = 2;
 777                     break;
 778                 }
 779
 780                 data << (uint64) m->sender;                 // sender guid
 781
 782                 switch(m->messageType)
 783                 {
 784                     case MAIL_AUCTION:
 785                         data << (uint32) 2;
 786                         data << (uint32) 2;
 787                         data << (uint32) m->stationery;
 788                         break;
 789                     default:
 790                         data << (uint32) 0;
 791                         data << (uint32) 0;
 792                         data << (uint32) m->stationery;
 793                         break;
 794                 }
 795                 data << (uint32) 0xC6000000;                // float unk, time or something
 796             }
 797         }
 798         data.put<uint32>(4, count);
 799     }
 800     else
 801     {
 802         data << (uint32) 0xC7A8C000;
 803         data << (uint32) 0x00000000;
 804     }
 805     SendPacket(&data);
 806 }
 807
 808 void WorldSession::SendMailTo(Player* receiver, uint8 messageType, uint8 stationery, uint32 sender_guidlow_or_entry, uint32 receiver_guidlow, std::string subject, uint32 itemTextId, MailItemsInfo* mi, uint32 money, uint32 COD, uint32 checked, uint32 deliver_delay, uint16 mailTemplateId)
 809 {
 810     uint32 mailId = objmgr.GenerateMailID();
 811
 812     time_t deliver_time = time(NULL) + deliver_delay;
 813
 814     //expire time if COD 3 days, if no COD 30 days, if auction sale pending 1 hour
 815     uint32 expire_delay;
 816     if(messageType == MAIL_AUCTION && !mi && !money)        // auction mail without any items and money
 817         expire_delay = HOUR;
 818     else
 819         expire_delay = (COD > 0) ? 3*DAY : 30*DAY;
 820
 821     time_t expire_time = deliver_time + expire_delay;
 822
 823     if(mailTemplateId && !sMailTemplateStore.LookupEntry(mailTemplateId))
 824     {
 825         sLog.outError( "WorldSession::SendMailTo - Mail have not existed MailTemplateId (%u), remove at send", mailTemplateId);
 826         mailTemplateId = 0;
 827     }
 828
 829     if(receiver)
 830     {
 831         receiver->AddNewMailDeliverTime(deliver_time);
 832
 833         if ( receiver->IsMailsLoaded() )
 834         {
 835             Mail * m = new Mail;
 836             m->messageID = mailId;
 837             m->messageType = messageType;
 838             m->stationery = stationery;
 839             m->mailTemplateId = mailTemplateId;
 840             m->sender = sender_guidlow_or_entry;
 841             m->receiver = receiver->GetGUIDLow();
 842             m->subject = subject;
 843             m->itemTextId = itemTextId;
 844
 845             if(mi)
 846                 m->AddAllItems(*mi);
 847
 848             m->expire_time = expire_time;
 849             m->deliver_time = deliver_time;
 850             m->money = money;
 851             m->COD = COD;
 852             m->checked = checked;
 853             m->state = MAIL_STATE_UNCHANGED;
 854
 855             receiver->AddMail(m);                           //to insert new mail to beginning of maillist
 856
 857             if(mi)
 858             {
 859                 for(MailItemMap::iterator mailItemIter = mi->begin(); mailItemIter != mi->end(); ++mailItemIter)
 860                 {
 861                     MailItem& mailItem = mailItemIter->second;
 862                     if(mailItem.item)
 863                         receiver->AddMItem(mailItem.item);
 864                 }
 865             }
 866         }
 867         else if(mi)
 868             mi->deleteIncludedItems();
 869     }
 870     else if(mi)
 871         mi->deleteIncludedItems();
 872
 873     CharacterDatabase.BeginTransaction();
 874     CharacterDatabase.escape_string(subject);
 875     CharacterDatabase.PExecute("INSERT INTO mail (id,messageType,stationery,mailTemplateId,sender,receiver,subject,itemTextId,has_items,expire_time,deliver_time,money,cod,checked) "
 876         "VALUES ('%u', '%u', '%u', '%u', '%u', '%u', '%s', '%u', '%u', '" UI64FMTD "','" UI64FMTD "', '%u', '%u', '%d')",
 877         mailId, messageType, stationery, mailTemplateId, sender_guidlow_or_entry, receiver_guidlow, subject.c_str(), itemTextId, (mi && !mi->empty() ? 1 : 0), (uint64)expire_time, (uint64)deliver_time, money, COD, checked);
 878
 879     if(mi)
 880     {
 881         for(MailItemMap::const_iterator mailItemIter = mi->begin(); mailItemIter != mi->end(); ++mailItemIter)
 882         {
 883             MailItem const& mailItem = mailItemIter->second;
 884             CharacterDatabase.PExecute("INSERT INTO mail_items (mail_id,item_guid,item_template,receiver) VALUES ('%u', '%u', '%u','%u')", mailId, mailItem.item_guidlow, mailItem.item_template,receiver_guidlow);
 885         }
 886     }
 887     CharacterDatabase.CommitTransaction();
 888 }