sys/amiga/cvtsnd.c

   1 /*      SCCS Id: @(#)cvtsnd.c   3.2     95/09/10                  */
   2 /*      Copyright (c) 1995, Andrew Church, Olney, Maryland        */
   3 /* NetHack may be freely redistributed.  See license for details. */
   4
   5 #include <stdio.h>
   6 #include <stdlib.h>
   7 #include <string.h>
   8
   9 typedef struct {
  10     short namelen;
  11     char name[62];
  12     char misc[64];      /* rest of MacBinary header */
  13     long FORM;
  14     long flen;
  15     long AIFF;
  16     long SSND;
  17     long sndlen;
  18 } AIFF;
  19
  20 typedef struct {
  21     char FORM[4];
  22     long flen;
  23     char _8SVX[4];
  24     char VHDR[4];
  25     long vhlen;
  26     long oneshot, repeat;
  27     long samples;       /* 'samplesPerHiCycle' in the docs - usually 32, so
  28                          *    we'll use that */
  29     short freq;
  30     char octaves, compress;
  31     long volume;
  32     char NAME[4];
  33     long nlen;          /* should be 64; see name[] comment */
  34     char name[64];      /* for simplicity, i.e. just fwrite() entiree header */
  35     char BODY[4];
  36     long blen;
  37 } IFF;
  38
  39
  40 main(int ac, char **av)
  41 {
  42     FILE *in, *out;
  43     AIFF aiff;
  44     IFF iff;
  45     static char buf[16384];
  46     long n, len;
  47
  48     if (ac != 3) {
  49         fprintf(stderr, "Usage: %s input-file output-file\n", av[0]);
  50         exit(20);
  51     }
  52     if (!(in = fopen(av[1], "r"))) {
  53         fprintf(stderr, "Can't open input file\n");
  54         exit(20);
  55     }
  56     if (!(out = fopen(av[2], "w"))) {
  57         fprintf(stderr, "Can't open output file\n");
  58         exit(20);
  59     }
  60
  61     fread(&aiff, sizeof(aiff), 1, in);
  62     memcpy(iff.FORM, "FORM", 4);
  63     iff.flen    = sizeof(iff) + aiff.sndlen - 8;
  64     memcpy(iff._8SVX, "8SVX", 4);
  65     memcpy(iff.VHDR, "VHDR", 4);
  66     iff.vhlen   = 20;
  67     iff.oneshot = aiff.sndlen;
  68     iff.repeat  = 0;
  69     iff.samples = 32;
  70     iff.freq    = 22000;
  71     iff.octaves = 1;
  72     iff.compress= 0;
  73     iff.volume  = 0x10000;
  74     memcpy(iff.NAME, "NAME", 4);
  75     iff.nlen    = 64;
  76     strncpy(iff.name, aiff.name, 62); iff.name[aiff.namelen] = 0;
  77     memcpy(iff.BODY, "BODY", 4);
  78     iff.blen    = aiff.sndlen;
  79     fwrite(&iff, sizeof(iff), 1, out);
  80     len = aiff.sndlen;
  81     do {
  82         if (len >= sizeof(buf))
  83             n = fread(buf, 1, sizeof(buf), in);
  84         else
  85             n = fread(buf, 1, len, in);
  86         if (n) {
  87             fwrite(buf, 1, n, out);
  88             len -= n;
  89         }
  90     } while (len && n);
  91
  92     if (len)
  93         fprintf(stderr, "Warning: %ld bytes of sample missing\n", len);
  94     fclose(in); fclose(out);
  95     exit(0);
  96 }