1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/modules/bluespec/Pygar/core/mixer.bsv	Tue May 04 10:13:53 2010 -0400
     1.3 @@ -0,0 +1,69 @@
     1.4 +// The MIT License
     1.5 +
     1.6 +// Copyright (c) 2009 Massachusetts Institute of Technology
     1.7 +
     1.8 +// Permission is hereby granted, free of charge, to any person obtaining a copy
     1.9 +// of this software and associated documentation files (the "Software"), to deal
    1.10 +// in the Software without restriction, including without limitation the rights
    1.11 +// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
    1.12 +// copies of the Software, and to permit persons to whom the Software is
    1.13 +// furnished to do so, subject to the following conditions:
    1.14 +
    1.15 +// The above copyright notice and this permission notice shall be included in
    1.16 +// all copies or substantial portions of the Software.
    1.17 +
    1.18 +// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
    1.19 +// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
    1.20 +// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
    1.21 +// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
    1.22 +// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
    1.23 +// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
    1.24 +// THE SOFTWARE.
    1.25 +
    1.26 +import Connectable::*;
    1.27 +import GetPut::*;
    1.28 +import ClientServer::*;
    1.29 +import Processor::*;
    1.30 +import MemArb::*;
    1.31 +import MemTypes::*;
    1.32 +
    1.33 +//AWB includes
    1.34 +`include "asim/provides/low_level_platform_interface.bsh"
    1.35 +`include "asim/provides/soft_connections.bsh"
    1.36 +`include "asim/provides/common_services.bsh"
    1.37 +
    1.38 +// Local includes
    1.39 +`include "asim/provides/processor_library.bsh"
    1.40 +`include "asim/provides/audio_pipe_types.bsh"
    1.41 +`include "asim/provides/path_types.bsh"
    1.42 +
    1.43 +interface PutMixerIn;
    1.44 +   method Action sendVoiceIn(AudioStream voiceInput);
    1.45 +endinterface 
    1.46 +
    1.47 +interface Mixer#(Vector#(`MAX_VOICES, Volume));
    1.48 +   interface PutMixerIn toMixer;
    1.49 +   interface Get#(AudioProcessorUnit) mixerOut;
    1.50 +endinterface
    1.51 +
    1.52 +
    1.53 +module   [CONNECTED_MODULE]  mkMixer( Mixer#(Vector(`MAX_VOICES, Volume)));
    1.54 +  // Instantiate the modules
    1.55 +   Vector#(`MAX_VOICES, FIFO#(AudioPipeUnit)) voicesIn <- newVector();
    1.56 +   Vector#(`MAX_VOICES, Bool) voiceEnded <- replicate(False);
    1.57 +
    1.58 +   FIFO#(AudioProcessorUnit) masterFifo <- mkFIFO();
    1.59 +
    1.60 +   rule processSample  //implicit on all voiceFifos having data
    1.61 +   endrule
    1.62 + 
    1.63 +  // Internal connections
    1.64 +
    1.65 +   interface PutMixerIn toMixer;
    1.66 +      method Action sendVoiceIn(AudioStream voiceInput);
    1.67 +	 voicesIn[voiceInput.voice].enq(voiceInput.data);
    1.68 +      endmethod
    1.69 +         
    1.70 +   interface Get mixerOut = fifoToGet(masterFifo);
    1.71 +
    1.72 +endmodule