summaryrefslogtreecommitdiffstats
path: root/conf.d/project/lua.d/softmixer-01.lua
blob: 8b586a79881b9691a53b1d03b2951ead4038c85b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
--[[
  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.


  NOTE: strict mode: every global variables should be prefixed by '_'
--]]

-- Static variables should be prefixed with _
_EventHandle={}

-- Call when AlsaCore return HAL active list
function _AlsaPingCB_ (source, result, context)

    AFB:notice (source, "--InLua-- PingCB: result='%s'", Dump_Table(result))

end


-- Display receive arguments and echo them to caller
function _mixer_config_ (source, args)
    do
    local error

    -- ============================= Sound Cards ===================  

    local snd_params = {
        ["rate"]   = 48000,
        ["channel"]= 2,
    }  

    local sndcard_0 = {
        ["uid"]= "YAMAHA-APU70",
        ["devpath"]= "/dev/snd/by-id/usb-YAMAHA_Corporation_YAMAHA_AP-U70_USB_Audio_00-00",
        ["params"] = params,
        ["sink"] = {
            [0]= {["uid"]= "front-right", ["port"]= 0},
            [1]= {["uid"]= "front-left", ["port"]= 1},
        }
    }

    local sndcard_1 = {
        ["uid"]= "Jabra-Solemate",
        ["devpath"]= "/dev/snd/by-id/usb-0b0e_Jabra_SOLEMATE_v1.34.0-00",
        ["params"] = params,
        ["sink"] = {
            [0]= {["uid"]= "front-right", ["port"]= 0},
            [1]= {["uid"]= "front-left", ["port"]= 1},
        }
    }

    local sndcard_2 = {
        ["uid"]= "Jabra-410",
        ["params"] = params,
        ["devpath"]= "/dev/snd/by-id/usb-0b0e_Jabra_SPEAK_410_USB_745C4B15BD11x010900-00",
        ["sink"] = {
            [0]= {["uid"]= "back-right", ["port"]= 0},
            [1]= {["uid"]= "back-left",  ["port"]= 1},
        }
    }
 
    -- group sound card as one multi channels card
    local sndcards= {
        sndcard_0,
        sndcard_2,
    }

    error= L2C:snd_cards (source, sndcards)
    if (error ~= 0) then 
        AFB:error (source, "--InLua-- L2C:snd_cards fail to attach sndcards=%s", Dump_Table(sndcards))
        goto OnErrorExit
    else
        AFB:notice (source, "--InLua-- L2C:snd_cards done response=%s\n", Dump_Table(response))
    end
 
    -- ============================= Zones ===================    

    local zone_front= {
        ["uid"]  = "front-seats",
        ["type"] = "playback",
        ["mapping"] = {
            {["target"]="front-right",["channel"]=0},
            {["target"]="front-left" ,["channel"]=1},
        }
    }

    local zone_back= {
        ["uid"]  = "back-seats",
        ["type"] = "playback",
        ["mapping"] = {
            {["target"]="back-right",["channel"]=0},
            {["target"]="back-left" ,["channel"]=1},
        }
    }

    local zone_all= {
        ["uid"]  = "all-seats",
        ["type"] = "playback",
        ["mapping"] = {
            {["target"]="front-right",["channel"]=0},
            {["target"]="front-left" ,["channel"]=1},
            {["target"]="back-right" ,["channel"]=0},
            {["target"]="back-left"  ,["channel"]=1},
        }
    }

    local multi_zones = {
        zone_all,
        zone_front,
        zone_back,
    }

    error= L2C:snd_zones (source, multi_zones)
    if (error ~= 0) then 
        AFB:error (source, "--InLua-- L2C:snd_zones fail to attach sndcards=%s", Dump_Table(multi_zones))
        goto OnErrorExit
    else
        AFB:notice (source, "--InLua-- L2C:snd_zones done response=%s\n", Dump_Table(response))
    end

    -- ======================= Loop PCM ===========================

    local snd_aloop = {
        ["uid"]     = "Alsa-Loop",
        ["devpath"] = "/dev/snd/by-path/platform-snd_aloop.0",
        ["devices"] = {["playback"]=0,["capture"]=1},
        ["subdevs"] = {
            {["subdev"]= 0, ["numid"]= 51},
            {["subdev"]= 1, ["numid"]= 57},
            {["subdev"]= 2, ["numid"]= 63},
            {["subdev"]= 3, ["numid"]= 69},
            {["subdev"]= 4, ["numid"]= 75},
            {["subdev"]= 5, ["numid"]= 81},
            {["subdev"]= 6, ["numid"]= 87},
            {["subdev"]= 7, ["numid"]= 93},
        }
    }

    error= L2C:snd_loops (source, snd_aloop)
    if (error ~= 0) then 
        AFB:error (source, "--InLua-- L2C:snd_loops fail to attach sndcards=%s", Dump_Table(aloop))
        goto OnErrorExit
    else
        AFB:notice (source, "--InLua-- L2C:snd_loops done response=%s\n", Dump_Table(response))
    end
    
    -- =================== Audio Stream ============================

    local stream_music= {
        ["uid"]   = "multimedia",
        ["zone"]  = "all-seats",
        ["volume"]= 70,
        ["rate"]  = 48000,
        ["mute"]  = false;
    }
    
    local stream_navigation= {
        ["uid"]   = "navigation",
        ["zone"]  = "front-seats",
        ["volume"]= 80,
        ["mute"]  = false;
    }
    
    local stream_children= {
        ["uid"]   = "children",
        ["zone"]  = "back-seats",
        ["volume"]= 50,
        ["mute"]  = false;
    }
    
    local snd_streams = {
        stream_music,
        stream_navigation,
        stream_children,
    }

    error= L2C:snd_streams (source, snd_streams)
    if (error ~= 0) then 
        AFB:error (source, "--InLua-- L2C:snd_streams fail to attach sndcards=%s", Dump_Table(aloop))
        goto OnErrorExit
    else
        AFB:notice (source, "--InLua-- L2C:streams_loops done response=%s\n", Dump_Table(response))
    end


    -- ================== Happy End =============================
    AFB:notice (source, "--InLua-- _mixer_config_ done")
    return 0 end 

    -- ================= Unhappy End ============================
    ::OnErrorExit::
        AFB:error (source, "--InLua-- snd_attach fail")
        return 1 -- unhappy end --
end 

-- Display receive arguments and echo them to caller
function _init_softmixer_ (source, args)

    -- create event to push change audio roles to potential listeners
    _EventHandle=AFB:evtmake(source, "control")

    _mixer_config_ (source, args)

end