home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 10 / mycd10.iso / share / os2 / sonido / ultra08a / toolkit / ultradev.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-08-24  |  13.3 KB  |  368 lines
  1. #define INCL_DOSDEVICES
  2. #include <os2.h>
  3. #include "struct.h"
  4.  
  5. // IOCTL commands
  6. #define GUS_COMMANDS            0x0F
  7. #define UltraDevSetNVoices        0x50
  8. #define UltraDevEnableOutput        0x51
  9. #define UltraDevDisableOutput        0x52
  10. #define UltraDevPokeData        0x53
  11. #define UltraDevPeekData        0x54
  12. #define UltraDevMemAlloc        0x55
  13. #define UltraDevMemFree            0x56
  14. #define UltraDevMemInit            0x57
  15. #define UltraDevStartTimer        0x58
  16. #define UltraDevStopTimer        0x59
  17. #define UltraDevBlockTimerHandler1    0x5A
  18. #define UltraDevBlockTimerHandler2    0x5B
  19. #define UltraDevStartVoice        0x5C
  20. #define UltraDevStopVoice        0x5D
  21. #define UltraDevSetBalance        0x5E
  22. #define UltraDevSetFrequency        0x5F
  23. #define UltraDevVectorLinearVolume    0x60
  24. #define UltraDevPrepare4DMAXfer        0x61
  25. #define UltraDevUnblockAll        0x62
  26. #define UltraDevSetAll            0x63
  27. #define UltraDevGetAccess               0x6A
  28. #define UltraDevReleaseAccess              0x6B
  29. #define UltraDevSizeDRAM        0x6D
  30. #define UltraDevGetDriverVersion    0x6E
  31.  
  32. extern HFILE GUSHandle;
  33.  
  34. /******************************************************************************/
  35. /******************************************************************************/
  36. APIRET UltraSetNVoices(numvoices)
  37. int numvoices;
  38. {
  39. ULONG ParmLength=0, DataLength=4;
  40.  
  41. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevSetNVoices, NULL, 0, &ParmLength,
  42.          &numvoices, 4, &DataLength));
  43. }
  44. /******************************************************************************/
  45. /******************************************************************************/
  46. APIRET UltraGetAccess()
  47. {
  48. ULONG DataLength = 0, ParmLength = 0;
  49.  
  50. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevGetAccess, NULL, 0,
  51.          &ParmLength, NULL, 0, &DataLength));
  52. }
  53. /******************************************************************************/
  54. /******************************************************************************/
  55. APIRET UltraReleaseAccess()
  56. {
  57. ULONG DataLength = 0, ParmLength = 0;
  58.  
  59. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevReleaseAccess, NULL, 0,
  60.          &ParmLength, NULL, 0, &DataLength));
  61. }
  62. /******************************************************************************/
  63. /******************************************************************************/
  64. APIRET UltraEnableOutput()
  65. {
  66. ULONG DataLength = 0, ParmLength = 0;
  67.  
  68. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevEnableOutput, NULL, 0,
  69.          &ParmLength, NULL, 0, &DataLength));
  70. }
  71. /******************************************************************************/
  72. /******************************************************************************/
  73. APIRET UltraDisableOutput()
  74. {
  75. ULONG DataLength = 0, ParmLength = 0;
  76.  
  77. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevDisableOutput, NULL, 0,
  78.          &ParmLength, NULL, 0, &DataLength));
  79. }
  80. /******************************************************************************/
  81. /******************************************************************************/
  82. APIRET UltraBlockTimerHandler1()
  83. {
  84. ULONG ParmLength = 0, DataLength = 0;
  85. // block until timer interrupt
  86. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevBlockTimerHandler1, NULL, 0, &ParmLength,
  87.                 NULL, 0, &DataLength));
  88. }
  89. /******************************************************************************/
  90. /******************************************************************************/
  91. APIRET UltraBlockTimerHandler2()
  92. {
  93. ULONG ParmLength = 0, DataLength = 0;
  94. // block until timer interrupt
  95. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevBlockTimerHandler2, NULL, 0, &ParmLength,
  96.                  NULL, 0, &DataLength));
  97. } 
  98. /******************************************************************************/
  99. /******************************************************************************/
  100. APIRET UltraStartTimer(timer, time)
  101. int timer;
  102. int time;
  103. {
  104. TimerStruct tbuffer;
  105. ULONG ParmLength, DataLength;
  106.  
  107. ParmLength = 0;
  108. DataLength = sizeof(TimerStruct);
  109. tbuffer.timer = (short int)timer;
  110. tbuffer.time = (unsigned char)time;
  111. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevStartTimer, NULL, 0, &ParmLength,
  112.         &tbuffer, DataLength, &DataLength));
  113. }
  114. /******************************************************************************/
  115. /******************************************************************************/
  116. APIRET UltraStopTimer(timer)
  117. int timer;
  118. {
  119. ULONG ParmLength, DataLength;
  120.  
  121. ParmLength = 0;
  122. DataLength = 4; 
  123. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevStopTimer, NULL, 0, &ParmLength,
  124.          &timer, 4, &DataLength));
  125. }
  126. /******************************************************************************/
  127. /******************************************************************************/
  128. APIRET UltraSetBalance(voice, data)
  129. int voice;
  130. int data;
  131. {
  132. ULONG ParmLength = 0, DataLength;
  133. BalanceStruct bbuffer;
  134.  
  135. DataLength = sizeof(BalanceStruct);
  136. bbuffer.voice = (short int)voice;
  137. bbuffer.data = (unsigned char)data;
  138. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevSetBalance, NULL, 0,
  139.         &ParmLength, &bbuffer, DataLength, &DataLength));
  140. }
  141. /******************************************************************************/
  142. /******************************************************************************/
  143. APIRET UltraSetFrequency(voice, freq)
  144. int voice;
  145. int freq;
  146. {
  147. ULONG ParmLength = 0, DataLength;
  148. FreqStruct fbuffer;
  149.  
  150. DataLength = sizeof(FreqStruct);
  151. fbuffer.voice = (short int)voice;
  152. fbuffer.speed_khz = (short int)freq;
  153. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevSetFrequency, NULL, 0,
  154.         &ParmLength, &fbuffer, DataLength, &DataLength));
  155. }
  156. /******************************************************************************/
  157. /******************************************************************************/
  158. APIRET UltraMemFree(int size, int location)
  159. {
  160. ULONG ParmLength = 0, DataLength = sizeof(AllocStruct);
  161. AllocStruct abuffer;
  162.  
  163.  abuffer.size = size;
  164.  abuffer.location = location;
  165.  return(DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevMemFree, NULL,
  166.         0, &ParmLength, &abuffer, DataLength, &DataLength)) ;
  167. }
  168. /******************************************************************************/
  169. /******************************************************************************/
  170. APIRET UltraMemAlloc(size, location)
  171. unsigned long size;
  172. unsigned long *location;
  173. {
  174. ULONG ParmLength = 0, DataLength;
  175. AllocStruct abuffer;
  176. APIRET rc;
  177.  
  178. DataLength = sizeof(AllocStruct);
  179. abuffer.size = size;
  180. abuffer.location = *location;
  181.  
  182. rc = DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevMemAlloc, NULL,
  183.            0, &ParmLength, &abuffer, DataLength, &DataLength);
  184.  
  185. *location = abuffer.location; /* location in DRAM GUS */
  186. return(rc);
  187. }
  188. /******************************************************************************/
  189. /******************************************************************************/
  190. APIRET UltraMemInit()
  191. {
  192. ULONG ParmLength = 0, DataLength = 0;
  193.  
  194.  return(DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevMemAlloc, NULL,
  195.                 0, &ParmLength, NULL, 0, &DataLength));
  196. }
  197. /******************************************************************************/
  198. /******************************************************************************/
  199. APIRET UltraDownload(dataptr, control, dram_loc, size, wait)
  200. char *dataptr;
  201. unsigned char control;
  202. unsigned long dram_loc;
  203. unsigned int size;
  204. int wait;
  205. {
  206. ULONG ParmLength = 0, DataLength;
  207. APIRET rc;
  208. ULONG written;
  209. XferStruct xbuffer;
  210.  
  211.  /* structure voor UltraPrepare4DMAXfer IOCtl call */
  212.  DataLength = sizeof(XferStruct);
  213.  xbuffer.control = control;     //control byte (data width, signed/unsigned)
  214.  xbuffer.dram_loc = dram_loc;
  215.  
  216.  while(TRUE) {
  217.      if(size > 63*1024) {//16 bit segments in a 32 bit world 8(
  218.          rc = DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevPrepare4DMAXfer, NULL,
  219.                    0, &ParmLength, &xbuffer, DataLength, &DataLength);
  220.         if(rc != 0)         return(rc);
  221.         rc = DosWrite(GUSHandle, dataptr, 63*1024, &written);
  222.         if(rc != 0)        return(rc);
  223.         dram_loc += 63*1024;
  224.         xbuffer.dram_loc = dram_loc;
  225.         dataptr += 63*1024;
  226.         size -= 63*1024;
  227.      }
  228.      else   break;
  229.  }
  230.  if(size > 0) {
  231.      rc = DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevPrepare4DMAXfer, NULL,
  232.                 0, &ParmLength, &xbuffer, DataLength, &DataLength);
  233.      if(rc != 0)         return(rc);
  234.      return( DosWrite(GUSHandle, dataptr, size, &written)); //last transfer
  235.  }
  236.  else    return(0);
  237. }
  238. /******************************************************************************/
  239. /******************************************************************************/
  240. APIRET UltraPokeData(address, data)
  241. long address;
  242. int data;
  243. {
  244. ULONG ParmLength = 0, DataLength;
  245. PokeStruct pbuffer;
  246.  
  247. pbuffer.address = address;
  248. pbuffer.data = (unsigned char)data;
  249. DataLength = sizeof(pbuffer);
  250. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevPokeData, NULL, 0,
  251.         &ParmLength, &pbuffer, DataLength, &DataLength));
  252. }
  253. /******************************************************************************/
  254. /******************************************************************************/
  255. APIRET UltraPeekData(int *address)
  256. {
  257. ULONG ParmLength = 0, DataLength;
  258.  
  259. DataLength = sizeof(int);
  260. return(DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevPeekData, NULL, 0, &ParmLength,
  261.                    address, DataLength, &DataLength));
  262. }
  263. /******************************************************************************/
  264. /******************************************************************************/
  265. APIRET UltraUnblockAll()
  266. {
  267. ULONG ParmLength = 0, DataLength = 0;
  268.  
  269. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevUnblockAll, NULL, 0, &ParmLength,
  270.           NULL, 0, &DataLength));
  271. }
  272. /******************************************************************************/
  273. /******************************************************************************/
  274. APIRET UltraStopVoice(int c)
  275. {
  276. ULONG ParmLength = 0, DataLength = 2;
  277. short int voice;
  278.  
  279. voice = (short int)c;
  280. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevStopVoice, NULL, 0, &ParmLength,
  281.             &voice, DataLength, &DataLength));
  282. }
  283. /******************************************************************************/
  284. /******************************************************************************/
  285. APIRET UltraVectorLinearVolume(voice, end_idx, rate, mode)
  286. int voice;
  287. unsigned int end_idx;        /* end location in ultra DRAM */
  288. unsigned char rate;            /* 0 to 63 */
  289. unsigned char mode;            /* mode to run the volume ramp in ... */
  290. {
  291. ULONG ParmLength, DataLength;
  292. VolumeStruct vbuffer;
  293.  
  294. vbuffer.voice = (short int)voice;
  295. vbuffer.end_idx = (short int)end_idx;
  296. vbuffer.rate = rate;
  297. vbuffer.mode = mode;
  298. DataLength = sizeof(VolumeStruct);
  299. ParmLength = 0;
  300. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevVectorLinearVolume,
  301.          NULL, 0, &ParmLength, &vbuffer, DataLength, &DataLength));
  302. }
  303. /******************************************************************************/
  304. /******************************************************************************/
  305. APIRET UltraSetAll(voice, balance, freq, volume, rate, mode)
  306. int voice;
  307. char balance;
  308. int freq, volume;
  309. unsigned char rate;            /* 0 to 63 */
  310. unsigned char mode;            /* mode to run the volume ramp in ... */
  311. {
  312. ULONG ParmLength = 0, DataLength;
  313. AllStruct abuffer;
  314.  
  315. DataLength = sizeof(AllStruct);
  316. abuffer.voice = (short int)voice;
  317. abuffer.balance = (unsigned char)balance;
  318. abuffer.freq = (unsigned short int)freq;
  319. abuffer.volume = (unsigned short int)volume;
  320. abuffer.rate = rate;
  321. abuffer.mode = mode;
  322. return( DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevSetAll, NULL, 0,
  323.             &ParmLength, &abuffer, DataLength, &DataLength));
  324. }
  325. /******************************************************************************/
  326. /******************************************************************************/
  327. APIRET UltraStartVoice(gusvoice, begin, start, end, mode)
  328. int gusvoice;         /* voice to start */
  329. unsigned int begin;     /* start location in ultra DRAM */
  330. unsigned int start;     /* start loop location in ultra DRAM */
  331. unsigned int end;     /* end location in ultra DRAM */
  332. unsigned char mode;     /* mode to run the voice (loop etc) */
  333. {
  334. ULONG ParmLength = 0, DataLength;
  335. VoiceStruct voice;
  336.  
  337. voice.voice = (short int)gusvoice;
  338. voice.begin = begin; // start in DRAM
  339. voice.start = start; //start loop
  340. voice.end = end;
  341. voice.mode = mode;
  342. DataLength = sizeof(VoiceStruct);
  343. return(    DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevStartVoice, NULL, 0,
  344.             &ParmLength, &voice, DataLength, &DataLength));
  345. }
  346. /******************************************************************************/
  347. /******************************************************************************/
  348. APIRET UltraSizeDram(int *size)
  349. {
  350. ULONG ParmLength = 0, DataLength;
  351.  
  352.   DataLength = sizeof(int);
  353.   return(DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevSizeDRAM, NULL, 0, &ParmLength,
  354.                      size, DataLength, &DataLength));
  355. }
  356. /******************************************************************************/
  357. /******************************************************************************/
  358. APIRET UltraGetDriverVersion(int *version)
  359. {
  360. ULONG ParmLength = 0, DataLength;
  361. //High word contains major version, low word minor version
  362.  
  363.   DataLength = sizeof(int);
  364.   return(DosDevIOCtl(GUSHandle, GUS_COMMANDS, UltraDevGetDriverVersion, NULL, 0, &ParmLength,
  365.                      version, DataLength, &DataLength));
  366. }
  367. /******************************************************************************/
  368. /******************************************************************************/