#include <endian.h>

#include <string.h>

#include <perk/perk.h>

#include "perk_impl.h"

int pe_read_dos_header(const struct pe_image_dos_hdr * p, struct pe_meta_image_dos_hdr * m)

{

	if ((p->dos_magic[0] != 'M') || (p->dos_magic[1] != 'Z'))

		return PERK_BAD_DOS_HEADER;

	#if (BYTE_ORDER == LITTLE_ENDIAN)

	memcpy(m,p,sizeof(*p));

	#else

	int i;

	m->dos_magic[0] = p->dos_magic[0];

	m->dos_magic[1] = p->dos_magic[1];

	m->dos_cblp	= pe_read_short(p->dos_cblp);

	m->dos_cp	= pe_read_short(p->dos_cp);

	m->dos_crlc	= pe_read_short(p->dos_crlc);

	m->dos_cparhdr	= pe_read_short(p->dos_cparhdr);

	m->dos_minalloc	= pe_read_short(p->dos_minalloc);

	m->dos_maxalloc	= pe_read_short(p->dos_maxalloc);

	m->dos_ss	= pe_read_short(p->dos_ss);

	m->dos_sp	= pe_read_short(p->dos_sp);

	m->dos_csum	= pe_read_short(p->dos_csum);

	m->dos_ip	= pe_read_short(p->dos_ip);

	m->dos_cs	= pe_read_short(p->dos_cs);

	m->dos_lfarlc	= pe_read_short(p->dos_lfarlc);

	m->dos_ovno	= pe_read_short(p->dos_ovno);

	for (i=0; i<4; i++)

		m->dos_res[i] = pe_read_short(&p->dos_res[2*i]);

	m->dos_oemid	= pe_read_short(p->dos_oemid);

	m->dos_oeminfo	= pe_read_short(p->dos_oeminfo);

	for (i=0; i<10; i++)

		m->dos_res2[i] = pe_read_short(&p->dos_res2[2*i]);

	m->dos_lfanew	= pe_read_long(p->dos_lfanew);

	#endif

	return 0;

}