Apple-2-SW/ProDOS-Utils
1
0
Fork 0
mirror of https://github.com/bobbimanners/ProDOS-Utils.git synced 2025-03-19 20:30:09 +00:00
Code Issues Projects Releases Wiki Activity

New utility DISCONN.SYSTEM, which disconnects any drives mapped to slot 1.

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2020-09-10 20:24:03 -04:00
parent 61a40957a4
commit 351184841a
3 changed files with 71 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
Makefile
View File

@ -11,19 +11,28 @@ CC65LIBDIR = $(CC65DIR)/lib
CC65INCDIR = $(CC65DIR)/include
CA65INCDIR = $(CC65DIR)/asminc
all: sortdir.po sortdir.system\#ff0000
all: sortdir.po sortdir.system\#ff0000 disconn.system\#ff0000
clean:
rm -f *.s *.o *.map sortdir
rm -f *.s *.o *.map sortdir.system* disconn.system*
sortdir.o: sortdir.c
$(CC65BINDIR)/cc65 -I $(CC65INCDIR) -t apple2enh -D A2E -o sortdir.s sortdir.c
$(CC65BINDIR)/ca65 -I $(CA65INCDIR) -t apple2enh sortdir.s
disconn.o: disconn.c
$(CC65BINDIR)/cc65 -I $(CC65INCDIR) -t apple2enh -o disconn.s disconn.c
$(CC65BINDIR)/ca65 -I $(CA65INCDIR) -t apple2enh disconn.s
sortdir.system\#ff0000: sortdir.o
$(CC65BINDIR)/ld65 -m sortdir.map -o sortdir.system\#ff0000 -C apple2enh-system.cfg sortdir.o $(CC65LIBDIR)/apple2enh.lib
sortdir.po: sortdir.system\#ff0000
disconn.system\#ff0000: disconn.o
$(CC65BINDIR)/ld65 -m disconn.map -o disconn.system\#ff0000 -C apple2enh-system.cfg disconn.o $(CC65LIBDIR)/apple2enh.lib
sortdir.po: sortdir.system\#ff0000 disconn.system\#ff0000
cadius deletefile sortdir.po /p8.2.5/sortdir.system
cadius addfile sortdir.po /p8.2.5 sortdir.system\#ff0000
cadius deletefile sortdir.po /p8.2.5/disconn.system
cadius addfile sortdir.po /p8.2.5 disconn.system\#ff0000

59
disconn.c Normal file
View File

@ -0,0 +1,59 @@
//
// Very simple utility which just disconnects any drives mapped to slot 1
// Bobbi September 2020
//
#include <conio.h>
#include <stdint.h>
#include <stdio.h>
/*
* Disconnect drives from slot 1
*/
void disconnect_slot1(void) {
uint8_t i, j;
uint8_t *devcnt = (uint8_t*)0xbf31; // Number of devices
uint8_t *devlst = (uint8_t*)0xbf32; // Disk device numbers
uint16_t *s0d1 = (uint16_t*)0xbf10; // s0d1 driver vector
uint16_t *s1d1 = (uint16_t*)0xbf12; // s3d1 driver vector
uint16_t *s1d2 = (uint16_t*)0xbf22; // s3d2 driver vector
if (*s0d1 == *s1d2)
goto s1d1; // No s1d2
for (i = 0; i <= *devcnt; ++i)
if ((devlst[i] & 0xf0) == 0x90) {
for (j = i; j <= *devcnt; ++j)
devlst[j] = devlst[j + 1];
break;
}
*s1d2 = *s0d1;
--(*devcnt);
s1d1:
if (*s0d1 == *s1d1)
return; // No s1d1
for (i = 0; i <= *devcnt; ++i)
if ((devlst[i] & 0xf0) == 0x10) {
for (j = i; j <= *devcnt; ++j)
devlst[j] = devlst[j + 1];
break;
}
*s1d1 = *s0d1;
--(*devcnt);
}
void main(void) {
char c;
printf("*********************************\n");
printf("** Will disconnect any drives **\n");
printf("** mapped to slot 1 **\n");
printf("*********************************\n\n");
printf(" Press [D] to disconnect drives\n");
printf(" Any other key to cancel\n");
c = cgetc();
if ((c == 'd') || (c == 'D')) {
disconnect_slot1();
printf("\n** Done.\n");
} else {
printf("\n** Cancelled.\n");
}
}

BIN
sortdir.po
View File

Binary file not shown.