Quelle  pcsp.c   Sprache: C

// SPDX-License-Identifier: GPL-2.0-only
/*
 * PC-Speaker driver for Linux
 *
 * Copyright (C) 1997-2001  David Woodhouse
 * Copyright (C) 2001-2008  Stas Sergeev
 */

#include <linux/init.h>
#include <linux/module.h>
#include <linux/platform_device.h>
#include <sound/core.h>
#include <sound/initval.h>
#include <sound/pcm.h>
#include <linux/input.h>
#include <linux/delay.h>
#include <linux/bitops.h>
#include <linux/mm.h>
#include "pcsp_input.h"
#include "pcsp.h"

MODULE_AUTHOR("Stas Sergeev ");
MODULE_DESCRIPTION("PC-Speaker driver");
MODULE_LICENSE("GPL");
MODULE_ALIAS("platform:pcspkr");

static int index = SNDRV_DEFAULT_IDX1; /* Index 0-MAX */
static char *id = SNDRV_DEFAULT_STR1; /* ID for this card */
static bool enable = SNDRV_DEFAULT_ENABLE1; /* Enable this card */
static bool nopcm; /* Disable PCM capability of the driver */

module_param(index, int, 0444);
MODULE_PARM_DESC(index, "Index value for pcsp soundcard.");
module_param(id, charp, 0444);
MODULE_PARM_DESC(id, "ID string for pcsp soundcard.");
module_param(enable, bool, 0444);
MODULE_PARM_DESC(enable, "Enable PC-Speaker sound.");
module_param(nopcm, bool, 0444);
MODULE_PARM_DESC(nopcm, "Disable PC-Speaker PCM sound. Only beeps remain.");

struct snd_pcsp pcsp_chip;

static int snd_pcsp_create(struct snd_card *card)
{
 unsigned int resolution = hrtimer_resolution;
 int div, min_div, order;

 if (!nopcm) {
  if (resolution > PCSP_MAX_PERIOD_NS) {
   dev_err(card->dev,
    "PCSP: Timer resolution is not sufficient (%unS)\n",
    resolution);
   dev_err(card->dev,
    "PCSP: Make sure you have HPET and ACPI enabled.\n");
   dev_err(card->dev, "PCSP: Turned into nopcm mode.\n");
   nopcm = 1;
  }
 }

 if (loops_per_jiffy >= PCSP_MIN_LPJ && resolution <= PCSP_MIN_PERIOD_NS)
  min_div = MIN_DIV;
 else
  min_div = MAX_DIV;
#if PCSP_DEBUG
 dev_dbg(card->dev, "PCSP: lpj=%li, min_div=%i, res=%u\n",
  loops_per_jiffy, min_div, resolution);
#endif

 div = MAX_DIV / min_div;
 order = fls(div) - 1;

 pcsp_chip.max_treble = min(order, PCSP_MAX_TREBLE);
 pcsp_chip.treble = min(pcsp_chip.max_treble, PCSP_DEFAULT_TREBLE);
 pcsp_chip.playback_ptr = 0;
 pcsp_chip.period_ptr = 0;
 atomic_set(&pcsp_chip.timer_active, 0);
 pcsp_chip.enable = 1;
 pcsp_chip.pcspkr = 1;

 spin_lock_init(&pcsp_chip.substream_lock);

 pcsp_chip.card = card;
 pcsp_chip.port = 0x61;
 pcsp_chip.irq = -1;
 pcsp_chip.dma = -1;
 card->private_data = &pcsp_chip;

 return 0;
}

static void pcsp_stop_beep(struct snd_pcsp *chip);

static void alsa_card_pcsp_free(struct snd_card *card)
{
 pcsp_stop_beep(card->private_data);
}

static int snd_card_pcsp_probe(int devnum, struct device *dev)
{
 struct snd_card *card;
 int err;

 if (devnum != 0)
  return -EINVAL;

 hrtimer_setup(&pcsp_chip.timer, pcsp_do_timer, CLOCK_MONOTONIC, HRTIMER_MODE_REL);

 err = snd_devm_card_new(dev, index, id, THIS_MODULE, 0, &card);
 if (err < 0)
  return err;

 err = snd_pcsp_create(card);
 if (err < 0)
  return err;

 if (!nopcm) {
  err = snd_pcsp_new_pcm(&pcsp_chip);
  if (err < 0)
   return err;
 }
 err = snd_pcsp_new_mixer(&pcsp_chip, nopcm);
 if (err < 0)
  return err;

 strscpy(card->driver, "PC-Speaker");
 strscpy(card->shortname, "pcsp");
 sprintf(card->longname, "Internal PC-Speaker at port 0x%x",
  pcsp_chip.port);

 err = snd_card_register(card);
 if (err < 0)
  return err;
 card->private_free = alsa_card_pcsp_free;

 return 0;
}

static int alsa_card_pcsp_init(struct device *dev)
{
 int err;

 err = snd_card_pcsp_probe(0, dev);
 if (err) {
  dev_err(dev, "PC-Speaker initialization failed.\n");
  return err;
 }

 /* Well, CONFIG_DEBUG_PAGEALLOC makes the sound horrible. Lets alert */
 if (debug_pagealloc_enabled()) {
  dev_warn(dev,
    "PCSP: CONFIG_DEBUG_PAGEALLOC is enabled, which may make the sound noisy.\n");
 }

 return 0;
}

static int pcsp_probe(struct platform_device *dev)
{
 int err;

 err = pcspkr_input_init(&pcsp_chip.input_dev, &dev->dev);
 if (err < 0)
  return err;

 err = alsa_card_pcsp_init(&dev->dev);
 if (err < 0)
  return err;

 platform_set_drvdata(dev, &pcsp_chip);
 return 0;
}

static void pcsp_stop_beep(struct snd_pcsp *chip)
{
 pcsp_sync_stop(chip);
 pcspkr_stop_sound();
}

static int pcsp_suspend(struct device *dev)
{
 struct snd_pcsp *chip = dev_get_drvdata(dev);
 pcsp_stop_beep(chip);
 return 0;
}

static DEFINE_SIMPLE_DEV_PM_OPS(pcsp_pm, pcsp_suspend, NULL);

static void pcsp_shutdown(struct platform_device *dev)
{
 struct snd_pcsp *chip = platform_get_drvdata(dev);
 pcsp_stop_beep(chip);
}

static struct platform_driver pcsp_platform_driver = {
 .driver  = {
  .name = "pcspkr",
  .pm = &pcsp_pm,
 },
 .probe  = pcsp_probe,
 .shutdown = pcsp_shutdown,
};

static int __init pcsp_init(void)
{
 if (!enable)
  return -ENODEV;
 return platform_driver_register(&pcsp_platform_driver);
}

static void __exit pcsp_exit(void)
{
 platform_driver_unregister(&pcsp_platform_driver);
}

module_init(pcsp_init);
module_exit(pcsp_exit);