1/*
2 *  ALSA lisp implementation
3 *  Copyright (c) 2003 by Jaroslav Kysela <perex@perex.cz>
4 *
5 *
6 *   This library is free software; you can redistribute it and/or modify
7 *   it under the terms of the GNU Lesser General Public License as
8 *   published by the Free Software Foundation; either version 2.1 of
9 *   the License, or (at your option) any later version.
10 *
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 Lesser General Public License for more details.
15 *
16 *   You should have received a copy of the GNU Lesser General Public
17 *   License along with this library; if not, write to the Free Software
18 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
19 *
20 */
21
22struct alisp_cfg {
23	int verbose: 1,
24	    warning: 1,
25	    debug: 1;
26	snd_input_t *in;	/* program code */
27	snd_output_t *out;	/* program output */
28	snd_output_t *eout;	/* error output */
29	snd_output_t *vout;	/* verbose output */
30	snd_output_t *wout;	/* warning output */
31	snd_output_t *dout;	/* debug output */
32};
33
34struct alisp_instance;
35struct alisp_object;
36struct alisp_seq_iterator;
37
38struct alisp_cfg *alsa_lisp_default_cfg(snd_input_t *input);
39void alsa_lisp_default_cfg_free(struct alisp_cfg *cfg);
40int alsa_lisp(struct alisp_cfg *cfg, struct alisp_instance **instance);
41void alsa_lisp_free(struct alisp_instance *instance);
42int alsa_lisp_function(struct alisp_instance *instance, struct alisp_seq_iterator **result,
43		       const char *id, const char *args, ...)
44#ifndef DOC_HIDDEN
45		       __attribute__ ((format (printf, 4, 5)))
46#endif
47		       ;
48void alsa_lisp_result_free(struct alisp_instance *instance,
49			   struct alisp_seq_iterator *result);
50int alsa_lisp_seq_first(struct alisp_instance *instance, const char *id,
51			struct alisp_seq_iterator **seq);
52int alsa_lisp_seq_next(struct alisp_seq_iterator **seq);
53int alsa_lisp_seq_count(struct alisp_seq_iterator *seq);
54int alsa_lisp_seq_integer(struct alisp_seq_iterator *seq, long *val);
55int alsa_lisp_seq_pointer(struct alisp_seq_iterator *seq, const char *ptr_id, void **ptr);
56