/*      $NetBSD: bellctrl.c,v 1.13 2011/08/25 17:00:55 christos Exp $   */

/*
* bellctrl - OPM bell controller (for NetBSD/X680x0)
* Copyright (c)1995 ussy.
*/

#include <sys/cdefs.h>
__RCSID("$NetBSD: bellctrl.c,v 1.13 2011/08/25 17:00:55 christos Exp $");

#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <ctype.h>
#include <string.h>
#include <sys/file.h>
#include <sys/ioctl.h>
#include <machine/opmbellio.h>

#define DEFAULT -1

#define nextarg(i, argv) \
       argv[i]; \
       if (i >= argc) \
               break; \

static int bell_setting;
static struct opm_voice voice;

static struct opm_voice bell_voice = DEFAULT_BELL_VOICE;

static struct bell_info values = {
       DEFAULT, DEFAULT, DEFAULT
};

/* function prototype */
static int is_number(const char *, int);
static void set_bell_vol(int);
static void set_bell_pitch(int);
static void set_bell_dur(int);
static void set_voice_param(const char *, int);
static void set_bell_param(void);
static void usage(void) __dead;

int
main(int argc, char **argv)
{
       const char *arg;
       int percent;
       int i;

       bell_setting = 0;

       if (argc < 2)
               usage();

       for (i = 1; i < argc; ) {
               arg = argv[i++];
               if (strcmp(arg, "-b") == 0) {
                       /* turn off bell */
                       set_bell_vol(0);
               } else if (strcmp(arg, "b") == 0) {
                       /* set bell to default */
                       percent = DEFAULT;

                       if (i >= argc) {
                               /* set bell to default */
                               set_bell_vol(percent);
                               /* set pitch to default */
                               set_bell_pitch(percent);
                               /* set duration to default */
                               set_bell_dur(percent);
                               break;
                       }
                       arg = nextarg(i, argv);
                       if (strcmp(arg, "on") == 0) {
                               /*
                                * let it stay that way
                                */
                               /* set bell on */
                               set_bell_vol(BELL_VOLUME);
                               /* set pitch to default */
                               set_bell_pitch(BELL_PITCH);
                               /* set duration to default */
                               set_bell_dur(BELL_DURATION);
                               i++;
                       } else if (strcmp(arg, "off") == 0) {
                               /* turn the bell off */
                               percent = 0;
                               set_bell_vol(percent);
                               i++;
                       } else if (is_number(arg, MAXBVOLUME)) {
                               /*
                                * If volume is given
                                */
                               /* set bell appropriately */
                               percent = atoi(arg);

                               set_bell_vol(percent);
                               i++;

                               arg = nextarg(i, argv);

                               /* if pitch is given */
                               if (is_number(arg, MAXBPITCH)) {
                                       /* set the bell */
                                       set_bell_pitch(atoi(arg));
                                       i++;

                                       arg = nextarg(i, argv);
                                       /* If duration is given */
                                       if (is_number(arg, MAXBTIME)) {
                                               /* set the bell */
                                               set_bell_dur(atoi(arg));
                                               i++;
                                       }
                               }
                       } else {
                               /* set bell to default */
                               set_bell_vol(BELL_VOLUME);
                       }
               } else if (strcmp(arg, "v") == 0) {
                       /*
                        * set voice parameter
                        */
                       if (i >= argc) {
                               arg = "default";
                       } else {
                               arg = nextarg(i, argv);
                       }
                       set_voice_param(arg, 1);
                       i++;
               } else if (strcmp(arg, "-v") == 0) {
                       /*
                        * set voice parameter
                        */
                       if (i >= argc) {
                               warnx("Missing -v argument");
                               usage();
                       }
                       arg = nextarg(i, argv);
                       set_voice_param(arg, 0);
                       i++;
               } else {
                       warnx("Unknown option %s", arg);
                       usage();
               }
       }

       if (bell_setting)
               set_bell_param();

       exit(0);
}

static int
is_number(const char *arg, int maximum)
{
       const char *p;

       if (arg[0] == '-' && arg[1] == '1' && arg[2] == '\0')
               return 1;
       for (p = arg; isdigit((unsigned char)*p); p++)
               ;
       if (*p || atoi(arg) > maximum)
               return 0;

       return 1;
}

static void
set_bell_vol(int percent)
{
       values.volume = percent;
       bell_setting++;
}

static void
set_bell_pitch(int pitch)
{
       values.pitch = pitch;
       bell_setting++;
}

static void
set_bell_dur(int duration)
{
       values.msec = duration;
       bell_setting++;
}

static void
set_voice_param(const char *path, int flag)
{
       int fd;

       if (flag) {
               memcpy(&voice, &bell_voice, sizeof(bell_voice));
       } else {
               if ((fd = open(path, 0)) >= 0) {
                       if (read(fd, &voice, sizeof(voice)) != sizeof(voice))
                               err(1, "cannot read voice parameter");
                       close(fd);
               } else {
                       err(1, "cannot open voice parameter");
               }
       }

       if ((fd = open("/dev/bell", O_RDWR)) < 0)
               err(1, "cannot open /dev/bell");
       if (ioctl(fd, BELLIOCSVOICE, &voice))
               err(1, "ioctl BELLIOCSVOICE failed");

       close(fd);
}

static void
set_bell_param(void)
{
       int fd;
       struct bell_info param;

       if ((fd = open("/dev/bell", O_RDWR)) < 0)
               err(1, "cannot open /dev/bell");
       if (ioctl(fd, BELLIOCGPARAM, &param))
               err(1, "ioctl BELLIOCGPARAM failed");

       if (values.volume == DEFAULT)
               values.volume = param.volume;
       if (values.pitch == DEFAULT)
               values.pitch = param.pitch;
       if (values.msec == DEFAULT)
               values.msec = param.msec;

       if (ioctl(fd, BELLIOCSPARAM, &values))
               err(1, "ioctl BELLIOCSPARAM failed");

       close(fd);
}

static void
usage(void)
{
       fprintf(stderr, "Usage: %s option ...\n", getprogname());
       fprintf(stderr, "       To turn bell off:\n");
       fprintf(stderr, "\t-b                           b off"
                       "                          b 0\n");
       fprintf(stderr, "       To set bell volume, pitch and duration:\n");
       fprintf(stderr, "\t b [vol [pitch [dur]]]                 b on\n");
       fprintf(stderr, "       To restore default voice parameter:\n");
       fprintf(stderr, "\t v default\n");
       fprintf(stderr, "       To set voice parameter:\n");
       fprintf(stderr, "\t-v voicefile\n");
       exit(0);
}

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.