minix/commands/ibm/mixer.c
2009-11-09 10:26:00 +00:00

658 lines
16 KiB
C

/*
* mixer
*
* Michel R. Prevenier.
*/
#include <sys/types.h>
#include <errno.h>
#include <curses.h>
#include <signal.h>
#include <stdlib.h>
#include <unistd.h>
#include <fcntl.h>
#include <stdio.h>
#include <string.h>
#include <sys/ioctl.h>
#include <minix/sound.h>
#define CURS_CTRL '\033'
#define ESCAPE 27
#define UP 'A'
#define DOWN 'B'
#define LEFT 'D'
#define RIGHT 'C'
#define SPACE ' '
_PROTOTYPE ( int main, (int arg, char **argv));
_PROTOTYPE ( void usage, (void));
_PROTOTYPE ( void non_interactive, (void));
_PROTOTYPE ( void setup_screen, (void));
_PROTOTYPE ( int read_settings, (void));
_PROTOTYPE ( int write_settings, (void));
_PROTOTYPE ( void rdwr_levels, (int flag));
_PROTOTYPE ( void rdwr_inputs, (int flag));
_PROTOTYPE ( void rdwr_outputs, (int flag));
_PROTOTYPE ( void create_slider, (int x, int y, enum Device device));
_PROTOTYPE ( void show_inputs, (int x, int y));
_PROTOTYPE ( void show_outputs, (int x, int y));
_PROTOTYPE ( char *d_name, (enum Device device, char *name));
_PROTOTYPE ( void user_interface, (void));
_PROTOTYPE ( void terminate, (int s));
WINDOW *main_win;
int old_stdin;
int fd;
char name[9];
char *file_name;
struct volume_level levels[9];
struct inout_ctrl inputs_left[9];
struct inout_ctrl inputs_right[9];
struct inout_ctrl outputs[9];
void usage()
{
fprintf(stderr, "Usage: mixer [-r]\n");
exit(-1);
}
void terminate(s)
int s;
{
/* Restore terminal parameters and exit */
(void) fcntl(0,F_SETFL,old_stdin);
move(23, 0);
refresh();
resetty();
endwin();
exit(1);
}
int write_settings()
{
/* Write the current mixer settings to $HOME/.mixer */
int fd;
if ((fd = creat(file_name, 0x124)) > 0)
{
write(fd, levels, sizeof(levels));
write(fd, inputs_left, sizeof(inputs_left));
write(fd, inputs_right, sizeof(inputs_right));
write(fd, outputs, sizeof(outputs));
close(fd);
return 1;
}
return 0;
}
int read_settings()
{
/* Restore mixer settings saved in $HOME/.mixer */
int fd;
if ((fd = open(file_name, O_RDONLY)) > 0)
{
read(fd, levels, sizeof(levels));
read(fd, inputs_left, sizeof(inputs_left));
read(fd, inputs_right, sizeof(inputs_right));
read(fd, outputs, sizeof(outputs));
close(fd);
rdwr_levels(1);
rdwr_outputs(1);
rdwr_inputs(1);
return 1;
}
return 0;
}
void rdwr_levels(flag)
int flag; /* 0 = read, 1 = write */
{
/* Get or set mixer settings */
int i;
int cmd;
cmd = (flag == 0 ? MIXIOGETVOLUME : MIXIOSETVOLUME);
for(i = Master; i <= Bass; i++)
(void) (ioctl(fd, cmd, &levels[i]));
}
void rdwr_inputs(flag)
int flag; /* 0 = read, 1 = write */
{
/* Get or set input settings */
int i;
int cmd_left, cmd_right;
cmd_left = (flag == 0 ? MIXIOGETINPUTLEFT : MIXIOSETINPUTLEFT);
cmd_right = (flag == 0 ? MIXIOGETINPUTRIGHT : MIXIOSETINPUTRIGHT);
for(i = Fm; i <= Mic; i++)
{
(void) (ioctl(fd, cmd_left, &inputs_left[i]));
(void) (ioctl(fd, cmd_right, &inputs_right[i]));
}
}
void rdwr_outputs(flag)
int flag; /* 0 = read, 1 = write */
{
/* Get or set output settings */
int i;
int cmd;
cmd = (flag == 0 ? MIXIOGETOUTPUT : MIXIOSETOUTPUT);
for(i = Cd; i <= Mic; i++)
(void) (ioctl(fd, cmd, &outputs[i]));
}
int main(argc, argv)
int argc;
char **argv;
{
int i;
char *home_ptr;
int fd2;
/* Open mixer */
if ((fd = open("/dev/mixer",O_RDONLY)) < 0)
{
fprintf(stderr, "Cannot open /dev/mixer\n");
exit(-1);
}
/* Get user's home directory and construct the $HOME/.mixer
* file name
*/
home_ptr = getenv("HOME");
file_name = malloc(strlen(home_ptr)+strlen("mixer.ini\0"));
if (file_name == (char *)0)
{
fprintf(stderr, "Not enough memory\n");
exit(-1);
}
strncpy(file_name, home_ptr, strlen(home_ptr));
strncpy(file_name+strlen(home_ptr), "/.mixer\0", 9);
/* Fill in the device numbers */
for(i = Master; i <= Bass; i++)
{
levels[i].device = i;
inputs_left[i].device = i;
inputs_right[i].device = i;
outputs[i].device = i;
}
/* Get arguments */
if (argc > 1)
{
if (strncmp(argv[1], "-r", 2) == 0)
{
if (read_settings())
{
printf("Mixer settings restored\n");
exit(0);
}
else
{
fprintf(stderr, "Could not restore mixer settings\n");
exit(-1);
}
}
else usage();
}
/* Initialize windows. */
(void) initscr();
signal(SIGINT, terminate);
old_stdin = fcntl(0,F_GETFL);
cbreak();
noecho();
main_win = newwin(23,80,0,0);
scrollok(main_win, FALSE);
/* Read all current mixer settings */
rdwr_levels(0);
rdwr_inputs(0);
rdwr_outputs(0);
/* Set up the user screen and handle user input */
setup_screen();
user_interface();
}
void user_interface()
{
/* This is the user interface. */
char c;
int x,y;
int right;
int input_scr, input_pos;
int output_scr, output_pos;
int max_level;
enum Device device;
int fd2;
device = Master;
right = 0;
input_scr = 0;
output_scr = 0;
input_pos = 0;
output_pos = 0;
while(1)
{
if (input_scr)
{
y = device + 9;
x = 51 + input_pos + (device == Mic ? 2 : 0);
}
else if (output_scr)
{
y = device + 15;
x = 53 + output_pos + (device == Mic ? 4 : 0);
}
else
{
y = (device != Speaker ? 2 : 1) +
(device - (device < Treble ? 0 : Treble)) * 3 +
(right == 0 ? 0 : 1);
if (!right)
x = 9 + levels[device].left / (device < Speaker ? 2 : 1 ) +
(device > Speaker ? 39 : 0);
else
x = 9 + levels[device].right / (device < Speaker ? 2 : 1) +
(device > Speaker ? 39 : 0);
}
wmove(main_win,y,x);
wrefresh(main_win);
c = wgetch(main_win);
switch(c)
{
case CURS_CTRL:
{
(void) wgetch(main_win);
c = wgetch(main_win);
switch(c)
{
case DOWN:
{
if (output_scr)
{
if (device < Mic)
{
device++;
if (device == Mic) output_pos = 0;
}
}
else if (right || input_scr)
{
if (!input_scr)
{
if (device < Bass)
{
device++;
right = 0;
}
else
{
input_scr = 1;
input_pos = 0;
device = Fm;
}
}
else
{
if (device < Mic)
{
device++;
if (device == Mic && input_pos > 8) input_pos = 8;
}
else
{
device = Cd;
output_scr = 1;
input_scr = 0;
output_pos = 0;
}
}
}
else
{
if (device != Mic && device != Speaker) right = 1;
else { device++; right = 0; }
}
};break;
case UP:
{
if (output_scr)
{
if (device > Cd) device--;
else
{
device = Mic;
output_scr = 0;
input_scr = 1;
}
}
else if (!right || input_scr)
{
if (input_scr)
{
if (device > Fm) device--;
else
{
input_scr = 0;
device = Bass;
right = 1;
}
}
else
{
if (device > Master)
{
device--;
if (device != Mic && device != Speaker) right = 1;
}
}
}
else
right = 0;
};break;
case RIGHT:
{
if (output_scr)
{
if (output_pos < 8 && device != Mic) output_pos = 8;
}
else if (!input_scr)
{
if (device < Speaker) max_level = 31;
else if (device > Speaker) max_level = 15;
else max_level = 4;
if (!right)
{
if (levels[device].left < max_level) levels[device].left+=
(device < Speaker ? 2 : 1);
}
else
{
if (levels[device].right < max_level) levels[device].right+=
(device < Speaker ? 2 : 1);
}
ioctl(fd, MIXIOSETVOLUME, &levels[device]);
ioctl(fd, MIXIOGETVOLUME, &levels[device]);
create_slider(1 + (device < Treble ? 0 : 39),
(device - (device < Treble ? 0 : Treble))*3 +
(device != Speaker ? 2 : 1), device);
}
else
{
if ((device != Mic && input_pos < 12) ||
(device == Mic && input_pos < 8))
input_pos += (4 + (device == Mic ? 4 : 0));
}
};break;
case LEFT:
{
if (output_scr)
{
if (output_pos > 0) output_pos = 0;
}
else if (!input_scr)
{
if (!right)
{
if (levels[device].left > 0) levels[device].left-=
(device < Speaker ? 2 : 1);
}
else
{
if (levels[device].right > 0) levels[device].right-=
(device < Speaker ? 2 : 1);
}
ioctl(fd, MIXIOSETVOLUME, &levels[device]);
ioctl(fd, MIXIOGETVOLUME, &levels[device]);
create_slider(1 + (device < Treble ? 0 : 39),
(device - (device < Treble ? 0 : Treble))*3 +
(device != Speaker ? 2 : 1), device);
}
else
{
if (input_pos > 0)
input_pos -= (4 + (device == Mic ? 4 : 0));
}
};break;
}
};break;
case SPACE:
{
if (output_scr)
{
switch(output_pos)
{
case 0:
case 4:
{
outputs[device].left =
(outputs[device].left == ON ? OFF : ON);
ioctl(fd, MIXIOSETOUTPUT, &outputs[device]);
};break;
case 8:
{
outputs[device].right =
(outputs[device].right == ON ? OFF : ON);
ioctl(fd, MIXIOSETOUTPUT, &outputs[device]);
};break;
}
ioctl(fd, MIXIOGETOUTPUT, &outputs[device]);
show_outputs(41,16);
}
else if (input_scr)
{
switch(input_pos)
{
case 0:
{
inputs_left[device].left =
(inputs_left[device].left == ON ? OFF : ON);
ioctl(fd, MIXIOSETINPUTLEFT, &inputs_left[device]);
};break;
case 4:
{
inputs_left[device].right =
(inputs_left[device].right == ON ? OFF : ON);
ioctl(fd, MIXIOSETINPUTLEFT, &inputs_left[device]);
};break;
case 8:
{
inputs_right[device].left =
(inputs_right[device].left == ON ? OFF : ON);
ioctl(fd, MIXIOSETINPUTRIGHT, &inputs_right[device]);
};break;
case 12:
{
inputs_right[device].right =
(inputs_right[device].right == ON ? OFF : ON);
ioctl(fd, MIXIOSETINPUTRIGHT, &inputs_right[device]);
};break;
}
ioctl(fd, MIXIOGETINPUTLEFT, &inputs_left[device]);
ioctl(fd, MIXIOGETINPUTRIGHT, &inputs_right[device]);
show_inputs(41,8);
}
};break;
case 's':
{
if (write_settings())
mvwprintw(main_win,22,28, "mixer settings saved");
else
mvwprintw(main_win,22,28, "error: file not saved");
wrefresh(main_win);
sleep(1);
mvwprintw(main_win,22,28, " ");
};break;
case 'r':
{
if (read_settings())
mvwprintw(main_win,22,28, "mixer settings restored");
else
mvwprintw(main_win,22,28, "error: could not open");
wrefresh(main_win);
sleep(1);
setup_screen();
};break;
case 'e': terminate(1);
}
}
}
char *d_name(device, name)
enum Device device;
char *name;
{
/* Convert the device number to a name */
switch (device)
{
case Master: strncpy(name, "Master \0", 9);break;
case Dac: strncpy(name, "Dac \0", 9);break;
case Fm: strncpy(name, "Fm \0", 9);break;
case Cd: strncpy(name, "CD \0", 9);break;
case Line: strncpy(name, "Line \0", 9);break;
case Mic: strncpy(name, "Mic \0", 9);break;
case Speaker: strncpy(name, "Speaker \0", 9);break;
case Treble: strncpy(name, "Treble \0", 9);break;
case Bass: strncpy(name, "Bass \0", 9);break;
}
return name;
}
void create_slider(x, y, device)
int x;
int y;
enum Device device;
{
/* Create a slider on the screen */
int left;
int right;
int i;
mvwprintw(main_win,y,x, "%s", d_name(device, name));
left = levels[device].left / (device < Speaker ? 2 : 1);
right = levels[device].right / (device < Speaker ? 2 : 1);
for (i = 0; i < 16; i++)
{
if (device != Speaker || i < 4)
mvwprintw(main_win,y,x+i+8, (i == left ? "*" : "-"));
if (device < Mic || device > Speaker)
mvwprintw(main_win,y+1,x+i+8, (i == right ? "*" : "-"));
}
if (device < Mic || device > Speaker)
{
mvwprintw(main_win,y,x+i+10, "left");
mvwprintw(main_win,y+1,x+i+10, "right");
}
wrefresh(main_win);
}
void show_inputs(x,y)
int x;
int y;
{
/* Show the input settings */
int i;
mvwprintw(main_win,y,x, " Rec-In ");
mvwprintw(main_win,y+1,x," left right");
mvwprintw(main_win,y+2,x," l r l r");
for (i = Fm; i <= Line; i++)
{
mvwprintw(main_win,y+i+1,x, "%s %d %d %d %d",
d_name(i, (char *)name),
(inputs_left[i].left == ON ? 1 : 0),
(inputs_left[i].right == ON ? 1 : 0),
(inputs_right[i].left == ON ? 1 : 0),
(inputs_right[i].right == ON ? 1 : 0));
}
mvwprintw(main_win,y+i+1,x, "%s %d %d",
d_name(Mic, (char *)name),
(inputs_left[Mic].left == ON ? 1 : 0),
(inputs_right[Mic].left == ON ? 1 : 0));
wrefresh(main_win);
}
void show_outputs(x,y)
int x;
int y;
{
/* Show the output settings */
int i;
mvwprintw(main_win,y,x, " Mix-Out ");
mvwprintw(main_win,y+1,x, " left right");
for (i = Cd; i <= Line; i++)
{
mvwprintw(main_win,y+i-1,x,"%s %d %d",
d_name(i, (char *)name),
(outputs[i].left == ON ? 1 : 0),
(outputs[i].right == ON ? 1 : 0));
}
mvwprintw(main_win,y+i-1,x,"%s %d",
d_name(Mic, (char *)name),
(outputs[Mic].left == ON ? 1 : 0));
wrefresh(main_win);
}
void setup_screen()
{
int i;
wclear(main_win);
mvwprintw(main_win,0,23,"------- Mixer Controls -------");
wrefresh(main_win);
for(i = 0; i <= Speaker; i++)
create_slider(1, i*3+(i <= Mic ? 2 : 1), i);
create_slider(40, 2, Treble);
create_slider(40, 5, Bass);
show_inputs(41,8);
show_outputs(41,16);
}