← Back to branch summary

~ubuntu-branches/ubuntu/breezy/muse/breezy

« back to all changes in this revision

Viewing changes to synti/stklib/WavWvOut.cpp

  • Committer: Bazaar Package Importer
  • Author(s): Daniel Kobras
  • Date: 2004-02-07 15:18:22 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040207151822-es27xxkzbcxkebjm
Tags: 0.6.3-1
http://bugs.debian.org/228788
* New upstream version.
* Added patches:
  + [10_alsa_init_fix] New, from upstream CVS.
    Initialize direction variable when setting Alsa parameters.
  + [10_canvas_translation_fix] New, from upstream CVS.
    Do not translate tooltips twice in canvas popup.
  + [10_checkbox_fix] New, from upstream CVS.
    Use proper set/test methods on metronome checkboxes.
  + [10_html_doc_cleanup] New.
    Fix links and HTML errors in documentation.
  + [20_allow_system_timer] New.
    The new upstream version fails by default if the real-time clock
    could not be accessed (usually the case when not running suid-root).
    This patch reverts the old behaviour of falling back to the more
    inaccurate system timer.
* Updated patches:
  + [11_PIC_fixes_fixup] Rediffed.
* Removed patches:
  + [20_no_atomic_asm] Merged upstream.
* debian/compat: Splice out debhelper compatibility level from rules file.
* debian/control: Build-depend on latest jack release by default.
  Closes: #228788
* debian/control: Bump standards version.
* debian/control: Use auto-generated debconf dependency via misc:Depends.
* debian/control: Minor tweaks to the long description.
* debian/control: Tighten fluidsynth build dependency to sane version.
* debian/muse.doc-base: New. Register HTML documentation with doc-base.
* debian/templates: Tiny rewording, and typo fix.
* debian/templates, debian/po/*: Switch to po-debconf for translations.

Show diffs side-by-side

added added

removed removed

Lines of Context:
synti/stklib/WavWvOut.cpp
1
 
/*******************************************/
2
 
/*  Wave file Output Class,                */
3
 
/*  by Perry R. Cook, 1995-96              */
4
 
/*  revised by Gary P. Scavone, 1999       */
5
 
/*                                         */
6
 
/*  This Object opens a DOS/Windows .wav   */
7
 
/*  16bit data (signed integers) file, and */
8
 
/*  poke buffers of samples into it.       */
9
 
/*******************************************/
10
 
 
11
 
#include "WavWvOut.h"
12
 
#ifndef __LITTLE_ENDIAN__
13
 
  #include "ByteSwap.h"
14
 
#endif
15
 
 
16
 
/********  Wav Soundfile Header Struct   *******/
17
 
struct wavehdr {
18
 
  char  riff[4];          // "RIFF"
19
 
  INT32  file_size;       // in bytes
20
 
  char  wave[4];          // "WAVE"
21
 
  char  fmt[4];           // "fmt "
22
 
  INT32  block_size;      // in bytes (16 for PCM)
23
 
  INT16 format_tag;       // 1=PCM, 257=Mu-Law, 258=A-Law, 259=ADPCM
24
 
  INT16 num_chans;        // 1=mono, 2=stereo
25
 
  INT32  srate;
26
 
  INT32  bytes_per_sec;
27
 
  INT16 bytes_per_samp;   // 2=16-bit mono, 4=16-bit stereo
28
 
  INT16 bits_per_samp;
29
 
  char  data[4];          // "data"
30
 
  INT32  dlength;         // in bytes
31
 
};
32
 
 
33
 
