Changeset 367:0216492669e8 in roaraudio

Timestamp:

08/03/08 14:18:12 (16 years ago)

Author:

phi

Branch:

default

Phase:

public

Message:

done a lot basic midi things

Files:

• include/libroardsp/midi.h (modified) (1 diff)
• libroardsp/midi.c (modified) (1 diff)

include/libroardsp/midi.h

@@ -5 +5 @@
 
 #include "libroar.h"
+#include <math.h>
+
+#define ROAR_MIDI_NOTE_NONE -1
+
+#define ROAR_MIDI_NOTE_C  26162
+#define ROAR_MIDI_NOTE_Cs 27718
+#define ROAR_MIDI_NOTE_D  29366
+#define ROAR_MIDI_NOTE_Ds 31112
+#define ROAR_MIDI_NOTE_E  32962
+#define ROAR_MIDI_NOTE_F  34922
+#define ROAR_MIDI_NOTE_Fs 36999
+#define ROAR_MIDI_NOTE_G  39199
+#define ROAR_MIDI_NOTE_Gs 41530
+#define ROAR_MIDI_NOTE_A  44000
+#define ROAR_MIDI_NOTE_As 46616
+#define ROAR_MIDI_NOTE_B  49388
+
+#define ROAR_MIDI_MAX_NOTENAME_LEN (1+8)
+
+#define ROAR_MIDI_TYPE_SINE 1
+
+struct roar_note_octave {
+ uint16_t       note;
+ char           name[ROAR_MIDI_MAX_NOTENAME_LEN+1];
+ int            octave;
+ float          freq;
+ int            len_mul;
+ int            len_div;
+};
+
+
+char         * roar_midi_note2name   (uint16_t note);
+uint16_t       roar_midi_name2note   (char * note);
+float          roar_midi_note2freq   (uint16_t note);
+
+//int            roar_midi_free_no     (struct roar_note_octave * note);
+
+int            roar_midi_find_octave (char * note);
+int            roar_midi_add_octave  (struct roar_note_octave * note);
+int            roar_midi_notefill    (struct roar_note_octave * note);
+
+int            roar_midi_gen_tone    (struct roar_note_octave * note, int16_t * samples, float t, int rate, int channels, int type, void * opts);
 
 #endif

libroardsp/midi.c

@@ -3 +3 @@
 #include "libroar.h"
 
+struct {
+ uint16_t id;
+ float freq;
+ char * name;
+} _libroar_notes[] = {
+ {ROAR_MIDI_NOTE_C , 261.625565, "C"},
+ {ROAR_MIDI_NOTE_Cs, 277.182631, "C#"},
+ {ROAR_MIDI_NOTE_D , 293.664768, "D"},
+ {ROAR_MIDI_NOTE_Ds, 311.126984, "D#"},
+ {ROAR_MIDI_NOTE_E , 329.627557, "E"},
+ {ROAR_MIDI_NOTE_F , 349.228231, "F"},
+ {ROAR_MIDI_NOTE_Fs, 369.994423, "F#"},
+ {ROAR_MIDI_NOTE_G , 391.995436, "G"},
+ {ROAR_MIDI_NOTE_Gs, 415.304698, "G#"},
+ {ROAR_MIDI_NOTE_A , 440.000000, "A"},
+ {ROAR_MIDI_NOTE_As, 466.163762, "A#"},
+ {ROAR_MIDI_NOTE_B , 493.883301, "B"},
+ {0, 0, NULL}
+};
+
+char         * roar_midi_note2name   (uint16_t note) {
+ int i;
+
+ for (i = 0; _libroar_notes[i].name != NULL; i++)
+  if ( _libroar_notes[i].id == note )
+   return _libroar_notes[i].name;
+
+ return NULL;
+}
+
+uint16_t   roar_midi_name2note   (char * note) {
+ int i;
+
+ for (i = 0; _libroar_notes[i].name != NULL; i++)
+  if ( strcasecmp(_libroar_notes[i].name, note) == 0 )
+   return _libroar_notes[i].id;
+
+ return ROAR_MIDI_NOTE_NONE;
+}
+
+float          roar_midi_note2freq   (uint16_t note) {
+ int i;
+
+ for (i = 0; _libroar_notes[i].name != NULL; i++)
+  if ( _libroar_notes[i].id == note )
+   return _libroar_notes[i].freq;
+
+ return -1;
+}
+
+int            roar_midi_find_octave (char * note);
+int            roar_midi_add_octave  (struct roar_note_octave * note) {
+ note->name[0] = 0;
+ return -1;
+}
+
+int            roar_midi_notefill    (struct roar_note_octave * note) {
+ int oct;
+
+ if ( !note )
+  return -1;
+
+ if ( note->note && note->name[0] == 0 ) {
+  roar_midi_add_octave(note);
+ } else if ( !note->note && note->name[0] != 0 ) {
+  return -1;
+ }
+
+ oct = 1 << abs(note->octave);
+
+ note->freq = roar_midi_note2freq(note->note);
+
+ if ( note->octave < 0 ) {
+  note->freq /= oct;
+ } else {
+  note->freq *= oct;
+ }
+
+ return 0;
+}
+
+int roar_midi_gen_tone (struct roar_note_octave * note, int16_t * samples, float t, int rate, int channels, int type, void * opts) {
+ int i, c;
+ float ct;
+ float step = M_PI*2*note->freq/rate;
+ int16_t s;
+
+/*
+ rate: 1/s
+ t   : 1s
+ freq: 1/s
+ rew : 1s
+*/
+
+ for (ct = 0, i = 0; ct <= t; ct += step, i += channels) {
+  s = 32767*sin(ct);
+
+  for (c = 0; c < channels; c++)
+   samples[i+c] = s;
+ }
+
+ return 0;
+}
+
 //ll