void play_sound_file(char *sound_file, int volume)
{
int count = specpdl_depth();
int input_fd;
unsigned char buffer[CHUNKSIZE];
int bytes_read;
AudioContext ac = (AudioContext) 0;
input_fd = open(sound_file, O_RDONLY);
if (input_fd == -1)
/* no error message -- this can't happen
because Fplay_sound_file has checked the
file for us. */
return;
record_unwind_protect(close_sound_file, make_int(input_fd));
while ((bytes_read = read(input_fd, buffer, CHUNKSIZE)) > 0) {
if (ac == (AudioContext) 0) {
ac = audio_initialize(buffer, bytes_read, volume);
if (ac == 0)
return;
} else {
ac->ac_data = buffer;
ac->ac_size = bytes_read;
}
play_internal(buffer, bytes_read, ac);
}
drain_audio_port(ac);
unbind_to(count, Qnil);
}
void Init_All()
{
srand(time(NULL));
graphics_initialize();
audio_initialize(255);
sprite_initialize_list(1024);
level_initialize_list();
}
void play_sound_data(unsigned char *data, int length, int volume)
{
int count = specpdl_depth();
AudioContext ac;
ac = audio_initialize(data, length, volume);
if (ac == (AudioContext) 0)
return;
play_internal(data, length, ac);
drain_audio_port(ac);
unbind_to(count, Qnil);
}
int main(int argc, char **argv)
{
int err;
#ifdef __APPLE__
char *cfrespath;
CFBundleRef mainBundle;
CFURLRef res;
CFStringRef respathref;
#endif
// load config file from user's homedir
dotfile_load();
// calculate tables for supersaw
calc_supersaw_tables();
// init data on all pages to defaults
synth_init();
patch_init();
pattern_init();
sequencer_init();
// init glut
glutInit(&argc, argv);
glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH);
glutInitWindowSize(DS_WIDTH,DS_HEIGHT);
glutCreateWindow("komposter");
glutIgnoreKeyRepeat(1);
#ifdef __APPLE__
// get application bundle base path
mainBundle=CFBundleGetMainBundle();
res=CFBundleCopyBundleURL(mainBundle);
respathref=CFURLCopyFileSystemPath(res, 0);
cfrespath=(char*)CFStringGetCStringPtr(respathref, kCFStringEncodingISOLatin1);
if (!cfrespath) {
cfrespath=malloc(512);
CFStringGetCString(respathref, cfrespath, 511, kCFStringEncodingISOLatin1);
strncpy(respath, cfrespath, 511);
free(cfrespath);
} else {
strncpy(respath, cfrespath, 511);
}
strncat(respath, "/Contents/Resources/", 511); // append the resource dir
#else
#ifdef RESOURCEPATH
if(is_dir(RESOURCEPATH))
{
strncpy(respath, RESOURCEPATH, 511);
}
else
{
fprintf(stderr, "'%s' not found, trying relative path\n", RESOURCEPATH);
strncpy(respath, "resources/", 511);
}
#else
strncpy(respath, "resources/", 512);
#endif
#endif
printf("Resource path is %s\n", respath);
// init freetype
err=font_init();
if (!err) {
printf("Error initializing Freetype!\n");
return 0;
}
// set glut callbacks
glutKeyboardFunc(keyboardfunc);
glutKeyboardUpFunc(keyboardupfunc);
glutMouseFunc(mouse_clickfunc);
glutMotionFunc(mouse_dragfunc);
glutSpecialFunc(specialkeyfunc);
glutPassiveMotionFunc(mouse_hoverfunc);
// init memory manager
kmm_init();
// set up screen and fire up the update timer
cpage=MAIN_PAGE4;
glutDisplayFunc(display);
glutTimerFunc(20, update, 1);
dialog_open(&about_draw, &about_hover, &about_click);
// start audio and opengl mainloop
atexit(cleanup);
if (!audio_initialize()) {
printf("Failed to initialize audio playback - sound is disabled.\n");
} else {
err = pthread_create(&audiothread, NULL, audio_playback, (void *)NULL);
}
err = pthread_create(&renderthread, NULL, audio_renderer, (void *)NULL);
glutMainLoop();
return 0;
}
/* Initialize the server - return fd of the listening socket or -1 on error */
void server_init (int debugging, int foreground)
{
struct sockaddr_un sock_name;
pid_t pid;
logit ("Starting MOC Server");
assert (server_sock == -1);
pid = check_pid_file ();
if (pid && valid_pid(pid)) {
fprintf (stderr, "\nIt seems that the server is already running"
" with pid %d.\n", pid);
fprintf (stderr, "If it is not true, remove the pid file (%s)"
" and try again.\n",
create_file_name(PID_FILE));
fatal ("Exiting!");
}
if (foreground)
log_init_stream (stdout, "stdout");
else {
FILE *logfp;
logfp = NULL;
if (debugging) {
logfp = fopen (SERVER_LOG, "a");
if (!logfp)
fatal ("Can't open server log file: %s", xstrerror (errno));
}
log_init_stream (logfp, SERVER_LOG);
}
if (pipe(wake_up_pipe) < 0)
fatal ("pipe() failed: %s", xstrerror (errno));
unlink (socket_name());
/* Create a socket.
* For reasons why AF_UNIX is the correct constant to use in both
* cases, see the commentary the SVN log for commit r9999. */
server_sock = socket (AF_UNIX, SOCK_STREAM, 0);
if (server_sock == -1)
fatal ("Can't create socket: %s", xstrerror (errno));
sock_name.sun_family = AF_UNIX;
strcpy (sock_name.sun_path, socket_name());
/* Bind to socket */
if (bind(server_sock, (struct sockaddr *)&sock_name, SUN_LEN(&sock_name)) == -1)
fatal ("Can't bind() to the socket: %s", xstrerror (errno));
if (listen(server_sock, 1) == -1)
fatal ("listen() failed: %s", xstrerror (errno));
/* Log stack sizes so stack overflows can be debugged. */
log_process_stack_size ();
log_pthread_stack_size ();
clients_init ();
audio_initialize ();
tags_cache = tags_cache_new (options_get_int("TagsCacheSize"));
tags_cache_load (tags_cache, create_file_name("cache"));
server_tid = pthread_self ();
xsignal (SIGTERM, sig_exit);
xsignal (SIGINT, foreground ? sig_exit : SIG_IGN);
xsignal (SIGHUP, SIG_IGN);
xsignal (SIGQUIT, sig_exit);
xsignal (SIGPIPE, SIG_IGN);
xsignal (SIGCHLD, sig_chld);
write_pid_file ();
if (!foreground) {
setsid ();
redirect_output (stdin);
redirect_output (stdout);
redirect_output (stderr);
}
return;
}
/* Initialize the server - return fd of the listening socket or -1 on error */
int server_init (int debugging, int foreground)
{
struct sockaddr_un sock_name;
int server_sock;
int pid;
logit ("Starting MOC Server");
pid = check_pid_file ();
if (pid && valid_pid(pid)) {
fprintf (stderr, "\nIt seems that the server is already running"
" with pid %d.\n", pid);
fprintf (stderr, "If it is not true, remove the pid file (%s)"
" and try again.\n",
create_file_name(PID_FILE));
fatal ("Exiting!");
}
if (foreground)
log_init_stream (stdout, "stdout");
else {
FILE *logfp;
logfp = NULL;
if (debugging) {
logfp = fopen (SERVER_LOG, "a");
if (!logfp)
fatal ("Can't open server log file: %s", strerror (errno));
}
log_init_stream (logfp, SERVER_LOG);
}
if (pipe(wake_up_pipe) < 0)
fatal ("pipe() failed: %s", strerror(errno));
unlink (socket_name());
/* Create a socket */
if ((server_sock = socket (PF_LOCAL, SOCK_STREAM, 0)) == -1)
fatal ("Can't create socket: %s", strerror(errno));
sock_name.sun_family = AF_LOCAL;
strcpy (sock_name.sun_path, socket_name());
/* Bind to socket */
if (bind(server_sock, (struct sockaddr *)&sock_name, SUN_LEN(&sock_name)) == -1)
fatal ("Can't bind() to the socket: %s", strerror(errno));
if (listen(server_sock, 1) == -1)
fatal ("listen() failed: %s", strerror(errno));
audio_initialize ();
tags_cache_init (&tags_cache, options_get_int("TagsCacheSize"));
tags_cache_load (&tags_cache, create_file_name("cache"));
clients_init ();
server_tid = pthread_self ();
thread_signal (SIGTERM, sig_exit);
thread_signal (SIGINT, foreground ? sig_exit : SIG_IGN);
thread_signal (SIGHUP, SIG_IGN);
thread_signal (SIGQUIT, sig_exit);
thread_signal (SIGPIPE, SIG_IGN);
write_pid_file ();
if (!foreground) {
setsid ();
redirect_output (stdin);
redirect_output (stdout);
redirect_output (stderr);
}
return server_sock;
}
int main(void) {
//Variable Declarations
initSolenoid(); /* initialize solenoid valve */
TIM_TIMERCFG_Type timerCfg;
initTimeStruct();
RTC_TIME_Type* watertime = malloc(sizeof(RTC_TIME_Type));
uint8 fed = 0;
uint8 watered = 0;
watertime->HOUR = 5;
watertime->MIN = 0;
//Initialize timer0 for delays
TIM_ConfigStructInit(TIM_TIMER_MODE, &timerCfg); /* initialize timer config struct */
TIM_Init(LPC_TIM0, TIM_TIMER_MODE, &timerCfg); /* initialize timer0 */
//Initialize Real Time Clock
RTC_Init(LPC_RTC);
RTC_Cmd(LPC_RTC, ENABLE);
RTC_ResetClockTickCounter(LPC_RTC);
// Initialize Peripherals
INIT_SDRAM(); /* initialize SDRAM */
servoInit(); /* initialize FSR servo motor for panning camera */
initStepper(); /* initialize stepper motor for dispensing food */
initFSR(); /* initialize force sensitive resistor circuit for food and water full signals */
initWiFi(AUTO_CONNECT); /* initialize WiFi module -- must be attached*/
audio_initialize();
audio_reset();
//audio_test();
audio_setupMP3();
int i = 0, retval;
uint32 length; /* length variable for photo */
printf("Entering while loop\n\r");
//audio_storeVoice();
// Enter an infinite loop
while(1) {
if(STATE == DISPENSING_FOOD){
printf("Entering food dispense state\n\r");
/* Execute commands to dispense food */
//spinUntilFull();
spinStepper(300);
reverseSpin(250);
STATE = CONNECTED;
}
if(STATE == DISPENSING_WATER){
printf("Entering water dispense state\n\r");
/* Execute commands to dispense water */
fillWater();
STATE = CONNECTED;
}
if(STATE == CAPTURING){
printf("Entering camera taking state\n\r");
/* Initialize camera and set it up to take a picture */
if(cameraInit())
printf("Camera not initialized!\n\r");
retval = stopFrame();
length = getBufferLength();
printf("length: %i\n\r", length);
/* Send length to Android application */
int temp_len = length;
while(temp_len){
uart1PutChar(temp_len % 10);
temp_len = temp_len / 10;
}
/* Send photo and finish set up */
getAndSendPhoto(length);
resumeFrame();
STATE = CONNECTED;
}
if(STATE == TALKING1){
audio_playVoice(1);
STATE = CONNECTED;
}
if(STATE == TALKING2){
audio_playVoice(2);
STATE = CONNECTED;
}
if(STATE == TALKING3){
audio_playVoice(3);
STATE = CONNECTED;
}
if(STATE == PAN_LEFT){
/* Execute commands to pan servo left */
panServo(LEFT);
STATE = CONNECTED;
}
if(STATE == PAN_RIGHT){
/* Execute commands to pan servo right */
panServo(RIGHT);
STATE = CONNECTED;
}
if(STATE == SCHEDULING){
/* Execute commands to schedule a feeding time */
STATE = CONNECTED;
}
/* Scheduling */
RTC_GetFullTime(LPC_RTC, time);
//Fill water bowl at predetermined time
if (time->HOUR == watertime->HOUR + 1 && watered == 1)
watered = 0;
if (watertime->HOUR == time->HOUR && watertime->MIN < time->MIN && watered == 0)
{
fillWater();
watered = 1;
}
//Feed dog on schedule if any cannot feed dog two consecutive hours
for(i = 0; i < scheduled_feeds; i++)
{
if (time->HOUR == feedtime[i]->HOUR + 1 && fed == 1)
fed = 0;
if (feedtime[i]->HOUR == time->HOUR && feedtime[i]->MIN < time->MIN && fed == 0)
{
spinUntilFull();
fed = 1;
}
}
}
return 0;
}
EXPORT int iaxc_initialize(int num_calls)
{
int i;
int port;
os_init();
setup_jb_output();
MUTEXINIT(&iaxc_lock);
MUTEXINIT(&event_queue_lock);
iaxc_set_audio_prefs(0);
if ( iaxc_recvfrom != (iaxc_recvfrom_t)recvfrom )
iax_set_networking(iaxc_sendto, iaxc_recvfrom);
/* Note that iax_init() only sets up the receive port when the
* sendto/recvfrom functions have not been replaced. We need
* to call iaxc_init in either case because there is other
* initialization beyond the socket setup that needs to be done.
*/
if ( (port = iax_init(source_udp_port)) < 0 )
{
iaxci_usermsg(IAXC_ERROR,
"Fatal error: failed to initialize iax with port %d",
port);
return -1;
}
if ( iaxc_recvfrom == (iaxc_recvfrom_t)recvfrom )
iaxci_bound_port = port;
else
iaxci_bound_port = -1;
/* tweak the jitterbuffer settings */
iax_set_jb_target_extra( jb_target_extra );
max_calls = num_calls;
/* initialize calls */
if ( max_calls <= 0 )
max_calls = 1; /* 0 == Default? */
/* calloc zeroes for us */
calls = (struct iaxc_call *)calloc(sizeof(struct iaxc_call), max_calls);
if ( !calls )
{
iaxci_usermsg(IAXC_ERROR, "Fatal error: can't allocate memory");
return -1;
}
selected_call = -1;
for ( i = 0; i < max_calls; i++ )
{
strncpy(calls[i].callerid_name, DEFAULT_CALLERID_NAME, IAXC_EVENT_BUFSIZ);
strncpy(calls[i].callerid_number, DEFAULT_CALLERID_NUMBER, IAXC_EVENT_BUFSIZ);
}
if ( !test_mode )
{
audio_initialize();
#ifndef AUDIO_ALSA
if ( pa_initialize(&audio_driver, 8000) )
{
iaxci_usermsg(IAXC_ERROR, "failed pa_initialize");
return -1;
}
#else
/* TODO: It is unknown whether this stuff for direct access to
* alsa should be left in iaxclient. We're leaving it in here for
* the time being, but unless it becomes clear that someone cares
* about having it, it will be removed. Also note that portaudio
* is capable of using alsa. This is another reason why this
* direct alsa access may be unneeded.
*/
if ( alsa_initialize(&audio_driver, 8000) )
return -1;
#endif
}
#ifdef USE_VIDEO
if ( video_initialize() )
iaxci_usermsg(IAXC_ERROR,
"iaxc_initialize: cannot initialize video!\n");
#endif
/* Default audio format capabilities */
audio_format_capability =
IAXC_FORMAT_ULAW |
IAXC_FORMAT_ALAW |
#ifdef CODEC_GSM
IAXC_FORMAT_GSM |
#endif
IAXC_FORMAT_SPEEX;
audio_format_preferred = IAXC_FORMAT_SPEEX;
return 0;
}
