/* * Mesa 3-D graphics library * Version: 4.0 * * Copyright (C) 1999 Brian Paul All Rights Reserved. * * Permission is hereby granted, free of charge, to any person obtaining a * copy of this software and associated documentation files (the "Software"), * to deal in the Software without restriction, including without limitation * the rights to use, copy, modify, merge, publish, distribute, sublicense, * and/or sell copies of the Software, and to permit persons to whom the * Software is furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included * in all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ /* * DOS/DJGPP device driver for Mesa * * Author: Daniel Borca * Email : dborca@yahoo.com * Web : http://www.geocities.com/dborca */ #include <dpmi.h> #include "internal.h" #ifndef MAX #define MAX(x, y) (((x) < (y)) ? (y) : (x)) #endif /* _create_linear_mapping: * Maps a physical address range into linear memory. */ int _create_linear_mapping (unsigned long *linear, unsigned long physaddr, int size) { __dpmi_meminfo meminfo; if (physaddr >= 0x100000) { /* map into linear memory */ meminfo.address = physaddr; meminfo.size = size; if (__dpmi_physical_address_mapping(&meminfo) != 0) { return -1; } *linear = meminfo.address; } else { /* exploit 1 -> 1 physical to linear mapping in low megabyte */ *linear = physaddr; } return 0; } /* _remove_linear_mapping: * Frees the DPMI resources being used to map a linear address range. */ void _remove_linear_mapping (unsigned long *linear) { __dpmi_meminfo meminfo; if (*linear) { if (*linear >= 0x100000) { meminfo.address = *linear; __dpmi_free_physical_address_mapping(&meminfo); } *linear = 0; } } /* _create_selector: * Allocates a selector to access a region of linear memory. */ int _create_selector (int *segment, unsigned long base, int size) { /* allocate an ldt descriptor */ if ((*segment=__dpmi_allocate_ldt_descriptors(1)) < 0) { *segment = 0; return -1; } /* create the linear mapping */ if (_create_linear_mapping(&base, base, size)) { __dpmi_free_ldt_descriptor(*segment); *segment = 0; return -1; } /* set the descriptor base and limit */ __dpmi_set_segment_base_address(*segment, base); __dpmi_set_segment_limit(*segment, MAX(size-1, 0xFFFF)); return 0; } /* _remove_selector: * Frees a DPMI segment selector. */ void _remove_selector (int *segment) { if (*segment) { unsigned long base; __dpmi_get_segment_base_address(*segment, &base); _remove_linear_mapping(&base); __dpmi_free_ldt_descriptor(*segment); *segment = 0; } } /* Desc: retrieve CPU MMX capability * * In : - * Out : FALSE if CPU cannot do MMX * * Note: - */ int _can_mmx (void) { #ifdef USE_MMX_ASM int x86_cpu_features = 0; __asm("\n\ pushfl \n\ popl %%eax \n\ movl %%eax, %%ecx \n\ xorl $0x200000, %%eax\n\ pushl %%eax \n\ popfl \n\ pushfl \n\ popl %%eax \n\ pushl %%ecx \n\ popfl \n\ xorl %%ecx, %%eax \n\ jz 0f \n\ movl $1, %%eax \n\ cpuid \n\ movl %%edx, %0 \n\ 0: \n\ ":"=g"(x86_cpu_features)::"%eax", "%ebx", "%ecx", "%edx"); return (x86_cpu_features & 0x00800000); #else return 0; #endif }