From: ol.sc <ol.sc@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Tue, 23 Oct 2012 19:29:40 +0000 (+0000)
Subject: Added (naive) implementation of dio_query_sectcount() and dio_query_sectsize() for... 
X-Git-Tag: V2.14~201
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=9930379665034e0cd60278295b4e9af1b7a55c79;p=cc65

Added (naive) implementation of dio_query_sectcount() and dio_query_sectsize() for GEOS 64/128.

git-svn-id: svn://svn.cc65.org/cc65/trunk@5873 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/geos-cbm/disk/Makefile b/libsrc/geos-cbm/disk/Makefile
index 4594aacd9..f027b355e 100644
--- a/libsrc/geos-cbm/disk/Makefile
+++ b/libsrc/geos-cbm/disk/Makefile
@@ -10,6 +10,8 @@ S_OBJS +=	changediskdevice.o	\
 		dio_cts.o		\
 		dio_openclose.o		\
 		dio_params.o		\
+		dio_qcount.o		\
+		dio_qsize.o		\
 		dio_read.o		\
 		dio_stc.o		\
 		dio_write.o		\
diff --git a/libsrc/geos-cbm/disk/dio_qcount.s b/libsrc/geos-cbm/disk/dio_qcount.s
new file mode 100644
index 000000000..0c9524a9b
--- /dev/null
+++ b/libsrc/geos-cbm/disk/dio_qcount.s
@@ -0,0 +1,15 @@
+;
+; Oliver Schmidt, 2012-10-23
+;
+; unsigned __fastcall__ dio_query_sectcount (dhandle_t handle);
+;
+
+	    .export _dio_query_sectcount
+	    .import __oserror
+
+_dio_query_sectcount:
+	lda #0
+	sta __oserror
+	lda #<683
+	ldx #>683
+	rts
diff --git a/libsrc/geos-cbm/disk/dio_qsize.s b/libsrc/geos-cbm/disk/dio_qsize.s
new file mode 100644
index 000000000..46a4386ab
--- /dev/null
+++ b/libsrc/geos-cbm/disk/dio_qsize.s
@@ -0,0 +1,14 @@
+;
+; Oliver Schmidt, 2012-10-23
+;
+; unsigned __fastcall__ dio_query_sectsize (dhandle_t handle);
+;
+
+	    .export _dio_query_sectsize
+	    .import __oserror
+
+_dio_query_sectsize:
+	lda #<256
+	ldx #>256
+	sta __oserror
+	rts