libs/ardour/session_time.cc

   1
   2 /*
   3   Copyright (C) 1999-2002 Paul Davis
   4
   5   This program is free software; you can redistribute it and/or modify
   6   it under the terms of the GNU General Public License as published by
   7   the Free Software Foundation; either version 2 of the License, or
   8   (at your option) any later version.
   9
  10   This program is distributed in the hope that it will be useful,
  11   but WITHOUT ANY WARRANTY; without even the implied warranty of
  12   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13   GNU General Public License for more details.
  14
  15   You should have received a copy of the GNU General Public License
  16   along with this program; if not, write to the Free Software
  17   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18
  19 */
  20
  21 #ifdef WAF_BUILD
  22 #include "libardour-config.h"
  23 #endif
  24
  25 #include <iostream>
  26 #include <cmath>
  27 #include <unistd.h>
  28
  29 #include "ardour/timestamps.h"
  30
  31 #include "pbd/error.h"
  32 #include "pbd/enumwriter.h"
  33 #include "pbd/stacktrace.h"
  34
  35 #include "ardour/session.h"
  36 #include "ardour/tempo.h"
  37
  38 #include "pbd/i18n.h"
  39
  40 using namespace std;
  41 using namespace ARDOUR;
  42 using namespace PBD;
  43
  44 /* BBT TIME*/
  45
  46 void
  47 Session::bbt_time (samplepos_t when, Timecode::BBT_Time& bbt)
  48 {
  49         bbt = _tempo_map->bbt_at_sample (when);
  50 }
  51
  52 /* Timecode TIME */
  53
  54 double
  55 Session::timecode_frames_per_second() const
  56 {
  57         return Timecode::timecode_to_frames_per_second (config.get_timecode_format());
  58 }
  59
  60 bool
  61 Session::timecode_drop_frames() const
  62 {
  63         return Timecode::timecode_has_drop_frames(config.get_timecode_format());
  64 }
  65
  66 void
  67 Session::sync_time_vars ()
  68 {
  69         _current_sample_rate = (samplecnt_t) round (_nominal_sample_rate * (1.0 + (config.get_video_pullup()/100.0)));
  70         _samples_per_timecode_frame = (double) _current_sample_rate / (double) timecode_frames_per_second();
  71         if (timecode_drop_frames()) {
  72           _frames_per_hour = (int32_t)(107892 * _samples_per_timecode_frame);
  73         } else {
  74           _frames_per_hour = (int32_t)(3600 * rint(timecode_frames_per_second()) * _samples_per_timecode_frame);
  75         }
  76         _timecode_frames_per_hour = rint(timecode_frames_per_second() * 3600.0);
  77
  78         last_timecode_valid = false;
  79         // timecode type bits are the middle two in the upper nibble
  80         switch ((int) ceil (timecode_frames_per_second())) {
  81         case 24:
  82                 mtc_timecode_bits = 0;
  83                 break;
  84
  85         case 25:
  86                 mtc_timecode_bits = 0x20;
  87                 break;
  88
  89         case 30:
  90         default:
  91                 if (timecode_drop_frames()) {
  92                         mtc_timecode_bits = 0x40;
  93                 } else {
  94                         mtc_timecode_bits =  0x60;
  95                 }
  96                 break;
  97         };
  98         ltc_tx_parse_offset();
  99 }
 100
 101 void
 102 Session::timecode_to_sample( Timecode::Time& timecode, samplepos_t& sample, bool use_offset, bool use_subframes ) const
 103 {
 104         timecode.rate = timecode_frames_per_second();
 105
 106         Timecode::timecode_to_sample(
 107                 timecode, sample, use_offset, use_subframes,
 108                 _current_sample_rate,
 109                 config.get_subframes_per_frame(),
 110                 config.get_timecode_offset_negative(), config.get_timecode_offset()
 111                 );
 112
 113 }
 114
 115 void
 116 Session::sample_to_timecode (samplepos_t sample, Timecode::Time& timecode, bool use_offset, bool use_subframes ) const
 117 {
 118         Timecode::sample_to_timecode (
 119                 sample, timecode, use_offset, use_subframes,
 120
 121                 timecode_frames_per_second(),
 122                 timecode_drop_frames(),
 123                 double(_current_sample_rate),
 124
 125                 config.get_subframes_per_frame(),
 126                 config.get_timecode_offset_negative(), config.get_timecode_offset()
 127                 );
 128 }
 129
 130 void
 131 Session::timecode_time (samplepos_t when, Timecode::Time& timecode)
 132 {
 133         if (last_timecode_valid && when == last_timecode_when) {
 134                 timecode = last_timecode;
 135                 return;
 136         }
 137
 138         this->sample_to_timecode( when, timecode, true /* use_offset */, false /* use_subframes */ );
 139
 140         last_timecode_when = when;
 141         last_timecode = timecode;
 142         last_timecode_valid = true;
 143 }
 144
 145 void
 146 Session::timecode_time_subframes (samplepos_t when, Timecode::Time& timecode)
 147 {
 148         if (last_timecode_valid && when == last_timecode_when) {
 149                 timecode = last_timecode;
 150                 return;
 151         }
 152
 153         this->sample_to_timecode( when, timecode, true /* use_offset */, true /* use_subframes */ );
 154
 155         last_timecode_when = when;
 156         last_timecode = timecode;
 157         last_timecode_valid = true;
 158 }
 159
 160 void
 161 Session::timecode_duration (samplecnt_t when, Timecode::Time& timecode) const
 162 {
 163         this->sample_to_timecode( when, timecode, false /* use_offset */, true /* use_subframes */ );
 164 }
 165
 166 void
 167 Session::timecode_duration_string (char* buf, size_t len, samplepos_t when) const
 168 {
 169         Timecode::Time timecode;
 170
 171         timecode_duration (when, timecode);
 172         snprintf (buf, len, "%02" PRIu32 ":%02" PRIu32 ":%02" PRIu32 ":%02" PRIu32, timecode.hours, timecode.minutes, timecode.seconds, timecode.frames);
 173 }
 174
 175 void
 176 Session::timecode_time (Timecode::Time &t)
 177
 178 {
 179         timecode_time (_transport_sample, t);
 180 }
 181
 182 int
 183 Session::backend_sync_callback (TransportState state, samplepos_t pos)
 184 {
 185         bool slave = synced_to_engine();
 186         // cerr << "Session::backend_sync_callback() _transport_sample: " << _transport_sample << " pos: " << pos << " audible_sample: " << audible_sample() << endl;
 187
 188         if (slave) {
 189                 // cerr << "Session::backend_sync_callback() emitting Located()" << endl;
 190                 Located (); /* EMIT SIGNAL */
 191         }
 192
 193         switch (state) {
 194         case TransportStopped:
 195                 if (slave && _transport_sample != pos && post_transport_work() == 0) {
 196                         request_locate (pos, false);
 197                         // cerr << "SYNC: stopped, locate to " << pos << " from " << _transport_sample << endl;
 198                         return false;
 199                 } else {
 200                         // cerr << "SYNC: stopped, nothing to do" << endl;
 201                         return true;
 202                 }
 203
 204         case TransportStarting:
 205                 // cerr << "SYNC: starting @ " << pos << " a@ " << _transport_sample << " our work = " <<  post_transport_work() << " pos matches ? " << (_transport_sample == pos) << endl;
 206                 if (slave) {
 207                         return _transport_sample == pos && post_transport_work() == 0;
 208                 } else {
 209                         return true;
 210                 }
 211                 break;
 212
 213         case TransportRolling:
 214                 // cerr << "SYNC: rolling slave = " << slave << endl;
 215                 if (slave) {
 216                         start_transport ();
 217                 }
 218                 break;
 219
 220         default:
 221                 error << string_compose (_("Unknown transport state %1 in sync callback"), state)
 222                       << endmsg;
 223         }
 224
 225         return true;
 226 }
 227
 228
 229 ARDOUR::samplecnt_t
 230 Session::convert_to_samples (AnyTime const & position)
 231 {
 232         double secs;
 233
 234         switch (position.type) {
 235         case AnyTime::BBT:
 236                 return _tempo_map->sample_at_bbt (position.bbt);
 237                 break;
 238
 239         case AnyTime::Timecode:
 240                 /* XXX need to handle negative values */
 241                 secs = position.timecode.hours * 60 * 60;
 242                 secs += position.timecode.minutes * 60;
 243                 secs += position.timecode.seconds;
 244                 secs += position.timecode.frames / timecode_frames_per_second();
 245                 if (config.get_timecode_offset_negative()) {
 246                         return (samplecnt_t) floor (secs * sample_rate()) - config.get_timecode_offset();
 247                 } else {
 248                         return (samplecnt_t) floor (secs * sample_rate()) + config.get_timecode_offset();
 249                 }
 250                 break;
 251
 252         case AnyTime::Seconds:
 253                 return (samplecnt_t) floor (position.seconds * sample_rate());
 254                 break;
 255
 256         case AnyTime::Samples:
 257                 return position.samples;
 258                 break;
 259         }
 260
 261         return position.samples;
 262 }
 263
 264 ARDOUR::samplecnt_t
 265 Session::any_duration_to_samples (samplepos_t position, AnyTime const & duration)
 266 {
 267         double secs;
 268
 269         switch (duration.type) {
 270         case AnyTime::BBT:
 271                 return (samplecnt_t) ( _tempo_map->samplepos_plus_bbt (position, duration.bbt) - position);
 272                 break;
 273
 274         case AnyTime::Timecode:
 275                 /* XXX need to handle negative values */
 276                 secs = duration.timecode.hours * 60 * 60;
 277                 secs += duration.timecode.minutes * 60;
 278                 secs += duration.timecode.seconds;
 279                 secs += duration.timecode.frames / timecode_frames_per_second();
 280                 if (config.get_timecode_offset_negative()) {
 281                         return (samplecnt_t) floor (secs * sample_rate()) - config.get_timecode_offset();
 282                 } else {
 283                         return (samplecnt_t) floor (secs * sample_rate()) + config.get_timecode_offset();
 284                 }
 285                 break;
 286
 287         case AnyTime::Seconds:
 288                 return (samplecnt_t) floor (duration.seconds * sample_rate());
 289                 break;
 290
 291         case AnyTime::Samples:
 292                 return duration.samples;
 293                 break;
 294         }
 295
 296         return duration.samples;
 297 }