/* DVB CI Application Manager */
#include <stdio.h>
#include <string.h>

#include "dvbci_appmgr.h"

static const char * FILENAME = "[dvbci_appmgr]";

eDVBCIApplicationManagerSession::eDVBCIApplicationManagerSession(tSlot *tslot)
{
	slot = tslot;
	slot->hasAppManager = true;
	slot->appSession = this;
}

eDVBCIApplicationManagerSession::~eDVBCIApplicationManagerSession()
{
	slot->hasAppManager = false;
	slot->appSession = NULL;
}

int eDVBCIApplicationManagerSession::receivedAPDU(const unsigned char *tag, const void *data, int len)
{
	printf("SESSION(%d)/APP %02x %02x %02x: ", session_nb, tag[0], tag[1], tag[2]);
	for (int i = 0; i < len; i++)
		printf("%02x ", ((const unsigned char*)data)[i]);
	printf("\n");

	if ((tag[0] == 0x9f) && (tag[1] == 0x80))
	{
		switch (tag[2])
		{
			case 0x21:
			{
				int dl;
				printf("application info:\n");
				printf("  len: %d\n", len);
				printf("  application_type: %d\n", ((unsigned char*)data)[0]);
				printf("  application_manufacturer: %02x %02x\n", ((unsigned char*)data)[2], ((unsigned char*)data)[1]);
				printf("  manufacturer_code: %02x %02x\n", ((unsigned char*)data)[4], ((unsigned char*)data)[3]);
				printf("  menu string: \n");
				dl = ((unsigned char*)data)[5];
				if ((dl + 6) > len)
				{
					printf("warning, invalid length (%d vs %d)\n", dl + 6, len);
					dl = len - 6;
				}
				char str[dl + 1];
				memcpy(str, ((char*)data) + 6, dl);
				str[dl] = '\0';
				for (int i = 0; i < dl; ++i)
					printf("%c", ((unsigned char*)data)[i + 6]);
				printf("\n");

				strcpy(slot->name, str);
				printf("%s set cam name %s on slot %d, %p\n", FILENAME, slot->name, slot->slot, slot);
				break;
			}
			default:
				printf("%s unknown APDU tag 9F 80 %02x\n", FILENAME, tag[2]);
				break;
		}
	}
	return 0;
}

int eDVBCIApplicationManagerSession::doAction()
{
	switch (state)
	{
		case stateStarted:
		{
			const unsigned char tag[3] = {0x9F, 0x80, 0x20};
			sendAPDU(tag);
			state = stateFinal;
			return 1;
		}
		case stateFinal:
			printf("in final state.");
			wantmenu = 0;
			if (wantmenu)
			{
				printf("%s wantmenu: sending Tenter_menu\n", FILENAME);
				const unsigned char tag[3] = {0x9F, 0x80, 0x22};
				sendAPDU(tag);
				wantmenu = 0;
				return 0;
			}
			else
				return 0;
		default:
			return 0;
	}
}

int eDVBCIApplicationManagerSession::startMMI()
{
	printf("%s -> %s\n", FILENAME, __func__);
	const unsigned char tag[3] = {0x9F, 0x80, 0x22};
	sendAPDU(tag);
	slot->mmiOpened = true;
	return 0;
}