apps/plugins/midi/midiplay.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2005 Karl Kurbjun based on midi2wav by Stepan Moskovchenko
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  18  * KIND, either express or implied.
  19  *
  20  ****************************************************************************/
  21 #include "plugin.h"
  22 #include "guspat.h"
  23 #include "midiutil.h"
  24 #include "synth.h"
  25 #include "sequencer.h"
  26 #include "midifile.h"
  27
  28 PLUGIN_HEADER
  29 PLUGIN_IRAM_DECLARE
  30
  31 /* variable button definitions */
  32 #if (CONFIG_KEYPAD == IRIVER_H100_PAD) || (CONFIG_KEYPAD == IRIVER_H300_PAD)
  33 #define BTN_QUIT         BUTTON_OFF
  34 #define BTN_RIGHT        BUTTON_RIGHT
  35 #define BTN_UP           BUTTON_UP
  36 #define BTN_DOWN         BUTTON_DOWN
  37 #define BTN_LEFT         BUTTON_LEFT
  38 #define BTN_RC_QUIT      BUTTON_RC_STOP
  39 #define BTN_PLAY         BUTTON_ON
  40
  41 #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || (CONFIG_KEYPAD == IPOD_3G_PAD) || \
  42       (CONFIG_KEYPAD == IPOD_1G2G_PAD)
  43 #define BTN_QUIT         (BUTTON_SELECT | BUTTON_MENU)
  44 #define BTN_RIGHT        BUTTON_RIGHT
  45 #define BTN_LEFT         BUTTON_LEFT
  46 #define BTN_UP           BUTTON_SCROLL_FWD
  47 #define BTN_DOWN         BUTTON_SCROLL_BACK
  48 #define BTN_PLAY         BUTTON_PLAY
  49
  50
  51 #elif (CONFIG_KEYPAD == GIGABEAT_PAD)
  52 #define BTN_QUIT         BUTTON_POWER
  53 #define BTN_RIGHT        BUTTON_RIGHT
  54 #define BTN_LEFT         BUTTON_LEFT
  55 #define BTN_UP           BUTTON_UP
  56 #define BTN_DOWN         BUTTON_DOWN
  57 #define BTN_PLAY         BUTTON_A
  58
  59
  60 #elif (CONFIG_KEYPAD == GIGABEAT_S_PAD)
  61 #define BTN_QUIT         BUTTON_POWER
  62 #define BTN_RIGHT        BUTTON_RIGHT
  63 #define BTN_LEFT         BUTTON_LEFT
  64 #define BTN_UP           BUTTON_UP
  65 #define BTN_DOWN         BUTTON_DOWN
  66 #define BTN_PLAY         BUTTON_PLAY
  67
  68
  69 #elif (CONFIG_KEYPAD == SANSA_E200_PAD)
  70 #define BTN_QUIT         BUTTON_POWER
  71 #define BTN_RIGHT        BUTTON_RIGHT
  72 #define BTN_LEFT         BUTTON_LEFT
  73 #define BTN_UP           BUTTON_SCROLL_FWD
  74 #define BTN_DOWN         BUTTON_SCROLL_BACK
  75 #define BTN_PLAY         BUTTON_UP
  76
  77 #elif (CONFIG_KEYPAD == SANSA_FUZE_PAD)
  78 #define BTN_QUIT         (BUTTON_HOME|BUTTON_REPEAT)
  79 #define BTN_RIGHT        BUTTON_RIGHT
  80 #define BTN_LEFT         BUTTON_LEFT
  81 #define BTN_UP           BUTTON_SCROLL_FWD
  82 #define BTN_DOWN         BUTTON_SCROLL_BACK
  83 #define BTN_PLAY         BUTTON_UP
  84
  85
  86 #elif (CONFIG_KEYPAD == SANSA_C200_PAD) || \
  87 (CONFIG_KEYPAD == SANSA_CLIP_PAD) || \
  88 (CONFIG_KEYPAD == SANSA_M200_PAD)
  89 #define BTN_QUIT         BUTTON_POWER
  90 #define BTN_RIGHT        BUTTON_RIGHT
  91 #define BTN_LEFT         BUTTON_LEFT
  92 #define BTN_UP           BUTTON_VOL_UP
  93 #define BTN_DOWN         BUTTON_VOL_DOWN
  94 #define BTN_PLAY         BUTTON_UP
  95
  96
  97 #elif CONFIG_KEYPAD == IAUDIO_X5M5_PAD
  98 #define BTN_QUIT         BUTTON_POWER
  99 #define BTN_RIGHT        BUTTON_RIGHT
 100 #define BTN_LEFT         BUTTON_LEFT
 101 #define BTN_UP           BUTTON_UP
 102 #define BTN_DOWN         BUTTON_DOWN
 103 #define BTN_PLAY         BUTTON_PLAY
 104
 105
 106 #elif CONFIG_KEYPAD == IRIVER_H10_PAD
 107 #define BTN_QUIT         BUTTON_POWER
 108 #define BTN_RIGHT        BUTTON_RIGHT
 109 #define BTN_LEFT         BUTTON_LEFT
 110 #define BTN_UP           BUTTON_SCROLL_UP
 111 #define BTN_DOWN         BUTTON_SCROLL_DOWN
 112 #define BTN_PLAY         BUTTON_PLAY
 113
 114
 115 #elif CONFIG_KEYPAD == MROBE500_PAD
 116 #define BTN_QUIT         BUTTON_POWER
 117 #define BTN_RIGHT        BUTTON_RIGHT
 118 #define BTN_LEFT         BUTTON_LEFT
 119 #define BTN_UP           BUTTON_RC_PLAY
 120 #define BTN_DOWN         BUTTON_RC_DOWN
 121 #define BTN_PLAY         BUTTON_RC_HEART
 122
 123
 124 #elif (CONFIG_KEYPAD == MROBE100_PAD)
 125 #define BTN_QUIT         BUTTON_POWER
 126 #define BTN_RIGHT        BUTTON_RIGHT
 127 #define BTN_LEFT         BUTTON_LEFT
 128 #define BTN_UP           BUTTON_UP
 129 #define BTN_DOWN         BUTTON_DOWN
 130 #define BTN_PLAY         BUTTON_DISPLAY
 131
 132
 133 #elif CONFIG_KEYPAD == IAUDIO_M3_PAD
 134 #define BTN_QUIT         BUTTON_RC_REC
 135 #define BTN_RIGHT        BUTTON_RC_FF
 136 #define BTN_LEFT         BUTTON_RC_REW
 137 #define BTN_UP           BUTTON_RC_VOL_UP
 138 #define BTN_DOWN         BUTTON_RC_VOL_DOWN
 139 #define BTN_PLAY         BUTTON_RC_PLAY
 140
 141
 142 #elif CONFIG_KEYPAD == COWOND2_PAD
 143 #define BTN_QUIT         BUTTON_POWER
 144
 145 #elif CONFIG_KEYPAD == IAUDIO67_PAD
 146 #define BTN_QUIT         BUTTON_POWER
 147 #define BTN_RIGHT        BUTTON_RIGHT
 148 #define BTN_LEFT         BUTTON_LEFT
 149 #define BTN_UP           BUTTON_STOP
 150 #define BTN_DOWN         BUTTON_PLAY
 151 #define BTN_PLAY         BUTTON_MENU
 152
 153 #elif CONFIG_KEYPAD == CREATIVEZVM_PAD
 154 #define BTN_QUIT         BUTTON_BACK
 155 #define BTN_RIGHT        BUTTON_RIGHT
 156 #define BTN_LEFT         BUTTON_LEFT
 157 #define BTN_UP           BUTTON_UP
 158 #define BTN_DOWN         BUTTON_DOWN
 159 #define BTN_PLAY         BUTTON_PLAY
 160
 161 #elif CONFIG_KEYPAD == PHILIPS_HDD1630_PAD
 162 #define BTN_QUIT         BUTTON_POWER
 163 #define BTN_RIGHT        BUTTON_RIGHT
 164 #define BTN_LEFT         BUTTON_LEFT
 165 #define BTN_UP           BUTTON_UP
 166 #define BTN_DOWN         BUTTON_DOWN
 167 #define BTN_PLAY         BUTTON_MENU
 168
 169 #elif CONFIG_KEYPAD == ONDAVX747_PAD
 170 #define BTN_QUIT         BUTTON_POWER
 171
 172 #elif CONFIG_KEYPAD == SAMSUNG_YH_PAD
 173 #define BTN_QUIT         BUTTON_REW
 174 #define BTN_RIGHT        BUTTON_RIGHT
 175 #define BTN_LEFT         BUTTON_LEFT
 176 #define BTN_UP           BUTTON_UP
 177 #define BTN_DOWN         BUTTON_DOWN
 178 #define BTN_PLAY         BUTTON_PLAY
 179
 180 #else
 181 #error No keymap defined!
 182 #endif
 183
 184 #ifdef HAVE_TOUCHSCREEN
 185 #ifndef BTN_QUIT
 186 #define BTN_QUIT         BUTTON_TOPLEFT
 187 #endif
 188 #ifndef BTN_RIGHT
 189 #define BTN_RIGHT        BUTTON_MIDRIGHT
 190 #endif
 191 #ifndef BTN_LEFT
 192 #define BTN_LEFT         BUTTON_MIDLEFT
 193 #endif
 194 #ifndef BTN_UP
 195 #define BTN_UP           BUTTON_TOPMIDDLE
 196 #endif
 197 #ifndef BTN_DOWN
 198 #define BTN_DOWN         BUTTON_BOTTOMMIDDLE
 199 #endif
 200 #ifndef BTN_PLAY
 201 #define BTN_PLAY         BUTTON_CENTER
 202 #endif
 203 #endif
 204
 205 #undef SYNC
 206
 207 #ifdef SIMULATOR
 208 #define SYNC
 209 #endif
 210
 211 struct MIDIfile * mf IBSS_ATTR;
 212
 213 int number_of_samples IBSS_ATTR; /* the number of samples in the current tick */
 214 int playing_time IBSS_ATTR;  /* How many seconds into the file have we been playing? */
 215 int samples_this_second IBSS_ATTR;    /* How many samples produced during this second so far? */
 216 long bpm IBSS_ATTR;
 217
 218 int32_t gmbuf[BUF_SIZE*NBUF];
 219 static unsigned int samples_in_buf;
 220
 221 bool quit = false;
 222 bool swap = false;
 223 bool lastswap = true;
 224
 225 static inline void synthbuf(void)
 226 {
 227     int32_t *outptr;
 228     int i = BUF_SIZE;
 229
 230 #ifndef SYNC
 231     if (lastswap == swap)
 232         return;
 233     lastswap = swap;
 234
 235     outptr = (swap ? gmbuf : gmbuf+BUF_SIZE);
 236 #else
 237     outptr = gmbuf;
 238 #endif
 239
 240     /* synth samples for as many whole ticks as we can fit in the buffer */
 241     for (; i >= number_of_samples; i -= number_of_samples)
 242     {
 243         synthSamples((int32_t*)outptr, number_of_samples);
 244         outptr += number_of_samples;
 245 #ifndef SYNC
 246         /* synthbuf is called in interrupt context is SYNC is defined so it cannot yield
 247            that bug causing the sim to crach when not using SYNC should really be fixed */
 248         rb->yield();
 249 #endif
 250         if (tick() == 0)
 251             quit = true;
 252     }
 253
 254     /* how many samples did we write to the buffer? */
 255     samples_in_buf = BUF_SIZE-i;
 256 }
 257
 258 void get_more(unsigned char** start, size_t* size)
 259 {
 260 #ifndef SYNC
 261     if(lastswap != swap)
 262     {
 263         printf("Buffer miss!"); /* Comment out the printf to make missses less noticable. */
 264     }
 265
 266 #else
 267     synthbuf();  /* For some reason midiplayer crashes when an update is forced */
 268 #endif
 269
 270     *size = samples_in_buf*sizeof(int32_t);
 271 #ifndef SYNC
 272     *start = (unsigned char*)((swap ? gmbuf : gmbuf + BUF_SIZE));
 273     swap = !swap;
 274 #else
 275     *start = (unsigned char*)(gmbuf);
 276 #endif
 277 }
 278
 279 static int midimain(const void * filename)
 280 {
 281     int a, notes_used, vol;
 282     bool is_playing = true;  /* false = paused */
 283
 284     printf("Loading file");
 285     mf = loadFile(filename);
 286
 287     if (mf == NULL)
 288     {
 289         printf("Error loading file.");
 290         return -1;
 291     }
 292
 293     if (initSynth(mf, ROCKBOX_DIR "/patchset/patchset.cfg",
 294         ROCKBOX_DIR "/patchset/drums.cfg") == -1)
 295         return -1;
 296
 297     rb->pcm_play_stop();
 298 #if INPUT_SRC_CAPS != 0
 299     /* Select playback */
 300     rb->audio_set_input_source(AUDIO_SRC_PLAYBACK, SRCF_PLAYBACK);
 301     rb->audio_set_output_source(AUDIO_SRC_PLAYBACK);
 302 #endif
 303     rb->pcm_set_frequency(SAMPLE_RATE); /* 44100 22050 11025 */
 304
 305     /*
 306         * tick() will do one MIDI clock tick. Then, there's a loop here that
 307         * will generate the right number of samples per MIDI tick. The whole
 308         * MIDI playback is timed in terms of this value.. there are no forced
 309         * delays or anything. It just produces enough samples for each tick, and
 310         * the playback of these samples is what makes the timings right.
 311         *
 312         * This seems to work quite well. On a laptop, anyway.
 313         */
 314
 315     printf("Okay, starting sequencing");
 316
 317     bpm = mf->div*1000000/tempo;
 318     number_of_samples = SAMPLE_RATE/bpm;
 319
 320     /* Skip over any junk in the beginning of the file, so start playing */
 321     /* after the first note event */
 322     do
 323     {
 324         notes_used = 0;
 325         for (a = 0; a < MAX_VOICES; a++)
 326             if (voices[a].isUsed)
 327                 notes_used++;
 328         tick();
 329     } while (notes_used == 0);
 330
 331     playing_time = 0;
 332     samples_this_second = 0;
 333
 334     synthbuf();
 335     rb->pcm_play_data(&get_more, NULL, 0);
 336
 337     while (!quit)
 338     {
 339     #ifndef SYNC
 340         synthbuf();
 341     #endif
 342         rb->yield();
 343
 344         /* Prevent idle poweroff */
 345         rb->reset_poweroff_timer();
 346
 347         /* Code taken from Oscilloscope plugin */
 348         switch (rb->button_get(false))
 349         {
 350             case BTN_UP:
 351             case BTN_UP | BUTTON_REPEAT:
 352             {
 353                 vol = rb->global_settings->volume;
 354                 if (vol < rb->sound_max(SOUND_VOLUME))
 355                 {
 356                     vol++;
 357                     rb->sound_set(SOUND_VOLUME, vol);
 358                     rb->global_settings->volume = vol;
 359                 }
 360                 break;
 361             }
 362
 363             case BTN_DOWN:
 364             case BTN_DOWN | BUTTON_REPEAT:
 365             {
 366                 vol = rb->global_settings->volume;
 367                 if (vol > rb->sound_min(SOUND_VOLUME))
 368                 {
 369                     vol--;
 370                     rb->sound_set(SOUND_VOLUME, vol);
 371                     rb->global_settings->volume = vol;
 372                 }
 373                 break;
 374             }
 375
 376             case BTN_LEFT:
 377             {
 378                 /* Rewinding is tricky. Basically start the file over */
 379                 /* but run through the tracks without the synth running */
 380                 rb->pcm_play_stop();
 381                 seekBackward(5);
 382                 printf("Rewind to %d:%02d\n", playing_time/60, playing_time%60);
 383                 if (is_playing)
 384                     rb->pcm_play_data(&get_more, NULL, 0);
 385                 break;
 386             }
 387
 388             case BTN_RIGHT:
 389             {
 390                 rb->pcm_play_stop();
 391                 seekForward(5);
 392                 printf("Skip to %d:%02d\n", playing_time/60, playing_time%60);
 393                 if (is_playing)
 394                     rb->pcm_play_data(&get_more, NULL, 0);
 395                 break;
 396             }
 397
 398             case BTN_PLAY:
 399             {
 400                 if (is_playing)
 401                 {
 402                     printf("Paused at %d:%02d\n", playing_time/60, playing_time%60);
 403                     is_playing = false;
 404                     rb->pcm_play_stop();
 405                 } else
 406                 {
 407                     printf("Playing from %d:%02d\n", playing_time/60, playing_time%60);
 408                     is_playing = true;
 409                     rb->pcm_play_data(&get_more, NULL, 0);
 410                 }
 411                 break;
 412             }
 413
 414 #ifdef BTN_RC_QUIT
 415             case BTN_RC_QUIT:
 416 #endif
 417             case BTN_QUIT:
 418                 quit = true;
 419         }
 420     }
 421     return 0;
 422 }
 423
 424 enum plugin_status plugin_start(const void* parameter)
 425 {
 426     int retval;
 427     PLUGIN_IRAM_INIT(rb)
 428
 429     if (parameter == NULL)
 430     {
 431         rb->splash(HZ*2, " Play .MID file ");
 432         return PLUGIN_OK;
 433     }
 434     rb->lcd_setfont(0);
 435
 436 #if defined(HAVE_ADJUSTABLE_CPU_FREQ)
 437     rb->cpu_boost(true);
 438 #endif
 439
 440     printf("%s", parameter);
 441     /*   rb->splash(HZ, true, parameter); */
 442
 443 #ifdef RB_PROFILE
 444     rb->profile_thread();
 445 #endif
 446
 447     retval = midimain(parameter);
 448
 449 #ifdef RB_PROFILE
 450     rb->profstop();
 451 #endif
 452
 453     rb->pcm_play_stop();
 454     rb->pcm_set_frequency(HW_SAMPR_DEFAULT);
 455
 456 #if defined(HAVE_ADJUSTABLE_CPU_FREQ)
 457     rb->cpu_boost(false);
 458 #endif
 459     rb->splash(HZ, "FINISHED PLAYING");
 460
 461     if (retval == -1)
 462         return PLUGIN_ERROR;
 463     return PLUGIN_OK;
 464 }
 465