1 /* vim: set sts=2 sw=2 et: */
3 * Copyright (C) 2006 Josep Torra <j.torra@telefonica.net>
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Library General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library 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 GNU
13 * Library General Public License for more details.
15 * You should have received a copy of the GNU Library General Public
16 * License along with this library; if not, write to the
17 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 * Boston, MA 02111-1307, USA.
26 #define TUNER_VERSION "0.4"
30 # include <hildon/hildon-defines.h>
31 # include <hildon/hildon-program.h>
32 # include <hildon/hildon-number-editor.h>
33 # elif defined(MAEMO1)
34 # include <hildon-widgets/hildon-app.h>
35 # include <hildon-widgets/hildon-appview.h>
37 # include <hildon-widgets/hildon-program.h>
42 #define OSSO_PACKAGE "tuner-tool"
43 #define OSSO_VERSION TUNER_VERSION
45 #endif /* ifdef HILDON */
48 # define DEFAULT_AUDIOSRC "dsppcmsrc"
49 # define DEFAULT_AUDIOSINK "dsppcmsink"
51 # define DEFAULT_AUDIOSRC "alsasrc"
52 # define DEFAULT_AUDIOSINK "alsasink"
61 #define between(x,a,b) (((x)>=(a)) && ((x)<=(b)))
63 #define MAGIC (1.059463094359f) /* 2^(1/2) */
65 extern gboolean plugin_pitch_init (GstPlugin * plugin);
66 extern gboolean plugin_tonesrc_init (GstPlugin * plugin);
87 #define NUM_WKEYS (15) /* # of white keys in the piano keyboard */
88 #define WKEY_WIDTH (45)
90 static Note equal_tempered_scale[] = {
164 {"C#6/Db6", 1108.73},
166 {"D#6/Eb6", 1244.51},
169 {"F#6/Gb6", 1479.98},
171 {"G#6/Ab6", 1661.22},
173 {"A#6/Bb6", 1864.66},
176 {"C#7/Db7", 2217.46},
178 {"D#7/Eb7", 2489.02},
181 {"F#7/Gb7", 2959.96},
183 {"G#7/Ab7", 3322.44},
185 {"A#7/Bb7", 3729.31},
189 static GdkColor ledOnColor = { 0, 0 * 255, 180 * 255, 95 * 255 };
190 static GdkColor ledOnColor2 = { 0, 180 * 255, 180 * 255, 0 * 255 };
191 static GdkColor ledOffColor = { 0, 80 * 255, 80 * 255, 80 * 255 };
193 static GtkWidget *targetFrequency;
194 static GtkWidget *currentFrequency;
195 static GtkWidget *drawingarea1;
196 static GtkWidget *drawingarea2;
199 recalculate_scale (double a4)
203 for (i = 0; i < NUM_NOTES; i++) {
204 equal_tempered_scale[i].frequency = a4 * pow (MAGIC, i - 57);
205 /* fprintf(stdout, "%s: %.2f\n", equal_tempered_scale[i].name, equal_tempered_scale[i].frequency); */
211 fix_hildon_number_editor (GtkWidget * widget, gpointer data)
213 if (GTK_IS_EDITABLE (widget)) {
214 gtk_editable_set_editable (GTK_EDITABLE (widget), FALSE);
215 g_object_set (G_OBJECT (widget), "can-focus", FALSE, NULL);
221 calibration_changed (GObject * object, GParamSpec * pspec, gpointer user_data)
226 value = hildon_number_editor_get_value (HILDON_NUMBER_EDITOR (object));
228 value = gtk_spin_button_get_value (GTK_SPIN_BUTTON (object));
231 if (value >= CALIB_MIN && value <= CALIB_MAX) {
232 recalculate_scale (value);
233 g_debug ("Calibration changed to %d Hz", value);
238 on_window_destroy (GtkObject * object, gpointer user_data)
244 toggle_fullscreen (GtkWindow * window)
246 static gboolean fullscreen = FALSE;
248 fullscreen = !fullscreen;
250 gtk_window_fullscreen (GTK_WINDOW (window));
252 gtk_window_unfullscreen (GTK_WINDOW (window));
256 key_press_event (GtkWidget * widget, GdkEventKey * event, GtkWindow * window)
258 switch (event->keyval) {
260 case HILDON_HARDKEY_FULLSCREEN:
261 toggle_fullscreen(window);
275 static GdkGC *gc = NULL;
276 gint width = drawingarea1->allocation.width;
277 gint led_width = ((gfloat) width / (gfloat) (NUM_LEDS)) * 0.8;
278 gint led_space = ((gfloat) width / (gfloat) (NUM_LEDS)) * 0.2;
279 gint led_total = led_width + led_space;
280 gint padding = (width - NUM_LEDS * led_total) / 2;
283 gc = gdk_gc_new (drawingarea1->window);
285 gdk_gc_set_rgb_fg_color (gc, &drawingarea1->style->fg[0]);
287 gdk_draw_rectangle (drawingarea1->window, gc, TRUE, 0, 0,
288 drawingarea1->allocation.width, drawingarea1->allocation.height);
290 if (abs (n) > (NUM_LEDS / 2))
291 n = n / n * (NUM_LEDS / 2);
294 j = NUM_LEDS / 2 + 1;
295 k = NUM_LEDS / 2 + n;
297 j = NUM_LEDS / 2 + n;
298 k = NUM_LEDS / 2 - 1;
302 for (i = 0; i < NUM_LEDS; i++) {
303 if (i == NUM_LEDS / 2) {
305 gdk_gc_set_rgb_fg_color (gc, &ledOnColor2);
307 gdk_gc_set_rgb_fg_color (gc, &ledOffColor);
309 gdk_draw_rectangle (drawingarea1->window, gc, TRUE, padding + (i * led_total) + ((led_total - 4) / 2), 2, 4,
312 if ((i >= j) && (i <= k))
313 gdk_gc_set_rgb_fg_color (gc, &ledOnColor);
315 gdk_gc_set_rgb_fg_color (gc, &ledOffColor);
317 gdk_draw_rectangle (drawingarea1->window, gc, TRUE, padding + (i * led_total), 10, led_width,
323 /* update frequency info */
325 update_frequency (gint frequency)
329 gfloat diff, min_diff;
331 min_diff = frequency - (equal_tempered_scale[0].frequency - 10);
332 for (i = j = 0; i < NUM_NOTES; i++) {
333 diff = frequency - equal_tempered_scale[i].frequency;
334 if (fabs (diff) <= fabs (min_diff)) {
343 g_strdup_printf ("Nearest note is %s with %.2f Hz frequency",
344 equal_tempered_scale[j].name, equal_tempered_scale[j].frequency);
345 gtk_label_set_text (GTK_LABEL (targetFrequency), buffer);
348 buffer = g_strdup_printf ("Played frequency is %d Hz", frequency);
349 gtk_label_set_text (GTK_LABEL (currentFrequency), buffer);
352 draw_leds ((gint) roundf (min_diff));
355 /* receive spectral data from element message */
357 message_handler (GstBus * bus, GstMessage * message, gpointer data)
359 if (message->type == GST_MESSAGE_ELEMENT) {
360 const GstStructure *s = gst_message_get_structure (message);
361 const gchar *name = gst_structure_get_name (s);
363 if (strcmp (name, "pitch") == 0) {
366 frequency = g_value_get_int (gst_structure_get_value (s, "frequency"));
367 update_frequency (frequency);
370 /* we handled the message we want, and ignored the ones we didn't want.
371 * so the core can unref the message for us */
376 keynote2freq (gint x, gint y)
378 gint i, j, height, found;
379 gfloat frequency = 0;
381 height = drawingarea2->allocation.height;
385 for (i = 0; i < NUM_WKEYS; i++) {
386 // Test for a white key
388 if (between (x, i * WKEY_WIDTH, i * WKEY_WIDTH + (WKEY_WIDTH - 1)) && between (y, 0, height))
390 // Test for a black key
391 if (((i % 7) != 2) && ((i % 7) != 6) && (i != 14)) {
393 if (between (x, 24 + i * 45, 24 + i * 45 + 42)
394 && between (y, 0, height / 2))
398 frequency = equal_tempered_scale[48 + found - 1].frequency;
406 expose_event (GtkWidget * widget, GdkEventExpose * event)
409 static GdkGC *gc = NULL;
412 gc = gdk_gc_new (drawingarea2->window);
414 gdk_gc_set_rgb_fg_color (gc, &drawingarea2->style->fg[0]);
416 gdk_draw_rectangle (drawingarea2->window, gc, FALSE, 0, 0,
417 NUM_WKEYS * WKEY_WIDTH, drawingarea2->allocation.height - 1);
419 for (i = 0; i < NUM_WKEYS - 1; i++)
420 gdk_draw_rectangle (drawingarea2->window, gc, FALSE, i * WKEY_WIDTH, 0,
421 WKEY_WIDTH, drawingarea2->allocation.height - 1);
423 for (i = 0; i < NUM_WKEYS - 1; i++) {
424 if (((i % 7) != 2) && ((i % 7) != 6))
425 gdk_draw_rectangle (drawingarea2->window, gc, TRUE, 24 + i * WKEY_WIDTH, 0,
426 42, drawingarea2->allocation.height / 2);
432 button_press_event (GtkWidget * widget, GdkEventButton * event, gpointer user_data)
434 GstElement *piano = GST_ELEMENT (user_data);
436 if (event->button == 1) {
437 g_object_set (piano, "freq", (gdouble) keynote2freq (event->x, event->y),
438 "volume", 0.8, NULL);
445 button_release_event (GtkWidget * widget, GdkEventButton * event,
448 GstElement *piano = GST_ELEMENT (user_data);
450 if (event->button == 1) {
451 g_object_set (piano, "volume", 0.0, NULL);
458 main (int argc, char *argv[])
462 HildonApp *app = NULL;
463 HildonAppView *view = NULL;
465 HildonProgram *app = NULL;
466 HildonWindow *view = NULL;
468 osso_context_t *osso_context = NULL; /* handle to osso */
471 GstElement *bin1, *bin2;
472 GstElement *src1, *pitch, *sink1;
473 GstElement *src2, *sink2;
480 GtkWidget *alignment;
481 GtkWidget *calibrate;
485 GdkPixbuf *icon = NULL;
486 GError *error = NULL;
488 gboolean piano_enabled = TRUE;
491 gst_init (&argc, &argv);
492 /* Register the GStreamer plugins */
493 plugin_pitch_init (NULL);
494 plugin_tonesrc_init (NULL);
496 recalculate_scale (CALIB_DEFAULT);
498 /* Init the gtk - must be called before any hildon stuff */
499 gtk_init (&argc, &argv);
503 /* Create the hildon application and setup the title */
504 app = HILDON_APP (hildon_app_new ());
505 hildon_app_set_title (app, "Tuner Tool");
506 hildon_app_set_two_part_title (app, TRUE);
508 app = HILDON_PROGRAM (hildon_program_get_instance ());
509 g_set_application_name ("Tuner Tool");
512 /* Initialize maemo application */
513 osso_context = osso_initialize (OSSO_PACKAGE, OSSO_VERSION, TRUE, NULL);
515 /* Check that initialization was ok */
516 if (osso_context == NULL) {
517 g_print ("Bummer, osso failed\n");
519 g_assert (osso_context);
521 mainBox = gtk_vbox_new (FALSE, 0);
522 gtk_container_set_border_width (GTK_CONTAINER (mainBox), 0);
524 view = HILDON_APPVIEW (hildon_appview_new ("Tuner"));
525 hildon_appview_set_fullscreen_key_allowed (view, TRUE);
526 mainWin = GTK_WIDGET (app);
528 view = HILDON_WINDOW (hildon_window_new ());
529 mainWin = GTK_WIDGET (view);
532 mainWin = gtk_window_new (GTK_WINDOW_TOPLEVEL);
533 gtk_window_set_title (GTK_WINDOW (mainWin), "Tuner " TUNER_VERSION);
534 icon = gdk_pixbuf_new_from_file ("tuner64.png", &error);
536 g_print ("Setting icon\n");
537 gtk_window_set_icon (GTK_WINDOW (mainWin), icon);
539 mainBox = gtk_vbox_new (FALSE, 0);
540 gtk_container_set_border_width (GTK_CONTAINER (mainBox), 0);
543 /* Bin for tuner functionality */
544 bin1 = gst_pipeline_new ("bin1");
546 src1 = gst_element_factory_make (DEFAULT_AUDIOSRC, "src1");
547 pitch = gst_element_factory_make ("pitch", "pitch");
548 g_object_set (G_OBJECT (pitch), "message", TRUE, "minfreq", 10,
549 "maxfreq", 4000, NULL);
551 sink1 = gst_element_factory_make ("fakesink", "sink1");
552 g_object_set (G_OBJECT (sink1), "silent", 1, NULL);
554 gst_bin_add_many (GST_BIN (bin1), src1, pitch, sink1, NULL);
555 if (!gst_element_link_many (src1, pitch, sink1, NULL)) {
556 fprintf (stderr, "cant link elements\n");
560 bus = gst_element_get_bus (bin1);
561 gst_bus_add_watch (bus, message_handler, NULL);
562 gst_object_unref (bus);
564 /* Bin for piano functionality */
565 bin2 = gst_pipeline_new ("bin2");
567 //src2 = gst_element_factory_make ("audiotestsrc", "src2");
568 //g_object_set (G_OBJECT (src2), "volume", 0.0, "wave", 7, NULL);
569 src2 = gst_element_factory_make ("tonesrc", "src2");
570 g_object_set (G_OBJECT (src2), "volume", 0.0, NULL);
571 sink2 = gst_element_factory_make (DEFAULT_AUDIOSINK, "sink2");
573 gst_bin_add_many (GST_BIN (bin2), src2, sink2, NULL);
574 if (!gst_element_link_many (src2, sink2, NULL)) {
575 piano_enabled = FALSE;
579 g_signal_connect (G_OBJECT (mainWin), "destroy",
580 G_CALLBACK (on_window_destroy), NULL);
581 g_signal_connect (G_OBJECT(mainWin), "key_press_event",
582 G_CALLBACK(key_press_event), mainWin);
585 targetFrequency = gtk_label_new ("");
586 gtk_box_pack_start (GTK_BOX (mainBox), targetFrequency, FALSE, FALSE, 5);
589 drawingarea1 = gtk_drawing_area_new ();
590 gtk_widget_set_size_request (drawingarea1, 636, 40);
591 gtk_box_pack_start (GTK_BOX (mainBox), drawingarea1, FALSE, FALSE, 5);
593 /* Current frequency lable */
594 currentFrequency = gtk_label_new ("");
595 gtk_box_pack_start (GTK_BOX (mainBox), currentFrequency, FALSE, FALSE, 5);
597 /* Calibration spinner */
598 box = gtk_hbox_new (FALSE, 0);
599 alignment = gtk_alignment_new (0.5, 0.5, 0, 0);
600 label = gtk_label_new ("Calibration");
601 gtk_box_pack_start (GTK_BOX (box), label, FALSE, FALSE, 5);
604 calibrate = hildon_number_editor_new (CALIB_MIN, CALIB_MAX);
605 hildon_number_editor_set_value (HILDON_NUMBER_EDITOR (calibrate),
607 /* we don't want that ugly cursor there */
608 gtk_container_forall (GTK_CONTAINER (calibrate),
609 (GtkCallback) fix_hildon_number_editor, NULL);
610 g_signal_connect (G_OBJECT (calibrate), "notify::value",
611 G_CALLBACK (calibration_changed), NULL);
613 calibrate = gtk_spin_button_new_with_range (CALIB_MIN, CALIB_MAX, 1);
614 gtk_spin_button_set_value (GTK_SPIN_BUTTON (calibrate), CALIB_DEFAULT);
615 g_signal_connect (G_OBJECT (calibrate), "value_changed",
616 G_CALLBACK (calibration_changed), NULL);
618 gtk_box_pack_start (GTK_BOX (box), calibrate, FALSE, FALSE, 5);
619 gtk_container_add (GTK_CONTAINER (alignment), box);
620 gtk_box_pack_start (GTK_BOX (mainBox), alignment, FALSE, FALSE, 5);
623 sep = gtk_hseparator_new ();
626 gtk_box_pack_start (GTK_BOX (mainBox), sep, FALSE, FALSE, 5);
628 label = gtk_label_new ("Tuner Tool developed by Josep Torra.\n"
629 "http://n770galaxy.blogspot.com/");
630 gtk_box_pack_start (GTK_BOX (mainBox), label, FALSE, FALSE, 5);
633 alignment = gtk_alignment_new (0.5, 0.5, 0, 0);
634 drawingarea2 = gtk_drawing_area_new ();
635 gtk_widget_set_size_request (drawingarea2, NUM_WKEYS * WKEY_WIDTH + 1, 130);
636 gtk_container_add (GTK_CONTAINER (alignment), drawingarea2);
637 gtk_box_pack_start (GTK_BOX (mainBox), alignment, FALSE, FALSE, 5);
639 g_signal_connect (G_OBJECT (drawingarea2), "expose_event",
640 G_CALLBACK (expose_event), NULL);
642 g_signal_connect (G_OBJECT (drawingarea2), "button_press_event",
643 G_CALLBACK (button_press_event), (gpointer) src2);
645 g_signal_connect (G_OBJECT (drawingarea2), "button_release_event",
646 G_CALLBACK (button_release_event), (gpointer) src2);
648 gtk_widget_set_events (drawingarea2, GDK_EXPOSURE_MASK
649 | GDK_BUTTON_PRESS_MASK | GDK_BUTTON_RELEASE_MASK);
651 gtk_widget_set_events (drawingarea2, GDK_EXPOSURE_MASK);
654 gtk_container_add (GTK_CONTAINER (view), mainBox);
656 hildon_app_set_appview (app, view);
657 gtk_widget_show_all (GTK_WIDGET (app));
659 hildon_program_add_window (app, view);
660 gtk_widget_show_all (GTK_WIDGET (view));
663 gtk_container_add (GTK_CONTAINER (mainWin), mainBox);
664 gtk_widget_show_all (GTK_WIDGET (mainWin));
667 gst_element_set_state (bin1, GST_STATE_PLAYING);
668 gst_element_set_state (bin2, GST_STATE_PLAYING);
670 gst_element_set_state (bin2, GST_STATE_NULL);
671 gst_element_set_state (bin1, GST_STATE_NULL);
673 gst_object_unref (bin1);
674 gst_object_unref (bin2);