#include "proto.h"
#include "ringbuf.h"
#include "pando_types.h"

I8 FUNCTION_ATTRIBUTE PROTO_Init(PROTO_PARSER *parser, PROTO_PARSE_CALLBACK *completeCallback, U8 *buf, U16 bufSize)
{
    parser->buf = buf;
    parser->bufSize = bufSize;
    parser->dataLen = 0;
    parser->callback = completeCallback;
    parser->isEsc = 0;
    return 0;
}

I8 FUNCTION_ATTRIBUTE PROTO_ParseByte(PROTO_PARSER *parser, U8 value)
{	
	switch(value){
		case 0x7D:
			parser->isEsc = 1;
			break;
		
		case 0x7E:
			parser->dataLen = 0;
			parser->isEsc = 0;
			parser->isBegin = 1;
			break;
		
		case 0x7F:
			if (parser->callback != NULL)
				parser->callback();
			parser->isBegin = 0;
			return 0;
			break;
		
		default:
			if(parser->isBegin == 0) break;
			
			if(parser->isEsc){
				value ^= 0x20;
				parser->isEsc = 0;
			}
				
			if(parser->dataLen < parser->bufSize)
				parser->buf[parser->dataLen++] = value;
				
			break;
	}
    return -1;
}

I8 FUNCTION_ATTRIBUTE PROTO_Parse(PROTO_PARSER *parser, U8 *buf, U16 len)
{
    while(len--)
        PROTO_ParseByte(parser, *buf++);

    return 0;
}
I16 FUNCTION_ATTRIBUTE PROTO_ParseRb(RINGBUF* rb, U8 *bufOut, U16* len, U16 maxBufLen)
{
	U8 c;

	PROTO_PARSER proto;
	PROTO_Init(&proto, NULL, bufOut, maxBufLen);
	while(RINGBUF_Get(rb, &c) == 0){
		if(PROTO_ParseByte(&proto, c) == 0){
			*len = proto.dataLen;
			return 0;
		}
	}
	return -1;
}
I16 FUNCTION_ATTRIBUTE PROTO_Add(U8 *buf, const U8 *packet, I16 bufSize)
{
    U16 i = 2;
    U16 len = *(U16*) packet;

    if (bufSize < 1) return -1;

    *buf++ = 0x7E;
    bufSize--;

    while (len--) {
        switch (*packet) {
        case 0x7D:
        case 0x7E:
        case 0x7F:
            if (bufSize < 2) return -1;
            *buf++ = 0x7D;
            *buf++ = *packet++ ^ 0x20;
            i += 2;
            bufSize -= 2;
            break;
        default:
            if (bufSize < 1) return -1;
            *buf++ = *packet++;
            i++;
            bufSize--;
            break;
        }
    }

    if (bufSize < 1) return -1;
    *buf++ = 0x7F;

    return i;
}

I16 FUNCTION_ATTRIBUTE PROTO_AddRb(RINGBUF *rb, const U8 *packet, I16 len)
{
    U16 i = 2;
    if(RINGBUF_Put(rb, 0x7E) == -1) return -1;
    while (len--) {
        switch (*packet) {
        case 0x7D:
        case 0x7E:
        case 0x7F:
        	if(RINGBUF_Put(rb, 0x7D) == -1) return -1;
        	if(RINGBUF_Put(rb, *packet++ ^ 0x20) == -1) return -1;
            i += 2;
            break;
        default:
        	if(RINGBUF_Put(rb, *packet++) == -1) return -1;
            i++;
            break;
        }
    }
    if(RINGBUF_Put(rb, 0x7F) == -1) return -1;

    return i;
}