This is st.h in view mode; [Download] [Up]
/*
* July 5, 1991
* Copyright 1991 Lance Norskog And Sundry Contributors
* This source code is freely redistributable and may be used for
* any purpose. This copyright notice must be maintained.
* Lance Norskog And Sundry Contributors are not responsible for
* the consequences of using this software.
*/
#ifdef VAXC
#define IMPORT globalref
#define EXPORT globaldef
/*
* use the VAX C optimized functions
*/
#define calloc VAXC$CALLOC_OPT
#define cfree VAXC$CFREE_OPT
#define free VAXC$FREE_OPT
#define malloc VAXC$MALLOC_OPT
#define realloc VAXC$REALLOC_OPT
#else
#define IMPORT extern
#define EXPORT
#endif
/*
* Sound Tools sources header file.
*/
#include <stdio.h>
#ifdef AMIGA
#include "amiga.h"
#endif /* AMIGA */
/*
* Handler structure for each format.
*/
typedef struct format {
char **names; /* file type names */
int flags; /* details about file type */
int (*startread)();
int (*read)();
int (*stopread)();
int (*startwrite)();
int (*write)();
int (*stopwrite)();
} format_t;
IMPORT format_t formats[];
/* Signal parameters */
struct signalinfo {
long rate; /* sampling rate */
int size; /* word length of data */
int style; /* format of sample numbers */
int channels; /* number of sound channels */
};
/* Loop parameters */
struct loopinfo {
int start; /* first sample */
int length; /* length */
int count; /* number of repeats, 0=forever */
int type; /* 0=no, 1=forward, 2=forward/back */
};
/* Instrument parameters */
/* vague attempt at generic information for sampler-specific info */
struct instrinfo {
char MIDInote; /* for unity pitch playback */
char MIDIlow, MIDIhi;/* MIDI pitch-bend range */
char loopmode; /* semantics of loop data */
char nloops; /* number of active loops */
unsigned char smpte[4]; /* SMPTE offset (hour:min:sec:frame) */
/* this is a film audio thing */
};
#define MIDI_UNITY 60 /* MIDI note number to play sample at unity */
/* Loop modes */
#define LOOP_NONE 0
#define LOOP_8 1 /* 8 loops: don't know ?? */
#define LOOP_SUSTAIN_DECAY 2 /* AIFF style: one sustain & one decay loop */
/* Pipe parameters */
struct pipeinfo {
FILE *pout; /* Output file */
FILE *pin; /* Input file */
};
/*
* Format information for input and output files.
*/
#define PRIVSIZE 100
#define NLOOPS 8
struct soundstream {
struct signalinfo info; /* signal specifications */
struct instrinfo instr; /* instrument specification */
struct loopinfo loops[NLOOPS]; /* Looping specification */
char swap; /* do byte- or word-swap */
char seekable; /* can seek on this file */
char *filename; /* file name */
char *filetype; /* type of file */
char *comment; /* comment string */
FILE *fp; /* File stream pointer */
format_t *h; /* format struct for this file */
double priv[PRIVSIZE/8]; /* format's private data area */
};
IMPORT struct soundstream informat, outformat;
typedef struct soundstream *ft_t;
/* flags field */
#define FILE_STEREO 1 /* does file format support stereo? */
#define FILE_LOOPS 2 /* does file format support loops? */
#define FILE_INSTR 4 /* does file format support instrument specificications? */
/* Size field */
#define BYTE 1
#define WORD 2
#define LONG 4
#define FLOAT 5
#define DOUBLE 6
#define IEEE 7 /* IEEE 80-bit floats. Is it necessary? */
/* Style field */
#define UNSIGNED 1 /* unsigned linear: Sound Blaster */
#define SIGN2 2 /* signed linear 2's comp: Mac */
#define ULAW 3 /* U-law signed logs: US telephony, SPARC */
#define ALAW 4 /* A-law signed logs: non-US telephony */
IMPORT char *sizes[], *styles[];
/*
* Handler structure for each effect.
*/
typedef struct {
char *name; /* effect name */
int flags; /* this and that */
int (*getopts)(); /* process arguments */
int (*start)(); /* start off effect */
int (*flow)(); /* do a buffer */
int (*drain)(); /* drain out at end */
int (*stop)(); /* finish up effect */
} effect_t;
IMPORT effect_t effects[];
#define EFF_CHAN 1 /* Effect can mix channels up/down */
#define EFF_RATE 2 /* Effect can alter data rate */
#define EFF_MCHAN 4 /* Effect can handle multi-channel */
#define EFF_REPORT 8 /* Effect does nothing */
struct effect {
char *name; /* effect name */
struct signalinfo ininfo; /* input signal specifications */
struct loopinfo loops[8]; /* input loops specifications */
struct instrinfo instr; /* input instrument specifications */
struct signalinfo outinfo; /* output signal specifications */
effect_t *h; /* effects driver */
long *obuf; /* output buffer */
long odone, olen; /* consumed, total length */
double priv[PRIVSIZE]; /* private area for effect */
};
typedef struct effect *eff_t;
#if defined(__STDC__) || defined(ARM)
#define P1(x) x
#define P2(x,y) x, y
#define P3(x,y,z) x, y, z
#define P4(x,y,z,w) x, y, z, w
#else
#define P1(x)
#define P2(x,y)
#define P3(x,y,z)
#define P4(x,y,z,w)
#endif
/* Utilities to read and write shorts and longs little-endian and big-endian */
unsigned short rlshort(P1(ft_t ft)); /* short little-end */
unsigned short rbshort(P1(ft_t ft)); /* short big-end */
unsigned short wlshort(P2(ft_t ft, unsigned short us)); /* short little-end */
unsigned short wbshort(P2(ft_t ft, unsigned short us)); /* short big-end */
unsigned long rllong(P1(ft_t ft)); /* long little-end */
unsigned long rblong(P1(ft_t ft)); /* long big-end */
unsigned long wllong(P2(ft_t ft, unsigned long ul)); /* long little-end */
unsigned long wblong(P2(ft_t ft, unsigned long ul)); /* long big-end */
/* Read and write words and longs in "machine format". Swap if indicated. */
unsigned short rshort(P1(ft_t ft));
unsigned short wshort(P2(ft_t ft, unsigned short us));
unsigned long rlong(P1(ft_t ft));
unsigned long wlong(P2(ft_t ft, unsigned long ul));
float rfloat(P1(ft_t ft));
void wfloat(P2(ft_t ft, double f));
double rdouble(P1(ft_t ft));
void wdouble(P2(ft_t ft, double d));
/* Utilities to byte-swap values */
unsigned short swapw(P1(unsigned short us)); /* Swap short */
unsigned long swapl(P1(unsigned long ul)); /* Swap long */
float swapf(P1(float f)); /* Swap float */
double swapd(P1(double d)); /* Swap double */
#ifdef ARM
IMPORT double sfloor(P1(double x)); /* Hack our way around the flawed */
IMPORT double sceil(P1(double x)); /* UnixLib floor ceil functions */
#endif
IMPORT void report(P2(char *, ...)), warn(P2(char *, ...)),
fail(P2(char *, ...));
typedef unsigned int u_i;
typedef unsigned long u_l;
typedef unsigned short u_s;
IMPORT float volume; /* expansion coefficient */
IMPORT int dovolume;
IMPORT float amplitude; /* Largest sample so far */
IMPORT int writing; /* are we writing to a file? */
/* export flags */
IMPORT int verbose; /* be noisy on stderr */
IMPORT int summary; /* just print summary of information */
IMPORT char *myname;
IMPORT int soxpreview; /* Preview mode: be fast and ugly */
#define MAXRATE 50L * 1024 /* maximum sample rate */
#if defined(unix) || defined (__OS2__)
/* Some wacky processors don't have arithmetic down shift, so do divs */
/* Most compilers will turn this into a shift if they can, don't worry */
#define RIGHT(datum, bits) ((datum) / (1L << bits))
#define LEFT(datum, bits) ((datum) << bits)
#else
/* x86 & 68k PC's have arith shift ops and dumb compilers */
#define RIGHT(datum, bits) ((datum) >> bits)
#define LEFT(datum, bits) ((datum) << bits)
#endif
#ifndef M_PI
#define M_PI 3.14159265358979323846
#endif
#if defined(unix) || defined(AMIGA) || defined (__OS2__) \
|| defined(OS9) || defined(ARM)
#define READBINARY "r"
#define WRITEBINARY "w"
#endif
#ifdef VMS
#define READBINARY "r", "mbf=16", "ctx=stm"
#define WRITEBINARY "w", "ctx=stm"
#endif
#ifdef DOS
#define READBINARY "rb"
#define WRITEBINARY "wb"
#endif
/* Error code reporting */
#ifdef QNX
#include <errno.h>
#endif
#if defined(unix) || defined(__OS2__)
#include <errno.h>
extern errno;
#endif
#ifdef __OS2__
#define REMOVE remove
#else
#define REMOVE unlink
#endif
char *version(); /* return version number */
/* ummmm??? */
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.