home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Programmer's Library 1.3 / Microsoft-Programers-Library-v1.3.iso / sampcode / msj / msjv2_1 / ems / ems.c < prev   
Encoding:
C/C++ Source or Header  |  1989-02-28  |  9.1 KB  |  265 lines
  1. /*
  2. Microsoft Systems Journal
  3. Volume 2; Issue 1; March, 1987
  4. Code Listings For:
  5.  
  6.     Expanded Memory
  7.     pp. 21-32
  8.  
  9. Author(s): Marion Hansen, Bill Krueger, Nick Stuecklen
  10. Title:     Expanded Memeory: Writing Programs That Break the 640K Barrier
  11.  
  12.  
  13.  
  14.  
  15. ==============================================================================
  16. ==============================================================================
  17.  
  18.  
  19. Figure 3: Main Program
  20. ==============================================================================
  21. */
  22.  
  23. #include <dos.h>
  24. #include <stdio.h>
  25.  
  26. #define EMM_INT 0x67                /*  EMM interrupt number  */
  27. #define GET_PAGE_FRAME_BASE 0x41    /*  EMM func = get page frame 
  28.                                         base address  */
  29. #define GET_FREE_COUNT 0x42         /*  EMM Func = get unallocated 
  30.                                         pages count  */
  31. #define ALLOCATE_PAGES 0x43         /*  EMM Func = allocates pages  */
  32. #define MAP_PAGES 0x44              /*  EMM Func = map pages  */
  33. #define DEALLOCATE_PAGES 0x45       /*  EMM Func = deallocate pages  */
  34. #define GET_INT_VECTOR 0x35         /*  DOS func = get interrupt 
  35.                                         vector  */
  36. #define DEVICE_NAME_LEN 8           /*  Number of chars in device 
  37.                                         driver name field  */
  38. #define VIDEO_RAM_SIZE 4000         /*  Total bytes in video RAM 
  39.                                         (char/attr)  */
  40. #define VIDEO_RAM_BASE 0xB0000000   /*  Video RAM start address (MDA) */
  41.  
  42. union REGS input_regs, output_regs; /*  Regs used for calls to EMM 
  43.                                         and DOS  */
  44. struct SREGS segment_regs;
  45. unsigned int emm_status;            /*  Status returned by EMM  */
  46.  
  47. main ()
  48.  
  49. {
  50. unsigned int i;
  51. long target_time, current_time;
  52. char *video_ram_ptr = {VIDEO_RAM_BASE}; /*  Pointer to video RAM  */
  53. unsigned int emm_handle;                /*  EMM handle  */
  54. char *expanded_memory_ptr;              /*  Pointer to expanded 
  55.                                             memory  */
  56.  
  57. /*  Ensure that the Expanded Memory Manager software is installed 
  58.     on the user's system.  */
  59.  
  60.    detect_emm();
  61.  
  62. /*  Get a page of expanded memory.  */
  63.  
  64.    get_expanded_memory_page (&expanded_memory_ptr, &emm_handle);
  65.  
  66. /*  Copy the current video RAM contents to expanded memory.  */
  67.  
  68.    memcpy (expanded_memory_ptr, video_ram_ptr, VIDEO_RAM_SIZE);
  69.  
  70. /*  Clear the screen to nulls.  */
  71.  
  72.    memset (video_ram_ptr, '\0', VIDEO_RAM_SIZE);
  73.  
  74. /*  Delay for 1 second so the user can see the blanked screen.  */
  75.  
  76.    time (¤t_time);
  77.    target_time = current_time + 1;
  78.    while (current_time < target_time)
  79.     {
  80.      time (¤t_time);
  81.     }
  82.  
  83. /*  Restore the video RAM contents from expanded memory.  */
  84.  
  85.    memcpy (video_ram_ptr, expanded_memory_ptr, VIDEO_RAM_SIZE);
  86.  
  87. /*  Deallocate the expanded memory page  */
  88.  
  89.    release_expanded_memory_page (emm_handle);
  90.  
  91.    exit(0);
  92. }
  93.  
  94. /*
  95. ==============================================================================
  96. ==============================================================================
  97.  
  98. Figure 4: Detect_EMM Subroutine
  99. ==============================================================================
  100. */
  101.  
  102. detect_emm ()
  103.  
  104. {
  105. static char EMM_device_name [DEVICE_NAME_LEN] = {"EMMXXXX0"};
  106. char *int_67_device_name_ptr;
  107.  
  108.  
  109. /*  Determine the address of the routine associated with INT 67 hex.  */
  110.  
  111.   input_regs.h.ah = GET_INT_VECTOR;  /*  DOS function  */
  112.   input_regs.h.al = EMM_INT;         /*  EMM interrupt number  */
  113.   intdosx (&input_regs, &output_regs, &segment_regs);
  114.   int_67_device_name_ptr = 
  115.   (segment_regs.es * 65536) + 10;    /*  Create ptr to device name 
  116.                                          field  */
  117.  
  118. /*  Compare the device name with the known EMM device name.  */
  119.  
  120.   if(memcmp(EMM_device_name,int_67_device_name_ptr,DEVICE_NAME_LEN) !=0)
  121.    {
  122.      printf ("\x07Abort: EMM device driver not installed\n");
  123.      exit(0);
  124.    }  
  125. } 
  126.  
  127. /*
  128. ==============================================================================
  129. ==============================================================================
  130.  
  131. Figure 5: Check_Status Subprocedure
  132. ==============================================================================
  133. */
  134.  
  135. check_status (emm_status)
  136. unsigned int emm_status;
  137. {
  138. static char *emm_error_strings[] = {
  139.   "no error",
  140.   "EMM software malfunction",
  141.   "EMM hardware malfunction",
  142.   "RESERVED",
  143.   "Invalid EMM handle",
  144.   "Invalid EMM function code",
  145.   "All EMM handles being used",
  146.   "Save/restore page mapping context error",
  147.   "Not enough expanded memory pages",
  148.   "Not enough unallocated pages",
  149.   "Can not allocate zero pages",
  150.   "Logical page out of range",
  151.   "Physical page out of range",
  152.   "Page mapping hardware state save area full",
  153.   "Page mapping hardware state save area already has handle",
  154.   "No handle associated with the page mapping hardware state save area",
  155.   "Invalid subfunction"
  156.  };
  157.  
  158. /*  IF EMM error, THEN print error message and EXIT  */
  159.  
  160.    if (emm_status != 0)                    /*  IF EMM error...  */
  161.     {
  162.       emm_status -= 0x7F;                  /*  Make error code 
  163.                                                zero-based  */
  164.       printf ("\x07Abort: EMM error = ");  /*  Issue error prefix  */
  165.       printf ("%s\n", emm_error_strings[emm_status]);
  166.                                            /*  Issue actual error 
  167.                                                message  */
  168.       exit(0);                             /*  And then exit to 
  169.                                                DOS  */
  170.     }
  171. }
  172.  
  173. /*
  174. ==============================================================================
  175. ==============================================================================
  176. Figure 6: Get_Expanded_Memory_Page Subprocedure
  177.  
  178. ==============================================================================
  179. */
  180.  
  181. get_expanded_memory_page (expanded_memory_ptr_ptr, emm_handle_ptr)
  182.  
  183. unsigned int *emm_handle_ptr;     /*  16 bit handle returned by EMM  */
  184. char *(*expanded_memory_ptr_ptr); /*  Pointer to expanded memory 
  185.                                       page  */
  186.  
  187. {
  188. unsigned int page_frame_base;     /*  Expanded memory page frame 
  189.                                       base  */
  190. unsigned int physical_page = {0}; /*  Physical page number  */
  191.  
  192.  
  193. /*  Get unallocated pages count.  */
  194.  
  195. input_regs.h.ah = GET_FREE_COUNT;    /*  EMM function  */
  196. int86x (EMM_INT, &input_regs, &output_regs, &segment_regs);
  197. emm_status = output_regs.h.ah;
  198. check_status(emm_status);            /*  Check for errors  */
  199. if (output_regs.x.bx < 1)            /*  Check unallocated page 
  200.                                          count  */
  201.  {
  202.   printf ("\x07Abort: insufficient unallocated expanded memory pages\n");
  203.   exit(0);
  204.  }
  205.  
  206.  
  207. /*  Allocate the specified number of pages.  */
  208.  
  209. input_regs.h.ah = ALLOCATE_PAGES;     /*  EMM function  */
  210. input_regs.x.bx = 1;                  /*  Number of pages to 
  211.                                           allocate  */
  212. int86x (EMM_INT, &input_regs, &output_regs, &segment_regs);
  213. emm_status = output_regs.h.ah;
  214. check_status(emm_status);             /*  Check for errors  */
  215. *emm_handle_ptr = output_regs.x.dx;   /*  Get EMM handle  */
  216.  
  217.  
  218. /*  Map the logical page into physical page 0.  */
  219.  
  220.    input_regs.h.ah = MAP_PAGES;          /*  EMM function  */
  221.    input_regs.h.al = 0;                  /*  Logical page number  */
  222.    input_regs.x.bx = physical_page;      /*  Physical page number  */
  223.    input_regs.x.dx = *emm_handle_ptr;    /*  EMM handle  */
  224.    int86x (EMM_INT, &input_regs, &output_regs, &segment_regs);
  225.    emm_status = output_regs.h.ah;
  226.    check_status(emm_status);             /*  Check for errors  */
  227.  
  228.  
  229. /*  Determine the page frame address.   */
  230.  
  231.    input_regs.h.ah = GET_PAGE_FRAME_BASE; /*  EMM function  */
  232.    int86x (EMM_INT, &input_regs, &output_regs, &segment_regs);
  233.    emm_status = output_regs.h.ah;
  234.    check_status(emm_status);              /*  Check for errors  */
  235.    *expanded_memory_ptr_ptr = 
  236.      (output_regs.x.bx * 65536)
  237.      + (physical_page * 16 * 1024);       /*  Set the expanded memory 
  238.                                               ptr  */
  239. }
  240.  
  241. /*
  242. ==============================================================================
  243. ==============================================================================
  244. Figure 7: Release_Expanded_Memory_Page Subroutine
  245.  
  246. ==============================================================================
  247. */
  248.  
  249. release_expanded_memory_page (emm_handle)
  250.  
  251. unsigned int emm_handle;      /*  Handle identifying which page 
  252.                                   set to deallocate  */
  253. {
  254.  
  255. /*  Release the expanded memory pages by deallocating the handle 
  256.     associated with those pages.  */
  257.   
  258.    input_regs.h.ah = DEALLOCATE_PAGES;  /*  EMM function  */
  259.    input_regs.x.dx = emm_handle;        /*  EMM handle passed in 
  260.                                             DX  */
  261.    int86x (EMM_INT, &input_regs, &output_regs, &segment_regs);
  262.    emm_status = output_regs.h.ah;
  263.    check_status(emm_status);            /*  Check for errors  */
  264. }
  265.