#include	"dat.h"#include	"fns.h"#include	"error.h"#include	"audio.h" Dirtab audiotab[] ={	".",		{Qdir, 0, QTDIR},	0,	0555,	"audio",	{Qaudio},	0,	0666,	"audioctl",	{Qaudioctl},	0,	0666,}; static voidaudioinit(void){	audio_file_init();} static Chan*audioattach(char *spec){	return devattach('A', spec);} static Walkqid*audiowalk(Chan *c, Chan *nc, char **name, int nname){	return devwalk(c, nc, name, nname, audiotab, nelem(audiotab), devgen);} static intaudiostat(Chan *c, uchar *db, int n){	return devstat(c, db, n, audiotab, nelem(audiotab), devgen);} static Chan*audioopen(Chan *c, int omode){	c = devopen(c, omode, audiotab, nelem(audiotab), devgen);	if(waserror()){		c->flag &= ~COPEN;		nexterror();	}	switch(c->qid.path) {	case Qdir:	case Qaudioctl:		break;	case Qaudio:		audio_file_open(c, c->mode);		break;	default:		error(Egreg);	}	poperror();	return c;} static voidaudioclose(Chan *c){	if((c->flag & COPEN) == 0)		return; 	switch(c->qid.path) {	case Qdir:	case Qaudioctl:		break;	case Qaudio:		audio_file_close(c);		break;	default:		error(Egreg);	}} static int ctlsummary(char*, int, Audio_t*); static longaudioread(Chan *c, void *va, long count, vlong offset){	char *buf;	int n; 	if(c->qid.type & QTDIR)		return devdirread(c, va, count, audiotab, nelem(audiotab), devgen);	switch(c->qid.path) {	case Qaudio:		return audio_file_read(c, va, count, offset);	case Qaudioctl:		buf = smalloc(READSTR);		if(waserror()){			free(buf);			nexterror();		}		n = ctlsummary(buf, READSTR, getaudiodev());		count = readstr(offset, va, n, buf);		poperror();		free(buf);		return count;	}	return 0;} static longaudiowrite(Chan *c, void *va, long count, vlong offset){	switch(c->qid.path) {	case Qaudio:		return audio_file_write(c, va, count, offset);	case Qaudioctl:		return audio_ctl_write(c, va, count, offset);	}	return 0;} static int sval(char*, unsigned long*, ulong, ulong);static int str2val(svp_t*, char*, ulong*);static char* val2str(svp_t*, ulong); intaudioparse(char* args, int len, Audio_t *t){	int i, n;	ulong v;	Cmdbuf *cb;	ulong tf;	Audio_t info = *t; 	cb = parsecmd(args, len);	if(waserror()){		free(cb);		return 0;	} 	tf = 0;	n = cb->nf;	for(i = 0; i < cb->nf-1; i++) {		if(strcmp(cb->f[i], "in") == 0){			tf |= AUDIO_IN_FLAG;			continue;		}		if(strcmp(cb->f[i], "out") == 0) {			tf |= AUDIO_OUT_FLAG;			continue;		}		if(tf == 0)			tf = AUDIO_IN_FLAG | AUDIO_OUT_FLAG;		if(strcmp(cb->f[i], "bits") == 0) {			if(!str2val(audio_bits_tbl, cb->f[i+1], &v))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_BITS_FLAG | AUDIO_MOD_FLAG;				info.in.bits = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_BITS_FLAG | AUDIO_MOD_FLAG;				info.out.bits = v;			}		} else if(strcmp(cb->f[i], "buf") == 0) {			if(!sval(cb->f[i+1], &v, Audio_Max_Val, Audio_Min_Val))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_BUF_FLAG | AUDIO_MOD_FLAG;				info.in.buf = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_BUF_FLAG | AUDIO_MOD_FLAG;				info.out.buf = v;			}		} else if(strcmp(cb->f[i], "chans") == 0) {			if(!str2val(audio_chan_tbl, cb->f[i+1], &v))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_CHAN_FLAG | AUDIO_MOD_FLAG;				info.in.chan = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_CHAN_FLAG | AUDIO_MOD_FLAG;				info.out.chan = v;			}		} else if(strcmp(cb->f[i], "indev") == 0) {			if(!str2val(audio_indev_tbl, cb->f[i+1], &v))				break;			i++;			info.in.flags |= AUDIO_DEV_FLAG | AUDIO_MOD_FLAG;			info.in.dev = v;		} else if(strcmp(cb->f[i], "outdev") == 0) {			if(!str2val(audio_outdev_tbl, cb->f[i+1], &v))				break;			i++;			info.out.flags |= AUDIO_DEV_FLAG | AUDIO_MOD_FLAG;			info.out.dev = v;		} else if(strcmp(cb->f[i], "enc") == 0) {			if(!str2val(audio_enc_tbl, cb->f[i+1], &v))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_ENC_FLAG | AUDIO_MOD_FLAG;				info.in.enc = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_ENC_FLAG | AUDIO_MOD_FLAG;				info.out.enc = v;			}		} else if(strcmp(cb->f[i], "rate") == 0) {			if(!str2val(audio_rate_tbl, cb->f[i+1], &v))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_RATE_FLAG | AUDIO_MOD_FLAG;				info.in.rate = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_RATE_FLAG | AUDIO_MOD_FLAG;				info.out.rate = v;			}		} else if(strcmp(cb->f[i], "vol") == 0) {			if(!sval(cb->f[i+1], &v, Audio_Max_Val, Audio_Min_Val))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_VOL_FLAG | AUDIO_MOD_FLAG;				info.in.left = v;				info.in.right = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_VOL_FLAG | AUDIO_MOD_FLAG;				info.out.left = v;				info.out.right = v;			}		} else if(strcmp(cb->f[i], "left") == 0) {			if(!sval(cb->f[i+1], &v, Audio_Max_Val, Audio_Min_Val))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_LEFT_FLAG | AUDIO_MOD_FLAG;				info.in.left = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_LEFT_FLAG | AUDIO_MOD_FLAG;				info.out.left = v;			}		} else if(strcmp(cb->f[i], "right") == 0) {			if(!sval(cb->f[i+1], &v, Audio_Max_Val, Audio_Min_Val))				break;			i++;			if(tf & AUDIO_IN_FLAG) {				info.in.flags |= AUDIO_RIGHT_FLAG | AUDIO_MOD_FLAG;				info.in.right = v;			}			if(tf & AUDIO_OUT_FLAG) {				info.out.flags |= AUDIO_RIGHT_FLAG | AUDIO_MOD_FLAG;				info.out.right = v;			}		}else			break;	}	poperror();	free(cb); 	if(i < n)		return 0; 	*t = info;	/* set information back */	return 1;} static char*audioparam(char* p, char* e, char* name, int val, svp_t* tbl){	char *s;	svp_t *sv; 	if((s = val2str(tbl, val)) != nil){		p = seprint(p, e, "%s %s", name, s);	/* current setting */		for(sv = tbl; sv->s != nil; sv++)			if(sv->v != val)				p = seprint(p, e, " %s", sv->s);	/* other possible values */		p = seprint(p, e, "\n");	}else		p = seprint(p, e, "%s unknown\n", name);	return p;} static char*audioioparam(char* p, char* e, char* name, int ival, int oval, svp_t* tbl){	if(ival == oval)		return audioparam(p, e, name, ival, tbl);	p = audioparam(seprint(p, e, "in "), e, name, ival, tbl);	p = audioparam(seprint(p, e, "out "), e, name, oval, tbl);	return p;} static intctlsummary(char *buf, int bsize, Audio_t *adev){	Audio_d *in, *out;	char	*p, *e; 	in = &adev->in;	out = &adev->out; 	p = buf;	e = p + bsize; 	p = audioparam(p, e, "indev", in->dev, audio_indev_tbl);	p = audioparam(p, e, "outdev", out->dev, audio_outdev_tbl);	p = audioioparam(p, e, "enc", in->enc, out->enc, audio_enc_tbl);	p = audioioparam(p, e, "rate", in->rate, out->rate, audio_rate_tbl);	p = audioioparam(p, e, "bits", in->bits, out->bits, audio_bits_tbl);	/* this one is silly */	p = audioioparam(p, e, "chans", in->chan, out->chan, audio_chan_tbl);	/* TO DO: minimise in/out left/right where possible */	if(in->left != in->right){		p = seprint(p, e, "in left %d 0 100\n", in->left);		p = seprint(p, e, "in right %d 0 100\n", in->right);	}else		p = seprint(p, e, "in %d 0 100\n", in->right);	if(out->left != out->right){		p = seprint(p, e, "out left %d 0 100\n", out->left);		p = seprint(p, e, "out right %d 0 100\n", out->right);	}else		p = seprint(p, e, "out %d 0 100\n", out->right);	p = seprint(p, e, "in buf %d %d %d\n", in->buf, Audio_Min_Val, Audio_Max_Val);	p = seprint(p, e, "out buf %d %d %d\n", out->buf, Audio_Min_Val, Audio_Max_Val); 	return p-buf;} voidaudio_info_init(Audio_t *t){	t->in = Default_Audio_Format;	t->in.dev = Default_Audio_Input;	t->out = Default_Audio_Format;	t->out.dev = Default_Audio_Output;} static intstr2val(svp_t* t, char* s, ulong *v){	if(t == nil || s == nil)		return 0;	for(; t->s != nil; t++) {		if(strncmp(t->s, s, strlen(t->s)) == 0) {			*v = t->v;			return 1;		}	}	return 0;} static char*val2str(svp_t* t, ulong v){	if(t == nil)		return nil;	for(; t->s != nil; t++)		if(t->v == v)			return t->s;	return nil;} static int sval(char* buf, ulong* v, ulong max, ulong min){	unsigned long val = strtoul(buf, 0, 10); 	if(val > max || val < min)		return 0;	*v = val;	return 1;} Dev audiodevtab = {        'A',        "audio",         audioinit,        audioattach,        audiowalk,        audiostat,        audioopen,        devcreate,        audioclose,        audioread,        devbread,        audiowrite,        devbwrite,        devremove,        devwstat};