src/emstest.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include "src\lib\ems.c"
   5      /*\r
   6      Test function for the EMM routines\r
   7      */\r
   8      \r
   9      void main()\r
  10      {\r
  11           long emmhandle;\r
  12           long avail;\r
  13           char teststr[80];\r
  14           int i;\r
  15      \r
  16           if(!emmtest())\r
  17           {\r
  18                printf("Expanded memory is not present\n");\r
  19                exit(0);\r
  20           }\r
  21      \r
  22           if(!emmok())\r
  23           {\r
  24                printf("Expanded memory manager is not present\n");\r
  25                exit(0);\r
  26           }\r
  27      \r
  28           avail = emmavail();\r
  29           if (avail == -1)\r
  30           {\r
  31                printf("Expanded memory manager error\n");\r
  32                exit(0);\r
  33           }\r
  34           printf("There are %ld pages available\n",avail);\r
  35      \r
  36           /* Request 10 pages of expanded memory */\r
  37           if((emmhandle = emmalloc(avail)) < 0)\r
  38           {\r
  39                printf("Insufficient pages available\n");\r
  40                exit(0);\r
  41           }\r
  42      \r
  43           for (i = 0; i < avail; i++)\r
  44           {\r
  45                sprintf(teststr,"%02d This is a test string\n",i);\r
  46                emmmap(emmhandle,i,0);\r
  47                emmmove(0,teststr,strlen(teststr) + 1);\r
  48           }\r
  49      \r
  50           for (i = 0; i < avail; i++)\r
  51           {\r
  52                emmmap(emmhandle,i,0);\r
  53                emmget(0,teststr,strlen(teststr) + 1);\r
  54                printf("READING BLOCK %d: %s\n",i,teststr);\r
  55           }\r
  56      \r
  57           emmclose(emmhandle);\r
  58      }