#include "lsnes.hpp"
#include <snes/snes.hpp>
#include <ui-libsnes/libsnes.hpp>

#include "core/controllerframe.hpp"

namespace
{
	const char* buttons = "BYsSudlrAXLR";

	struct porttype_multitap : public porttype_info
	{
		porttype_multitap() : porttype_info(PT_MULTITAP, "multitap", 6) {}
		void write(unsigned char* buffer, unsigned idx, unsigned ctrl, short x) const throw()
		{
			if(ctrl >= 12 || idx > 4)
				return;
			unsigned i = idx * 12 + ctrl;
			if(x)
				buffer[i / 8] |= (1 << (i % 8));
			else
				buffer[i / 8] &= ~(1 << (i % 8));
		}

		short read(const unsigned char* buffer, unsigned idx, unsigned ctrl) const  throw()
		{
			if(ctrl >= 12 || idx > 4)
				return 0;
			unsigned i = idx * 12 + ctrl;
			return ((buffer[i / 8] & (1 << (i % 8))) != 0);
		}

		void display(const unsigned char* buffer, unsigned idx, char* buf) const  throw()
		{
			if(idx > 3) {
				buf[0] = '\0';
				return;
			}
			unsigned j = idx * 12;
			for(unsigned i = 0; i < 12; i++)
				buf[i] = (buffer[(i + j) / 8] & (1 << ((i + j) % 8))) ? buttons[i % 12] : ' ';
			buf[12] = '\0';
		}

		size_t serialize(const unsigned char* buffer, char* textbuf) const  throw()
		{
			unsigned j = 0;
			for(unsigned i = 0; i < 48; i++) {
				if(i % 12 == 0)
					textbuf[j++] = '|';
				textbuf[j++] = (buffer[i / 8] & (1 << (i % 8))) ? buttons[i % 12] : '.';
			}
			return j;
		}

		size_t deserialize(unsigned char* buffer, const char* textbuf) const  throw()
		{
			buffer[0] = 0;
			buffer[1] = 0;
			buffer[2] = 0;
			buffer[3] = 0;
			buffer[4] = 0;
			buffer[5] = 0;
			const char* orig_texbuf = textbuf;
			size_t index = 0;
			for(unsigned i = 0; i < 48; i++) {
				if(read_button_value(textbuf, index))
					buffer[i / 8] |= (1 << (i % 8));
				if(i % 12 == 0 && i > 0)
					skip_rest_of_field(textbuf, index, true);
			}
			skip_rest_of_field(textbuf, index, false);
			return index;
		}

		devicetype_t devicetype(unsigned idx) const  throw()
		{
			return (idx < 4) ? DT_GAMEPAD : DT_NONE;
		}

		unsigned controllers() const  throw()
		{
			return 4;
		}

		unsigned internal_type() const  throw()
		{
			return SNES_DEVICE_MULTITAP;
		}

		bool legal(unsigned port) const  throw()
		{
			return true;
		}
	} multitap;
}