1 /* 2 * TC Applied Technologies Digital Interface Communications Engine driver 3 * 4 * Copyright (c) Clemens Ladisch <clemens@ladisch.de> 5 * Licensed under the terms of the GNU General Public License, version 2. 6 */ 7 8 #include "dice.h" 9 10 MODULE_DESCRIPTION("DICE driver"); 11 MODULE_AUTHOR("Clemens Ladisch <clemens@ladisch.de>"); 12 MODULE_LICENSE("GPL v2"); 13 14 #define OUI_WEISS 0x001c6a 15 16 #define DICE_CATEGORY_ID 0x04 17 #define WEISS_CATEGORY_ID 0x00 18 19 static int dice_interface_check(struct fw_unit *unit) 20 { 21 static const int min_values[10] = { 22 10, 0x64 / 4, 23 10, 0x18 / 4, 24 10, 0x18 / 4, 25 0, 0, 26 0, 0, 27 }; 28 struct fw_device *device = fw_parent_device(unit); 29 struct fw_csr_iterator it; 30 int key, val, vendor = -1, model = -1, err; 31 unsigned int category, i; 32 __be32 *pointers, value; 33 __be32 version; 34 35 pointers = kmalloc_array(ARRAY_SIZE(min_values), sizeof(__be32), 36 GFP_KERNEL); 37 if (pointers == NULL) 38 return -ENOMEM; 39 40 /* 41 * Check that GUID and unit directory are constructed according to DICE 42 * rules, i.e., that the specifier ID is the GUID's OUI, and that the 43 * GUID chip ID consists of the 8-bit category ID, the 10-bit product 44 * ID, and a 22-bit serial number. 45 */ 46 fw_csr_iterator_init(&it, unit->directory); 47 while (fw_csr_iterator_next(&it, &key, &val)) { 48 switch (key) { 49 case CSR_SPECIFIER_ID: 50 vendor = val; 51 break; 52 case CSR_MODEL: 53 model = val; 54 break; 55 } 56 } 57 if (vendor == OUI_WEISS) 58 category = WEISS_CATEGORY_ID; 59 else 60 category = DICE_CATEGORY_ID; 61 if (device->config_rom[3] != ((vendor << 8) | category) || 62 device->config_rom[4] >> 22 != model) { 63 err = -ENODEV; 64 goto end; 65 } 66 67 /* 68 * Check that the sub address spaces exist and are located inside the 69 * private address space. The minimum values are chosen so that all 70 * minimally required registers are included. 71 */ 72 err = snd_fw_transaction(unit, TCODE_READ_BLOCK_REQUEST, 73 DICE_PRIVATE_SPACE, pointers, 74 sizeof(__be32) * ARRAY_SIZE(min_values), 0); 75 if (err < 0) { 76 err = -ENODEV; 77 goto end; 78 } 79 for (i = 0; i < ARRAY_SIZE(min_values); ++i) { 80 value = be32_to_cpu(pointers[i]); 81 if (value < min_values[i] || value >= 0x40000) { 82 err = -ENODEV; 83 goto end; 84 } 85 } 86 87 /* 88 * Check that the implemented DICE driver specification major version 89 * number matches. 90 */ 91 err = snd_fw_transaction(unit, TCODE_READ_QUADLET_REQUEST, 92 DICE_PRIVATE_SPACE + 93 be32_to_cpu(pointers[0]) * 4 + GLOBAL_VERSION, 94 &version, 4, 0); 95 if (err < 0) { 96 err = -ENODEV; 97 goto end; 98 } 99 if ((version & cpu_to_be32(0xff000000)) != cpu_to_be32(0x01000000)) { 100 dev_err(&unit->device, 101 "unknown DICE version: 0x%08x\n", be32_to_cpu(version)); 102 err = -ENODEV; 103 goto end; 104 } 105 end: 106 return err; 107 } 108 109 static int highest_supported_mode_rate(struct snd_dice *dice, 110 unsigned int mode, unsigned int *rate) 111 { 112 unsigned int i, m; 113 114 for (i = ARRAY_SIZE(snd_dice_rates); i > 0; i--) { 115 *rate = snd_dice_rates[i - 1]; 116 if (snd_dice_stream_get_rate_mode(dice, *rate, &m) < 0) 117 continue; 118 if (mode == m) 119 break; 120 } 121 if (i == 0) 122 return -EINVAL; 123 124 return 0; 125 } 126 127 static int dice_read_mode_params(struct snd_dice *dice, unsigned int mode) 128 { 129 __be32 values[2]; 130 unsigned int rate; 131 int err; 132 133 if (highest_supported_mode_rate(dice, mode, &rate) < 0) { 134 dice->tx_channels[mode] = 0; 135 dice->tx_midi_ports[mode] = 0; 136 dice->rx_channels[mode] = 0; 137 dice->rx_midi_ports[mode] = 0; 138 return 0; 139 } 140 141 err = snd_dice_transaction_set_rate(dice, rate); 142 if (err < 0) 143 return err; 144 145 err = snd_dice_transaction_read_tx(dice, TX_NUMBER_AUDIO, 146 values, sizeof(values)); 147 if (err < 0) 148 return err; 149 150 dice->tx_channels[mode] = be32_to_cpu(values[0]); 151 dice->tx_midi_ports[mode] = be32_to_cpu(values[1]); 152 153 err = snd_dice_transaction_read_rx(dice, RX_NUMBER_AUDIO, 154 values, sizeof(values)); 155 if (err < 0) 156 return err; 157 158 dice->rx_channels[mode] = be32_to_cpu(values[0]); 159 dice->rx_midi_ports[mode] = be32_to_cpu(values[1]); 160 161 return 0; 162 } 163 164 static int dice_read_params(struct snd_dice *dice) 165 { 166 __be32 value; 167 int mode, err; 168 169 /* some very old firmwares don't tell about their clock support */ 170 if (dice->clock_caps > 0) { 171 err = snd_dice_transaction_read_global(dice, 172 GLOBAL_CLOCK_CAPABILITIES, 173 &value, 4); 174 if (err < 0) 175 return err; 176 dice->clock_caps = be32_to_cpu(value); 177 } else { 178 /* this should be supported by any device */ 179 dice->clock_caps = CLOCK_CAP_RATE_44100 | 180 CLOCK_CAP_RATE_48000 | 181 CLOCK_CAP_SOURCE_ARX1 | 182 CLOCK_CAP_SOURCE_INTERNAL; 183 } 184 185 for (mode = 2; mode >= 0; --mode) { 186 err = dice_read_mode_params(dice, mode); 187 if (err < 0) 188 return err; 189 } 190 191 return 0; 192 } 193 194 static void dice_card_strings(struct snd_dice *dice) 195 { 196 struct snd_card *card = dice->card; 197 struct fw_device *dev = fw_parent_device(dice->unit); 198 char vendor[32], model[32]; 199 unsigned int i; 200 int err; 201 202 strcpy(card->driver, "DICE"); 203 204 strcpy(card->shortname, "DICE"); 205 BUILD_BUG_ON(NICK_NAME_SIZE < sizeof(card->shortname)); 206 err = snd_dice_transaction_read_global(dice, GLOBAL_NICK_NAME, 207 card->shortname, 208 sizeof(card->shortname)); 209 if (err >= 0) { 210 /* DICE strings are returned in "always-wrong" endianness */ 211 BUILD_BUG_ON(sizeof(card->shortname) % 4 != 0); 212 for (i = 0; i < sizeof(card->shortname); i += 4) 213 swab32s((u32 *)&card->shortname[i]); 214 card->shortname[sizeof(card->shortname) - 1] = '\0'; 215 } 216 217 strcpy(vendor, "?"); 218 fw_csr_string(dev->config_rom + 5, CSR_VENDOR, vendor, sizeof(vendor)); 219 strcpy(model, "?"); 220 fw_csr_string(dice->unit->directory, CSR_MODEL, model, sizeof(model)); 221 snprintf(card->longname, sizeof(card->longname), 222 "%s %s (serial %u) at %s, S%d", 223 vendor, model, dev->config_rom[4] & 0x3fffff, 224 dev_name(&dice->unit->device), 100 << dev->max_speed); 225 226 strcpy(card->mixername, "DICE"); 227 } 228 229 static void dice_card_free(struct snd_card *card) 230 { 231 struct snd_dice *dice = card->private_data; 232 233 snd_dice_transaction_destroy(dice); 234 mutex_destroy(&dice->mutex); 235 } 236 237 static int dice_probe(struct fw_unit *unit, const struct ieee1394_device_id *id) 238 { 239 struct snd_card *card; 240 struct snd_dice *dice; 241 int err; 242 243 err = dice_interface_check(unit); 244 if (err < 0) 245 goto end; 246 247 err = snd_card_new(&unit->device, -1, NULL, THIS_MODULE, 248 sizeof(*dice), &card); 249 if (err < 0) 250 goto end; 251 252 dice = card->private_data; 253 dice->card = card; 254 dice->unit = unit; 255 card->private_free = dice_card_free; 256 257 spin_lock_init(&dice->lock); 258 mutex_init(&dice->mutex); 259 init_completion(&dice->clock_accepted); 260 init_waitqueue_head(&dice->hwdep_wait); 261 262 err = snd_dice_transaction_init(dice); 263 if (err < 0) 264 goto error; 265 266 err = dice_read_params(dice); 267 if (err < 0) 268 goto error; 269 270 dice_card_strings(dice); 271 272 err = snd_dice_create_pcm(dice); 273 if (err < 0) 274 goto error; 275 276 err = snd_dice_create_hwdep(dice); 277 if (err < 0) 278 goto error; 279 280 snd_dice_create_proc(dice); 281 282 err = snd_dice_create_midi(dice); 283 if (err < 0) 284 goto error; 285 286 err = snd_dice_stream_init_duplex(dice); 287 if (err < 0) 288 goto error; 289 290 err = snd_card_register(card); 291 if (err < 0) { 292 snd_dice_stream_destroy_duplex(dice); 293 goto error; 294 } 295 296 dev_set_drvdata(&unit->device, dice); 297 end: 298 return err; 299 error: 300 snd_card_free(card); 301 return err; 302 } 303 304 static void dice_remove(struct fw_unit *unit) 305 { 306 struct snd_dice *dice = dev_get_drvdata(&unit->device); 307 308 snd_card_disconnect(dice->card); 309 310 snd_dice_stream_destroy_duplex(dice); 311 312 snd_card_free_when_closed(dice->card); 313 } 314 315 static void dice_bus_reset(struct fw_unit *unit) 316 { 317 struct snd_dice *dice = dev_get_drvdata(&unit->device); 318 319 /* The handler address register becomes initialized. */ 320 snd_dice_transaction_reinit(dice); 321 322 mutex_lock(&dice->mutex); 323 snd_dice_stream_update_duplex(dice); 324 mutex_unlock(&dice->mutex); 325 } 326 327 #define DICE_INTERFACE 0x000001 328 329 static const struct ieee1394_device_id dice_id_table[] = { 330 { 331 .match_flags = IEEE1394_MATCH_VERSION, 332 .version = DICE_INTERFACE, 333 }, 334 { } 335 }; 336 MODULE_DEVICE_TABLE(ieee1394, dice_id_table); 337 338 static struct fw_driver dice_driver = { 339 .driver = { 340 .owner = THIS_MODULE, 341 .name = KBUILD_MODNAME, 342 .bus = &fw_bus_type, 343 }, 344 .probe = dice_probe, 345 .update = dice_bus_reset, 346 .remove = dice_remove, 347 .id_table = dice_id_table, 348 }; 349 350 static int __init alsa_dice_init(void) 351 { 352 return driver_register(&dice_driver.driver); 353 } 354 355 static void __exit alsa_dice_exit(void) 356 { 357 driver_unregister(&dice_driver.driver); 358 } 359 360 module_init(alsa_dice_init); 361 module_exit(alsa_dice_exit); 362