/**
 * FreeRDP: A Remote Desktop Protocol Implementation
 * Bitmap File Format Utils
 *
 * Copyright 2011 Marc-Andre Moreau <marcandre.moreau@gmail.com>
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <stdio.h>
#include <string.h>

#include <freerdp/types.h>

#include <freerdp/utils/bitmap.h>

typedef struct
{
	BYTE magic[2];
} BITMAP_MAGIC;

typedef struct
{
	UINT32 filesz;
	UINT16 creator1;
	UINT16 creator2;
	UINT32 bmp_offset;
} BITMAP_CORE_HEADER;

typedef struct
{
	UINT32 header_sz;
	INT32 width;
	INT32 height;
	UINT16 nplanes;
	UINT16 bitspp;
	UINT32 compress_type;
	UINT32 bmp_bytesz;
	INT32 hres;
	INT32 vres;
	UINT32 ncolors;
	UINT32 nimpcolors;
} BITMAP_INFO_HEADER;

void freerdp_bitmap_write(char* filename, void* data, int width, int height, int bpp)
{
	FILE* fp;
	BITMAP_MAGIC magic;
	BITMAP_CORE_HEADER header;
	BITMAP_INFO_HEADER info_header;

	fp = fopen(filename, "w+b");

	if (fp == NULL)
	{
		printf("failed to open file %s\n", filename);
		return;
	}

	magic.magic[0] = 'B';
	magic.magic[1] = 'M';

	header.creator1 = 0;
	header.creator2 = 0;

	header.bmp_offset =
			sizeof(BITMAP_MAGIC) +
			sizeof(BITMAP_CORE_HEADER) +
			sizeof(BITMAP_INFO_HEADER);

	info_header.bmp_bytesz = width * height * (bpp / 8);

	header.filesz =
		header.bmp_offset +
		info_header.bmp_bytesz;

	info_header.width = width;
	info_header.height = (-1) * height;
	info_header.nplanes = 1;
	info_header.bitspp = bpp;
	info_header.compress_type = 0;
	info_header.hres = width;
	info_header.vres = height;
	info_header.ncolors = 0;
	info_header.nimpcolors = 0;
	info_header.header_sz = sizeof(BITMAP_INFO_HEADER);

	fwrite((void*) &magic, sizeof(BITMAP_MAGIC), 1, fp);
	fwrite((void*) &header, sizeof(BITMAP_CORE_HEADER), 1, fp);
	fwrite((void*) &info_header, sizeof(BITMAP_INFO_HEADER), 1, fp);
	fwrite((void*) data, info_header.bmp_bytesz, 1, fp);

	fclose(fp);
}