1. #include "stdafx.h"
  2. #include "../../libgame/include/grid.h"
  3. #include "constants.h"
  4. #include "utils.h"
  5. #include "config.h"
  6. #include "shop.h"
  7. #include "desc.h"
  8. #include "desc_manager.h"
  9. #include "char.h"
  10. #include "char_manager.h"
  11. #include "item.h"
  12. #include "item_manager.h"
  13. #include "buffer_manager.h"
  14. #include "packet.h"
  15. #include "log.h"
  16. #include "db.h"
  17. #include "questmanager.h"
  18. #include "monarch.h"
  19. #include "mob_manager.h"
  20. #include "locale_service.h"
  22. /* ------------------------------------------------------------------------------------ */
  24. extern int taxes;
  25. extern bool raise_empire_prices;
  26. extern bool trade_effect;
  27. extern int trade_effect_shop_threshold;
  29. CShop::CShop()
  30. : m_dwVnum(0), m_dwNPCVnum(0), m_pkPC(NULL)
  31. {
  32. m_pGrid = M2_NEW CGrid(10, 9);
  33. }
  35. CShop::~CShop()
  36. {
  37. TPacketGCShop pack;
  39. pack.header = HEADER_GC_SHOP;
  40. pack.subheader = SHOP_SUBHEADER_GC_END;
  41. pack.size = sizeof(TPacketGCShop);
  43. Broadcast(&pack, sizeof(pack));
  45. GuestMapType::iterator it;
  47. it = m_map_guest.begin();
  49. while (it != m_map_guest.end())
  50. {
  51. LPCHARACTER ch = it->first;
  52. ch->SetShop(NULL);
  53. ++it;
  54. }
  56. M2_DELETE(m_pGrid);
  57. }
  59. void CShop::SetPCShop(LPCHARACTER ch)
  60. {
  61. m_pkPC = ch;
  62. }
  64. bool CShop::Create(DWORD dwVnum, DWORD dwNPCVnum, TShopItemTable * pTable)
  65. {
  66. /*
  67. if (NULL == CMobManager::instance().Get(dwNPCVnum))
  68. {
  69. sys_err("No such a npc by vnum %d", dwNPCVnum);
  70. return false;
  71. }
  72. */
  73. sys_log(0, "SHOP #%d (Shopkeeper %d)", dwVnum, dwNPCVnum);
  75. m_dwVnum = dwVnum;
  76. m_dwNPCVnum = dwNPCVnum;
  78. BYTE bItemCount;
  80. for (bItemCount = 0; bItemCount < SHOP_HOST_ITEM_MAX_NUM; ++bItemCount)
  81. if (0 == (pTable + bItemCount)->vnum)
  82. break;
  84. SetShopItems(pTable, bItemCount);
  85. return true;
  86. }
  88. void CShop::SetShopItems(TShopItemTable * pTable, BYTE bItemCount)
  89. {
  90. if (bItemCount > SHOP_HOST_ITEM_MAX_NUM)
  91. return;
  93. m_pGrid->Clear();
  95. m_itemVector.resize(SHOP_HOST_ITEM_MAX_NUM);
  96. memset(&m_itemVector[0], 0, sizeof(SHOP_ITEM) * m_itemVector.size());
  98. for (int i = 0; i < bItemCount; ++i)
  99. {
  100. LPITEM pkItem = NULL;
  101. const TItemTable * item_table;
  103. if (m_pkPC)
  104. {
  105. pkItem = m_pkPC->GetItem(pTable->pos);
  107. if (!pkItem)
  108. {
  109. sys_err("cannot find item on pos (%d, %d) (name: %s)", pTable->pos.window_type, pTable->pos.cell, m_pkPC->GetName());
  110. continue;
  111. }
  113. item_table = pkItem->GetProto();
  114. }
  115. else
  116. {
  117. if (!pTable->vnum)
  118. continue;
  120. item_table = ITEM_MANAGER::instance().GetTable(pTable->vnum);
  121. }
  123. if (!item_table)
  124. {
  125. sys_err("Shop: no item table by item vnum #%d", pTable->vnum);
  126. continue;
  127. }
  129. int iPos;
  131. if (IsPCShop())
  132. {
  133. sys_log(0, "MyShop: use position %d", pTable->display_pos);
  134. iPos = pTable->display_pos;
  135. }
  136. else
  137. iPos = m_pGrid->FindBlank(1, item_table->bSize);
  139. if (iPos < 0)
  140. {
  141. sys_err("not enough shop window");
  142. continue;
  143. }
  145. if (!m_pGrid->IsEmpty(iPos, 1, item_table->bSize))
  146. {
  147. if (IsPCShop())
  148. {
  149. sys_err("not empty position for pc shop %s[%d]", m_pkPC->GetName(), m_pkPC->GetPlayerID());
  150. }
  151. else
  152. {
  153. sys_err("not empty position for npc shop");
  154. }
  155. continue;
  156. }
  158. m_pGrid->Put(iPos, 1, item_table->bSize);
  160. SHOP_ITEM & item = m_itemVector[iPos];
  162. item.pkItem = pkItem;
  163. item.itemid = 0;
  165. if (item.pkItem)
  166. {
  167. item.vnum = pkItem->GetVnum();
  168. item.count = pkItem->GetCount(); // PC 샵의 경우 아이템 개수는 진짜 아이템의 개수여야 한다.
  169. item.price = pTable->price; // 가격도 사용자가 정한대로..
  170. item.itemid = pkItem->GetID();
  171. }
  172. else
  173. {
  174. item.vnum = pTable->vnum;
  175. item.count = pTable->count;
  177. if (IS_SET(item_table->dwFlags, ITEM_FLAG_COUNT_PER_1GOLD))
  178. {
  179. if (item_table->dwGold == 0)
  180. item.price = 0;
  181. else
  182. item.price = item.count / item_table->dwGold;
  183. }
  184. else
  185. item.price = item_table->dwGold * item.count;
  186. }
  188. char name[36];
  189. snprintf(name, sizeof(name), "%-20s(#%-5d) (x %d)", item_table->szName, (int) item.vnum, item.count);
  191. sys_log(0, "SHOP_ITEM: %-36s PRICE %-5d", name, item.price);
  192. ++pTable;
  193. }
  194. }
  196. int CShop::Buy(LPCHARACTER ch, BYTE pos)
  197. {
  198. if (pos >= m_itemVector.size())
  199. {
  200. sys_log(0, "Shop::Buy : invalid position %d : %s", pos, ch->GetName());
  201. return SHOP_SUBHEADER_GC_INVALID_POS;
  202. }
  204. if (ch->GetGMLevel() > GM_PLAYER && ch->GetGMLevel() < GM_IMPLEMENTOR)
  205. {
  206. ch->ChatPacket(CHAT_TYPE_INFO, "GameMaster item alamaz.");
  207. return false;
  208. }
  210. sys_log(0, "Shop::Buy : name %s pos %d", ch->GetName(), pos);
  212. GuestMapType::iterator it = m_map_guest.find(ch);
  214. if (it == m_map_guest.end())
  215. return SHOP_SUBHEADER_GC_END;
  217. SHOP_ITEM& r_item = m_itemVector[pos];
  219. if (r_item.price < 0)
  220. {
  221. LogManager::instance().HackLog("SHOP_BUY_GOLD_OVERFLOW", ch);
  222. return SHOP_SUBHEADER_GC_NOT_ENOUGH_MONEY;
  223. }
  225. LPITEM pkSelectedItem = ITEM_MANAGER::instance().Find(r_item.itemid);
  227. if(trade_effect)
  228. {
  229. if (m_pkPC) {
  230. for (int i = 1; i < r_item.price+1; i=i+trade_effect_shop_threshold)
  231. ch->CreateFly(4,m_pkPC); // 1 Fly pro 100kk , sonst laggt es O:
  232. m_pkPC->CreateFly(5,ch); // 1 Item
  233. m_pkPC->CreateFly(6,ch); // Allgemeines anzeigen
  234. }
  235. }
  237. if (IsPCShop())
  238. {
  239. if (!pkSelectedItem)
  240. {
  241. sys_log(0, "Shop::Buy : Critical: This user seems to be a hacker : invalid pcshop item : BuyerPID:%d SellerPID:%d",
  242. ch->GetPlayerID(),
  243. m_pkPC->GetPlayerID());
  245. return false;
  246. }
  248. if ((pkSelectedItem->GetOwner() != m_pkPC))
  249. {
  250. sys_log(0, "Shop::Buy : Critical: This user seems to be a hacker : invalid pcshop item : BuyerPID:%d SellerPID:%d",
  251. ch->GetPlayerID(),
  252. m_pkPC->GetPlayerID());
  254. return false;
  255. }
  256. }
  258. long long llPrice = static_cast<long long>(r_item.price);
  260. if (it->second && raise_empire_prices) // if other empire, price is triple
  261. llPrice *= 3;
  263. if (ch->GetGold() < llPrice)
  264. {
  265. sys_log(1, "Shop::Buy : Not enough money : %s has %lld, price %d", ch->GetName(), ch->GetGold(), llPrice);
  266. return SHOP_SUBHEADER_GC_NOT_ENOUGH_MONEY;
  267. }
  269. LPITEM item;
  271. if (m_pkPC) // 피씨가 운영하는 샵은 피씨가 실제 아이템을 가지고있어야 한다.
  272. item = r_item.pkItem;
  273. else
  274. item = ITEM_MANAGER::instance().CreateItem(r_item.vnum, r_item.count);
  276. if (!item)
  277. return SHOP_SUBHEADER_GC_SOLD_OUT;
  279. int suprice = 0;
  280. int wonprice = 0;
  282. if (ch->GetShopOwner()->IsPC() && ch->GetShopOwner())
  283. {
  284. //sys_err("267.satir");
  285. char bufff[256];
  286. char bufff2[256];
  287. snprintf(bufff, sizeof(bufff), "pazar.pazarsuslot%d", pos);
  288. snprintf(bufff2, sizeof(bufff2), "pazar.pazarbarslot%d", pos);
  291. //sys_err("272.satir");
  292. suprice = m_pkPC->GetQuestFlag(bufff);
  293. wonprice = m_pkPC->GetQuestFlag(bufff2);
  294. //sys_err("275.satir");
  295. if (ch->CountSpecifyItem(38053) < suprice && ch->GetShopOwner()->IsPC() == true)
  296. {
  297. ch->ChatPacket(CHAT_TYPE_COMMAND, "sutasiyok");
  298. return SHOP_SUBHEADER_GC_END;
  299. }
  300. //sys_err("281.satir");
  302. if (ch->CountSpecifyItem(38052) < wonprice && ch->GetShopOwner()->IsPC() == true)
  303. {
  304. ch->ChatPacket(CHAT_TYPE_COMMAND, "wonyok");
  305. return SHOP_SUBHEADER_GC_END;
  306. }
  308. }
  310. int iEmptyPos;
  311. if (item->IsDragonSoul())
  312. {
  313. iEmptyPos = ch->GetEmptyDragonSoulInventory(item);
  314. }
  315. else
  316. {
  317. iEmptyPos = ch->GetEmptyInventory(item->GetSize());
  318. }
  320. if (iEmptyPos < 0)
  321. {
  322. if (m_pkPC)
  323. {
  324. sys_log(1, "Shop::Buy at PC Shop : Inventory full : %s size %d", ch->GetName(), item->GetSize());
  325. return SHOP_SUBHEADER_GC_INVENTORY_FULL;
  326. }
  327. else
  328. {
  329. sys_log(1, "Shop::Buy : Inventory full : %s size %d", ch->GetName(), item->GetSize());
  330. M2_DESTROY_ITEM(item);
  331. return SHOP_SUBHEADER_GC_INVENTORY_FULL;
  332. }
  333. }
  335. ch->SetQuestNPCID(ch->GetShopOwner()->GetVID());
  336. quest::CQuestManager::instance().Buy(ch->GetPlayerID());
  338. ch->PointChange(POINT_GOLD, -llPrice, false);
  340. //세금 계산
  341. DWORD dwTax = 0;
  342. int iVal = 0;
  344. if(taxes!=0)
  345. dwTax = llPrice * taxes / 100;
  346. llPrice = llPrice - dwTax;
  348. // 상점에서 살‹š 세금 5%
  349. if (!m_pkPC)
  350. {
  351. CMonarch::instance().SendtoDBAddMoney(dwTax, ch->GetEmpire(), ch);
  352. }
  354. if (ch->GetShopOwner()->IsPC() == true && ch->GetShopOwner())
  355. {
  356. if (ch->IsPC() == true && ch != m_pkPC)
  357. {
  359. ch->RemoveSpecifyItem(38053,suprice);
  362. }
  364. if (ch->IsPC() == true && ch != m_pkPC)
  365. {
  367. ch->RemoveSpecifyItem(38052,wonprice);
  370. }
  371. int sumiktar = 0;
  372. int barmiktar = 0;
  373. //sys_err("364.satir");
  374. if (ch != m_pkPC)
  375. {
  376. while (sumiktar < suprice && ch->GetShopOwner()->IsPC() == true)
  377. {
  378. //m_pkPC->AutoGiveItem(38052,1);
  379. m_pkPC->AutoGiveItem(38053,1,0,false);
  380. sumiktar++;
  381. }
  382. }
  383. if (ch != m_pkPC)
  384. {
  385. while (barmiktar < wonprice && ch->GetShopOwner()->IsPC() == true)
  386. {
  387. //m_pkPC->AutoGiveItem(50513,1);
  388. m_pkPC->AutoGiveItem(38052,1,0,false);
  389. barmiktar++;
  390. }
  391. }
  393. }
  395. // 군주 시스템 : 세금 징수
  396. if (m_pkPC)
  397. {
  398. m_pkPC->SyncQuickslot(QUICKSLOT_TYPE_ITEM, item->GetCell(), 255);
  400. if (item->GetVnum() == 90008 || item->GetVnum() == 90009) // VCARD
  401. {
  402. VCardUse(m_pkPC, ch, item);
  403. item = NULL;
  404. }
  405. else
  406. {
  407. char buf[512];
  409. if (item->GetVnum() >= 80003 && item->GetVnum() <= 38052)
  410. {
  411. snprintf(buf, sizeof(buf), "%s FROM: %u TO: %u PRICE: %u", item->GetName(), ch->GetPlayerID(), m_pkPC->GetPlayerID(), llPrice);
  412. LogManager::instance().GoldBarLog(ch->GetPlayerID(), item->GetID(), SHOP_BUY, buf);
  413. LogManager::instance().GoldBarLog(m_pkPC->GetPlayerID(), item->GetID(), SHOP_SELL, buf);
  414. }
  416. item->RemoveFromCharacter();
  417. if (item->IsDragonSoul())
  418. item->AddToCharacter(ch, TItemPos(DRAGON_SOUL_INVENTORY, iEmptyPos));
  419. else
  420. item->AddToCharacter(ch, TItemPos(INVENTORY, iEmptyPos));
  421. ITEM_MANAGER::instance().FlushDelayedSave(item);
  424. snprintf(buf, sizeof(buf), "%s %u(%s) %u %u", item->GetName(), m_pkPC->GetPlayerID(), m_pkPC->GetName(), llPrice, item->GetCount());
  425. LogManager::instance().ItemLog(ch, item, "SHOP_BUY", buf);
  427. snprintf(buf, sizeof(buf), "%s %u(%s) %u %u", item->GetName(), ch->GetPlayerID(), ch->GetName(), llPrice, item->GetCount());
  428. LogManager::instance().ItemLog(m_pkPC, item, "SHOP_SELL", buf);
  429. }
  431. r_item.pkItem = NULL;
  432. BroadcastUpdateItem(pos);
  434. m_pkPC->PointChange(POINT_GOLD, llPrice, false);
  436. if (iVal > 0)
  437. m_pkPC->ChatPacket(CHAT_TYPE_INFO, LC_TEXT("판매금액의 %d %% 가 세금으로 나가게됩니다"), iVal);
  439. CMonarch::instance().SendtoDBAddMoney(dwTax, m_pkPC->GetEmpire(), m_pkPC);
  440. }
  441. else
  442. {
  443. if (item->IsDragonSoul())
  444. item->AddToCharacter(ch, TItemPos(DRAGON_SOUL_INVENTORY, iEmptyPos));
  445. else
  446. item->AddToCharacter(ch, TItemPos(INVENTORY, iEmptyPos));
  447. ITEM_MANAGER::instance().FlushDelayedSave(item);
  448. LogManager::instance().ItemLog(ch, item, "BUY", item->GetName());
  450. if (item->GetVnum() >= 80003 && item->GetVnum() <= 38052)
  451. {
  452. LogManager::instance().GoldBarLog(ch->GetPlayerID(), item->GetID(), PERSONAL_SHOP_BUY, "");
  453. }
  455. DBManager::instance().SendMoneyLog(MONEY_LOG_SHOP, item->GetVnum(), -llPrice);
  456. }
  458. if (item)
  459. sys_log(0, "SHOP: BUY: name %s %s(x %d):%u price %u", ch->GetName(), item->GetName(), item->GetCount(), item->GetID(), llPrice);
  461. ch->Save();
  463. return (SHOP_SUBHEADER_GC_OK);
  464. }
  466. bool CShop::AddGuest(LPCHARACTER ch, DWORD owner_vid, bool bOtherEmpire)
  467. {
  468. if (!ch)
  469. return false;
  471. if (ch->GetExchange())
  472. return false;
  474. if (ch->GetShop())
  475. return false;
  477. ch->SetShop(this);
  479. m_map_guest.insert(GuestMapType::value_type(ch, bOtherEmpire));
  481. TPacketGCShop pack;
  483. pack.header = HEADER_GC_SHOP;
  484. pack.subheader = SHOP_SUBHEADER_GC_START;
  486. TPacketGCShopStart pack2;
  488. memset(&pack2, 0, sizeof(pack2));
  489. pack2.owner_vid = owner_vid;
  491. for (DWORD i = 0; i < m_itemVector.size() && i < SHOP_HOST_ITEM_MAX_NUM; ++i)
  492. {
  493. const SHOP_ITEM & item = m_itemVector[i];
  494. if (m_pkPC && !item.pkItem)
  495. continue;
  497. pack2.items[i].vnum = item.vnum;
  499. if (bOtherEmpire && raise_empire_prices) // no empire price penalty for pc shop
  500. pack2.items[i].price = item.price * 3;
  501. else
  502. pack2.items[i].price = item.price;
  504. pack2.items[i].count = item.count;
  506. if (item.pkItem)
  507. {
  508. thecore_memcpy(pack2.items[i].alSockets, item.pkItem->GetSockets(), sizeof(pack2.items[i].alSockets));
  509. thecore_memcpy(pack2.items[i].aAttr, item.pkItem->GetAttributes(), sizeof(pack2.items[i].aAttr));
  510. }
  511. }
  513. pack.size = sizeof(pack) + sizeof(pack2);
  515. ch->GetDesc()->BufferedPacket(&pack, sizeof(TPacketGCShop));
  516. ch->GetDesc()->Packet(&pack2, sizeof(TPacketGCShopStart));
  517. return true;
  518. }
  520. void CShop::RemoveGuest(LPCHARACTER ch)
  521. {
  522. if (ch->GetShop() != this)
  523. return;
  525. m_map_guest.erase(ch);
  526. ch->SetShop(NULL);
  528. TPacketGCShop pack;
  530. pack.header = HEADER_GC_SHOP;
  531. pack.subheader = SHOP_SUBHEADER_GC_END;
  532. pack.size = sizeof(TPacketGCShop);
  534. ch->GetDesc()->Packet(&pack, sizeof(pack));
  535. }
  537. void CShop::Broadcast(const void * data, int bytes)
  538. {
  539. sys_log(1, "Shop::Broadcast %p %d", data, bytes);
  541. GuestMapType::iterator it;
  543. it = m_map_guest.begin();
  545. while (it != m_map_guest.end())
  546. {
  547. LPCHARACTER ch = it->first;
  549. if (ch->GetDesc())
  550. ch->GetDesc()->Packet(data, bytes);
  552. ++it;
  553. }
  554. }
  556. void CShop::BroadcastUpdateItem(BYTE pos)
  557. {
  558. TPacketGCShop pack;
  559. TPacketGCShopUpdateItem pack2;
  561. TEMP_BUFFER buf;
  563. pack.header = HEADER_GC_SHOP;
  564. pack.subheader = SHOP_SUBHEADER_GC_UPDATE_ITEM;
  565. pack.size = sizeof(pack) + sizeof(pack2);
  567. pack2.pos = pos;
  569. if (m_pkPC && !m_itemVector[pos].pkItem)
  570. pack2.item.vnum = 0;
  571. else
  572. {
  573. pack2.item.vnum = m_itemVector[pos].vnum;
  574. if (m_itemVector[pos].pkItem)
  575. {
  576. thecore_memcpy(pack2.item.alSockets, m_itemVector[pos].pkItem->GetSockets(), sizeof(pack2.item.alSockets));
  577. thecore_memcpy(pack2.item.aAttr, m_itemVector[pos].pkItem->GetAttributes(), sizeof(pack2.item.aAttr));
  578. }
  579. else
  580. {
  581. memset(pack2.item.alSockets, 0, sizeof(pack2.item.alSockets));
  582. memset(pack2.item.aAttr, 0, sizeof(pack2.item.aAttr));
  583. }
  584. }
  586. pack2.item.price = m_itemVector[pos].price;
  587. pack2.item.count = m_itemVector[pos].count;
  589. buf.write(&pack, sizeof(pack));
  590. buf.write(&pack2, sizeof(pack2));
  592. Broadcast(buf.read_peek(), buf.size());
  593. }
  595. int CShop::GetNumberByVnum(DWORD dwVnum)
  596. {
  597. int itemNumber = 0;
  599. for (DWORD i = 0; i < m_itemVector.size() && i < SHOP_HOST_ITEM_MAX_NUM; ++i)
  600. {
  601. const SHOP_ITEM & item = m_itemVector[i];
  603. if (item.vnum == dwVnum)
  604. {
  605. itemNumber += item.count;
  606. }
  607. }
  609. return itemNumber;
  610. }
  612. bool CShop::IsSellingItem(DWORD itemID)
  613. {
  614. bool isSelling = false;
  616. for (DWORD i = 0; i < m_itemVector.size() && i < SHOP_HOST_ITEM_MAX_NUM; ++i)
  617. {
  618. if (static_cast<unsigned long>(m_itemVector[i].itemid) == itemID)
  619. {
  620. isSelling = true;
  621. break;
  622. }
  623. }
  625. return isSelling;
  627. }