4 * This file is part of BeRTOS.
6 * Bertos is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
20 * As a special exception, you may use this file as part of a free software
21 * library without restriction. Specifically, if other files instantiate
22 * templates or use macros or inline functions from this file, or you compile
23 * this file and link it with other files to produce an executable, this
24 * file does not by itself cause the resulting executable to be covered by
25 * the GNU General Public License. This exception does not however
26 * invalidate any other reasons why the executable file might be covered by
27 * the GNU General Public License.
29 * Copyright 2011 Develer S.r.l. (http://www.develer.com/)
33 * \brief Atmel SAM3X-EK testcase
35 * \author Stefano Fedrigo <aleph@develer.com>
40 #include "hw/hw_led.h"
41 #include "hw/hw_lcd.h"
42 #include "hw/hw_adc.h"
43 #include "hw/hw_sdram.h"
46 #include "cfg/cfg_i2s.h"
48 #include <cfg/debug.h>
51 #include <cpu/byteorder.h>
57 #include <drv/timer.h>
58 #include <drv/lcd_hx8347.h>
60 #include <drv/wm8731.h>
61 #include <drv/dmac_sam3.h>
68 #include <icons/logo.h>
71 #include <io/kfile_block.h>
73 #include <kern/signal.h>
74 #include <kern/proc.h>
81 #include <struct/list.h>
90 #define KEY_MASK (K_LEFT | K_RIGHT)
93 * Codec has 7-bit address, the eighth is the R/W bit, so we
94 * write the codec address with one bit shifted left
96 #define CODEC_ADDR 0x36
99 static PROC_DEFINE_STACK(play_proc_stack, 1024);
100 static PROC_DEFINE_STACK(rec_proc_stack, 1024);
101 MsgPort proc_play_inPort;
102 MsgPort proc_rec_inPort;
104 #define MAX_ITEM_NODES 30
105 #define MAX_ITEMS_ROW 15
106 #define NEXT_ITEM_COL 10
108 typedef struct FileItemNode
114 typedef struct AudioMsg
120 FileItemNode item_nodes[MAX_ITEM_NODES];
124 // SD fat filesystem context
132 static Wm8731 wm8731_ctx;
134 static uint8_t raster[RAST_SIZE(LCD_WIDTH, LCD_HEIGHT)];
135 static Bitmap lcd_bitmap;
136 extern Font font_gohu;
137 static int lcd_brightness = LCD_BACKLIGHT_MAX;
138 static uint16_t headphone_volume = 90;
139 static size_t played_size = 0;
140 static size_t recorded_size = 0;
141 static bool is_playing = false;
142 static bool is_recording = false;
143 static int recorderd_file_idx;
145 static void codec_play(struct I2s *i2s, void *_buf, size_t len)
147 played_size += kfile_read(&play_file.fd, _buf, len);
148 if (played_size >= play_file.fat_file.fsize - sizeof(WavHdr))
150 kprintf("stop %d\n", played_size);
157 static void codec_rec(struct I2s *i2s, void *buf, size_t len)
162 ASSERT(&rec_file.fd);
164 recorded_size += kfile_write(&rec_file.fd, buf, len);
167 static void NORETURN play_proc(void)
171 event_wait(&proc_play_inPort.event);
173 play = (AudioMsg *)msg_get(&proc_play_inPort);
174 if (play && SD_CARD_PRESENT())
178 bool sd_ok = sd_init(&sd, NULL, 0);
183 kprintf("Mount FAT filesystem.\n");
185 result = f_mount(0, &fs);
188 kprintf("Mounting FAT volumes error[%d]\n", result);
194 result = fatfile_open(&play_file, play->file_name, FA_OPEN_EXISTING | FA_READ);
197 kprintf("Open file: %s size %ld\n", play->file_name, play_file.fat_file.fsize);
199 kfile_read(&play_file.fd, &wav, sizeof(WavHdr));
200 if (wav_checkHdr(&wav, 1, CONFIG_CHANNEL_NUM, CONFIG_SAMPLE_FREQ, CONFIG_WORD_BIT_SIZE) != -1)
202 kputs("Wav file play..\n");
204 wm8731_setVolume(&wm8731_ctx, WM8731_HEADPHONE, headphone_volume);
206 i2s_dmaStartTxStreaming(&i2s, tmp, sizeof(tmp), sizeof(tmp) / 2, codec_play);
208 wm8731_setVolume(&wm8731_ctx, WM8731_HEADPHONE, 0);
211 // Flush data and close the files.
212 kfile_flush(&play_file.fd);
213 kfile_close(&play_file.fd);
217 kprintf("Unable to open file: '%s' error[%d]\n", play->file_name, result);
227 static void NORETURN rec_proc(void)
231 event_wait(&proc_rec_inPort.event);
233 rec = (AudioMsg *)msg_get(&proc_rec_inPort);
234 if (rec && SD_CARD_PRESENT())
238 bool sd_ok = sd_init(&sd, NULL, 0);
243 kprintf("Mount FAT filesystem.\n");
245 result = f_mount(0, &fs);
248 kprintf("Mounting FAT volumes error[%d]\n", result);
254 result = fatfile_open(&rec_file, rec->file_name, FA_CREATE_ALWAYS | FA_WRITE);
257 kprintf("Open file: %s size %ld\n", rec->file_name, rec_file.fat_file.fsize);
258 kputs("Rec Wav file..\n");
260 // Leave place for wav header
261 kfile_seek(&rec_file.fd, sizeof(WavHdr), KSM_SEEK_SET);
263 i2s_dmaStartRxStreaming(&i2s, tmp, sizeof(tmp), sizeof(tmp) / 2, codec_rec);
267 wav_writeHdr(&wav, recorded_size, 1, CONFIG_CHANNEL_NUM, CONFIG_SAMPLE_FREQ, CONFIG_WORD_BIT_SIZE);
268 kfile_seek(&rec_file.fd, 0, KSM_SEEK_SET);
269 kfile_write(&rec_file.fd, &wav, sizeof(WavHdr));
271 // Flush data and close the files.
272 kfile_flush(&rec_file.fd);
273 kfile_close(&rec_file.fd);
277 kprintf("Unable to open file: '%s' error[%d]\n", rec->file_name, result);
287 INLINE void start_play(char *file_name)
292 memcpy(play_msg.file_name, file_name, sizeof(play_msg.file_name));
293 msg_put(&proc_play_inPort, &play_msg.msg);
296 INLINE void stop_play(void)
303 INLINE void start_rec(char *file_name)
308 memcpy(rec_msg.file_name, file_name, sizeof(rec_msg.file_name));
309 msg_put(&proc_rec_inPort, &rec_msg.msg);
312 INLINE void stop_rec(void)
315 is_recording = false;
318 INLINE FileItemNode *select_item(Bitmap *bm, List *file_list, int select_idx)
321 FileItemNode *select_node;
326 select_node = (FileItemNode *)LIST_HEAD(file_list);
327 FOREACH_NODE(item, file_list)
329 if (row > MAX_ITEMS_ROW)
335 text_style(bm, 0, STYLEF_MASK);
336 if (select_idx <= MAX_ITEMS_ROW)
338 if (row == select_idx && col == 0)
340 text_style(bm, STYLEF_INVERT, STYLEF_INVERT);
346 if (row == (select_idx - MAX_ITEMS_ROW) && col == NEXT_ITEM_COL)
348 text_style(bm, STYLEF_INVERT, STYLEF_INVERT);
353 text_xprintf(bm, row, col, TEXT_NORMAL, "%s", item->file_name);
357 lcd_hx8347_blitBitmap(bm);
362 static void play_menu(Bitmap *bm)
365 LIST_INIT(&file_list);
366 int file_list_size = 0;
369 memcpy (&item_nodes[0].file_name, "<- Return..", sizeof(item_nodes[0].file_name));
370 ADDTAIL(&file_list, &item_nodes[0].n);
372 if (SD_CARD_PRESENT())
376 bool sd_ok = sd_init(&sd, NULL, 0);
381 kprintf("Mount FAT filesystem.\n");
382 result = f_mount(0, &fs);
385 kprintf("Mounting FAT volumes error[%d]\n", result);
395 /* Open the directory */
396 result = f_opendir(&dir, "/");
399 // First element is reserved for "return" label
400 for (int i = 1;; i++)
402 /* Read a directory item */
403 result = f_readdir(&dir, &fno);
404 if (result != FR_OK || fno.fname[0] == 0)
405 break; /* Break on error or end of dir */
406 if (fno.fname[0] == '.')
407 continue; /* Ignore dot entry */
408 if (fno.fattrib & AM_DIR)
412 if (i < MAX_ITEM_NODES)
414 memcpy (&item_nodes[i].file_name, fno.fname, sizeof(item_nodes[i].file_name));
415 ADDTAIL(&file_list, &item_nodes[i].n);
417 kprintf("%s\n", item_nodes[i].file_name);
421 kputs("No enought space to store items in list\n");
434 kputs("No card insert..\n");
435 text_xprintf(bm, 5, 0, TEXT_CENTER | TEXT_FILL, "%s", "No card insert..");
439 FileItemNode *selected_node = NULL;
440 select_item(bm, &file_list, idx);
443 keymask_t key = kbd_peek();
444 if ((key & K_LEFT) && !is_playing)
447 if (idx > file_list_size)
450 selected_node = select_item(bm, &file_list, idx);
458 start_play(selected_node->file_name);
468 static void rec_menu(Bitmap *bm)
471 text_style(bm, STYLEF_BOLD | STYLEF_UNDERLINE, STYLEF_BOLD | STYLEF_UNDERLINE);
472 text_xprintf(bm, 0, 0, TEXT_CENTER | TEXT_FILL, "Microphone recorder.");
473 text_style(bm, 0, STYLEF_MASK);
474 text_xprintf(bm, 2, 0, TEXT_NORMAL, "Press RIGHT button to start recording");
475 text_xprintf(bm, 3, 0, TEXT_NORMAL, "and to stop it re-press RIGHT button.");
476 lcd_hx8347_blitBitmap(bm);
481 keymask_t key = kbd_peek();
482 if ((key & K_LEFT) && (!is_recording))
489 memset(file_name, 0, sizeof(file_name));
490 sprintf(file_name, "REC%d.WAV", recorderd_file_idx);
491 kprintf("rec %s\n", file_name);
495 start_rec(file_name);
496 text_xprintf(bm, 5, 0, TEXT_CENTER | TEXT_FILL, "Start recording on file: %s", file_name);
497 text_xprintf(bm, 6, 0, TEXT_CENTER | TEXT_FILL, " ");
498 lcd_hx8347_blitBitmap(bm);
499 start = timer_clock();
504 recorderd_file_idx++;
505 text_xprintf(bm, 5, 0, TEXT_CENTER | TEXT_FILL, "Stop recording: %s", file_name);
506 mtime_t elaps = ticks_to_ms(timer_clock() - start);
507 text_xprintf(bm, 6, 0, TEXT_CENTER | TEXT_FILL, "Recorded: %ld.%ldsec", elaps / 1000, elaps % 1000);
508 lcd_hx8347_blitBitmap(bm);
521 static void setBrightness(Bitmap *bm)
526 text_xprintf(bm, 1, 0, TEXT_FILL | TEXT_CENTER, "Brightness: %d", lcd_brightness);
527 text_xprintf(bm, 3, 0, TEXT_FILL | TEXT_CENTER, "RIGHT key: change");
528 text_xprintf(bm, 4, 0, TEXT_FILL | TEXT_CENTER, "LEFT key: back ");
529 lcd_hx8347_blitBitmap(bm);
531 keymask_t mask = kbd_get();
535 else if (mask & K_RIGHT)
537 if (++lcd_brightness > LCD_BACKLIGHT_MAX)
539 lcd_setBacklight(lcd_brightness);
544 static void setVolume(Bitmap *bm)
547 text_style(bm, STYLEF_BOLD | STYLEF_UNDERLINE, STYLEF_BOLD | STYLEF_UNDERLINE);
548 text_xprintf(bm, 0, 0, TEXT_CENTER, "Headphone Volume");
549 text_style(bm, 0, STYLEF_MASK);
550 text_xprintf(bm, 2, 0, TEXT_NORMAL, "Turn VR1 potentiometer to adjust it.");
554 headphone_volume = ADC_RANGECONV(adc_read(1), 0, 100);
555 text_xprintf(bm, 5, 0, TEXT_FILL | TEXT_CENTER, "Volume %d%%", headphone_volume);
556 lcd_hx8347_blitBitmap(bm);
559 if (kbd_peek() & KEY_MASK)
564 static void NORETURN soft_reset(Bitmap * bm)
571 text_xprintf(bm, 2, 0, TEXT_FILL | TEXT_CENTER, "%d", i);
572 lcd_hx8347_blitBitmap(bm);
575 text_xprintf(bm, 2, 0, TEXT_FILL | TEXT_CENTER, "REBOOT");
576 lcd_hx8347_blitBitmap(bm);
579 /* Perform a software reset request */
580 HWREG(NVIC_APINT) = NVIC_APINT_VECTKEY | NVIC_APINT_SYSRESETREQ;
585 static struct MenuItem main_items[] =
587 { (const_iptr_t)"Play SD file", 0, (MenuHook)play_menu, (iptr_t)&lcd_bitmap },
588 { (const_iptr_t)"Record file on SD", 0, (MenuHook)rec_menu, (iptr_t)&lcd_bitmap },
589 { (const_iptr_t)"Set brightness", 0, (MenuHook)setBrightness, (iptr_t)&lcd_bitmap },
590 { (const_iptr_t)"Set volume", 0, (MenuHook)setVolume, (iptr_t)&lcd_bitmap },
591 { (const_iptr_t)"Reboot", 0, (MenuHook)soft_reset, (iptr_t)&lcd_bitmap },
592 { (const_iptr_t)0, 0, NULL, (iptr_t)0 }
594 static struct Menu main_menu = { main_items, "BeRTOS", MF_STICKY | MF_SAVESEL, &lcd_bitmap, 0, lcd_hx8347_blitBitmap };
609 kprintf("sam3x %s: %d times\n", VERS_HOST, VERS_BUILD);
612 i2c_init(&i2c, I2C_BITBANG0, CONFIG_I2C_FREQ);
613 i2s_init(&i2s, SSC0);
615 wm8731_init(&wm8731_ctx, &i2c, CODEC_ADDR);
616 wm8731_setVolume(&wm8731_ctx, WM8731_HEADPHONE, 0);
618 kprintf("CPU Frequecy:%ld\n", CPU_FREQ);
621 lcd_setBacklight(lcd_brightness);
623 gfx_bitmapInit(&lcd_bitmap, raster, LCD_WIDTH, LCD_HEIGHT);
624 gfx_setFont(&lcd_bitmap, &font_luBS14);
625 lcd_hx8347_blitBitmap(&lcd_bitmap);
629 proc_new(play_proc, NULL, sizeof(play_proc_stack), play_proc_stack);
630 proc_new(rec_proc, NULL, sizeof(rec_proc_stack), rec_proc_stack);
631 msg_initPort(&proc_play_inPort, event_createGeneric());
632 msg_initPort(&proc_rec_inPort, event_createGeneric());
634 lcd_hx8347_blitBitmap24(10, 52, BMP_LOGO_WIDTH, BMP_LOGO_HEIGHT, bmp_logo);
640 menu_handle(&main_menu);