X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstaff-performer.cc;h=6d0595f54b43f959caa1b90688aaf2df8293a90b;hb=1ecdd56060e34a00b2be6b38029b286a601ea6f8;hp=a1efbfcebcfcab1cab3427d989c542a1b8c7f07a;hpb=bdabe71a2bdda41b64c0000da6023771701f4def;p=lilypond.git diff --git a/lily/staff-performer.cc b/lily/staff-performer.cc index a1efbfcebc..6d0595f54b 100644 --- a/lily/staff-performer.cc +++ b/lily/staff-performer.cc @@ -1,118 +1,307 @@ /* - staff-performer.cc -- implement Staff_performer + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2011 Jan Nieuwenhuizen - (c) 1997 Jan Nieuwenhuizen - */ + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . +*/ + +#include -#include "staff-performer.hh" -#include "translator.hh" -#include "input-translator.hh" -#include "debug.hh" -#include "midi-def.hh" #include "audio-column.hh" #include "audio-item.hh" -#include "midi-item.hh" -#include "midi-stream.hh" -#include "string.hh" -#include "string-convert.hh" +#include "audio-staff.hh" +#include "context.hh" +#include "international.hh" +#include "performer-group.hh" +#include "warn.hh" + +/* Perform a staff. Individual notes should have their instrument + (staff-wide) set, so we override play_element () +*/ +class Staff_performer : public Performer +{ +public: + TRANSLATOR_DECLARATIONS (Staff_performer); + ~Staff_performer (); + +protected: + virtual void acknowledge_audio_element (Audio_element_info info); + virtual void finalize (); + virtual void initialize (); + void process_music (); + void stop_translation_timestep (); + +private: + string new_instrument_string (); + void set_instrument_name (string voice); + void set_instrument (int channel, string voice); + int get_channel (string instrument); + Audio_staff *get_audio_staff (string voice); + Audio_staff *new_audio_staff (string voice); + Audio_dynamic *get_dynamic (string voice); + + string instrument_string_; + int channel_; + Audio_instrument *instrument_; + Audio_text *instrument_name_; + Audio_text *name_; + Audio_tempo *tempo_; + map staff_map_; + map channel_map_; + map dynamic_map_; + // Would prefer to have the following two items be + // members of the containing class Performance, + // so they can be reset for each new midi file output. + static map static_channel_map_; + static int channel_count_; + // For now, ask the last Staff_performer clean up during its finalize method + static int staff_performer_count_; +}; + +map Staff_performer::static_channel_map_; +int Staff_performer::channel_count_ = 0; +int Staff_performer::staff_performer_count_ = 0; + +#include "translator.icc" + +ADD_TRANSLATOR (Staff_performer, + /* doc */ + "", + + /* create */ + "", + /* read */ + "", -IMPLEMENT_IS_TYPE_B1(Staff_performer,Performer_group_performer); -ADD_THIS_PERFORMER(Staff_performer); + /* write */ + ""); -Staff_performer::Staff_performer() +Staff_performer::Staff_performer () + : channel_ (-1), + instrument_ (0), + instrument_name_ (0), + name_ (0), + tempo_ (0) { - midi_track_p_ = new Midi_track; } -Staff_performer::~Staff_performer() +Staff_performer::~Staff_performer () { - delete midi_track_p_; } void -Staff_performer::do_creation_processing() +Staff_performer::initialize () { + ++staff_performer_count_; } -void -Staff_performer::do_removal_processing() +Audio_staff * +Staff_performer::new_audio_staff (string voice) +{ + Audio_staff *audio_staff = new Audio_staff; + audio_staff->merge_unisons_ + = to_boolean (get_property ("midiMergeUnisons")); + string track_name = context ()->id_string () + ":" + voice; + if (track_name != ":") + { + name_ = new Audio_text (Audio_text::TRACK_NAME, context ()->id_string () + + ":" + voice); + audio_staff->add_audio_item (name_); + announce_element (Audio_element_info (name_, 0)); + } + announce_element (Audio_element_info (audio_staff, 0)); + staff_map_[voice] = audio_staff; + if (!instrument_string_.empty ()) + set_instrument (channel_, voice); + return audio_staff; +} + +Audio_staff * +Staff_performer::get_audio_staff (string voice) { - header(); - - Moment midi_mom = 0; - for ( PCursor i( audio_item_p_list_ ); i.ok(); i++ ) { - Audio_item* l = *i; - Moment mom = l->audio_column_l_->at_mom(); - Moment delta_t = mom - midi_mom_ ; - midi_mom_ += delta_t; - Midi_item* p = l->midi_item_p(); - p->channel_i_ = track_i_; - midi_track_p_->add( delta_t, p ); - delete p; + SCM channel_mapping = get_property ("midiChannelMapping"); + if (channel_mapping != ly_symbol2scm ("instrument") + && staff_map_.size ()) + return staff_map_.begin ()->second; + + map::const_iterator i = staff_map_.find (voice); + if (i != staff_map_.end ()) + return i->second; + map::const_iterator e = staff_map_.find (""); + if (staff_map_.size () == 1 && e != staff_map_.end ()) + { + staff_map_[voice] = e->second; + return e->second; } + return new_audio_staff (voice); +} + +Audio_dynamic * +Staff_performer::get_dynamic (string voice) +{ + map::const_iterator i = dynamic_map_.find (voice); + if (i != dynamic_map_.end ()) + return i->second; + return 0; +} - Performer::play( midi_track_p_ ); +void +Staff_performer::process_music () +{ } void -Staff_performer::header() +Staff_performer::set_instrument (int channel, string voice) { - // set track name - Midi_text track_name( Midi_text::TRACK_NAME, instrument_str() ); - midi_track_p_->add( Moment( 0 ), &track_name ); - - // set instrument description - Midi_text instrument_name( Midi_text::INSTRUMENT_NAME, instrument_str() ); - midi_track_p_->add( Moment( 0 ), &instrument_name ); - - // set instrument :-) - // lieve wendy, nu heb je mijn track_i_ / get_staff_i weggehaald... - // zie ook note-performer: ugh - // ugh, need to know channel (===track===staff) too - int channel_i = track_i_; - Midi_instrument instrument( channel_i, instrument_str() ); - midi_track_p_->add( Moment( 0 ), &instrument ); - - Midi_tempo midi_tempo( get_tempo_i() ); - midi_track_p_->add( Moment( 0 ), &midi_tempo ); + instrument_ = new Audio_instrument (instrument_string_); + instrument_->channel_ = channel; + announce_element (Audio_element_info (instrument_, 0)); + Audio_staff *audio_staff = get_audio_staff (voice); + audio_staff->add_audio_item (instrument_); + SCM proc = ly_lily_module_constant ("percussion?"); + SCM drums = scm_call_1 (proc, ly_symbol2scm (instrument_string_.c_str ())); + audio_staff->percussion_ = (drums == SCM_BOOL_T); } -String -Staff_performer::instrument_str() -{ - return Translator::id_str_; +void +Staff_performer::set_instrument_name (string voice) +{ + instrument_name_ = new Audio_text (Audio_text::INSTRUMENT_NAME, + instrument_string_); + announce_element (Audio_element_info (instrument_name_, 0)); + get_audio_staff (voice)->add_audio_item (instrument_name_); } -void -Staff_performer::play( Audio_item* p ) +void +Staff_performer::stop_translation_timestep () { - audio_item_p_list_.bottom().add( p ); - Performer::play( p ); + name_ = 0; + tempo_ = 0; + instrument_name_ = 0; + instrument_ = 0; } -// huh? -void -Staff_performer::play( Midi_item* p ) +void +Staff_performer::finalize () { - Performer::play( p ); + staff_map_.clear (); + channel_map_.clear (); + if (staff_performer_count_) + --staff_performer_count_; + if (0 == staff_performer_count_) + { + static_channel_map_.clear (); + channel_count_ = 0; + } } +string +Staff_performer::new_instrument_string () +{ + // mustn't ask Score for instrument: it will return piano! + SCM minstr = get_property ("midiInstrument"); + + if (!scm_is_string (minstr) + || ly_scm2string (minstr) == instrument_string_) + return ""; + + instrument_string_ = ly_scm2string (minstr); + + return instrument_string_; +} -// int -Staff_performer::get_track_i() const +Staff_performer::get_channel (string instrument) { - return track_i_; + SCM channel_mapping = get_property ("midiChannelMapping"); + map& channel_map + = (channel_mapping != ly_symbol2scm ("instrument")) + ? channel_map_ + : static_channel_map_; + + if (channel_mapping == ly_symbol2scm ("staff") + && channel_ >= 0) + return channel_; + + map::const_iterator i = channel_map.find (instrument); + if (i != channel_map.end ()) + return i->second; + + int channel = (channel_mapping == ly_symbol2scm ("staff")) + ? channel_count_++ + : channel_map.size (); + + /* MIDI players tend to ignore instrument settings on channel + 10, the percussion channel. */ + if (channel % 16 == 9) + { + channel_map["percussion"] = channel++; + channel_count_++; + } + + if (channel > 15) + { + warning (_ ("MIDI channel wrapped around")); + warning (_ ("remapping modulo 16")); + channel = channel % 16; + } + + channel_map[instrument] = channel; + return channel; } void -Staff_performer::set_track( int& track_i_r ) +Staff_performer::acknowledge_audio_element (Audio_element_info inf) { - track_i_ = track_i_r++; + if (Audio_item *ai = dynamic_cast (inf.elem_)) + { + /* map each context (voice) to its own track */ + Context *c = inf.origin_contexts (this)[0]; + string voice; + if (c->is_alias (ly_symbol2scm ("Voice"))) + voice = c->id_string (); + SCM channel_mapping = get_property ("midiChannelMapping"); + string str = new_instrument_string (); + if (channel_mapping != ly_symbol2scm ("instrument")) + channel_ = get_channel (voice); + else if (channel_ < 0 && str.empty ()) + channel_ = get_channel (str); + if (str.length ()) + { + if (channel_mapping != ly_symbol2scm ("voice")) + channel_ = get_channel (str); + set_instrument (channel_, voice); + set_instrument_name (voice); + } + ai->channel_ = channel_; + bool encode_dynamics_as_velocity_ = true; + if (encode_dynamics_as_velocity_) + { + if (Audio_dynamic *d = dynamic_cast (inf.elem_)) + { + dynamic_map_[voice] = d; + // Output volume as velocity: must disable Midi_dynamic output + d->silent_ = true; + } + if (Audio_dynamic *d = get_dynamic (voice)) + if (Audio_note *n = dynamic_cast (inf.elem_)) + n->dynamic_ = d; + } + Audio_staff *audio_staff = get_audio_staff (voice); + audio_staff->add_audio_item (ai); + } } -//