void clif_cashshop_ack(struct map_session_data* sd, int error)
{
	int fd = sd->fd;

	WFIFOHEAD(fd, packet_len(0x289));
	WFIFOW(fd,0) = 0x289;
	WFIFOL(fd,2) = sd->cashPoints;
#if PACKETVER < 20070711
	WFIFOW(fd,6) = TOW(error);
#else
	WFIFOL(fd,6) = sd->kafraPoints;
	WFIFOW(fd,10) = TOW(error);
#endif
	WFIFOSET(fd, packet_len(0x289));
}

#if PACKETVER >= 20120410
void clif_parse_cashshop_buy( int fd, struct map_session_data *sd ){ 
	struct s_packet_db* info = &packet_db[sd->packet_ver][RFIFOW(fd,0)]; 
	uint16 length = RFIFOW( fd, info->pos[0] );
	uint16 count = RFIFOW( fd, info->pos[1] );
 
	if( length < 10 || length < ( 10 + count * 6 ) ){ 
		return; 
	}
 
	cashshop_buylist( sd, RFIFOL( fd, info->pos[2] ),
		count, (uint16 *)RFIFOP( fd, info->pos[3] ) ); 

}
#endif 

void clif_cashshop_result( struct map_session_data *sd, uint16 item_id, uint16 result ){
	WFIFOHEAD( sd->fd, 16 );
	WFIFOW( sd->fd, 0 ) = 0x849;
	WFIFOL( sd->fd, 2 ) = item_id;
	WFIFOW( sd->fd, 6 ) = result;
	WFIFOL( sd->fd, 8 ) = sd->cashPoints;
	WFIFOL( sd->fd, 12 ) = sd->kafraPoints;
	WFIFOSET( sd->fd, 16 );
}

// TODO: find a more accurate date for this  - Brynner
#if PACKETVER < 20120410
/// Request to buy item(s) from cash shop (CZ_PC_BUY_CASH_POINT_ITEM).
/// 0288 <name id>.W <amount>.W
/// 0288 <name id>.W <amount>.W <kafra points>.L (PACKETVER >= 20070711)
/// 0288 <packet len>.W <kafra points>.L <count>.W { <amount>.W <name id>.W }.4B*count (PACKETVER >= 20100803)
/// 0848 <packet len>.W <count>.W <packet len>.W <kafra points>.L <count>.W { <amount>.W <name id>.W <tab>.W }.6B*count (PACKETVER >= 20130000)
void clif_parse_cashshop_buy(int fd, struct map_session_data *sd){

	int fail = 0;
	struct s_packet_db* info;
	int cmd = RFIFOW(fd,0);

	nullpo_retv(sd);

	info = &packet_db[sd->packet_ver][cmd];

	if( sd->state.trading || !sd->npc_shopid )
		fail = 1;
	else {
#if PACKETVER < 20101116
		short nameid = RFIFOW(fd,info->pos[0]);
		short amount = RFIFOW(fd,info->pos[1]);
		int points   = RFIFOL(fd,info->pos[2]);

		fail = npc_cashshop_buy(sd, nameid, amount, points);
		clif_cashshop_ack(sd,fail);
#else
		int s_itl = (cmd==0x848)?10:4; //item _list size (depend on cmd even for 2013+)
		int len    = RFIFOW(fd,info->pos[0]);
		int points = RFIFOL(fd,info->pos[1]);
		int count  = RFIFOW(fd,info->pos[2]);
		unsigned short* item_list = (unsigned short*)RFIFOP(fd,info->pos[3]);

		if( len < 10 || len != 10 + count * s_itl){
			ShowWarning("Player %u sent incorrect cash shop buy packet (len %u:%u)!\n", sd->status.char_id, len, 10 + count * s_itl);
			return;
		}
		if(cmd==0x848){
			cashshop_buylist( sd, points, count, item_list);
		} else {
			fail = npc_cashshop_buylist(sd,points,count,item_list);
		}
#endif
	}
	clif_cashshop_ack(sd,fail);
}
#endif