aboutsummaryrefslogtreecommitdiffstats
path: root/ALSA-afb
diff options
context:
space:
mode:
authorfulup <fulup.arfoll@iot.bzh>2017-08-10 17:37:24 +0200
committerfulup <fulup.arfoll@iot.bzh>2017-08-10 17:37:24 +0200
commiteb6a78be524aaee70fca55b86a7b065763591178 (patch)
tree9db4e1e9f75ef18b90255a468ab5087e65bba5c3 /ALSA-afb
parent302d4bfcc49c69ea8251e1755ba3876555f680aa (diff)
Work in Progress
Diffstat (limited to 'ALSA-afb')
-rw-r--r--ALSA-afb/Alsa-AddCtl.c372
-rw-r--r--ALSA-afb/Alsa-ApiHat.c59
-rw-r--r--ALSA-afb/Alsa-ApiHat.h74
-rw-r--r--ALSA-afb/Alsa-RegEvt.c395
-rw-r--r--ALSA-afb/Alsa-SetGet.c809
-rw-r--r--ALSA-afb/Alsa-Ucm.c433
-rw-r--r--ALSA-afb/CMakeLists.txt41
-rw-r--r--ALSA-afb/README.md33
8 files changed, 0 insertions, 2216 deletions
diff --git a/ALSA-afb/Alsa-AddCtl.c b/ALSA-afb/Alsa-AddCtl.c
deleted file mode 100644
index f7ef92e..0000000
--- a/ALSA-afb/Alsa-AddCtl.c
+++ /dev/null
@@ -1,372 +0,0 @@
-/*
- * AlsaUseCase -- provide low level interface with ALSA lib (extracted from alsa-json-gateway code)
- * Copyright (C) 2015,2016,2017, Fulup Ar Foll fulup@iot.bzh
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- *
- * References:
- * https://kernel.readthedocs.io/en/sphinx-samples/writing-an-alsa-driver.html#control-names
- * https://01.org/linuxgraphics/gfx-docs/drm/sound/designs/control-names.html
-
- */
-#define _GNU_SOURCE // needed for vasprintf
-
-#include <alsa/asoundlib.h>
-#include <alsa/sound/tlv.h>
-#include <systemd/sd-event.h>
-#include <sys/ioctl.h>
-
-#include "Alsa-ApiHat.h"
-
-// Performs like a toggle switch for attenuation, because they're bool (ref:user-ctl-element-set.c)
-
-static const unsigned int *allocate_bool_fake_tlv(void) {
- static const SNDRV_CTL_TLVD_DECLARE_DB_MINMAX(range, -10000, 0);
- unsigned int *tlv = malloc(sizeof (range));
- if (tlv == NULL) return NULL;
- memcpy(tlv, range, sizeof (range));
- return tlv;
-}
-
-static const unsigned int *allocate_int_dbscale_tlv(int min, int step, int mute) {
- // SNDRV_CTL_TLVD_DECLARE_DB_SCALE(range, min, step, mute);
- size_t tlvSize = sizeof (4 * sizeof (unsigned int));
- unsigned int *tlv = malloc(tlvSize);
- tlv[0] = SNDRV_CTL_TLVT_DB_LINEAR;
- tlv[1] = (int) tlvSize;
- tlv[2] = min * 100;
- tlv[3] = ((step * 100) & SNDRV_CTL_TLVD_DB_SCALE_MASK) | ((mute * 100) ? SNDRV_CTL_TLVD_DB_SCALE_MUTE : 0);
- return tlv;
-}
-
-static const unsigned int *allocate_int_linear_tlv(int max, int min) {
- // SNDRV_CTL_TLVD_DECLARE_DB_LINEAR (range, min, max);
- size_t tlvSize = sizeof (4 * sizeof (unsigned int));
- unsigned int *tlv = malloc(tlvSize);
- tlv[0] = SNDRV_CTL_TLVT_DB_LINEAR;
- tlv[1] = (int) tlvSize;
- tlv[2] = -min * 100;
- tlv[3] = max * 100;
- return tlv;
-}
-
-STATIC json_object * addOneSndCtl(afb_req request, snd_ctl_t *ctlDev, json_object *ctlJ, halQueryMode queryMode) {
- int err, done, ctlNumid, ctlValue, shouldCreate;
- json_object *tmpJ;
- const char *ctlName;
- ctlRequestT ctlRequest;
- int ctlMax, ctlMin, ctlStep, ctlCount, ctlSubDev, ctlSndDev;
- snd_ctl_elem_type_t ctlType;
- snd_ctl_elem_info_t *elemInfo;
- snd_ctl_elem_id_t *elemId;
- snd_ctl_elem_value_t *elemValue;
- const unsigned int *elemTlv = NULL;
-
- // parse json ctl object
- json_object_object_get_ex(ctlJ, "name", &tmpJ);
- ctlName = json_object_get_string(tmpJ);
-
- json_object_object_get_ex(ctlJ, "ctl", &tmpJ);
- ctlNumid = json_object_get_int(tmpJ);
-
- if (!ctlNumid && !ctlName) {
- afb_req_fail_f(request, "ctl-invalid", "crl=%s name or numid missing", json_object_get_string(ctlJ));
- goto OnErrorExit;
- }
-
-
- // We are facing a software ctl
- if (ctlNumid == CTL_AUTO) {
- done = json_object_object_get_ex(ctlJ, "type", &tmpJ);
- if (done) ctlType = json_object_get_int(tmpJ);
- else ctlType = SND_CTL_ELEM_TYPE_INTEGER;
-
- json_object_object_get_ex(ctlJ, "value", &tmpJ);
- ctlValue = json_object_get_int(tmpJ);
-
- // default for json_object_get_int is zero
- json_object_object_get_ex(ctlJ, "min", &tmpJ);
- ctlMin = json_object_get_int(tmpJ);
-
- done = json_object_object_get_ex(ctlJ, "max", &tmpJ);
- if (done) ctlMax = json_object_get_int(tmpJ);
- else {
- if (ctlType == SND_CTL_ELEM_TYPE_BOOLEAN) ctlMax = 1;
- else ctlMax = 100;
- }
-
- done = json_object_object_get_ex(ctlJ, "step", &tmpJ);
- if (!done) ctlStep = 1;
- else ctlStep = json_object_get_int(tmpJ);
-
- done = json_object_object_get_ex(ctlJ, "count", &tmpJ);
- if (!done) ctlCount = 1;
- else ctlCount = json_object_get_int(tmpJ);
-
- json_object_object_get_ex(ctlJ, "snddev", &tmpJ);
- ctlSndDev = json_object_get_int(tmpJ);
-
- json_object_object_get_ex(ctlJ, "subdev", &tmpJ);
- ctlSubDev = json_object_get_int(tmpJ);
- }
-
- // Assert that this ctls is not used
- snd_ctl_elem_info_alloca(&elemInfo);
- if (ctlName) snd_ctl_elem_info_set_name(elemInfo, ctlName);
- if (ctlNumid > 0)snd_ctl_elem_info_set_numid(elemInfo, ctlNumid);
- snd_ctl_elem_info_set_interface(elemInfo, SND_CTL_ELEM_IFACE_MIXER);
-
- // If control exist try to reuse it
- err = snd_ctl_elem_info(ctlDev, elemInfo);
- if (err) {
- shouldCreate = 1;
- } else {
- int count, min, max, sndDev, subDev;
- snd_ctl_elem_type_t type;
-
- // ctl exit let's get associated elemID
- snd_ctl_elem_id_alloca(&elemId);
- snd_ctl_elem_info_get_id(elemInfo, elemId);
-
- // If this is a hardware ctl only update value
- if (ctlNumid != CTL_AUTO) goto UpdateDefaultVal;
-
- count = snd_ctl_elem_info_get_count(elemInfo);
- min = (int) snd_ctl_elem_info_get_min(elemInfo);
- max = (int) snd_ctl_elem_info_get_max(elemInfo);
- type = snd_ctl_elem_info_get_type(elemInfo);
- sndDev = (int) snd_ctl_elem_info_get_device(elemInfo);
- subDev = (int) snd_ctl_elem_info_get_subdevice(elemInfo);
-
- if (count == ctlCount && min == ctlMin && max == ctlMax && type == ctlType && sndDev == ctlSndDev && subDev == ctlSubDev) {
- // Adjust value to best fit request
- shouldCreate = 0;
- } else {
- err = snd_ctl_elem_remove(ctlDev, elemId);
- shouldCreate = 1;
- if (err < 0) {
- AFB_ERROR("addOneSndCtl: ctlName=%s numid=%d fail to reset", snd_ctl_elem_info_get_name(elemInfo), snd_ctl_elem_info_get_numid(elemInfo));
- goto DoNotUpdate;
- };
-
- // Control was deleted need to refresh elemInfo
- snd_ctl_elem_info_alloca(&elemInfo);
- if (ctlName) snd_ctl_elem_info_set_name(elemInfo, ctlName);
- snd_ctl_elem_info_set_interface(elemInfo, SND_CTL_ELEM_IFACE_MIXER);
- snd_ctl_elem_info(ctlDev, elemInfo);
- }
- }
-
- // Add requested ID into elemInfo
- snd_ctl_elem_info_set_device(elemInfo, ctlSndDev);
- snd_ctl_elem_info_set_subdevice(elemInfo, ctlSubDev);
-
- switch (ctlType) {
- case SND_CTL_ELEM_TYPE_BOOLEAN:
- if (shouldCreate) {
- err = snd_ctl_add_boolean_elem_set(ctlDev, elemInfo, 1, ctlCount);
- if (err) {
- AFB_ERROR("AddOntSndCtl Boolean: devid='%s' name='%s' count=%d", snd_ctl_name(ctlDev), ctlName, ctlCount);
- afb_req_fail_f(request, "ctl-invalid-bool", "devid='%s' name='%s' count=%d", snd_ctl_name(ctlDev), ctlName, ctlCount);
- goto OnErrorExit;
- }
- }
-
- // Create a dummy TLV
- elemTlv = allocate_bool_fake_tlv();
-
- break;
-
- case SND_CTL_ELEM_TYPE_INTEGER:
- if (shouldCreate) {
- err = snd_ctl_add_integer_elem_set(ctlDev, elemInfo, 1, ctlCount, ctlMin, ctlMax, ctlStep);
- if (err) {
- AFB_ERROR("AddOntSndCtl Integer: devid='%s' name='%s' count=%d min=%d max=%d step=%d", snd_ctl_name(ctlDev), ctlName, ctlCount, ctlMin, ctlMax, ctlStep);
- afb_req_fail_f(request, "ctl-invalid-bool", "devid='%s' name='%s' count=%d min=%d max=%d step=%d", snd_ctl_name(ctlDev), ctlName, ctlCount, ctlMin, ctlMax, ctlStep);
- goto OnErrorExit;
- }
- }
-
- // Fulup needed to be tested with some dB expert !!!
- json_object *dbscaleJ;
- if (json_object_object_get_ex(ctlJ, "dbscale", &dbscaleJ)) {
- int min, max;
-
- if (json_object_get_type(dbscaleJ) != json_type_object) {
- afb_req_fail_f(request, "ctl-invalid-dbscale", "devid=%s crl=%s invalid json in integer control", snd_ctl_name(ctlDev), json_object_get_string(ctlJ));
- goto OnErrorExit;
-
- json_object_object_get_ex(ctlJ, "min", &tmpJ);
- min = json_object_get_int(tmpJ);
- if (min >= 0) {
- afb_req_fail_f(request, "ctl-invalid-dbscale", "devid=%s crl=%s min should be a negative number", snd_ctl_name(ctlDev), json_object_get_string(ctlJ));
- goto OnErrorExit;
- }
-
- // default value 0=mute
- json_object_object_get_ex(ctlJ, "max", &tmpJ);
- max = json_object_get_int(tmpJ);
-
- // default value 1dB
- json_object_object_get_ex(ctlJ, "step", &tmpJ);
- int step = json_object_get_int(tmpJ);
- if (step <= 0) step = 1;
-
- elemTlv = allocate_int_dbscale_tlv(min, max, step);
-
- }
- } else {
- // provide a fake linear TLV
- elemTlv = allocate_int_linear_tlv(ctlMin, ctlMax);
- }
- break;
-
- case SND_CTL_ELEM_TYPE_ENUMERATED:
-
- if (shouldCreate) {
- json_object *enumsJ;
- json_object_object_get_ex(ctlJ, "enums", &enumsJ);
- if (json_object_get_type(enumsJ) != json_type_array) {
- afb_req_fail_f(request, "ctl-missing-enums", "devid=%s crl=%s mandatory enum=xxx missing in enumerated control", snd_ctl_name(ctlDev), json_object_get_string(ctlJ));
- goto OnErrorExit;
- }
-
- int length = json_object_array_length(enumsJ);
- const char **enumlabels = malloc(length * sizeof (char*));
-
- for (int jdx = 0; jdx < length; jdx++) {
- tmpJ = json_object_array_get_idx(enumsJ, jdx);
- enumlabels[jdx] = json_object_get_string(tmpJ);
- }
-
- err = snd_ctl_add_enumerated_elem_set(ctlDev, elemInfo, 1, ctlCount, length, enumlabels);
- if (err) {
- afb_req_fail_f(request, "ctl-invalid-bool", "devid=%s crl=%s invalid enumerated control", snd_ctl_name(ctlDev), json_object_get_string(ctlJ));
- goto OnErrorExit;
- }
-
- // Fulup should be an empty container
- elemTlv = allocate_bool_fake_tlv();
- }
- break;
-
- // Long Term Waiting ToDoList
- case SND_CTL_ELEM_TYPE_INTEGER64:
- case SND_CTL_ELEM_TYPE_BYTES:
- default:
- afb_req_fail_f(request, "ctl-invalid-type", "crl=%s unsupported type type=%d numid=%d", json_object_get_string(ctlJ), ctlType, ctlNumid);
- goto OnErrorExit;
- }
-
-UpdateDefaultVal:
-
- // Set Value to default
- snd_ctl_elem_value_alloca(&elemValue);
- for (int idx = 0; idx < snd_ctl_elem_info_get_count(elemInfo); idx++) {
- snd_ctl_elem_value_set_integer(elemValue, idx, ctlValue);
- }
-
- // write default values in newly created control
- snd_ctl_elem_id_alloca(&elemId);
- snd_ctl_elem_info(ctlDev, elemInfo);
- snd_ctl_elem_info_get_id(elemInfo, elemId);
- snd_ctl_elem_value_set_id(elemValue, elemId);
- err = snd_ctl_elem_write(ctlDev, elemValue);
- if (err < 0) {
- AFB_WARNING("addOneSndCtl: crl=%s numid=%d fail to write Values error=%s", json_object_get_string(ctlJ), snd_ctl_elem_info_get_numid(elemInfo), snd_strerror(err));
- goto DoNotUpdate;
- }
-
- // write a default null TLV (if usefull should be implemented for every ctl type)
- if (elemTlv) {
- err = snd_ctl_elem_tlv_write(ctlDev, elemId, elemTlv);
- if (err < 0) {
- AFB_WARNING("addOneSndCtl: crl=%s numid=%d fail to write TLV error=%s", json_object_get_string(ctlJ), snd_ctl_elem_info_get_numid(elemInfo), snd_strerror(err));
- goto DoNotUpdate;
- }
- }
-
-DoNotUpdate:
- // return newly created as a JSON object
- alsaGetSingleCtl(ctlDev, elemId, &ctlRequest, queryMode);
- if (ctlRequest.used < 0) {
- AFB_WARNING("addOneSndCtl: crl=%s numid=%d Fail to get value", json_object_get_string(ctlJ), snd_ctl_elem_info_get_numid(elemInfo));
- }
- return ctlRequest.valuesJ;
-
-OnErrorExit:
- return NULL;
-}
-
-PUBLIC void alsaAddCustomCtls(afb_req request) {
- int err;
- json_object *ctlsJ, *ctlsValues, *ctlValues;
- enum json_type;
- snd_ctl_t *ctlDev = NULL;
- const char *devid, *mode;
-
- devid = afb_req_value(request, "devid");
- if (devid == NULL) {
- afb_req_fail_f(request, "devid-missing", "devid MUST be defined for alsaAddCustomCtls");
- goto OnErrorExit;
- }
-
- // open control interface for devid
- err = snd_ctl_open(&ctlDev, devid, 0);
- if (err < 0) {
- afb_req_fail_f(request, "devid-unknown", "SndCard devid=[%s] Not Found err=%s", devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- // get verbosity level
- halQueryMode queryMode = QUERY_QUIET;
- mode = afb_req_value(request, "mode");
- if (mode != NULL) {
- sscanf(mode, "%i", (int*) &queryMode);
- }
-
- // extract sound controls and parse json
- ctlsJ = json_tokener_parse(afb_req_value(request, "ctl"));
- if (!ctlsJ) {
- afb_req_fail_f(request, "ctls-missing", "ctls MUST be defined as a JSON array for alsaAddCustomCtls");
- goto OnErrorExit;
- }
-
- switch (json_object_get_type(ctlsJ)) {
- case json_type_object:
- ctlsValues = addOneSndCtl(request, ctlDev, ctlsJ, queryMode);
- if (!ctlsValues) goto OnErrorExit;
- break;
-
- case json_type_array:
- ctlsValues = json_object_new_array();
- for (int idx = 0; idx < json_object_array_length(ctlsJ); idx++) {
- json_object *ctlJ = json_object_array_get_idx(ctlsJ, idx);
- ctlValues = addOneSndCtl(request, ctlDev, ctlJ, queryMode);
- if (ctlValues) json_object_array_add(ctlsValues, ctlValues);
- else goto OnErrorExit;
- }
- break;
-
- default:
- afb_req_fail_f(request, "ctls-invalid", "ctls=%s not valid JSON array", json_object_get_string(ctlsJ));
- goto OnErrorExit;
- }
-
- // get ctl as a json response
- afb_req_success(request, ctlsValues, NULL);
-
-OnErrorExit:
- if (ctlDev) snd_ctl_close(ctlDev);
- return;
-} \ No newline at end of file
diff --git a/ALSA-afb/Alsa-ApiHat.c b/ALSA-afb/Alsa-ApiHat.c
deleted file mode 100644
index 2c3c5c1..0000000
--- a/ALSA-afb/Alsa-ApiHat.c
+++ /dev/null
@@ -1,59 +0,0 @@
-/*
- * Copyright (C) 2016 "IoT.bzh"
- * Author Fulup Ar Foll <fulup@iot.bzh>
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- */
-
-#define _GNU_SOURCE
-#include <stdio.h>
-#include <string.h>
-#include <unistd.h>
-#include <errno.h>
-#include <netdb.h>
-#include <fcntl.h>
-#include <math.h>
-#include <sys/time.h>
-#include <sys/types.h>
-
-#include "Alsa-ApiHat.h"
-
-/*
- * array of the verbs exported to afb-daemon
- */
-static const struct afb_verb_v2 api_verbs[] = {
- /* VERB'S NAME FUNCTION TO CALL */
- { .verb = "ping", .callback = pingtest},
- { .verb = "getinfo", .callback = alsaGetInfo},
- { .verb = "getctl", .callback = alsaGetCtls},
- { .verb = "setctl", .callback = alsaSetCtls},
- { .verb = "subscribe", .callback = alsaEvtSubcribe},
- { .verb = "getcardid", .callback = alsaGetCardId},
- { .verb = "halregister", .callback = alsaRegisterHal},
- { .verb = "hallist", .callback = alsaActiveHal},
- { .verb = "ucmquery", .callback = alsaUseCaseQuery},
- { .verb = "ucmset", .callback = alsaUseCaseSet},
- { .verb = "ucmget", .callback = alsaUseCaseGet},
- { .verb = "ucmreset", .callback = alsaUseCaseReset},
- { .verb = "ucmclose", .callback = alsaUseCaseClose},
- { .verb = "addcustomctl", .callback = alsaAddCustomCtls},
- { .verb = NULL} /* marker for end of the array */
-};
-
-/*
- * description of the binding for afb-daemon
- */
-const struct afb_binding_v2 afbBindingV2 = {
- .api = "alsacore",
- .verbs = api_verbs,
-};
diff --git a/ALSA-afb/Alsa-ApiHat.h b/ALSA-afb/Alsa-ApiHat.h
deleted file mode 100644
index b05cfbe..0000000
--- a/ALSA-afb/Alsa-ApiHat.h
+++ /dev/null
@@ -1,74 +0,0 @@
-/*
- * AlsaLibMapping -- provide low level interface with ALSA lib (extracted from alsa-json-gateway code)
- * Copyright (C) 2015,2016,2017, Fulup Ar Foll fulup@iot.bzh
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- */
-
-
-#ifndef ALSALIBMAPPING_H
-#define ALSALIBMAPPING_H
-
-
-#include <alsa/asoundlib.h>
-#include <systemd/sd-event.h>
-#include "audio-common.h"
-
-typedef enum {
- ACTION_SET,
- ACTION_GET
-} ActionSetGetT;
-
-// generic structure to pass parsed query values
-typedef struct {
- const char *devid;
- json_object *numidsJ;
- halQueryMode mode;
- int count;
-} queryValuesT;
-
-// use to store crl numid user request
-typedef struct {
- unsigned int numId;
- json_object *jToken;
- json_object *valuesJ;
- int used;
-} ctlRequestT;
-
-// import from AlsaAfbBinding
-extern const struct afb_binding_interface *afbIface;
-PUBLIC json_object *alsaCheckQuery (struct afb_req request, queryValuesT *queryValues);
-
-// AlseCoreSetGet exports
-PUBLIC int alsaGetSingleCtl (snd_ctl_t *ctlDev, snd_ctl_elem_id_t *elemId, ctlRequestT *ctlRequest, halQueryMode queryMode);
-PUBLIC void alsaGetInfo (struct afb_req request);
-PUBLIC void alsaGetCtls(struct afb_req request);
-PUBLIC void alsaSetCtls(struct afb_req request);
-
-
-// AlsaUseCase exports
-PUBLIC void alsaUseCaseQuery(struct afb_req request);
-PUBLIC void alsaUseCaseSet(struct afb_req request);
-PUBLIC void alsaUseCaseGet(struct afb_req request);
-PUBLIC void alsaUseCaseClose(struct afb_req request);
-PUBLIC void alsaUseCaseReset(struct afb_req request);
-PUBLIC void alsaAddCustomCtls(struct afb_req request);
-
-// AlsaRegEvt
-PUBLIC void alsaEvtSubcribe (struct afb_req request);
-PUBLIC void alsaGetCardId (struct afb_req request);
-PUBLIC void alsaRegisterHal (struct afb_req request);
-PUBLIC void alsaActiveHal (struct afb_req request);
-
-#endif /* ALSALIBMAPPING_H */
-
diff --git a/ALSA-afb/Alsa-RegEvt.c b/ALSA-afb/Alsa-RegEvt.c
deleted file mode 100644
index 080b6cc..0000000
--- a/ALSA-afb/Alsa-RegEvt.c
+++ /dev/null
@@ -1,395 +0,0 @@
-/*
- * AlsaLibMapping -- provide low level interface with ALSA lib (extracted from alsa-json-gateway code)
- * Copyright (C) 2015,2016,2017, Fulup Ar Foll fulup@iot.bzh
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
-
- */
-
-#define _GNU_SOURCE // needed for vasprintf
-
-#include "Alsa-ApiHat.h"
-
-// generic sndctrl event handle hook to event callback when pooling
-
-typedef struct {
- struct pollfd pfds;
- sd_event_source *src;
- snd_ctl_t *ctlDev;
- int mode;
- struct afb_event afbevt;
-} evtHandleT;
-
-typedef struct {
- int ucount;
- int cardId;
- evtHandleT *evtHandle;
-} sndHandleT;
-
-typedef struct {
- char *devid;
- char *apiprefix;
- char *shortname;
- char *longname;
-} cardRegistryT;
-
-cardRegistryT *cardRegistry[MAX_SND_CARD + 1];
-
-PUBLIC json_object *alsaCheckQuery(afb_req request, queryValuesT *queryValues) {
-
- json_object *tmpJ;
- int done;
-
- // get query from request
- json_object *queryInJ = afb_req_json(request);
-
- done = json_object_object_get_ex(queryInJ, "devid", &tmpJ);
- if (!done) {
- afb_req_fail_f(request, "devid-missing", "Invalid query='%s'", json_object_get_string(queryInJ));
- goto OnErrorExit;
- }
- queryValues->devid = json_object_get_string(tmpJ);
-
- done = json_object_object_get_ex(queryInJ, "mode", &tmpJ);
- if (!done) queryValues->mode = QUERY_QUIET; // default quiet
- else queryValues->mode = json_object_get_int(tmpJ);
-
- return queryInJ;
-
-OnErrorExit:
- return NULL;
-}
-
-// This routine is called when ALSA event are fired
-
-STATIC int sndCtlEventCB(sd_event_source* src, int fd, uint32_t revents, void* userData) {
- int err, ctlNumid;
- evtHandleT *evtHandle = (evtHandleT*) userData;
- snd_ctl_event_t *eventId;
- json_object *ctlEventJ;
- unsigned int mask;
- int iface;
- int device;
- int subdev;
- const char*ctlName;
- ctlRequestT ctlRequest;
- snd_ctl_elem_id_t *elemId;
-
- if ((revents & EPOLLHUP) != 0) {
- AFB_NOTICE("SndCtl hanghup [car disconnected]");
- goto ExitOnSucess;
- }
-
- if ((revents & EPOLLIN) != 0) {
-
- // initialise event structure on stack
- snd_ctl_event_alloca(&eventId);
- snd_ctl_elem_id_alloca(&elemId);
-
- err = snd_ctl_read(evtHandle->ctlDev, eventId);
- if (err < 0) goto OnErrorExit;
-
- // we only process sndctrl element
- if (snd_ctl_event_get_type(eventId) != SND_CTL_EVENT_ELEM) goto ExitOnSucess;
-
- // we only process value changed events
- mask = snd_ctl_event_elem_get_mask(eventId);
- if (!(mask & SND_CTL_EVENT_MASK_VALUE)) goto ExitOnSucess;
-
- snd_ctl_event_elem_get_id(eventId, elemId);
-
- err = alsaGetSingleCtl(evtHandle->ctlDev, elemId, &ctlRequest, evtHandle->mode);
- if (err) goto OnErrorExit;
-
- // If CTL as a value use it as container for response
- if (ctlRequest.valuesJ) ctlEventJ = ctlRequest.valuesJ;
- else {
- ctlEventJ = json_object_new_object();
- ctlNumid = snd_ctl_event_elem_get_numid(eventId);
- json_object_object_add(ctlEventJ, "id", json_object_new_int(ctlNumid));
- }
-
- if (evtHandle->mode >= QUERY_COMPACT) {
- ctlName = snd_ctl_event_elem_get_name(eventId);
- json_object_object_add(ctlEventJ, "name", json_object_new_string(ctlName));
- }
-
- if (evtHandle->mode >= QUERY_VERBOSE) {
- iface = snd_ctl_event_elem_get_interface(eventId);
- device = snd_ctl_event_elem_get_device(eventId);
- subdev = snd_ctl_event_elem_get_subdevice(eventId);
- json_object_object_add(ctlEventJ, "ifc", json_object_new_int(iface));
- json_object_object_add(ctlEventJ, "dev", json_object_new_int(device));
- json_object_object_add(ctlEventJ, "sub", json_object_new_int(subdev));
- }
-
-
- AFB_DEBUG("sndCtlEventCB=%s", json_object_get_string(ctlEventJ));
- afb_event_push(evtHandle->afbevt, ctlEventJ);
- }
-
-ExitOnSucess:
- return 0;
-
-OnErrorExit:
- AFB_WARNING("sndCtlEventCB: ignored unsupported event type");
- return (0);
-}
-
-// Subscribe to every Alsa CtlEvent send by a given board
-
-PUBLIC void alsaEvtSubcribe(afb_req request) {
- static sndHandleT sndHandles[MAX_SND_CARD];
- evtHandleT *evtHandle = NULL;
- snd_ctl_t *ctlDev = NULL;
- int err, idx, cardId, idxFree = -1;
- snd_ctl_card_info_t *cardinfo;
- queryValuesT queryValues;
-
- json_object *queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
-
- // open control interface for devid
- err = snd_ctl_open(&ctlDev, queryValues.devid, SND_CTL_READONLY);
- if (err < 0) {
- afb_req_fail_f(request, "devid-unknown", "SndCard devid=%s Not Found err=%s", queryValues.devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- snd_ctl_card_info_alloca(&cardinfo);
- if ((err = snd_ctl_card_info(ctlDev, cardinfo)) < 0) {
- afb_req_fail_f(request, "devid-invalid", "SndCard devid=%s Not Found err=%s", queryValues.devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- cardId = snd_ctl_card_info_get_card(cardinfo);
-
- // search for an existing subscription and mark 1st free slot
- for (idx = 0; idx < MAX_SND_CARD; idx++) {
- if (sndHandles[idx].ucount > 0 && cardId == sndHandles[idx].cardId) {
- evtHandle = sndHandles[idx].evtHandle;
- break;
- } else if (idxFree == -1) idxFree = idx;
- };
-
- // if not subscription exist for the event let's create one
- if (idx == MAX_SND_CARD) {
-
- // reach MAX_SND_CARD event registration
- if (idxFree == -1) {
- afb_req_fail_f(request, "register-toomany", "Cannot register new event Maxcard==%d", idx);
- goto OnErrorExit;
- }
-
- evtHandle = malloc(sizeof (evtHandleT));
- evtHandle->ctlDev = ctlDev;
- evtHandle->mode = queryValues.mode;
- sndHandles[idxFree].ucount = 0;
- sndHandles[idxFree].cardId = cardId;
- sndHandles[idxFree].evtHandle = evtHandle;
-
- // subscribe for sndctl events attached to devid
- err = snd_ctl_subscribe_events(evtHandle->ctlDev, 1);
- if (err < 0) {
- afb_req_fail_f(request, "subscribe-fail", "Cannot subscribe events from devid=%s err=%d", queryValues.devid, err);
- goto OnErrorExit;
- }
-
- // get pollfd attach to this sound board
- snd_ctl_poll_descriptors(evtHandle->ctlDev, &evtHandle->pfds, 1);
-
- // register sound event to binder main loop
- err = sd_event_add_io(afb_daemon_get_event_loop(), &evtHandle->src, evtHandle->pfds.fd, EPOLLIN, sndCtlEventCB, evtHandle);
- if (err < 0) {
- afb_req_fail_f(request, "register-mainloop", "Cannot hook events to mainloop devid=%s err=%d", queryValues.devid, err);
- goto OnErrorExit;
- }
-
- // create binder event attached to devid name
- evtHandle->afbevt = afb_daemon_make_event(queryValues.devid);
- if (!afb_event_is_valid(evtHandle->afbevt)) {
- afb_req_fail_f(request, "register-event", "Cannot register new binder event name=%s", queryValues.devid);
- goto OnErrorExit;
- }
-
- // everything looks OK let's move forward
- idx = idxFree;
- }
-
- // subscribe to binder event
- err = afb_req_subscribe(request, evtHandle->afbevt);
- if (err != 0) {
- afb_req_fail_f(request, "register-eventname", "Cannot subscribe binder event name=%s [invalid channel]", queryValues.devid);
- goto OnErrorExit;
- }
-
- // increase usage count and return success
- sndHandles[idx].ucount++;
- afb_req_success(request, NULL, NULL);
- return;
-
-OnErrorExit:
- if (ctlDev) snd_ctl_close(ctlDev);
- return;
-}
-
-// Subscribe to every Alsa CtlEvent send by a given board
-
-STATIC json_object *alsaProbeCardId(afb_req request) {
- char devid [10];
- const char *ctlName, *shortname, *longname;
- int card, err, index, idx;
- json_object *responseJ;
- snd_ctl_t *ctlDev;
- snd_ctl_card_info_t *cardinfo;
-
- const char *sndname = afb_req_value(request, "sndname");
- if (sndname == NULL) {
- afb_req_fail_f(request, "argument-missing", "sndname=SndCardName missing");
- goto OnErrorExit;
- }
-
- // loop on potential card number
- snd_ctl_card_info_alloca(&cardinfo);
- for (card = 0; card < MAX_SND_CARD; card++) {
-
- // build card devid and probe it
- snprintf(devid, sizeof (devid), "hw:%i", card);
-
- // open control interface for devid
- err = snd_ctl_open(&ctlDev, devid, SND_CTL_READONLY);
- if (err < 0) continue;
-
- // extract sound card information
- snd_ctl_card_info(ctlDev, cardinfo);
- index = snd_ctl_card_info_get_card(cardinfo);
- ctlName = snd_ctl_card_info_get_id(cardinfo);
- shortname = snd_ctl_card_info_get_name(cardinfo);
- longname = snd_ctl_card_info_get_longname(cardinfo);
-
- // check if short|long name match
- if (!strcmp(sndname, ctlName)) break;
- if (!strcmp(sndname, shortname)) break;
- if (!strcmp(sndname, longname)) break;
- }
-
- if (card == MAX_SND_CARD) {
- afb_req_fail_f(request, "ctlDev-notfound", "Fail to find card with name=%s", sndname);
- goto OnErrorExit;
- }
-
- // proxy ctlevent as a binder event
- responseJ = json_object_new_object();
- json_object_object_add(responseJ, "index", json_object_new_int(index));
- json_object_object_add(responseJ, "devid", json_object_new_string(devid));
- json_object_object_add(responseJ, "shortname", json_object_new_string(shortname));
- json_object_object_add(responseJ, "longname", json_object_new_string(longname));
-
- // search for a HAL binder card mapping name to api prefix
- for (idx = 0; (idx < MAX_SND_CARD && cardRegistry[idx]); idx++) {
- if (!strcmp(cardRegistry[idx]->shortname, shortname)) {
- json_object_object_add(responseJ, "halapi", json_object_new_string(cardRegistry[idx]->apiprefix));
- break;
- }
- }
-
- return responseJ;
-
-OnErrorExit:
- return NULL;
-}
-
-// Make alsaProbeCardId compatible with AFB request
-
-PUBLIC void alsaGetCardId(afb_req request) {
-
- json_object *responseJ = alsaProbeCardId(request);
- if (responseJ) afb_req_success(request, responseJ, NULL);
-}
-
-// Return list of active resgistrated HAL with corresponding sndcard
-
-PUBLIC void alsaActiveHal(afb_req request) {
- json_object *responseJ = json_object_new_array();
-
- for (int idx = 0; idx < MAX_SND_CARD; idx++) {
- if (!cardRegistry[idx]) break;
-
- json_object *haldevJ = json_object_new_object();
- json_object_object_add(haldevJ, "api", json_object_new_string(cardRegistry[idx]->apiprefix));
- if (cardRegistry[idx]->devid) json_object_object_add(haldevJ, "devid", json_object_new_string(cardRegistry[idx]->devid));
- if (cardRegistry[idx]->shortname)json_object_object_add(haldevJ, "shortname", json_object_new_string(cardRegistry[idx]->shortname));
- if (cardRegistry[idx]->longname) json_object_object_add(haldevJ, "longname", json_object_new_string(cardRegistry[idx]->longname));
- json_object_array_add(responseJ, haldevJ);
- }
-
- afb_req_success(request, responseJ, NULL);
-}
-
-
-// Register loaded HAL with board Name and API prefix
-
-PUBLIC void alsaRegisterHal(afb_req request) {
- static int index = 0;
- json_object *responseJ;
- const char *shortname, *apiPrefix;
-
- apiPrefix = afb_req_value(request, "prefix");
- if (apiPrefix == NULL) {
- afb_req_fail_f(request, "argument-missing", "prefix=BindingApiPrefix missing");
- goto OnErrorExit;
- }
-
- shortname = afb_req_value(request, "sndname");
- if (shortname == NULL) {
- afb_req_fail_f(request, "argument-missing", "sndname=SndCardName missing");
- goto OnErrorExit;
- }
-
- if (index == MAX_SND_CARD) {
- afb_req_fail_f(request, "alsahal-toomany", "Fail to register sndname=[%s]", shortname);
- goto OnErrorExit;
- }
-
- // alsaGetCardId should be check to register only valid card
- responseJ = alsaProbeCardId(request);
- if (responseJ) {
- json_object *tmpJ;
- int done;
-
- cardRegistry[index] = malloc(sizeof (cardRegistry));
- cardRegistry[index]->apiprefix = strdup(apiPrefix);
- cardRegistry[index]->shortname = strdup(shortname);
-
- done = json_object_object_get_ex(responseJ, "devid", &tmpJ);
- if (done) cardRegistry[index]->devid = strdup(json_object_get_string(tmpJ));
- else cardRegistry[index]->devid = NULL;
-
- done = json_object_object_get_ex(responseJ, "longname", &tmpJ);
- if (done) cardRegistry[index]->longname = strdup(json_object_get_string(tmpJ));
- else cardRegistry[index]->longname = NULL;
-
- // make sure register close with a null value
- index++;
- cardRegistry[index] = NULL;
-
- afb_req_success(request, responseJ, NULL);
- }
-
- // If OK return sound card Alsa ID+Info
- return;
-
-OnErrorExit:
- return;
-}
-
diff --git a/ALSA-afb/Alsa-SetGet.c b/ALSA-afb/Alsa-SetGet.c
deleted file mode 100644
index 04f2929..0000000
--- a/ALSA-afb/Alsa-SetGet.c
+++ /dev/null
@@ -1,809 +0,0 @@
-/*
- * AlsaLibMapping -- provide low level interface with ALSA lib (extracted from alsa-json-gateway code)
- * Copyright (C) 2015,2016,2017, Fulup Ar Foll fulup@iot.bzh
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
-
- References:
- https://github.com/fulup-bzh/AlsaJsonGateway (original code)
- http://alsa-lib.sourcearchive.com/documentation/1.0.20/modules.html
- http://alsa-lib.sourcearchive.com/documentation/1.0.8/group__Control_gd48d44da8e3bfe150e928267008b8ff5.html
- http://alsa.opensrc.org/HowTo_access_a_mixer_control
- https://github.com/gch1p/alsa-volume-monitor/blob/master/main.c
- https://github.com/DongheonKim/android_hardware_alsa-sound/blob/master/ALSAControl.cpp (ALSA low level API)
- https://www.kernel.org/doc/html/v4.11/sound/index.html
-
- */
-
-#define _GNU_SOURCE // needed for vasprintf
-#include "Alsa-ApiHat.h"
-
-PUBLIC void NumidsListParse(ActionSetGetT action, queryValuesT *queryValues, ctlRequestT *ctlRequest) {
- int length;
-
- for (int idx = 0; idx < queryValues->count; idx++) {
- json_object *jId, *valuesJ;
- ctlRequest[idx].used = 0;
- ctlRequest[idx].valuesJ = NULL;
-
- // when only one NUMID is provided it might not be encapsulated in a JSON array
- if (json_type_array == json_object_get_type(queryValues->numidsJ)) ctlRequest[idx].jToken = json_object_array_get_idx(queryValues->numidsJ, idx);
- else ctlRequest[idx].jToken = queryValues->numidsJ;
-
- enum json_type jtype = json_object_get_type(ctlRequest[idx].jToken);
- switch (jtype) {
-
- case json_type_int:
- // if NUMID is not an array then it should be an integer numid with no value
- ctlRequest[idx].numId = json_object_get_int(ctlRequest[idx].jToken);
-
- // Special SET simple short numid form [numid, [VAL1...VALX]]
- if (action == ACTION_SET && queryValues->count == 2) {
- ctlRequest[idx].valuesJ = json_object_array_get_idx(queryValues->numidsJ, 1);
- queryValues->count = 1; //In this form count==2 , when only one numid is to set
- idx++;
- continue;
- } else
- break;
-
- case json_type_array:
- // NUMID is an array 1st slot should be numid, optionally values may come after
- length = json_object_array_length(ctlRequest[idx].jToken);
-
- // numid must be in 1st slot of numid json array
- ctlRequest[idx].numId = json_object_get_int(json_object_array_get_idx(ctlRequest[idx].jToken, 0));
- if (action == ACTION_GET) continue;
-
- // In Write mode second value should be the value
- if (action == ACTION_SET && length == 2) {
- ctlRequest[idx].valuesJ = json_object_array_get_idx(ctlRequest[idx].jToken, 1);
- continue;
- }
-
- // no numid value
- ctlRequest[idx].used = -1;
- break;
-
- case json_type_object:
- // numid+values formated as {id:xxx, val:[aa,bb...,nn]}
- if (!json_object_object_get_ex(ctlRequest[idx].jToken, "id", &jId) || !json_object_object_get_ex(ctlRequest[idx].jToken, "val", &valuesJ)) {
- AFB_NOTICE("Invalid Json=%s missing 'id'|'val'", json_object_get_string(ctlRequest[idx].jToken));
- ctlRequest[idx].used = -1;
- } else {
- ctlRequest[idx].numId = json_object_get_int(jId);
- if (action == ACTION_SET) ctlRequest[idx].valuesJ = valuesJ;
- }
- break;
-
- default:
- ctlRequest[idx].used = -1;
- }
- }
-}
-
-STATIC json_object *DB2StringJsonOject(long dB) {
- char label [20];
- if (dB < 0) {
- snprintf(label, sizeof (label), "-%li.%02lidB", -dB / 100, -dB % 100);
- } else {
- snprintf(label, sizeof (label), "%li.%02lidB", dB / 100, dB % 100);
- }
-
- // json function takes care of string copy
- return (json_object_new_string(label));
-}
-
-
-// Direct port from amixer TLV decode routine. This code is too complex for me.
-// I hopefully did not break it when porting it.
-
-STATIC json_object *decodeTlv(unsigned int *tlv, unsigned int tlv_size, int mode) {
- char label[20];
- unsigned int type = tlv[0];
- unsigned int size;
- unsigned int idx = 0;
- const char *chmap_type = NULL;
- json_object * decodeTlvJson = json_object_new_object();
-
- if (tlv_size < (unsigned int) (2 * sizeof (unsigned int))) {
- printf("TLV size error!\n");
- return NULL;
- }
- type = tlv[idx++];
- size = tlv[idx++];
- tlv_size -= (unsigned int) (2 * sizeof (unsigned int));
- if (size > tlv_size) {
- fprintf(stderr, "TLV size error (%i, %i, %i)!\n", type, size, tlv_size);
- return NULL;
- }
- switch (type) {
-
- case SND_CTL_TLVT_CONTAINER:
- {
- json_object * containerJson = json_object_new_array();
-
- size += (unsigned int) (sizeof (unsigned int) - 1);
- size /= (unsigned int) (sizeof (unsigned int));
- while (idx < size) {
- json_object *embedJson;
-
- if (tlv[idx + 1] > (size - idx) * sizeof (unsigned int)) {
- fprintf(stderr, "TLV size error in compound!\n");
- return NULL;
- }
- embedJson = decodeTlv(tlv + idx, tlv[idx + 1] + 8, mode);
- json_object_array_add(containerJson, embedJson);
- idx += (unsigned int) (2 + (tlv[idx + 1] + sizeof (unsigned int) - 1) / sizeof (unsigned int));
- }
- json_object_object_add(decodeTlvJson, "container", containerJson);
- break;
- }
-
- case SND_CTL_TLVT_DB_SCALE:
- {
- json_object * dbscaleJson = json_object_new_object();
-
- if (size != 2 * sizeof (unsigned int)) {
- json_object * arrayJson = json_object_new_array();
- while (size > 0) {
- if (mode >= QUERY_VERBOSE) {
- snprintf(label, sizeof (label), "0x%08x,", tlv[idx++]);
- json_object_array_add(arrayJson, json_object_new_string(label));
- } else {
- json_object_array_add(arrayJson, json_object_new_int(tlv[idx++]));
- }
- size -= (unsigned int) sizeof (unsigned int);
- }
- json_object_object_add(dbscaleJson, "array", arrayJson);
- } else {
- if (mode >= QUERY_VERBOSE) {
- json_object_object_add(dbscaleJson, "min", DB2StringJsonOject((int) tlv[2]));
- json_object_object_add(dbscaleJson, "step", DB2StringJsonOject(tlv[3] & 0xffff));
- json_object_object_add(dbscaleJson, "mute", DB2StringJsonOject((tlv[3] >> 16) & 1));
- } else {
- json_object_object_add(dbscaleJson, "min", json_object_new_int((int) tlv[2]));
- json_object_object_add(dbscaleJson, "step", json_object_new_int(tlv[3] & 0xffff));
- json_object_object_add(dbscaleJson, "mute", json_object_new_int((tlv[3] >> 16) & 1));
- }
- }
- json_object_object_add(decodeTlvJson, "dbscale", dbscaleJson);
- break;
- }
-
-#ifdef SND_CTL_TLVT_DB_LINEAR
- case SND_CTL_TLVT_DB_LINEAR:
- {
- json_object * dbLinearJson = json_object_new_object();
-
- if (size != 2 * sizeof (unsigned int)) {
- json_object * arrayJson = json_object_new_array();
- while (size > 0) {
- if (mode >= QUERY_VERBOSE) {
- snprintf(label, sizeof (label), "0x%08x,", tlv[idx++]);
- json_object_array_add(arrayJson, json_object_new_string(label));
- } else {
- json_object_array_add(arrayJson, json_object_new_int(tlv[idx++]));
- }
- size -= (unsigned int) sizeof (unsigned int);
- }
- json_object_object_add(dbLinearJson, "offset", arrayJson);
- } else {
- if (mode >= QUERY_VERBOSE) {
- json_object_object_add(dbLinearJson, "min", DB2StringJsonOject((int) tlv[2]));
- json_object_object_add(dbLinearJson, "max", DB2StringJsonOject((int) tlv[3]));
- } else {
- json_object_object_add(dbLinearJson, "min", json_object_new_int((int) tlv[2]));
- json_object_object_add(dbLinearJson, "max", json_object_new_int((int) tlv[3]));
- }
- }
- json_object_object_add(decodeTlvJson, "dblinear", dbLinearJson);
- break;
- }
-#endif
-
-#ifdef SND_CTL_TLVT_DB_RANGE
- case SND_CTL_TLVT_DB_RANGE:
- {
- json_object *dbRangeJson = json_object_new_object();
-
- if ((size % (6 * sizeof (unsigned int))) != 0) {
- json_object *arrayJson = json_object_new_array();
- while (size > 0) {
- if (mode >= QUERY_VERBOSE) {
- snprintf(label, sizeof (label), "0x%08x,", tlv[idx++]);
- json_object_array_add(arrayJson, json_object_new_string(label));
- } else {
- json_object_array_add(arrayJson, json_object_new_int(tlv[idx++]));
- }
- size -= (unsigned int) sizeof (unsigned int);
- }
- json_object_object_add(dbRangeJson, "dbrange", arrayJson);
- break;
- }
- while (size > 0) {
- json_object * embedJson = json_object_new_object();
- json_object_object_add(embedJson, "rangemin", json_object_new_int(tlv[idx++]));
- json_object_object_add(embedJson, "rangemax", json_object_new_int(tlv[idx++]));
- embedJson = decodeTlv(tlv + idx, 4 * sizeof (unsigned int), mode);
- json_object_object_add(embedJson, "tlv", embedJson);
- idx += 4;
- size -= (unsigned int) (6 * sizeof (unsigned int));
- json_object_array_add(dbRangeJson, embedJson);
- }
- json_object_object_add(decodeTlvJson, "dbrange", dbRangeJson);
- break;
- }
-#endif
-#ifdef SND_CTL_TLVT_DB_MINMAX
- case SND_CTL_TLVT_DB_MINMAX:
- case SND_CTL_TLVT_DB_MINMAX_MUTE:
- {
- json_object * dbMinMaxJson = json_object_new_object();
-
- if (size != 2 * sizeof (unsigned int)) {
- json_object * arrayJson = json_object_new_array();
- while (size > 0) {
- if (mode >= QUERY_VERBOSE) {
- snprintf(label, sizeof (label), "0x%08x,", tlv[idx++]);
- json_object_array_add(arrayJson, json_object_new_string(label));
- } else {
- json_object_array_add(arrayJson, json_object_new_int(tlv[idx++]));
- }
- size -= (unsigned int) sizeof (unsigned int);
- }
- json_object_object_add(dbMinMaxJson, "array", arrayJson);
-
- } else {
- if (mode >= QUERY_VERBOSE) {
- json_object_object_add(dbMinMaxJson, "min", DB2StringJsonOject((int) tlv[2]));
- json_object_object_add(dbMinMaxJson, "max", DB2StringJsonOject((int) tlv[3]));
- } else {
- json_object_object_add(dbMinMaxJson, "min", json_object_new_int((int) tlv[2]));
- json_object_object_add(dbMinMaxJson, "max", json_object_new_int((int) tlv[3]));
- }
- }
-
- if (type == SND_CTL_TLVT_DB_MINMAX_MUTE) {
- json_object_object_add(decodeTlvJson, "dbminmaxmute", dbMinMaxJson);
- } else {
- json_object_object_add(decodeTlvJson, "dbminmax", dbMinMaxJson);
- }
- break;
- }
-#endif
-#ifdef SND_CTL_TLVT_CHMAP_FIXED
- case SND_CTL_TLVT_CHMAP_FIXED:
- chmap_type = "fixed";
- /* Fall through */
- case SND_CTL_TLVT_CHMAP_VAR:
- if (!chmap_type)
- chmap_type = "variable";
- /* Fall through */
- case SND_CTL_TLVT_CHMAP_PAIRED:
- if (!chmap_type)
- chmap_type = "paired";
-
- json_object * chmapJson = json_object_new_object();
- json_object * arrayJson = json_object_new_array();
-
- while (size > 0) {
- snprintf(label, sizeof (label), "%s", snd_pcm_chmap_name(tlv[idx++]));
- size -= (unsigned int) sizeof (unsigned int);
- json_object_array_add(arrayJson, json_object_new_string(label));
- }
- json_object_object_add(chmapJson, chmap_type, arrayJson);
- json_object_object_add(decodeTlvJson, "chmap", chmapJson);
- break;
-#endif
- default:
- {
- printf("unk-%i-", type);
- json_object * arrayJson = json_object_new_array();
-
- while (size > 0) {
- snprintf(label, sizeof (label), "0x%08x,", tlv[idx++]);
- size -= (unsigned int) sizeof (unsigned int);
- json_object_array_add(arrayJson, json_object_new_string(label));
- }
- break;
- json_object_object_add(decodeTlvJson, "unknown", arrayJson);
- }
- }
-
- return (decodeTlvJson);
-}
-
-
-// retreive info for one given card
-
-STATIC json_object* alsaCardProbe(const char *rqtSndId) {
- const char *info, *name;
- const char *devid, *driver;
- json_object *ctlDev;
- snd_ctl_t *handle;
- snd_ctl_card_info_t *cardinfo;
- int err;
-
- if ((err = snd_ctl_open(&handle, rqtSndId, 0)) < 0) {
- AFB_INFO("alsaCardProbe '%s' Not Found", rqtSndId);
- return NULL;
- }
-
- snd_ctl_card_info_alloca(&cardinfo);
- if ((err = snd_ctl_card_info(handle, cardinfo)) < 0) {
- snd_ctl_close(handle);
- AFB_WARNING("SndCard '%s' info error: %s", rqtSndId, snd_strerror(err));
- return NULL;
- }
-
- // start a new json object to store card info
- ctlDev = json_object_new_object();
-
- devid = snd_ctl_card_info_get_id(cardinfo);
- json_object_object_add(ctlDev, "devid", json_object_new_string(devid));
- name = snd_ctl_card_info_get_name(cardinfo);
- json_object_object_add(ctlDev, "name", json_object_new_string(name));
-
- if (AFB_GET_VERBOSITY > 1) {
- json_object_object_add(ctlDev, "devid", json_object_new_string(rqtSndId));
- driver = snd_ctl_card_info_get_driver(cardinfo);
- json_object_object_add(ctlDev, "driver", json_object_new_string(driver));
- info = strdup(snd_ctl_card_info_get_longname(cardinfo));
- json_object_object_add(ctlDev, "info", json_object_new_string(info));
- AFB_INFO("AJG: Soundcard Devid=%-5s devid=%-7s Name=%s\n", rqtSndId, devid, info);
- }
-
- // free card handle and return info
- snd_ctl_close(handle);
- return (ctlDev);
-}
-
-// Loop on every potential Sound card and register active one
-
-PUBLIC void alsaGetInfo(afb_req request) {
- int card;
- json_object *ctlDev, *ctlDevs;
- char devid[32];
-
- const char *rqtSndId = afb_req_value(request, "devid");
-
- // if no specific card requested loop on all
-
- if (rqtSndId != NULL) {
- // only one card was requested let's probe it
- ctlDev = alsaCardProbe(rqtSndId);
- if (ctlDev != NULL) afb_req_success(request, ctlDev, NULL);
- else afb_req_fail_f(request, "sndscard-notfound", "SndCard '%s' Not Found", rqtSndId);
-
- } else {
- // return an array of ctlDev
- ctlDevs = json_object_new_array();
-
- // loop on potential card number
- for (card = 0; card < MAX_SND_CARD; card++) {
-
- // build card devid and probe it
- snprintf(devid, sizeof (devid), "hw:%i", card);
- ctlDev = alsaCardProbe(devid);
-
- // Alsa has hole within card list [ignore them]
- if (ctlDev != NULL) {
- // add current ctlDev to ctlDevs object
- json_object_array_add(ctlDevs, ctlDev);
- }
- }
- afb_req_success(request, ctlDevs, NULL);
- }
-}
-
-// pack Alsa element's ACL into a JSON object
-
-STATIC json_object *getControlAcl(snd_ctl_elem_info_t *info) {
-
- json_object * jsonAclCtl = json_object_new_object();
-
- json_object_object_add(jsonAclCtl, "read", json_object_new_boolean(snd_ctl_elem_info_is_readable(info)));
- json_object_object_add(jsonAclCtl, "write", json_object_new_boolean(snd_ctl_elem_info_is_writable(info)));
- json_object_object_add(jsonAclCtl, "inact", json_object_new_boolean(snd_ctl_elem_info_is_inactive(info)));
- json_object_object_add(jsonAclCtl, "volat", json_object_new_boolean(snd_ctl_elem_info_is_volatile(info)));
- json_object_object_add(jsonAclCtl, "lock", json_object_new_boolean(snd_ctl_elem_info_is_locked(info)));
-
- // if TLV is readable we insert its ACL
- if (!snd_ctl_elem_info_is_tlv_readable(info)) {
- json_object * jsonTlv = json_object_new_object();
-
- json_object_object_add(jsonTlv, "read", json_object_new_boolean(snd_ctl_elem_info_is_tlv_readable(info)));
- json_object_object_add(jsonTlv, "write", json_object_new_boolean(snd_ctl_elem_info_is_tlv_writable(info)));
- json_object_object_add(jsonTlv, "command", json_object_new_boolean(snd_ctl_elem_info_is_tlv_commandable(info)));
-
- json_object_object_add(jsonAclCtl, "tlv", jsonTlv);
- }
- return (jsonAclCtl);
-}
-
-// process ALSA control and store resulting value into ctlRequest
-
-PUBLIC int alsaSetSingleCtl(snd_ctl_t *ctlDev, snd_ctl_elem_id_t *elemId, ctlRequestT *ctlRequest) {
- snd_ctl_elem_value_t *elemData;
- snd_ctl_elem_info_t *elemInfo;
- int count, length, err, valueIsArray = 0;
-
- // let's make sure we are processing the right control
- if (ctlRequest->numId != snd_ctl_elem_id_get_numid(elemId)) goto OnErrorExit;
-
- // set info event ID and get value
- snd_ctl_elem_info_alloca(&elemInfo);
- snd_ctl_elem_info_set_id(elemInfo, elemId); // map ctlInfo to ctlId elemInfo is updated !!!
- if (snd_ctl_elem_info(ctlDev, elemInfo) < 0) {
- AFB_NOTICE("Fail to load ALSA NUMID=%d Values='%s'", ctlRequest->numId, json_object_get_string(ctlRequest->valuesJ));
- goto OnErrorExit;
- }
-
- if (!snd_ctl_elem_info_is_writable(elemInfo)) {
- AFB_NOTICE("Not Writable ALSA NUMID=%d Values='%s'", ctlRequest->numId, json_object_get_string(ctlRequest->valuesJ));
- goto OnErrorExit;
- }
-
- count = snd_ctl_elem_info_get_count(elemInfo);
- if (count == 0) goto OnErrorExit;
-
- enum json_type jtype = json_object_get_type(ctlRequest->valuesJ);
- switch (jtype) {
- case json_type_array:
- length = json_object_array_length(ctlRequest->valuesJ);
- valueIsArray = 1;
- break;
- case json_type_int:
- length = 1;
- valueIsArray = 0;
- break;
- default:
- length = 0;
- break;
- }
-
-
- if (length == 0) {
- AFB_NOTICE("Invalid values NUMID='%d' Values='%s' count='%d' wanted='%d'", ctlRequest->numId, json_object_get_string(ctlRequest->valuesJ), length, count);
- goto OnErrorExit;
- }
-
- snd_ctl_elem_value_alloca(&elemData);
- snd_ctl_elem_value_set_id(elemData, elemId); // map ctlInfo to ctlId elemInfo is updated !!!
- if (snd_ctl_elem_read(ctlDev, elemData) < 0) goto OnErrorExit;
-
- // Loop on every control value and push to sndcard
- for (int index = 0; index < count; index++) {
- json_object *element;
- int value;
-
- // when not enough value duplicate last provided one
- if (!valueIsArray) element = ctlRequest->valuesJ;
- else {
- if (index < length) element = json_object_array_get_idx(ctlRequest->valuesJ, index);
- else element = json_object_array_get_idx(ctlRequest->valuesJ, length - 1);
- }
-
- value = json_object_get_int(element);
- snd_ctl_elem_value_set_integer(elemData, index, value);
- }
-
- err = snd_ctl_elem_write(ctlDev, elemData);
- if (err < 0) {
- AFB_NOTICE("Fail to write ALSA NUMID=%d Values='%s' Error=%s", ctlRequest->numId, json_object_get_string(ctlRequest->valuesJ), snd_strerror(err));
- goto OnErrorExit;
- }
-
- ctlRequest->used = 1;
- return 0;
-
-OnErrorExit:
- ctlRequest->used = -1;
- return -1;
-}
-
-// process ALSA control and store then into ctlRequest
-
-PUBLIC int alsaGetSingleCtl(snd_ctl_t *ctlDev, snd_ctl_elem_id_t *elemId, ctlRequestT *ctlRequest, halQueryMode queryMode) {
- snd_ctl_elem_type_t elemType;
- snd_ctl_elem_value_t *elemData;
- snd_ctl_elem_info_t *elemInfo;
- int count, idx, err;
-
-
- // set info event ID and get value
-
- snd_ctl_elem_info_alloca(&elemInfo);
- snd_ctl_elem_info_set_id(elemInfo, elemId);
- if (snd_ctl_elem_info(ctlDev, elemInfo) < 0) goto OnErrorExit;
- count = snd_ctl_elem_info_get_count(elemInfo);
- if (count == 0) goto OnErrorExit;
-
- if (!snd_ctl_elem_info_is_readable(elemInfo)) goto OnErrorExit;
- elemType = snd_ctl_elem_info_get_type(elemInfo);
-
- snd_ctl_elem_value_alloca(&elemData);
- snd_ctl_elem_value_set_id(elemData, elemId);
- if (snd_ctl_elem_read(ctlDev, elemData) < 0) goto OnErrorExit;
-
- int numid = snd_ctl_elem_info_get_numid(elemInfo);
-
- ctlRequest->valuesJ = json_object_new_object();
- json_object_object_add(ctlRequest->valuesJ, "id", json_object_new_int(numid));
- if (queryMode >= 1) json_object_object_add(ctlRequest->valuesJ, "name", json_object_new_string(snd_ctl_elem_id_get_name(elemId)));
- if (queryMode >= 2) json_object_object_add(ctlRequest->valuesJ, "iface", json_object_new_string(snd_ctl_elem_iface_name(snd_ctl_elem_id_get_interface(elemId))));
- if (queryMode >= 3) json_object_object_add(ctlRequest->valuesJ, "actif", json_object_new_boolean(!snd_ctl_elem_info_is_inactive(elemInfo)));
-
- json_object *jsonValuesCtl = json_object_new_array();
- for (idx = 0; idx < count; idx++) { // start from one in amixer.c !!!
- switch (elemType) {
- case SND_CTL_ELEM_TYPE_BOOLEAN:
- {
- json_object_array_add(jsonValuesCtl, json_object_new_boolean(snd_ctl_elem_value_get_boolean(elemData, idx)));
- break;
- }
- case SND_CTL_ELEM_TYPE_INTEGER:
- json_object_array_add(jsonValuesCtl, json_object_new_int((int) snd_ctl_elem_value_get_integer(elemData, idx)));
- break;
- case SND_CTL_ELEM_TYPE_INTEGER64:
- json_object_array_add(jsonValuesCtl, json_object_new_int64(snd_ctl_elem_value_get_integer64(elemData, idx)));
- break;
- case SND_CTL_ELEM_TYPE_ENUMERATED:
- json_object_array_add(jsonValuesCtl, json_object_new_int(snd_ctl_elem_value_get_enumerated(elemData, idx)));
- break;
- case SND_CTL_ELEM_TYPE_BYTES:
- json_object_array_add(jsonValuesCtl, json_object_new_int((int) snd_ctl_elem_value_get_byte(elemData, idx)));
- break;
- case SND_CTL_ELEM_TYPE_IEC958:
- {
- json_object *jsonIec958Ctl = json_object_new_object();
- snd_aes_iec958_t iec958;
- snd_ctl_elem_value_get_iec958(elemData, &iec958);
-
- json_object_object_add(jsonIec958Ctl, "AES0", json_object_new_int(iec958.status[0]));
- json_object_object_add(jsonIec958Ctl, "AES1", json_object_new_int(iec958.status[1]));
- json_object_object_add(jsonIec958Ctl, "AES2", json_object_new_int(iec958.status[2]));
- json_object_object_add(jsonIec958Ctl, "AES3", json_object_new_int(iec958.status[3]));
- json_object_array_add(jsonValuesCtl, jsonIec958Ctl);
- break;
- }
- default:
- json_object_array_add(jsonValuesCtl, json_object_new_string("?unknown?"));
- break;
- }
- }
- json_object_object_add(ctlRequest->valuesJ, "val", jsonValuesCtl);
-
- if (queryMode >= 1) { // in simple mode do not print usable values
- json_object *jsonClassCtl = json_object_new_object();
- json_object_object_add(jsonClassCtl, "type", json_object_new_int(elemType));
- json_object_object_add(jsonClassCtl, "count", json_object_new_int(count));
-
- switch (elemType) {
- case SND_CTL_ELEM_TYPE_INTEGER:
- json_object_object_add(jsonClassCtl, "min", json_object_new_int((int) snd_ctl_elem_info_get_min(elemInfo)));
- json_object_object_add(jsonClassCtl, "max", json_object_new_int((int) snd_ctl_elem_info_get_max(elemInfo)));
- json_object_object_add(jsonClassCtl, "step", json_object_new_int((int) snd_ctl_elem_info_get_step(elemInfo)));
- break;
- case SND_CTL_ELEM_TYPE_INTEGER64:
- json_object_object_add(jsonClassCtl, "min", json_object_new_int64(snd_ctl_elem_info_get_min64(elemInfo)));
- json_object_object_add(jsonClassCtl, "max", json_object_new_int64(snd_ctl_elem_info_get_max64(elemInfo)));
- json_object_object_add(jsonClassCtl, "step", json_object_new_int64(snd_ctl_elem_info_get_step64(elemInfo)));
- break;
- case SND_CTL_ELEM_TYPE_ENUMERATED:
- {
- unsigned int item, items = snd_ctl_elem_info_get_items(elemInfo);
- json_object *jsonEnum = json_object_new_array();
-
- for (item = 0; item < items; item++) {
- snd_ctl_elem_info_set_item(elemInfo, item);
- if ((err = snd_ctl_elem_info(ctlDev, elemInfo)) >= 0) {
- json_object_array_add(jsonEnum, json_object_new_string(snd_ctl_elem_info_get_item_name(elemInfo)));
- }
- }
- json_object_object_add(jsonClassCtl, "enums", jsonEnum);
- break;
- }
- default: break; // ignore any unknown type
- }
-
- // add collected class info with associated ACLs
- json_object_object_add(ctlRequest->valuesJ, "ctl", jsonClassCtl);
-
- if (queryMode >= QUERY_FULL) json_object_object_add(ctlRequest->valuesJ, "acl", getControlAcl(elemInfo));
-
- // check for tlv [direct port from amixer.c]
- if (snd_ctl_elem_info_is_tlv_readable(elemInfo)) {
- unsigned int *tlv = alloca(TLV_BYTE_SIZE);
- if ((err = snd_ctl_elem_tlv_read(ctlDev, elemId, tlv, 4096)) < 0) {
- AFB_NOTICE("Control numid=%d err=%s element TLV read error\n", numid, snd_strerror(err));
- goto OnErrorExit;
- } else {
- json_object_object_add(ctlRequest->valuesJ, "tlv", decodeTlv(tlv, TLV_BYTE_SIZE, queryMode));
- }
- }
- }
-
- ctlRequest->used = 1;
- return 0;
-
-OnErrorExit:
- ctlRequest->used = -1;
- return -1;
-}
-
-// assign multiple control to the same value
-
-STATIC void alsaSetGetCtls(ActionSetGetT action, afb_req request) {
- ctlRequestT *ctlRequest;
- const char *warmsg = NULL;
- int err = 0, status = 0, done;
- unsigned int ctlCount;
- snd_ctl_t *ctlDev;
- snd_ctl_elem_list_t *ctlList;
- queryValuesT queryValues;
- json_object *queryJ, *numidsJ, *sndctls;
-
- queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
-
- // Prase Numids + optional values
- done = json_object_object_get_ex(queryJ, "ctl", &numidsJ);
- if (!done) queryValues.count = 0;
- else {
- enum json_type jtype = json_object_get_type(numidsJ);
- switch (jtype) {
- case json_type_array:
- queryValues.numidsJ = numidsJ;
- queryValues.count = json_object_array_length(numidsJ);
- break;
-
- case json_type_int:
- case json_type_object:
- queryValues.count = 1;
- queryValues.numidsJ = numidsJ;
- break;
-
- default:
- afb_req_fail_f(request, "numid-notarray", "NumId=%s NumId not valid JSON array", json_object_get_string(numidsJ));
- goto OnErrorExit;
- }
- }
-
- if ((err = snd_ctl_open(&ctlDev, queryValues.devid, 0)) < 0) {
- afb_req_fail_f(request, "sndcrl-notfound", "devid='%s' load fail error=%s\n", queryValues.devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- snd_ctl_elem_list_alloca(&ctlList);
- if ((err = snd_ctl_elem_list(ctlDev, ctlList)) < 0) {
- afb_req_fail_f(request, "listInit-failed", "devid='%s' load fail error=%s\n", queryValues.devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- if ((err = snd_ctl_elem_list_alloc_space(ctlList, snd_ctl_elem_list_get_count(ctlList))) < 0) {
- afb_req_fail_f(request, "listAlloc-failed", "devid='%s' load fail error=%s\n", queryValues.devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- if ((err = snd_ctl_elem_list(ctlDev, ctlList)) < 0) {
- afb_req_fail_f(request, "listOpen-failed", "devid='%s' load fail error=%s\n", queryValues.devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- // Parse numids string (empty == all)
- ctlCount = snd_ctl_elem_list_get_used(ctlList);
- if (queryValues.count == 0) {
- ctlRequest = alloca(sizeof (ctlRequestT)*(ctlCount));
- } else {
- ctlRequest = alloca(sizeof (ctlRequestT)*(queryValues.count));
- NumidsListParse(action, &queryValues, ctlRequest);
- }
-
- // if more than one crl requested prepare an array for response
- if (queryValues.count != 1 && action == ACTION_GET) sndctls = json_object_new_array();
- else sndctls = NULL;
-
- // Loop on all ctlDev controls
- for (int ctlIndex = 0; ctlIndex < ctlCount; ctlIndex++) {
- unsigned int selected = 0;
- int jdx;
-
- if (queryValues.count == 0 && action == ACTION_GET) {
- selected = 1; // check is this numid is selected within query
- jdx = ctlIndex; // map all existing ctl as requested
- } else {
- int numid = snd_ctl_elem_list_get_numid(ctlList, ctlIndex);
- if (numid < 0) {
- AFB_NOTICE("snd_ctl_elem_list_get_numid index=%d fail", ctlIndex);
- continue;
- }
- // check if current control was requested in query numids list
- for (jdx = 0; jdx < queryValues.count; jdx++) {
- if (numid == ctlRequest[jdx].numId) {
- selected = 1;
- break;
- }
- }
- }
-
- // control is selected open ctlid and get value
- if (selected) {
- snd_ctl_elem_id_t *elemId;
- snd_ctl_elem_id_alloca(&elemId);
-
- snd_ctl_elem_list_get_id(ctlList, ctlIndex, elemId);
- switch (action) {
- case ACTION_GET:
- err = alsaGetSingleCtl(ctlDev, elemId, &ctlRequest[jdx], queryValues.mode);
- break;
-
- case ACTION_SET:
- err = alsaSetSingleCtl(ctlDev, elemId, &ctlRequest[jdx]);
- break;
-
- default:
- err = 1;
- }
- if (err) status++;
- else {
- // Do not embed response in an array when only one ctl was requested
- if (action == ACTION_GET) {
- if (queryValues.count > 1) json_object_array_add(sndctls, ctlRequest[jdx].valuesJ);
- else sndctls = ctlRequest[jdx].valuesJ;
- }
- }
- }
- }
-
- // if we had error let's add them into response message info
- json_object *warningsJ = json_object_new_array();
- for (int jdx = 0; jdx < queryValues.count; jdx++) {
- if (ctlRequest[jdx].used <= 0) {
- json_object *failctl = json_object_new_object();
- if (ctlRequest[jdx].numId == -1) json_object_object_add(failctl, "warning", json_object_new_string("Numid Invalid"));
- else {
- if (ctlRequest[jdx].used == 0) json_object_object_add(failctl, "warning", json_object_new_string("Numid Does Not Exist"));
- if (ctlRequest[jdx].used == -1) json_object_object_add(failctl, "warning", json_object_new_string("Value Refused"));
- }
-
- json_object_object_add(failctl, "ctl", ctlRequest[jdx].jToken);
-
- json_object_array_add(warningsJ, failctl);
- }
- /* WARNING!!!! Check with Jose why following put free valuesJ
- if (ctlRequest[jdx].jToken) json_object_put(ctlRequest[jdx].jToken);
- if (ctlRequest[jdx].valuesJ) json_object_put(ctlRequest[jdx].valuesJ);
- */
- }
-
- if (json_object_array_length(warningsJ) > 0) warmsg = json_object_get_string(warningsJ);
- else json_object_put(warningsJ);
-
- // send response+warning if any
- afb_req_success(request, sndctls, warmsg);
- snd_ctl_elem_list_clear(ctlList);
-
-OnErrorExit:
- return;
-}
-
-PUBLIC void alsaGetCtls(afb_req request) {
- alsaSetGetCtls(ACTION_GET, request);
-}
-
-PUBLIC void alsaSetCtls(afb_req request) {
- alsaSetGetCtls(ACTION_SET, request);
-}
-
-
diff --git a/ALSA-afb/Alsa-Ucm.c b/ALSA-afb/Alsa-Ucm.c
deleted file mode 100644
index 016fe10..0000000
--- a/ALSA-afb/Alsa-Ucm.c
+++ /dev/null
@@ -1,433 +0,0 @@
-/*
- * AlsaUseCase -- provide low level interface with ALSA lib (extracted from alsa-json-gateway code)
- * Copyright (C) 2015,2016,2017, Fulup Ar Foll fulup@iot.bzh
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
-
- References:
- http://www.alsa-project.org/alsa-doc/alsa-lib/group__ucm.html
- https://www.alsa-project.org/main/index.php/DAPM
- http://alsa-lib.sourcearchive.com/documentation/1.0.24.1-2/group__Use_ga4332c6bb50481bbdaf21be11551fb930.html
- https://android.googlesource.com/platform/hardware/qcom/audio/+/jb-mr1-dev/libalsa-intf/alsa_ucm.h
-
- Sample alsaucm commands using /usr/share/alsa/ucm/PandaBoard
- - alsaucm -c PandaBoard list _verbs
- - alsaucm -c PandaBoard list _devices/HiFi
- - alsaucm -c PandaBoard list _modifiers/HiFi #need to uncomment modifiers section
- - alsaucm -c PandaBoard list TQ/HiFi
- - alsaucm -c PandaBoard get TQ/HiFi/Voice
- - alsaucm -c PandaBoard get PlaybackPCM//HiFi
- - alsaucm -c PandaBoard set _verb HiFi
- - alsaucm -c PandaBoard set _verb HiFi _enadev Headset
- - alsaucm -c 'HDA Intel PCH' set _verb HiFi set _enadev Headphone set _enamod RecordMedia
- - alsaucm -c 'HDA Intel PCH' set _verb HiFi get OutputDspName//
-
- */
-#define _GNU_SOURCE // needed for vasprintf
-
-#include <alsa/asoundlib.h>
-#include <alsa/asoundlib.h>
-#include <alsa/use-case.h>
-
-#include "Alsa-ApiHat.h"
-
-typedef struct {
- snd_use_case_mgr_t *ucm;
- int cardId;
- char *cardName;
-} ucmHandleT;
-
-static ucmHandleT ucmHandles[MAX_SND_CARD];
-
-// Cache opened UCM handles
-
-STATIC int alsaUseCaseOpen(struct afb_req request, queryValuesT *queryValues, int allowNewMgr) {
- snd_ctl_t *ctlDev;
- snd_ctl_card_info_t *cardinfo;
- snd_use_case_mgr_t *ucmHandle;
- const char *cardName;
- int cardId, idx, idxFree = -1, err;
-
- // open control interface for devid
- err = snd_ctl_open(&ctlDev, queryValues->devid, SND_CTL_READONLY);
- if (err < 0) {
- ctlDev = NULL;
- afb_req_fail_f(request, "devid-unknown", "SndCard devid=[%s] Not Found err=%d", queryValues->devid, err);
- goto OnErrorExit;
- }
-
- snd_ctl_card_info_alloca(&cardinfo);
- if ((err = snd_ctl_card_info(ctlDev, cardinfo)) < 0) {
- afb_req_fail_f(request, "devid-invalid", "SndCard devid=[%s] Not Found err=%s", queryValues->devid, snd_strerror(err));
- goto OnErrorExit;
- }
-
- // search for an existing subscription and mark 1st free slot
- cardId = snd_ctl_card_info_get_card(cardinfo);
- for (idx = 0; idx < MAX_SND_CARD; idx++) {
- if (ucmHandles[idx].ucm != NULL) {
- if (ucmHandles[idx].cardId == cardId) goto OnSuccessExit;
- } else if (idxFree == -1) idxFree = idx;
- };
-
- if (!allowNewMgr) {
- afb_req_fail_f(request, "ucm-nomgr", "SndCard devid=[%s] no exiting UCM manager session", queryValues->devid);
- goto OnErrorExit;
- }
-
- if (idxFree < 0 && idx == MAX_SND_CARD) {
- afb_req_fail_f(request, "ucm-toomany", "SndCard devid=[%s] too many open UCM Max=%d", queryValues->devid, MAX_SND_CARD);
- goto OnErrorExit;
- }
-
- idx = idxFree;
- cardName = snd_ctl_card_info_get_name(cardinfo);
- err = snd_use_case_mgr_open(&ucmHandle, cardName);
- if (err) {
- afb_req_fail_f(request, "ucm-open", "SndCard devid=[%s] name=[%s] No UCM Profile err=%s", queryValues->devid, cardName, snd_strerror(err));
- goto OnErrorExit;
- }
- ucmHandles[idx].ucm = ucmHandle;
- ucmHandles[idx].cardId = cardId;
- ucmHandles[idx].cardName = strdup(cardName);
-
-OnSuccessExit:
- if (ctlDev) snd_ctl_close(ctlDev);
- return idx;
-
-OnErrorExit:
- if (ctlDev) snd_ctl_close(ctlDev);
- return -1;
-}
-
-PUBLIC void alsaUseCaseQuery(struct afb_req request) {
- int verbCount, ucmIdx;
- const char **verbList;
- snd_use_case_mgr_t *ucmHandle;
- queryValuesT queryValues;
- json_object *ucmJs;
- const char *cardName;
-
- json_object *queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
-
- ucmIdx = alsaUseCaseOpen(request, &queryValues, TRUE);
- if (ucmIdx < 0) goto OnErrorExit;
- ucmHandle = ucmHandles [ucmIdx].ucm;
- cardName = ucmHandles [ucmIdx].cardName;
-
- verbCount = snd_use_case_get_list(ucmHandle, "_verbs", &verbList);
- if (verbCount < 0) {
- afb_req_fail_f(request, "ucm-list", "SndCard devid=[%s] name=[%s] No UCM Verbs", queryValues.devid, cardName);
- goto OnErrorExit;
- }
-
- ucmJs = json_object_new_array();
- for (int idx = 0; idx < verbCount; idx += 2) {
- int devCount, modCount, tqCount;
- const char **devList, **modList, **tqList;
- json_object *ucmJ = json_object_new_object();
- char identifier[32];
-
- json_object_object_add(ucmJ, "verb", json_object_new_string(verbList[idx]));
- if (verbList[idx + 1]) json_object_object_add(ucmJ, "info", json_object_new_string(verbList[idx + 1]));
-
- AFB_DEBUG("Verb[%d] Action=%s Info=%s", idx, verbList[idx], verbList[idx + 1]);
-
- snprintf(identifier, sizeof (identifier), "_devices/%s", verbList[idx]);
- devCount = snd_use_case_get_list(ucmHandle, identifier, &devList);
- if (devCount > 0) {
- json_object *devsJ = json_object_new_array();
-
- for (int jdx = 0; jdx < devCount; jdx += 2) {
- json_object *devJ = json_object_new_object();
- AFB_DEBUG("device[%d] Action=%s Info=%s", jdx, devList[jdx], devList[jdx + 1]);
- json_object_object_add(devJ, "dev", json_object_new_string(devList[jdx]));
- if (devList[jdx + 1]) json_object_object_add(devJ, "info", json_object_new_string(devList[jdx + 1]));
- json_object_array_add(devsJ, devJ);
- }
- json_object_object_add(ucmJ, "devices", devsJ);
- snd_use_case_free_list(devList, devCount);
- }
-
- snprintf(identifier, sizeof (identifier), "_modifiers/%s", verbList[idx]);
- modCount = snd_use_case_get_list(ucmHandle, identifier, &modList);
- if (modCount > 0) {
- json_object *modsJ = json_object_new_array();
-
- for (int jdx = 0; jdx < modCount; jdx += 2) {
- json_object *modJ = json_object_new_object();
- AFB_DEBUG("modifier[%d] Action=%s Info=%s", jdx, modList[jdx], modList[jdx + 1]);
- json_object_object_add(modJ, "mod", json_object_new_string(modList[jdx]));
- if (modList[jdx + 1]) json_object_object_add(modJ, "info", json_object_new_string(modList[jdx + 1]));
- json_object_array_add(modsJ, modJ);
- }
- json_object_object_add(ucmJ, "modifiers", modsJ);
- snd_use_case_free_list(modList, modCount);
- }
-
- snprintf(identifier, sizeof (identifier), "TQ/%s", verbList[idx]);
- tqCount = snd_use_case_get_list(ucmHandle, identifier, &tqList);
- if (tqCount > 0) {
- json_object *tqsJ = json_object_new_array();
-
- for (int jdx = 0; jdx < tqCount; jdx += 2) {
- json_object *tqJ = json_object_new_object();
- AFB_DEBUG("toneqa[%d] Action=%s Info=%s", jdx, tqList[jdx], tqList[jdx + 1]);
- json_object_object_add(tqJ, "tq", json_object_new_string(tqList[jdx]));
- if (tqList[jdx + 1]) json_object_object_add(tqJ, "info", json_object_new_string(tqList[jdx + 1]));
- json_object_array_add(tqsJ, tqJ);
- }
- json_object_object_add(ucmJ, "tqs", tqsJ);
- snd_use_case_free_list(tqList, tqCount);
- }
-
- json_object_array_add(ucmJs, ucmJ);
- }
-
- afb_req_success(request, ucmJs, NULL);
- snd_use_case_free_list(verbList, verbCount);
-
-OnErrorExit:
- return;
-}
-
-STATIC json_object *ucmGetValue(ucmHandleT *ucmHandle, const char *verb, const char *mod, const char *label) {
- char identifier[80];
- char *value;
- int err;
- json_object *jValue;
-
- // handle optional parameters
- if (!mod) mod = "";
- if (!verb) verb = "";
-
- if (!label) {
- AFB_NOTICE("ucmGetValue cardname=[%s] value label missing", ucmHandle->cardName);
- goto OnErrorExit;
- }
-
- snprintf(identifier, sizeof (identifier), "%s/%s/%s", label, mod, verb);
- err = snd_use_case_get(ucmHandle->ucm, identifier, (const char**) &value); // Note: value casting is a known "FEATURE" of AlsaUCM API
- if (err) {
- AFB_DEBUG("ucmGetValue cardname=[%s] identifier=[%s] error=%s", ucmHandle->cardName, identifier, snd_strerror(err));
- goto OnErrorExit;
- }
-
- // copy value into json object and free string
- jValue = json_object_new_string(value);
- free(value);
- return (jValue);
-
-OnErrorExit:
- return (NULL);
-}
-
-PUBLIC void alsaUseCaseGet(struct afb_req request) {
- int ucmIdx, labelCount;
- queryValuesT queryValues;
- json_object *jResponse = json_object_new_object();
- json_object *jWarnings = json_object_new_array();
- const char *warnings = NULL;
-
- json_object *queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
- ;
-
- ucmIdx = alsaUseCaseOpen(request, &queryValues, TRUE);
- if (ucmIdx < 0) goto OnErrorExit;
-
- const char *cardName = ucmHandles[ucmIdx].cardName;
-
- const char *verb = afb_req_value(request, "verb");
- const char *mod = afb_req_value(request, "mod");
- const char *dev = afb_req_value(request, "dev");
-
- if (dev && mod) {
- afb_req_fail_f(request, "ucmget-labels", "SndCard devid=[%s] name=[%s] UCM mod+dev incompatible", queryValues.devid, cardName);
- goto OnErrorExit;
- }
-
- // device selection is handle as a modifier
- if (dev) mod = dev;
-
- const char *labels = afb_req_value(request, "value");
- if (!labels) {
- afb_req_fail_f(request, "ucmget-labels", "SndCard devid=[%s] name=[%s] UCM values name missing", queryValues.devid, cardName);
- goto OnErrorExit;
- }
-
- json_object *jLabels = json_tokener_parse(labels);
- if (!jLabels) {
- afb_req_fail_f(request, "ucmget-notjson", "labels=%s not a valid json entry", labels);
- goto OnErrorExit;
- };
-
- enum json_type jtype = json_object_get_type(jLabels);
- switch (jtype) {
- json_object *tmpJ;
-
- case json_type_array:
- labelCount = json_object_array_length(jLabels);
- break;
-
- case json_type_string:
- tmpJ = json_object_new_array();
- labelCount = 1;
- json_object_array_add(tmpJ, jLabels);
- jLabels = tmpJ;
- break;
-
- default:
- afb_req_fail_f(request, "ucmget-notarray", "labels=%s not valid JSON array", labels);
- goto OnErrorExit;
- }
-
- for (int idx = 0; idx < labelCount; idx++) {
- json_object *jValue, *jLabel;
- const char *label;
-
- jLabel = json_object_array_get_idx(jLabels, idx);
- label = json_object_get_string(jLabel);
- jValue = ucmGetValue(&ucmHandles[ucmIdx], verb, mod, label);
- if (jValue) json_object_object_add(jResponse, label, jValue);
- else {
- json_object_array_add(jWarnings, jLabel);
- }
- }
-
- // use info section to notified not found values label
- if (json_object_array_length(jWarnings) > 0) {
- json_object *tmpJ = json_object_new_object();
- json_object_object_add(tmpJ, "no-context", jWarnings);
- warnings = json_object_get_string(tmpJ);
- }
- afb_req_success(request, jResponse, warnings);
-
-OnErrorExit:
- return;
-}
-
-PUBLIC void alsaUseCaseSet(struct afb_req request) {
- int err, ucmIdx;
- queryValuesT queryValues;
- json_object *jResponse = json_object_new_object();
-
- json_object *queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
-
-
- ucmIdx = alsaUseCaseOpen(request, &queryValues, TRUE);
- if (ucmIdx < 0) goto OnErrorExit;
-
- snd_use_case_mgr_t *ucmMgr = ucmHandles[ucmIdx].ucm;
- const char *cardName = ucmHandles[ucmIdx].cardName;
-
- const char *verb = afb_req_value(request, "verb");
- const char *mod = afb_req_value(request, "mod");
- const char *dev = afb_req_value(request, "dev");
- // Known identifiers: _verb - set current verb = value _enadev - enable given device = value _disdev - disable given device = value _swdev/{old_device} - new_device = value
-
- if (verb) {
- err = snd_use_case_set(ucmMgr, "_verb", verb);
- if (err) {
- afb_req_fail_f(request, "ucmset-verb", "SndCard devid=[%s] name=[%s] Invalid UCM verb=[%s] err=%s", queryValues.devid, cardName, verb, snd_strerror(err));
- goto OnErrorExit;
- }
- }
-
- if (dev) {
- err = snd_use_case_set(ucmMgr, "_enadev", dev);
- if (err) {
- afb_req_fail_f(request, "ucmset-dev", "SndCard devid=[%s] name=[%s] Invalid UCMverb=[%s] dev=%s err=%s", queryValues.devid, cardName, verb, dev, snd_strerror(err));
- goto OnErrorExit;
- }
- }
-
- if (mod) {
- err = snd_use_case_set(ucmMgr, "_enamod", mod);
- if (err) {
- afb_req_fail_f(request, "ucmset-mod", "SndCard devid=[%s] name=[%s] Invalid UCM verb=[%s] mod=[%s] err=%s", queryValues.devid, cardName, verb, mod, snd_strerror(err));
- goto OnErrorExit;
- }
- }
-
- // label are requested transfert request to get
- if (afb_req_value(request, "value")) return alsaUseCaseGet(request);
-
- if (queryValues.mode <= 3) {
- json_object *jValue;
-
- jValue = ucmGetValue(&ucmHandles[ucmIdx], verb, dev, "OutputDspName");
- if (jValue) json_object_object_add(jResponse, "OutputDspName", jValue);
-
- jValue = ucmGetValue(&ucmHandles[ucmIdx], verb, dev, "PlaybackPCM");
- if (jValue) json_object_object_add(jResponse, "PlaybackPCM", jValue);
-
- jValue = ucmGetValue(&ucmHandles[ucmIdx], verb, mod, "CapturePCM");
- if (jValue) json_object_object_add(jResponse, "CapturePCM", jValue);
- }
- afb_req_success(request, jResponse, NULL);
-
-OnErrorExit:
- return;
-}
-
-PUBLIC void alsaUseCaseReset(struct afb_req request) {
- int err, ucmIdx;
- queryValuesT queryValues;
-
- json_object *queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
-
- ucmIdx = alsaUseCaseOpen(request, &queryValues, FALSE);
- if (ucmIdx < 0) goto OnErrorExit;
-
- err = snd_use_case_mgr_reset(ucmHandles[ucmIdx].ucm);
- if (err) {
- afb_req_fail_f(request, "ucmreset-fail", "devid=%s Card Name=%s", queryValues.devid, ucmHandles[ucmIdx].cardName);
- goto OnErrorExit;
- }
-
- afb_req_success(request, NULL, NULL);
-
-OnErrorExit:
- return;
-}
-
-PUBLIC void alsaUseCaseClose(struct afb_req request) {
- int err, ucmIdx;
- queryValuesT queryValues;
-
- json_object *queryJ = alsaCheckQuery(request, &queryValues);
- if (!queryJ) goto OnErrorExit;
-
- ucmIdx = alsaUseCaseOpen(request, &queryValues, FALSE);
- if (ucmIdx < 0) goto OnErrorExit;
-
- err = snd_use_case_mgr_close(ucmHandles[ucmIdx].ucm);
- if (err) {
- afb_req_fail_f(request, "ucmreset-close", "devid=%s Card Name=%s", queryValues.devid, ucmHandles[ucmIdx].cardName);
- goto OnErrorExit;
- }
-
- // do not forget to release sound card name string
- free(ucmHandles[ucmIdx].cardName);
-
- afb_req_success(request, NULL, NULL);
-
-OnErrorExit:
- return;
-}
-
-
diff --git a/ALSA-afb/CMakeLists.txt b/ALSA-afb/CMakeLists.txt
deleted file mode 100644
index 876e837..0000000
--- a/ALSA-afb/CMakeLists.txt
+++ /dev/null
@@ -1,41 +0,0 @@
-###########################################################################
-# Copyright 2015, 2016, 2017 IoT.bzh
-#
-# author: Fulup Ar Foll <fulup@iot.bzh>
-#
-# Licensed under the Apache License, Version 2.0 (the "License");
-# you may not use this file except in compliance with the License.
-# You may obtain a copy of the License at
-#
-# http://www.apache.org/licenses/LICENSE-2.0
-#
-# Unless required by applicable law or agreed to in writing, software
-# distributed under the License is distributed on an "AS IS" BASIS,
-# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-# See the License for the specific language governing permissions and
-# limitations under the License.
-###########################################################################
-
-# Add target to project dependency list
-PROJECT_TARGET_ADD(alsa-lowlevel)
-
- # Define project Targets
- ADD_LIBRARY(${TARGET_NAME} MODULE Alsa-ApiHat.c Alsa-SetGet.c Alsa-Ucm.c Alsa-AddCtl.c Alsa-RegEvt.c)
-
- # Binder exposes a unique public entry point
- SET_TARGET_PROPERTIES(${TARGET_NAME} PROPERTIES
- PREFIX "afb-"
- LABELS "BINDING"
- LINK_FLAGS ${BINDINGS_LINK_FLAG}
- OUTPUT_NAME ${TARGET_NAME}
- )
-
- # Library dependencies (include updates automatically)
- TARGET_LINK_LIBRARIES(${TARGET_NAME}
- audio-common
- ${link_libraries}
- )
-
- # installation directory
- INSTALL(TARGETS ${TARGET_NAME}
- LIBRARY DESTINATION ${BINDINGS_INSTALL_DIR})
diff --git a/ALSA-afb/README.md b/ALSA-afb/README.md
deleted file mode 100644
index 93d2d4d..0000000
--- a/ALSA-afb/README.md
+++ /dev/null
@@ -1,33 +0,0 @@
-------------------------------------------------------------------------
- AlsaCore Low level binding maps AlsaLib APIs
-------------------------------------------------------------------------
-
-Testing: (from project directory bindings)
- * start binder: ~/opt/bin/afb-daemon --ldpaths=./build --token=mysecret --roothttp=htdocs
- * connect browser on http://localhost:1234?devid=hw:0
-
- # List Avaliable Sound cards
- http://localhost:1234/api/alsacore/getinfo
-
- # Get Info on a given Sound Card
- http://localhost:1234/api/alsacore/getinfo?devid=hw:0
-
- # Get shortname/longname for a given card
- http://localhost:1234/api/alsacore/getcardid?devid=hw:0
-
- # Get all controls from a given sound card
- http://localhost:1234/api/alsacore/getctl?devid=hw:0
-
- # Get detail on a given control (optional mode=0=verbose,1,2)
- http://localhost:1234/api/alsacore/getctl?devid=hw:0&numid=1&mode=0
-
-# Debug event with afb-client-demo
-```
- ~/opt/bin/afb-client-demo localhost:1234/api?token=mysecret
- alsacore subscribe {"devid":"hw:0"}
-```
-
-# Open AlsaMixer and play with Volume
-```
- alsamixer -D hw:0
-```