home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / setpas.zip / PAS.C next >
C/C++ Source or Header  |  1994-04-15  |  13KB  |  432 lines
  1. /*
  2.  *  Utilty to set the mixer values of Mediavision Pro Audio 16
  3.  *
  4.  *  Platform: IBM OS/2 2.x , IBM C-Set ( V1.0 used )
  5.  *
  6.  *  Mediavision Device-Driver 'mvprodd' required.
  7.  *
  8.  *  Written by Johannes Deisenhofer (S_DEISENH@rzmain.rz.uni-ulm.de)
  9.  *
  10.  *  Version 1.00   24.02.94
  11.  *
  12.  *  This software works by sending DevIOCtl-commands to the 'PAS161$' device. 
  13.  *
  14.  *  Freeware. Use at your own risk.
  15.  *
  16.  */
  17.       
  18. #include <stdio.h>
  19. #include <string.h>
  20.  
  21. #define INCL_BASE
  22. #include <os2.h>
  23.  
  24.  
  25. /* MVPRODD-specific Constants */
  26.  
  27. #define DEVNAME "PAS161$" /* Name of the Device */ 
  28.       
  29. #define MIXER_CAT 0x81    /* This IOCtl-Category is used for mixing */
  30.  
  31. /* Device Commands defined by the device driver. */
  32. /* There are more of them , but I don't know what they do */
  33.  
  34. typedef enum { 
  35.                PAS_GetState = 0x47,
  36.                PAS_SetState = 0x48,
  37.                PAS_GetValue = 0x4d,
  38.                PAS_SetValue = 0x4e 
  39.              } DEVCMD;
  40.       
  41. /* Audio channels, do not reorder */
  42.  
  43. typedef enum { FM=0,            /* FM-Chip */
  44.                RecMon,          /* Record Monitor */
  45.                Aux,             /* Aux */
  46.                CD,              /* CD Input */
  47.                Mic,             /* Microphone */
  48.                W16,             /* 16-Bit DA */
  49.                Spkr,            /* PC Speaker */
  50.                SB,              /* Soundblaster */
  51.                Global=256,      /* Global Volume and Settings */
  52.                Input=0xc5       /* Input Level */
  53.               } CHAN;
  54.               
  55.               
  56. /* 'Global' channel has these Subcommands */
  57.               
  58. typedef enum  { G_Volume    = 1,
  59.                 G_Sound     = 8,
  60.                 G_Loud      = 0x20,
  61.                 G_Enhance   = 0x100
  62.               } SCMD;               
  63.               
  64. /* channel mode flags */
  65.               
  66. typedef enum { 
  67.     
  68.         noflags=0,          
  69.         isbass,             /* Is Bass or Treble : trigger special handling */
  70.         istreble, 
  71.         switchable = 0x20,  /* Record/Play selectable */ 
  72.         stereo     = 0x40   /* Stereo channel */
  73.         } SFLAG;              
  74.         
  75.         
  76. /* This table binds keywords to channels and their flags */        
  77.  
  78. struct {
  79.     char *devstr;    /* Commandline keyword */
  80.     CHAN channel;    /* channel number */
  81.     SCMD subcmd;     /* sub-command */
  82.     SFLAG flag;      /* flags */
  83. } 
  84.  
  85. devtbl[] =    
  86.  
  87. {
  88.   { "BASS",     Global, G_Sound,  isbass      }, 
  89.   { "TREBLE" ,  Global, G_Sound,  istreble    }, 
  90.   { "FM",       FM,     1,        switchable | stereo },
  91.   { "Synth",    FM,     1,        switchable | stereo  },
  92.   { "MON",      RecMon, 1,        stereo  },
  93.   { "INT",      CD,     1,        switchable | stereo  },
  94.   { "CD",       CD,     1,        switchable | stereo  },
  95.   { "EXT",      Aux,    1,        switchable | stereo  },
  96.   { "AUX",      Aux,    1,        switchable | stereo  },
  97.   { "MIC",      Mic,    1,        switchable | stereo  },
  98.   { "PCM",      W16,    1,        switchable | stereo  },
  99.   { "WAVE",     W16,    1,        switchable | stereo  },
  100.   { "SPEAKER",  Spkr,   1,        switchable | stereo  },
  101.   { "SPKR",     Spkr,   1,        switchable | stereo  },
  102.   { "SB",       SB,     1,        switchable | stereo  },
  103.   { "SoundBlaster", SB, 1,        switchable | stereo  },
  104.   { "VOLUME",   Global, G_Volume, stereo  },
  105.   { "VOL",      Global, G_Volume, stereo  },
  106.   { "MASTER",   Global, G_Volume, stereo  },
  107.   { "INPUT",    Input,  1,        stereo  },
  108.   { "LOUDNESS", Global, G_Loud,   noflags },
  109.   { "ENHANCE",  Global, G_Enhance,noflags }
  110.  };
  111.  
  112.              
  113. /* Values used by PAS_Set/GetValue */             
  114.              
  115. typedef enum { Monitor = 1,
  116.                Record  = 2 
  117.              } MONCMD;
  118.              
  119.              
  120. /* Globals */
  121.              
  122. HFILE filehandle;      /* Filehandle of Device-Driver. Used globally */
  123. extern const char *helptext; /* I want to have this one at the end of the program */
  124.         
  125. typedef ULONG CTRL_PACKET[6];    /* Values are passed back in this structure */
  126.  
  127.  
  128. /* Set a value 
  129.  * Args: CHAN    ch    : channel
  130.  *       SCMD    sc    : subchannel
  131.  *       USHORT  left,
  132.  *               right : Value, 0 min, 0xffff max 
  133.  */        
  134.             
  135. int pas_setval(CHAN ch, SCMD sc,USHORT left, USHORT right)
  136. {
  137.     return pas_mix_cmd(PAS_SetValue,ch,sc, left<<16 | right );
  138. }
  139.  
  140. /* Get a value 
  141.  * Args: CHAN    ch    : channel
  142.  */
  143.  
  144. ULONG pas_getval(CHAN ch,SCMD sc)
  145. {   
  146.     ULONG retval;
  147.     
  148.     /* Pass Adress as a 16:16 Pointer - CSet Syntax */
  149.     pas_mix_cmd(PAS_GetValue,ch,sc,(ULONG)(ULONG * _Seg16)&retval);
  150.     return retval;
  151. }
  152.  
  153. /* Set a switch
  154.  * Args: CHAN    ch    : channel
  155.  *       MONCMD  cmd   : new state of switch
  156.  */        
  157.  
  158. int pas_setmon(CHAN ch, MONCMD cmd)
  159. {
  160.     return pas_mix_cmd(PAS_SetState,ch,cmd);
  161. }    
  162.  
  163. /* Get a switch
  164.  * Args: CHAN    ch    : channel
  165.  * Ret : MONCMD  cmd   : new state of switch
  166.  */        
  167.  
  168. MONCMD pas_getmon(CHAN ch)
  169. {
  170.     ULONG retval;
  171.     
  172.     /* Pass Adress as a 16:16 Pointer - CSet Syntax */
  173.     pas_mix_cmd(PAS_GetState,ch,(ULONG)(ULONG * _Seg16)&retval,0);
  174.     return retval;
  175. }
  176.  
  177. /* 
  178.  * pas_mix_cmd : Send Command to Driver 
  179.  *
  180.  * uses global 'filehandle'
  181.  * 
  182.  * Assembles ULONG values into a packet and sends it to the DD
  183.  *
  184.  */
  185.         
  186. int pas_mix_cmd(DEVCMD function, ULONG arg1, ULONG arg2, ULONG arg3) 
  187. {  
  188.     
  189.     APIRET rc;
  190.     CTRL_PACKET ctrl;
  191.     ULONG size1, size2;
  192.     
  193.     memset(&ctrl,0,sizeof(CTRL_PACKET));
  194.     
  195.     ctrl[0]=arg1;
  196.     ctrl[1]=arg2;
  197.     ctrl[2]=arg3;
  198.     
  199.     size2=0;
  200.     size1=sizeof(CTRL_PACKET);
  201.     
  202.     rc = DosDevIOCtl(filehandle,MIXER_CAT,function,
  203.                      &ctrl,sizeof(ctrl),&size1,
  204.                      NULL,0,&size2);
  205.     return rc;
  206. }                     
  207.  
  208. /* Macros for converting USHORT values to percentages and back */
  209.  
  210. #define TOPROC(a) ((((a)*100/0x7fff)+1)/2)
  211. #define TOSHORT(a)((((a)*0xffff/50)+1)/2)
  212.  
  213. /* Parse Command Line */
  214.  
  215. int do_proc(int argc,char** argv)
  216. {
  217.   int argptr=1,k;
  218.    
  219.   enum { LEFT,RIGHT,BOTH } chansel = BOTH;   /* Flag for selected channel */
  220.     
  221.   if (argc<3) return (-1);
  222.     
  223.   while (argptr<argc) {
  224.     
  225.     /* GET Values */
  226.     
  227.     if (!stricmp(argv[argptr],"GET"))
  228.     {
  229.         
  230.         ULONG value;
  231.         MONCMD mode;
  232.         
  233.         argptr++;
  234.         if (argptr+1>argc) return -1;
  235.         
  236.         /* Find string in Table */
  237.         for(k=0;k<sizeof(devtbl)/sizeof(*devtbl);k++) 
  238.             if(!stricmp(argv[argptr],devtbl[k].devstr)) break;
  239.         if(k==sizeof(devtbl)/sizeof(*devtbl)) return -1;  /* Not found */
  240.         
  241.         /* Get value if found */
  242.         value=pas_getval(devtbl[k].channel,devtbl[k].subcmd);
  243.         
  244.         /* Format output for BASS and TREBLE */
  245.         if (devtbl[k].flag==istreble || devtbl[k].flag==isbass) 
  246.            printf("Level of %s is %d%%",
  247.                    devtbl[k].devstr,
  248.                    devtbl[k].flag==isbass 
  249.                      ? TOPROC((value>>16)*256)
  250.                      : TOPROC((value&0xffff)*256)
  251.                   );
  252.         
  253.         /* Format output for stereo channels */          
  254.         else if (devtbl[k].flag & stereo) 
  255.            printf("Level of %s is %d%% (L:%d%% R:%d%%)",
  256.                    devtbl[k].devstr,
  257.                    (TOPROC(value>>16)+TOPROC(value&0xffff))/2,
  258.                    TOPROC(value>>16), 
  259.                    TOPROC(value&0xffff)
  260.                   );
  261.                   
  262.         /* Format output for all other (mono) devices */                  
  263.         else          
  264.            printf("Level of %s is %d%%",
  265.                    devtbl[k].devstr,
  266.                    (TOPROC(value>>16)+TOPROC(value&0xffff))/2
  267.                   );
  268.                   
  269.         /* print 'mode' if defined and a CR */          
  270.         if ((devtbl[k].flag & switchable) == switchable ) {
  271.                 mode=pas_getmon(devtbl[k].channel);
  272.                 printf(" Mode: %s\n", (mode==Record ? "Record" : "Monitor") );
  273.         }        
  274.         else printf("\n");              
  275.         argptr++;
  276.         
  277.     }
  278.     
  279.     /*  SET Values   */
  280.     
  281.     else if(!stricmp(argv[1],"SET"))
  282.     {
  283.         ULONG value=0;
  284.         
  285.         argptr++;
  286.         if (argptr+1>argc) return -1;
  287.         
  288.         /* check for LEFT/RIGHT keywords */
  289.         
  290.         if      (!stricmp(argv[argptr],"LEFT"))  { chansel=LEFT; argptr++; }
  291.         else if (!stricmp(argv[argptr],"RIGHT")) { chansel=RIGHT;argptr++; }
  292.         if (argptr>argc) return -1;
  293.         
  294.         /* Find string in Table */
  295.         
  296.         for(k=0;k<sizeof(devtbl)/sizeof(*devtbl);k++) 
  297.             if(!stricmp(argv[argptr],devtbl[k].devstr)) break;
  298.         if(k==sizeof(devtbl)/sizeof(*devtbl)) return -1;  /* Not found */
  299.         
  300.         argptr++;
  301.         if(argptr+1>argc) return -1;
  302.         
  303.         if (!stricmp(argv[argptr],"TO")) 
  304.         {
  305.         
  306.             argptr++;
  307.             if(argptr+1>argc) return -1;
  308.         
  309.             /* Get and check value */
  310.             value= atol(argv[argptr]);
  311.         
  312.             if(value<0 || value > 100 ) return -1;
  313.         
  314.             /* Convert to USHORT */
  315.             value=TOSHORT(value);
  316.         
  317.             /* Special treatment for Bass and Treble */
  318.             if (devtbl[k].flag==isbass  )  {
  319.                 chansel=LEFT;  /* Bass */
  320.                 value/=256;
  321.             }    
  322.             if (devtbl[k].flag==istreble)  {
  323.                 chansel=RIGHT; /* Treble */
  324.                 value/=256;
  325.             }    
  326.             
  327.             /* No left/right keyword given */
  328.             if (chansel==BOTH)
  329.                 /* Set left and right channel to equal values */
  330.                 pas_setval(devtbl[k].channel,devtbl[k].subcmd,value,value);
  331.             /* Left channel */    
  332.             else if (chansel==LEFT)
  333.                 pas_setval(devtbl[k].channel,devtbl[k].subcmd,value,
  334.                            pas_getval(devtbl[k].channel,devtbl[k].subcmd)&0xffff);
  335.             /* Right channel */                           
  336.             else if (chansel==RIGHT)
  337.                pas_setval(devtbl[k].channel,devtbl[k].subcmd,
  338.                            pas_getval(devtbl[k].channel,devtbl[k].subcmd)>>16, value );
  339.                     
  340.             argptr++;
  341.         }
  342.         
  343.         /* FOR */
  344.         
  345.         else if (!stricmp(argv[argptr],"FOR")) 
  346.         {   
  347.             argptr++;
  348.             if(argptr+1>argc) return -1;
  349.             
  350.             /* record or play-mode */
  351.             if (!stricmp(argv[argptr],"Record")) 
  352.             {
  353.                 if ((devtbl[k].flag&switchable)==switchable) 
  354.                     pas_setmon(devtbl[k].channel,Record);    
  355.                 argptr++;
  356.             }
  357.             else if (!stricmp(argv[argptr],"Monitor")) 
  358.             {
  359.                 if ((devtbl[k].flag& switchable)==switchable) 
  360.                     pas_setmon(devtbl[k].channel,Monitor);    
  361.                 argptr++;
  362.             }
  363.             else return -1;
  364.         }    
  365.         else return -1; /* Error */
  366.         
  367.     }
  368.     else return -1;
  369.   }  
  370.    
  371.   return 0;         /* All Commands processed */
  372. }    
  373.  
  374.  
  375. int main(int argc, char**argv)
  376. {
  377.     
  378.     APIRET rc;
  379.     ULONG action=0;
  380.     
  381.     if(argc==1) {       /* Show Help */
  382.         puts(helptext);
  383.         exit (-1);
  384.     }    
  385.     
  386.     rc=DosOpen( DEVNAME,&filehandle,&action,0,
  387.                 FILE_NORMAL,OPEN_ACTION_OPEN_IF_EXISTS,
  388.                 OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE,
  389.                 NULL 
  390.                );
  391.  
  392.     if(rc != NO_ERROR) {
  393.         printf("Can't open device %s !\n",DEVNAME);
  394.         exit(-1);
  395.     }
  396.     
  397.     if(do_proc(argc,argv)!=0)   /* Do Processing */
  398.     
  399.         puts("Syntax error. Type PAS without parameter for help\n");
  400.     
  401.     DosClose(filehandle);
  402.     return (0);
  403.     
  404. }    
  405.  
  406. /* Helptext. */
  407.  
  408. const char *helptext = 
  409. "\n"
  410. "PAS -- Pro AudioSpectrum Mixer and Volume Control Utility, Version 01.00\n"
  411. "by Johannes Deisenhofer '94. No Rights Reserved. Use at your own risk.\n"
  412. "\n"
  413. "  PAS ─┬─>┬── GET <SETTING> ───────────────────────>──────────────┐ \n"
  414. "       ^  └── SET ──┬─ [LEFT/RIGHT] <SETTING> TO <Level> ─────────┼───>─┬──┤\n"
  415. "       │            └─ <SETTING> FOR [RECORD/MONITOR] ────────────┘     │\n"
  416. "       └────────────────<────────────────────────────────<──────────────┘\n"
  417. " <SETTING> : \n"
  418. "   - FM    : Synth Chip volume     │    - MON      : Record monitor volume\n"
  419. "   - MIC   : Microphone volume     │    - VOLUME   : Master Volume\n"
  420. "   - AUX   : Aux Input volume      │    - ENHANCE  : Stereo Enhance\n"
  421. "   - CD    : CD Input volume       │    - BASS     : Bass\n"
  422. "   - PCM   : 16-Bit DAC volume     │    - TREBLE   : Treble\n"
  423. "   - SB    : Soundblaster volume   │    - INPUT    : Input Level (PAS Studio ?)\n"
  424. "   - SPKR  : PC Speaker volume     │    - LOUDNESS : Loudness level\n"
  425. " <LEVEL> is a Number from 0 to 100\n"
  426. "\n"
  427. "Examples:\n"
  428. "\n"
  429. " pas set left volume to 100 set right volume to 80 set enhance to 0 set cd to 0\n"
  430. " pas get volume\n";
  431.  
  432.