FILE *openWAVFile(int chans,char *fileName)     {
34
 
  struct wavehdr hdr = {"RIF",44,"WAV","fmt",
35
 
                                                16,1,1,(INT32) SRATE,(INT32) SRATE*2,2,16,"dat",0};
36
 
  char tempName[128];
37
 
  FILE *fd;
38
 
  char msg[256];
39
 
 
40
 
  hdr.riff[3] = 'F';
41
 
  hdr.wave[3] = 'E';
42
 
  hdr.fmt[3]  = ' ';
43
 
  hdr.data[3] = 'a';
44
 
    
45
 
  strcpy(tempName,fileName);
46
 
  if (strstr(tempName,".wav") == NULL) strcat(tempName,".wav");
47
 
  hdr.num_chans = chans;
48
 
  hdr.bytes_per_sec = (long) SRATE*2*chans;
49
 
  hdr.bytes_per_samp = 2*chans;
50
 
  hdr.bits_per_samp = 16;
51
 
  fd = fopen(tempName,"wb");
52
 
  if (!fd) {
53
 
    sprintf(msg, "WavWvOut: Could not create soundfile: %s\n", tempName);
54
 
    throw StkError(msg, StkError::FILE_ERROR);
55
 
  }
56
 
 
57
 
#ifndef __LITTLE_ENDIAN__
58
 
  swap32((unsigned char *)&hdr.file_size);
59
 
  swap32((unsigned char *)&hdr.block_size);
60
 
  swap16((unsigned char *)&hdr.format_tag);
61
 
  swap16((unsigned char *)&hdr.num_chans);
62
 
  swap32((unsigned char *)&hdr.srate);
63
 
  swap32((unsigned char *)&hdr.bytes_per_sec);
64
 
  swap16((unsigned char *)&hdr.bytes_per_samp);
65
 
  swap16((unsigned char *)&hdr.bits_per_samp);
66
 
#endif
67
 
 
68
 
  printf("\nCreating soundfile: %s\n", tempName);
69
 
  fwrite(&hdr,4,11,fd);
70
 
  return fd;
71
 
}
72
 
 
73
 
WavWvOut :: WavWvOut(char *fileName, int chans)
74
 
{
75
 
  char msg[256];
76
 
  if (chans < 1) {
77
 
    sprintf(msg, "WavWvOut: number of channels = %d not supported!\n", chans);
78
 
    throw StkError(msg, StkError::FUNCTION_SYNTAX);
79
 
  }
80
 
  channels = chans;
81
 
  fd = openWAVFile(chans,fileName);
82
 
  data_length = FILE_BUFFER_SIZE*channels;
83
 
  data = (INT16 *) new INT16[data_length];
84
 
}
85
 
 
86
 
WavWvOut :: ~WavWvOut()
87
 
{
88
 
  MY_FLOAT time;
89
 
  INT32 bytes;
90
 
 
91
 
  fwrite(data,2,counter,fd);
92
 
  time = (double) totalCount * ONE_OVER_SRATE;
93
 
  printf("%f Seconds Computed\n\n", time);
94
 
 
95
 
  bytes = totalCount*2*channels;
96
 
#ifndef __LITTLE_ENDIAN__
97
 
  swap32((unsigned char *)&bytes);
98
 
#endif
99
 
  fseek(fd,40,SEEK_SET); // jump to data length
100
 
  fwrite(&bytes,4,1,fd);
101
 
 
102
 
  bytes = totalCount*2*channels + 44;
103
 
#ifndef __LITTLE_ENDIAN__
104
 
  swap32((unsigned char *)&bytes);
105
 
#endif
106
 
  fseek(fd,4,SEEK_SET); // jump to file size
107
 
  fwrite(&bytes,4,1,fd);
108
 
  fclose(fd);
109
 
}
110
 
 
111
 
void WavWvOut :: tick(MY_FLOAT sample)
112
 
{
113
 
  static INT16 isample;
114
 
 
115
 
  isample = (INT16) (sample * 32000.0);
116
 
#ifndef __LITTLE_ENDIAN__
117
 
  swap16 ((unsigned char *)&isample);
118
 
#endif
119
 
  for (int i=0;i<channels;i++)
120
 
    data[counter++] = isample;
121
 
 
122
 
  totalCount++;
123
 
  if (counter == data_length) {
124
 
    fwrite(data,2,data_length,fd);
125
 
    counter = 0;
126
 
  }
127
 
}
128
 
 
129
 
void WavWvOut :: mtick(MY_MULTI samples)
130
 
{
131
 
  for (int i=0;i<channels;i++) {
132
 
    data[counter] = (INT16) (*samples++ * 32000.0);
133
 
#ifndef __LITTLE_ENDIAN__
134
 
    swap16 ((unsigned char *)&data[counter]);
135
 
#endif
136
 
    counter++;
137
 
  }
138
 
 
139
 
  totalCount++;
140
 
  if (counter == data_length) {
141
 
    fwrite(data,2,data_length,fd);
142
 
    counter = 0;
143
 
  }
144
 
}