xref: /openbmc/u-boot/drivers/i2c/mvtwsi.c (revision 412ae53a)
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 static unsigned int twsi_calc_freq(const int n, const int m)
232 {
233 #ifdef CONFIG_SUNXI
234 	return CONFIG_SYS_TCLK / (10 * (m + 1) * (1 << n));
235 #else
236 	return CONFIG_SYS_TCLK / (10 * (m + 1) * (2 << n));
237 #endif
238 }
239 
240 /*
241  * Reset controller.
242  * Controller reset also resets the baud rate and slave address, so
243  * they must be re-established afterwards.
244  */
245 static void twsi_reset(struct i2c_adapter *adap)
246 {
247 	/* ensure controller will be enabled by any twsi*() function */
248 	twsi_control_flags = MVTWSI_CONTROL_TWSIEN;
249 	/* reset controller */
250 	writel(0, &twsi->soft_reset);
251 	/* wait 2 ms -- this is what the Marvell LSP does */
252 	udelay(20000);
253 }
254 
255 /*
256  * I2C init called by cmd_i2c when doing 'i2c reset'.
257  * Sets baud to the highest possible value not exceeding requested one.
258  */
259 static unsigned int twsi_i2c_set_bus_speed(struct i2c_adapter *adap,
260 					   unsigned int requested_speed)
261 {
262 	unsigned int tmp_speed, highest_speed, n, m;
263 	unsigned int baud = 0x44; /* baudrate at controller reset */
264 
265 	/* use actual speed to collect progressively higher values */
266 	highest_speed = 0;
267 	/* compute m, n setting for highest speed not above requested speed */
268 	for (n = 0; n < 8; n++) {
269 		for (m = 0; m < 16; m++) {
270 			tmp_speed = twsi_calc_freq(n, m);
271 			if ((tmp_speed <= requested_speed)
272 			 && (tmp_speed > highest_speed)) {
273 				highest_speed = tmp_speed;
274 				baud = (m << 3) | n;
275 			}
276 		}
277 	}
278 	writel(baud, &twsi->baudrate);
279 	return 0;
280 }
281 
282 static void twsi_i2c_init(struct i2c_adapter *adap, int speed, int slaveadd)
283 {
284 	/* reset controller */
285 	twsi_reset(adap);
286 	/* set speed */
287 	twsi_i2c_set_bus_speed(adap, speed);
288 	/* set slave address even though we don't use it */
289 	writel(slaveadd, &twsi->slave_address);
290 	writel(0, &twsi->xtnd_slave_addr);
291 	/* assert STOP but don't care for the result */
292 	(void) twsi_stop(0);
293 }
294 
295 /*
296  * Begin I2C transaction with expected start status, at given address.
297  * Common to i2c_probe, i2c_read and i2c_write.
298  * Expected address status will derive from direction bit (bit 0) in addr.
299  */
300 static int i2c_begin(int expected_start_status, u8 addr)
301 {
302 	int status, expected_addr_status;
303 
304 	/* compute expected address status from direction bit in addr */
305 	if (addr & 1) /* reading */
306 		expected_addr_status = MVTWSI_STATUS_ADDR_R_ACK;
307 	else /* writing */
308 		expected_addr_status = MVTWSI_STATUS_ADDR_W_ACK;
309 	/* assert START */
310 	status = twsi_start(expected_start_status);
311 	/* send out the address if the start went well */
312 	if (status == 0)
313 		status = twsi_send(addr, expected_addr_status);
314 	/* return ok or status of first failure to caller */
315 	return status;
316 }
317 
318 /*
319  * I2C probe called by cmd_i2c when doing 'i2c probe'.
320  * Begin read, nak data byte, end.
321  */
322 static int twsi_i2c_probe(struct i2c_adapter *adap, uchar chip)
323 {
324 	u8 dummy_byte;
325 	int status;
326 
327 	/* begin i2c read */
328 	status = i2c_begin(MVTWSI_STATUS_START, (chip << 1) | 1);
329 	/* dummy read was accepted: receive byte but NAK it. */
330 	if (status == 0)
331 		status = twsi_recv(&dummy_byte);
332 	/* Stop transaction */
333 	twsi_stop(0);
334 	/* return 0 or status of first failure */
335 	return status;
336 }
337 
338 /*
339  * I2C read called by cmd_i2c when doing 'i2c read' and by cmd_eeprom.c
340  * Begin write, send address byte(s), begin read, receive data bytes, end.
341  *
342  * NOTE: some EEPROMS want a stop right before the second start, while
343  * some will choke if it is there. Deciding which we should do is eeprom
344  * stuff, not i2c, but at the moment the APIs won't let us put it in
345  * cmd_eeprom, so we have to choose here, and for the moment that'll be
346  * a repeated start without a preceding stop.
347  */
348 static int twsi_i2c_read(struct i2c_adapter *adap, uchar chip, uint addr,
349 			int alen, uchar *data, int length)
350 {
351 	int status;
352 
353 	/* begin i2c write to send the address bytes */
354 	status = i2c_begin(MVTWSI_STATUS_START, (chip << 1));
355 	/* send addr bytes */
356 	while ((status == 0) && alen--)
357 		status = twsi_send(addr >> (8*alen),
358 			MVTWSI_STATUS_DATA_W_ACK);
359 	/* begin i2c read to receive eeprom data bytes */
360 	if (status == 0)
361 		status = i2c_begin(
362 			MVTWSI_STATUS_REPEATED_START, (chip << 1) | 1);
363 	/* prepare ACK if at least one byte must be received */
364 	if (length > 0)
365 		twsi_control_flags |= MVTWSI_CONTROL_ACK;
366 	/* now receive actual bytes */
367 	while ((status == 0) && length--) {
368 		/* reset NAK if we if no more to read now */
369 		if (length == 0)
370 			twsi_control_flags &= ~MVTWSI_CONTROL_ACK;
371 		/* read current byte */
372 		status = twsi_recv(data++);
373 	}
374 	/* Stop transaction */
375 	status = twsi_stop(status);
376 	/* return 0 or status of first failure */
377 	return status;
378 }
379 
380 /*
381  * I2C write called by cmd_i2c when doing 'i2c write' and by cmd_eeprom.c
382  * Begin write, send address byte(s), send data bytes, end.
383  */
384 static int twsi_i2c_write(struct i2c_adapter *adap, uchar chip, uint addr,
385 			int alen, uchar *data, int length)
386 {
387 	int status;
388 
389 	/* begin i2c write to send the eeprom adress bytes then data bytes */
390 	status = i2c_begin(MVTWSI_STATUS_START, (chip << 1));
391 	/* send addr bytes */
392 	while ((status == 0) && alen--)
393 		status = twsi_send(addr >> (8*alen),
394 			MVTWSI_STATUS_DATA_W_ACK);
395 	/* send data bytes */
396 	while ((status == 0) && (length-- > 0))
397 		status = twsi_send(*(data++), MVTWSI_STATUS_DATA_W_ACK);
398 	/* Stop transaction */
399 	status = twsi_stop(status);
400 	/* return 0 or status of first failure */
401 	return status;
402 }
403 
404 U_BOOT_I2C_ADAP_COMPLETE(twsi0, twsi_i2c_init, twsi_i2c_probe,
405 			 twsi_i2c_read, twsi_i2c_write,
406 			 twsi_i2c_set_bus_speed,
407 			 CONFIG_SYS_I2C_SPEED, CONFIG_SYS_I2C_SLAVE, 0)
408