void AutomationPattern::resolveAllIDs() { TrackContainer::TrackList l = Engine::getSong()->tracks() + Engine::getBBTrackContainer()->tracks(); l += Engine::getSong()->globalAutomationTrack(); for( TrackContainer::TrackList::iterator it = l.begin(); it != l.end(); ++it ) { if( ( *it )->type() == Track::AutomationTrack || ( *it )->type() == Track::HiddenAutomationTrack ) { Track::tcoVector v = ( *it )->getTCOs(); for( Track::tcoVector::iterator j = v.begin(); j != v.end(); ++j ) { AutomationPattern * a = dynamic_cast<AutomationPattern *>( *j ); if( a ) { for( QVector<jo_id_t>::Iterator k = a->m_idsToResolve.begin(); k != a->m_idsToResolve.end(); ++k ) { JournallingObject * o = Engine::projectJournal()-> journallingObject( *k ); if( o && dynamic_cast<AutomatableModel *>( o ) ) { a->addObject( dynamic_cast<AutomatableModel *>( o ), false ); } } a->m_idsToResolve.clear(); a->dataChanged(); } } } } }
void AutomationTrackView::dropEvent( QDropEvent * _de ) { QString type = StringPairDrag::decodeKey( _de ); QString val = StringPairDrag::decodeValue( _de ); if( type == "automatable_model" ) { AutomatableModel * mod = dynamic_cast<AutomatableModel *>( Engine::projectJournal()-> journallingObject( val.toInt() ) ); if( mod != NULL ) { MidiTime pos = MidiTime( trackContainerView()-> currentPosition() + ( _de->pos().x() - getTrackContentWidget()->x() ) * MidiTime::ticksPerTact() / static_cast<int>( trackContainerView()->pixelsPerTact() ) ) .toAbsoluteTact(); if( pos.getTicks() < 0 ) { pos.setTicks( 0 ); } TrackContentObject * tco = getTrack()->createTCO( pos ); AutomationPattern * pat = dynamic_cast<AutomationPattern *>( tco ); pat->addObject( mod ); pat->movePosition( pos ); } } update(); }
AutomationPattern * AutomationPattern::globalAutomationPattern( AutomatableModel * _m ) { AutomationTrack * t = Engine::getSong()->globalAutomationTrack(); Track::tcoVector v = t->getTCOs(); for( Track::tcoVector::const_iterator j = v.begin(); j != v.end(); ++j ) { AutomationPattern * a = dynamic_cast<AutomationPattern *>( *j ); if( a ) { for( objectVector::const_iterator k = a->m_objects.begin(); k != a->m_objects.end(); ++k ) { if( *k == _m ) { return a; } } } } AutomationPattern * a = new AutomationPattern( t ); a->addObject( _m, false ); return a; }
float AutomatableModel::globalAutomationValueAt( const MidiTime& time ) { // get patterns that connect to this model QVector<AutomationPattern *> patterns = AutomationPattern::patternsForModel( this ); if( patterns.isEmpty() ) { // if no such patterns exist, return current value return m_value; } else { // of those patterns: // find the patterns which overlap with the miditime position QVector<AutomationPattern *> patternsInRange; for( QVector<AutomationPattern *>::ConstIterator it = patterns.begin(); it != patterns.end(); it++ ) { int s = ( *it )->startPosition(); int e = ( *it )->endPosition(); if( s <= time && e >= time ) { patternsInRange += ( *it ); } } AutomationPattern * latestPattern = NULL; if( ! patternsInRange.isEmpty() ) { // if there are more than one overlapping patterns, just use the first one because // multiple pattern behaviour is undefined anyway latestPattern = patternsInRange[0]; } else // if we find no patterns at the exact miditime, we need to search for the last pattern before time and use that { int latestPosition = 0; for( QVector<AutomationPattern *>::ConstIterator it = patterns.begin(); it != patterns.end(); it++ ) { int e = ( *it )->endPosition(); if( e <= time && e > latestPosition ) { latestPosition = e; latestPattern = ( *it ); } } } if( latestPattern ) { // scale/fit the value appropriately and return it const float value = latestPattern->valueAt( time - latestPattern->startPosition() ); const float scaled_value = scaledValue( value ); return fittedValue( scaled_value ); } // if we still find no pattern, the value at that time is undefined so // just return current value as the best we can do else return m_value; } }
smfMidiCC & putValue( MidiTime time, AutomatableModel * objModel, float value ) { if( !ap || time > lastPos + DefaultTicksPerTact ) { MidiTime pPos = MidiTime( time.getTact(), 0 ); ap = dynamic_cast<AutomationPattern*>( at->createTCO(0) ); ap->movePosition( pPos ); ap->addObject( objModel ); } lastPos = time; time = time - ap->startPosition(); ap->putValue( time, value, false ); ap->changeLength( MidiTime( time.getTact() + 1, 0 ) ); return *this; }
/*! \brief returns a list of all the automation patterns everywhere that are connected to a specific model * \param _m the model we want to look for */ QVector<AutomationPattern *> AutomationPattern::patternsForModel( const AutomatableModel * _m ) { QVector<AutomationPattern *> patterns; TrackContainer::TrackList l; l += Engine::getSong()->tracks(); l += Engine::getBBTrackContainer()->tracks(); l += Engine::getSong()->globalAutomationTrack(); // go through all tracks... for( TrackContainer::TrackList::ConstIterator it = l.begin(); it != l.end(); ++it ) { // we want only automation tracks... if( ( *it )->type() == Track::AutomationTrack || ( *it )->type() == Track::HiddenAutomationTrack ) { // get patterns in those tracks.... const Track::tcoVector & v = ( *it )->getTCOs(); // go through all the patterns... for( Track::tcoVector::ConstIterator j = v.begin(); j != v.end(); ++j ) { AutomationPattern * a = dynamic_cast<AutomationPattern *>( *j ); // check that the pattern has automation if( a && a->hasAutomation() ) { // now check is the pattern is connected to the model we want by going through all the connections // of the pattern bool has_object = false; for( objectVector::const_iterator k = a->m_objects.begin(); k != a->m_objects.end(); ++k ) { if( *k == _m ) { has_object = true; } } // if the patterns is connected to the model, add it to the list if( has_object ) { patterns += a; } } } } } return patterns; }
bool AutomationTrack::play( const MidiTime & _start, const fpp_t _frames, const f_cnt_t _frame_base, int _tco_num ) { if( isMuted() ) { return false; } tcoVector tcos; if( _tco_num >= 0 ) { TrackContentObject * tco = getTCO( _tco_num ); tcos.push_back( tco ); } else { getTCOsInRange( tcos, _start, _start + static_cast<int>( _frames / Engine::framesPerTick()) ); } for( tcoVector::iterator it = tcos.begin(); it != tcos.end(); ++it ) { AutomationPattern * p = dynamic_cast<AutomationPattern *>( *it ); if( p == NULL || ( *it )->isMuted() ) { continue; } MidiTime cur_start = _start; if( _tco_num < 0 ) { cur_start -= p->startPosition(); } p->processMidiTime( cur_start ); } return false; }
void AutomatableModel::loadSettings( const QDomElement& element, const QString& name ) { // read scale type and overwrite default scale type if( element.hasAttribute("scale_type") ) // wrong in most cases { if( element.attribute("scale_type") == "log" ) setScaleType( Logarithmic ); } else { setScaleType( Linear ); } // compat code QDomNode node = element.namedItem( AutomationPattern::classNodeName() ); if( node.isElement() ) { node = node.namedItem( name ); if( node.isElement() ) { AutomationPattern * p = AutomationPattern::globalAutomationPattern( this ); p->loadSettings( node.toElement() ); setValue( p->valueAt( 0 ) ); // in older projects we sometimes have odd automations // with just one value in - eliminate if necessary if( !p->hasAutomation() ) { delete p; } return; } // logscales were not existing at this point of time // so they can be ignored } QDomNode connectionNode = element.namedItem( "connection" ); // reads controller connection if( connectionNode.isElement() ) { QDomNode thisConnection = connectionNode.toElement().namedItem( name ); if( thisConnection.isElement() ) { setControllerConnection( new ControllerConnection( (Controller*)NULL ) ); m_controllerConnection->loadSettings( thisConnection.toElement() ); //m_controllerConnection->setTargetName( displayName() ); } } // models can be stored as elements (port00) or attributes (port10): // <ladspacontrols port10="4.41"> // <port00 value="4.41" id="4249278"/> // </ladspacontrols> // element => there is automation data node = element.namedItem( name ); if( node.isElement() ) { changeID( node.toElement().attribute( "id" ).toInt() ); setValue( node.toElement().attribute( "value" ).toFloat() ); } else if( element.hasAttribute( name ) ) // attribute => read the element's value from the attribute list { setInitValue( element.attribute( name ).toFloat() ); } else { reset(); } }
bool FlpImport::tryFLPImport( trackContainer * _tc ) { const int mappedFilter[] = { basicFilters<>::LowPass,// fast LP basicFilters<>::LowPass, basicFilters<>::BandPass_CSG, basicFilters<>::HiPass, basicFilters<>::Notch, basicFilters<>::NumFilters+basicFilters<>::LowPass, basicFilters<>::LowPass, basicFilters<>::NumFilters+basicFilters<>::LowPass } ; const Arpeggiator::ArpDirections mappedArpDir[] = { Arpeggiator::ArpDirUp, Arpeggiator::ArpDirUp, Arpeggiator::ArpDirDown, Arpeggiator::ArpDirUpAndDown, Arpeggiator::ArpDirUpAndDown, Arpeggiator::ArpDirRandom } ; QMap<QString, int> mappedPluginTypes; // instruments mappedPluginTypes["sampler"] = FL_Plugin::Sampler; mappedPluginTypes["ts404"] = FL_Plugin::TS404; mappedPluginTypes["3x osc"] = FL_Plugin::Fruity_3x_Osc; mappedPluginTypes["beepmap"] = FL_Plugin::BeepMap; mappedPluginTypes["buzz generator adapter"] = FL_Plugin::BuzzGeneratorAdapter; mappedPluginTypes["fruit kick"] = FL_Plugin::FruitKick; mappedPluginTypes["fruity drumsynth live"] = FL_Plugin::FruityDrumSynthLive; mappedPluginTypes["fruity dx10"] = FL_Plugin::FruityDX10; mappedPluginTypes["fruity granulizer"] = FL_Plugin::FruityGranulizer; mappedPluginTypes["fruity slicer"] = FL_Plugin::FruitySlicer; mappedPluginTypes["fruity soundfont player"] = FL_Plugin::FruitySoundfontPlayer; mappedPluginTypes["fruity vibrator"] = FL_Plugin::FruityVibrator; mappedPluginTypes["midi out"] = FL_Plugin::MidiOut; mappedPluginTypes["plucked!"] = FL_Plugin::Plucked; mappedPluginTypes["simsynth"] = FL_Plugin::SimSynth; mappedPluginTypes["sytrus"] = FL_Plugin::Sytrus; mappedPluginTypes["wasp"] = FL_Plugin::WASP; // effects mappedPluginTypes["fruity 7 band EQ"] = FL_Plugin::Fruity7BandEq; mappedPluginTypes["fruity balance"] = FL_Plugin::FruityBalance; mappedPluginTypes["fruity bass boost"] = FL_Plugin::FruityBassBoost; mappedPluginTypes["fruity big clock"] = FL_Plugin::FruityBigClock; mappedPluginTypes["fruity blood overdrive"] = FL_Plugin::FruityBloodOverdrive; mappedPluginTypes["fruity center"] = FL_Plugin::FruityCenter; mappedPluginTypes["fruity chorus"] = FL_Plugin::FruityChorus; mappedPluginTypes["fruity compressor"] = FL_Plugin::FruityCompressor; mappedPluginTypes["fruity db meter"] = FL_Plugin::FruityDbMeter; mappedPluginTypes["fruity delay"] = FL_Plugin::FruityDelay; mappedPluginTypes["fruity delay 2"] = FL_Plugin::FruityDelay2; mappedPluginTypes["fruity fast dist"] = FL_Plugin::FruityFastDist; mappedPluginTypes["fruity fast lp"] = FL_Plugin::FruityFastLP; mappedPluginTypes["fruity filter"] = FL_Plugin::FruityFilter; mappedPluginTypes["fruity flanger"] = FL_Plugin::FruityFlanger; mappedPluginTypes["fruity formula controller"] = FL_Plugin::FruityFormulaController; mappedPluginTypes["fruity free filter"] = FL_Plugin::FruityFreeFilter; mappedPluginTypes["fruity html notebook"] = FL_Plugin::FruityHTMLNotebook; mappedPluginTypes["fruity lsd"] = FL_Plugin::FruityLSD; mappedPluginTypes["fruity mute 2"] = FL_Plugin::FruityMute2; mappedPluginTypes["fruity notebook"] = FL_Plugin::FruityNotebook; mappedPluginTypes["fruity panomatic"] = FL_Plugin::FruityPanOMatic; mappedPluginTypes["fruity parametric eq"] = FL_Plugin::FruityParametricEQ; mappedPluginTypes["fruity peak controller"] = FL_Plugin::FruityPeakController; mappedPluginTypes["fruity phase inverter"] = FL_Plugin::FruityPhaseInverter; mappedPluginTypes["fruity phaser"] = FL_Plugin::FruityPhaser; mappedPluginTypes["fruity reeverb"] = FL_Plugin::FruityReeverb; mappedPluginTypes["fruity scratcher"] = FL_Plugin::FruityScratcher; mappedPluginTypes["fruity send"] = FL_Plugin::FruitySend; mappedPluginTypes["fruity soft clipper"] = FL_Plugin::FruitySoftClipper; mappedPluginTypes["fruity spectroman"] = FL_Plugin::FruitySpectroman; mappedPluginTypes["fruity stereo enhancer"] = FL_Plugin::FruityStereoEnhancer; mappedPluginTypes["fruity x-y controller"] = FL_Plugin::FruityXYController; FL_Project p; if( openFile() == false ) { return false; } if( readID() != makeID( 'F', 'L', 'h', 'd' ) ) { qWarning( "FlpImport::tryImport(): not a valid FL project\n" ); return false; } const int header_len = read32LE(); if( header_len != 6 ) { qWarning( "FlpImport::tryImport(): invalid file format\n" ); return false; } const int type = read16LE(); if( type != 0 ) { qWarning( "FlpImport::tryImport(): type %d format is not " "supported\n", type ); return false; } p.numChannels = read16LE(); if( p.numChannels < 1 || p.numChannels > 1000 ) { qWarning( "FlpImport::tryImport(): invalid number of channels " "(%d)\n", p.numChannels ); return false; } const int ppq = read16LE(); if( ppq < 0 ) { qWarning( "FlpImport::tryImport(): invalid ppq\n" ); return false; } QProgressDialog progressDialog( trackContainer::tr( "Importing FLP-file..." ), trackContainer::tr( "Cancel" ), 0, p.numChannels ); progressDialog.setWindowTitle( trackContainer::tr( "Please wait..." ) ); progressDialog.show(); bool valid = false; // search for FLdt chunk while( 1 ) { Sint32 id = readID(); const int len = read32LE(); if( file().atEnd() ) { qWarning( "FlpImport::tryImport(): unexpected " "end of file\n" ); return false; } if( len < 0 || len >= 0x10000000 ) { qWarning( "FlpImport::tryImport(): invalid " "chunk length %d\n", len ); return false; } if( id == makeID( 'F', 'L', 'd', 't' ) ) { valid = true; break; } skip( len ); } if( valid == false ) { return false; } for( int i = 0; i < p.numChannels; ++i ) { p.channels += FL_Channel(); } qDebug( "channels: %d\n", p.numChannels ); char * text = NULL; int text_len = 0; FL_Plugin::PluginTypes last_plugin_type = FL_Plugin::UnknownPlugin; int cur_channel = -1; const bool is_journ = engine::projectJournal()->isJournalling(); engine::projectJournal()->setJournalling( false ); while( file().atEnd() == false ) { FLP_Events ev = static_cast<FLP_Events>( readByte() ); Uint32 data = readByte(); if( ev >= FLP_Word && ev < FLP_Text ) { data = data | ( readByte() << 8 ); } if( ev >= FLP_Int && ev < FLP_Text ) { data = data | ( readByte() << 16 ); data = data | ( readByte() << 24 ); } if( ev >= FLP_Text ) { text_len = data & 0x7F; Uint8 shift = 0; while( data & 0x80 ) { data = readByte(); text_len = text_len | ( ( data & 0x7F ) << ( shift += 7 ) ); } delete[] text; text = new char[text_len+1]; if( readBlock( text, text_len ) <= 0 ) { qWarning( "could not read string (len: %d)\n", text_len ); } text[text_len] = 0; } const unsigned char * puc = (const unsigned char*) text; const int * pi = (const int *) text; FL_Channel * cc = cur_channel >= 0 ? &p.channels[cur_channel] : NULL; switch( ev ) { // BYTE EVENTS case FLP_Byte: qDebug( "undefined byte %d\n", data ); break; case FLP_NoteOn: qDebug( "note on: %d\n", data ); // data = pos how to handle? break; case FLP_Vol: qDebug( "vol %d\n", data ); break; case FLP_Pan: qDebug( "pan %d\n", data ); break; case FLP_LoopActive: qDebug( "active loop: %d\n", data ); break; case FLP_ShowInfo: qDebug( "show info: %d\n", data ); break; case FLP_Shuffle: qDebug( "shuffle: %d\n", data ); break; case FLP_MainVol: p.mainVolume = data * 100 / 128; break; case FLP_PatLength: qDebug( "pattern length: %d\n", data ); break; case FLP_BlockLength: qDebug( "block length: %d\n", data ); break; case FLP_UseLoopPoints: cc->sampleUseLoopPoints = true; break; case FLP_LoopType: qDebug( "loop type: %d\n", data ); break; case FLP_ChanType: qDebug( "channel type: %d\n", data ); if( cc ) { switch( data ) { case 0: cc->pluginType = FL_Plugin::Sampler; break; case 1: cc->pluginType = FL_Plugin::TS404; break; // case 2: cc->pluginType = FL_Plugin::Fruity_3x_Osc; break; case 3: cc->pluginType = FL_Plugin::Layer; break; default: break; } } break; case FLP_MixSliceNum: cc->fxChannel = data+1; break; case FLP_EffectChannelMuted: if( p.currentEffectChannel <= NumFLFxChannels ) { p.effectChannels[p.currentEffectChannel].isMuted = ( data & 0x08 ) > 0 ? false : true; } break; // WORD EVENTS case FLP_NewChan: cur_channel = data; qDebug( "new channel: %d\n", data ); break; case FLP_NewPat: p.currentPattern = data - 1; if( p.currentPattern > p.maxPatterns ) { p.maxPatterns = p.currentPattern; } break; case FLP_Tempo: p.tempo = data; break; case FLP_CurrentPatNum: p.activeEditPattern = data; break; case FLP_FX: qDebug( "FX: %d\n", data ); break; case FLP_Fade_Stereo: if( data & 0x02 ) { cc->sampleReversed = true; } else if( data & 0x100 ) { cc->sampleReverseStereo = true; } qDebug( "fade stereo: %d\n", data ); break; case FLP_CutOff: qDebug( "cutoff (sample): %d\n", data ); break; case FLP_PreAmp: cc->sampleAmp = 100 + data * 100 / 256; break; case FLP_Decay: qDebug( "decay (sample): %d\n", data ); break; case FLP_Attack: qDebug( "attack (sample): %d\n", data ); break; case FLP_MainPitch: p.mainPitch = data; break; case FLP_Resonance: qDebug( "reso (sample): %d\n", data ); break; case FLP_LoopBar: qDebug( "loop bar: %d\n", data ); break; case FLP_StDel: qDebug( "stdel (delay?): %d\n", data ); break; case FLP_FX3: qDebug( "FX 3: %d\n", data ); break; case FLP_ShiftDelay: qDebug( "shift delay: %d\n", data ); break; case FLP_Dot: cc->dots.push_back( ( data & 0xff ) + ( p.currentPattern << 8 ) ); break; case FLP_LayerChans: p.channels[data].layerParent = cur_channel; // DWORD EVENTS case FLP_Color: cc->color = data; break; case FLP_PlayListItem: { FL_PlayListItem i; i.position = ( data & 0xffff ) * DefaultTicksPerTact; i.length = DefaultTicksPerTact; i.pattern = ( data >> 16 ) - 1; p.playListItems.push_back( i ); if( i.pattern > p.maxPatterns ) { p.maxPatterns = i.pattern; } break; } case FLP_FXSine: qDebug( "fx sine: %d\n", data ); break; case FLP_CutCutBy: qDebug( "cut cut by: %d\n", data ); break; case FLP_MiddleNote: cc->baseNote = data+9; break; case FLP_DelayReso: qDebug( "delay resonance: %d\n", data ); break; case FLP_Reverb: qDebug( "reverb (sample): %d\n", data ); break; case FLP_IntStretch: qDebug( "int stretch (sample): %d\n", data ); break; // TEXT EVENTS case FLP_Text_ChanName: cc->name = text; break; case FLP_Text_PatName: p.patternNames[p.currentPattern] = text; break; case FLP_Text_CommentRTF: { QByteArray ba( text, text_len ); QBuffer buf( &ba ); buf.open( QBuffer::ReadOnly ); lineno = 0; attr_clear_all(); op = html_init(); hash_init(); Word * word = word_read( &buf ); QString out; word_print( word, out ); word_free( word ); op_free( op ); p.projectNotes = out; outstring = ""; break; } case FLP_Text_Title: p.projectTitle = text; break; case FLP_Text_SampleFileName: { QString f = ""; QString f_name = text; /* if( f.mid( 1, 11 ) == "Instruments" ) { f = "\\Patches\\Packs" + f.mid( 12 ); }*/ bool foundFile = false; f_name.replace( '\\', QDir::separator() ); if( QFileInfo( configManager::inst()->flDir() + "/Data/" ).exists() ) { f = configManager::inst()->flDir() + "/Data/" + f_name; foundFile = QFileInfo( f ).exists(); } else { // FL 3 compat f = configManager::inst()->flDir() + "/Samples/" + f_name; foundFile = QFileInfo( f ).exists(); } if( ! foundFile ) { // look in same directory as .flp file f = m_fileBase + "/" + QFileInfo( f_name ).fileName(); printf("looking in %s for samples\n", qPrintable(f)); foundFile = QFileInfo( f ).exists(); } cc->sampleFileName = f; break; } case FLP_Text_Version: { qDebug( "FLP version: %s\n", text ); p.versionString = text; QStringList l = p.versionString.split( '.' ); p.version = ( l[0].toInt() << 8 ) + ( l[1].toInt() << 4 ) + ( l[2].toInt() << 0 ); if( p.version >= 0x600 ) { p.versionSpecificFactor = 100; } break; } case FLP_Text_PluginName: if( mappedPluginTypes. contains( QString( text ).toLower() ) ) { const FL_Plugin::PluginTypes t = static_cast<FL_Plugin::PluginTypes>( mappedPluginTypes[QString( text ).toLower()] ); if( t > FL_Plugin::EffectPlugin ) { qDebug( "recognized new effect %s\n", text ); p.effects.push_back( FL_Effect( t ) ); } else if( cc ) { qDebug( "recognized new plugin %s\n", text ); cc->pluginType = t; } last_plugin_type = t; } else { qDebug( "unsupported plugin: %s!\n", text ); } break; case FLP_Text_EffectChanName: ++p.currentEffectChannel; if( p.currentEffectChannel <= NumFLFxChannels ) { p.effectChannels[p.currentEffectChannel].name = text; } break; case FLP_Text_Delay: qDebug( "delay data: " ); // pi[1] seems to be volume or similiar and // needs to be divided // by p.versionSpecificFactor dump_mem( text, text_len ); break; case FLP_Text_TS404Params: if( cc && cc->pluginType == FL_Plugin::UnknownPlugin && cc->pluginSettings == NULL ) { cc->pluginSettings = new char[text_len]; memcpy( cc->pluginSettings, text, text_len ); cc->pluginSettingsLength = text_len; cc->pluginType = FL_Plugin::TS404; } break; case FLP_Text_NewPlugin: if( last_plugin_type > FL_Plugin::EffectPlugin ) { FL_Effect * e = &p.effects.last(); e->fxChannel = puc[0]; e->fxPos = puc[4]; qDebug( "new effect: " ); } else { qDebug( "new plugin: " ); } dump_mem( text, text_len ); break; case FLP_Text_PluginParams: if( cc && cc->pluginSettings == NULL ) { cc->pluginSettings = new char[text_len]; memcpy( cc->pluginSettings, text, text_len ); cc->pluginSettingsLength = text_len; } qDebug( "plugin params: " ); dump_mem( text, text_len ); break; case FLP_Text_ChanParams: cc->arpDir = mappedArpDir[pi[10]]; cc->arpRange = pi[11]; cc->selectedArp = pi[12]; if( cc->selectedArp < 8 ) { const int mappedArps[] = { 0, 1, 5, 6, 2, 3, 4 } ; cc->selectedArp = mappedArps[cc->selectedArp]; } cc->arpTime = ( ( pi[13]+1 ) * p.tempo ) / ( 4*16 ) + 1; cc->arpGate = ( pi[14] * 100.0f ) / 48.0f; cc->arpEnabled = pi[10] > 0; qDebug( "channel params: " ); dump_mem( text, text_len ); break; case FLP_Text_EnvLfoParams: { const float scaling = 1.0 / 65536.0f; FL_Channel_Envelope e; switch( cc->envelopes.size() ) { case 1: e.target = InstrumentSoundShaping::Volume; break; case 2: e.target = InstrumentSoundShaping::Cut; break; case 3: e.target = InstrumentSoundShaping::Resonance; break; default: e.target = InstrumentSoundShaping::NumTargets; break; } e.predelay = pi[2] * scaling; e.attack = pi[3] * scaling; e.hold = pi[4] * scaling; e.decay = pi[5] * scaling; e.sustain = 1-pi[6] / 128.0f; e.release = pi[7] * scaling; if( e.target == InstrumentSoundShaping::Volume ) { e.amount = pi[1] ? 1 : 0; } else { e.amount = pi[8] / 128.0f; } // e.lfoAmount = pi[11] / 128.0f; cc->envelopes.push_back( e ); qDebug( "envelope and lfo params:\n" ); dump_mem( text, text_len ); break; } case FLP_Text_BasicChanParams: cc->volume = ( pi[1] / p.versionSpecificFactor ) * 100 / 128; cc->panning = ( pi[0] / p.versionSpecificFactor ) * 200 / 128 - PanningRight; if( text_len > 12 ) { cc->filterType = mappedFilter[puc[20]]; cc->filterCut = puc[12] / ( 255.0f * 2.5f ); cc->filterRes = 0.01f + puc[16] / ( 256.0f * 2 ); cc->filterEnabled = ( puc[13] == 0 ); if( puc[20] >= 6 ) { cc->filterCut *= 0.5f; } } qDebug( "basic chan params: " ); dump_mem( text, text_len ); break; case FLP_Text_OldFilterParams: cc->filterType = mappedFilter[puc[8]]; cc->filterCut = puc[0] / ( 255.0f * 2.5 ); cc->filterRes = 0.1f + puc[4] / ( 256.0f * 2 ); cc->filterEnabled = ( puc[1] == 0 ); if( puc[8] >= 6 ) { cc->filterCut *= 0.5; } qDebug( "old filter params: " ); dump_mem( text, text_len ); break; case FLP_Text_AutomationData: { const int bpae = 12; const int imax = text_len / bpae; qDebug( "automation data (%d items)\n", imax ); for( int i = 0; i < imax; ++i ) { FL_Automation a; a.pos = pi[3*i+0] / ( 4*ppq / DefaultTicksPerTact ); a.value = pi[3*i+2]; a.channel = pi[3*i+1] >> 16; a.control = pi[3*i+1] & 0xffff; if( a.channel >= 0 && a.channel < p.numChannels ) { qDebug( "add channel %d at %d val %d control:%d\n", a.channel, a.pos, a.value, a.control ); p.channels[a.channel].automationData += a; } // dump_mem( text+i*bpae, bpae ); } break; } case FLP_Text_PatternNotes: { //dump_mem( text, text_len ); const int bpn = 20; const int imax = ( text_len + bpn - 1 ) / bpn; for( int i = 0; i < imax; ++i ) { int ch = *( puc + i*bpn + 6 ); int pan = *( puc + i*bpn + 16 ); int vol = *( puc + i*bpn + 17 ); int pos = *( (int *)( puc + i*bpn ) ); int key = *( puc + i*bpn + 12 ); int len = *( (int*)( puc + i*bpn + 8 ) ); pos /= (4*ppq) / DefaultTicksPerTact; len /= (4*ppq) / DefaultTicksPerTact; note n( len, pos, key, vol * 100 / 128, pan*200 / 128 - 100 ); if( ch < p.numChannels ) { p.channels[ch].notes.push_back( qMakePair( p.currentPattern, n ) ); } else { qDebug( "invalid " ); } qDebug( "note: " ); dump_mem( text+i*bpn, bpn ); } break; } case FLP_Text_ChanGroupName: qDebug( "channel group name: %s\n", text ); break; // case 216: pi[2] /= p.versionSpecificFactor // case 229: pi[1] /= p.versionSpecificFactor case 225: { enum FLP_EffectParams { EffectParamVolume = 0x1fc0 } ; const int bpi = 12; const int imax = text_len / bpi; for( int i = 0; i < imax; ++i ) { const int param = pi[i*3+1] & 0xffff; const int ch = ( pi[i*3+1] >> 22 ) & 0x7f; if( ch < 0 || ch > NumFLFxChannels ) { continue; } const int val = pi[i*3+2]; if( param == EffectParamVolume ) { p.effectChannels[ch].volume = ( val / p.versionSpecificFactor ) * 100 / 128; } else { qDebug( "FX-ch: %d param: %x value:%x\n", ch, param, val ); } } break; } case 233: // playlist items { const int bpi = 28; const int imax = text_len / bpi; for( int i = 0; i < imax; ++i ) { const int pos = pi[i*bpi/sizeof(int)+0] / ( (4*ppq) / DefaultTicksPerTact ); const int len = pi[i*bpi/sizeof(int)+2] / ( (4*ppq) / DefaultTicksPerTact ); const int pat = pi[i*bpi/sizeof(int)+3] & 0xfff; if( pat > 2146 && pat <= 2278 ) // whatever these magic numbers are for... { FL_PlayListItem i; i.position = pos; i.length = len; i.pattern = 2278 - pat; p.playListItems += i; } else { qDebug( "unknown playlist item: " ); dump_mem( text+i*bpi, bpi ); } } break; } default: if( ev >= FLP_Text ) { qDebug( "!! unhandled text (ev: %d, len: %d): ", ev, text_len ); dump_mem( text, text_len ); } else { qDebug( "!! handling of FLP-event %d not implemented yet " "(data=%d).\n", ev, data ); } break; } } // now create a project from FL_Project data structure engine::getSong()->clearProject(); // configure the mixer for( int i=0; i<NumFLFxChannels; ++i ) { engine::fxMixer()->createChannel(); } engine::fxMixerView()->refreshDisplay(); // set global parameters engine::getSong()->setMasterVolume( p.mainVolume ); engine::getSong()->setMasterPitch( p.mainPitch ); engine::getSong()->setTempo( p.tempo ); // set project notes engine::getProjectNotes()->setText( p.projectNotes ); progressDialog.setMaximum( p.maxPatterns + p.channels.size() + p.effects.size() ); int cur_progress = 0; // create BB tracks QList<bbTrack *> bb_tracks; QList<InstrumentTrack *> i_tracks; while( engine::getBBTrackContainer()->numOfBBs() <= p.maxPatterns ) { const int cur_pat = bb_tracks.size(); bbTrack * bbt = dynamic_cast<bbTrack *>( track::create( track::BBTrack, engine::getSong() ) ); if( p.patternNames.contains( cur_pat ) ) { bbt->setName( p.patternNames[cur_pat] ); } bb_tracks += bbt; progressDialog.setValue( ++cur_progress ); qApp->processEvents(); } // create instrument-track for each channel for( QList<FL_Channel>::Iterator it = p.channels.begin(); it != p.channels.end(); ++it ) { InstrumentTrack * t = dynamic_cast<InstrumentTrack *>( track::create( track::InstrumentTrack, engine::getBBTrackContainer() ) ); engine::getBBTrackContainer()->updateAfterTrackAdd(); i_tracks.push_back( t ); switch( it->pluginType ) { case FL_Plugin::Fruity_3x_Osc: it->instrumentPlugin = t->loadInstrument( "tripleoscillator" ); break; case FL_Plugin::Plucked: it->instrumentPlugin = t->loadInstrument( "vibedstrings" ); break; case FL_Plugin::FruitKick: it->instrumentPlugin = t->loadInstrument( "kicker" ); break; case FL_Plugin::TS404: it->instrumentPlugin = t->loadInstrument( "lb302" ); break; case FL_Plugin::FruitySoundfontPlayer: it->instrumentPlugin = t->loadInstrument( "sf2player" ); break; case FL_Plugin::Sampler: case FL_Plugin::UnknownPlugin: default: it->instrumentPlugin = t->loadInstrument( "audiofileprocessor" ); break; } processPluginParams( &( *it ) ); t->setName( it->name ); t->volumeModel()->setValue( it->volume ); t->panningModel()->setValue( it->panning ); t->baseNoteModel()->setValue( it->baseNote ); t->effectChannelModel()->setValue( it->fxChannel ); InstrumentSoundShaping * iss = &t->m_soundShaping; iss->m_filterModel.setValue( it->filterType ); iss->m_filterCutModel.setValue( it->filterCut * ( iss->m_filterCutModel.maxValue() - iss->m_filterCutModel.minValue() ) + iss->m_filterCutModel.minValue() ); iss->m_filterResModel.setValue( it->filterRes * ( iss->m_filterResModel.maxValue() - iss->m_filterResModel.minValue() ) + iss->m_filterResModel.minValue() ); iss->m_filterEnabledModel.setValue( it->filterEnabled ); for( QList<FL_Channel_Envelope>::iterator jt = it->envelopes.begin(); jt != it->envelopes.end(); ++jt ) { if( jt->target != InstrumentSoundShaping::NumTargets ) { EnvelopeAndLfoParameters * elp = iss->m_envLfoParameters[jt->target]; elp->m_predelayModel.setValue( jt->predelay ); elp->m_attackModel.setValue( jt->attack ); elp->m_holdModel.setValue( jt->hold ); elp->m_decayModel.setValue( jt->decay ); elp->m_sustainModel.setValue( jt->sustain ); elp->m_releaseModel.setValue( jt->release ); elp->m_amountModel.setValue( jt->amount ); elp->updateSampleVars(); } } Arpeggiator * arp = &t->m_arpeggiator; arp->m_arpDirectionModel.setValue( it->arpDir ); arp->m_arpRangeModel.setValue( it->arpRange ); arp->m_arpModel.setValue( it->selectedArp ); arp->m_arpTimeModel.setValue( it->arpTime ); arp->m_arpGateModel.setValue( it->arpGate ); arp->m_arpEnabledModel.setValue( it->arpEnabled ); // process all dots for( QList<int>::ConstIterator jt = it->dots.begin(); jt != it->dots.end(); ++jt ) { const int pat = *jt / 256; const int pos = *jt % 256; pattern * p = dynamic_cast<pattern *>( t->getTCO( pat ) ); if( p == NULL ) { continue; } p->setStep( pos, true ); } // TODO: use future layering feature if( it->layerParent >= 0 ) { it->notes += p.channels[it->layerParent].notes; } // process all notes for( FL_Channel::noteVector::ConstIterator jt = it->notes.begin(); jt != it->notes.end(); ++jt ) { const int pat = jt->first; if( pat > 100 ) { continue; } pattern * p = dynamic_cast<pattern *>( t->getTCO( pat ) ); if( p != NULL ) { p->addNote( jt->second, false ); } } // process automation data for( QList<FL_Automation>::ConstIterator jt = it->automationData.begin(); jt != it->automationData.end(); ++jt ) { AutomatableModel * m = NULL; float value = jt->value; bool scale = false; switch( jt->control ) { case FL_Automation::ControlVolume: m = t->volumeModel(); value *= ( 100.0f / 128.0f ) / p.versionSpecificFactor; break; case FL_Automation::ControlPanning: m = t->panningModel(); value = ( value / p.versionSpecificFactor ) *200/128 - PanningRight; break; case FL_Automation::ControlPitch: m = t->pitchModel(); break; case FL_Automation::ControlFXChannel: m = t->effectChannelModel(); value = value*200/128 - PanningRight; break; case FL_Automation::ControlFilterCut: scale = true; m = &t->m_soundShaping.m_filterCutModel; value /= ( 255 * 2.5f ); break; case FL_Automation::ControlFilterRes: scale = true; m = &t->m_soundShaping.m_filterResModel; value = 0.1f + value / ( 256.0f * 2 ); break; case FL_Automation::ControlFilterType: m = &t->m_soundShaping.m_filterModel; value = mappedFilter[jt->value]; break; default: qDebug( "handling automation data of " "control %d not implemented " "yet\n", jt->control ); break; } if( m ) { if( scale ) { value = m->minValue<float>() + value * ( m->maxValue<float>() - m->minValue<float>() ); } AutomationPattern * p = AutomationPattern::globalAutomationPattern( m ); p->putValue( jt->pos, value, false ); } } progressDialog.setValue( ++cur_progress ); qApp->processEvents(); } // process all effects EffectKeyList effKeys; Plugin::DescriptorList pluginDescs; Plugin::getDescriptorsOfAvailPlugins( pluginDescs ); for( Plugin::DescriptorList::ConstIterator it = pluginDescs.begin(); it != pluginDescs.end(); ++it ) { if( it->type != Plugin::Effect ) { continue; } if( it->subPluginFeatures ) { it->subPluginFeatures->listSubPluginKeys( &( *it ), effKeys ); } else { effKeys << EffectKey( &( *it ), it->name ); } } for( int fx_ch = 0; fx_ch <= NumFLFxChannels ; ++fx_ch ) { FxChannel * ch = engine::fxMixer()->effectChannel( fx_ch ); if( !ch ) { continue; } FL_EffectChannel * flch = &p.effectChannels[fx_ch]; if( !flch->name.isEmpty() ) { ch->m_name = flch->name; } ch->m_volumeModel.setValue( flch->volume / 100.0f ); ch->m_muteModel.setValue( flch->isMuted ); } for( QList<FL_Effect>::ConstIterator it = p.effects.begin(); it != p.effects.end(); ++it ) { QString effName; switch( it->pluginType ) { case FL_Plugin::Fruity7BandEq: effName = "C* Eq2x2"; break; case FL_Plugin::FruityBassBoost: effName = "BassBooster"; break; case FL_Plugin::FruityChorus: effName = "TAP Chorus"; break; case FL_Plugin::FruityCompressor: //effName = "C* Compress"; effName = "Fast Lookahead limiter"; break; case FL_Plugin::FruityDelay: case FL_Plugin::FruityDelay2: // effName = "Feedback Delay Line (Maximum Delay 5s)"; break; case FL_Plugin::FruityBloodOverdrive: case FL_Plugin::FruityFastDist: case FL_Plugin::FruitySoftClipper: effName = "C* Clip"; break; case FL_Plugin::FruityFastLP: effName = "Low Pass Filter"; break; case FL_Plugin::FruityPhaser: effName = "C* PhaserI"; break; case FL_Plugin::FruityReeverb: effName = "C* Plate2x2"; break; case FL_Plugin::FruitySpectroman: effName = "Spectrum Analyzer"; break; default: break; } if( effName.isEmpty() || it->fxChannel < 0 || it->fxChannel > NumFLFxChannels ) { continue; } EffectChain * ec = &engine::fxMixer()-> effectChannel( it->fxChannel )->m_fxChain; qDebug( "adding %s to %d\n", effName.toUtf8().constData(), it->fxChannel ); for( EffectKeyList::Iterator jt = effKeys.begin(); jt != effKeys.end(); ++jt ) { if( QString( jt->desc->displayName ).contains( effName ) || ( jt->desc->subPluginFeatures != NULL && jt->name.contains( effName ) ) ) { qDebug( "instantiate %s\n", jt->desc->name ); ::Effect * e = Effect::instantiate( jt->desc->name, ec, &( *jt ) ); ec->appendEffect( e ); ec->setEnabled( true ); break; } } progressDialog.setValue( ++cur_progress ); qApp->processEvents(); } // process all playlist-items for( QList<FL_PlayListItem>::ConstIterator it = p.playListItems.begin(); it != p.playListItems.end(); ++it ) { if( it->pattern > p.maxPatterns ) { continue; } trackContentObject * tco = bb_tracks[it->pattern]->createTCO( midiTime() ); tco->movePosition( it->position ); if( it->length != DefaultTicksPerTact ) { tco->changeLength( it->length ); } } // set current pattern if( p.activeEditPattern < engine::getBBTrackContainer()->numOfBBs() ) { engine::getBBTrackContainer()->setCurrentBB( p.activeEditPattern ); } // restore journalling settings engine::projectJournal()->setJournalling( is_journ ); return true; }
bool MidiImport::readSMF( TrackContainer* tc ) { QString filename = file().fileName(); closeFile(); const int preTrackSteps = 2; QProgressDialog pd( TrackContainer::tr( "Importing MIDI-file..." ), TrackContainer::tr( "Cancel" ), 0, preTrackSteps, gui->mainWindow() ); pd.setWindowTitle( TrackContainer::tr( "Please wait..." ) ); pd.setWindowModality(Qt::WindowModal); pd.setMinimumDuration( 0 ); pd.setValue( 0 ); Alg_seq_ptr seq = new Alg_seq(filename.toLocal8Bit(), true); seq->convert_to_beats(); pd.setMaximum( seq->tracks() + preTrackSteps ); pd.setValue( 1 ); // 128 CC + Pitch Bend smfMidiCC ccs[129]; smfMidiChannel chs[256]; MeterModel & timeSigMM = Engine::getSong()->getTimeSigModel(); AutomationPattern * timeSigNumeratorPat = AutomationPattern::globalAutomationPattern( &timeSigMM.numeratorModel() ); AutomationPattern * timeSigDenominatorPat = AutomationPattern::globalAutomationPattern( &timeSigMM.denominatorModel() ); // TODO: adjust these to Time.Sig changes double beatsPerTact = 4; double ticksPerBeat = DefaultTicksPerTact / beatsPerTact; // Time-sig changes Alg_time_sigs * timeSigs = &seq->time_sig; for( int s = 0; s < timeSigs->length(); ++s ) { Alg_time_sig timeSig = (*timeSigs)[s]; // Initial timeSig, set song-default value if(/* timeSig.beat == 0*/ true ) { // TODO set song-global default value printf("Another timesig at %f\n", timeSig.beat); timeSigNumeratorPat->putValue( timeSig.beat*ticksPerBeat, timeSig.num ); timeSigDenominatorPat->putValue( timeSig.beat*ticksPerBeat, timeSig.den ); } else { } } pd.setValue( 2 ); // Tempo stuff AutomationPattern * tap = tc->tempoAutomationPattern(); if( tap ) { tap->clear(); Alg_time_map * timeMap = seq->get_time_map(); Alg_beats & beats = timeMap->beats; for( int i = 0; i < beats.len - 1; i++ ) { Alg_beat_ptr b = &(beats[i]); double tempo = ( beats[i + 1].beat - b->beat ) / ( beats[i + 1].time - beats[i].time ); tap->putValue( b->beat * ticksPerBeat, tempo * 60.0 ); } if( timeMap->last_tempo_flag ) { Alg_beat_ptr b = &( beats[beats.len - 1] ); tap->putValue( b->beat * ticksPerBeat, timeMap->last_tempo * 60.0 ); } } // Song events for( int e = 0; e < seq->length(); ++e ) { Alg_event_ptr evt = (*seq)[e]; if( evt->is_update() ) { printf("Unhandled SONG update: %d %f %s\n", evt->get_type_code(), evt->time, evt->get_attribute() ); } } // Tracks for( int t = 0; t < seq->tracks(); ++t ) { QString trackName = QString( tr( "Track" ) + " %1" ).arg( t ); Alg_track_ptr trk = seq->track( t ); pd.setValue( t + preTrackSteps ); for( int c = 0; c < 129; c++ ) { ccs[c].clear(); } // Now look at events for( int e = 0; e < trk->length(); ++e ) { Alg_event_ptr evt = (*trk)[e]; if( evt->chan == -1 ) { bool handled = false; if( evt->is_update() ) { QString attr = evt->get_attribute(); if( attr == "tracknames" && evt->get_update_type() == 's' ) { trackName = evt->get_string_value(); handled = true; } } if( !handled ) { // Write debug output printf("MISSING GLOBAL HANDLER\n"); printf(" Chn: %d, Type Code: %d, Time: %f", (int) evt->chan, evt->get_type_code(), evt->time ); if ( evt->is_update() ) { printf( ", Update Type: %s", evt->get_attribute() ); if ( evt->get_update_type() == 'a' ) { printf( ", Atom: %s", evt->get_atom_value() ); } } printf( "\n" ); } } else if( evt->is_note() && evt->chan < 256 ) { smfMidiChannel * ch = chs[evt->chan].create( tc, trackName ); Alg_note_ptr noteEvt = dynamic_cast<Alg_note_ptr>( evt ); int ticks = noteEvt->get_duration() * ticksPerBeat; Note n( (ticks < 1 ? 1 : ticks ), noteEvt->get_start_time() * ticksPerBeat, noteEvt->get_identifier() - 12, noteEvt->get_loud()); ch->addNote( n ); } else if( evt->is_update() ) { smfMidiChannel * ch = chs[evt->chan].create( tc, trackName ); double time = evt->time*ticksPerBeat; QString update( evt->get_attribute() ); if( update == "programi" ) { long prog = evt->get_integer_value(); if( ch->isSF2 ) { ch->it_inst->childModel( "bank" )->setValue( 0 ); ch->it_inst->childModel( "patch" )->setValue( prog ); } else { const QString num = QString::number( prog ); const QString filter = QString().fill( '0', 3 - num.length() ) + num + "*.pat"; const QString dir = "/usr/share/midi/" "freepats/Tone_000/"; const QStringList files = QDir( dir ). entryList( QStringList( filter ) ); if( ch->it_inst && !files.empty() ) { ch->it_inst->loadFile( dir+files.front() ); } } } else if( update.startsWith( "control" ) || update == "bendr" ) { int ccid = update.mid( 7, update.length()-8 ).toInt(); if( update == "bendr" ) { ccid = 128; } if( ccid <= 128 ) { double cc = evt->get_real_value(); AutomatableModel * objModel = NULL; switch( ccid ) { case 0: if( ch->isSF2 && ch->it_inst ) { objModel = ch->it_inst->childModel( "bank" ); printf("BANK SELECT %f %d\n", cc, (int)(cc*127.0)); cc *= 127.0f; } break; case 7: objModel = ch->it->volumeModel(); cc *= 100.0f; break; case 10: objModel = ch->it->panningModel(); cc = cc * 200.f - 100.0f; break; case 128: objModel = ch->it->pitchModel(); cc = cc * 100.0f; break; default: //TODO: something useful for other CCs break; } if( objModel ) { if( time == 0 && objModel ) { objModel->setInitValue( cc ); } else { if( ccs[ccid].at == NULL ) { ccs[ccid].create( tc, trackName + " > " + ( objModel != NULL ? objModel->displayName() : QString("CC %1").arg(ccid) ) ); } ccs[ccid].putValue( time, objModel, cc ); } } } } else { printf("Unhandled update: %d %d %f %s\n", (int) evt->chan, evt->get_type_code(), evt->time, evt->get_attribute() ); } } } } delete seq; for( int c=0; c < 256; ++c ) { if( !chs[c].hasNotes && chs[c].it ) { printf(" Should remove empty track\n"); // must delete trackView first - but where is it? //tc->removeTrack( chs[c].it ); //it->deleteLater(); } } // Set channel 10 to drums as per General MIDI's orders if( chs[9].hasNotes && chs[9].it_inst && chs[9].isSF2 ) { // AFAIK, 128 should be the standard bank for drums in SF2. // If not, this has to be made configurable. chs[9].it_inst->childModel( "bank" )->setValue( 128 ); chs[9].it_inst->childModel( "patch" )->setValue( 0 ); } return true; }