blob: 321c55130aab050e42ed3656cae2097563e9f154 [file] [log] [blame]
// { dg-do assemble }
// { dg-options "-O" }
// GROUPS passed old-abort
typedef unsigned char uchar;
typedef unsigned short ushort;
typedef unsigned long ulong;
extern int swap_endian;
inline ushort
swapshort(ushort value)
{
value &= 0xffff;
return ((value << 8) | (value >> 8));
}
struct eshort
{
ushort data;
operator ushort() { return swap_endian ? swapshort(data) : data;}
eshort(ushort t) { data = swap_endian ? swapshort(t) : t;}
eshort() {}
};
inline ulong
swaplong(ulong value)
{
ulong v = (value << 16) | (value >> 16);
return ((v >> 8) & 0x00ff00ff) | ((v << 8) & 0xff00ff00);
}
struct elong
{
ulong data;
operator ulong() { return swap_endian ? swaplong(data) : data;}
elong(ulong t) { data = swap_endian ? swaplong(t) : t; }
elong() {}
};
struct digiheader
{
uchar type[2];
eshort soft_version;
eshort lo_boot_rev;
eshort hi_boot_rev;
eshort load_segment;
eshort length;
eshort exec_start;
eshort image_offset;
elong startup_code[2];
elong checksum;
};
extern void uncompress(uchar* buf, ulong len);
extern ulong compress(char* filename, uchar* buffer, ulong);
struct filehdr
{
eshort f_magic;
eshort f_nscns;
elong f_timdat;
elong f_symptr;
elong f_nsyms;
eshort f_opthdr;
eshort f_flags;
};
struct aouthdr
{
eshort magic;
eshort vstamp;
elong tsize;
elong dsize;
elong bsize;
elong entry;
elong text_start;
elong data_start;
elong bss_start;
elong gprmask;
elong cprmask[4];
elong gp_value;
};
struct scnhdr
{
char s_name[8];
elong s_paddr;
elong s_vaddr;
elong s_size;
elong s_scnptr;
elong s_relptr;
elong s_lnnoptr;
eshort s_nreloc;
eshort s_nlnno;
elong s_flags;
};
int file_little_endian;
int host_little_endian;
int swap_endian;
int docheck;
int expand;
ulong memsize;
ulong compression_quality;
char *compressfile;
int debug_level;
extern "C" int getopt (int, char**, const char*);
int
main(int argc, char** argv)
{
uchar checksum;
uchar docrc;
ulong len;
ulong maxlen;
int i;
int c;
int magic;
int tsize;
int dsize;
int quality;
char dummy;
uchar* code;
uchar* buf;
char* ap;
digiheader *dh;
compression_quality = 10000;
docheck = 0;
while ((c = getopt(argc, argv, "Ccdf:k:q:x:")) != -1)
{
switch (c)
{
default:
goto usage;
}
}
if ((expand && (docheck || compressfile || quality)) ||
(quality && !compressfile))
{
usage:
return(2);
}
if (compressfile)
{
dh->image_offset = len;
len += compress(compressfile, code + len, maxlen - len);
}
}