// INPUT ARGUMENTS:
// lpData: in - source buffer
// uSize:  in - source buffer size
// Point:  out - width & height
//
// RETURN: Windows Bitmap
//
extern "C" DLLEXPORT HBITMAP RawLoad(void* lpData, DWORD uSize, POINT* Point)
{
	LibRaw raw;
	libraw_processed_image_t *image = NULL;
	HBITMAP hBmp = NULL;
 
	if (raw.open_buffer(lpData, uSize) != LIBRAW_SUCCESS) return NULL;
 
	raw.imgdata.params.half_size = 1;
	raw.imgdata.params.user_flip = 0;
	if (raw.unpack() != LIBRAW_SUCCESS) return NULL;
	if (raw.dcraw_process() != LIBRAW_SUCCESS) return NULL;
 
	// for debugging purposes
	raw.dcraw_ppm_tiff_writer("test.ppm");
 
	image = raw.dcraw_make_mem_image();
	if (image == NULL) return NULL;
 
	BITMAPINFO BitmapInfo;
	ZeroMemory(&BitmapInfo, sizeof BITMAPINFO);
	BitmapInfo.bmiHeader.biCompression = BI_RGB;
	BitmapInfo.bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
	BitmapInfo.bmiHeader.biPlanes = 1;
	BitmapInfo.bmiHeader.biBitCount = 32;
	BitmapInfo.bmiHeader.biWidth = image->width;
	Point->x = image->width;
	BitmapInfo.bmiHeader.biHeight = -image->height;
	Point->y = image->height;
 
	HDC hDC = GetDC(NULL);
	unsigned char* lpDib;
	hBmp = CreateDIBSection(hDC, &BitmapInfo, DIB_RGB_COLORS, (void**)&lpDib, NULL, NULL);
	ReleaseDC(NULL, hDC);
	if (hBmp == NULL) return NULL;
	if (&lpDib == NULL) return NULL;
 
	int i;
	unsigned char * src = image->data;
	unsigned char * dest = lpDib;
	for (i = image->data_size/3; --i; dest += 4, src += 3)
	{
		dest[0] = src[2];
		dest[1] = src[1];
		dest[2] = src[0];
		dest[3] = 0;
	}
	for (i = 0; i < 3; ++i)
	{
		dest[i] = src[i];
	}
	raw.dcraw_clear_mem(image);
	return hBmp;
}