home *** CD-ROM | disk | FTP | other *** search
/ ftp.4front-tech.com / ftp.4front-tech.com.tar / ftp.4front-tech.com / ossfree / snd-util-3.8.tar.gz / snd-util-3.8.tar / sndkit / fm / sbiset.c < prev    next >
C/C++ Source or Header  |  1980-01-01  |  4KB  |  136 lines

  1. /*
  2.  * sbiset.c
  3.  * 
  4.  * Patch loader for the Linux Sound Driver and FM synth.
  5.  * 
  6.  * Copyright by Hannu Savolainen 1993
  7.  * 
  8.  * Redistribution and use in source and binary forms, with or without
  9.  * modification, are permitted provided that the following conditions are
  10.  * met: 1. Redistributions of source code must retain the above copyright
  11.  * notice, this list of conditions and the following disclaimer. 2.
  12.  * Redistributions in binary form must reproduce the above copyright notice,
  13.  * this list of conditions and the following disclaimer in the documentation
  14.  * and/or other materials provided with the distribution.
  15.  * 
  16.  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY
  17.  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  18.  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  19.  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
  20.  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  22.  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  23.  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26.  * SUCH DAMAGE.
  27.  * 
  28.  */
  29. /* Heavily modified by Rob Hooft (hooft@chem.ruu.nl) */
  30.  
  31. #include <unistd.h>
  32. #include <sys/ioctl.h>
  33. #include <sys/soundcard.h>
  34. #include <stdio.h>
  35. #include <fcntl.h>
  36. #include <errno.h>
  37. #ifdef __STDC__
  38. #include <stdlib.h>
  39. #else /* __STDC__ */
  40. #include <getopt.h>
  41. #endif /* __STDC__ */
  42.  
  43. struct sbi_instrument instr;
  44.         
  45. #define USAGE { fprintf(stderr,"usage: %s [-v] sbi_file...\n",argv[0]);\
  46.         exit(2); }
  47.  
  48. int main(int argc, char *argv[])
  49. {
  50.     char buf[100];
  51.     int opt,offset;
  52.     extern int optind;
  53.     int verbose=0;
  54.     int dev, nrdevs;
  55.     struct synth_info info;
  56.  
  57.     int l,i, fm, op, instrf;
  58.  
  59.     if ((fm=open("/dev/sequencer", O_WRONLY, 0))==-1) 
  60.     {
  61.         perror("/dev/sequencer");
  62.         exit(-1);
  63.     }
  64.  
  65.     if (ioctl(fm, SNDCTL_SEQ_NRSYNTHS, &nrdevs) == -1)
  66.     {
  67.         perror("/dev/sequencer");
  68.         exit(-1);
  69.     }
  70.  
  71.     dev = -1;
  72.  
  73.     for (i=0;i<nrdevs && dev==-1;i++)
  74.     {
  75.         info.device = i;
  76.         if (ioctl(fm, SNDCTL_SYNTH_INFO, &info)==-1)
  77.         {
  78.             perror("info: /dev/sequencer");
  79.             exit(-1);
  80.         }
  81.  
  82.         if (info.synth_type == SYNTH_TYPE_FM) dev = i;
  83.     }
  84.  
  85.     if (dev == -1)
  86.     {
  87.         fprintf(stderr, "%s: FM synthesizer not detected\n", argv[0]);
  88.         exit(-1);
  89.     }
  90.  
  91.     while ((opt = getopt(argc,argv,"v")) != -1) {
  92.         switch (opt) {
  93.         case 'v': verbose = 1; break;
  94.         default : USAGE;
  95.         }
  96.     }
  97.     if (argc == optind) USAGE;
  98.     offset=optind;
  99.     if (argc-offset>128) {
  100.         argc=128+offset;
  101.         fprintf(stderr,"Warning: Excess arguments ignored\n");
  102.     }
  103.     for (op=offset;op < argc;op++) {
  104.         if ((instrf=open(argv[op], O_RDONLY, 0))==-1) {
  105.             perror(argv[op]);
  106.             offset++;
  107.         } else if ((l=read(instrf, buf, 100))==-1) {
  108.             perror(argv[op]);
  109.             offset++;
  110.         } else if (buf[0]!='S' || buf[1]!='B' || buf[2]!='I') {
  111.             fprintf(stderr,"%s: Not SBI file\n",argv[op]);
  112.             offset++;
  113.         } else if (l<51) {
  114.             fprintf(stderr,"%s: Short file\n",argv[op]);
  115.             offset++;
  116.         } else {    
  117.             instr.channel = op-offset;
  118.             instr.key = FM_PATCH;
  119.             instr.device = dev;
  120.         
  121.             for (i=0;i<16;i++) {
  122.                 instr.operators[i]=buf[i+0x24];
  123.             }
  124.     
  125.             if (write(fm, &instr, sizeof(instr))==-1) perror("/dev/sequencer");
  126.  
  127.             if (verbose) fprintf(stderr,"Loaded %d with %s\n",op-offset,argv[op]);
  128.         }
  129.         close(instrf);
  130.     }
  131.     if (verbose) 
  132.         fprintf(stderr,"Initialised %d FM-instruments.\n",argc-offset);
  133.  
  134.     if (offset == optind) exit(0); else exit(1);
  135. }
  136.