giuliomoro@15: /**
giuliomoro@15:  *  loundess.js
giuliomoro@15:  *  Loudness module for the Web Audio Evaluation Toolbox
giuliomoro@15:  *  Allows for automatic calculation of loudness of Web Audio API Buffer objects,
giuliomoro@15:  * 	return gain values to correct for a target loudness or match loudness between
giuliomoro@15:  *  multiple objects
giuliomoro@15:  */
giuliomoro@15: 
giuliomoro@15: var interval_cal_loudness_event = null;
giuliomoro@15: 
giuliomoro@15: if (typeof OfflineAudioContext == "undefined"){
giuliomoro@15: 	var OfflineAudioContext = webkitOfflineAudioContext;
giuliomoro@15: }
giuliomoro@15: 
giuliomoro@15: function calculateLoudness(buffer, timescale, target, offlineContext)
giuliomoro@15: {
giuliomoro@15: 	// This function returns the EBU R 128 specification loudness model and sets the linear gain required to match -23 LUFS
giuliomoro@15: 	// buffer -> Web Audio API Buffer object
giuliomoro@15: 	// timescale -> M or Momentary (returns Array), S or Short (returns Array),
giuliomoro@15: 	//   I or Integrated (default, returns number)
giuliomoro@15: 	// target -> default is -23 LUFS but can be any LUFS measurement.
giuliomoro@15: 	
giuliomoro@15: 	if (buffer == undefined)
giuliomoro@15: 	{
giuliomoro@15: 		return 0;
giuliomoro@15: 	}
giuliomoro@15: 	if (timescale == undefined)
giuliomoro@15: 	{
giuliomoro@15: 		timescale = "I";
giuliomoro@15: 	}
giuliomoro@15: 	if (target == undefined)
giuliomoro@15: 	{
giuliomoro@15: 		target = -23;
giuliomoro@15: 	}
giuliomoro@15: 	if (offlineContext == undefined)
giuliomoro@15: 	{
giuliomoro@15: 		offlineContext = new OfflineAudioContext(audioContext.destination.channelCount, buffer.buffer.duration*audioContext.sampleRate, audioContext.sampleRate);
giuliomoro@15: 	}
giuliomoro@15: 	// Create the required filters
giuliomoro@15: 	var KFilter = offlineContext.createBiquadFilter();
giuliomoro@15: 	KFilter.type = "highshelf";
giuliomoro@15: 	KFilter.gain.value = 4;
giuliomoro@15: 	KFilter.frequency.value = 1500;
giuliomoro@15: 	
giuliomoro@15: 	var HPFilter = offlineContext.createBiquadFilter();
giuliomoro@15: 	HPFilter.type = "highpass";
giuliomoro@15: 	HPFilter.Q.value = 0.5;
giuliomoro@15: 	HPFilter.frequency.value = 38;
giuliomoro@15: 	// copy Data into the process buffer
giuliomoro@15: 	var processSource = offlineContext.createBufferSource();
giuliomoro@15: 	processSource.buffer = buffer.buffer;
giuliomoro@15: 	
giuliomoro@15: 	processSource.connect(KFilter);
giuliomoro@15: 	KFilter.connect(HPFilter);
giuliomoro@15: 	HPFilter.connect(offlineContext.destination);
giuliomoro@15: 	offlineContext.oncomplete = function(renderedBuffer) {
giuliomoro@15: 		// Have the renderedBuffer information, now continue processing
giuliomoro@15: 		if (typeof renderedBuffer.renderedBuffer == 'object') {
giuliomoro@15: 			renderedBuffer = renderedBuffer.renderedBuffer;
giuliomoro@15: 		}
giuliomoro@15: 		switch(timescale)
giuliomoro@15: 		{
giuliomoro@15: 		case "I":
giuliomoro@15:             // Calculate the Mean Squared of a signal
giuliomoro@15:             var MS = calculateMeanSquared(renderedBuffer,0.4,0.75);
giuliomoro@15:             // Calculate the Loudness of each block
giuliomoro@15:             var MSL = calculateLoudnessFromBlocks(MS);
giuliomoro@15:             // Get blocks from Absolute Gate
giuliomoro@15:             var LK = loudnessGate(MSL,MS,-70);
giuliomoro@15:             // Calculate Loudness
giuliomoro@15:             var LK_gate = loudnessOfBlocks(LK);
giuliomoro@15:             // Get blocks from Relative Gate
giuliomoro@15:             var RK = loudnessGate(MSL,MS,LK_gate-10);
giuliomoro@15:             var RK_gate = loudnessOfBlocks(RK);
giuliomoro@15:             buffer.buffer.lufs = RK_gate;
giuliomoro@15: 		}
giuliomoro@15:         buffer.ready();
giuliomoro@15: 	};
giuliomoro@15:     processSource.start(0);
giuliomoro@15: 	offlineContext.startRendering();
giuliomoro@15: }
giuliomoro@15: 
giuliomoro@15: function calculateMeanSquared(buffer,frame_dur,frame_overlap)
giuliomoro@15: {
giuliomoro@15:     frame_size = Math.floor(buffer.sampleRate*frame_dur);
giuliomoro@15:     step_size = Math.floor(frame_size*(1.0-frame_overlap));
giuliomoro@15:     num_frames = Math.floor((buffer.length-frame_size)/step_size);
giuliomoro@15:     
giuliomoro@15:     MS = Array(buffer.numberOfChannels);
giuliomoro@15:     for (var c=0; c<buffer.numberOfChannels; c++)
giuliomoro@15:     {
giuliomoro@15:         MS[c] = new Float32Array(num_frames);
giuliomoro@15:         var data = buffer.getChannelData(c);
giuliomoro@15:         for (var no=0; no<num_frames; no++)
giuliomoro@15:         {
giuliomoro@15:             MS[c][no] = 0.0;
giuliomoro@15:             for (var ptr=0; ptr<frame_size; ptr++)
giuliomoro@15:             {
giuliomoro@15:                 var sample = data[no*step_size+ptr];
giuliomoro@15:                 MS[c][no] += sample*sample;
giuliomoro@15:             }
giuliomoro@15:             MS[c][no] /= frame_size;
giuliomoro@15:         }
giuliomoro@15:     }
giuliomoro@15:     return MS;
giuliomoro@15: }
giuliomoro@15: 
giuliomoro@15: function calculateLoudnessFromBlocks(blocks)
giuliomoro@15: {
giuliomoro@15:     var num_frames = blocks[0].length;
giuliomoro@15:     var num_channels = blocks.length;
giuliomoro@15:     var MSL = Array(num_frames);
giuliomoro@15:     for (var n=0; n<num_frames; n++)
giuliomoro@15:     {
giuliomoro@15:         var sum = 0;
giuliomoro@15:         for (var c=0; c<num_channels; c++)
giuliomoro@15:         {
giuliomoro@15:             var G = 1.0;
giuliomoro@15:             if(G >= 3){G = 1.41;}
giuliomoro@15:             sum += blocks[c][n]*G;
giuliomoro@15:         }
giuliomoro@15:         MSL[n] = -0.691 + 10*Math.log10(sum);
giuliomoro@15:     }
giuliomoro@15:     return MSL;
giuliomoro@15: }
giuliomoro@15: 
giuliomoro@15: function loudnessGate(blocks,source,threshold)
giuliomoro@15: {
giuliomoro@15:     var num_frames = source[0].length;
giuliomoro@15:     var num_channels = source.length;
giuliomoro@15:     var LK = Array(num_channels);
giuliomoro@15:     for (var c=0; c<num_channels; c++)
giuliomoro@15:     {
giuliomoro@15:         LK[c] = [];
giuliomoro@15:     }
giuliomoro@15:     
giuliomoro@15:     for (var n=0; n<num_frames; n++)
giuliomoro@15:     {
giuliomoro@15:         if (blocks[n] > threshold)
giuliomoro@15:         {
giuliomoro@15:             for (var c=0; c<num_channels; c++)
giuliomoro@15:             {
giuliomoro@15:                 LK[c].push(source[c][n]);
giuliomoro@15:             }
giuliomoro@15:         }
giuliomoro@15:     }
giuliomoro@15:     return LK;
giuliomoro@15: }
giuliomoro@15: 
giuliomoro@15: function loudnessOfBlocks(blocks)
giuliomoro@15: {
giuliomoro@15:     var num_frames = blocks[0].length;
giuliomoro@15:     var num_channels = blocks.length;
giuliomoro@15:     var loudness = 0.0;
giuliomoro@15:     for (var n=0; n<num_frames; n++)
giuliomoro@15:     {
giuliomoro@15:         var sum = 0;
giuliomoro@15:         for (var c=0; c<num_channels; c++)
giuliomoro@15:         {
giuliomoro@15:             var G = 1.0;
giuliomoro@15:             if(G >= 3){G = 1.41;}
giuliomoro@15:             sum += blocks[c][n]*G;
giuliomoro@15:         }
giuliomoro@15:         sum /= num_frames;
giuliomoro@15:         loudness += sum;
giuliomoro@15:     }
giuliomoro@15:     loudness = -0.691 + 10 * Math.log10(loudness);
giuliomoro@15:     return loudness;
giuliomoro@15: }