107 lines
1.7 KiB
C
107 lines
1.7 KiB
C
#define DUK /* Modifications by Duk Bekema. */
|
|
|
|
/* @(#)asize.c 1.2 */
|
|
/* $Header$ */
|
|
#define ushort unsigned short
|
|
|
|
#include <stdio.h>
|
|
#include "out.h"
|
|
|
|
/*
|
|
asize -- determine object size
|
|
|
|
*/
|
|
|
|
main(argc, argv)
|
|
char **argv;
|
|
{
|
|
struct outhead buf;
|
|
struct outsect sbuf;
|
|
ushort nrsect;
|
|
long sum;
|
|
int gorp;
|
|
FILE *f;
|
|
|
|
if (--argc == 0) {
|
|
argc = 1;
|
|
argv[1] = "a.out";
|
|
}
|
|
gorp = argc;
|
|
|
|
while(argc--) {
|
|
if ((f = fopen(*++argv, "r"))==NULL) {
|
|
fprintf(stderr, "asize: cannot open %s\n", *argv);
|
|
continue;
|
|
}
|
|
getofmt ((char *)&buf, SF_HEAD , f);
|
|
if(BADMAGIC(buf)) {
|
|
fprintf(stderr, "asize: %s-- bad format\n", *argv);
|
|
fclose(f);
|
|
continue;
|
|
}
|
|
nrsect = buf.oh_nsect;
|
|
if (nrsect == 0) {
|
|
fprintf(stderr, "asize: %s-- no sections\n", *argv);
|
|
fclose(f);
|
|
continue;
|
|
}
|
|
if (gorp > 1)
|
|
printf("%s: ", *argv);
|
|
|
|
sum = 0;
|
|
while (nrsect-- > 0) {
|
|
getofmt ((char *)&sbuf, SF_SECT , f);
|
|
printf("%ld", sbuf.os_size);
|
|
sum += sbuf.os_size;
|
|
if (nrsect > 0)
|
|
putchar('+');
|
|
}
|
|
printf(" = %ld = 0x%lx\n", sum, sum);
|
|
fclose(f);
|
|
}
|
|
}
|
|
|
|
getofmt(p, s, f)
|
|
register char *p;
|
|
register char *s;
|
|
register FILE *f;
|
|
{
|
|
register i;
|
|
register long l;
|
|
|
|
for (;;) {
|
|
switch (*s++) {
|
|
/* case '0': p++; continue; */
|
|
case '1':
|
|
*p++ = getc(f);
|
|
continue;
|
|
case '2':
|
|
i = getc(f);
|
|
i |= (getc(f) << 8);
|
|
#ifndef DUK
|
|
*((short *)p)++ = i;
|
|
#else DUK
|
|
*((short *)p) = i;
|
|
p += sizeof(short);
|
|
#endif DUK
|
|
continue;
|
|
case '4':
|
|
l = (long)getc(f);
|
|
l |= (long)(getc(f) << 8);
|
|
l |= ((long)getc(f) << 16);
|
|
l |= ((long)getc(f) << 24);
|
|
#ifndef DUK
|
|
*((long *)p)++ = l;
|
|
#else DUK
|
|
*((long *)p) = l;
|
|
p += sizeof(long);
|
|
#endif DUK
|
|
continue;
|
|
default:
|
|
case '\0':
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|