sound/pci/lx6464es/lx_core.c

   1 /* -*- linux-c -*- *
   2  *
   3  * ALSA driver for the digigram lx6464es interface
   4  * low-level interface
   5  *
   6  * Copyright (c) 2009 Tim Blechmann <tim@klingt.org>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; see the file COPYING.  If not, write to
  20  * the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  21  * Boston, MA 02111-1307, USA.
  22  *
  23  */
  24
  25 /* #define RMH_DEBUG 1 */
  26
  27 #include <linux/bitops.h>
  28 #include <linux/module.h>
  29 #include <linux/pci.h>
  30 #include <linux/delay.h>
  31
  32 #include "lx6464es.h"
  33 #include "lx_core.h"
  34
  35 /* low-level register access */
  36
  37 static const unsigned long dsp_port_offsets[] = {
  38         0,
  39         0x400,
  40         0x401,
  41         0x402,
  42         0x403,
  43         0x404,
  44         0x405,
  45         0x406,
  46         0x407,
  47         0x408,
  48         0x409,
  49         0x40a,
  50         0x40b,
  51         0x40c,
  52
  53         0x410,
  54         0x411,
  55         0x412,
  56         0x413,
  57         0x414,
  58         0x415,
  59         0x416,
  60
  61         0x420,
  62         0x430,
  63         0x431,
  64         0x432,
  65         0x433,
  66         0x434,
  67         0x440
  68 };
  69
  70 static void __iomem *lx_dsp_register(struct lx6464es *chip, int port)
  71 {
  72         void __iomem *base_address = chip->port_dsp_bar;
  73         return base_address + dsp_port_offsets[port]*4;
  74 }
  75
  76 unsigned long lx_dsp_reg_read(struct lx6464es *chip, int port)
  77 {
  78         void __iomem *address = lx_dsp_register(chip, port);
  79         return ioread32(address);
  80 }
  81
  82 static void lx_dsp_reg_readbuf(struct lx6464es *chip, int port, u32 *data,
  83                                u32 len)
  84 {
  85         u32 __iomem *address = lx_dsp_register(chip, port);
  86         int i;
  87
  88         /* we cannot use memcpy_fromio */
  89         for (i = 0; i != len; ++i)
  90                 data[i] = ioread32(address + i);
  91 }
  92
  93
  94 void lx_dsp_reg_write(struct lx6464es *chip, int port, unsigned data)
  95 {
  96         void __iomem *address = lx_dsp_register(chip, port);
  97         iowrite32(data, address);
  98 }
  99
 100 static void lx_dsp_reg_writebuf(struct lx6464es *chip, int port,
 101                                 const u32 *data, u32 len)
 102 {
 103         u32 __iomem *address = lx_dsp_register(chip, port);
 104         int i;
 105
 106         /* we cannot use memcpy_to */
 107         for (i = 0; i != len; ++i)
 108                 iowrite32(data[i], address + i);
 109 }
 110
 111
 112 static const unsigned long plx_port_offsets[] = {
 113         0x04,
 114         0x40,
 115         0x44,
 116         0x48,
 117         0x4c,
 118         0x50,
 119         0x54,
 120         0x58,
 121         0x5c,
 122         0x64,
 123         0x68,
 124         0x6C
 125 };
 126
 127 static void __iomem *lx_plx_register(struct lx6464es *chip, int port)
 128 {
 129         void __iomem *base_address = chip->port_plx_remapped;
 130         return base_address + plx_port_offsets[port];
 131 }
 132
 133 unsigned long lx_plx_reg_read(struct lx6464es *chip, int port)
 134 {
 135         void __iomem *address = lx_plx_register(chip, port);
 136         return ioread32(address);
 137 }
 138
 139 void lx_plx_reg_write(struct lx6464es *chip, int port, u32 data)
 140 {
 141         void __iomem *address = lx_plx_register(chip, port);
 142         iowrite32(data, address);
 143 }
 144
 145 /* rmh */
 146
 147 #ifdef CONFIG_SND_DEBUG
 148 #define CMD_NAME(a) a
 149 #else
 150 #define CMD_NAME(a) NULL
 151 #endif
 152
 153 #define Reg_CSM_MR                      0x00000002
 154 #define Reg_CSM_MC                      0x00000001
 155
 156 struct dsp_cmd_info {
 157         u32    dcCodeOp;        /* Op Code of the command (usually 1st 24-bits
 158                                  * word).*/
 159         u16    dcCmdLength;     /* Command length in words of 24 bits.*/
 160         u16    dcStatusType;    /* Status type: 0 for fixed length, 1 for
 161                                  * random. */
 162         u16    dcStatusLength;  /* Status length (if fixed).*/
 163         char  *dcOpName;
 164 };
 165
 166 /*
 167   Initialization and control data for the Microblaze interface
 168   - OpCode:
 169     the opcode field of the command set at the proper offset
 170   - CmdLength
 171     the number of command words
 172   - StatusType
 173     offset in the status registers: 0 means that the return value may be
 174     different from 0, and must be read
 175   - StatusLength
 176     the number of status words (in addition to the return value)
 177 */
 178
 179 static struct dsp_cmd_info dsp_commands[] =
 180 {
 181         { (CMD_00_INFO_DEBUG << OPCODE_OFFSET)                  , 1 /*custom*/
 182           , 1   , 0 /**/                    , CMD_NAME("INFO_DEBUG") },
 183         { (CMD_01_GET_SYS_CFG << OPCODE_OFFSET)                 , 1 /**/
 184           , 1      , 2 /**/                 , CMD_NAME("GET_SYS_CFG") },
 185         { (CMD_02_SET_GRANULARITY << OPCODE_OFFSET)             , 1 /**/
 186           , 1      , 0 /**/                 , CMD_NAME("SET_GRANULARITY") },
 187         { (CMD_03_SET_TIMER_IRQ << OPCODE_OFFSET)               , 1 /**/
 188           , 1      , 0 /**/                 , CMD_NAME("SET_TIMER_IRQ") },
 189         { (CMD_04_GET_EVENT << OPCODE_OFFSET)                   , 1 /**/
 190           , 1      , 0 /*up to 10*/     , CMD_NAME("GET_EVENT") },
 191         { (CMD_05_GET_PIPES << OPCODE_OFFSET)                   , 1 /**/
 192           , 1      , 2 /*up to 4*/      , CMD_NAME("GET_PIPES") },
 193         { (CMD_06_ALLOCATE_PIPE << OPCODE_OFFSET)               , 1 /**/
 194           , 0      , 0 /**/                 , CMD_NAME("ALLOCATE_PIPE") },
 195         { (CMD_07_RELEASE_PIPE << OPCODE_OFFSET)                , 1 /**/
 196           , 0      , 0 /**/                 , CMD_NAME("RELEASE_PIPE") },
 197         { (CMD_08_ASK_BUFFERS << OPCODE_OFFSET)                 , 1 /**/
 198           , 1      , MAX_STREAM_BUFFER  , CMD_NAME("ASK_BUFFERS") },
 199         { (CMD_09_STOP_PIPE << OPCODE_OFFSET)                   , 1 /**/
 200           , 0      , 0 /*up to 2*/      , CMD_NAME("STOP_PIPE") },
 201         { (CMD_0A_GET_PIPE_SPL_COUNT << OPCODE_OFFSET)          , 1 /**/
 202           , 1      , 1 /*up to 2*/      , CMD_NAME("GET_PIPE_SPL_COUNT") },
 203         { (CMD_0B_TOGGLE_PIPE_STATE << OPCODE_OFFSET)           , 1 /*up to 5*/
 204           , 1      , 0 /**/                 , CMD_NAME("TOGGLE_PIPE_STATE") },
 205         { (CMD_0C_DEF_STREAM << OPCODE_OFFSET)                  , 1 /*up to 4*/
 206           , 1      , 0 /**/                 , CMD_NAME("DEF_STREAM") },
 207         { (CMD_0D_SET_MUTE  << OPCODE_OFFSET)                   , 3 /**/
 208           , 1      , 0 /**/                 , CMD_NAME("SET_MUTE") },
 209         { (CMD_0E_GET_STREAM_SPL_COUNT << OPCODE_OFFSET)        , 1/**/
 210           , 1      , 2 /**/                 , CMD_NAME("GET_STREAM_SPL_COUNT") },
 211         { (CMD_0F_UPDATE_BUFFER << OPCODE_OFFSET)               , 3 /*up to 4*/
 212           , 0      , 1 /**/                 , CMD_NAME("UPDATE_BUFFER") },
 213         { (CMD_10_GET_BUFFER << OPCODE_OFFSET)                  , 1 /**/
 214           , 1      , 4 /**/                 , CMD_NAME("GET_BUFFER") },
 215         { (CMD_11_CANCEL_BUFFER << OPCODE_OFFSET)               , 1 /**/
 216           , 1      , 1 /*up to 4*/      , CMD_NAME("CANCEL_BUFFER") },
 217         { (CMD_12_GET_PEAK << OPCODE_OFFSET)                    , 1 /**/
 218           , 1      , 1 /**/                 , CMD_NAME("GET_PEAK") },
 219         { (CMD_13_SET_STREAM_STATE << OPCODE_OFFSET)            , 1 /**/
 220           , 1      , 0 /**/                 , CMD_NAME("SET_STREAM_STATE") },
 221 };
 222
 223 static void lx_message_init(struct lx_rmh *rmh, enum cmd_mb_opcodes cmd)
 224 {
 225         snd_BUG_ON(cmd >= CMD_14_INVALID);
 226
 227         rmh->cmd[0] = dsp_commands[cmd].dcCodeOp;
 228         rmh->cmd_len = dsp_commands[cmd].dcCmdLength;
 229         rmh->stat_len = dsp_commands[cmd].dcStatusLength;
 230         rmh->dsp_stat = dsp_commands[cmd].dcStatusType;
 231         rmh->cmd_idx = cmd;
 232         memset(&rmh->cmd[1], 0, (REG_CRM_NUMBER - 1) * sizeof(u32));
 233
 234 #ifdef CONFIG_SND_DEBUG
 235         memset(rmh->stat, 0, REG_CRM_NUMBER * sizeof(u32));
 236 #endif
 237 #ifdef RMH_DEBUG
 238         rmh->cmd_idx = cmd;
 239 #endif
 240 }
 241
 242 #ifdef RMH_DEBUG
 243 #define LXRMH "lx6464es rmh: "
 244 static void lx_message_dump(struct lx_rmh *rmh)
 245 {
 246         u8 idx = rmh->cmd_idx;
 247         int i;
 248
 249         snd_printk(LXRMH "command %s\n", dsp_commands[idx].dcOpName);
 250
 251         for (i = 0; i != rmh->cmd_len; ++i)
 252                 snd_printk(LXRMH "\tcmd[%d] %08x\n", i, rmh->cmd[i]);
 253
 254         for (i = 0; i != rmh->stat_len; ++i)
 255                 snd_printk(LXRMH "\tstat[%d]: %08x\n", i, rmh->stat[i]);
 256         snd_printk("\n");
 257 }
 258 #else
 259 static inline void lx_message_dump(struct lx_rmh *rmh)
 260 {}
 261 #endif
 262
 263
 264
 265 /* sleep 500 - 100 = 400 times 100us -> the timeout is >= 40 ms */
 266 #define XILINX_TIMEOUT_MS       40
 267 #define XILINX_POLL_NO_SLEEP    100
 268 #define XILINX_POLL_ITERATIONS  150
 269
 270
 271 static int lx_message_send_atomic(struct lx6464es *chip, struct lx_rmh *rmh)
 272 {
 273         u32 reg = ED_DSP_TIMED_OUT;
 274         int dwloop;
 275
 276         if (lx_dsp_reg_read(chip, eReg_CSM) & (Reg_CSM_MC | Reg_CSM_MR)) {
 277                 dev_err(chip->card->dev, "PIOSendMessage eReg_CSM %x\n", reg);
 278                 return -EBUSY;
 279         }
 280
 281         /* write command */
 282         lx_dsp_reg_writebuf(chip, eReg_CRM1, rmh->cmd, rmh->cmd_len);
 283
 284         /* MicoBlaze gogogo */
 285         lx_dsp_reg_write(chip, eReg_CSM, Reg_CSM_MC);
 286
 287         /* wait for device to answer */
 288         for (dwloop = 0; dwloop != XILINX_TIMEOUT_MS * 1000; ++dwloop) {
 289                 if (lx_dsp_reg_read(chip, eReg_CSM) & Reg_CSM_MR) {
 290                         if (rmh->dsp_stat == 0)
 291                                 reg = lx_dsp_reg_read(chip, eReg_CRM1);
 292                         else
 293                                 reg = 0;
 294                         goto polling_successful;
 295                 } else
 296                         udelay(1);
 297         }
 298         dev_warn(chip->card->dev, "TIMEOUT lx_message_send_atomic! "
 299                    "polling failed\n");
 300
 301 polling_successful:
 302         if ((reg & ERROR_VALUE) == 0) {
 303                 /* read response */
 304                 if (rmh->stat_len) {
 305                         snd_BUG_ON(rmh->stat_len >= (REG_CRM_NUMBER-1));
 306                         lx_dsp_reg_readbuf(chip, eReg_CRM2, rmh->stat,
 307                                            rmh->stat_len);
 308                 }
 309         } else
 310                 dev_err(chip->card->dev, "rmh error: %08x\n", reg);
 311
 312         /* clear Reg_CSM_MR */
 313         lx_dsp_reg_write(chip, eReg_CSM, 0);
 314
 315         switch (reg) {
 316         case ED_DSP_TIMED_OUT:
 317                 dev_warn(chip->card->dev, "lx_message_send: dsp timeout\n");
 318                 return -ETIMEDOUT;
 319
 320         case ED_DSP_CRASHED:
 321                 dev_warn(chip->card->dev, "lx_message_send: dsp crashed\n");
 322                 return -EAGAIN;
 323         }
 324
 325         lx_message_dump(rmh);
 326
 327         return reg;
 328 }
 329
 330
 331 /* low-level dsp access */
 332 int lx_dsp_get_version(struct lx6464es *chip, u32 *rdsp_version)
 333 {
 334         u16 ret;
 335
 336         mutex_lock(&chip->msg_lock);
 337
 338         lx_message_init(&chip->rmh, CMD_01_GET_SYS_CFG);
 339         ret = lx_message_send_atomic(chip, &chip->rmh);
 340
 341         *rdsp_version = chip->rmh.stat[1];
 342         mutex_unlock(&chip->msg_lock);
 343         return ret;
 344 }
 345
 346 int lx_dsp_get_clock_frequency(struct lx6464es *chip, u32 *rfreq)
 347 {
 348         u16 ret = 0;
 349         u32 freq_raw = 0;
 350         u32 freq = 0;
 351         u32 frequency = 0;
 352
 353         mutex_lock(&chip->msg_lock);
 354
 355         lx_message_init(&chip->rmh, CMD_01_GET_SYS_CFG);
 356         ret = lx_message_send_atomic(chip, &chip->rmh);
 357
 358         if (ret == 0) {
 359                 freq_raw = chip->rmh.stat[0] >> FREQ_FIELD_OFFSET;
 360                 freq = freq_raw & XES_FREQ_COUNT8_MASK;
 361
 362                 if ((freq < XES_FREQ_COUNT8_48_MAX) ||
 363                     (freq > XES_FREQ_COUNT8_44_MIN))
 364                         frequency = 0; /* unknown */
 365                 else if (freq >= XES_FREQ_COUNT8_44_MAX)
 366                         frequency = 44100;
 367                 else
 368                         frequency = 48000;
 369         }
 370
 371         mutex_unlock(&chip->msg_lock);
 372
 373         *rfreq = frequency * chip->freq_ratio;
 374
 375         return ret;
 376 }
 377
 378 int lx_dsp_get_mac(struct lx6464es *chip)
 379 {
 380         u32 macmsb, maclsb;
 381
 382         macmsb = lx_dsp_reg_read(chip, eReg_ADMACESMSB) & 0x00FFFFFF;
 383         maclsb = lx_dsp_reg_read(chip, eReg_ADMACESLSB) & 0x00FFFFFF;
 384
 385         /* todo: endianess handling */
 386         chip->mac_address[5] = ((u8 *)(&maclsb))[0];
 387         chip->mac_address[4] = ((u8 *)(&maclsb))[1];
 388         chip->mac_address[3] = ((u8 *)(&maclsb))[2];
 389         chip->mac_address[2] = ((u8 *)(&macmsb))[0];
 390         chip->mac_address[1] = ((u8 *)(&macmsb))[1];
 391         chip->mac_address[0] = ((u8 *)(&macmsb))[2];
 392
 393         return 0;
 394 }
 395
 396
 397 int lx_dsp_set_granularity(struct lx6464es *chip, u32 gran)
 398 {
 399         int ret;
 400
 401         mutex_lock(&chip->msg_lock);
 402
 403         lx_message_init(&chip->rmh, CMD_02_SET_GRANULARITY);
 404         chip->rmh.cmd[0] |= gran;
 405
 406         ret = lx_message_send_atomic(chip, &chip->rmh);
 407         mutex_unlock(&chip->msg_lock);
 408         return ret;
 409 }
 410
 411 int lx_dsp_read_async_events(struct lx6464es *chip, u32 *data)
 412 {
 413         int ret;
 414
 415         mutex_lock(&chip->msg_lock);
 416
 417         lx_message_init(&chip->rmh, CMD_04_GET_EVENT);
 418         chip->rmh.stat_len = 9; /* we don't necessarily need the full length */
 419
 420         ret = lx_message_send_atomic(chip, &chip->rmh);
 421
 422         if (!ret)
 423                 memcpy(data, chip->rmh.stat, chip->rmh.stat_len * sizeof(u32));
 424
 425         mutex_unlock(&chip->msg_lock);
 426         return ret;
 427 }
 428
 429 #define PIPE_INFO_TO_CMD(capture, pipe)                                 \
 430         ((u32)((u32)(pipe) | ((capture) ? ID_IS_CAPTURE : 0L)) << ID_OFFSET)
 431
 432
 433
 434 /* low-level pipe handling */
 435 int lx_pipe_allocate(struct lx6464es *chip, u32 pipe, int is_capture,
 436                      int channels)
 437 {
 438         int err;
 439         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 440
 441         mutex_lock(&chip->msg_lock);
 442         lx_message_init(&chip->rmh, CMD_06_ALLOCATE_PIPE);
 443
 444         chip->rmh.cmd[0] |= pipe_cmd;
 445         chip->rmh.cmd[0] |= channels;
 446
 447         err = lx_message_send_atomic(chip, &chip->rmh);
 448         mutex_unlock(&chip->msg_lock);
 449
 450         if (err != 0)
 451                 dev_err(chip->card->dev, "could not allocate pipe\n");
 452
 453         return err;
 454 }
 455
 456 int lx_pipe_release(struct lx6464es *chip, u32 pipe, int is_capture)
 457 {
 458         int err;
 459         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 460
 461         mutex_lock(&chip->msg_lock);
 462         lx_message_init(&chip->rmh, CMD_07_RELEASE_PIPE);
 463
 464         chip->rmh.cmd[0] |= pipe_cmd;
 465
 466         err = lx_message_send_atomic(chip, &chip->rmh);
 467         mutex_unlock(&chip->msg_lock);
 468
 469         return err;
 470 }
 471
 472 int lx_buffer_ask(struct lx6464es *chip, u32 pipe, int is_capture,
 473                   u32 *r_needed, u32 *r_freed, u32 *size_array)
 474 {
 475         int err;
 476         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 477
 478 #ifdef CONFIG_SND_DEBUG
 479         if (size_array)
 480                 memset(size_array, 0, sizeof(u32)*MAX_STREAM_BUFFER);
 481 #endif
 482
 483         *r_needed = 0;
 484         *r_freed = 0;
 485
 486         mutex_lock(&chip->msg_lock);
 487         lx_message_init(&chip->rmh, CMD_08_ASK_BUFFERS);
 488
 489         chip->rmh.cmd[0] |= pipe_cmd;
 490
 491         err = lx_message_send_atomic(chip, &chip->rmh);
 492
 493         if (!err) {
 494                 int i;
 495                 for (i = 0; i < MAX_STREAM_BUFFER; ++i) {
 496                         u32 stat = chip->rmh.stat[i];
 497                         if (stat & (BF_EOB << BUFF_FLAGS_OFFSET)) {
 498                                 /* finished */
 499                                 *r_freed += 1;
 500                                 if (size_array)
 501                                         size_array[i] = stat & MASK_DATA_SIZE;
 502                         } else if ((stat & (BF_VALID << BUFF_FLAGS_OFFSET))
 503                                    == 0)
 504                                 /* free */
 505                                 *r_needed += 1;
 506                 }
 507
 508                 dev_dbg(chip->card->dev,
 509                         "CMD_08_ASK_BUFFERS: needed %d, freed %d\n",
 510                             *r_needed, *r_freed);
 511                 for (i = 0; i < MAX_STREAM_BUFFER; ++i) {
 512                         for (i = 0; i != chip->rmh.stat_len; ++i)
 513                                 dev_dbg(chip->card->dev,
 514                                         "  stat[%d]: %x, %x\n", i,
 515                                             chip->rmh.stat[i],
 516                                             chip->rmh.stat[i] & MASK_DATA_SIZE);
 517                 }
 518         }
 519
 520         mutex_unlock(&chip->msg_lock);
 521         return err;
 522 }
 523
 524
 525 int lx_pipe_stop(struct lx6464es *chip, u32 pipe, int is_capture)
 526 {
 527         int err;
 528         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 529
 530         mutex_lock(&chip->msg_lock);
 531         lx_message_init(&chip->rmh, CMD_09_STOP_PIPE);
 532
 533         chip->rmh.cmd[0] |= pipe_cmd;
 534
 535         err = lx_message_send_atomic(chip, &chip->rmh);
 536
 537         mutex_unlock(&chip->msg_lock);
 538         return err;
 539 }
 540
 541 static int lx_pipe_toggle_state(struct lx6464es *chip, u32 pipe, int is_capture)
 542 {
 543         int err;
 544         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 545
 546         mutex_lock(&chip->msg_lock);
 547         lx_message_init(&chip->rmh, CMD_0B_TOGGLE_PIPE_STATE);
 548
 549         chip->rmh.cmd[0] |= pipe_cmd;
 550
 551         err = lx_message_send_atomic(chip, &chip->rmh);
 552
 553         mutex_unlock(&chip->msg_lock);
 554         return err;
 555 }
 556
 557
 558 int lx_pipe_start(struct lx6464es *chip, u32 pipe, int is_capture)
 559 {
 560         int err;
 561
 562         err = lx_pipe_wait_for_idle(chip, pipe, is_capture);
 563         if (err < 0)
 564                 return err;
 565
 566         err = lx_pipe_toggle_state(chip, pipe, is_capture);
 567
 568         return err;
 569 }
 570
 571 int lx_pipe_pause(struct lx6464es *chip, u32 pipe, int is_capture)
 572 {
 573         int err = 0;
 574
 575         err = lx_pipe_wait_for_start(chip, pipe, is_capture);
 576         if (err < 0)
 577                 return err;
 578
 579         err = lx_pipe_toggle_state(chip, pipe, is_capture);
 580
 581         return err;
 582 }
 583
 584
 585 int lx_pipe_sample_count(struct lx6464es *chip, u32 pipe, int is_capture,
 586                          u64 *rsample_count)
 587 {
 588         int err;
 589         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 590
 591         mutex_lock(&chip->msg_lock);
 592         lx_message_init(&chip->rmh, CMD_0A_GET_PIPE_SPL_COUNT);
 593
 594         chip->rmh.cmd[0] |= pipe_cmd;
 595         chip->rmh.stat_len = 2; /* need all words here! */
 596
 597         err = lx_message_send_atomic(chip, &chip->rmh); /* don't sleep! */
 598
 599         if (err != 0)
 600                 dev_err(chip->card->dev,
 601                         "could not query pipe's sample count\n");
 602         else {
 603                 *rsample_count = ((u64)(chip->rmh.stat[0] & MASK_SPL_COUNT_HI)
 604                                   << 24)     /* hi part */
 605                         + chip->rmh.stat[1]; /* lo part */
 606         }
 607
 608         mutex_unlock(&chip->msg_lock);
 609         return err;
 610 }
 611
 612 int lx_pipe_state(struct lx6464es *chip, u32 pipe, int is_capture, u16 *rstate)
 613 {
 614         int err;
 615         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 616
 617         mutex_lock(&chip->msg_lock);
 618         lx_message_init(&chip->rmh, CMD_0A_GET_PIPE_SPL_COUNT);
 619
 620         chip->rmh.cmd[0] |= pipe_cmd;
 621
 622         err = lx_message_send_atomic(chip, &chip->rmh);
 623
 624         if (err != 0)
 625                 dev_err(chip->card->dev, "could not query pipe's state\n");
 626         else
 627                 *rstate = (chip->rmh.stat[0] >> PSTATE_OFFSET) & 0x0F;
 628
 629         mutex_unlock(&chip->msg_lock);
 630         return err;
 631 }
 632
 633 static int lx_pipe_wait_for_state(struct lx6464es *chip, u32 pipe,
 634                                   int is_capture, u16 state)
 635 {
 636         int i;
 637
 638         /* max 2*PCMOnlyGranularity = 2*1024 at 44100 = < 50 ms:
 639          * timeout 50 ms */
 640         for (i = 0; i != 50; ++i) {
 641                 u16 current_state;
 642                 int err = lx_pipe_state(chip, pipe, is_capture, &current_state);
 643
 644                 if (err < 0)
 645                         return err;
 646
 647                 if (current_state == state)
 648                         return 0;
 649
 650                 mdelay(1);
 651         }
 652
 653         return -ETIMEDOUT;
 654 }
 655
 656 int lx_pipe_wait_for_start(struct lx6464es *chip, u32 pipe, int is_capture)
 657 {
 658         return lx_pipe_wait_for_state(chip, pipe, is_capture, PSTATE_RUN);
 659 }
 660
 661 int lx_pipe_wait_for_idle(struct lx6464es *chip, u32 pipe, int is_capture)
 662 {
 663         return lx_pipe_wait_for_state(chip, pipe, is_capture, PSTATE_IDLE);
 664 }
 665
 666 /* low-level stream handling */
 667 int lx_stream_set_state(struct lx6464es *chip, u32 pipe,
 668                                int is_capture, enum stream_state_t state)
 669 {
 670         int err;
 671         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 672
 673         mutex_lock(&chip->msg_lock);
 674         lx_message_init(&chip->rmh, CMD_13_SET_STREAM_STATE);
 675
 676         chip->rmh.cmd[0] |= pipe_cmd;
 677         chip->rmh.cmd[0] |= state;
 678
 679         err = lx_message_send_atomic(chip, &chip->rmh);
 680         mutex_unlock(&chip->msg_lock);
 681
 682         return err;
 683 }
 684
 685 int lx_stream_set_format(struct lx6464es *chip, struct snd_pcm_runtime *runtime,
 686                          u32 pipe, int is_capture)
 687 {
 688         int err;
 689         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 690         u32 channels = runtime->channels;
 691
 692         if (runtime->channels != channels)
 693                 dev_err(chip->card->dev, "channel count mismatch: %d vs %d",
 694                            runtime->channels, channels);
 695
 696         mutex_lock(&chip->msg_lock);
 697         lx_message_init(&chip->rmh, CMD_0C_DEF_STREAM);
 698
 699         chip->rmh.cmd[0] |= pipe_cmd;
 700
 701         if (runtime->sample_bits == 16)
 702                 /* 16 bit format */
 703                 chip->rmh.cmd[0] |= (STREAM_FMT_16b << STREAM_FMT_OFFSET);
 704
 705         if (snd_pcm_format_little_endian(runtime->format))
 706                 /* little endian/intel format */
 707                 chip->rmh.cmd[0] |= (STREAM_FMT_intel << STREAM_FMT_OFFSET);
 708
 709         chip->rmh.cmd[0] |= channels-1;
 710
 711         err = lx_message_send_atomic(chip, &chip->rmh);
 712         mutex_unlock(&chip->msg_lock);
 713
 714         return err;
 715 }
 716
 717 int lx_stream_state(struct lx6464es *chip, u32 pipe, int is_capture,
 718                     int *rstate)
 719 {
 720         int err;
 721         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 722
 723         mutex_lock(&chip->msg_lock);
 724         lx_message_init(&chip->rmh, CMD_0E_GET_STREAM_SPL_COUNT);
 725
 726         chip->rmh.cmd[0] |= pipe_cmd;
 727
 728         err = lx_message_send_atomic(chip, &chip->rmh);
 729
 730         *rstate = (chip->rmh.stat[0] & SF_START) ? START_STATE : PAUSE_STATE;
 731
 732         mutex_unlock(&chip->msg_lock);
 733         return err;
 734 }
 735
 736 int lx_stream_sample_position(struct lx6464es *chip, u32 pipe, int is_capture,
 737                               u64 *r_bytepos)
 738 {
 739         int err;
 740         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 741
 742         mutex_lock(&chip->msg_lock);
 743         lx_message_init(&chip->rmh, CMD_0E_GET_STREAM_SPL_COUNT);
 744
 745         chip->rmh.cmd[0] |= pipe_cmd;
 746
 747         err = lx_message_send_atomic(chip, &chip->rmh);
 748
 749         *r_bytepos = ((u64) (chip->rmh.stat[0] & MASK_SPL_COUNT_HI)
 750                       << 32)         /* hi part */
 751                 + chip->rmh.stat[1]; /* lo part */
 752
 753         mutex_unlock(&chip->msg_lock);
 754         return err;
 755 }
 756
 757 /* low-level buffer handling */
 758 int lx_buffer_give(struct lx6464es *chip, u32 pipe, int is_capture,
 759                    u32 buffer_size, u32 buf_address_lo, u32 buf_address_hi,
 760                    u32 *r_buffer_index)
 761 {
 762         int err;
 763         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 764
 765         mutex_lock(&chip->msg_lock);
 766         lx_message_init(&chip->rmh, CMD_0F_UPDATE_BUFFER);
 767
 768         chip->rmh.cmd[0] |= pipe_cmd;
 769         chip->rmh.cmd[0] |= BF_NOTIFY_EOB; /* request interrupt notification */
 770
 771         /* todo: pause request, circular buffer */
 772
 773         chip->rmh.cmd[1] = buffer_size & MASK_DATA_SIZE;
 774         chip->rmh.cmd[2] = buf_address_lo;
 775
 776         if (buf_address_hi) {
 777                 chip->rmh.cmd_len = 4;
 778                 chip->rmh.cmd[3] = buf_address_hi;
 779                 chip->rmh.cmd[0] |= BF_64BITS_ADR;
 780         }
 781
 782         err = lx_message_send_atomic(chip, &chip->rmh);
 783
 784         if (err == 0) {
 785                 *r_buffer_index = chip->rmh.stat[0];
 786                 goto done;
 787         }
 788
 789         if (err == EB_RBUFFERS_TABLE_OVERFLOW)
 790                 dev_err(chip->card->dev,
 791                         "lx_buffer_give EB_RBUFFERS_TABLE_OVERFLOW\n");
 792
 793         if (err == EB_INVALID_STREAM)
 794                 dev_err(chip->card->dev,
 795                         "lx_buffer_give EB_INVALID_STREAM\n");
 796
 797         if (err == EB_CMD_REFUSED)
 798                 dev_err(chip->card->dev,
 799                         "lx_buffer_give EB_CMD_REFUSED\n");
 800
 801  done:
 802         mutex_unlock(&chip->msg_lock);
 803         return err;
 804 }
 805
 806 int lx_buffer_free(struct lx6464es *chip, u32 pipe, int is_capture,
 807                    u32 *r_buffer_size)
 808 {
 809         int err;
 810         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 811
 812         mutex_lock(&chip->msg_lock);
 813         lx_message_init(&chip->rmh, CMD_11_CANCEL_BUFFER);
 814
 815         chip->rmh.cmd[0] |= pipe_cmd;
 816         chip->rmh.cmd[0] |= MASK_BUFFER_ID; /* ask for the current buffer: the
 817                                              * microblaze will seek for it */
 818
 819         err = lx_message_send_atomic(chip, &chip->rmh);
 820
 821         if (err == 0)
 822                 *r_buffer_size = chip->rmh.stat[0]  & MASK_DATA_SIZE;
 823
 824         mutex_unlock(&chip->msg_lock);
 825         return err;
 826 }
 827
 828 int lx_buffer_cancel(struct lx6464es *chip, u32 pipe, int is_capture,
 829                      u32 buffer_index)
 830 {
 831         int err;
 832         u32 pipe_cmd = PIPE_INFO_TO_CMD(is_capture, pipe);
 833
 834         mutex_lock(&chip->msg_lock);
 835         lx_message_init(&chip->rmh, CMD_11_CANCEL_BUFFER);
 836
 837         chip->rmh.cmd[0] |= pipe_cmd;
 838         chip->rmh.cmd[0] |= buffer_index;
 839
 840         err = lx_message_send_atomic(chip, &chip->rmh);
 841
 842         mutex_unlock(&chip->msg_lock);
 843         return err;
 844 }
 845
 846
 847 /* low-level gain/peak handling
 848  *
 849  * \todo: can we unmute capture/playback channels independently?
 850  *
 851  * */
 852 int lx_level_unmute(struct lx6464es *chip, int is_capture, int unmute)
 853 {
 854         int err;
 855         /* bit set to 1: channel muted */
 856         u64 mute_mask = unmute ? 0 : 0xFFFFFFFFFFFFFFFFLLU;
 857
 858         mutex_lock(&chip->msg_lock);
 859         lx_message_init(&chip->rmh, CMD_0D_SET_MUTE);
 860
 861         chip->rmh.cmd[0] |= PIPE_INFO_TO_CMD(is_capture, 0);
 862
 863         chip->rmh.cmd[1] = (u32)(mute_mask >> (u64)32);        /* hi part */
 864         chip->rmh.cmd[2] = (u32)(mute_mask & (u64)0xFFFFFFFF); /* lo part */
 865
 866         dev_dbg(chip->card->dev,
 867                 "mute %x %x %x\n", chip->rmh.cmd[0], chip->rmh.cmd[1],
 868                    chip->rmh.cmd[2]);
 869
 870         err = lx_message_send_atomic(chip, &chip->rmh);
 871
 872         mutex_unlock(&chip->msg_lock);
 873         return err;
 874 }
 875
 876 static u32 peak_map[] = {
 877         0x00000109, /* -90.308dB */
 878         0x0000083B, /* -72.247dB */
 879         0x000020C4, /* -60.205dB */
 880         0x00008273, /* -48.030dB */
 881         0x00020756, /* -36.005dB */
 882         0x00040C37, /* -30.001dB */
 883         0x00081385, /* -24.002dB */
 884         0x00101D3F, /* -18.000dB */
 885         0x0016C310, /* -15.000dB */
 886         0x002026F2, /* -12.001dB */
 887         0x002D6A86, /* -9.000dB */
 888         0x004026E6, /* -6.004dB */
 889         0x005A9DF6, /* -3.000dB */
 890         0x0065AC8B, /* -2.000dB */
 891         0x00721481, /* -1.000dB */
 892         0x007FFFFF, /* FS */
 893 };
 894
 895 int lx_level_peaks(struct lx6464es *chip, int is_capture, int channels,
 896                    u32 *r_levels)
 897 {
 898         int err = 0;
 899         int i;
 900
 901         mutex_lock(&chip->msg_lock);
 902         for (i = 0; i < channels; i += 4) {
 903                 u32 s0, s1, s2, s3;
 904
 905                 lx_message_init(&chip->rmh, CMD_12_GET_PEAK);
 906                 chip->rmh.cmd[0] |= PIPE_INFO_TO_CMD(is_capture, i);
 907
 908                 err = lx_message_send_atomic(chip, &chip->rmh);
 909
 910                 if (err == 0) {
 911                         s0 = peak_map[chip->rmh.stat[0] & 0x0F];
 912                         s1 = peak_map[(chip->rmh.stat[0] >>  4) & 0xf];
 913                         s2 = peak_map[(chip->rmh.stat[0] >>  8) & 0xf];
 914                         s3 = peak_map[(chip->rmh.stat[0] >>  12) & 0xf];
 915                 } else
 916                         s0 = s1 = s2 = s3 = 0;
 917
 918                 r_levels[0] = s0;
 919                 r_levels[1] = s1;
 920                 r_levels[2] = s2;
 921                 r_levels[3] = s3;
 922
 923                 r_levels += 4;
 924         }
 925
 926         mutex_unlock(&chip->msg_lock);
 927         return err;
 928 }
 929
 930 /* interrupt handling */
 931 #define PCX_IRQ_NONE 0
 932 #define IRQCS_ACTIVE_PCIDB      BIT(13)
 933 #define IRQCS_ENABLE_PCIIRQ     BIT(8)
 934 #define IRQCS_ENABLE_PCIDB      BIT(9)
 935
 936 static u32 lx_interrupt_test_ack(struct lx6464es *chip)
 937 {
 938         u32 irqcs = lx_plx_reg_read(chip, ePLX_IRQCS);
 939
 940         /* Test if PCI Doorbell interrupt is active */
 941         if (irqcs & IRQCS_ACTIVE_PCIDB) {
 942                 u32 temp;
 943                 irqcs = PCX_IRQ_NONE;
 944
 945                 while ((temp = lx_plx_reg_read(chip, ePLX_L2PCIDB))) {
 946                         /* RAZ interrupt */
 947                         irqcs |= temp;
 948                         lx_plx_reg_write(chip, ePLX_L2PCIDB, temp);
 949                 }
 950
 951                 return irqcs;
 952         }
 953         return PCX_IRQ_NONE;
 954 }
 955
 956 static int lx_interrupt_ack(struct lx6464es *chip, u32 *r_irqsrc,
 957                             int *r_async_pending, int *r_async_escmd)
 958 {
 959         u32 irq_async;
 960         u32 irqsrc = lx_interrupt_test_ack(chip);
 961
 962         if (irqsrc == PCX_IRQ_NONE)
 963                 return 0;
 964
 965         *r_irqsrc = irqsrc;
 966
 967         irq_async = irqsrc & MASK_SYS_ASYNC_EVENTS; /* + EtherSound response
 968                                                      * (set by xilinx) + EOB */
 969
 970         if (irq_async & MASK_SYS_STATUS_ESA) {
 971                 irq_async &= ~MASK_SYS_STATUS_ESA;
 972                 *r_async_escmd = 1;
 973         }
 974
 975         if (irq_async) {
 976                 /* dev_dbg(chip->card->dev, "interrupt: async event pending\n"); */
 977                 *r_async_pending = 1;
 978         }
 979
 980         return 1;
 981 }
 982
 983 static int lx_interrupt_handle_async_events(struct lx6464es *chip, u32 irqsrc,
 984                                             int *r_freq_changed,
 985                                             u64 *r_notified_in_pipe_mask,
 986                                             u64 *r_notified_out_pipe_mask)
 987 {
 988         int err;
 989         u32 stat[9];            /* answer from CMD_04_GET_EVENT */
 990
 991         /* We can optimize this to not read dumb events.
 992          * Answer words are in the following order:
 993          * Stat[0]      general status
 994          * Stat[1]      end of buffer OUT pF
 995          * Stat[2]      end of buffer OUT pf
 996          * Stat[3]      end of buffer IN pF
 997          * Stat[4]      end of buffer IN pf
 998          * Stat[5]      MSB underrun
 999          * Stat[6]      LSB underrun
1000          * Stat[7]      MSB overrun
1001          * Stat[8]      LSB overrun
1002          * */
1003
1004         u64 orun_mask;
1005         u64 urun_mask;
1006         int eb_pending_out = (irqsrc & MASK_SYS_STATUS_EOBO) ? 1 : 0;
1007         int eb_pending_in  = (irqsrc & MASK_SYS_STATUS_EOBI) ? 1 : 0;
1008
1009         *r_freq_changed = (irqsrc & MASK_SYS_STATUS_FREQ) ? 1 : 0;
1010
1011         err = lx_dsp_read_async_events(chip, stat);
1012         if (err < 0)
1013                 return err;
1014
1015         if (eb_pending_in) {
1016                 *r_notified_in_pipe_mask = ((u64)stat[3] << 32)
1017                         + stat[4];
1018                 dev_dbg(chip->card->dev, "interrupt: EOBI pending %llx\n",
1019                             *r_notified_in_pipe_mask);
1020         }
1021         if (eb_pending_out) {
1022                 *r_notified_out_pipe_mask = ((u64)stat[1] << 32)
1023                         + stat[2];
1024                 dev_dbg(chip->card->dev, "interrupt: EOBO pending %llx\n",
1025                             *r_notified_out_pipe_mask);
1026         }
1027
1028         orun_mask = ((u64)stat[7] << 32) + stat[8];
1029         urun_mask = ((u64)stat[5] << 32) + stat[6];
1030
1031         /* todo: handle xrun notification */
1032
1033         return err;
1034 }
1035
1036 static int lx_interrupt_request_new_buffer(struct lx6464es *chip,
1037                                            struct lx_stream *lx_stream)
1038 {
1039         struct snd_pcm_substream *substream = lx_stream->stream;
1040         const unsigned int is_capture = lx_stream->is_capture;
1041         int err;
1042
1043         const u32 channels = substream->runtime->channels;
1044         const u32 bytes_per_frame = channels * 3;
1045         const u32 period_size = substream->runtime->period_size;
1046         const u32 period_bytes = period_size * bytes_per_frame;
1047         const u32 pos = lx_stream->frame_pos;
1048         const u32 next_pos = ((pos+1) == substream->runtime->periods) ?
1049                 0 : pos + 1;
1050
1051         dma_addr_t buf = substream->dma_buffer.addr + pos * period_bytes;
1052         u32 buf_hi = 0;
1053         u32 buf_lo = 0;
1054         u32 buffer_index = 0;
1055
1056         u32 needed, freed;
1057         u32 size_array[MAX_STREAM_BUFFER];
1058
1059         dev_dbg(chip->card->dev, "->lx_interrupt_request_new_buffer\n");
1060
1061         mutex_lock(&chip->lock);
1062
1063         err = lx_buffer_ask(chip, 0, is_capture, &needed, &freed, size_array);
1064         dev_dbg(chip->card->dev,
1065                 "interrupt: needed %d, freed %d\n", needed, freed);
1066
1067         unpack_pointer(buf, &buf_lo, &buf_hi);
1068         err = lx_buffer_give(chip, 0, is_capture, period_bytes, buf_lo, buf_hi,
1069                              &buffer_index);
1070         dev_dbg(chip->card->dev,
1071                 "interrupt: gave buffer index %x on 0x%lx (%d bytes)\n",
1072                     buffer_index, (unsigned long)buf, period_bytes);
1073
1074         lx_stream->frame_pos = next_pos;
1075         mutex_unlock(&chip->lock);
1076
1077         return err;
1078 }
1079
1080 irqreturn_t lx_interrupt(int irq, void *dev_id)
1081 {
1082         struct lx6464es *chip = dev_id;
1083         int async_pending, async_escmd;
1084         u32 irqsrc;
1085         bool wake_thread = false;
1086
1087         dev_dbg(chip->card->dev,
1088                 "**************************************************\n");
1089
1090         if (!lx_interrupt_ack(chip, &irqsrc, &async_pending, &async_escmd)) {
1091                 dev_dbg(chip->card->dev, "IRQ_NONE\n");
1092                 return IRQ_NONE; /* this device did not cause the interrupt */
1093         }
1094
1095         if (irqsrc & MASK_SYS_STATUS_CMD_DONE)
1096                 return IRQ_HANDLED;
1097
1098         if (irqsrc & MASK_SYS_STATUS_EOBI)
1099                 dev_dbg(chip->card->dev, "interrupt: EOBI\n");
1100
1101         if (irqsrc & MASK_SYS_STATUS_EOBO)
1102                 dev_dbg(chip->card->dev, "interrupt: EOBO\n");
1103
1104         if (irqsrc & MASK_SYS_STATUS_URUN)
1105                 dev_dbg(chip->card->dev, "interrupt: URUN\n");
1106
1107         if (irqsrc & MASK_SYS_STATUS_ORUN)
1108                 dev_dbg(chip->card->dev, "interrupt: ORUN\n");
1109
1110         if (async_pending) {
1111                 wake_thread = true;
1112                 chip->irqsrc = irqsrc;
1113         }
1114
1115         if (async_escmd) {
1116                 /* backdoor for ethersound commands
1117                  *
1118                  * for now, we do not need this
1119                  *
1120                  * */
1121
1122                 dev_dbg(chip->card->dev, "interrupt requests escmd handling\n");
1123         }
1124
1125         return wake_thread ? IRQ_WAKE_THREAD : IRQ_HANDLED;
1126 }
1127
1128 irqreturn_t lx_threaded_irq(int irq, void *dev_id)
1129 {
1130         struct lx6464es *chip = dev_id;
1131         u64 notified_in_pipe_mask = 0;
1132         u64 notified_out_pipe_mask = 0;
1133         int freq_changed;
1134         int err;
1135
1136         /* handle async events */
1137         err = lx_interrupt_handle_async_events(chip, chip->irqsrc,
1138                                                &freq_changed,
1139                                                &notified_in_pipe_mask,
1140                                                &notified_out_pipe_mask);
1141         if (err)
1142                 dev_err(chip->card->dev, "error handling async events\n");
1143
1144         if (notified_in_pipe_mask) {
1145                 struct lx_stream *lx_stream = &chip->capture_stream;
1146
1147                 dev_dbg(chip->card->dev,
1148                         "requesting audio transfer for capture\n");
1149                 err = lx_interrupt_request_new_buffer(chip, lx_stream);
1150                 if (err < 0)
1151                         dev_err(chip->card->dev,
1152                                 "cannot request new buffer for capture\n");
1153                 snd_pcm_period_elapsed(lx_stream->stream);
1154         }
1155
1156         if (notified_out_pipe_mask) {
1157                 struct lx_stream *lx_stream = &chip->playback_stream;
1158
1159                 dev_dbg(chip->card->dev,
1160                         "requesting audio transfer for playback\n");
1161                 err = lx_interrupt_request_new_buffer(chip, lx_stream);
1162                 if (err < 0)
1163                         dev_err(chip->card->dev,
1164                                 "cannot request new buffer for playback\n");
1165                 snd_pcm_period_elapsed(lx_stream->stream);
1166         }
1167
1168         return IRQ_HANDLED;
1169 }
1170
1171
1172 static void lx_irq_set(struct lx6464es *chip, int enable)
1173 {
1174         u32 reg = lx_plx_reg_read(chip, ePLX_IRQCS);
1175
1176         /* enable/disable interrupts
1177          *
1178          * Set the Doorbell and PCI interrupt enable bits
1179          *
1180          * */
1181         if (enable)
1182                 reg |=  (IRQCS_ENABLE_PCIIRQ | IRQCS_ENABLE_PCIDB);
1183         else
1184                 reg &= ~(IRQCS_ENABLE_PCIIRQ | IRQCS_ENABLE_PCIDB);
1185         lx_plx_reg_write(chip, ePLX_IRQCS, reg);
1186 }
1187
1188 void lx_irq_enable(struct lx6464es *chip)
1189 {
1190         dev_dbg(chip->card->dev, "->lx_irq_enable\n");
1191         lx_irq_set(chip, 1);
1192 }
1193
1194 void lx_irq_disable(struct lx6464es *chip)
1195 {
1196         dev_dbg(chip->card->dev, "->lx_irq_disable\n");
1197         lx_irq_set(chip, 0);
1198 }