Function ParseCborValue

source/serialization.cpp:676–826

// ***********************************************************************

bool ParseCborValue(lua_State* L, CborParserState& state, i32 maxItems = -1) {
	i32 items = 0;
	while ((maxItems == -1 || items < maxItems) && state.pCurrent < state.pEnd) {
		u8 val = *state.pCurrent;
		items++;

		// get major type and additional information
		u8 majorType = val >> 5; // top 3 bits
		u8 additionalInfo = val & 0x1fu; // bottom 5 bits

		u8 followingBytes = 1u << (additionalInfo - 24);

		if (additionalInfo < 24) {
			followingBytes = 0;
		}
		else if (additionalInfo == 31 && majorType == 7) { 
			// stop code of invalid info
			state.pCurrent++;
			return true;
		}

		state.pCurrent++;

		switch(majorType) {
			case 0:{ // positive int
				if (followingBytes == 0) {
					lua_pushnumber(L, additionalInfo);
				} else {
					i32 result = 0;
					MemcpyBE((u8*)&result, (u8*)state.pCurrent, followingBytes);
					lua_pushnumber(L, result);
					state.pCurrent += followingBytes;
				}
				break;
			}
			case 1: // negative int
				if (followingBytes == 0) {
					lua_pushnumber(L, -1-(i32)additionalInfo);
				} else {
					i32 result = 0;
					MemcpyBE((u8*)&result, (u8*)state.pCurrent, followingBytes);
					lua_pushnumber(L, -1-result);
					state.pCurrent += followingBytes;
				}
				break;
			case 2: { // userdata
				i32 dataLen = 0;
				if (followingBytes == 0) {
					dataLen = additionalInfo;
				} else {
					MemcpyBE((u8*)&dataLen, (u8*)state.pCurrent, followingBytes);
					state.pCurrent += followingBytes;
				}

				i32 userdataWidth = 0;
				i32 userdataHeight = 0;
				Type userdataType = Type::Int32;
				MemcpyLE((u8*)&userdataWidth, (u8*)state.pCurrent, 4);