Function ToString

source/userdata.cpp:440–490

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

i32 ToString(lua_State* L) {
	UserData* pUserData = (UserData*)luaL_checkudata(L, 1, "UserData");

	StringBuilder builder(g_pArenaFrame);

	switch(pUserData->type) {
		case Type::Float32: builder.Append("userdata(\"f32\""); break;
		case Type::Int32: builder.Append("userdata(\"i32\""); break;
		case Type::Int16: builder.Append("userdata(\"i16\""); break;
		case Type::Uint8: builder.Append("userdata(\"u8\"");; break;
	}
	builder.AppendFormat(",%i,%i,\"", pUserData->width, pUserData->height);
	switch(pUserData->type) {
		case Type::Float32: {
			f32* pFloats = (f32*)pUserData->pData;
			for (int i = 0; i < pUserData->width*pUserData->height; i++) {
				if (i+1 < pUserData->width*pUserData->height)
					builder.AppendFormat("%.9g,", pFloats[i]);
				else
					builder.AppendFormat("%.9g", pFloats[i]);
			}
			break;
		}
		case Type::Int32: {
			// 8 hex digits
			i32* pInts = (i32*)pUserData->pData;
			for (int i = 0; i < pUserData->width*pUserData->height; i++)
				builder.AppendFormat("%08x", pInts[i]);
			break;
		}
		case Type::Int16: {
			// 4 hex digits
			i16* pInts = (i16*)pUserData->pData;
			for (int i = 0; i < pUserData->width*pUserData->height; i++)
				builder.AppendFormat("%04x", pInts[i]);
			break;
		}
		case Type::Uint8: {
			// two hex digits == 1 byte
			u8* pInts = (u8*)pUserData->pData;
			for (int i = 0; i < pUserData->width*pUserData->height; i++)
				builder.AppendFormat("%02x", pInts[i]);
			break;
		}
	}
	builder.Append("\")");

	String result = builder.CreateString(g_pArenaFrame);
	lua_pushstring(L, result.pData);
	return 1;
}

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