Reformat all C files.
I'll push a formatting guide at some point. There may still be outstanding changes, but please feel free to resolve those as you arrive a them. To the best of my knowledge, there is no changes to the actual code content, but the formatter does have the occasional bug. If you run into an issue, please fix it!
This commit is contained in:
Sean Hunt
+93
-91
@@ -1,4 +1,4 @@
|
||||
/* NetHack 3.6 ovlinit.c $NHDT-Date$ $NHDT-Branch$:$NHDT-Revision$ */
|
||||
/* NetHack 3.6 ovlinit.c $NHDT-Date: 1431192781 2015/05/09 17:33:01 $ $NHDT-Branch: master $:$NHDT-Revision: 1.7 $ */
|
||||
/* NetHack 3.6 ovlinit.c $Date: 2009/05/06 10:49:38 $ $Revision: 1.4 $ */
|
||||
/* SCCS Id: @(#)ovlinit.c 3.5 1994/03/20 */
|
||||
/* Copyright (c) NetHack PC Development Team 1995 */
|
||||
@@ -8,57 +8,57 @@
|
||||
#include <dos.h>
|
||||
#include <stdio.h>
|
||||
|
||||
|
||||
#ifdef _MSC_VER
|
||||
|
||||
#define RESERVED_PARAGRAPHS 5120 /* leave 80K for malloc and inits */
|
||||
/* subject to change before release */
|
||||
#define RESERVED_PARAGRAPHS 5120 /* leave 80K for malloc and inits */
|
||||
/* subject to change before release */
|
||||
|
||||
/*
|
||||
* memavail() Returns the amount of RAM available (in paragraphs which are 16
|
||||
* bytes) - the amount to be reserved for heap allocations.
|
||||
*
|
||||
*/
|
||||
unsigned memavail(minovl)
|
||||
unsigned minovl; /* minimum size of overlay heap */
|
||||
unsigned
|
||||
memavail(minovl)
|
||||
unsigned minovl; /* minimum size of overlay heap */
|
||||
{
|
||||
unsigned available;
|
||||
unsigned available;
|
||||
|
||||
unsigned farparaavail;
|
||||
unsigned tmp;
|
||||
unsigned farparaavail;
|
||||
unsigned tmp;
|
||||
|
||||
/*
|
||||
* _dos_allocmem will return the maximum block size available.
|
||||
* It uses DOS (int 21h) service 0x48.
|
||||
*/
|
||||
/*
|
||||
* _dos_allocmem will return the maximum block size available.
|
||||
* It uses DOS (int 21h) service 0x48.
|
||||
*/
|
||||
|
||||
_dos_allocmem(0xFFFF, &farparaavail);
|
||||
available = farparaavail - RESERVED_PARAGRAPHS;
|
||||
tmp = RESERVED_PARAGRAPHS + minovl;
|
||||
if (farparaavail < tmp) {
|
||||
panic("Not enough free RAM to begin a game of NetHack (%ld bytes)",
|
||||
(long)((long)tmp * 16L));
|
||||
}
|
||||
return available;
|
||||
_dos_allocmem(0xFFFF, &farparaavail);
|
||||
available = farparaavail - RESERVED_PARAGRAPHS;
|
||||
tmp = RESERVED_PARAGRAPHS + minovl;
|
||||
if (farparaavail < tmp) {
|
||||
panic("Not enough free RAM to begin a game of NetHack (%ld bytes)",
|
||||
(long) ((long) tmp * 16L));
|
||||
}
|
||||
return available;
|
||||
}
|
||||
#endif /*_MSC_VER*/
|
||||
#endif /*_MSC_VER*/
|
||||
|
||||
#ifdef __BORLANDC__
|
||||
|
||||
#define RSRVD_MALLOC 65 * 1024L /* malloc() calls use about 65K */
|
||||
#define RSRVD_CRTL 50 * 1024L /* C runtime library uses 50K */
|
||||
#define RSRVD_TOTAL 115 * 1024L /* reserved for use in malloc() */
|
||||
/* as well as by C runtime library */
|
||||
/* routines which allocate memory */
|
||||
/* after this routine runs. */
|
||||
#define MIN_OVRBUF 30 * 1024L /* Overlay buffer gets minimum of */
|
||||
#define MAX_OVRBUF 200 * 1024L /* 30K and maximum of 200K. */
|
||||
#define RSRVD_MALLOC 65 * 1024L /* malloc() calls use about 65K */
|
||||
#define RSRVD_CRTL 50 * 1024L /* C runtime library uses 50K */
|
||||
#define RSRVD_TOTAL 115 * 1024L /* reserved for use in malloc() */
|
||||
/* as well as by C runtime library */
|
||||
/* routines which allocate memory */
|
||||
/* after this routine runs. */
|
||||
#define MIN_OVRBUF 30 * 1024L /* Overlay buffer gets minimum of */
|
||||
#define MAX_OVRBUF 200 * 1024L /* 30K and maximum of 200K. */
|
||||
|
||||
#define RESIZE_OVL
|
||||
#ifdef RESIZE_OVL
|
||||
|
||||
extern unsigned _ovrbuffer = 0; /* Use default size initially */
|
||||
unsigned appFail = 0; /* Fail flag if not enough RAM */
|
||||
extern unsigned _ovrbuffer = 0; /* Use default size initially */
|
||||
unsigned appFail = 0; /* Fail flag if not enough RAM */
|
||||
unsigned memAlloc = 0;
|
||||
unsigned long ProgramSize;
|
||||
unsigned long runAlloc;
|
||||
@@ -70,87 +70,89 @@ int xmsstatus;
|
||||
|
||||
void NDECL(_resizeOvrBuffer);
|
||||
|
||||
void _resizeOvrBuffer()
|
||||
void
|
||||
_resizeOvrBuffer()
|
||||
{
|
||||
mem_top = (unsigned far *) MK_FP( _psp, 0x02 );
|
||||
total = *mem_top - _psp;
|
||||
mem_top = (unsigned far *) MK_FP(_psp, 0x02);
|
||||
total = *mem_top - _psp;
|
||||
|
||||
ProgramSize = * (unsigned far *) MK_FP( _psp - 1, 0x03 );
|
||||
tmpbuffer = total - ProgramSize - RSRVD_TOTAL / 16;
|
||||
memAlloc = min (MAX_OVRBUF / 16, tmpbuffer);
|
||||
if (tmpbuffer >= MIN_OVRBUF / 16)
|
||||
_ovrbuffer = memAlloc;
|
||||
else {
|
||||
_ovrbuffer = 1;
|
||||
appFail = 1;
|
||||
};
|
||||
|
||||
|
||||
/*
|
||||
* Remember, when inside this code, nothing has been setup on
|
||||
* the system, so do NOT call any RTL functions for I/O or
|
||||
* anything else that might rely on a startup function. This
|
||||
* includes accessing any global objects as their constructors
|
||||
* have not been called yet.
|
||||
*/
|
||||
ProgramSize = *(unsigned far *) MK_FP(_psp - 1, 0x03);
|
||||
tmpbuffer = total - ProgramSize - RSRVD_TOTAL / 16;
|
||||
memAlloc = min(MAX_OVRBUF / 16, tmpbuffer);
|
||||
if (tmpbuffer >= MIN_OVRBUF / 16)
|
||||
_ovrbuffer = memAlloc;
|
||||
else {
|
||||
_ovrbuffer = 1;
|
||||
appFail = 1;
|
||||
};
|
||||
|
||||
/*
|
||||
* Remember, when inside this code, nothing has been setup on
|
||||
* the system, so do NOT call any RTL functions for I/O or
|
||||
* anything else that might rely on a startup function. This
|
||||
* includes accessing any global objects as their constructors
|
||||
* have not been called yet.
|
||||
*/
|
||||
}
|
||||
|
||||
#pragma startup _resizeOvrBuffer 0 /* Put function in table */
|
||||
#pragma startup _resizeOvrBuffer 0 /* Put function in table */
|
||||
|
||||
void
|
||||
startup ()
|
||||
startup()
|
||||
{
|
||||
if (appFail) {
|
||||
printf ("NetHack fits in memory, but it cannot allocate memory");
|
||||
printf (" for the overlay buffer\nand the runtime functions. ");
|
||||
printf ("Please free up just %ld more bytes.",
|
||||
(long)(MIN_OVRBUF - tmpbuffer * 16L));
|
||||
exit (-1);
|
||||
} else {
|
||||
if (appFail) {
|
||||
printf("NetHack fits in memory, but it cannot allocate memory");
|
||||
printf(" for the overlay buffer\nand the runtime functions. ");
|
||||
printf("Please free up just %ld more bytes.",
|
||||
(long) (MIN_OVRBUF - tmpbuffer * 16L));
|
||||
exit(-1);
|
||||
} else {
|
||||
/* Now try to use expanded memory for the overlay manager */
|
||||
/* If that doesn't work, we revert to extended memory */
|
||||
|
||||
/* Now try to use expanded memory for the overlay manager */
|
||||
/* If that doesn't work, we revert to extended memory */
|
||||
|
||||
emsstatus = _OvrInitEms (0, 0, 0);
|
||||
emsstatus = _OvrInitEms(0, 0, 0);
|
||||
#ifdef RECOGNIZE_XMS
|
||||
xmsstatus = (emsstatus) ? _OvrInitExt (0, 0) : -1;
|
||||
xmsstatus = (emsstatus) ? _OvrInitExt(0, 0) : -1;
|
||||
#endif
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void
|
||||
show_borlandc_stats(win)
|
||||
winid win;
|
||||
{
|
||||
char buf[BUFSZ];
|
||||
char buf[BUFSZ];
|
||||
|
||||
putstr(win, 0, "");
|
||||
putstr(win, 0, "");
|
||||
putstr(win, 0, "Memory usage stats"); putstr(win, 0, "");
|
||||
putstr(win, 0, "");
|
||||
Sprintf (buf, "Overlay buffer memory allocation: %ld bytes.",
|
||||
memAlloc * 16L); putstr(win, 0, buf);
|
||||
Sprintf (buf, "_ovrbuffer = %u.", _ovrbuffer); putstr(win, 0, buf);
|
||||
Sprintf (buf, "Startup memory usage: 0x%X", ProgramSize);
|
||||
putstr(win, 0, buf);
|
||||
runAlloc = * (unsigned far *) MK_FP( _psp - 1, 0x03);
|
||||
Sprintf (buf, "Current memory usage: 0x%X", runAlloc);
|
||||
putstr(win, 0, buf);
|
||||
if (emsstatus) Sprintf (buf, "EMS search failed (%d).", emsstatus);
|
||||
else Sprintf (buf, "EMS search successful.");
|
||||
putstr(win, 0, buf);
|
||||
putstr(win, 0, "");
|
||||
putstr(win, 0, "");
|
||||
putstr(win, 0, "Memory usage stats");
|
||||
putstr(win, 0, "");
|
||||
putstr(win, 0, "");
|
||||
Sprintf(buf, "Overlay buffer memory allocation: %ld bytes.",
|
||||
memAlloc * 16L);
|
||||
putstr(win, 0, buf);
|
||||
Sprintf(buf, "_ovrbuffer = %u.", _ovrbuffer);
|
||||
putstr(win, 0, buf);
|
||||
Sprintf(buf, "Startup memory usage: 0x%X", ProgramSize);
|
||||
putstr(win, 0, buf);
|
||||
runAlloc = *(unsigned far *) MK_FP(_psp - 1, 0x03);
|
||||
Sprintf(buf, "Current memory usage: 0x%X", runAlloc);
|
||||
putstr(win, 0, buf);
|
||||
if (emsstatus)
|
||||
Sprintf(buf, "EMS search failed (%d).", emsstatus);
|
||||
else
|
||||
Sprintf(buf, "EMS search successful.");
|
||||
putstr(win, 0, buf);
|
||||
#ifdef RECOGNIZE_XMS
|
||||
if (xmsstatus) Sprintf (buf, "XMS search failed (%d).", xmsstatus);
|
||||
else Sprintf (buf, "XMS search successful.");
|
||||
putstr(win, 0, buf);
|
||||
if (xmsstatus)
|
||||
Sprintf(buf, "XMS search failed (%d).", xmsstatus);
|
||||
else
|
||||
Sprintf(buf, "XMS search successful.");
|
||||
putstr(win, 0, buf);
|
||||
#endif
|
||||
|
||||
|
||||
}
|
||||
|
||||
#endif /* #ifdef RESIZE_OVL */
|
||||
#endif /* #ifdef RESIZE_OVL */
|
||||
#endif /* #ifdef __BORLANDC__ */
|
||||
|
||||
/*ovlinit.c*/
|
||||
|
||||
Reference in New Issue
Block a user