xref: /openbmc/u-boot/drivers/i2c/mvtwsi.c (revision 16437a19)
1 /*
2  * Driver for the TWSI (i2c) controller found on the Marvell
3  * orion5x and kirkwood SoC families.
4  *
5  * Author: Albert Aribaud <albert.u.boot@aribaud.net>
6  * Copyright (c) 2010 Albert Aribaud.
7  *
8  * SPDX-License-Identifier:	GPL-2.0+
9  */
10 
11 #include <common.h>
12 #include <i2c.h>
13 #include <asm/errno.h>
14 #include <asm/io.h>
15 
16 /*
17  * include a file that will provide CONFIG_I2C_MVTWSI_BASE
18  * and possibly other settings
19  */
20 
21 #if defined(CONFIG_ORION5X)
22 #include <asm/arch/orion5x.h>
23 #elif (defined(CONFIG_KIRKWOOD) || defined(CONFIG_ARMADA_XP))
24 #include <asm/arch/soc.h>
25 #elif defined(CONFIG_SUNXI)
26 #include <asm/arch/i2c.h>
27 #else
28 #error Driver mvtwsi not supported by SoC or board
29 #endif
30 
31 /*
32  * TWSI register structure
33  */
34 
35 #ifdef CONFIG_SUNXI
36 
37 struct  mvtwsi_registers {
38 	u32 slave_address;
39 	u32 xtnd_slave_addr;
40 	u32 data;
41 	u32 control;
42 	u32 status;
43 	u32 baudrate;
44 	u32 soft_reset;
45 };
46 
47 #else
48 
49 struct  mvtwsi_registers {
50 	u32 slave_address;
51 	u32 data;
52 	u32 control;
53 	union {
54 		u32 status;	/* when reading */
55 		u32 baudrate;	/* when writing */
56 	};
57 	u32 xtnd_slave_addr;
58 	u32 reserved[2];
59 	u32 soft_reset;
60 };
61 
62 #endif
63 
64 /*
65  * Control register fields
66  */
67 
68 #define	MVTWSI_CONTROL_ACK	0x00000004
69 #define	MVTWSI_CONTROL_IFLG	0x00000008
70 #define	MVTWSI_CONTROL_STOP	0x00000010
71 #define	MVTWSI_CONTROL_START	0x00000020
72 #define	MVTWSI_CONTROL_TWSIEN	0x00000040
73 #define	MVTWSI_CONTROL_INTEN	0x00000080
74 
75 /*
76  * Status register values -- only those expected in normal master
77  * operation on non-10-bit-address devices; whatever status we don't
78  * expect in nominal conditions (bus errors, arbitration losses,
79  * missing ACKs...) we just pass back to the caller as an error
80  * code.
81  */
82 
83 #define	MVTWSI_STATUS_START		0x08
84 #define	MVTWSI_STATUS_REPEATED_START	0x10
85 #define	MVTWSI_STATUS_ADDR_W_ACK	0x18
86 #define	MVTWSI_STATUS_DATA_W_ACK	0x28
87 #define	MVTWSI_STATUS_ADDR_R_ACK	0x40
88 #define	MVTWSI_STATUS_ADDR_R_NAK	0x48
89 #define	MVTWSI_STATUS_DATA_R_ACK	0x50
90 #define	MVTWSI_STATUS_DATA_R_NAK	0x58
91 #define	MVTWSI_STATUS_IDLE		0xF8
92 
93 /*
94  * The single instance of the controller we'll be dealing with
95  */
96 
97 static struct  mvtwsi_registers *twsi =
98 	(struct  mvtwsi_registers *) CONFIG_I2C_MVTWSI_BASE;
99 
100 /*
101  * Returned statuses are 0 for success and nonzero otherwise.
102  * Currently, cmd_i2c and cmd_eeprom do not interpret an error status.
103  * Thus to ease debugging, the return status contains some debug info:
104  * - bits 31..24 are error class: 1 is timeout, 2 is 'status mismatch'.
105  * - bits 23..16 are the last value of the control register.
106  * - bits 15..8 are the last value of the status register.
107  * - bits 7..0 are the expected value of the status register.
108  */
109 
110 #define MVTWSI_ERROR_WRONG_STATUS	0x01
111 #define MVTWSI_ERROR_TIMEOUT		0x02
112 
113 #define MVTWSI_ERROR(ec, lc, ls, es) (((ec << 24) & 0xFF000000) | \
114 	((lc << 16) & 0x00FF0000) | ((ls<<8) & 0x0000FF00) | (es & 0xFF))
115 
116 /*
117  * Wait for IFLG to raise, or return 'timeout'; then if status is as expected,
118  * return 0 (ok) or return 'wrong status'.
119  */
120 static int twsi_wait(int expected_status)
121 {
122 	int control, status;
123 	int timeout = 1000;
124 
125 	do {
126 		control = readl(&twsi->control);
127 		if (control & MVTWSI_CONTROL_IFLG) {
128 			status = readl(&twsi->status);
129 			if (status == expected_status)
130 				return 0;
131 			else
132 				return MVTWSI_ERROR(
133 					MVTWSI_ERROR_WRONG_STATUS,
134 					control, status, expected_status);
135 		}
136 		udelay(10); /* one clock cycle at 100 kHz */
137 	} while (timeout--);
138 	status = readl(&twsi->status);
139 	return MVTWSI_ERROR(
140 		MVTWSI_ERROR_TIMEOUT, control, status, expected_status);
141 }
142 
143 /*
144  * These flags are ORed to any write to the control register
145  * They allow global setting of TWSIEN and ACK.
146  * By default none are set.
147  * twsi_start() sets TWSIEN (in case the controller was disabled)
148  * twsi_recv() sets ACK or resets it depending on expected status.
149  */
150 static u8 twsi_control_flags = MVTWSI_CONTROL_TWSIEN;
151 
152 /*
153  * Assert the START condition, either in a single I2C transaction
154  * or inside back-to-back ones (repeated starts).
155  */
156 static int twsi_start(int expected_status)
157 {
158 	/* globally set TWSIEN in case it was not */
159 	twsi_control_flags |= MVTWSI_CONTROL_TWSIEN;
160 	/* assert START */
161 	writel(twsi_control_flags | MVTWSI_CONTROL_START, &twsi->control);
162 	/* wait for controller to process START */
163 	return twsi_wait(expected_status);
164 }
165 
166 /*
167  * Send a byte (i2c address or data).
168  */
169 static int twsi_send(u8 byte, int expected_status)
170 {
171 	/* put byte in data register for sending */
172 	writel(byte, &twsi->data);
173 	/* clear any pending interrupt -- that'll cause sending */
174 	writel(twsi_control_flags, &twsi->control);
175 	/* wait for controller to receive byte and check ACK */
176 	return twsi_wait(expected_status);
177 }
178 
179 /*
180  * Receive a byte.
181  * Global mvtwsi_control_flags variable says if we should ack or nak.
182  */
183 static int twsi_recv(u8 *byte)
184 {
185 	int expected_status, status;
186 
187 	/* compute expected status based on ACK bit in global control flags */
188 	if (twsi_control_flags & MVTWSI_CONTROL_ACK)
189 		expected_status = MVTWSI_STATUS_DATA_R_ACK;
190 	else
191 		expected_status = MVTWSI_STATUS_DATA_R_NAK;
192 	/* acknowledge *previous state* and launch receive */
193 	writel(twsi_control_flags, &twsi->control);
194 	/* wait for controller to receive byte and assert ACK or NAK */
195 	status = twsi_wait(expected_status);
196 	/* if we did receive expected byte then store it */
197 	if (status == 0)
198 		*byte = readl(&twsi->data);
199 	/* return status */
200 	return status;
201 }
202 
203 /*
204  * Assert the STOP condition.
205  * This is also used to force the bus back in idle (SDA=SCL=1).
206  */
207 static int twsi_stop(int status)
208 {
209 	int control, stop_status;
210 	int timeout = 1000;
211 
212 	/* assert STOP */
213 	control = MVTWSI_CONTROL_TWSIEN | MVTWSI_CONTROL_STOP;
214 	writel(control, &twsi->control);
215 	/* wait for IDLE; IFLG won't rise so twsi_wait() is no use. */
216 	do {
217 		stop_status = readl(&twsi->status);
218 		if (stop_status == MVTWSI_STATUS_IDLE)
219 			break;
220 		udelay(10); /* one clock cycle at 100 kHz */
221 	} while (timeout--);
222 	control = readl(&twsi->control);
223 	if (stop_status != MVTWSI_STATUS_IDLE)
224 		if (status == 0)
225 			status = MVTWSI_ERROR(
226 				MVTWSI_ERROR_TIMEOUT,
227 				control, status, MVTWSI_STATUS_IDLE);
228 	return status;
229 }
230 
231 /*
232  * Ugly formula to convert m and n values to a frequency comes from
233  * TWSI specifications
234  */
235 
236 #define TWSI_FREQUENCY(m, n) \
237 	(CONFIG_SYS_TCLK / (10 * (m + 1) * (1 << n)))
238 
239 /*
240  * Reset controller.
241  * Controller reset also resets the baud rate and slave address, so
242  * they must be re-established afterwards.
243  */
244 static void twsi_reset(struct i2c_adapter *adap)
245 {
246 	/* ensure controller will be enabled by any twsi*() function */
247 	twsi_control_flags = MVTWSI_CONTROL_TWSIEN;
248 	/* reset controller */
249 	writel(0, &twsi->soft_reset);
250 	/* wait 2 ms -- this is what the Marvell LSP does */
251 	udelay(20000);
252 }
253 
254 /*
255  * I2C init called by cmd_i2c when doing 'i2c reset'.
256  * Sets baud to the highest possible value not exceeding requested one.
257  */
258 static unsigned int twsi_i2c_set_bus_speed(struct i2c_adapter *adap,
259 					   unsigned int requested_speed)
260 {
261 	unsigned int tmp_speed, highest_speed, n, m;
262 	unsigned int baud = 0x44; /* baudrate at controller reset */
263 
264 	/* use actual speed to collect progressively higher values */
265 	highest_speed = 0;
266 	/* compute m, n setting for highest speed not above requested speed */
267 	for (n = 0; n < 8; n++) {
268 		for (m = 0; m < 16; m++) {
269 			tmp_speed = TWSI_FREQUENCY(m, n);
270 			if ((tmp_speed <= requested_speed)
271 			 && (tmp_speed > highest_speed)) {
272 				highest_speed = tmp_speed;
273 				baud = (m << 3) | n;
274 			}
275 		}
276 	}
277 	writel(baud, &twsi->baudrate);
278 	return 0;
279 }
280 
281 static void twsi_i2c_init(struct i2c_adapter *adap, int speed, int slaveadd)
282 {
283 	/* reset controller */
284 	twsi_reset(adap);
285 	/* set speed */
286 	twsi_i2c_set_bus_speed(adap, speed);
287 	/* set slave address even though we don't use it */
288 	writel(slaveadd, &twsi->slave_address);
289 	writel(0, &twsi->xtnd_slave_addr);
290 	/* assert STOP but don't care for the result */
291 	(void) twsi_stop(0);
292 }
293 
294 /*
295  * Begin I2C transaction with expected start status, at given address.
296  * Common to i2c_probe, i2c_read and i2c_write.
297  * Expected address status will derive from direction bit (bit 0) in addr.
298  */
299 static int i2c_begin(int expected_start_status, u8 addr)
300 {
301 	int status, expected_addr_status;
302 
303 	/* compute expected address status from direction bit in addr */
304 	if (addr & 1) /* reading */
305 		expected_addr_status = MVTWSI_STATUS_ADDR_R_ACK;
306 	else /* writing */
307 		expected_addr_status = MVTWSI_STATUS_ADDR_W_ACK;
308 	/* assert START */
309 	status = twsi_start(expected_start_status);
310 	/* send out the address if the start went well */
311 	if (status == 0)
312 		status = twsi_send(addr, expected_addr_status);
313 	/* return ok or status of first failure to caller */
314 	return status;
315 }
316 
317 /*
318  * I2C probe called by cmd_i2c when doing 'i2c probe'.
319  * Begin read, nak data byte, end.
320  */
321 static int twsi_i2c_probe(struct i2c_adapter *adap, uchar chip)
322 {
323 	u8 dummy_byte;
324 	int status;
325 
326 	/* begin i2c read */
327 	status = i2c_begin(MVTWSI_STATUS_START, (chip << 1) | 1);
328 	/* dummy read was accepted: receive byte but NAK it. */
329 	if (status == 0)
330 		status = twsi_recv(&dummy_byte);
331 	/* Stop transaction */
332 	twsi_stop(0);
333 	/* return 0 or status of first failure */
334 	return status;
335 }
336 
337 /*
338  * I2C read called by cmd_i2c when doing 'i2c read' and by cmd_eeprom.c
339  * Begin write, send address byte(s), begin read, receive data bytes, end.
340  *
341  * NOTE: some EEPROMS want a stop right before the second start, while
342  * some will choke if it is there. Deciding which we should do is eeprom
343  * stuff, not i2c, but at the moment the APIs won't let us put it in
344  * cmd_eeprom, so we have to choose here, and for the moment that'll be
345  * a repeated start without a preceding stop.
346  */
347 static int twsi_i2c_read(struct i2c_adapter *adap, uchar chip, uint addr,
348 			int alen, uchar *data, int length)
349 {
350 	int status;
351 
352 	/* begin i2c write to send the address bytes */
353 	status = i2c_begin(MVTWSI_STATUS_START, (chip << 1));
354 	/* send addr bytes */
355 	while ((status == 0) && alen--)
356 		status = twsi_send(addr >> (8*alen),
357 			MVTWSI_STATUS_DATA_W_ACK);
358 	/* begin i2c read to receive eeprom data bytes */
359 	if (status == 0)
360 		status = i2c_begin(
361 			MVTWSI_STATUS_REPEATED_START, (chip << 1) | 1);
362 	/* prepare ACK if at least one byte must be received */
363 	if (length > 0)
364 		twsi_control_flags |= MVTWSI_CONTROL_ACK;
365 	/* now receive actual bytes */
366 	while ((status == 0) && length--) {
367 		/* reset NAK if we if no more to read now */
368 		if (length == 0)
369 			twsi_control_flags &= ~MVTWSI_CONTROL_ACK;
370 		/* read current byte */
371 		status = twsi_recv(data++);
372 	}
373 	/* Stop transaction */
374 	status = twsi_stop(status);
375 	/* return 0 or status of first failure */
376 	return status;
377 }
378 
379 /*
380  * I2C write called by cmd_i2c when doing 'i2c write' and by cmd_eeprom.c
381  * Begin write, send address byte(s), send data bytes, end.
382  */
383 static int twsi_i2c_write(struct i2c_adapter *adap, uchar chip, uint addr,
384 			int alen, uchar *data, int length)
385 {
386 	int status;
387 
388 	/* begin i2c write to send the eeprom adress bytes then data bytes */
389 	status = i2c_begin(MVTWSI_STATUS_START, (chip << 1));
390 	/* send addr bytes */
391 	while ((status == 0) && alen--)
392 		status = twsi_send(addr >> (8*alen),
393 			MVTWSI_STATUS_DATA_W_ACK);
394 	/* send data bytes */
395 	while ((status == 0) && (length-- > 0))
396 		status = twsi_send(*(data++), MVTWSI_STATUS_DATA_W_ACK);
397 	/* Stop transaction */
398 	status = twsi_stop(status);
399 	/* return 0 or status of first failure */
400 	return status;
401 }
402 
403 U_BOOT_I2C_ADAP_COMPLETE(twsi0, twsi_i2c_init, twsi_i2c_probe,
404 			 twsi_i2c_read, twsi_i2c_write,
405 			 twsi_i2c_set_bus_speed,
406 			 CONFIG_SYS_I2C_SPEED, CONFIG_SYS_I2C_SLAVE, 0)
407