Update of /cvsroot/alsa/alsa-lib/test
In directory sc8-pr-cvs1:/tmp/cvs-serv27549
Modified Files:
Makefile.am
Added Files:
queue_timer.c
Log Message:
Added queue_timer.c by Chris Cannam <[EMAIL PROTECTED]>
--- NEW FILE: queue_timer.c ---
#include <unistd.h>
#include <sys/time.h>
#include <alsa/asoundlib.h>
#include <alsa/seq.h>
void normalize(struct timeval *tv)
{
if (tv->tv_sec == 0) {
while (tv->tv_usec <= -1000000) { tv->tv_usec += 1000000; --tv->tv_sec; }
while (tv->tv_usec >= 1000000) { tv->tv_usec -= 1000000; ++tv->tv_sec; }
} else if (tv->tv_sec < 0) {
while (tv->tv_usec <= -1000000) { tv->tv_usec += 1000000; --tv->tv_sec; }
while (tv->tv_usec > 0) { tv->tv_usec -= 1000000; ++tv->tv_sec; }
} else {
while (tv->tv_usec >= 1000000) { tv->tv_usec -= 1000000; ++tv->tv_sec; }
while (tv->tv_usec < 0) { tv->tv_usec += 1000000; --tv->tv_sec; }
}
}
int
main(int argc, char **argv)
{
snd_seq_t *handle;
int portid;
int npfd;
struct pollfd *pfd;
int queue;
int i;
int rval;
struct timeval starttv, prevdiff;
int countdown = -1;
snd_seq_queue_timer_t *timer;
snd_timer_id_t *timerid;
if (snd_seq_open(&handle, "hw", SND_SEQ_OPEN_DUPLEX, 0) < 0) {
fprintf(stderr, "failed to open ALSA sequencer interface\n");
return 1;
}
snd_seq_set_client_name(handle, "generator");
if ((portid = snd_seq_create_simple_port
(handle, "generator",
SND_SEQ_PORT_CAP_READ | SND_SEQ_PORT_CAP_SUBS_READ, 0)) < 0) {
fprintf(stderr, "failed to create ALSA sequencer port\n");
return 1;
}
if ((queue = snd_seq_alloc_queue(handle)) < 0) {
fprintf(stderr, "failed to create ALSA sequencer queue\n");
return 1;
}
/*
snd_seq_queue_timer_alloca(&timer);
snd_seq_get_queue_timer(handle, queue, timer);
snd_timer_id_alloca(&timerid);
snd_timer_id_set_class(timerid, SND_TIMER_CLASS_PCM);
snd_timer_id_set_sclass(timerid, SND_TIMER_SCLASS_NONE);
snd_timer_id_set_card(timerid, 0);
snd_timer_id_set_device(timerid, 0);
snd_timer_id_set_subdevice(timerid, 0);
snd_seq_queue_timer_set_id(timer, timerid);
snd_seq_set_queue_timer(handle, queue, timer);
*/
snd_seq_start_queue(handle, queue, 0);
snd_seq_drain_output(handle);
gettimeofday(&starttv, 0);
prevdiff.tv_sec = 0;
prevdiff.tv_usec = 0;
while (countdown != 0) {
snd_seq_queue_status_t *status;
const snd_seq_real_time_t *rtime;
struct timeval tv, diff, diffdiff;
snd_seq_queue_status_alloca(&status);
snd_seq_get_queue_status(handle, queue, status);
rtime = snd_seq_queue_status_get_real_time(status);
gettimeofday(&tv, 0);
tv.tv_sec -= starttv.tv_sec;
tv.tv_usec -= starttv.tv_usec;
normalize(&tv);
diff.tv_sec = tv.tv_sec - rtime->tv_sec;
diff.tv_usec = tv.tv_usec - rtime->tv_nsec / 1000;
normalize(&diff);
diffdiff.tv_sec = diff.tv_sec - prevdiff.tv_sec;
diffdiff.tv_usec = diff.tv_usec - prevdiff.tv_usec;
normalize(&diffdiff);
prevdiff = diff;
fprintf(stderr, " real time: %12ld sec %8ld usec\nqueue time: %12ld sec %8ld
usec\n diff: %12ld sec %8ld usec\n diffdiff: %12ld sec %8ld usec\n",
tv.tv_sec, tv.tv_usec,
rtime->tv_sec, rtime->tv_nsec / 1000,
diff.tv_sec, diff.tv_usec,
diffdiff.tv_sec, diffdiff.tv_usec);
if (diffdiff.tv_usec > 5000 ||
diffdiff.tv_usec < -5000) {
fprintf(stderr, "oops! queue slipped\n");
if (tv.tv_sec < 5) {
fprintf(stderr, "(ignoring in first few seconds)\n");
} else {
countdown = 2;
}
} else {
if (countdown > 0) --countdown;
}
fprintf(stderr, "\n");
// sleep(1);
struct timespec ts;
ts.tv_sec = 0;
ts.tv_nsec = 500000000;
nanosleep(&ts, 0);
}
return EXIT_SUCCESS;
}
Index: Makefile.am
===================================================================
RCS file: /cvsroot/alsa/alsa-lib/test/Makefile.am,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- Makefile.am 5 Nov 2003 10:38:39 -0000 1.27
+++ Makefile.am 18 Dec 2003 12:14:17 -0000 1.28
@@ -1,6 +1,6 @@
check_PROGRAMS=control pcm latency seq \
playmidi1 timer rawmidi midiloop \
- omixer code oldapi
+ omixer code oldapi queue_timer
control_LDADD=../src/libasound.la
pcm_LDADD=../src/libasound.la
@@ -12,6 +12,7 @@
midiloop_LDADD=../src/libasound.la
omixer_LDADD=../src/libasound.la
oldapi_LDADD=../src/libasound.la
+queue_timer_LDADD=../src/libasound.la
code_CFLAGS=-Wall -pipe -g -O2
INCLUDES=-I$(top_srcdir)/include
-------------------------------------------------------
This SF.net email is sponsored by: IBM Linux Tutorials.
Become an expert in LINUX or just sharpen your skills. Sign up for IBM's
Free Linux Tutorials. Learn everything from the bash shell to sys admin.
Click now! http://ads.osdn.com/?ad_id=1278&alloc_id=3371&op=click
_______________________________________________
Alsa-cvslog mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/alsa-cvslog
