home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Fred Fish Collection 1.5
/
ffcollection-1-5-1992-11.iso
/
ff_disks
/
200-299
/
ff233.lzh
/
CacheCard
/
cachecard.c
< prev
next >
Wrap
C/C++ Source or Header
|
1989-07-29
|
4KB
|
157 lines
/*
CacheCard V1.0
Copyright 1989 by Dave Haynie
MAIN PROGRAM
This program is a simple cache manager for use with SetCPU V1.5.
It allows the cachability of various autoconfig cards to be
adjusted.
The current MMU table used by SetCPU establishes 128K pages using
the short form of the early termination descriptor. Except for
any CardROMs that are translated, the table is only 1 level. In
systems with more than 16meg of address space, the MMU table will
be accordingly adjusted, though it's unlikely that any program
will need adjust table parameters beyond the first 16 megabytes.
*/
#include "cachecard.h"
#define max(a,b) ((a>b)?a:b)
#define PAGESIZE 0x00020000L
struct ExpansionBase *ExpansionBase = NULL; /* The expansion library */
struct systag *tag; /* The SetCPU system tag */
/* ====================================================================== */
/* A simple string comparison. */
BOOL striequ(s1,s2)
char *s1,*s2;
{
BOOL aok = FALSE;
while (*s1 && *s2 && (aok = (*s1++ & 0xdf) == (*s2++ & 0xdf)));
return (BOOL) (!*s1 && !*s2 && aok);
}
/* This routine gets the system tag from the patched system, if it's
there. This tag is stored in an invalid table entry that's within the
physical ROM image. If the MMU isn't on, I assume there's no system
tag. */
struct systag *GetSysTag() {
ULONG i, myCRP[2], *table = NULL;
if (!(GetTC() & TC_ENB)) return NULL;
GetCRP(myCRP);
table = (ULONG *)myCRP[1];
for (i = 0; i < 4096; ++i)
if ((table[i] & PD_DT_TYPE) == PD_DT_INVALID && IV_ADDR(table[i]))
return (struct systag *)IV_ADDR(table[i]);
return NULL;
}
/* This function prints a list of active devices and their associated
cache status. */
void PrintDevs() {
struct ConfigDev *cd = NULL;
ULONG page;
if (!(cd = FindConfigDev(NULL,-1L,-1L))) {
printf("No Amiga Devices present\n");
return;
}
printf("DEVICE ADDRESS LENGTH CACHE\n");
do {
printf("(%4x,%4x) ",cd->cd_Rom.er_Manufacturer,cd->cd_Rom.er_Product);
printf("%8lx %8lx ",cd->cd_BoardAddr,cd->cd_BoardSize);
page = (ULONG)cd->cd_BoardAddr/PAGESIZE;
if (tag->maintable[page] & PD_CI)
printf("DISABLED\n");
else
printf("ENABLED\n");
} while (cd = FindConfigDev(cd,-1L,-1L));
}
/* The main thing */
int main(argc,argv)
int argc;
char *argv[];
{
ULONG mmu = 0, page, size, manuf, prod;
BOOL ever;
struct ConfigDev *cd;
printf("\23333mCacheCard V%1.2f Copyright 1989 by Dave Haynie\2330m\n",
((float)PROGRAM_VERSION)/100.0);
if (argc == 2 && argv[1][0] == '?') {
printf("Usage: CacheCard [ENABLE|DISABLE manuf# prod#]\n");
exit(0);
}
if ((mmu = GetMMUType()) != 68851 && mmu != 68030) {
printf("Error: System does not contain an MMU\n");
exit(10);
}
if (!(tag = GetSysTag())) {
printf("Error: SetCPU FASTROM or KICKROM must be installed\n");
exit(10);
}
if (tag->tagsize >= SizeOf(struct systag) && tag->tablerev != TABLE_REV) {
printf("Error: Version of SetCPU is incompatible, use newer CacheCard program\n");
exit(0);
}
if (!(ExpansionBase = (struct ExpansionBase *)OpenLibrary("expansion.library",33L))) {
printf("Error: Can't find \"expansion.library\"\n");
exit(10);
}
if (argc > 1) {
sscanf(argv[2],"%lx",&manuf);
sscanf(argv[3],"%lx",&prod);
if (striequ(argv[1],"DISABLE"))
ever = FALSE;
else if (striequ(argv[1],"ENABLE"))
ever = TRUE;
else {
printf("Error: Illegal option\n");
exit(10);
}
if (!(cd = FindConfigDev(NULL,manuf,prod))) {
printf("Error: Device (%lx,%lx) Not Found\n",manuf,prod);
CloseLibrary(ExpansionBase);
exit(10);
}
page = (ULONG)cd->cd_BoardAddr/PAGESIZE;
size = max((ULONG)cd->cd_BoardSize/PAGESIZE,1);
while (size-- && page < tag->tablesize)
if ((tag->maintable[page] & PD_DT_TYPE) != PD_DT_INVALID) {
if (ever)
tag->maintable[page++] &= ~PD_CI;
else
tag->maintable[page++] |= PD_CI;
}
}
PrintDevs();
CloseLibrary(ExpansionBase);
exit(0);
}