midipal

// Author: Olivier Gillet (ol.gillet@gmail.com) +
// Contribution from: https://github.com/wackazong/midipal
//
// This program 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.
// This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
//
// -----------------------------------------------------------------------------
//
// MIDI clock generator app.
//
// Contribution from: https://github.com/wackazong/midipal

#include "midipal/apps/clock_source_hd.h"

#include "avrlib/op.h"
#include "avrlib/string.h"

#include "midipal/clock.h"
#include "midipal/display.h"
#include "midipal/ui.h"

namespace midipal { namespace apps {
  
using namespace avrlib;

const prog_uint8_t clock_source_factory_data[4] PROGMEM = {
  0, 120, 0, 0
};

/* static */
uint8_t ClockSourceHD::running_;

/* static */
uint8_t ClockSourceHD::bpm_;

/* static */
uint8_t ClockSourceHD::bpm_10th_;

/* static */
uint8_t ClockSourceHD::groove_template_;

/* static */
uint8_t ClockSourceHD::groove_amount_;

/* static */
uint8_t ClockSourceHD::num_taps_;

/* static */
uint32_t ClockSourceHD::elapsed_time_;

/* static */
const prog_AppInfo ClockSourceHD::app_info_ PROGMEM = {
  &OnInit, // void (*OnInit)();
  NULL, // void (*OnNoteOn)(uint8_t, uint8_t, uint8_t);
  NULL, // void (*OnNoteOff)(uint8_t, uint8_t, uint8_t);
  NULL, // void (*OnNoteAftertouch)(uint8_t, uint8_t, uint8_t);
  NULL, // void (*OnAftertouch)(uint8_t, uint8_t);
  NULL, // void (*OnControlChange)(uint8_t, uint8_t, uint8_t);
  NULL, // void (*OnProgramChange)(uint8_t, uint8_t);
  NULL, // void (*OnPitchBend)(uint8_t, uint16_t);
  NULL, // void (*OnSysExByte)(uint8_t);
  &OnClock, // void (*OnClock)();
  &OnStart, // void (*OnStart)();
  &OnContinue, // void (*OnContinue)();
  &OnStop, // void (*OnStop)();
  NULL, // uint8_t (*CheckChannel)(uint8_t);
  &OnRawByte, // void (*OnRawByte)(uint8_t);
  NULL, // void (*OnRawMidiData)(uint8_t, uint8_t*, uint8_t, uint8_t);

  &OnIncrement, // uint8_t (*OnIncrement)(int8_t);
  &OnClick, // uint8_t (*OnClick)();
  NULL, // uint8_t (*OnPot)(uint8_t, uint8_t);
  &OnRedraw, // uint8_t (*OnRedraw)();
  &SetParameter, // void (*SetParameter)(uint8_t, uint8_t);
  &GetParameter, // uint8_t (*GetParameter)(uint8_t);
  NULL, // uint8_t (*CheckPageStatus)(uint8_t);
  4, // settings_size
  SETTINGS_CLOCK_SOURCE, // settings_offset
  &running_, // settings_data
  clock_source_factory_data, // factory_data
  STR_RES_CLOCK, // app_name
  true
};

/* static */
void ClockSourceHD::OnInit() {
  ui.AddPage(STR_RES_RUN, STR_RES_OFF, 0, 1);
  ui.AddPage(STR_RES_BPM, UNIT_INTEGER, 40, 240);
  // TODO: decide whether they should be brought back.
  // ui.AddPage(STR_RES_GRV, STR_RES_SWG, 0, 5);
  // ui.AddPage(STR_RES_AMT, UNIT_INTEGER, 0, 127);
  // ui.AddPage(STR_RES_TAP, UNIT_INTEGER, 40, 240);
  clock.Update(bpm_, bpm_10th_, groove_template_, groove_amount_);
  running_ = 0;
  num_taps_ = 0;
}

/* static */
void ClockSourceHD::OnRawByte(uint8_t byte) {
  uint8_t is_realtime = (byte & 0xf0) == 0xf0;
  uint8_t is_sysex = (byte == 0xf7) || (byte == 0xf0);
  if (!is_realtime || is_sysex) {
    app.SendNow(byte);
  }
}

/* static */
void ClockSourceHD::SetParameter(uint8_t key, uint8_t value) {
  if (key == 0) {
    if (value == 1) {
      Start();
    } else {
      Stop();
    }
  }
  if (key == 4) {
    key = 1;
  }
  static_cast<uint8_t*>(&running_)[key] = value;
  clock.Update(bpm_, bpm_10th_, groove_template_, groove_amount_);
}

/* static */
uint8_t ClockSourceHD::GetParameter(uint8_t key) {
  if (key == 4) {
    key = 1;
  }
  return static_cast<uint8_t*>(&running_)[key];
}

/* static */
uint8_t ClockSourceHD::OnClick() {
  // TODO: make it work.
  if (ui.page() == 4) {
    /*uint32_t t = clock.value();
    clock.Reset();
    if (num_taps_ > 0 && t < 100000L) {
      elapsed_time_ += t;
      SetParameter(
          1,
          avrlib::Clip(60 * 78125L * num_taps_ / elapsed_time_, 40, 240));
    } else {
      num_taps_ = 0;
      elapsed_time_ = 0;
    }
    ++num_taps_;
    return 1;*/
  } else {
    return 0;
  }
}

/* static */
uint8_t ClockSourceHD::OnIncrement(int8_t increment) {
  num_taps_ = 0;
  //here we can put manual handling of the bpm value and then return 1
  if (ui.page() == 1 && ui.editing() == 1) {
    //first handle update of bpm and bpm10th
    if (increment > 0) {
      if (bpm_10th_ == 9) {
        bpm_ += 1;
        bpm_10th_ = 0;
      } else {
        bpm_10th_ += 1;
      }
    } else {
      if (bpm_10th_ == 0) {
        bpm_ -= 1;
        bpm_10th_ = 9;
      } else {
        bpm_10th_ -= 1;
      }
    }

    //check for bpm being too low
    if (bpm_ == 39) {
      bpm_ = 40;
      bpm_10th_ = 0;
    }
    //check for bpm being too high
    if (bpm_ == 240 && bpm_10th_ != 0) {
      bpm_10th_ = 0;
    }
    //update the clock
    clock.Update(bpm_, bpm_10th_, groove_template_, groove_amount_);
    return 1;
  } else {
    return 0;
  }
}

/* static */
uint8_t ClockSourceHD::OnRedraw() {
  if (ui.page() == 1) {
    memset(line_buffer, ' ', kLcdWidth);
    UnsafeItoa(bpm_, 3, &line_buffer[2]);
    PadRight(&line_buffer[2], 3, ' ');
    line_buffer[5] = '.';
    line_buffer[6] = '0' + bpm_10th_;
    if (ui.editing() == 1) {
      line_buffer[1] = '[';
      line_buffer[7] = ']';
    }
    display.Print(0, line_buffer);
    return 1;
  } else {
    return 0;
  }
}

/* static */
void ClockSourceHD::OnStart() {
  Start();
}

/* static */
void ClockSourceHD::OnStop() {
  Stop();
}

/* static */
void ClockSourceHD::OnContinue() {
  Start();
}

/* static */
void ClockSourceHD::OnClock(uint8_t clock_source) {
  if (clock_source == CLOCK_MODE_INTERNAL) {
    app.SendNow(0xf8);
  }
}

/* static */
void ClockSourceHD::Stop() {
  if (running_) {
    clock.Stop();
    app.SendNow(0xfc);
    running_ = 0;
  }
}

/* static */
void ClockSourceHD::Start() {
  if (!running_) {
    clock.Start();
    app.SendNow(0xfa);
    running_ = 1;
  }
}

} }  // namespace midipal::apps