Version 0.99

RawWvOut.cpp

@@ -0,0 +1,115 @@
+/*******************************************/
+/*  Raw Wave File Output Class,            */
+/*  by Perry R. Cook, 1995-96              */ 
+/*  This version opens a mono NeXT .snd    */
+/*  file 16bit data at 22KHz, and          */
+/*  pokes buffers of samples into it.      */
+/*******************************************/
+
+#include "RawWvOut.h"
+
+#if !defined(__SGI_REALTIME)
+
+/********  NeXT Soundfile Header Struct   *******/
+struct headerform {
+    char pref[4];
+    long hdr_length;
+    long file_length;
+    long mode;
+    long samp_rate;
+    long num_channels;
+    char comment[1024];
+};
+
+RawWvOut :: RawWvOut(char *fileName)
+{
+    struct headerform hdr = {".sn",28,0,3,(long) SRATE,1,"TK"};
+    hdr.pref[3] = 'd';
+
+    fd = fopen(fileName,"wb");
+    if (!fd)   {
+	printf("Couldn't create soundfile %s  !!!!!!!!\n",fileName);
+	exit(0);
+    }
+    fwrite(&hdr,4,7,fd);
+    counter = 0;
+    totalCount = 0;
+}
+
+RawWvOut :: ~RawWvOut()
+{
+    MY_FLOAT temp;
+    fwrite(data,2,counter,fd);
+    fseek(fd,8,SEEK_SET);
+    fwrite(&totalCount,4,1,fd);
+    fclose(fd);
+    temp = (double) totalCount * ONE_OVER_SRATE;
+    printf("%f Seconds Computed\n",temp);
+}
+
+long RawWvOut :: getCounter()
+{
+    return totalCount;
+}
+
+void RawWvOut :: tick(MY_FLOAT sample)
+{
+
+    data[counter++] = (short) (sample * 32000.0);
+    totalCount += 1;
+    if (counter == BUFFER_SIZE) {
+	fwrite(data,2,BUFFER_SIZE,fd);
+	counter = 0;
+    }
+}
+
+#else
+
+
+/*******************************************/
+/*  SGI Real-Time Wave File Output Class,  */
+/*  by Perry R. Cook, 1996                 */ 
+/*  This Object can opens the SGI soundout */
+/*  device, and pokes buffers of samples   */
+/*  into it.  The real code that does the  */
+/*  is from Doug Scott of SGI.             */
+/*******************************************/
+
+#include "sgio.C"
+
+RawWvOut :: RawWvOut(char *fileName)
+{
+    int fd;
+
+    fd = init_sound(SRATE,1);
+    if (fd<0)   {
+	printf("Couldn't open SoundOut Device  !!!!!!!!\n");
+	exit(0);
+    }
+    counter = 0;
+}
+
+RawWvOut :: ~RawWvOut()
+{
+    playbuf(data,counter);
+    counter = 0;
+    while (counter<BUFFER_SIZE)	{
+        data[counter++] = 0;
+    }
+    playbuf(data,counter);
+    playbuf(data,counter);
+    playbuf(data,counter);
+    shuddup();
+}
+
+void RawWvOut :: tick(MY_FLOAT sample)
+{
+
+    data[counter++] = (short) (sample * 32000.0);
+    if (counter == BUFFER_SIZE) {
+	playbuf(data,counter);
+	counter = 0;
+    }
+}
+
+#endif