sys/dev/sound/pci/emu10k1.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
   3  *
   4  * Copyright (c) 2004 David O'Brien <obrien@FreeBSD.org>
   5  * Copyright (c) 2003 Orlando Bassotto <orlando.bassotto@ieo-research.it>
   6  * Copyright (c) 1999 Cameron Grant <cg@freebsd.org>
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  19  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  21  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  22  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  23  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  24  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  25  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHERIN CONTRACT, STRICT
  26  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  28  * SUCH DAMAGE.
  29  */
  30
  31 #ifdef HAVE_KERNEL_OPTION_HEADERS
  32 #include "opt_snd.h"
  33 #endif
  34
  35 #include <dev/sound/pcm/sound.h>
  36 #include <dev/sound/pcm/ac97.h>
  37 #include <dev/sound/pci/emuxkireg.h>
  38
  39 #include <dev/pci/pcireg.h>
  40 #include <dev/pci/pcivar.h>
  41 #include <sys/queue.h>
  42
  43 #include <dev/sound/midi/mpu401.h>
  44 #include "mpufoi_if.h"
  45
  46 SND_DECLARE_FILE("$FreeBSD$");
  47
  48 /* -------------------------------------------------------------------- */
  49
  50 #define NUM_G           64      /* use all channels */
  51 #define WAVEOUT_MAXBUFSIZE 32768
  52 #define EMUPAGESIZE     4096    /* don't change */
  53 #define EMUMAXPAGES     (WAVEOUT_MAXBUFSIZE * NUM_G / EMUPAGESIZE)
  54 #define EMU10K1_PCI_ID  0x00021102      /* 1102 => Creative Labs Vendor ID */
  55 #define EMU10K2_PCI_ID  0x00041102
  56 #define EMU10K3_PCI_ID  0x00081102
  57 #define EMU_DEFAULT_BUFSZ       4096
  58 #define EMU_MAX_CHANS   8
  59 #define EMU_CHANS       4
  60
  61 #define MAXREQVOICES    8
  62 #define RESERVED        0
  63 #define NUM_MIDI        16
  64 #define NUM_FXSENDS     4
  65
  66 #define TMEMSIZE        256*1024
  67 #define TMEMSIZEREG     4
  68
  69 #define ENABLE          0xffffffff
  70 #define DISABLE         0x00000000
  71 #define ENV_ON          EMU_CHAN_DCYSUSV_CHANNELENABLE_MASK
  72 #define ENV_OFF         0x00    /* XXX: should this be 1? */
  73
  74 #define EMU_A_IOCFG_GPOUT_A     0x40
  75 #define EMU_A_IOCFG_GPOUT_D     0x04
  76 #define EMU_A_IOCFG_GPOUT_AD (EMU_A_IOCFG_GPOUT_A|EMU_A_IOCFG_GPOUT_D)  /* EMU_A_IOCFG_GPOUT0 */
  77
  78 #define EMU_HCFG_GPOUT1         0x00000800
  79
  80 /* instruction set */
  81 #define iACC3    0x06
  82 #define iMACINT0 0x04
  83 #define iINTERP  0x0e
  84
  85 #define C_00000000      0x40
  86 #define C_00000001      0x41
  87 #define C_00000004      0x44
  88 #define C_40000000      0x4d
  89 /* Audigy constants */
  90 #define A_C_00000000    0xc0
  91 #define A_C_40000000    0xcd
  92
  93 /* GPRs */
  94 #define FXBUS(x)        (0x00 + (x))
  95 #define EXTIN(x)        (0x10 + (x))
  96 #define EXTOUT(x)       (0x20 + (x))
  97
  98 #define GPR(x)          (EMU_FXGPREGBASE + (x))
  99 #define A_EXTIN(x)      (0x40 + (x))
 100 #define A_FXBUS(x)      (0x00 + (x))
 101 #define A_EXTOUT(x)     (0x60 + (x))
 102 #define A_GPR(x)        (EMU_A_FXGPREGBASE + (x))
 103
 104 /* FX buses */
 105 #define FXBUS_PCM_LEFT          0x00
 106 #define FXBUS_PCM_RIGHT         0x01
 107 #define FXBUS_MIDI_LEFT         0x04
 108 #define FXBUS_MIDI_RIGHT        0x05
 109 #define FXBUS_MIDI_REVERB       0x0c
 110 #define FXBUS_MIDI_CHORUS       0x0d
 111
 112 /* Inputs */
 113 #define EXTIN_AC97_L            0x00
 114 #define EXTIN_AC97_R            0x01
 115 #define EXTIN_SPDIF_CD_L        0x02
 116 #define EXTIN_SPDIF_CD_R        0x03
 117 #define EXTIN_TOSLINK_L         0x06
 118 #define EXTIN_TOSLINK_R         0x07
 119 #define EXTIN_COAX_SPDIF_L      0x0a
 120 #define EXTIN_COAX_SPDIF_R      0x0b
 121 /* Audigy Inputs */
 122 #define A_EXTIN_AC97_L          0x00
 123 #define A_EXTIN_AC97_R          0x01
 124
 125 /* Outputs */
 126 #define EXTOUT_AC97_L      0x00
 127 #define EXTOUT_AC97_R      0x01
 128 #define EXTOUT_TOSLINK_L   0x02
 129 #define EXTOUT_TOSLINK_R   0x03
 130 #define EXTOUT_AC97_CENTER 0x04
 131 #define EXTOUT_AC97_LFE    0x05
 132 #define EXTOUT_HEADPHONE_L 0x06
 133 #define EXTOUT_HEADPHONE_R 0x07
 134 #define EXTOUT_REAR_L      0x08
 135 #define EXTOUT_REAR_R      0x09
 136 #define EXTOUT_ADC_CAP_L   0x0a
 137 #define EXTOUT_ADC_CAP_R   0x0b
 138 #define EXTOUT_ACENTER     0x11
 139 #define EXTOUT_ALFE        0x12
 140 /* Audigy Outputs */
 141 #define A_EXTOUT_FRONT_L        0x00
 142 #define A_EXTOUT_FRONT_R        0x01
 143 #define A_EXTOUT_CENTER         0x02
 144 #define A_EXTOUT_LFE            0x03
 145 #define A_EXTOUT_HEADPHONE_L    0x04
 146 #define A_EXTOUT_HEADPHONE_R    0x05
 147 #define A_EXTOUT_REAR_L         0x06
 148 #define A_EXTOUT_REAR_R         0x07
 149 #define A_EXTOUT_AFRONT_L       0x08
 150 #define A_EXTOUT_AFRONT_R       0x09
 151 #define A_EXTOUT_ACENTER        0x0a
 152 #define A_EXTOUT_ALFE           0x0b
 153 #define A_EXTOUT_AREAR_L        0x0e
 154 #define A_EXTOUT_AREAR_R        0x0f
 155 #define A_EXTOUT_AC97_L         0x10
 156 #define A_EXTOUT_AC97_R         0x11
 157 #define A_EXTOUT_ADC_CAP_L      0x16
 158 #define A_EXTOUT_ADC_CAP_R      0x17
 159
 160 struct emu_memblk {
 161         SLIST_ENTRY(emu_memblk) link;
 162         void *buf;
 163         bus_addr_t buf_addr;
 164         u_int32_t pte_start, pte_size;
 165         bus_dmamap_t buf_map;
 166 };
 167
 168 struct emu_mem {
 169         u_int8_t bmap[EMUMAXPAGES / 8];
 170         u_int32_t *ptb_pages;
 171         void *silent_page;
 172         bus_addr_t silent_page_addr;
 173         bus_addr_t ptb_pages_addr;
 174         bus_dmamap_t ptb_map;
 175         bus_dmamap_t silent_map;
 176         SLIST_HEAD(, emu_memblk) blocks;
 177 };
 178
 179 struct emu_voice {
 180         int vnum;
 181         unsigned int b16:1, stereo:1, busy:1, running:1, ismaster:1;
 182         int speed;
 183         int start, end, vol;
 184         int fxrt1;      /* FX routing */
 185         int fxrt2;      /* FX routing (only for audigy) */
 186         u_int32_t buf;
 187         struct emu_voice *slave;
 188         struct pcm_channel *channel;
 189 };
 190
 191 struct sc_info;
 192
 193 /* channel registers */
 194 struct sc_pchinfo {
 195         int spd, fmt, blksz, run;
 196         struct emu_voice *master, *slave;
 197         struct snd_dbuf *buffer;
 198         struct pcm_channel *channel;
 199         struct sc_info *parent;
 200 };
 201
 202 struct sc_rchinfo {
 203         int spd, fmt, run, blksz, num;
 204         u_int32_t idxreg, basereg, sizereg, setupreg, irqmask;
 205         struct snd_dbuf *buffer;
 206         struct pcm_channel *channel;
 207         struct sc_info *parent;
 208 };
 209
 210 /* device private data */
 211 struct sc_info {
 212         device_t        dev;
 213         u_int32_t       type, rev;
 214         u_int32_t       tos_link:1, APS:1, audigy:1, audigy2:1;
 215         u_int32_t       addrmask;       /* wider if audigy */
 216
 217         bus_space_tag_t st;
 218         bus_space_handle_t sh;
 219         bus_dma_tag_t parent_dmat;
 220
 221         struct resource *reg, *irq;
 222         void            *ih;
 223         struct mtx      *lock;
 224
 225         unsigned int bufsz;
 226         int timer, timerinterval;
 227         int pnum, rnum;
 228         int nchans;
 229         struct emu_mem mem;
 230         struct emu_voice voice[64];
 231         struct sc_pchinfo pch[EMU_MAX_CHANS];
 232         struct sc_rchinfo rch[3];
 233         struct mpu401   *mpu;
 234         mpu401_intr_t           *mpu_intr;
 235         int mputx;
 236 };
 237
 238 /* -------------------------------------------------------------------- */
 239
 240 /*
 241  * prototypes
 242  */
 243
 244 /* stuff */
 245 static int emu_init(struct sc_info *);
 246 static void emu_intr(void *);
 247 static void *emu_malloc(struct sc_info *sc, u_int32_t sz, bus_addr_t *addr, bus_dmamap_t *map);
 248 static void *emu_memalloc(struct sc_info *sc, u_int32_t sz, bus_addr_t *addr);
 249 static int emu_memfree(struct sc_info *sc, void *buf);
 250 static int emu_memstart(struct sc_info *sc, void *buf);
 251 #ifdef EMUDEBUG
 252 static void emu_vdump(struct sc_info *sc, struct emu_voice *v);
 253 #endif
 254
 255 /* talk to the card */
 256 static u_int32_t emu_rd(struct sc_info *, int, int);
 257 static void emu_wr(struct sc_info *, int, u_int32_t, int);
 258
 259 /* -------------------------------------------------------------------- */
 260
 261 static u_int32_t emu_rfmt_ac97[] = {
 262         SND_FORMAT(AFMT_S16_LE, 1, 0),
 263         SND_FORMAT(AFMT_S16_LE, 2, 0),
 264         0
 265 };
 266
 267 static u_int32_t emu_rfmt_mic[] = {
 268         SND_FORMAT(AFMT_U8, 1, 0),
 269         0
 270 };
 271
 272 static u_int32_t emu_rfmt_efx[] = {
 273         SND_FORMAT(AFMT_S16_LE, 2, 0),
 274         0
 275 };
 276
 277 static struct pcmchan_caps emu_reccaps[3] = {
 278         {8000, 48000, emu_rfmt_ac97, 0},
 279         {8000, 8000, emu_rfmt_mic, 0},
 280         {48000, 48000, emu_rfmt_efx, 0},
 281 };
 282
 283 static u_int32_t emu_pfmt[] = {
 284         SND_FORMAT(AFMT_U8, 1, 0),
 285         SND_FORMAT(AFMT_U8, 2, 0),
 286         SND_FORMAT(AFMT_S16_LE, 1, 0),
 287         SND_FORMAT(AFMT_S16_LE, 2, 0),
 288         0
 289 };
 290
 291 static struct pcmchan_caps emu_playcaps = {4000, 48000, emu_pfmt, 0};
 292
 293 static int adcspeed[8] = {48000, 44100, 32000, 24000, 22050, 16000, 11025, 8000};
 294 /* audigy supports 12kHz. */
 295 static int audigy_adcspeed[9] = {
 296         48000, 44100, 32000, 24000, 22050, 16000, 12000, 11025, 8000
 297 };
 298
 299 /* -------------------------------------------------------------------- */
 300 /* Hardware */
 301 static u_int32_t
 302 emu_rd(struct sc_info *sc, int regno, int size)
 303 {
 304         switch (size) {
 305         case 1:
 306                 return bus_space_read_1(sc->st, sc->sh, regno);
 307         case 2:
 308                 return bus_space_read_2(sc->st, sc->sh, regno);
 309         case 4:
 310                 return bus_space_read_4(sc->st, sc->sh, regno);
 311         default:
 312                 return 0xffffffff;
 313         }
 314 }
 315
 316 static void
 317 emu_wr(struct sc_info *sc, int regno, u_int32_t data, int size)
 318 {
 319         switch (size) {
 320         case 1:
 321                 bus_space_write_1(sc->st, sc->sh, regno, data);
 322                 break;
 323         case 2:
 324                 bus_space_write_2(sc->st, sc->sh, regno, data);
 325                 break;
 326         case 4:
 327                 bus_space_write_4(sc->st, sc->sh, regno, data);
 328                 break;
 329         }
 330 }
 331
 332 static u_int32_t
 333 emu_rdptr(struct sc_info *sc, int chn, int reg)
 334 {
 335         u_int32_t ptr, val, mask, size, offset;
 336
 337         ptr = ((reg << 16) & sc->addrmask) | (chn & EMU_PTR_CHNO_MASK);
 338         emu_wr(sc, EMU_PTR, ptr, 4);
 339         val = emu_rd(sc, EMU_DATA, 4);
 340         if (reg & 0xff000000) {
 341                 size = (reg >> 24) & 0x3f;
 342                 offset = (reg >> 16) & 0x1f;
 343                 mask = ((1 << size) - 1) << offset;
 344                 val &= mask;
 345                 val >>= offset;
 346         }
 347         return val;
 348 }
 349
 350 static void
 351 emu_wrptr(struct sc_info *sc, int chn, int reg, u_int32_t data)
 352 {
 353         u_int32_t ptr, mask, size, offset;
 354
 355         ptr = ((reg << 16) & sc->addrmask) | (chn & EMU_PTR_CHNO_MASK);
 356         emu_wr(sc, EMU_PTR, ptr, 4);
 357         if (reg & 0xff000000) {
 358                 size = (reg >> 24) & 0x3f;
 359                 offset = (reg >> 16) & 0x1f;
 360                 mask = ((1 << size) - 1) << offset;
 361                 data <<= offset;
 362                 data &= mask;
 363                 data |= emu_rd(sc, EMU_DATA, 4) & ~mask;
 364         }
 365         emu_wr(sc, EMU_DATA, data, 4);
 366 }
 367
 368 static void
 369 emu_wrefx(struct sc_info *sc, unsigned int pc, unsigned int data)
 370 {
 371         pc += sc->audigy ? EMU_A_MICROCODEBASE : EMU_MICROCODEBASE;
 372         emu_wrptr(sc, 0, pc, data);
 373 }
 374
 375 /* -------------------------------------------------------------------- */
 376 /* ac97 codec */
 377 /* no locking needed */
 378
 379 static int
 380 emu_rdcd(kobj_t obj, void *devinfo, int regno)
 381 {
 382         struct sc_info *sc = (struct sc_info *)devinfo;
 383
 384         emu_wr(sc, EMU_AC97ADDR, regno, 1);
 385         return emu_rd(sc, EMU_AC97DATA, 2);
 386 }
 387
 388 static int
 389 emu_wrcd(kobj_t obj, void *devinfo, int regno, u_int32_t data)
 390 {
 391         struct sc_info *sc = (struct sc_info *)devinfo;
 392
 393         emu_wr(sc, EMU_AC97ADDR, regno, 1);
 394         emu_wr(sc, EMU_AC97DATA, data, 2);
 395         return 0;
 396 }
 397
 398 static kobj_method_t emu_ac97_methods[] = {
 399         KOBJMETHOD(ac97_read,           emu_rdcd),
 400         KOBJMETHOD(ac97_write,          emu_wrcd),
 401         KOBJMETHOD_END
 402 };
 403 AC97_DECLARE(emu_ac97);
 404
 405 /* -------------------------------------------------------------------- */
 406 /* stuff */
 407 static int
 408 emu_settimer(struct sc_info *sc)
 409 {
 410         struct sc_pchinfo *pch;
 411         struct sc_rchinfo *rch;
 412         int i, tmp, rate;
 413
 414         rate = 0;
 415         for (i = 0; i < sc->nchans; i++) {
 416                 pch = &sc->pch[i];
 417                 if (pch->buffer) {
 418                         tmp = (pch->spd * sndbuf_getalign(pch->buffer))
 419                             / pch->blksz;
 420                         if (tmp > rate)
 421                                 rate = tmp;
 422                 }
 423         }
 424
 425         for (i = 0; i < 3; i++) {
 426                 rch = &sc->rch[i];
 427                 if (rch->buffer) {
 428                         tmp = (rch->spd * sndbuf_getalign(rch->buffer))
 429                             / rch->blksz;
 430                         if (tmp > rate)
 431                                 rate = tmp;
 432                 }
 433         }
 434         RANGE(rate, 48, 9600);
 435         sc->timerinterval = 48000 / rate;
 436         emu_wr(sc, EMU_TIMER, sc->timerinterval & 0x03ff, 2);
 437
 438         return sc->timerinterval;
 439 }
 440
 441 static int
 442 emu_enatimer(struct sc_info *sc, int go)
 443 {
 444         u_int32_t x;
 445         if (go) {
 446                 if (sc->timer++ == 0) {
 447                         x = emu_rd(sc, EMU_INTE, 4);
 448                         x |= EMU_INTE_INTERTIMERENB;
 449                         emu_wr(sc, EMU_INTE, x, 4);
 450                 }
 451         } else {
 452                 sc->timer = 0;
 453                 x = emu_rd(sc, EMU_INTE, 4);
 454                 x &= ~EMU_INTE_INTERTIMERENB;
 455                 emu_wr(sc, EMU_INTE, x, 4);
 456         }
 457         return 0;
 458 }
 459
 460 static void
 461 emu_enastop(struct sc_info *sc, char channel, int enable)
 462 {
 463         int reg = (channel & 0x20) ? EMU_SOLEH : EMU_SOLEL;
 464         channel &= 0x1f;
 465         reg |= 1 << 24;
 466         reg |= channel << 16;
 467         emu_wrptr(sc, 0, reg, enable);
 468 }
 469
 470 static int
 471 emu_recval(int speed) {
 472         int val;
 473
 474         val = 0;
 475         while (val < 7 && speed < adcspeed[val])
 476                 val++;
 477         return val;
 478 }
 479
 480 static int
 481 audigy_recval(int speed) {
 482         int val;
 483
 484         val = 0;
 485         while (val < 8 && speed < audigy_adcspeed[val])
 486                 val++;
 487         return val;
 488 }
 489
 490 static u_int32_t
 491 emu_rate_to_pitch(u_int32_t rate)
 492 {
 493         static u_int32_t logMagTable[128] = {
 494                 0x00000, 0x02dfc, 0x05b9e, 0x088e6, 0x0b5d6, 0x0e26f, 0x10eb3, 0x13aa2,
 495                 0x1663f, 0x1918a, 0x1bc84, 0x1e72e, 0x2118b, 0x23b9a, 0x2655d, 0x28ed5,
 496                 0x2b803, 0x2e0e8, 0x30985, 0x331db, 0x359eb, 0x381b6, 0x3a93d, 0x3d081,
 497                 0x3f782, 0x41e42, 0x444c1, 0x46b01, 0x49101, 0x4b6c4, 0x4dc49, 0x50191,
 498                 0x5269e, 0x54b6f, 0x57006, 0x59463, 0x5b888, 0x5dc74, 0x60029, 0x623a7,
 499                 0x646ee, 0x66a00, 0x68cdd, 0x6af86, 0x6d1fa, 0x6f43c, 0x7164b, 0x73829,
 500                 0x759d4, 0x77b4f, 0x79c9a, 0x7bdb5, 0x7dea1, 0x7ff5e, 0x81fed, 0x8404e,
 501                 0x86082, 0x88089, 0x8a064, 0x8c014, 0x8df98, 0x8fef1, 0x91e20, 0x93d26,
 502                 0x95c01, 0x97ab4, 0x9993e, 0x9b79f, 0x9d5d9, 0x9f3ec, 0xa11d8, 0xa2f9d,
 503                 0xa4d3c, 0xa6ab5, 0xa8808, 0xaa537, 0xac241, 0xadf26, 0xafbe7, 0xb1885,
 504                 0xb3500, 0xb5157, 0xb6d8c, 0xb899f, 0xba58f, 0xbc15e, 0xbdd0c, 0xbf899,
 505                 0xc1404, 0xc2f50, 0xc4a7b, 0xc6587, 0xc8073, 0xc9b3f, 0xcb5ed, 0xcd07c,
 506                 0xceaec, 0xd053f, 0xd1f73, 0xd398a, 0xd5384, 0xd6d60, 0xd8720, 0xda0c3,
 507                 0xdba4a, 0xdd3b4, 0xded03, 0xe0636, 0xe1f4e, 0xe384a, 0xe512c, 0xe69f3,
 508                 0xe829f, 0xe9b31, 0xeb3a9, 0xecc08, 0xee44c, 0xefc78, 0xf148a, 0xf2c83,
 509                 0xf4463, 0xf5c2a, 0xf73da, 0xf8b71, 0xfa2f0, 0xfba57, 0xfd1a7, 0xfe8df
 510         };
 511         static char logSlopeTable[128] = {
 512                 0x5c, 0x5c, 0x5b, 0x5a, 0x5a, 0x59, 0x58, 0x58,
 513                 0x57, 0x56, 0x56, 0x55, 0x55, 0x54, 0x53, 0x53,
 514                 0x52, 0x52, 0x51, 0x51, 0x50, 0x50, 0x4f, 0x4f,
 515                 0x4e, 0x4d, 0x4d, 0x4d, 0x4c, 0x4c, 0x4b, 0x4b,
 516                 0x4a, 0x4a, 0x49, 0x49, 0x48, 0x48, 0x47, 0x47,
 517                 0x47, 0x46, 0x46, 0x45, 0x45, 0x45, 0x44, 0x44,
 518                 0x43, 0x43, 0x43, 0x42, 0x42, 0x42, 0x41, 0x41,
 519                 0x41, 0x40, 0x40, 0x40, 0x3f, 0x3f, 0x3f, 0x3e,
 520                 0x3e, 0x3e, 0x3d, 0x3d, 0x3d, 0x3c, 0x3c, 0x3c,
 521                 0x3b, 0x3b, 0x3b, 0x3b, 0x3a, 0x3a, 0x3a, 0x39,
 522                 0x39, 0x39, 0x39, 0x38, 0x38, 0x38, 0x38, 0x37,
 523                 0x37, 0x37, 0x37, 0x36, 0x36, 0x36, 0x36, 0x35,
 524                 0x35, 0x35, 0x35, 0x34, 0x34, 0x34, 0x34, 0x34,
 525                 0x33, 0x33, 0x33, 0x33, 0x32, 0x32, 0x32, 0x32,
 526                 0x32, 0x31, 0x31, 0x31, 0x31, 0x31, 0x30, 0x30,
 527                 0x30, 0x30, 0x30, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f
 528         };
 529         int i;
 530
 531         if (rate == 0)
 532                 return 0;       /* Bail out if no leading "1" */
 533         rate *= 11185;  /* Scale 48000 to 0x20002380 */
 534         for (i = 31; i > 0; i--) {
 535                 if (rate & 0x80000000) {        /* Detect leading "1" */
 536                         return (((u_int32_t) (i - 15) << 20) +
 537                             logMagTable[0x7f & (rate >> 24)] +
 538                             (0x7f & (rate >> 17)) *
 539                             logSlopeTable[0x7f & (rate >> 24)]);
 540                 }
 541                 rate <<= 1;
 542         }
 543
 544         return 0;               /* Should never reach this point */
 545 }
 546
 547 static u_int32_t
 548 emu_rate_to_linearpitch(u_int32_t rate)
 549 {
 550         rate = (rate << 8) / 375;
 551         return (rate >> 1) + (rate & 1);
 552 }
 553
 554 static struct emu_voice *
 555 emu_valloc(struct sc_info *sc)
 556 {
 557         struct emu_voice *v;
 558         int i;
 559
 560         v = NULL;
 561         for (i = 0; i < 64 && sc->voice[i].busy; i++);
 562         if (i < 64) {
 563                 v = &sc->voice[i];
 564                 v->busy = 1;
 565         }
 566         return v;
 567 }
 568
 569 static int
 570 emu_vinit(struct sc_info *sc, struct emu_voice *m, struct emu_voice *s,
 571           u_int32_t sz, struct snd_dbuf *b)
 572 {
 573         void *buf;
 574         bus_addr_t tmp_addr;
 575
 576         buf = emu_memalloc(sc, sz, &tmp_addr);
 577         if (buf == NULL)
 578                 return -1;
 579         if (b != NULL)
 580                 sndbuf_setup(b, buf, sz);
 581         m->start = emu_memstart(sc, buf) * EMUPAGESIZE;
 582         m->end = m->start + sz;
 583         m->channel = NULL;
 584         m->speed = 0;
 585         m->b16 = 0;
 586         m->stereo = 0;
 587         m->running = 0;
 588         m->ismaster = 1;
 589         m->vol = 0xff;
 590         m->buf = tmp_addr;
 591         m->slave = s;
 592         if (sc->audigy) {
 593                 m->fxrt1 = FXBUS_MIDI_CHORUS | FXBUS_PCM_RIGHT << 8 |
 594                     FXBUS_PCM_LEFT << 16 | FXBUS_MIDI_REVERB << 24;
 595                 m->fxrt2 = 0x3f3f3f3f;  /* No effects on second route */
 596         } else {
 597                 m->fxrt1 = FXBUS_MIDI_CHORUS | FXBUS_PCM_RIGHT << 4 |
 598                     FXBUS_PCM_LEFT << 8 | FXBUS_MIDI_REVERB << 12;
 599                 m->fxrt2 = 0;
 600         }
 601
 602         if (s != NULL) {
 603                 s->start = m->start;
 604                 s->end = m->end;
 605                 s->channel = NULL;
 606                 s->speed = 0;
 607                 s->b16 = 0;
 608                 s->stereo = 0;
 609                 s->running = 0;
 610                 s->ismaster = 0;
 611                 s->vol = m->vol;
 612                 s->buf = m->buf;
 613                 s->fxrt1 = m->fxrt1;
 614                 s->fxrt2 = m->fxrt2;
 615                 s->slave = NULL;
 616         }
 617         return 0;
 618 }
 619
 620 static void
 621 emu_vsetup(struct sc_pchinfo *ch)
 622 {
 623         struct emu_voice *v = ch->master;
 624
 625         if (ch->fmt) {
 626                 v->b16 = (ch->fmt & AFMT_16BIT) ? 1 : 0;
 627                 v->stereo = (AFMT_CHANNEL(ch->fmt) > 1) ? 1 : 0;
 628                 if (v->slave != NULL) {
 629                         v->slave->b16 = v->b16;
 630                         v->slave->stereo = v->stereo;
 631                 }
 632         }
 633         if (ch->spd) {
 634                 v->speed = ch->spd;
 635                 if (v->slave != NULL)
 636                         v->slave->speed = v->speed;
 637         }
 638 }
 639
 640 static void
 641 emu_vwrite(struct sc_info *sc, struct emu_voice *v)
 642 {
 643         int s;
 644         int l, r, x, y;
 645         u_int32_t sa, ea, start, val, silent_page;
 646
 647         s = (v->stereo ? 1 : 0) + (v->b16 ? 1 : 0);
 648
 649         sa = v->start >> s;
 650         ea = v->end >> s;
 651
 652         l = r = x = y = v->vol;
 653         if (v->stereo) {
 654                 l = v->ismaster ? l : 0;
 655                 r = v->ismaster ? 0 : r;
 656         }
 657
 658         emu_wrptr(sc, v->vnum, EMU_CHAN_CPF, v->stereo ? EMU_CHAN_CPF_STEREO_MASK : 0);
 659         val = v->stereo ? 28 : 30;
 660         val *= v->b16 ? 1 : 2;
 661         start = sa + val;
 662
 663         if (sc->audigy) {
 664                 emu_wrptr(sc, v->vnum, EMU_A_CHAN_FXRT1, v->fxrt1);
 665                 emu_wrptr(sc, v->vnum, EMU_A_CHAN_FXRT2, v->fxrt2);
 666                 emu_wrptr(sc, v->vnum, EMU_A_CHAN_SENDAMOUNTS, 0);
 667         }
 668         else
 669                 emu_wrptr(sc, v->vnum, EMU_CHAN_FXRT, v->fxrt1 << 16);
 670
 671         emu_wrptr(sc, v->vnum, EMU_CHAN_PTRX, (x << 8) | r);
 672         emu_wrptr(sc, v->vnum, EMU_CHAN_DSL, ea | (y << 24));
 673         emu_wrptr(sc, v->vnum, EMU_CHAN_PSST, sa | (l << 24));
 674         emu_wrptr(sc, v->vnum, EMU_CHAN_CCCA, start | (v->b16 ? 0 : EMU_CHAN_CCCA_8BITSELECT));
 675
 676         emu_wrptr(sc, v->vnum, EMU_CHAN_Z1, 0);
 677         emu_wrptr(sc, v->vnum, EMU_CHAN_Z2, 0);
 678
 679         silent_page = ((u_int32_t)(sc->mem.silent_page_addr) << 1)
 680             | EMU_CHAN_MAP_PTI_MASK;
 681         emu_wrptr(sc, v->vnum, EMU_CHAN_MAPA, silent_page);
 682         emu_wrptr(sc, v->vnum, EMU_CHAN_MAPB, silent_page);
 683
 684         emu_wrptr(sc, v->vnum, EMU_CHAN_CVCF, EMU_CHAN_CVCF_CURRFILTER_MASK);
 685         emu_wrptr(sc, v->vnum, EMU_CHAN_VTFT, EMU_CHAN_VTFT_FILTERTARGET_MASK);
 686         emu_wrptr(sc, v->vnum, EMU_CHAN_ATKHLDM, 0);
 687         emu_wrptr(sc, v->vnum, EMU_CHAN_DCYSUSM, EMU_CHAN_DCYSUSM_DECAYTIME_MASK);
 688         emu_wrptr(sc, v->vnum, EMU_CHAN_LFOVAL1, 0x8000);
 689         emu_wrptr(sc, v->vnum, EMU_CHAN_LFOVAL2, 0x8000);
 690         emu_wrptr(sc, v->vnum, EMU_CHAN_FMMOD, 0);
 691         emu_wrptr(sc, v->vnum, EMU_CHAN_TREMFRQ, 0);
 692         emu_wrptr(sc, v->vnum, EMU_CHAN_FM2FRQ2, 0);
 693         emu_wrptr(sc, v->vnum, EMU_CHAN_ENVVAL, 0x8000);
 694
 695         emu_wrptr(sc, v->vnum, EMU_CHAN_ATKHLDV,
 696             EMU_CHAN_ATKHLDV_HOLDTIME_MASK | EMU_CHAN_ATKHLDV_ATTACKTIME_MASK);
 697         emu_wrptr(sc, v->vnum, EMU_CHAN_ENVVOL, 0x8000);
 698
 699         emu_wrptr(sc, v->vnum, EMU_CHAN_PEFE_FILTERAMOUNT, 0x7f);
 700         emu_wrptr(sc, v->vnum, EMU_CHAN_PEFE_PITCHAMOUNT, 0);
 701
 702         if (v->slave != NULL)
 703                 emu_vwrite(sc, v->slave);
 704 }
 705
 706 static void
 707 emu_vtrigger(struct sc_info *sc, struct emu_voice *v, int go)
 708 {
 709         u_int32_t pitch_target, initial_pitch;
 710         u_int32_t cra, cs, ccis;
 711         u_int32_t sample, i;
 712
 713         if (go) {
 714                 cra = 64;
 715                 cs = v->stereo ? 4 : 2;
 716                 ccis = v->stereo ? 28 : 30;
 717                 ccis *= v->b16 ? 1 : 2;
 718                 sample = v->b16 ? 0x00000000 : 0x80808080;
 719
 720                 for (i = 0; i < cs; i++)
 721                         emu_wrptr(sc, v->vnum, EMU_CHAN_CD0 + i, sample);
 722                 emu_wrptr(sc, v->vnum, EMU_CHAN_CCR_CACHEINVALIDSIZE, 0);
 723                 emu_wrptr(sc, v->vnum, EMU_CHAN_CCR_READADDRESS, cra);
 724                 emu_wrptr(sc, v->vnum, EMU_CHAN_CCR_CACHEINVALIDSIZE, ccis);
 725
 726                 emu_wrptr(sc, v->vnum, EMU_CHAN_IFATN, 0xff00);
 727                 emu_wrptr(sc, v->vnum, EMU_CHAN_VTFT, 0xffffffff);
 728                 emu_wrptr(sc, v->vnum, EMU_CHAN_CVCF, 0xffffffff);
 729                 emu_wrptr(sc, v->vnum, EMU_CHAN_DCYSUSV, 0x00007f7f);
 730                 emu_enastop(sc, v->vnum, 0);
 731
 732                 pitch_target = emu_rate_to_linearpitch(v->speed);
 733                 initial_pitch = emu_rate_to_pitch(v->speed) >> 8;
 734                 emu_wrptr(sc, v->vnum, EMU_CHAN_PTRX_PITCHTARGET, pitch_target);
 735                 emu_wrptr(sc, v->vnum, EMU_CHAN_CPF_PITCH, pitch_target);
 736                 emu_wrptr(sc, v->vnum, EMU_CHAN_IP, initial_pitch);
 737         } else {
 738                 emu_wrptr(sc, v->vnum, EMU_CHAN_PTRX_PITCHTARGET, 0);
 739                 emu_wrptr(sc, v->vnum, EMU_CHAN_CPF_PITCH, 0);
 740                 emu_wrptr(sc, v->vnum, EMU_CHAN_IFATN, 0xffff);
 741                 emu_wrptr(sc, v->vnum, EMU_CHAN_VTFT, 0x0000ffff);
 742                 emu_wrptr(sc, v->vnum, EMU_CHAN_CVCF, 0x0000ffff);
 743                 emu_wrptr(sc, v->vnum, EMU_CHAN_IP, 0);
 744                 emu_enastop(sc, v->vnum, 1);
 745         }
 746         if (v->slave != NULL)
 747                 emu_vtrigger(sc, v->slave, go);
 748 }
 749
 750 static int
 751 emu_vpos(struct sc_info *sc, struct emu_voice *v)
 752 {
 753         int s, ptr;
 754
 755         s = (v->b16 ? 1 : 0) + (v->stereo ? 1 : 0);
 756         ptr = (emu_rdptr(sc, v->vnum, EMU_CHAN_CCCA_CURRADDR) - (v->start >> s)) << s;
 757         return ptr & ~0x0000001f;
 758 }
 759
 760 #ifdef EMUDEBUG
 761 static void
 762 emu_vdump(struct sc_info *sc, struct emu_voice *v)
 763 {
 764         char *regname[] = {
 765                 "cpf", "ptrx", "cvcf", "vtft", "z2", "z1", "psst", "dsl",
 766                 "ccca", "ccr", "clp", "fxrt", "mapa", "mapb", NULL, NULL,
 767                 "envvol", "atkhldv", "dcysusv", "lfoval1",
 768                 "envval", "atkhldm", "dcysusm", "lfoval2",
 769                 "ip", "ifatn", "pefe", "fmmod", "tremfrq", "fmfrq2",
 770                 "tempenv"
 771         };
 772         char *regname2[] = {
 773                 "mudata1", "mustat1", "mudata2", "mustat2",
 774                 "fxwc1", "fxwc2", "spdrate", NULL, NULL,
 775                 NULL, NULL, NULL, "fxrt2", "sndamnt", "fxrt1",
 776                 NULL, NULL
 777         };
 778         int i, x;
 779
 780         printf("voice number %d\n", v->vnum);
 781         for (i = 0, x = 0; i <= 0x1e; i++) {
 782                 if (regname[i] == NULL)
 783                         continue;
 784                 printf("%s\t[%08x]", regname[i], emu_rdptr(sc, v->vnum, i));
 785                 printf("%s", (x == 2) ? "\n" : "\t");
 786                 x++;
 787                 if (x > 2)
 788                         x = 0;
 789         }
 790
 791         /* Print out audigy extra registers */
 792         if (sc->audigy) {
 793                 for (i = 0; i <= 0xe; i++) {
 794                         if (regname2[i] == NULL)
 795                                 continue;
 796                         printf("%s\t[%08x]", regname2[i],
 797                             emu_rdptr(sc, v->vnum, i + 0x70));
 798                         printf("%s", (x == 2)? "\n" : "\t");
 799                         x++;
 800                         if (x > 2)
 801                                 x = 0;
 802                 }
 803         }
 804         printf("\n\n");
 805 }
 806 #endif
 807
 808 /* channel interface */
 809 static void *
 810 emupchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b,
 811     struct pcm_channel *c, int dir)
 812 {
 813         struct sc_info *sc = devinfo;
 814         struct sc_pchinfo *ch;
 815         void *r;
 816
 817         KASSERT(dir == PCMDIR_PLAY, ("emupchan_init: bad direction"));
 818         ch = &sc->pch[sc->pnum++];
 819         ch->buffer = b;
 820         ch->parent = sc;
 821         ch->channel = c;
 822         ch->blksz = sc->bufsz / 2;
 823         ch->fmt = SND_FORMAT(AFMT_U8, 1, 0);
 824         ch->spd = 8000;
 825         snd_mtxlock(sc->lock);
 826         ch->master = emu_valloc(sc);
 827         ch->slave = emu_valloc(sc);
 828         snd_mtxunlock(sc->lock);
 829         r = (emu_vinit(sc, ch->master, ch->slave, sc->bufsz, ch->buffer))
 830             ? NULL : ch;
 831
 832         return r;
 833 }
 834
 835 static int
 836 emupchan_free(kobj_t obj, void *data)
 837 {
 838         struct sc_pchinfo *ch = data;
 839         struct sc_info *sc = ch->parent;
 840         int r;
 841
 842         snd_mtxlock(sc->lock);
 843         r = emu_memfree(sc, sndbuf_getbuf(ch->buffer));
 844         snd_mtxunlock(sc->lock);
 845
 846         return r;
 847 }
 848
 849 static int
 850 emupchan_setformat(kobj_t obj, void *data, u_int32_t format)
 851 {
 852         struct sc_pchinfo *ch = data;
 853
 854         ch->fmt = format;
 855         return 0;
 856 }
 857
 858 static u_int32_t
 859 emupchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
 860 {
 861         struct sc_pchinfo *ch = data;
 862
 863         ch->spd = speed;
 864         return ch->spd;
 865 }
 866
 867 static u_int32_t
 868 emupchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
 869 {
 870         struct sc_pchinfo *ch = data;
 871         struct sc_info *sc = ch->parent;
 872         int irqrate, blksz;
 873
 874         ch->blksz = blocksize;
 875         snd_mtxlock(sc->lock);
 876         emu_settimer(sc);
 877         irqrate = 48000 / sc->timerinterval;
 878         snd_mtxunlock(sc->lock);
 879         blksz = (ch->spd * sndbuf_getalign(ch->buffer)) / irqrate;
 880         return blocksize;
 881 }
 882
 883 static int
 884 emupchan_trigger(kobj_t obj, void *data, int go)
 885 {
 886         struct sc_pchinfo *ch = data;
 887         struct sc_info *sc = ch->parent;
 888
 889         if (!PCMTRIG_COMMON(go))
 890                 return 0;
 891
 892         snd_mtxlock(sc->lock);
 893         if (go == PCMTRIG_START) {
 894                 emu_vsetup(ch);
 895                 emu_vwrite(sc, ch->master);
 896                 emu_settimer(sc);
 897                 emu_enatimer(sc, 1);
 898 #ifdef EMUDEBUG
 899                 printf("start [%d bit, %s, %d hz]\n",
 900                         ch->master->b16 ? 16 : 8,
 901                         ch->master->stereo ? "stereo" : "mono",
 902                         ch->master->speed);
 903                 emu_vdump(sc, ch->master);
 904                 emu_vdump(sc, ch->slave);
 905 #endif
 906         }
 907         ch->run = (go == PCMTRIG_START) ? 1 : 0;
 908         emu_vtrigger(sc, ch->master, ch->run);
 909         snd_mtxunlock(sc->lock);
 910         return 0;
 911 }
 912
 913 static u_int32_t
 914 emupchan_getptr(kobj_t obj, void *data)
 915 {
 916         struct sc_pchinfo *ch = data;
 917         struct sc_info *sc = ch->parent;
 918         int r;
 919
 920         snd_mtxlock(sc->lock);
 921         r = emu_vpos(sc, ch->master);
 922         snd_mtxunlock(sc->lock);
 923
 924         return r;
 925 }
 926
 927 static struct pcmchan_caps *
 928 emupchan_getcaps(kobj_t obj, void *data)
 929 {
 930         return &emu_playcaps;
 931 }
 932
 933 static kobj_method_t emupchan_methods[] = {
 934         KOBJMETHOD(channel_init,                emupchan_init),
 935         KOBJMETHOD(channel_free,                emupchan_free),
 936         KOBJMETHOD(channel_setformat,           emupchan_setformat),
 937         KOBJMETHOD(channel_setspeed,            emupchan_setspeed),
 938         KOBJMETHOD(channel_setblocksize,        emupchan_setblocksize),
 939         KOBJMETHOD(channel_trigger,             emupchan_trigger),
 940         KOBJMETHOD(channel_getptr,              emupchan_getptr),
 941         KOBJMETHOD(channel_getcaps,             emupchan_getcaps),
 942         KOBJMETHOD_END
 943 };
 944 CHANNEL_DECLARE(emupchan);
 945
 946 /* channel interface */
 947 static void *
 948 emurchan_init(kobj_t obj, void *devinfo, struct snd_dbuf *b,
 949     struct pcm_channel *c, int dir)
 950 {
 951         struct sc_info *sc = devinfo;
 952         struct sc_rchinfo *ch;
 953
 954         KASSERT(dir == PCMDIR_REC, ("emurchan_init: bad direction"));
 955         ch = &sc->rch[sc->rnum];
 956         ch->buffer = b;
 957         ch->parent = sc;
 958         ch->channel = c;
 959         ch->blksz = sc->bufsz / 2;
 960         ch->fmt = SND_FORMAT(AFMT_U8, 1, 0);
 961         ch->spd = 8000;
 962         ch->num = sc->rnum;
 963         switch(sc->rnum) {
 964         case 0:
 965                 ch->idxreg = sc->audigy ? EMU_A_ADCIDX : EMU_ADCIDX;
 966                 ch->basereg = EMU_ADCBA;
 967                 ch->sizereg = EMU_ADCBS;
 968                 ch->setupreg = EMU_ADCCR;
 969                 ch->irqmask = EMU_INTE_ADCBUFENABLE;
 970                 break;
 971
 972         case 1:
 973                 ch->idxreg = EMU_FXIDX;
 974                 ch->basereg = EMU_FXBA;
 975                 ch->sizereg = EMU_FXBS;
 976                 ch->setupreg = EMU_FXWC;
 977                 ch->irqmask = EMU_INTE_EFXBUFENABLE;
 978                 break;
 979
 980         case 2:
 981                 ch->idxreg = EMU_MICIDX;
 982                 ch->basereg = EMU_MICBA;
 983                 ch->sizereg = EMU_MICBS;
 984                 ch->setupreg = 0;
 985                 ch->irqmask = EMU_INTE_MICBUFENABLE;
 986                 break;
 987         }
 988         sc->rnum++;
 989         if (sndbuf_alloc(ch->buffer, sc->parent_dmat, 0, sc->bufsz) != 0)
 990                 return NULL;
 991         else {
 992                 snd_mtxlock(sc->lock);
 993                 emu_wrptr(sc, 0, ch->basereg, sndbuf_getbufaddr(ch->buffer));
 994                 emu_wrptr(sc, 0, ch->sizereg, 0); /* off */
 995                 snd_mtxunlock(sc->lock);
 996                 return ch;
 997         }
 998 }
 999
