X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2Fxms.c;h=7464a32fae6bed8feee46c2d1f685da236d9b64b;hb=bd35bd7d97646cc726bd40cc54c9a158af008b4d;hp=09797210f2ee5dadcd26398d2a3bd9159240a8f4;hpb=7402cbe9647bf3e9138b0b25933ae7169b23eb1d;p=16.git

diff --git a/src/lib/xms.c b/src/lib/xms.c
old mode 100644
new mode 100755
index 09797210..7464a32f
--- a/src/lib/xms.c
+++ b/src/lib/xms.c
@@ -1,187 +1,187 @@
-/* This file implements rudimentary XMS memory handling.
- * Documentation on the XMS API was found on http://www.qzx.com/pc-gpe/xms30.txt
- */
-
-#include "src\lib\xms.h"
-
-/* Set up the XMS driver, returns 0 on success and non-zero on failure */
-static int initxms(void)
-{
-	char XMSStatus = 0;
-
-	if ( XMSControl == 0 )
-	{
-		__asm {
-		; Is an XMS driver installed?
-			mov ax,4300h
-			int 2Fh
-			mov [XMSStatus], al
-		}
-
-		if ( XMSStatus == 0x80 )
-		{
-			__asm {
-			; Get the address of the driver control function
-				mov ax,4310h
-				int 2Fh
-				mov word ptr [XMSControl]  ,bx
-				mov word ptr [XMSControl+2],es
-			}
-		}
-	}
-
-	return ( XMSControl == 0 );
-}
-
-/* Allocate a slab of memory from XMS */
-void huge * xmsmalloc(long unsigned int size)
-{
-	unsigned int kB;
-	unsigned int XMSStatus = 0;
-	unsigned int XMSHandle = 0;
-	void huge * XMSPointer = NULL;
-	int n;
-
-	/* If we can not initialize XMS, the allocation fails */
-	if ( initxms() )
-		return NULL;
-
-	/* It is not possible to allocate more kilobytes than a 16-bit register can hold :-) */
-	if ( size / 1024 > UINT_MAX )
-		return NULL;
-
-	/* Get the next free entry in the handle <-> pointer mapping */
-	for ( n = 0; n < MAX_XMS_ALLOCATIONS; n++ )
-	{
-		if ( allocMapXMS[n].XMSPointer == NULL )
-			break;
-	}
-
-	if ( n == MAX_XMS_ALLOCATIONS )
-		return NULL;
-
-	kB = size / 1024 + (size % 1024 > 0);
-
-	__asm {
-	; Allocate [kB] kilobytes of XMS memory
-		mov ah, 09h
-		mov dx, [kB]
-		call [XMSControl]
-		mov [XMSStatus], ax
-		mov [XMSHandle], dx
-	}
-
-	/* Check if XMS allocation failed */
-	if ( XMSStatus == 0)
-		return NULL;
-
-	__asm {
-	; Convert XMS handle to normal pointer
-		mov ah, 0Ch
-		mov dx, [XMSHandle]
-		call [XMSControl]
-		mov [XMSStatus], ax
-
-		mov word ptr [XMSPointer],  bx 
-		mov word ptr [XMSPointer+2],dx
-	}
-
-	if ( XMSStatus == 0 )
-	{
-		/* Lock failed, deallocate the handle */
-		__asm {
-		; Free XMS handle
-			mov ah, 0Ah
-			mov dx, [XMSHandle]
-			call [XMSControl]
-
-		; Return value is not really interesting 
-		;   mov [XMSStatus], ax
-		}
-		return NULL;
-	}
-
-	/* Create an entry in the handle <-> pointer mapping */
-	allocMapXMS[n].XMSHandle = XMSHandle;
-	allocMapXMS[n].XMSPointer = XMSPointer;
-
-	return XMSPointer;
-}
-
-/* Free a pointer allocated with xmsalloc */
-void xmsfree(void huge * XMSPointer)
-{
-	int n;
-
-	if ( XMSPointer == NULL )
-		return;
-
-	if ( initxms() )
-		return;
-
-	for ( n = 0; n < MAX_XMS_ALLOCATIONS; n++ )
-	{
-		if ( allocMapXMS[n].XMSPointer == XMSPointer )
-		{
-			int XMSHandle = allocMapXMS[n].XMSHandle;
-
-			__asm {
-			; Unlock handle so we can free the memory block
-				mov ah, 0Dh
-				mov dx, [XMSHandle]
-				call [XMSControl]
-
-			; Free XMS memory
-				mov ah, 0Ah
-				mov dx, [XMSHandle]
-				call [XMSControl]
-
-			; Return value ignored
-			}
-
-			/* Clear handle <-> pointer map entry so it can be reused */
-			allocMapXMS[n].XMSHandle = 0;
-			allocMapXMS[n].XMSPointer = NULL;
-
-			return;
-		}
-	}
-}
-
-/* Write a memory report for debugging purposes */
-void xmsreport(void/*FILE * stream*/)
-{
-	int XMSVersionNumber = 0;
-	unsigned int XMSLargestBlock = 0;
-	unsigned int XMSTotal = 0;
-
-	if ( initxms() )
-	{
-		puts("Could not initialize XMS Driver!");
-		return;
-	}
-
-	__asm {
-	; Get the driver version number
-		mov ah,00h
-		call [XMSControl] ; Get XMS Version Number
-		mov [XMSVersionNumber], ax
-
-	; Get the amount of free XMS memory
-		mov ah, 08h
-		call [XMSControl]
-		mov [XMSLargestBlock], ax
-		mov [XMSTotal], dx
-	}
-
-	//fprintf(stream, "XMS Version number: %d\n", XMSVersionNumber);
-	//fprintf(stream, "Largest available block: %d kB (%d kB total)\n", XMSLargestBlock, XMSTotal);
-	printf("XMS Version number: %d\n", XMSVersionNumber);
-	printf("Largest available block: %d kB (%d kB total)\n", XMSLargestBlock, XMSTotal);
-}
-
-/*int main()
-{
-	xmsreport(fopen("xms.log", "w"));
-	return 0;
-}*/
+/* This file implements rudimentary XMS memory handling.
+ * Documentation on the XMS API was found on http://www.qzx.com/pc-gpe/xms30.txt
+ */
+
+#include "src\lib\xms.h"
+
+/* Set up the XMS driver, returns 0 on success and non-zero on failure */
+static int initxms(void)
+{
+	char XMSStatus = 0;
+
+	if ( XMSControl == 0 )
+	{
+		__asm {
+		; Is an XMS driver installed?
+			mov ax,4300h
+			int 2Fh
+			mov [XMSStatus], al
+		}
+
+		if ( XMSStatus == 0x80 )
+		{
+			__asm {
+			; Get the address of the driver control function
+				mov ax,4310h
+				int 2Fh
+				mov word ptr [XMSControl]  ,bx
+				mov word ptr [XMSControl+2],es
+			}
+		}
+	}
+
+	return ( XMSControl == 0 );
+}
+
+/* Allocate a slab of memory from XMS */
+void huge * xmsmalloc(long unsigned int size)
+{
+	unsigned int kB;
+	unsigned int XMSStatus = 0;
+	unsigned int XMSHandle = 0;
+	void huge * XMSPointer = NULL;
+	int n;
+
+	/* If we can not initialize XMS, the allocation fails */
+	if ( initxms() )
+		return NULL;
+
+	/* It is not possible to allocate more kilobytes than a 16-bit register can hold :-) */
+	if ( size / 1024 > UINT_MAX )
+		return NULL;
+
+	/* Get the next free entry in the handle <-> pointer mapping */
+	for ( n = 0; n < MAX_XMS_ALLOCATIONS; n++ )
+	{
+		if ( allocMapXMS[n].XMSPointer == NULL )
+			break;
+	}
+
+	if ( n == MAX_XMS_ALLOCATIONS )
+		return NULL;
+
+	kB = size / 1024 + (size % 1024 > 0);
+
+	__asm {
+	; Allocate [kB] kilobytes of XMS memory
+		mov ah, 09h
+		mov dx, [kB]
+		call [XMSControl]
+		mov [XMSStatus], ax
+		mov [XMSHandle], dx
+	}
+
+	/* Check if XMS allocation failed */
+	if ( XMSStatus == 0)
+		return NULL;
+
+	__asm {
+	; Convert XMS handle to normal pointer
+		mov ah, 0Ch
+		mov dx, [XMSHandle]
+		call [XMSControl]
+		mov [XMSStatus], ax
+
+		mov word ptr [XMSPointer],  bx
+		mov word ptr [XMSPointer+2],dx
+	}
+
+	if ( XMSStatus == 0 )
+	{
+		/* Lock failed, deallocate the handle */
+		__asm {
+		; Free XMS handle
+			mov ah, 0Ah
+			mov dx, [XMSHandle]
+			call [XMSControl]
+
+		; Return value is not really interesting 
+		;   mov [XMSStatus], ax
+		}
+		return NULL;
+	}
+
+	/* Create an entry in the handle <-> pointer mapping */
+	allocMapXMS[n].XMSHandle = XMSHandle;
+	allocMapXMS[n].XMSPointer = XMSPointer;
+
+	return XMSPointer;
+}
+
+/* Free a pointer allocated with xmsalloc */
+void xmsfree(void huge * XMSPointer)
+{
+	int n;
+
+	if ( XMSPointer == NULL )
+		return;
+
+	if ( initxms() )
+		return;
+
+	for ( n = 0; n < MAX_XMS_ALLOCATIONS; n++ )
+	{
+		if ( allocMapXMS[n].XMSPointer == XMSPointer )
+		{
+			int XMSHandle = allocMapXMS[n].XMSHandle;
+
+			__asm {
+			; Unlock handle so we can free the memory block
+				mov ah, 0Dh
+				mov dx, [XMSHandle]
+				call [XMSControl]
+
+			; Free XMS memory
+				mov ah, 0Ah
+				mov dx, [XMSHandle]
+				call [XMSControl]
+
+			; Return value ignored
+			}
+
+			/* Clear handle <-> pointer map entry so it can be reused */
+			allocMapXMS[n].XMSHandle = 0;
+			allocMapXMS[n].XMSPointer = NULL;
+
+			return;
+		}
+	}
+}
+
+/* Write a memory report for debugging purposes */
+void xmsreport(void/*FILE * stream*/)
+{
+	int XMSVersionNumber = 0;
+	unsigned int XMSLargestBlock = 0;
+	unsigned int XMSTotal = 0;
+
+	if ( initxms() )
+	{
+		puts("Could not initialize XMS Driver!");
+		return;
+	}
+
+	__asm {
+	; Get the driver version number
+		mov ah,00h
+		call [XMSControl] ; Get XMS Version Number
+		mov [XMSVersionNumber], ax
+
+	; Get the amount of free XMS memory
+		mov ah, 08h
+		call [XMSControl]
+		mov [XMSLargestBlock], ax
+		mov [XMSTotal], dx
+	}
+
+	//fprintf(stream, "XMS Version number: %d\n", XMSVersionNumber);
+	//fprintf(stream, "Largest available block: %d kB (%d kB total)\n", XMSLargestBlock, XMSTotal);
+	printf("XMS Version number: %d\n", XMSVersionNumber);
+	printf("Largest available block: %d kB (%d kB total)\n", XMSLargestBlock, XMSTotal);
+}
+
+/*int main()
+{
+	xmsreport(fopen("xms.log", "w"));
+	return 0;
+}*/