Home | History | Annotate | Line # | Download | only in dev
      1 /*	$NetBSD: uda1341.c,v 1.18 2023/12/20 14:50:02 thorpej Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2001 The NetBSD Foundation, Inc.  All rights reserved.
      5  *
      6  * This code is derived from software contributed to The NetBSD Foundation
      7  * by Ichiro FUKUHARA (ichiro (at) ichiro.org).
      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 NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     19  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     20  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     21  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     22  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     23  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     24  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     25  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     26  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     27  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     28  * POSSIBILITY OF SUCH DAMAGE.
     29  */
     30 
     31 #include <sys/cdefs.h>
     32 __KERNEL_RCSID(0, "$NetBSD: uda1341.c,v 1.18 2023/12/20 14:50:02 thorpej Exp $");
     33 
     34 #include <sys/param.h>
     35 #include <sys/systm.h>
     36 #include <sys/types.h>
     37 #include <sys/conf.h>
     38 #include <sys/file.h>
     39 #include <sys/device.h>
     40 #include <sys/kernel.h>
     41 #include <sys/kthread.h>
     42 #include <sys/bus.h>
     43 
     44 #include <hpcarm/dev/ipaq_saipvar.h>
     45 #include <hpcarm/dev/ipaq_gpioreg.h>
     46 #include <hpcarm/dev/uda1341.h>
     47 
     48 #include <arm/sa11x0/sa11x0_gpioreg.h>
     49 #include <arm/sa11x0/sa11x0_sspreg.h>
     50 
     51 struct uda1341_softc {
     52 	device_t		sc_dev;
     53 	bus_space_tag_t		sc_iot;
     54 	bus_space_handle_t	sc_ioh;
     55 	struct ipaq_softc	*sc_parent;
     56 };
     57 
     58 static	int	uda1341_match(device_t, cfdata_t, void *);
     59 static	void	uda1341_attach(device_t, device_t, void *);
     60 static	int	uda1341_print(void *, const char *);
     61 static	int	uda1341_search(device_t, cfdata_t, const int *, void *);
     62 
     63 static	void	uda1341_output_high(struct uda1341_softc *);
     64 static	void	uda1341_output_low(struct uda1341_softc *);
     65 static	void	uda1341_L3_init(struct uda1341_softc *);
     66 static	void	uda1341_init(struct uda1341_softc *);
     67 static	void	uda1341_reset(struct uda1341_softc *);
     68 static	void	uda1341_reginit(struct uda1341_softc *);
     69 
     70 #if 0
     71 static	int	L3_getbit(struct uda1341_softc *);
     72 #endif
     73 static	void	L3_sendbit(struct uda1341_softc *, int);
     74 #if 0
     75 static	uint8_t L3_getbyte(struct uda1341_softc *, int);
     76 #endif
     77 static	void	L3_sendbyte(struct uda1341_softc *, uint8_t, int);
     78 #if 0
     79 static	int	L3_read(struct uda1341_softc *, uint8_t, uint8_t *, int);
     80 #endif
     81 static	int	L3_write(struct uda1341_softc *, uint8_t, uint8_t *, int);
     82 
     83 CFATTACH_DECL_NEW(uda, sizeof(struct uda1341_softc),
     84     uda1341_match, uda1341_attach, NULL, NULL);
     85 
     86 /*
     87  * Philips L3 bus support.
     88  * GPIO lines are used for clock, data and mode pins.
     89  */
     90 #define L3_DATA		GPIO_H3600_L3_DATA
     91 #define L3_MODE		GPIO_H3600_L3_MODE
     92 #define L3_CLK		GPIO_H3600_L3_CLK
     93 
     94 static struct {
     95 	uint8_t data0;	/* direct addressing register */
     96 } DIRECT_REG = {0};
     97 
     98 static struct {
     99 	uint8_t data0;	/* extended addressing register 1 */
    100 	uint8_t data1;	/* extended addressing register 2 */
    101 } EXTEND_REG = {0, 0};
    102 
    103 /*
    104  * register space access macros
    105  */
    106 #define GPIO_WRITE(sc, reg, val) \
    107 	bus_space_write_4(sc->sc_iot, sc->sc_parent->sc_gpioh, reg, val)
    108 #define GPIO_READ(sc, reg) \
    109 	bus_space_read_4(sc->sc_iot, sc->sc_parent->sc_gpioh, reg)
    110 #define EGPIO_WRITE(sc) \
    111 	bus_space_write_2(sc->sc_iot, sc->sc_parent->sc_egpioh, \
    112 			  0, sc->sc_parent->ipaq_egpio)
    113 #define SSP_WRITE(sc, reg, val) \
    114 	bus_space_write_4(sc->sc_iot, sc->sc_parent->sc_ssph, reg, val)
    115 
    116 static int
    117 uda1341_match(device_t parent, cfdata_t cf, void *aux)
    118 {
    119 	return (1);
    120 }
    121 
    122 static void
    123 uda1341_attach(device_t parent, device_t self, void *aux)
    124 {
    125 	struct uda1341_softc *sc = device_private(self);
    126 	struct ipaq_softc *psc = device_private(parent);
    127 
    128 	aprint_normal("\n");
    129 	aprint_normal_dev(self, "UDA1341 CODEC\n");
    130 
    131 	sc->sc_dev = self;
    132 	sc->sc_iot = psc->sc_iot;
    133 	sc->sc_ioh = psc->sc_ioh;
    134 	sc->sc_parent = psc;
    135 
    136 	uda1341_L3_init(sc);
    137 	uda1341_init(sc);
    138 
    139 	uda1341_reset(sc);
    140 
    141 	uda1341_reginit(sc);
    142 
    143 
    144 	/*
    145 	 *  Attach each devices
    146 	 */
    147 
    148 	config_search(self, NULL,
    149 	    CFARGS(.search = uda1341_search));
    150 }
    151 
    152 static int
    153 uda1341_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux)
    154 {
    155 	if (config_probe(parent, cf, NULL))
    156 		config_attach(parent, cf, NULL, uda1341_print, CFARGS_NONE);
    157 	return 0;
    158 }
    159 
    160 
    161 static int
    162 uda1341_print(void *aux, const char *name)
    163 {
    164 	return (UNCONF);
    165 }
    166 
    167 static void
    168 uda1341_output_high(struct uda1341_softc *sc)
    169 {
    170 	int cr;
    171 
    172 	GPIO_WRITE(sc, SAGPIO_PSR, (L3_DATA | L3_MODE | L3_CLK));
    173 	cr = GPIO_READ(sc, SAGPIO_PDR) | (L3_DATA | L3_MODE | L3_CLK);
    174 	GPIO_WRITE(sc, SAGPIO_PDR, cr);
    175 }
    176 
    177 static void
    178 uda1341_output_low(struct uda1341_softc *sc)
    179 {
    180 	int cr;
    181 
    182 	cr = GPIO_READ(sc, SAGPIO_PDR);
    183 	cr &= ~(L3_DATA | L3_MODE | L3_CLK);
    184 	GPIO_WRITE(sc, SAGPIO_PDR, cr);
    185 }
    186 
    187 static void
    188 uda1341_L3_init(struct uda1341_softc *sc)
    189 {
    190 	int cr;
    191 
    192 	cr = GPIO_READ(sc, SAGPIO_AFR);
    193 	cr &= ~(L3_DATA | L3_MODE | L3_CLK);
    194 	GPIO_WRITE(sc, SAGPIO_AFR, cr);
    195 
    196 	uda1341_output_low(sc);
    197 }
    198 
    199 static void
    200 uda1341_init(struct uda1341_softc *sc)
    201 {
    202 	int cr;
    203 
    204 	/* GPIO initialize */
    205 	cr = GPIO_READ(sc, SAGPIO_AFR);
    206 	cr &= ~(GPIO_ALT_SSP_TXD | GPIO_ALT_SSP_RXD | GPIO_ALT_SSP_SCLK |
    207 		GPIO_ALT_SSP_SFRM);
    208 	cr |= GPIO_ALT_SSP_CLK;
    209 	GPIO_WRITE(sc, SAGPIO_AFR, cr);
    210 
    211 	cr = GPIO_READ(sc, SAGPIO_PDR);
    212 	cr &= ~GPIO_ALT_SSP_CLK;
    213 	GPIO_WRITE(sc, SAGPIO_PDR, cr);
    214 
    215 	/* SSP initialize & enable */
    216 	SSP_WRITE(sc, SASSP_CR1, CR1_ECS);
    217 	cr = 0xF | (CR0_FRF_MASK & (1<<4)) | (CR0_SCR_MASK & (3<<8)) | CR0_SSE;
    218 	SSP_WRITE(sc, SASSP_CR0, cr);
    219 
    220 	/* Enable the audio power */
    221 	sc->sc_parent->ipaq_egpio |=
    222 			(EGPIO_H3600_AUD_PWRON | EGPIO_H3600_AUD_ON);
    223 	sc->sc_parent->ipaq_egpio &=
    224 			~(EGPIO_H3600_CODEC_RESET | EGPIO_H3600_QMUTE);
    225 	EGPIO_WRITE(sc);
    226 
    227 	/* external clock configured for 44100 samples/sec */
    228 	cr = GPIO_READ(sc, SAGPIO_PDR);
    229 	cr |= (GPIO_H3600_CLK_SET0 | GPIO_H3600_CLK_SET1);
    230 	GPIO_WRITE(sc, SAGPIO_PDR, cr);
    231 	GPIO_WRITE(sc, SAGPIO_PSR, GPIO_H3600_CLK_SET0);
    232 	GPIO_WRITE(sc, SAGPIO_PCR, GPIO_H3600_CLK_SET1);
    233 
    234 	/* wait for power on */
    235 	delay(100*1000);
    236 	sc->sc_parent->ipaq_egpio |= EGPIO_H3600_CODEC_RESET;
    237 	EGPIO_WRITE(sc);
    238 
    239 	/* Wait for the UDA1341 to wake up */
    240 	delay(100*1000);
    241 }
    242 
    243 static void
    244 uda1341_reset(struct uda1341_softc *sc)
    245 {
    246 	uint8_t command;
    247 
    248 	command = (L3_ADDRESS_COM << 2) | L3_ADDRESS_STATUS;
    249 	DIRECT_REG.data0 = STATUS0_RST | STATUS0_SC_256 | STATUS0_IF_LSB16;
    250 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    251 
    252 	sc->sc_parent->ipaq_egpio &= ~EGPIO_H3600_CODEC_RESET;
    253 	EGPIO_WRITE(sc);
    254 	sc->sc_parent->ipaq_egpio |= EGPIO_H3600_CODEC_RESET;
    255 	EGPIO_WRITE(sc);
    256 
    257 	DIRECT_REG.data0 &= ~STATUS0_RST;
    258 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    259 }
    260 
    261 static void
    262 uda1341_reginit(struct uda1341_softc *sc)
    263 {
    264 	uint8_t command;
    265 
    266 	/* STATUS 0 */
    267 	command = (L3_ADDRESS_COM << 2) | L3_ADDRESS_STATUS;
    268 	DIRECT_REG.data0 = STATUS0_SC_256 | STATUS0_IF_LSB16;
    269 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    270 
    271 	/* STATUS 1 */
    272 	DIRECT_REG.data0 = STATUS1_OGS | STATUS1_IGS | (1<<7);
    273 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    274 
    275 	/* DATA 0 */
    276 	command = (L3_ADDRESS_COM << 2) | L3_ADDRESS_DATA0;
    277 	DIRECT_REG.data0 = DATA0_VC(100) | DATA0_COMMON;
    278 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    279 
    280 	/* DATA 1 */
    281 	DIRECT_REG.data0 = DATA1_BB(0) | DATA1_TR(0) | DATA1_COMMON;
    282 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    283 
    284 	/* DATA 2*/
    285 	DIRECT_REG.data0 = DATA2_PP | DATA2_COMMON;
    286 	L3_write(sc, command, (uint8_t *) &DIRECT_REG, 1);
    287 
    288 	/* Extended DATA 0 */
    289 	EXTEND_REG.data0 = EXT_ADDR_COMMON | EXT_ADDR_E0;
    290 	EXTEND_REG.data1 = EXT_DATA_COMMN | 0x4 ;
    291 	L3_write(sc, command, (uint8_t *) &EXTEND_REG, 2);
    292 
    293 	/* Extended DATA 1 */
    294 	EXTEND_REG.data0 = EXT_ADDR_COMMON | EXT_ADDR_E1;
    295 	EXTEND_REG.data1 = EXT_DATA_COMMN | 0x4 ;
    296 	L3_write(sc, command, (uint8_t *) &EXTEND_REG, 2);
    297 
    298 	/* Extended DATA 2 */
    299 	EXTEND_REG.data0 = EXT_ADDR_COMMON | EXT_ADDR_E2;
    300 	EXTEND_REG.data1 = EXT_DATA_COMMN | DATA_E2_MS(30);
    301 	L3_write(sc, command, (uint8_t *) &EXTEND_REG, 2);
    302 
    303 	/* Extended DATA 3 */
    304 	EXTEND_REG.data0 = EXT_ADDR_COMMON | EXT_ADDR_E3;
    305 	EXTEND_REG.data1 = EXT_DATA_COMMN | DATA_E3_IG_L(0);
    306 	L3_write(sc, command, (uint8_t *) &EXTEND_REG, 2);
    307 
    308 	/* Extended DATA 4 */
    309 	EXTEND_REG.data0 = EXT_ADDR_COMMON | EXT_ADDR_E4;
    310 	EXTEND_REG.data1 = EXT_DATA_COMMN | DATA_E4_IG_H(0);
    311 	L3_write(sc, command, (uint8_t *) &EXTEND_REG, 2);
    312 
    313 	/* Extended DATA 5 */
    314 	EXTEND_REG.data0 = EXT_ADDR_COMMON | EXT_ADDR_E5;
    315 	EXTEND_REG.data1 = EXT_DATA_COMMN;
    316 	L3_write(sc, command, (uint8_t *) &EXTEND_REG, 2);
    317 }
    318 
    319 #if 0
    320 static int
    321 L3_getbit(struct uda1341_softc *sc)
    322 {
    323 	int cr, data;
    324 
    325 	GPIO_WRITE(sc, SAGPIO_PCR, L3_CLK);	/* Clock down */
    326 	delay(L3_CLK_LOW);
    327 
    328 	cr = GPIO_READ(sc, SAGPIO_PLR);
    329 	data = (cr & L3_DATA) ? 1 : 0;
    330 
    331 	GPIO_WRITE(sc, SAGPIO_PSR, L3_CLK);	/* Clock up */
    332 	delay(L3_CLK_HIGH);
    333 
    334 	return (data);
    335 }
    336 #endif
    337 
    338 static void
    339 L3_sendbit(struct uda1341_softc *sc, int bit)
    340 {
    341 	GPIO_WRITE(sc, SAGPIO_PCR, L3_CLK);	/* Clock down */
    342 
    343 	if (bit & 0x01)
    344 		GPIO_WRITE(sc, SAGPIO_PSR, L3_DATA);
    345 	else
    346 		GPIO_WRITE(sc, SAGPIO_PCR, L3_DATA);
    347 
    348 	delay(L3_CLK_LOW);
    349 	GPIO_WRITE(sc, SAGPIO_PSR, L3_CLK);     /* Clock up */
    350 	delay(L3_CLK_HIGH);
    351 }
    352 
    353 #if 0
    354 static uint8_t
    355 L3_getbyte(struct uda1341_softc *sc, int mode)
    356 {
    357 	int i;
    358 	uint8_t data;
    359 
    360 	switch (mode) {
    361 	case 0:		/* Address mode */
    362 	case 1:		/* First data byte */
    363 		break;
    364 	default:	/* second data byte via halt-Time */
    365 		GPIO_WRITE(sc, SAGPIO_PCR, L3_CLK);     /* Clock down */
    366 		delay(L3_HALT);
    367 		GPIO_WRITE(sc, SAGPIO_PSR, L3_CLK);	/* Clock up */
    368 		break;
    369 	}
    370 
    371 	delay(L3_MODE_SETUP);
    372 
    373 	for (i = 0; i < 8; i++)
    374 		data |= (L3_getbit(sc) << i);
    375 
    376 	delay(L3_MODE_HOLD);
    377 
    378 	return (data);
    379 }
    380 #endif
    381 
    382 static void
    383 L3_sendbyte(struct uda1341_softc *sc, uint8_t data, int mode)
    384 {
    385 	int i;
    386 
    387 	switch (mode) {
    388 	case 0:		/* Address mode */
    389 		GPIO_WRITE(sc, SAGPIO_PCR, L3_CLK);	/* Clock down */
    390 		break;
    391 	case 1:		/* First data byte */
    392 		break;
    393 	default:	/* second data byte via halt-Time */
    394 		GPIO_WRITE(sc, SAGPIO_PCR, L3_CLK);     /* Clock down */
    395 		delay(L3_HALT);
    396 		GPIO_WRITE(sc, SAGPIO_PSR, L3_CLK);	/* Clock up */
    397 		break;
    398 	}
    399 
    400 	delay(L3_MODE_SETUP);
    401 
    402 	for (i = 0; i < 8; i++)
    403 		L3_sendbit(sc, data >> i);
    404 
    405 	if (mode == 0)		/* Address mode */
    406 		GPIO_WRITE(sc, SAGPIO_PSR, L3_CLK);	/* Clock up */
    407 
    408 	delay(L3_MODE_HOLD);
    409 }
    410 
    411 #if 0
    412 static int
    413 L3_read(struct uda1341_softc *sc, uint8_t addr, uint8_t *data, int len)
    414 {
    415 	int cr, mode;
    416 	mode = 0;
    417 
    418 	uda1341_output_high(sc);
    419 	L3_sendbyte(sc, addr, mode++);
    420 
    421 	cr = GPIO_READ(sc, SAGPIO_PDR);
    422 	cr &= ~(L3_DATA);
    423 	GPIO_WRITE(sc, SAGPIO_PDR, cr);
    424 
    425 	while(len--)
    426 		*data++ = L3_getbyte(sc, mode++);
    427 	uda1341_output_low(sc);
    428 
    429 	return len;
    430 }
    431 #endif
    432 
    433 static int
    434 L3_write(struct uda1341_softc *sc, uint8_t addr, uint8_t *data, int len)
    435 {
    436 	int mode = 0;
    437 
    438 	uda1341_output_high(sc);
    439 	L3_sendbyte(sc, addr, mode++);
    440 	while(len--)
    441 		L3_sendbyte(sc, *data++, mode++);
    442 	uda1341_output_low(sc);
    443 
    444 	return len;
    445 }
    446