GNU Linux-libre 4.9.317-gnu1
[releases.git] / sound / soc / intel / skylake / skl-sst-utils.c
1 /*
2  *  skl-sst-utils.c - SKL sst utils functions
3  *
4  *  Copyright (C) 2016 Intel Corp
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as version 2, as
8  * published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License for more details.
14  */
15
16 #include <linux/device.h>
17 #include <linux/slab.h>
18 #include <linux/uuid.h>
19 #include "skl-sst-dsp.h"
20 #include "../common/sst-dsp.h"
21 #include "../common/sst-dsp-priv.h"
22 #include "skl-sst-ipc.h"
23
24
25 #define UUID_STR_SIZE 37
26 #define DEFAULT_HASH_SHA256_LEN 32
27
28 /* FW Extended Manifest Header id = $AE1 */
29 #define SKL_EXT_MANIFEST_HEADER_MAGIC   0x31454124
30
31 struct UUID {
32         u8 id[16];
33 };
34
35 union seg_flags {
36         u32 ul;
37         struct {
38                 u32 contents : 1;
39                 u32 alloc    : 1;
40                 u32 load     : 1;
41                 u32 read_only : 1;
42                 u32 code     : 1;
43                 u32 data     : 1;
44                 u32 _rsvd0   : 2;
45                 u32 type     : 4;
46                 u32 _rsvd1   : 4;
47                 u32 length   : 16;
48         } r;
49 } __packed;
50
51 struct segment_desc {
52         union seg_flags flags;
53         u32 v_base_addr;
54         u32 file_offset;
55 };
56
57 struct module_type {
58         u32 load_type  : 4;
59         u32 auto_start : 1;
60         u32 domain_ll  : 1;
61         u32 domain_dp  : 1;
62         u32 rsvd       : 25;
63 } __packed;
64
65 struct adsp_module_entry {
66         u32 struct_id;
67         u8  name[8];
68         struct UUID uuid;
69         struct module_type type;
70         u8  hash1[DEFAULT_HASH_SHA256_LEN];
71         u32 entry_point;
72         u16 cfg_offset;
73         u16 cfg_count;
74         u32 affinity_mask;
75         u16 instance_max_count;
76         u16 instance_bss_size;
77         struct segment_desc segments[3];
78 } __packed;
79
80 struct adsp_fw_hdr {
81         u32 id;
82         u32 len;
83         u8  name[8];
84         u32 preload_page_count;
85         u32 fw_image_flags;
86         u32 feature_mask;
87         u16 major;
88         u16 minor;
89         u16 hotfix;
90         u16 build;
91         u32 num_modules;
92         u32 hw_buf_base;
93         u32 hw_buf_length;
94         u32 load_offset;
95 } __packed;
96
97 #define MAX_INSTANCE_BUFF 2
98
99 struct uuid_module {
100         uuid_le uuid;
101         int id;
102         int is_loadable;
103         int max_instance;
104         u64 pvt_id[MAX_INSTANCE_BUFF];
105         int *instance_id;
106
107         struct list_head list;
108 };
109
110 struct skl_ext_manifest_hdr {
111         u32 id;
112         u32 len;
113         u16 version_major;
114         u16 version_minor;
115         u32 entries;
116 };
117
118 int snd_skl_get_module_info(struct skl_sst *ctx,
119                                 struct skl_module_cfg *mconfig)
120 {
121         struct uuid_module *module;
122         uuid_le *uuid_mod;
123
124         uuid_mod = (uuid_le *)mconfig->guid;
125
126         if (list_empty(&ctx->uuid_list)) {
127                 dev_err(ctx->dev, "Module list is empty\n");
128                 return -EINVAL;
129         }
130
131         list_for_each_entry(module, &ctx->uuid_list, list) {
132                 if (uuid_le_cmp(*uuid_mod, module->uuid) == 0) {
133                         mconfig->id.module_id = module->id;
134                         mconfig->is_loadable = module->is_loadable;
135
136                         return 0;
137                 }
138         }
139
140         return -EINVAL;
141 }
142 EXPORT_SYMBOL_GPL(snd_skl_get_module_info);
143
144 static int skl_get_pvtid_map(struct uuid_module *module, int instance_id)
145 {
146         int pvt_id;
147
148         for (pvt_id = 0; pvt_id < module->max_instance; pvt_id++) {
149                 if (module->instance_id[pvt_id] == instance_id)
150                         return pvt_id;
151         }
152         return -EINVAL;
153 }
154
155 int skl_get_pvt_instance_id_map(struct skl_sst *ctx,
156                                 int module_id, int instance_id)
157 {
158         struct uuid_module *module;
159
160         list_for_each_entry(module, &ctx->uuid_list, list) {
161                 if (module->id == module_id)
162                         return skl_get_pvtid_map(module, instance_id);
163         }
164
165         return -EINVAL;
166 }
167 EXPORT_SYMBOL_GPL(skl_get_pvt_instance_id_map);
168
169 static inline int skl_getid_32(struct uuid_module *module, u64 *val,
170                                 int word1_mask, int word2_mask)
171 {
172         int index, max_inst, pvt_id;
173         u32 mask_val;
174
175         max_inst =  module->max_instance;
176         mask_val = (u32)(*val >> word1_mask);
177
178         if (mask_val != 0xffffffff) {
179                 index = ffz(mask_val);
180                 pvt_id = index + word1_mask + word2_mask;
181                 if (pvt_id <= (max_inst - 1)) {
182                         *val |= 1ULL << (index + word1_mask);
183                         return pvt_id;
184                 }
185         }
186
187         return -EINVAL;
188 }
189
190 static inline int skl_pvtid_128(struct uuid_module *module)
191 {
192         int j, i, word1_mask, word2_mask = 0, pvt_id;
193
194         for (j = 0; j < MAX_INSTANCE_BUFF; j++) {
195                 word1_mask = 0;
196
197                 for (i = 0; i < 2; i++) {
198                         pvt_id = skl_getid_32(module, &module->pvt_id[j],
199                                                 word1_mask, word2_mask);
200                         if (pvt_id >= 0)
201                                 return pvt_id;
202
203                         word1_mask += 32;
204                         if ((word1_mask + word2_mask) >= module->max_instance)
205                                 return -EINVAL;
206                 }
207
208                 word2_mask += 64;
209                 if (word2_mask >= module->max_instance)
210                         return -EINVAL;
211         }
212
213         return -EINVAL;
214 }
215
216 /**
217  * skl_get_pvt_id: generate a private id for use as module id
218  *
219  * @ctx: driver context
220  * @mconfig: module configuration data
221  *
222  * This generates a 128 bit private unique id for a module TYPE so that
223  * module instance is unique
224  */
225 int skl_get_pvt_id(struct skl_sst *ctx, struct skl_module_cfg *mconfig)
226 {
227         struct uuid_module *module;
228         uuid_le *uuid_mod;
229         int pvt_id;
230
231         uuid_mod = (uuid_le *)mconfig->guid;
232
233         list_for_each_entry(module, &ctx->uuid_list, list) {
234                 if (uuid_le_cmp(*uuid_mod, module->uuid) == 0) {
235
236                         pvt_id = skl_pvtid_128(module);
237                         if (pvt_id >= 0) {
238                                 module->instance_id[pvt_id] =
239                                                 mconfig->id.instance_id;
240                                 return pvt_id;
241                         }
242                 }
243         }
244
245         return -EINVAL;
246 }
247 EXPORT_SYMBOL_GPL(skl_get_pvt_id);
248
249 /**
250  * skl_put_pvt_id: free up the private id allocated
251  *
252  * @ctx: driver context
253  * @mconfig: module configuration data
254  *
255  * This frees a 128 bit private unique id previously generated
256  */
257 int skl_put_pvt_id(struct skl_sst *ctx, struct skl_module_cfg *mconfig)
258 {
259         int i;
260         uuid_le *uuid_mod;
261         struct uuid_module *module;
262
263         uuid_mod = (uuid_le *)mconfig->guid;
264         list_for_each_entry(module, &ctx->uuid_list, list) {
265                 if (uuid_le_cmp(*uuid_mod, module->uuid) == 0) {
266
267                         if (mconfig->id.pvt_id != 0)
268                                 i = (mconfig->id.pvt_id) / 64;
269                         else
270                                 i = 0;
271
272                         module->pvt_id[i] &= ~(1 << (mconfig->id.pvt_id));
273                         mconfig->id.pvt_id = -1;
274                         return 0;
275                 }
276         }
277
278         return -EINVAL;
279 }
280 EXPORT_SYMBOL_GPL(skl_put_pvt_id);
281
282 /*
283  * Parse the firmware binary to get the UUID, module id
284  * and loadable flags
285  */
286 int snd_skl_parse_uuids(struct sst_dsp *ctx, const struct firmware *fw,
287                         unsigned int offset, int index)
288 {
289         struct adsp_fw_hdr *adsp_hdr;
290         struct adsp_module_entry *mod_entry;
291         int i, num_entry, size;
292         uuid_le *uuid_bin;
293         const char *buf;
294         struct skl_sst *skl = ctx->thread_context;
295         struct uuid_module *module;
296         struct firmware stripped_fw;
297         unsigned int safe_file;
298         int ret = 0;
299
300         /* Get the FW pointer to derive ADSP header */
301         stripped_fw.data = fw->data;
302         stripped_fw.size = fw->size;
303
304         skl_dsp_strip_extended_manifest(&stripped_fw);
305
306         buf = stripped_fw.data;
307
308         /* check if we have enough space in file to move to header */
309         safe_file = sizeof(*adsp_hdr) + offset;
310         if (stripped_fw.size <= safe_file) {
311                 dev_err(ctx->dev, "Small fw file size, No space for hdr\n");
312                 return -EINVAL;
313         }
314
315         adsp_hdr = (struct adsp_fw_hdr *)(buf + offset);
316
317         /* check 1st module entry is in file */
318         safe_file += adsp_hdr->len + sizeof(*mod_entry);
319         if (stripped_fw.size <= safe_file) {
320                 dev_err(ctx->dev, "Small fw file size, No module entry\n");
321                 return -EINVAL;
322         }
323
324         mod_entry = (struct adsp_module_entry *)
325                 (buf + offset + adsp_hdr->len);
326
327         num_entry = adsp_hdr->num_modules;
328
329         /* check all entries are in file */
330         safe_file += num_entry * sizeof(*mod_entry);
331         if (stripped_fw.size <= safe_file) {
332                 dev_err(ctx->dev, "Small fw file size, No modules\n");
333                 return -EINVAL;
334         }
335
336
337         /*
338          * Read the UUID(GUID) from FW Manifest.
339          *
340          * The 16 byte UUID format is: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXX
341          * Populate the UUID table to store module_id and loadable flags
342          * for the module.
343          */
344
345         for (i = 0; i < num_entry; i++, mod_entry++) {
346                 module = kzalloc(sizeof(*module), GFP_KERNEL);
347                 if (!module) {
348                         ret = -ENOMEM;
349                         goto free_uuid_list;
350                 }
351
352                 uuid_bin = (uuid_le *)mod_entry->uuid.id;
353                 memcpy(&module->uuid, uuid_bin, sizeof(module->uuid));
354
355                 module->id = (i | (index << 12));
356                 module->is_loadable = mod_entry->type.load_type;
357                 module->max_instance = mod_entry->instance_max_count;
358                 size = sizeof(int) * mod_entry->instance_max_count;
359                 module->instance_id = devm_kzalloc(ctx->dev, size, GFP_KERNEL);
360                 if (!module->instance_id) {
361                         ret = -ENOMEM;
362                         goto free_uuid_list;
363                 }
364
365                 list_add_tail(&module->list, &skl->uuid_list);
366
367                 dev_dbg(ctx->dev,
368                         "Adding uuid :%pUL   mod id: %d  Loadable: %d\n",
369                         &module->uuid, module->id, module->is_loadable);
370         }
371
372         return 0;
373
374 free_uuid_list:
375         skl_freeup_uuid_list(skl);
376         return ret;
377 }
378
379 void skl_freeup_uuid_list(struct skl_sst *ctx)
380 {
381         struct uuid_module *uuid, *_uuid;
382
383         list_for_each_entry_safe(uuid, _uuid, &ctx->uuid_list, list) {
384                 list_del(&uuid->list);
385                 kfree(uuid);
386         }
387 }
388
389 /*
390  * some firmware binary contains some extended manifest. This needs
391  * to be stripped in that case before we load and use that image.
392  *
393  * Get the module id for the module by checking
394  * the table for the UUID for the module
395  */
396 int skl_dsp_strip_extended_manifest(struct firmware *fw)
397 {
398         struct skl_ext_manifest_hdr *hdr;
399
400         /* check if fw file is greater than header we are looking */
401         if (fw->size < sizeof(hdr)) {
402                 pr_err("%s: Firmware file small, no hdr\n", __func__);
403                 return -EINVAL;
404         }
405
406         hdr = (struct skl_ext_manifest_hdr *)fw->data;
407
408         if (hdr->id == SKL_EXT_MANIFEST_HEADER_MAGIC) {
409                 fw->size -= hdr->len;
410                 fw->data += hdr->len;
411         }
412
413         return 0;
414 }