This commit was generated by cvs2svn to compensate for changes in r4782,svn2git-root

which included commits to RCS files with non-trunk default branches.

svn path=/trunk/externals/iem/hdspm_mixer/; revision=4783

1 files changed, 231 insertions, 0 deletions

diff --git a/hdspm_mixer.c b/hdspm_mixer.c
new file mode 100644
index 0000000..4cc7039
--- /dev/null
+++ b/hdspm_mixer.c
@@ -0,0 +1,231 @@
+/* Very simple Mixer for RME DSP-MADI and maybe other hammerfall dsp 
+   (C) 2003 IEM, Winfried Ritsch  (ritsch at iem.at)
+   Institute of Electronic Music and Acoustics
+   GPL - see Licence.txt
+
+   Use it as library for other programs, or standalone commandline programm
+
+   eg.:compile as program: cc -o hdspmmixer -DMAIN -lm -lc -lasound hdsdpmmixer.c
+*/
+#include <string.h>
+#include <stdlib.h>
+#include <math.h>
+#include <sys/ioctl.h>
+#include <alsa/asoundlib.h>
+
+/* #include <sound/hdsp.h> */
+
+#include "hdspm_mixer.h"
+
+/* #define QUIET (on cc commandline) */
+#ifndef VERBOSE
+ #define QUIET
+#endif
+
+static char card_name[HDSPMM_MAX_CARDS][HDSPMM_MAX_NAME_LEN];
+static int cardid = 0;
+
+int find_cards()
+{
+  int i;
+  char *name;
+  int card = HDSPMM_ERROR_NO_CARD;
+  int n = 0;
+
+
+#ifndef QUIET
+  printf("Searching mixer for hdspm ...\n");
+#endif
+
+  while (snd_card_next(&card) >= 0) {
+    if (card < 0) {
+      break;
+    } else {
+
+      snd_card_get_name(card, &name);
+
+#ifdef DEBUG
+      printf("Card %d : %s\n", card, name);
+#endif
+
+      if (strncmp(name, "HDSPM MADI", 9) == 0) {
+
+	snprintf(card_name[n], 6, "hw:%i", n);
+
+#ifndef QUIET
+	printf("HDSP MADI as  card %d (%s) found !\n",n,card_name[n]);
+#endif
+	n++;
+	if(n >= HDSPMM_MAX_CARDS)
+	  break;
+      } 
+    }
+  }
+
+  if (!n)
+    return HDSPMM_ERROR_NO_CARD;
+
+  for (i = n; i < HDSPMM_MAX_CARDS; i++) {
+    card_name[i][0] = '\0';
+  }
+
+  return n;
+}
+
+int set_gain(int idx, int src, int dst, int val)
+{
+  int err;
+
+
+  snd_ctl_elem_id_t *id;
+  snd_ctl_elem_value_t *ctl;
+  snd_ctl_t *handle;
+
+  if(idx >= HDSPMM_MAX_CARDS || idx < 0)
+	return HDSPMM_ERROR_WRONG_IDX;
+
+  snd_ctl_elem_value_alloca(&ctl);
+  snd_ctl_elem_id_alloca(&id);
+  snd_ctl_elem_id_set_name(id, "Mixer");
+  snd_ctl_elem_id_set_numid(id, 0);
+  snd_ctl_elem_id_set_interface(id, SND_CTL_ELEM_IFACE_HWDEP);
+  snd_ctl_elem_id_set_device(id, 0);
+  snd_ctl_elem_id_set_subdevice(id, 0);
+  snd_ctl_elem_id_set_index(id, 0);
+  snd_ctl_elem_value_set_id(ctl, id);
+
+  if ((err = snd_ctl_open(&handle, card_name[idx], SND_CTL_NONBLOCK)) < 0) {
+#ifndef QUIET
+    fprintf(stderr, "Alsa error: %s\n", snd_strerror(err));
+#endif
+    return HDSPMM_ERROR_ALSA_OPEN;
+  }
+
+  snd_ctl_elem_value_set_integer(ctl, 0, src);
+  snd_ctl_elem_value_set_integer(ctl, 1, dst);
+  snd_ctl_elem_value_set_integer(ctl, 2, val);
+
+  if ((err = snd_ctl_elem_write(handle, ctl)) < 0) {
+#ifndef QUIET
+    fprintf(stderr, "Alsa error: %s\n", snd_strerror(err));
+#endif
+    return HDSPMM_ERROR_ALSA_WRITE;
+  }
+
+  val = snd_ctl_elem_value_get_integer(ctl, 2);
+
+  snd_ctl_close(handle);
+  return val;
+}
+
+int get_gain(int idx, int src, int dst)
+{
+  int err;
+  int val = HDSPMM_ERROR_NO_CARD;
+
+  snd_ctl_elem_id_t *id;
+  snd_ctl_elem_value_t *ctl;
+  snd_ctl_t *handle;
+
+  if(idx >= HDSPMM_MAX_CARDS || idx < 0)
+	return HDSPMM_ERROR_WRONG_IDX;
+
+
+  snd_ctl_elem_value_alloca(&ctl);
+  snd_ctl_elem_id_alloca(&id);
+  snd_ctl_elem_id_set_name(id, "Mixer");
+  snd_ctl_elem_id_set_numid(id, 0);
+  snd_ctl_elem_id_set_interface(id, SND_CTL_ELEM_IFACE_HWDEP);
+  snd_ctl_elem_id_set_device(id, 0);
+  snd_ctl_elem_id_set_subdevice(id, 0);
+  snd_ctl_elem_id_set_index(id, 0);
+  snd_ctl_elem_value_set_id(ctl, id);
+
+  if ((err = snd_ctl_open(&handle, card_name[cardid], SND_CTL_NONBLOCK)) < 0) {
+#ifndef QUIET
+    fprintf(stderr, "Alsa error: %s\n", snd_strerror(err));
+#endif
+    return HDSPMM_ERROR_ALSA_OPEN;
+  }
+
+  snd_ctl_elem_value_set_integer(ctl, 0, src);
+  snd_ctl_elem_value_set_integer(ctl, 1, dst);
+
+  if ((err = snd_ctl_elem_read(handle, ctl)) < 0) {
+#ifndef QUIET
+    fprintf(stderr, "Alsa error: %s\n", snd_strerror(err));
+#endif
+    return HDSPMM_ERROR_ALSA_READ;
+  }
+  val = snd_ctl_elem_value_get_integer(ctl, 2);
+
+  snd_ctl_close(handle);
+
+  return val;
+}
+
+#ifdef MAIN
+
+int main(int argc, char *argv[])
+{
+  int err = 0;
+
+  int src;
+  int dst;
+  int val;
+
+  /*
+  int i;
+
+  for(i=0; i < argc; i++)
+    printf(" %s ", argv[i]);
+  printf("\n");
+  */
+  /*
+  if((err =find_cards()) < 0)
+    return err;
+  */
+
+  if(argc < 4){
+    printf("\nusage %s <devnr> <src> <dst> [value] \n\n"
+	   " devnr ... ALSA-Device eg. for hw:0 is 0 \n"
+	   " src   ... inputs 0-63 playback 64-127\n"
+	   " dst   ... out channel 0-63\n"
+	   "\noptional if wanting to set a value:\n\n"
+	   " value ... gain 0=0 (mute), 32768=1 (unitGain), 65535 = max\n\n",
+	   argv[0]);
+
+    if(find_cards() < 0)
+	    puts("No Hammerfall DSP MADI card found.");
+    puts("");
+    printf("Version %s, 2003 - IEM, winfried ritsch\n",HDSPMM_VERSION);
+    return -1;
+  }
+
+  cardid = atoi(argv[1]);
+  snprintf(card_name[cardid], 6, "hw:%i", cardid);
+
+  src = atoi(argv[2]);
+  dst = atoi(argv[3]);
+
+  if(argc == 4){
+
+    printf(" Get Mixer from %d to %d : %d \n",src,dst,
+	   get_gain(cardid,src,dst));
+
+    return 0;
+  }
+
+  /* arg is 5 */
+  val =  atoi(argv[4]);
+
+  if((err = set_gain(cardid,src,dst,val)) < 0 )
+    printf("Error: Could not set mixer from %d to %d gain %d:%s \n", 
+	   src,dst,val,snd_strerror(err));
+  else
+    printf("Set Mixer from %d to %d : %d \n",src,dst,val);
+	   
+
+  return err;
+}
+#endif