Work in Progress

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
-```