#include "sound.h"
#include "common/io.h"
#include "common/sysctl.h"

#include <fcntl.h>
#include <sys/soundcard.h>
#include <unistd.h>

const char* ffDetectSound(FFSoundOptions* options, FFlist* devices) {
#ifndef __NetBSD__
    int defaultDev = ffSysctlGetInt("hw.snd.default_unit", -1);
    if (defaultDev == -1) {
        return "sysctl(hw.snd.default_unit) failed";
    }
#else
    int defaultDev;
    {
        char mixerp[12];
        ssize_t plen = readlink("/dev/mixer", mixerp, ARRAY_SIZE(mixerp));
        if (plen < 6) {
            return "readlink(/dev/mixer) failed";
        }
        defaultDev = mixerp[plen - 1] - '0';
        if (defaultDev < 0 || defaultDev > 9) {
            return "Invalid mixer device";
        }
    }
#endif

    char path[] = "/dev/mixer0";

    struct oss_sysinfo info = { .nummixers = 9 };

    for (int idev = 0; idev <= info.nummixers; ++idev) {
        bool isMain = idev == defaultDev;
        if ((options->soundType & FF_SOUND_TYPE_MAIN) && !isMain) {
            continue;
        }

        path[strlen("/dev/mixer")] = (char) ('0' + idev);
        FF_AUTO_CLOSE_FD int fd = open(path, O_RDWR | O_CLOEXEC);
        if (fd < 0) {
            break;
        }

        if (idev == 0) {
            if (ioctl(fd, SNDCTL_SYSINFO, &info) != 0) {
                return "ioctl(SNDCTL_SYSINFO) failed";
            }
        }

        uint32_t devmask = 0;
        if (ioctl(fd, SOUND_MIXER_READ_DEVMASK, &devmask) < 0) {
            continue;
        }
        if (!(devmask & SOUND_MASK_VOLUME)) {
            continue;
        }

#if defined(SOUND_MIXER_MUTE) && (SOUND_MIXER_MUTE != SOUND_MIXER_NONE)
    #define FF_SOUND_HAVE_MIXER_MUTE 1
        uint32_t mutemask = 0;
        ioctl(fd, SOUND_MIXER_READ_MUTE, &mutemask);
#endif

        struct oss_card_info ci = { .card = idev };
        if (ioctl(fd, SNDCTL_CARDINFO, &ci) < 0) {
            continue;
        }

        uint32_t volume;
        if (ioctl(fd, SOUND_MIXER_READ_VOLUME, &volume) < 0) {
            continue;
        }

        FFSoundDevice* device = FF_LIST_ADD(FFSoundDevice, *devices);
        ffStrbufInitS(&device->identifier, path);
        ffStrbufInitF(&device->name, "%s %s", ci.longname, ci.hw_info);
        ffStrbufTrimRightSpace(&device->name);
        ffStrbufInitF(&device->platformApi, "%s %s", info.product, info.version);
        device->volume =
#ifdef FF_SOUND_HAVE_MIXER_MUTE
            mutemask & SOUND_MASK_VOLUME ? 0 :
#endif
                                         ((uint8_t) volume /*left*/ + (uint8_t) (volume >> 8) /*right*/) / 2;
        device->type = FF_SOUND_TYPE_ACTIVE | (isMain ? FF_SOUND_TYPE_MAIN : FF_SOUND_TYPE_NONE);
    }

    return NULL;
}