1000 static int
1001 emurchan_setformat(kobj_t obj, void *data, u_int32_t format)
1002 {
1003         struct sc_rchinfo *ch = data;
1004
1005         ch->fmt = format;
1006         return 0;
1007 }
1008
1009 static u_int32_t
1010 emurchan_setspeed(kobj_t obj, void *data, u_int32_t speed)
1011 {
1012         struct sc_rchinfo *ch = data;
1013
1014         if (ch->num == 0) {
1015                 if (ch->parent->audigy)
1016                         speed = audigy_adcspeed[audigy_recval(speed)];
1017                 else
1018                         speed = adcspeed[emu_recval(speed)];
1019         }
1020         if (ch->num == 1)
1021                 speed = 48000;
1022         if (ch->num == 2)
1023                 speed = 8000;
1024         ch->spd = speed;
1025         return ch->spd;
1026 }
1027
1028 static u_int32_t
1029 emurchan_setblocksize(kobj_t obj, void *data, u_int32_t blocksize)
1030 {
1031         struct sc_rchinfo *ch = data;
1032         struct sc_info *sc = ch->parent;
1033         int irqrate, blksz;
1034
1035         ch->blksz = blocksize;
1036         snd_mtxlock(sc->lock);
1037         emu_settimer(sc);
1038         irqrate = 48000 / sc->timerinterval;
1039         snd_mtxunlock(sc->lock);
1040         blksz = (ch->spd * sndbuf_getalign(ch->buffer)) / irqrate;
1041         return blocksize;
1042 }
1043
1044 /* semantic note: must start at beginning of buffer */
1045 static int
1046 emurchan_trigger(kobj_t obj, void *data, int go)
1047 {
1048         struct sc_rchinfo *ch = data;
1049         struct sc_info *sc = ch->parent;
1050         u_int32_t val, sz;
1051
1052         if (!PCMTRIG_COMMON(go))
1053                 return 0;
1054
1055         switch(sc->bufsz) {
1056         case 4096:
1057                 sz = EMU_RECBS_BUFSIZE_4096;
1058                 break;
1059
1060         case 8192:
1061                 sz = EMU_RECBS_BUFSIZE_8192;
1062                 break;
1063
1064         case 16384:
1065                 sz = EMU_RECBS_BUFSIZE_16384;
1066                 break;
1067
1068         case 32768:
1069                 sz = EMU_RECBS_BUFSIZE_32768;
1070                 break;
1071
1072         case 65536:
1073                 sz = EMU_RECBS_BUFSIZE_65536;
1074                 break;
1075
1076         default:
1077                 sz = EMU_RECBS_BUFSIZE_4096;
1078         }
1079
1080         snd_mtxlock(sc->lock);
1081         switch(go) {
1082         case PCMTRIG_START:
1083                 ch->run = 1;
1084                 emu_wrptr(sc, 0, ch->sizereg, sz);
1085                 if (ch->num == 0) {
1086                         if (sc->audigy) {
1087                                 val = EMU_A_ADCCR_LCHANENABLE;
1088                                 if (AFMT_CHANNEL(ch->fmt) > 1)
1089                                         val |= EMU_A_ADCCR_RCHANENABLE;
1090                                 val |= audigy_recval(ch->spd);
1091                         } else {
1092                                 val = EMU_ADCCR_LCHANENABLE;
1093                                 if (AFMT_CHANNEL(ch->fmt) > 1)
1094                                         val |= EMU_ADCCR_RCHANENABLE;
1095                                 val |= emu_recval(ch->spd);
1096                         }
1097
1098                         emu_wrptr(sc, 0, ch->setupreg, 0);
1099                         emu_wrptr(sc, 0, ch->setupreg, val);
1100                 }
1101                 val = emu_rd(sc, EMU_INTE, 4);
1102                 val |= ch->irqmask;
1103                 emu_wr(sc, EMU_INTE, val, 4);
1104                 break;
1105
1106         case PCMTRIG_STOP:
1107         case PCMTRIG_ABORT:
1108                 ch->run = 0;
1109                 emu_wrptr(sc, 0, ch->sizereg, 0);
1110                 if (ch->setupreg)
1111                         emu_wrptr(sc, 0, ch->setupreg, 0);
1112                 val = emu_rd(sc, EMU_INTE, 4);
1113                 val &= ~ch->irqmask;
1114                 emu_wr(sc, EMU_INTE, val, 4);
1115                 break;
1116
1117         case PCMTRIG_EMLDMAWR:
1118         case PCMTRIG_EMLDMARD:
1119         default:
1120                 break;
1121         }
1122         snd_mtxunlock(sc->lock);
1123
1124         return 0;
1125 }
1126
1127 static u_int32_t
1128 emurchan_getptr(kobj_t obj, void *data)
1129 {
1130         struct sc_rchinfo *ch = data;
1131         struct sc_info *sc = ch->parent;
1132         int r;
1133
1134         snd_mtxlock(sc->lock);
1135         r = emu_rdptr(sc, 0, ch->idxreg) & 0x0000ffff;
1136         snd_mtxunlock(sc->lock);
1137
1138         return r;
1139 }
1140
1141 static struct pcmchan_caps *
1142 emurchan_getcaps(kobj_t obj, void *data)
1143 {
1144         struct sc_rchinfo *ch = data;
1145
1146         return &emu_reccaps[ch->num];
1147 }
1148
1149 static kobj_method_t emurchan_methods[] = {
1150         KOBJMETHOD(channel_init,                emurchan_init),
1151         KOBJMETHOD(channel_setformat,           emurchan_setformat),
1152         KOBJMETHOD(channel_setspeed,            emurchan_setspeed),
1153         KOBJMETHOD(channel_setblocksize,        emurchan_setblocksize),
1154         KOBJMETHOD(channel_trigger,             emurchan_trigger),
1155         KOBJMETHOD(channel_getptr,              emurchan_getptr),
1156         KOBJMETHOD(channel_getcaps,             emurchan_getcaps),
1157         KOBJMETHOD_END
1158 };
1159 CHANNEL_DECLARE(emurchan);
1160
1161 static unsigned char
1162 emu_mread(struct mpu401 *arg, void *sc, int reg)
1163 {
1164         unsigned int d;
1165
1166         d = emu_rd((struct sc_info *)sc, 0x18 + reg, 1);
1167         return d;
1168 }
1169
1170 static void
1171 emu_mwrite(struct mpu401 *arg, void *sc, int reg, unsigned char b)
1172 {
1173
1174         emu_wr((struct sc_info *)sc, 0x18 + reg, b, 1);
1175 }
1176
1177 static int
1178 emu_muninit(struct mpu401 *arg, void *cookie)
1179 {
1180         struct sc_info *sc = cookie;
1181
1182         snd_mtxlock(sc->lock);
1183         sc->mpu_intr = NULL;
1184         snd_mtxunlock(sc->lock);
1185
1186         return 0;
1187 }
1188
1189 static kobj_method_t emu_mpu_methods[] = {
1190         KOBJMETHOD(mpufoi_read,         emu_mread),
1191         KOBJMETHOD(mpufoi_write,        emu_mwrite),
1192         KOBJMETHOD(mpufoi_uninit,       emu_muninit),
1193         KOBJMETHOD_END
1194 };
1195
1196 static DEFINE_CLASS(emu_mpu, emu_mpu_methods, 0);
1197
1198 static void
1199 emu_intr2(void *p)
1200 {
1201         struct sc_info *sc = (struct sc_info *)p;
1202
1203         if (sc->mpu_intr)
1204             (sc->mpu_intr)(sc->mpu);
1205 }
1206
1207 static void
1208 emu_midiattach(struct sc_info *sc)
1209 {
1210         int i;
1211
1212         i = emu_rd(sc, EMU_INTE, 4);
1213         i |= EMU_INTE_MIDIRXENABLE;
1214         emu_wr(sc, EMU_INTE, i, 4);
1215
1216         sc->mpu = mpu401_init(&emu_mpu_class, sc, emu_intr2, &sc->mpu_intr);
1217 }
1218 /* -------------------------------------------------------------------- */
1219 /* The interrupt handler */
1220
1221 static void
1222 emu_intr(void *data)
1223 {
1224         struct sc_info *sc = data;
1225         u_int32_t stat, ack, i, x;
1226
1227         snd_mtxlock(sc->lock);
1228         while (1) {
1229                 stat = emu_rd(sc, EMU_IPR, 4);
1230                 if (stat == 0)
1231                         break;
1232                 ack = 0;
1233
1234                 /* process irq */
1235                 if (stat & EMU_IPR_INTERVALTIMER)
1236                         ack |= EMU_IPR_INTERVALTIMER;
1237
1238                 if (stat & (EMU_IPR_ADCBUFFULL | EMU_IPR_ADCBUFHALFFULL))
1239                         ack |= stat & (EMU_IPR_ADCBUFFULL | EMU_IPR_ADCBUFHALFFULL);
1240
1241                 if (stat & (EMU_IPR_EFXBUFFULL | EMU_IPR_EFXBUFHALFFULL))
1242                         ack |= stat & (EMU_IPR_EFXBUFFULL | EMU_IPR_EFXBUFHALFFULL);
1243
1244                 if (stat & (EMU_IPR_MICBUFFULL | EMU_IPR_MICBUFHALFFULL))
1245                         ack |= stat & (EMU_IPR_MICBUFFULL | EMU_IPR_MICBUFHALFFULL);
1246
1247                 if (stat & EMU_PCIERROR) {
1248                         ack |= EMU_PCIERROR;
1249                         device_printf(sc->dev, "pci error\n");
1250                         /* we still get an nmi with ecc ram even if we ack this */
1251                 }
1252                 if (stat & EMU_IPR_RATETRCHANGE) {
1253                         ack |= EMU_IPR_RATETRCHANGE;
1254 #ifdef EMUDEBUG
1255                         device_printf(sc->dev,
1256                             "sample rate tracker lock status change\n");
1257 #endif
1258                 }
1259
1260                 if (stat & EMU_IPR_MIDIRECVBUFE) {
1261                         if (sc->mpu_intr) {
1262                                 (sc->mpu_intr)(sc->mpu);
1263                                 ack |= EMU_IPR_MIDIRECVBUFE | EMU_IPR_MIDITRANSBUFE;
1264                         }
1265                 }
1266                 if (stat & ~ack)
1267                         device_printf(sc->dev, "dodgy irq: %x (harmless)\n",
1268                             stat & ~ack);
1269
1270                 emu_wr(sc, EMU_IPR, stat, 4);
1271
1272                 if (ack) {
1273                         snd_mtxunlock(sc->lock);
1274
1275                         if (ack & EMU_IPR_INTERVALTIMER) {
1276                                 x = 0;
1277                                 for (i = 0; i < sc->nchans; i++) {
1278                                         if (sc->pch[i].run) {
1279                                                 x = 1;
1280                                                 chn_intr(sc->pch[i].channel);
1281                                         }
1282                                 }
1283                                 if (x == 0)
1284                                         emu_enatimer(sc, 0);
1285                         }
1286
1287                         if (ack & (EMU_IPR_ADCBUFFULL | EMU_IPR_ADCBUFHALFFULL)) {
1288                                 if (sc->rch[0].channel)
1289                                         chn_intr(sc->rch[0].channel);
1290                         }
1291                         if (ack & (EMU_IPR_EFXBUFFULL | EMU_IPR_EFXBUFHALFFULL)) {
1292                                 if (sc->rch[1].channel)
1293                                         chn_intr(sc->rch[1].channel);
1294                         }
1295                         if (ack & (EMU_IPR_MICBUFFULL | EMU_IPR_MICBUFHALFFULL)) {
1296                                 if (sc->rch[2].channel)
1297                                         chn_intr(sc->rch[2].channel);
1298                         }
1299
1300                         snd_mtxlock(sc->lock);
1301                 }
1302         }
1303         snd_mtxunlock(sc->lock);
1304 }
1305
1306 /* -------------------------------------------------------------------- */
1307
1308 static void
1309 emu_setmap(void *arg, bus_dma_segment_t *segs, int nseg, int error)
1310 {
1311         bus_addr_t *phys = arg;
1312
1313         *phys = error ? 0 : (bus_addr_t)segs->ds_addr;
1314
1315         if (bootverbose) {
1316                 printf("emu: setmap (%lx, %lx), nseg=%d, error=%d\n",
1317                     (unsigned long)segs->ds_addr, (unsigned long)segs->ds_len,
1318                     nseg, error);
1319         }
1320 }
1321
1322 static void *
1323 emu_malloc(struct sc_info *sc, u_int32_t sz, bus_addr_t *addr,
1324     bus_dmamap_t *map)
1325 {
1326         void *buf;
1327
1328         *addr = 0;
1329         if (bus_dmamem_alloc(sc->parent_dmat, &buf, BUS_DMA_NOWAIT, map))
1330                 return NULL;
1331         if (bus_dmamap_load(sc->parent_dmat, *map, buf, sz, emu_setmap, addr, 0)
1332             || !*addr) {
1333                 bus_dmamem_free(sc->parent_dmat, buf, *map);
1334                 return NULL;
1335         }
1336         return buf;
1337 }
1338
1339 static void
1340 emu_free(struct sc_info *sc, void *buf, bus_dmamap_t map)
1341 {
1342         bus_dmamap_unload(sc->parent_dmat, map);
1343         bus_dmamem_free(sc->parent_dmat, buf, map);
1344 }
1345
1346 static void *
1347 emu_memalloc(struct sc_info *sc, u_int32_t sz, bus_addr_t *addr)
1348 {
1349         u_int32_t blksz, start, idx, ofs, tmp, found;
1350         struct emu_mem *mem = &sc->mem;
1351         struct emu_memblk *blk;
1352         void *buf;
1353
1354         blksz = sz / EMUPAGESIZE;
1355         if (sz > (blksz * EMUPAGESIZE))
1356                 blksz++;
1357         /* find a free block in the bitmap */
1358         found = 0;
1359         start = 1;
1360         while (!found && start + blksz < EMUMAXPAGES) {
1361                 found = 1;
1362                 for (idx = start; idx < start + blksz; idx++)
1363                         if (mem->bmap[idx >> 3] & (1 << (idx & 7)))
1364                                 found = 0;
1365                 if (!found)
1366                         start++;
1367         }
1368         if (!found)
1369                 return NULL;
1370         blk = malloc(sizeof(*blk), M_DEVBUF, M_NOWAIT);
1371         if (blk == NULL)
1372                 return NULL;
1373         buf = emu_malloc(sc, sz, &blk->buf_addr, &blk->buf_map);
1374         *addr = blk->buf_addr;
1375         if (buf == NULL) {
1376                 free(blk, M_DEVBUF);
1377                 return NULL;
1378         }
1379         blk->buf = buf;
1380         blk->pte_start = start;
1381         blk->pte_size = blksz;
1382 #ifdef EMUDEBUG
1383         printf("buf %p, pte_start %d, pte_size %d\n", blk->buf,
1384             blk->pte_start, blk->pte_size);
1385 #endif
1386         ofs = 0;
1387         for (idx = start; idx < start + blksz; idx++) {
1388                 mem->bmap[idx >> 3] |= 1 << (idx & 7);
1389                 tmp = (uint32_t)(blk->buf_addr + ofs);
1390 #ifdef EMUDEBUG
1391                 printf("pte[%d] -> %x phys, %x virt\n", idx, tmp,
1392                     ((u_int32_t)buf) + ofs);
1393 #endif
1394                 mem->ptb_pages[idx] = (tmp << 1) | idx;
1395                 ofs += EMUPAGESIZE;
1396         }
1397         SLIST_INSERT_HEAD(&mem->blocks, blk, link);
1398         return buf;
1399 }
1400
1401 static int
1402 emu_memfree(struct sc_info *sc, void *buf)
1403 {
1404         u_int32_t idx, tmp;
1405         struct emu_mem *mem = &sc->mem;
1406         struct emu_memblk *blk, *i;
1407
1408         blk = NULL;
1409         SLIST_FOREACH(i, &mem->blocks, link) {
1410                 if (i->buf == buf)
1411                         blk = i;
1412         }
1413         if (blk == NULL)
1414                 return EINVAL;
1415         SLIST_REMOVE(&mem->blocks, blk, emu_memblk, link);
1416         emu_free(sc, buf, blk->buf_map);
1417         tmp = (u_int32_t)(sc->mem.silent_page_addr) << 1;
1418         for (idx = blk->pte_start; idx < blk->pte_start + blk->pte_size; idx++) {
1419                 mem->bmap[idx >> 3] &= ~(1 << (idx & 7));
1420                 mem->ptb_pages[idx] = tmp | idx;
1421         }
1422         free(blk, M_DEVBUF);
1423         return 0;
1424 }
1425
1426 static int
1427 emu_memstart(struct sc_info *sc, void *buf)
1428 {
1429         struct emu_mem *mem = &sc->mem;
1430         struct emu_memblk *blk, *i;
1431
1432         blk = NULL;
1433         SLIST_FOREACH(i, &mem->blocks, link) {
1434                 if (i->buf == buf)
1435                         blk = i;
1436         }
1437         if (blk == NULL)
1438                 return -EINVAL;
1439         return blk->pte_start;
1440 }
1441
1442 static void
1443 emu_addefxop(struct sc_info *sc, int op, int z, int w, int x, int y,
1444     u_int32_t *pc)
1445 {
1446         emu_wrefx(sc, (*pc) * 2, (x << 10) | y);
1447         emu_wrefx(sc, (*pc) * 2 + 1, (op << 20) | (z << 10) | w);
1448         (*pc)++;
1449 }
1450
1451 static void
1452 audigy_addefxop(struct sc_info *sc, int op, int z, int w, int x, int y,
1453     u_int32_t *pc)
1454 {
1455         emu_wrefx(sc, (*pc) * 2, (x << 12) | y);
1456         emu_wrefx(sc, (*pc) * 2 + 1, (op << 24) | (z << 12) | w);
1457         (*pc)++;
1458 }
1459
1460 static void
1461 audigy_initefx(struct sc_info *sc)
1462 {
1463         int i;
1464         u_int32_t pc = 0;
1465
1466         /* skip 0, 0, -1, 0 - NOPs */
1467         for (i = 0; i < 512; i++)
1468                 audigy_addefxop(sc, 0x0f, 0x0c0, 0x0c0, 0x0cf, 0x0c0, &pc);
1469
1470         for (i = 0; i < 512; i++)
1471                 emu_wrptr(sc, 0, EMU_A_FXGPREGBASE + i, 0x0);
1472
1473         pc = 16;
1474
1475         /* stop fx processor */
1476         emu_wrptr(sc, 0, EMU_A_DBG, EMU_A_DBG_SINGLE_STEP);
1477
1478         /* Audigy 2 (EMU10K2) DSP Registers:
1479            FX Bus
1480                 0x000-0x00f : 16 registers (?)
1481            Input
1482                 0x040/0x041 : AC97 Codec (l/r)
1483                 0x042/0x043 : ADC, S/PDIF (l/r)
1484                 0x044/0x045 : Optical S/PDIF in (l/r)
1485                 0x046/0x047 : ?
1486                 0x048/0x049 : Line/Mic 2 (l/r)
1487                 0x04a/0x04b : RCA S/PDIF (l/r)
1488                 0x04c/0x04d : Aux 2 (l/r)
1489            Output
1490                 0x060/0x061 : Digital Front (l/r)
1491                 0x062/0x063 : Digital Center/LFE
1492                 0x064/0x065 : AudigyDrive Heaphone (l/r)
1493                 0x066/0x067 : Digital Rear (l/r)
1494                 0x068/0x069 : Analog Front (l/r)
1495                 0x06a/0x06b : Analog Center/LFE
1496                 0x06c/0x06d : ?
1497                 0x06e/0x06f : Analog Rear (l/r)
1498                 0x070/0x071 : AC97 Output (l/r)
1499                 0x072/0x073 : ?
1500                 0x074/0x075 : ?
1501                 0x076/0x077 : ADC Recording Buffer (l/r)
1502            Constants
1503                 0x0c0 - 0x0c4 = 0 - 4
1504                 0x0c5 = 0x8, 0x0c6 = 0x10, 0x0c7 = 0x20
1505                 0x0c8 = 0x100, 0x0c9 = 0x10000, 0x0ca = 0x80000
1506                 0x0cb = 0x10000000, 0x0cc = 0x20000000, 0x0cd = 0x40000000
1507                 0x0ce = 0x80000000, 0x0cf = 0x7fffffff, 0x0d0 = 0xffffffff
1508                 0x0d1 = 0xfffffffe, 0x0d2 = 0xc0000000, 0x0d3 = 0x41fbbcdc
1509                 0x0d4 = 0x5a7ef9db, 0x0d5 = 0x00100000, 0x0dc = 0x00000001 (?)
1510            Temporary Values
1511                 0x0d6 : Accumulator (?)
1512                 0x0d7 : Condition Register
1513                 0x0d8 : Noise source
1514                 0x0d9 : Noise source
1515            Tank Memory Data Registers
1516                 0x200 - 0x2ff
1517            Tank Memory Address Registers
1518                 0x300 - 0x3ff
1519            General Purpose Registers
1520                 0x400 - 0x5ff
1521          */
1522
1523         /* AC97Output[l/r] = FXBus PCM[l/r] */
1524         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_AC97_L), A_C_00000000,
1525                         A_C_00000000, A_FXBUS(FXBUS_PCM_LEFT), &pc);
1526         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_AC97_R), A_C_00000000,
1527                         A_C_00000000, A_FXBUS(FXBUS_PCM_RIGHT), &pc);
1528
1529         /* GPR[0/1] = RCA S/PDIF[l/r] -- Master volume */
1530         audigy_addefxop(sc, iACC3, A_GPR(0), A_C_00000000,
1531                         A_C_00000000, A_EXTIN(EXTIN_COAX_SPDIF_L), &pc);
1532         audigy_addefxop(sc, iACC3, A_GPR(1), A_C_00000000,
1533                         A_C_00000000, A_EXTIN(EXTIN_COAX_SPDIF_R), &pc);
1534
1535         /* GPR[2] = GPR[0] (Left) / 2 + GPR[1] (Right) / 2 -- Central volume */
1536         audigy_addefxop(sc, iINTERP, A_GPR(2), A_GPR(1),
1537                         A_C_40000000, A_GPR(0), &pc);
1538
1539         /* Headphones[l/r] = GPR[0/1] */
1540         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_HEADPHONE_L),
1541                         A_C_00000000, A_C_00000000, A_GPR(0), &pc);
1542         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_HEADPHONE_R),
1543                         A_C_00000000, A_C_00000000, A_GPR(1), &pc);
1544
1545         /* Analog Front[l/r] = GPR[0/1] */
1546         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_AFRONT_L), A_C_00000000,
1547                         A_C_00000000, A_GPR(0), &pc);
1548         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_AFRONT_R), A_C_00000000,
1549                         A_C_00000000, A_GPR(1), &pc);
1550
1551         /* Digital Front[l/r] = GPR[0/1] */
1552         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_FRONT_L), A_C_00000000,
1553                         A_C_00000000, A_GPR(0), &pc);
1554         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_FRONT_R), A_C_00000000,
1555                         A_C_00000000, A_GPR(1), &pc);
1556
1557         /* Center and Subwoofer configuration */
1558         /* Analog Center = GPR[0] + GPR[2] */
1559         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_ACENTER), A_C_00000000,
1560                         A_GPR(0), A_GPR(2), &pc);
1561         /* Analog Sub = GPR[1] + GPR[2] */
1562         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_ALFE), A_C_00000000,
1563                         A_GPR(1), A_GPR(2), &pc);
1564
1565         /* Digital Center = GPR[0] + GPR[2] */
1566         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_CENTER), A_C_00000000,
1567                         A_GPR(0), A_GPR(2), &pc);
1568         /* Digital Sub = GPR[1] + GPR[2] */
1569         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_LFE), A_C_00000000,
1570                         A_GPR(1), A_GPR(2), &pc);
1571
1572 #if 0
1573         /* Analog Rear[l/r] = (GPR[0/1] * RearVolume[l/r]) >> 31 */
1574         /*   RearVolume = GPR[0x10/0x11] (Will this ever be implemented?) */
1575         audigy_addefxop(sc, iMAC0, A_EXTOUT(A_EXTOUT_AREAR_L), A_C_00000000,
1576                         A_GPR(16), A_GPR(0), &pc);
1577         audigy_addefxop(sc, iMAC0, A_EXTOUT(A_EXTOUT_AREAR_R), A_C_00000000,
1578                         A_GPR(17), A_GPR(1), &pc);
1579
1580         /* Digital Rear[l/r] = (GPR[0/1] * RearVolume[l/r]) >> 31 */
1581         /*   RearVolume = GPR[0x10/0x11] (Will this ever be implemented?) */
1582         audigy_addefxop(sc, iMAC0, A_EXTOUT(A_EXTOUT_REAR_L), A_C_00000000,
1583                         A_GPR(16), A_GPR(0), &pc);
1584         audigy_addefxop(sc, iMAC0, A_EXTOUT(A_EXTOUT_REAR_R), A_C_00000000,
1585                         A_GPR(17), A_GPR(1), &pc);
1586 #else
1587         /* XXX This is just a copy to the channel, since we do not have
1588          *     a patch manager, it is useful for have another output enabled.
1589          */
1590
1591         /* Analog Rear[l/r] = GPR[0/1] */
1592         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_AREAR_L), A_C_00000000,
1593                         A_C_00000000, A_GPR(0), &pc);
1594         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_AREAR_R), A_C_00000000,
1595                         A_C_00000000, A_GPR(1), &pc);
1596
1597         /* Digital Rear[l/r] = GPR[0/1] */
1598         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_REAR_L), A_C_00000000,
1599                         A_C_00000000, A_GPR(0), &pc);
1600         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_REAR_R), A_C_00000000,
1601                         A_C_00000000, A_GPR(1), &pc);
1602 #endif
1603
1604         /* ADC Recording buffer[l/r] = AC97Input[l/r] */
1605         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_ADC_CAP_L), A_C_00000000,
1606                         A_C_00000000, A_EXTIN(A_EXTIN_AC97_L), &pc);
1607         audigy_addefxop(sc, iACC3, A_EXTOUT(A_EXTOUT_ADC_CAP_R), A_C_00000000,
1608                         A_C_00000000, A_EXTIN(A_EXTIN_AC97_R), &pc);
1609
1610         /* resume normal operations */
1611         emu_wrptr(sc, 0, EMU_A_DBG, 0);
1612 }
1613
1614 static void
1615 emu_initefx(struct sc_info *sc)
1616 {
1617         int i;
1618         u_int32_t pc = 16;
1619
1620         /* acc3 0,0,0,0 - NOPs */
1621         for (i = 0; i < 512; i++) {
1622                 emu_wrefx(sc, i * 2, 0x10040);
1623                 emu_wrefx(sc, i * 2 + 1, 0x610040);
1624         }
1625
1626         for (i = 0; i < 256; i++)
1627                 emu_wrptr(sc, 0, EMU_FXGPREGBASE + i, 0);
1628
1629         /* FX-8010 DSP Registers:
1630            FX Bus
1631              0x000-0x00f : 16 registers
1632            Input
1633              0x010/0x011 : AC97 Codec (l/r)
1634              0x012/0x013 : ADC, S/PDIF (l/r)
1635              0x014/0x015 : Mic(left), Zoom (l/r)
1636              0x016/0x017 : TOS link in (l/r)
1637              0x018/0x019 : Line/Mic 1 (l/r)
1638              0x01a/0x01b : COAX S/PDIF (l/r)
1639              0x01c/0x01d : Line/Mic 2 (l/r)
1640            Output
1641              0x020/0x021 : AC97 Output (l/r)
1642              0x022/0x023 : TOS link out (l/r)
1643              0x024/0x025 : Center/LFE
1644              0x026/0x027 : LiveDrive Headphone (l/r)
1645              0x028/0x029 : Rear Channel (l/r)
1646              0x02a/0x02b : ADC Recording Buffer (l/r)
1647              0x02c       : Mic Recording Buffer
1648              0x031/0x032 : Analog Center/LFE
1649            Constants
1650              0x040 - 0x044 = 0 - 4
1651              0x045 = 0x8, 0x046 = 0x10, 0x047 = 0x20
1652              0x048 = 0x100, 0x049 = 0x10000, 0x04a = 0x80000
1653              0x04b = 0x10000000, 0x04c = 0x20000000, 0x04d = 0x40000000
1654              0x04e = 0x80000000, 0x04f = 0x7fffffff, 0x050 = 0xffffffff
1655              0x051 = 0xfffffffe, 0x052 = 0xc0000000, 0x053 = 0x41fbbcdc
1656              0x054 = 0x5a7ef9db, 0x055 = 0x00100000
1657            Temporary Values
1658              0x056 : Accumulator
1659              0x057 : Condition Register
1660              0x058 : Noise source
1661              0x059 : Noise source
1662              0x05a : IRQ Register
1663              0x05b : TRAM Delay Base Address Count
1664            General Purpose Registers
1665              0x100 - 0x1ff
1666            Tank Memory Data Registers
1667              0x200 - 0x2ff
1668            Tank Memory Address Registers
1669              0x300 - 0x3ff
1670              */
1671
1672         /* Routing - this will be configurable in later version */
1673
1674         /* GPR[0/1] = FX * 4 + SPDIF-in */
1675         emu_addefxop(sc, iMACINT0, GPR(0), EXTIN(EXTIN_SPDIF_CD_L),
1676                         FXBUS(FXBUS_PCM_LEFT), C_00000004, &pc);
1677         emu_addefxop(sc, iMACINT0, GPR(1), EXTIN(EXTIN_SPDIF_CD_R),
1678                         FXBUS(FXBUS_PCM_RIGHT), C_00000004, &pc);
1679
1680         /* GPR[0/1] += APS-input */
1681         emu_addefxop(sc, iACC3, GPR(0), GPR(0), C_00000000,
1682                         sc->APS ? EXTIN(EXTIN_TOSLINK_L) : C_00000000, &pc);
1683         emu_addefxop(sc, iACC3, GPR(1), GPR(1), C_00000000,
1684                         sc->APS ? EXTIN(EXTIN_TOSLINK_R) : C_00000000, &pc);
1685
1686         /* FrontOut (AC97) = GPR[0/1] */
1687         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_AC97_L), C_00000000,
1688                         C_00000000, GPR(0), &pc);
1689         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_AC97_R), C_00000000,
1690                         C_00000001, GPR(1), &pc);
1691
1692         /* GPR[2] = GPR[0] (Left) / 2 + GPR[1] (Right) / 2 -- Central volume */
1693         emu_addefxop(sc, iINTERP, GPR(2), GPR(1), C_40000000, GPR(0), &pc);
1694
1695 #if 0
1696         /* RearOut = (GPR[0/1] * RearVolume) >> 31 */
1697         /*   RearVolume = GPR[0x10/0x11] */
1698         emu_addefxop(sc, iMAC0, EXTOUT(EXTOUT_REAR_L), C_00000000,
1699                         GPR(16), GPR(0), &pc);
1700         emu_addefxop(sc, iMAC0, EXTOUT(EXTOUT_REAR_R), C_00000000,
1701                         GPR(17), GPR(1), &pc);
1702 #else
1703         /* XXX This is just a copy to the channel, since we do not have
1704          *     a patch manager, it is useful for have another output enabled.
1705          */
1706
1707         /* Rear[l/r] = GPR[0/1] */
1708         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_REAR_L), C_00000000,
1709                         C_00000000, GPR(0), &pc);
1710         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_REAR_R), C_00000000,
1711                         C_00000000, GPR(1), &pc);
1712 #endif
1713
1714         /* TOS out[l/r] = GPR[0/1] */
1715         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_TOSLINK_L), C_00000000,
1716                         C_00000000, GPR(0), &pc);
1717         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_TOSLINK_R), C_00000000,
1718                         C_00000000, GPR(1), &pc);
1719
1720         /* Center and Subwoofer configuration */
1721         /* Analog Center = GPR[0] + GPR[2] */
1722         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_ACENTER), C_00000000,
1723                         GPR(0), GPR(2), &pc);
1724         /* Analog Sub = GPR[1] + GPR[2] */
1725         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_ALFE), C_00000000,
1726                         GPR(1), GPR(2), &pc);
1727         /* Digital Center = GPR[0] + GPR[2] */
1728         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_AC97_CENTER), C_00000000,
1729                         GPR(0), GPR(2), &pc);
1730         /* Digital Sub = GPR[1] + GPR[2] */
1731         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_AC97_LFE), C_00000000,
1732                         GPR(1), GPR(2), &pc);
1733
1734         /* Headphones[l/r] = GPR[0/1] */
1735         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_HEADPHONE_L), C_00000000,
1736                         C_00000000, GPR(0), &pc);
1737         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_HEADPHONE_R), C_00000000,
1738                         C_00000000, GPR(1), &pc);
1739
1740         /* ADC Recording buffer[l/r] = AC97Input[l/r] */
1741         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_ADC_CAP_L), C_00000000,
1742                         C_00000000, EXTIN(EXTIN_AC97_L), &pc);
1743         emu_addefxop(sc, iACC3, EXTOUT(EXTOUT_ADC_CAP_R), C_00000000,
1744                         C_00000000, EXTIN(EXTIN_AC97_R), &pc);
1745
1746         /* resume normal operations */
1747         emu_wrptr(sc, 0, EMU_DBG, 0);
1748 }
1749
1750 /* Probe and attach the card */
1751 static int
1752 emu_init(struct sc_info *sc)
1753 {
1754         u_int32_t spcs, ch, tmp, i;
1755
1756         if (sc->audigy) {
1757                 /* enable additional AC97 slots */
1758                 emu_wrptr(sc, 0, EMU_AC97SLOT, EMU_AC97SLOT_CENTER | EMU_AC97SLOT_LFE);
1759         }
1760
1761         /* disable audio and lock cache */
1762         emu_wr(sc, EMU_HCFG,
1763             EMU_HCFG_LOCKSOUNDCACHE | EMU_HCFG_LOCKTANKCACHE_MASK | EMU_HCFG_MUTEBUTTONENABLE,
1764             4);
1765
1766         /* reset recording buffers */
1767         emu_wrptr(sc, 0, EMU_MICBS, EMU_RECBS_BUFSIZE_NONE);
1768         emu_wrptr(sc, 0, EMU_MICBA, 0);
1769         emu_wrptr(sc, 0, EMU_FXBS, EMU_RECBS_BUFSIZE_NONE);
1770         emu_wrptr(sc, 0, EMU_FXBA, 0);
1771         emu_wrptr(sc, 0, EMU_ADCBS, EMU_RECBS_BUFSIZE_NONE);
1772         emu_wrptr(sc, 0, EMU_ADCBA, 0);
1773
1774         /* disable channel interrupt */
1775         emu_wr(sc, EMU_INTE,
1776             EMU_INTE_INTERTIMERENB | EMU_INTE_SAMPLERATER | EMU_INTE_PCIERRENABLE,
1777             4);
1778         emu_wrptr(sc, 0, EMU_CLIEL, 0);
1779         emu_wrptr(sc, 0, EMU_CLIEH, 0);
1780         emu_wrptr(sc, 0, EMU_SOLEL, 0);
1781         emu_wrptr(sc, 0, EMU_SOLEH, 0);
1782
1783         /* wonder what these do... */
1784         if (sc->audigy) {
1785                 emu_wrptr(sc, 0, EMU_SPBYPASS, 0xf00);
1786                 emu_wrptr(sc, 0, EMU_AC97SLOT, 0x3);
1787         }
1788
1789         /* init envelope engine */
1790         for (ch = 0; ch < NUM_G; ch++) {
1791                 emu_wrptr(sc, ch, EMU_CHAN_DCYSUSV, ENV_OFF);
1792                 emu_wrptr(sc, ch, EMU_CHAN_IP, 0);
1793                 emu_wrptr(sc, ch, EMU_CHAN_VTFT, 0xffff);
1794                 emu_wrptr(sc, ch, EMU_CHAN_CVCF, 0xffff);
1795                 emu_wrptr(sc, ch, EMU_CHAN_PTRX, 0);
1796                 emu_wrptr(sc, ch, EMU_CHAN_CPF, 0);
1797                 emu_wrptr(sc, ch, EMU_CHAN_CCR, 0);
1798
1799                 emu_wrptr(sc, ch, EMU_CHAN_PSST, 0);
1800                 emu_wrptr(sc, ch, EMU_CHAN_DSL, 0x10);
1801                 emu_wrptr(sc, ch, EMU_CHAN_CCCA, 0);
1802                 emu_wrptr(sc, ch, EMU_CHAN_Z1, 0);
1803                 emu_wrptr(sc, ch, EMU_CHAN_Z2, 0);
1804                 emu_wrptr(sc, ch, EMU_CHAN_FXRT, 0xd01c0000);
1805
1806                 emu_wrptr(sc, ch, EMU_CHAN_ATKHLDM, 0);
1807                 emu_wrptr(sc, ch, EMU_CHAN_DCYSUSM, 0);
1808                 emu_wrptr(sc, ch, EMU_CHAN_IFATN, 0xffff);
1809                 emu_wrptr(sc, ch, EMU_CHAN_PEFE, 0);
1810                 emu_wrptr(sc, ch, EMU_CHAN_FMMOD, 0);
1811                 emu_wrptr(sc, ch, EMU_CHAN_TREMFRQ, 24);        /* 1 Hz */
1812                 emu_wrptr(sc, ch, EMU_CHAN_FM2FRQ2, 24);        /* 1 Hz */
1813                 emu_wrptr(sc, ch, EMU_CHAN_TEMPENV, 0);
1814
1815                 /*** these are last so OFF prevents writing ***/
1816                 emu_wrptr(sc, ch, EMU_CHAN_LFOVAL2, 0);
1817                 emu_wrptr(sc, ch, EMU_CHAN_LFOVAL1, 0);
1818                 emu_wrptr(sc, ch, EMU_CHAN_ATKHLDV, 0);
1819                 emu_wrptr(sc, ch, EMU_CHAN_ENVVOL, 0);
1820                 emu_wrptr(sc, ch, EMU_CHAN_ENVVAL, 0);
1821
1822                 if (sc->audigy) {
1823                         /* audigy cards need this to initialize correctly */
1824                         emu_wrptr(sc, ch, 0x4c, 0);
1825                         emu_wrptr(sc, ch, 0x4d, 0);
1826                         emu_wrptr(sc, ch, 0x4e, 0);
1827                         emu_wrptr(sc, ch, 0x4f, 0);
1828                         /* set default routing */
1829                         emu_wrptr(sc, ch, EMU_A_CHAN_FXRT1, 0x03020100);
1830                         emu_wrptr(sc, ch, EMU_A_CHAN_FXRT2, 0x3f3f3f3f);
1831                         emu_wrptr(sc, ch, EMU_A_CHAN_SENDAMOUNTS, 0);
1832                 }
1833
1834                 sc->voice[ch].vnum = ch;
1835                 sc->voice[ch].slave = NULL;
1836                 sc->voice[ch].busy = 0;
1837                 sc->voice[ch].ismaster = 0;
1838                 sc->voice[ch].running = 0;
1839                 sc->voice[ch].b16 = 0;
1840                 sc->voice[ch].stereo = 0;
1841                 sc->voice[ch].speed = 0;
1842                 sc->voice[ch].start = 0;
1843                 sc->voice[ch].end = 0;
1844                 sc->voice[ch].channel = NULL;
1845         }
1846         sc->pnum = sc->rnum = 0;
1847
1848         /*
1849          *  Init to 0x02109204 :
1850          *  Clock accuracy    = 0     (1000ppm)
1851          *  Sample Rate       = 2     (48kHz)
1852          *  Audio Channel     = 1     (Left of 2)
1853          *  Source Number     = 0     (Unspecified)
1854          *  Generation Status = 1     (Original for Cat Code 12)
1855          *  Cat Code          = 12    (Digital Signal Mixer)
1856          *  Mode              = 0     (Mode 0)
1857          *  Emphasis          = 0     (None)
1858          *  CP                = 1     (Copyright unasserted)
1859          *  AN                = 0     (Audio data)
1860          *  P                 = 0     (Consumer)
1861          */
1862         spcs = EMU_SPCS_CLKACCY_1000PPM | EMU_SPCS_SAMPLERATE_48 |
1863             EMU_SPCS_CHANNELNUM_LEFT | EMU_SPCS_SOURCENUM_UNSPEC |
1864             EMU_SPCS_GENERATIONSTATUS | 0x00001200 | 0x00000000 |
1865             EMU_SPCS_EMPHASIS_NONE | EMU_SPCS_COPYRIGHT;
1866         emu_wrptr(sc, 0, EMU_SPCS0, spcs);
1867         emu_wrptr(sc, 0, EMU_SPCS1, spcs);
1868         emu_wrptr(sc, 0, EMU_SPCS2, spcs);
1869
1870         if (!sc->audigy)
1871                 emu_initefx(sc);
1872         else if (sc->audigy2) { /* Audigy 2 */
1873                 /* from ALSA initialization code: */
1874
1875                 /* Hack for Alice3 to work independent of haP16V driver */
1876                 u_int32_t tmp;
1877
1878                 /* Setup SRCMulti_I2S SamplingRate */
1879                 tmp = emu_rdptr(sc, 0, EMU_A_SPDIF_SAMPLERATE) & 0xfffff1ff;
1880                 emu_wrptr(sc, 0, EMU_A_SPDIF_SAMPLERATE, tmp | 0x400);
1881
1882                 /* Setup SRCSel (Enable SPDIF, I2S SRCMulti) */
1883                 emu_wr(sc, 0x20, 0x00600000, 4);
1884                 emu_wr(sc, 0x24, 0x00000014, 4);
1885
1886                 /* Setup SRCMulti Input Audio Enable */
1887                 emu_wr(sc, 0x20, 0x006e0000, 4);
1888                 emu_wr(sc, 0x24, 0xff00ff00, 4);
1889         }
1890
1891         SLIST_INIT(&sc->mem.blocks);
1892         sc->mem.ptb_pages = emu_malloc(sc, EMUMAXPAGES * sizeof(u_int32_t),
1893             &sc->mem.ptb_pages_addr, &sc->mem.ptb_map);
1894         if (sc->mem.ptb_pages == NULL)
1895                 return -1;
1896
1897         sc->mem.silent_page = emu_malloc(sc, EMUPAGESIZE,
1898             &sc->mem.silent_page_addr, &sc->mem.silent_map);
1899         if (sc->mem.silent_page == NULL) {
1900                 emu_free(sc, sc->mem.ptb_pages, sc->mem.ptb_map);
1901                 return -1;
1902         }
1903         /* Clear page with silence & setup all pointers to this page */
1904         bzero(sc->mem.silent_page, EMUPAGESIZE);
1905         tmp = (u_int32_t)(sc->mem.silent_page_addr) << 1;
1906         for (i = 0; i < EMUMAXPAGES; i++)
1907                 sc->mem.ptb_pages[i] = tmp | i;
1908
1909         emu_wrptr(sc, 0, EMU_PTB, (sc->mem.ptb_pages_addr));
1910         emu_wrptr(sc, 0, EMU_TCB, 0);   /* taken from original driver */
1911         emu_wrptr(sc, 0, EMU_TCBS, 0);  /* taken from original driver */
1912
1913         for (ch = 0; ch < NUM_G; ch++) {
1914                 emu_wrptr(sc, ch, EMU_CHAN_MAPA, tmp | EMU_CHAN_MAP_PTI_MASK);
1915                 emu_wrptr(sc, ch, EMU_CHAN_MAPB, tmp | EMU_CHAN_MAP_PTI_MASK);
1916         }
1917
1918         /* emu_memalloc(sc, EMUPAGESIZE); */
1919         /*
1920          *  Hokay, now enable the AUD bit
1921          *
1922          *  Audigy
1923          *   Enable Audio = 0 (enabled after fx processor initialization)
1924          *   Mute Disable Audio = 0
1925          *   Joystick = 1
1926          *
1927          *  Audigy 2
1928          *   Enable Audio = 1
1929          *   Mute Disable Audio = 0
1930          *   Joystick = 1
1931          *   GP S/PDIF AC3 Enable = 1
1932          *   CD S/PDIF AC3 Enable = 1
1933          *
1934          *  EMU10K1
1935          *   Enable Audio = 1
1936          *   Mute Disable Audio = 0
1937          *   Lock Tank Memory = 1
1938          *   Lock Sound Memory = 0
1939          *   Auto Mute = 1
1940          */
1941
1942         if (sc->audigy) {
1943                 tmp = EMU_HCFG_AUTOMUTE | EMU_HCFG_JOYENABLE;
1944                 if (sc->audigy2)        /* Audigy 2 */
1945                         tmp = EMU_HCFG_AUDIOENABLE | EMU_HCFG_AC3ENABLE_CDSPDIF |
1946                             EMU_HCFG_AC3ENABLE_GPSPDIF;
1947                 emu_wr(sc, EMU_HCFG, tmp, 4);
1948
1949                 audigy_initefx(sc);
1950
1951                 /* from ALSA initialization code: */
1952
1953                 /* enable audio and disable both audio/digital outputs */
1954                 emu_wr(sc, EMU_HCFG, emu_rd(sc, EMU_HCFG, 4) | EMU_HCFG_AUDIOENABLE, 4);
1955                 emu_wr(sc, EMU_A_IOCFG, emu_rd(sc, EMU_A_IOCFG, 4) & ~EMU_A_IOCFG_GPOUT_AD,
1956                     4);
1957                 if (sc->audigy2) {      /* Audigy 2 */
1958                         /* Unmute Analog.
1959                          * Set GPO6 to 1 for Apollo. This has to be done after
1960                          * init Alice3 I2SOut beyond 48kHz.
1961                          * So, sequence is important.
1962                          */
1963                         emu_wr(sc, EMU_A_IOCFG,
1964                             emu_rd(sc, EMU_A_IOCFG, 4) | EMU_A_IOCFG_GPOUT_A, 4);
1965                 }
1966         } else {
1967                 /* EMU10K1 initialization code */
1968                 tmp = EMU_HCFG_AUDIOENABLE | EMU_HCFG_LOCKTANKCACHE_MASK
1969                     | EMU_HCFG_AUTOMUTE;
1970                 if (sc->rev >= 6)
1971                         tmp |= EMU_HCFG_JOYENABLE;
1972
1973                 emu_wr(sc, EMU_HCFG, tmp, 4);
1974
1975                 /* TOSLink detection */
1976                 sc->tos_link = 0;
1977                 tmp = emu_rd(sc, EMU_HCFG, 4);
1978                 if (tmp & (EMU_HCFG_GPINPUT0 | EMU_HCFG_GPINPUT1)) {
1979                         emu_wr(sc, EMU_HCFG, tmp | EMU_HCFG_GPOUT1, 4);
1980                         DELAY(50);
1981                         if (tmp != (emu_rd(sc, EMU_HCFG, 4) & ~EMU_HCFG_GPOUT1)) {
1982                                 sc->tos_link = 1;
1983                                 emu_wr(sc, EMU_HCFG, tmp, 4);
1984                         }
1985                 }
1986         }
1987
1988         return 0;
1989 }
1990
1991 static int
1992 emu_uninit(struct sc_info *sc)
1993 {
1994         u_int32_t ch;
1995
1996         emu_wr(sc, EMU_INTE, 0, 4);
1997         for (ch = 0; ch < NUM_G; ch++)
1998                 emu_wrptr(sc, ch, EMU_CHAN_DCYSUSV, ENV_OFF);
1999         for (ch = 0; ch < NUM_G; ch++) {
2000                 emu_wrptr(sc, ch, EMU_CHAN_VTFT, 0);
2001                 emu_wrptr(sc, ch, EMU_CHAN_CVCF, 0);
2002                 emu_wrptr(sc, ch, EMU_CHAN_PTRX, 0);
2003                 emu_wrptr(sc, ch, EMU_CHAN_CPF, 0);
2004         }
2005
2006         if (sc->audigy) {       /* stop fx processor */
2007                 emu_wrptr(sc, 0, EMU_A_DBG, EMU_A_DBG_SINGLE_STEP);
2008         }
2009
2010         /* disable audio and lock cache */
2011         emu_wr(sc, EMU_HCFG,
2012             EMU_HCFG_LOCKSOUNDCACHE | EMU_HCFG_LOCKTANKCACHE_MASK | EMU_HCFG_MUTEBUTTONENABLE,
2013             4);
2014
2015         emu_wrptr(sc, 0, EMU_PTB, 0);
2016         /* reset recording buffers */
2017         emu_wrptr(sc, 0, EMU_MICBS, EMU_RECBS_BUFSIZE_NONE);
2018         emu_wrptr(sc, 0, EMU_MICBA, 0);
2019         emu_wrptr(sc, 0, EMU_FXBS, EMU_RECBS_BUFSIZE_NONE);
2020         emu_wrptr(sc, 0, EMU_FXBA, 0);
2021         emu_wrptr(sc, 0, EMU_FXWC, 0);
2022         emu_wrptr(sc, 0, EMU_ADCBS, EMU_RECBS_BUFSIZE_NONE);
2023         emu_wrptr(sc, 0, EMU_ADCBA, 0);
2024         emu_wrptr(sc, 0, EMU_TCB, 0);
2025         emu_wrptr(sc, 0, EMU_TCBS, 0);
2026
2027         /* disable channel interrupt */
2028         emu_wrptr(sc, 0, EMU_CLIEL, 0);
2029         emu_wrptr(sc, 0, EMU_CLIEH, 0);
2030         emu_wrptr(sc, 0, EMU_SOLEL, 0);
2031         emu_wrptr(sc, 0, EMU_SOLEH, 0);
2032
2033         /* init envelope engine */
2034         if (!SLIST_EMPTY(&sc->mem.blocks))
2035                 device_printf(sc->dev, "warning: memblock list not empty\n");
2036         emu_free(sc, sc->mem.ptb_pages, sc->mem.ptb_map);
2037         emu_free(sc, sc->mem.silent_page, sc->mem.silent_map);
2038
2039         if(sc->mpu)
2040             mpu401_uninit(sc->mpu);
2041         return 0;
2042 }
2043
2044 static int
2045 emu_pci_probe(device_t dev)
2046 {
2047         char *s = NULL;
2048
2049         switch (pci_get_devid(dev)) {
2050         case EMU10K1_PCI_ID:
2051                 s = "Creative EMU10K1";
2052                 break;
2053
2054         case EMU10K2_PCI_ID:
2055                 if (pci_get_revid(dev) == 0x04)
2056                         s = "Creative Audigy 2 (EMU10K2)";
2057                 else
2058                         s = "Creative Audigy (EMU10K2)";
2059                 break;
2060
2061         case EMU10K3_PCI_ID:
2062                 s = "Creative Audigy 2 (EMU10K3)";
2063                 break;
2064
2065         default:
2066                 return ENXIO;
2067         }
2068
2069         device_set_desc(dev, s);
2070         return BUS_PROBE_LOW_PRIORITY;
2071 }
2072
2073 static int
2074 emu_pci_attach(device_t dev)
2075 {
2076         struct ac97_info *codec = NULL;
2077         struct sc_info *sc;
2078         int i, gotmic;
2079         char status[SND_STATUSLEN];
2080
2081         sc = malloc(sizeof(*sc), M_DEVBUF, M_WAITOK | M_ZERO);
2082         sc->lock = snd_mtxcreate(device_get_nameunit(dev), "snd_emu10k1 softc");
2083         sc->dev = dev;
2084         sc->type = pci_get_devid(dev);
2085         sc->rev = pci_get_revid(dev);
2086         sc->audigy = sc->type == EMU10K2_PCI_ID || sc->type == EMU10K3_PCI_ID;
2087         sc->audigy2 = (sc->audigy && sc->rev == 0x04);
2088         sc->nchans = sc->audigy ? 8 : 4;
2089         sc->addrmask = sc->audigy ? EMU_A_PTR_ADDR_MASK : EMU_PTR_ADDR_MASK;
2090
2091         pci_enable_busmaster(dev);
2092
2093         i = PCIR_BAR(0);
2094         sc->reg = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &i, RF_ACTIVE);
2095         if (sc->reg == NULL) {
2096                 device_printf(dev, "unable to map register space\n");
2097                 goto bad;
2098         }
2099         sc->st = rman_get_bustag(sc->reg);
2100         sc->sh = rman_get_bushandle(sc->reg);
2101
2102         sc->bufsz = pcm_getbuffersize(dev, 4096, EMU_DEFAULT_BUFSZ, 65536);
2103
2104         if (bus_dma_tag_create(/*parent*/bus_get_dma_tag(dev), /*alignment*/2,
2105                 /*boundary*/0,
2106                 /*lowaddr*/(1U << 31) - 1, /* can only access 0-2gb */
2107                 /*highaddr*/BUS_SPACE_MAXADDR,
2108                 /*filter*/NULL, /*filterarg*/NULL,
2109                 /*maxsize*/sc->bufsz, /*nsegments*/1, /*maxsegz*/0x3ffff,
2110                 /*flags*/0, /*lockfunc*/busdma_lock_mutex,
2111                 /*lockarg*/&Giant, &sc->parent_dmat) != 0) {
2112                 device_printf(dev, "unable to create dma tag\n");
2113                 goto bad;
2114         }
2115
2116         if (emu_init(sc) == -1) {
2117                 device_printf(dev, "unable to initialize the card\n");
2118                 goto bad;
2119         }
2120
2121         codec = AC97_CREATE(dev, sc, emu_ac97);
2122         if (codec == NULL) goto bad;
2123         gotmic = (ac97_getcaps(codec) & AC97_CAP_MICCHANNEL) ? 1 : 0;
2124         if (mixer_init(dev, ac97_getmixerclass(), codec) == -1) goto bad;
2125
2126         emu_midiattach(sc);
2127
2128         i = 0;
2129         sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &i,
2130             RF_ACTIVE | RF_SHAREABLE);
2131         if (!sc->irq ||
2132             snd_setup_intr(dev, sc->irq, INTR_MPSAFE, emu_intr, sc, &sc->ih)) {
2133                 device_printf(dev, "unable to map interrupt\n");
2134                 goto bad;
2135         }
2136
2137         snprintf(status, SND_STATUSLEN, "at io 0x%jx irq %jd %s",
2138             rman_get_start(sc->reg), rman_get_start(sc->irq),
2139             PCM_KLDSTRING(snd_emu10k1));
2140
2141         if (pcm_register(dev, sc, sc->nchans, gotmic ? 3 : 2)) goto bad;
2142         for (i = 0; i < sc->nchans; i++)
2143                 pcm_addchan(dev, PCMDIR_PLAY, &emupchan_class, sc);
2144         for (i = 0; i < (gotmic ? 3 : 2); i++)
2145                 pcm_addchan(dev, PCMDIR_REC, &emurchan_class, sc);
2146
2147         pcm_setstatus(dev, status);
2148
2149         return 0;
2150
2151 bad:
2152         if (codec) ac97_destroy(codec);
2153         if (sc->reg) bus_release_resource(dev, SYS_RES_IOPORT, PCIR_BAR(0), sc->reg);
2154         if (sc->ih) bus_teardown_intr(dev, sc->irq, sc->ih);
2155         if (sc->irq) bus_release_resource(dev, SYS_RES_IRQ, 0, sc->irq);
2156         if (sc->parent_dmat) bus_dma_tag_destroy(sc->parent_dmat);
2157         if (sc->lock) snd_mtxfree(sc->lock);
2158         free(sc, M_DEVBUF);
2159         return ENXIO;
2160 }
2161
2162 static int
2163 emu_pci_detach(device_t dev)
2164 {
2165         int r;
2166         struct sc_info *sc;
2167
2168         r = pcm_unregister(dev);
2169         if (r)
2170                 return r;
2171
2172         sc = pcm_getdevinfo(dev);
2173         /* shutdown chip */
2174         emu_uninit(sc);
2175
2176         bus_release_resource(dev, SYS_RES_IOPORT, PCIR_BAR(0), sc->reg);
2177         bus_teardown_intr(dev, sc->irq, sc->ih);
2178         bus_release_resource(dev, SYS_RES_IRQ, 0, sc->irq);
2179         bus_dma_tag_destroy(sc->parent_dmat);
2180         snd_mtxfree(sc->lock);
2181         free(sc, M_DEVBUF);
2182
2183         return 0;
2184 }
2185
2186 /* add suspend, resume */
2187 static device_method_t emu_methods[] = {
2188         /* Device interface */
2189         DEVMETHOD(device_probe,         emu_pci_probe),
2190         DEVMETHOD(device_attach,        emu_pci_attach),
2191         DEVMETHOD(device_detach,        emu_pci_detach),
2192
2193         DEVMETHOD_END
2194 };
2195
2196 static driver_t emu_driver = {
2197         "pcm",
2198         emu_methods,
2199         PCM_SOFTC_SIZE,
2200 };
2201
2202 DRIVER_MODULE(snd_emu10k1, pci, emu_driver, pcm_devclass, NULL, NULL);
2203 MODULE_DEPEND(snd_emu10k1, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
2204 MODULE_VERSION(snd_emu10k1, 1);
2205 MODULE_DEPEND(snd_emu10k1, midi, 1, 1, 1);
2206
2207 /* dummy driver to silence the joystick device */
2208 static int
2209 emujoy_pci_probe(device_t dev)
2210 {
2211         char *s = NULL;
2212
2213         switch (pci_get_devid(dev)) {
2214         case 0x70021102:
2215                 s = "Creative EMU10K1 Joystick";
2216                 device_quiet(dev);
2217                 break;
2218         case 0x70031102:
2219                 s = "Creative EMU10K2 Joystick";
2220                 device_quiet(dev);
2221                 break;
2222         }
2223
2224         if (s) device_set_desc(dev, s);
2225         return s ? -1000 : ENXIO;
2226 }
2227
2228 static int
2229 emujoy_pci_attach(device_t dev)
2230 {
2231
2232         return 0;
2233 }
2234
2235 static int
2236 emujoy_pci_detach(device_t dev)
2237 {
2238
2239         return 0;
2240 }
2241
2242 static device_method_t emujoy_methods[] = {
2243         DEVMETHOD(device_probe,         emujoy_pci_probe),
2244         DEVMETHOD(device_attach,        emujoy_pci_attach),
2245         DEVMETHOD(device_detach,        emujoy_pci_detach),
2246
2247         DEVMETHOD_END
2248 };
2249
2250 static driver_t emujoy_driver = {
2251         "emujoy",
2252         emujoy_methods,
2253         1       /* no softc */
2254 };
2255
2256 static devclass_t emujoy_devclass;
2257
2258 DRIVER_MODULE(emujoy, pci, emujoy_driver, emujoy_devclass, NULL, NULL);