exile/v1/src/chuck_bbq.cpp

   1 /*----------------------------------------------------------------------------
   2     ChucK Concurrent, On-the-fly Audio Programming Language
   3       Compiler and Virtual Machine
   4
   5     Copyright (c) 2004 Ge Wang and Perry R. Cook.  All rights reserved.
   6       http://chuck.cs.princeton.edu/
   7       http://soundlab.cs.princeton.edu/
   8
   9     This program is free software; you can redistribute it and/or modify
  10     it under the terms of the GNU General Public License as published by
  11     the Free Software Foundation; either version 2 of the License, or
  12     (at your option) any later version.
  13
  14     This program is distributed in the hope that it will be useful,
  15     but WITHOUT ANY WARRANTY; without even the implied warranty of
  16     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17     GNU General Public License for more details.
  18
  19     You should have received a copy of the GNU General Public License
  20     along with this program; if not, write to the Free Software
  21     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  22     U.S.A.
  23 -----------------------------------------------------------------------------*/
  24
  25 //-----------------------------------------------------------------------------
  26 // file: chuck_bbq.cpp
  27 // desc: implementation
  28 //
  29 // author: Ge Wang (gewang@cs.princeton.edu)
  30 //         Perry R. Cook (prc@cs.princeton.edu)
  31 //-----------------------------------------------------------------------------
  32 #include "chuck_bbq.h"
  33 #include <math.h>
  34 #include <memory.h>
  35 #include <stdlib.h>
  36
  37
  38
  39
  40 //-----------------------------------------------------------------------------
  41 // name: BBQ()
  42 // desc: ...
  43 //-----------------------------------------------------------------------------
  44 BBQ::BBQ()
  45 {
  46     m_max_midi_device = 1024;
  47     m_digi_out = new DigitalOut;
  48     m_digi_in = new DigitalIn;
  49     m_midi_out = new MidiOut * [m_max_midi_device];
  50     m_midi_in = new MidiIn * [m_max_midi_device];
  51     m_in_count = new DWORD__[m_max_midi_device];
  52     m_out_count = new DWORD__[m_max_midi_device];
  53     memset( m_midi_out, 0, m_max_midi_device * sizeof(MidiOut *) );
  54     memset( m_midi_in, 0, m_max_midi_device * sizeof(MidiIn *) );
  55     memset( m_in_count, 0, m_max_midi_device * sizeof(DWORD__) );
  56     memset( m_out_count, 0, m_max_midi_device * sizeof(DWORD__) );
  57     //m_midi_out[0] = new MidiOut;
  58     //m_midi_in[0] = new MidiIn;
  59 }
  60
  61
  62
  63
  64 //-----------------------------------------------------------------------------
  65 // name: ~BBQ()
  66 // desc: ...
  67 //-----------------------------------------------------------------------------
  68 BBQ::~BBQ()
  69 {
  70     SAFE_DELETE( m_digi_out );
  71     SAFE_DELETE( m_digi_in );
  72     SAFE_DELETE_ARRAY( m_midi_out );
  73     SAFE_DELETE_ARRAY( m_midi_in );
  74     SAFE_DELETE_ARRAY( m_in_count );
  75     SAFE_DELETE_ARRAY( m_out_count );
  76 }
  77
  78
  79
  80
  81 //-----------------------------------------------------------------------------
  82 // name: initialize()
  83 // desc: ...
  84 //-----------------------------------------------------------------------------
  85 BOOL__ BBQ::initialize( DWORD__ num_channels, DWORD__ sampling_rate,
  86                         DWORD__ bps, DWORD__ buffer_size, DWORD__ num_buffers,
  87                         DWORD__ dac, DWORD__ adc )
  88 {
  89     Digitalio::m_dac_n = dac;
  90     Digitalio::m_adc_n = adc;
  91
  92     return Digitalio::initialize(
  93         num_channels, sampling_rate, bps, buffer_size, num_buffers
  94     );
  95 }
  96
  97
  98
  99
 100 //-----------------------------------------------------------------------------
 101 // name: set_srate()
 102 // desc: ...
 103 //-----------------------------------------------------------------------------
 104 void BBQ::set_srate( DWORD__ srate )
 105 {
 106     Digitalio::m_sampling_rate = srate;
 107 }
 108
 109
 110
 111
 112 //-----------------------------------------------------------------------------
 113 // name: set_bufsize()
 114 // desc: ...
 115 //-----------------------------------------------------------------------------
 116 void BBQ::set_bufsize( DWORD__ bufsize )
 117 {
 118     Digitalio::m_buffer_size = bufsize;
 119 }
 120
 121
 122
 123 //-----------------------------------------------------------------------------
 124 // name: shutdown()
 125 // desc: ...
 126 //-----------------------------------------------------------------------------
 127 void BBQ::shutdown()
 128 {
 129     Digitalio::shutdown();
 130 }
 131
 132
 133
 134
 135 //-----------------------------------------------------------------------------
 136 // name: digi_out()
 137 // desc: digital out
 138 //-----------------------------------------------------------------------------
 139 DigitalOut * BBQ::digi_out()
 140 {
 141     return m_digi_out;
 142 }
 143
 144
 145
 146
 147 //-----------------------------------------------------------------------------
 148 // name: digi_in()
 149 // desc: digital in
 150 //-----------------------------------------------------------------------------
 151 DigitalIn * BBQ::digi_in()
 152 {
 153     return m_digi_in;
 154 }
 155
 156
 157
 158
 159 //-----------------------------------------------------------------------------
 160 // name: midi_out()
 161 // desc: midi out
 162 //-----------------------------------------------------------------------------
 163 MidiOut * BBQ::midi_out( DWORD__ index )
 164 {
 165     if( index >= m_max_midi_device )
 166         return NULL;
 167
 168     if( m_midi_out[index] == NULL )
 169     {
 170         m_midi_out[index] = new MidiOut;
 171         if( !m_midi_out[index]->open( index ) )
 172         {
 173             delete m_midi_out[index];
 174             m_midi_out[index] = NULL;
 175             m_out_count[index]++;
 176         }
 177         else
 178             m_out_count[index] = 0;
 179     }
 180
 181     return m_midi_out[index];
 182 }
 183
 184
 185
 186
 187 //-----------------------------------------------------------------------------
 188 // name: midi_in()
 189 // desc: ...
 190 //-----------------------------------------------------------------------------
 191 MidiIn * BBQ::midi_in( DWORD__ index )
 192 {
 193     if( index >= m_max_midi_device )
 194         return NULL;
 195
 196     if( m_midi_in[index] == NULL )
 197     {
 198         m_midi_in[index] = new MidiIn;
 199         if( !m_midi_in[index]->open( index ) )
 200         {
 201             delete m_midi_in[index];
 202             m_midi_in[index] = NULL;
 203             m_in_count[index]++;
 204         }
 205         else
 206             m_in_count[index] = 0;
 207     }
 208
 209     return m_midi_in[index];
 210 }
 211
 212
 213
 214
 215 //-----------------------------------------------------------------------------
 216 // name: RangeMapper()
 217 // desc: constructor
 218 //-----------------------------------------------------------------------------
 219 RangeMapper::RangeMapper( SAMPLE low_l, SAMPLE high_l,
 220                           SAMPLE low_r, SAMPLE high_r )
 221 {
 222     SAMPLE dx = high_l - low_l;
 223     if( fabs( (double)dx ) < .000001 )
 224         m_slope = 0.0f;
 225     else
 226         m_slope = ( high_r - low_r ) / dx;
 227
 228     m_inter = high_r - m_slope * high_l;
 229 }
 230
 231
 232
 233
 234 //-----------------------------------------------------------------------------
 235 // name: map()
 236 // desc: ...
 237 //-----------------------------------------------------------------------------
 238 SAMPLE RangeMapper::map( SAMPLE x )
 239 {
 240     return m_slope * x + m_inter;
 241 }