i2c-s3c2410.c 28.6 KB
Newer Older
L
Linus Torvalds 已提交
1 2
/* linux/drivers/i2c/busses/i2c-s3c2410.c
 *
3
 * Copyright (C) 2004,2005,2009 Simtec Electronics
L
Linus Torvalds 已提交
4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
 *	Ben Dooks <ben@simtec.co.uk>
 *
 * S3C2410 I2C Controller
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

#include <linux/kernel.h>
#include <linux/module.h>

#include <linux/i2c.h>
#include <linux/init.h>
#include <linux/time.h>
#include <linux/interrupt.h>
#include <linux/delay.h>
#include <linux/errno.h>
#include <linux/err.h>
33
#include <linux/platform_device.h>
34
#include <linux/pm_runtime.h>
35
#include <linux/clk.h>
36
#include <linux/cpufreq.h>
37
#include <linux/slab.h>
38
#include <linux/io.h>
39 40
#include <linux/of_i2c.h>
#include <linux/of_gpio.h>
41
#include <linux/pinctrl/consumer.h>
L
Linus Torvalds 已提交
42 43 44

#include <asm/irq.h>

45
#include <plat/regs-iic.h>
46
#include <linux/platform_data/i2c-s3c2410.h>
L
Linus Torvalds 已提交
47

48 49
/* Treat S3C2410 as baseline hardware, anything else is supported via quirks */
#define QUIRK_S3C2440		(1 << 0)
50 51
#define QUIRK_HDMIPHY		(1 << 1)
#define QUIRK_NO_GPIO		(1 << 2)
L
Linus Torvalds 已提交
52

53 54 55
/* Max time to wait for bus to become idle after a xfer (in us) */
#define S3C2410_IDLE_TIMEOUT	5000

56
/* i2c controller state */
L
Linus Torvalds 已提交
57 58 59 60 61 62 63 64 65 66
enum s3c24xx_i2c_state {
	STATE_IDLE,
	STATE_START,
	STATE_READ,
	STATE_WRITE,
	STATE_STOP
};

struct s3c24xx_i2c {
	wait_queue_head_t	wait;
67
	unsigned int            quirks;
68
	unsigned int		suspended:1;
L
Linus Torvalds 已提交
69 70 71 72 73 74

	struct i2c_msg		*msg;
	unsigned int		msg_num;
	unsigned int		msg_idx;
	unsigned int		msg_ptr;

75
	unsigned int		tx_setup;
76
	unsigned int		irq;
77

L
Linus Torvalds 已提交
78
	enum s3c24xx_i2c_state	state;
79
	unsigned long		clkrate;
L
Linus Torvalds 已提交
80 81 82 83 84

	void __iomem		*regs;
	struct clk		*clk;
	struct device		*dev;
	struct i2c_adapter	adap;
85

86
	struct s3c2410_platform_i2c	*pdata;
87
	int			gpios[2];
88
	struct pinctrl          *pctrl;
89 90 91
#ifdef CONFIG_CPU_FREQ
	struct notifier_block	freq_transition;
#endif
L
Linus Torvalds 已提交
92 93
};

94 95 96 97 98 99 100
static struct platform_device_id s3c24xx_driver_ids[] = {
	{
		.name		= "s3c2410-i2c",
		.driver_data	= 0,
	}, {
		.name		= "s3c2440-i2c",
		.driver_data	= QUIRK_S3C2440,
101 102 103
	}, {
		.name		= "s3c2440-hdmiphy-i2c",
		.driver_data	= QUIRK_S3C2440 | QUIRK_HDMIPHY | QUIRK_NO_GPIO,
104 105 106 107 108 109 110 111
	}, { },
};
MODULE_DEVICE_TABLE(platform, s3c24xx_driver_ids);

#ifdef CONFIG_OF
static const struct of_device_id s3c24xx_i2c_match[] = {
	{ .compatible = "samsung,s3c2410-i2c", .data = (void *)0 },
	{ .compatible = "samsung,s3c2440-i2c", .data = (void *)QUIRK_S3C2440 },
112 113
	{ .compatible = "samsung,s3c2440-hdmiphy-i2c",
	  .data = (void *)(QUIRK_S3C2440 | QUIRK_HDMIPHY | QUIRK_NO_GPIO) },
114 115
	{ .compatible = "samsung,exynos5440-i2c",
	  .data = (void *)(QUIRK_S3C2440 | QUIRK_NO_GPIO) },
116 117 118 119
	{},
};
MODULE_DEVICE_TABLE(of, s3c24xx_i2c_match);
#endif
L
Linus Torvalds 已提交
120

121
/* s3c24xx_get_device_quirks
L
Linus Torvalds 已提交
122
 *
123
 * Get controller type either from device tree or platform device variant.
L
Linus Torvalds 已提交
124 125
*/

126
static inline unsigned int s3c24xx_get_device_quirks(struct platform_device *pdev)
L
Linus Torvalds 已提交
127
{
128 129
	if (pdev->dev.of_node) {
		const struct of_device_id *match;
130
		match = of_match_node(s3c24xx_i2c_match, pdev->dev.of_node);
131 132
		return (unsigned int)match->data;
	}
133

134
	return platform_get_device_id(pdev)->driver_data;
L
Linus Torvalds 已提交
135 136 137 138 139 140 141 142 143 144 145 146 147 148
}

/* s3c24xx_i2c_master_complete
 *
 * complete the message and wake up the caller, using the given return code,
 * or zero to mean ok.
*/

static inline void s3c24xx_i2c_master_complete(struct s3c24xx_i2c *i2c, int ret)
{
	dev_dbg(i2c->dev, "master_complete %d\n", ret);

	i2c->msg_ptr = 0;
	i2c->msg = NULL;
149
	i2c->msg_idx++;
L
Linus Torvalds 已提交
150 151 152 153 154 155 156 157 158 159
	i2c->msg_num = 0;
	if (ret)
		i2c->msg_idx = ret;

	wake_up(&i2c->wait);
}

static inline void s3c24xx_i2c_disable_ack(struct s3c24xx_i2c *i2c)
{
	unsigned long tmp;
160

L
Linus Torvalds 已提交
161 162 163 164 165 166 167
	tmp = readl(i2c->regs + S3C2410_IICCON);
	writel(tmp & ~S3C2410_IICCON_ACKEN, i2c->regs + S3C2410_IICCON);
}

static inline void s3c24xx_i2c_enable_ack(struct s3c24xx_i2c *i2c)
{
	unsigned long tmp;
168

L
Linus Torvalds 已提交
169 170 171 172 173 174 175 176 177
	tmp = readl(i2c->regs + S3C2410_IICCON);
	writel(tmp | S3C2410_IICCON_ACKEN, i2c->regs + S3C2410_IICCON);
}

/* irq enable/disable functions */

static inline void s3c24xx_i2c_disable_irq(struct s3c24xx_i2c *i2c)
{
	unsigned long tmp;
178

L
Linus Torvalds 已提交
179 180 181 182 183 184 185
	tmp = readl(i2c->regs + S3C2410_IICCON);
	writel(tmp & ~S3C2410_IICCON_IRQEN, i2c->regs + S3C2410_IICCON);
}

static inline void s3c24xx_i2c_enable_irq(struct s3c24xx_i2c *i2c)
{
	unsigned long tmp;
186

L
Linus Torvalds 已提交
187 188 189 190 191 192 193
	tmp = readl(i2c->regs + S3C2410_IICCON);
	writel(tmp | S3C2410_IICCON_IRQEN, i2c->regs + S3C2410_IICCON);
}


/* s3c24xx_i2c_message_start
 *
194
 * put the start of a message onto the bus
L
Linus Torvalds 已提交
195 196
*/

197
static void s3c24xx_i2c_message_start(struct s3c24xx_i2c *i2c,
L
Linus Torvalds 已提交
198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215
				      struct i2c_msg *msg)
{
	unsigned int addr = (msg->addr & 0x7f) << 1;
	unsigned long stat;
	unsigned long iiccon;

	stat = 0;
	stat |=  S3C2410_IICSTAT_TXRXEN;

	if (msg->flags & I2C_M_RD) {
		stat |= S3C2410_IICSTAT_MASTER_RX;
		addr |= 1;
	} else
		stat |= S3C2410_IICSTAT_MASTER_TX;

	if (msg->flags & I2C_M_REV_DIR_ADDR)
		addr ^= 1;

216
	/* todo - check for whether ack wanted or not */
L
Linus Torvalds 已提交
217 218 219 220
	s3c24xx_i2c_enable_ack(i2c);

	iiccon = readl(i2c->regs + S3C2410_IICCON);
	writel(stat, i2c->regs + S3C2410_IICSTAT);
221

L
Linus Torvalds 已提交
222 223
	dev_dbg(i2c->dev, "START: %08lx to IICSTAT, %02x to DS\n", stat, addr);
	writeb(addr, i2c->regs + S3C2410_IICDS);
224

225 226 227 228 229
	/* delay here to ensure the data byte has gotten onto the bus
	 * before the transaction is started */

	ndelay(i2c->tx_setup);

L
Linus Torvalds 已提交
230 231
	dev_dbg(i2c->dev, "iiccon, %08lx\n", iiccon);
	writel(iiccon, i2c->regs + S3C2410_IICCON);
232 233

	stat |= S3C2410_IICSTAT_START;
L
Linus Torvalds 已提交
234 235 236 237 238 239 240 241 242
	writel(stat, i2c->regs + S3C2410_IICSTAT);
}

static inline void s3c24xx_i2c_stop(struct s3c24xx_i2c *i2c, int ret)
{
	unsigned long iicstat = readl(i2c->regs + S3C2410_IICSTAT);

	dev_dbg(i2c->dev, "STOP\n");

243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283
	/*
	 * The datasheet says that the STOP sequence should be:
	 *  1) I2CSTAT.5 = 0	- Clear BUSY (or 'generate STOP')
	 *  2) I2CCON.4 = 0	- Clear IRQPEND
	 *  3) Wait until the stop condition takes effect.
	 *  4*) I2CSTAT.4 = 0	- Clear TXRXEN
	 *
	 * Where, step "4*" is only for buses with the "HDMIPHY" quirk.
	 *
	 * However, after much experimentation, it appears that:
	 * a) normal buses automatically clear BUSY and transition from
	 *    Master->Slave when they complete generating a STOP condition.
	 *    Therefore, step (3) can be done in doxfer() by polling I2CCON.4
	 *    after starting the STOP generation here.
	 * b) HDMIPHY bus does neither, so there is no way to do step 3.
	 *    There is no indication when this bus has finished generating
	 *    STOP.
	 *
	 * In fact, we have found that as soon as the IRQPEND bit is cleared in
	 * step 2, the HDMIPHY bus generates the STOP condition, and then
	 * immediately starts transferring another data byte, even though the
	 * bus is supposedly stopped.  This is presumably because the bus is
	 * still in "Master" mode, and its BUSY bit is still set.
	 *
	 * To avoid these extra post-STOP transactions on HDMI phy devices, we
	 * just disable Serial Output on the bus (I2CSTAT.4 = 0) directly,
	 * instead of first generating a proper STOP condition.  This should
	 * float SDA & SCK terminating the transfer.  Subsequent transfers
	 *  start with a proper START condition, and proceed normally.
	 *
	 * The HDMIPHY bus is an internal bus that always has exactly two
	 * devices, the host as Master and the HDMIPHY device as the slave.
	 * Skipping the STOP condition has been tested on this bus and works.
	 */
	if (i2c->quirks & QUIRK_HDMIPHY) {
		/* Stop driving the I2C pins */
		iicstat &= ~S3C2410_IICSTAT_TXRXEN;
	} else {
		/* stop the transfer */
		iicstat &= ~S3C2410_IICSTAT_START;
	}
L
Linus Torvalds 已提交
284
	writel(iicstat, i2c->regs + S3C2410_IICSTAT);
285

L
Linus Torvalds 已提交
286
	i2c->state = STATE_STOP;
287

L
Linus Torvalds 已提交
288 289 290 291 292 293 294 295 296
	s3c24xx_i2c_master_complete(i2c, ret);
	s3c24xx_i2c_disable_irq(i2c);
}

/* helper functions to determine the current state in the set of
 * messages we are sending */

/* is_lastmsg()
 *
297
 * returns TRUE if the current message is the last in the set
L
Linus Torvalds 已提交
298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324
*/

static inline int is_lastmsg(struct s3c24xx_i2c *i2c)
{
	return i2c->msg_idx >= (i2c->msg_num - 1);
}

/* is_msglast
 *
 * returns TRUE if we this is the last byte in the current message
*/

static inline int is_msglast(struct s3c24xx_i2c *i2c)
{
	return i2c->msg_ptr == i2c->msg->len-1;
}

/* is_msgend
 *
 * returns TRUE if we reached the end of the current message
*/

static inline int is_msgend(struct s3c24xx_i2c *i2c)
{
	return i2c->msg_ptr >= i2c->msg->len;
}

325
/* i2c_s3c_irq_nextbyte
L
Linus Torvalds 已提交
326 327 328 329
 *
 * process an interrupt and work out what to do
 */

330
static int i2c_s3c_irq_nextbyte(struct s3c24xx_i2c *i2c, unsigned long iicstat)
L
Linus Torvalds 已提交
331 332 333 334 335 336 337 338
{
	unsigned long tmp;
	unsigned char byte;
	int ret = 0;

	switch (i2c->state) {

	case STATE_IDLE:
339
		dev_err(i2c->dev, "%s: called in STATE_IDLE\n", __func__);
L
Linus Torvalds 已提交
340 341 342
		goto out;

	case STATE_STOP:
343
		dev_err(i2c->dev, "%s: called in STATE_STOP\n", __func__);
344
		s3c24xx_i2c_disable_irq(i2c);
L
Linus Torvalds 已提交
345 346 347 348 349 350
		goto out_ack;

	case STATE_START:
		/* last thing we did was send a start condition on the
		 * bus, or started a new i2c message
		 */
351

352
		if (iicstat & S3C2410_IICSTAT_LASTBIT &&
L
Linus Torvalds 已提交
353 354 355 356
		    !(i2c->msg->flags & I2C_M_IGNORE_NAK)) {
			/* ack was not received... */

			dev_dbg(i2c->dev, "ack was not received\n");
357
			s3c24xx_i2c_stop(i2c, -ENXIO);
L
Linus Torvalds 已提交
358 359 360 361 362 363 364 365 366
			goto out_ack;
		}

		if (i2c->msg->flags & I2C_M_RD)
			i2c->state = STATE_READ;
		else
			i2c->state = STATE_WRITE;

		/* terminate the transfer if there is nothing to do
367
		 * as this is used by the i2c probe to find devices. */
L
Linus Torvalds 已提交
368 369 370 371 372 373 374 375 376

		if (is_lastmsg(i2c) && i2c->msg->len == 0) {
			s3c24xx_i2c_stop(i2c, 0);
			goto out_ack;
		}

		if (i2c->state == STATE_READ)
			goto prepare_read;

377
		/* fall through to the write state, as we will need to
L
Linus Torvalds 已提交
378 379 380 381 382 383 384
		 * send a byte as well */

	case STATE_WRITE:
		/* we are writing data to the device... check for the
		 * end of the message, and if so, work out what to do
		 */

385 386 387 388 389 390 391 392 393
		if (!(i2c->msg->flags & I2C_M_IGNORE_NAK)) {
			if (iicstat & S3C2410_IICSTAT_LASTBIT) {
				dev_dbg(i2c->dev, "WRITE: No Ack\n");

				s3c24xx_i2c_stop(i2c, -ECONNREFUSED);
				goto out_ack;
			}
		}

394
 retry_write:
395

L
Linus Torvalds 已提交
396 397 398
		if (!is_msgend(i2c)) {
			byte = i2c->msg->buf[i2c->msg_ptr++];
			writeb(byte, i2c->regs + S3C2410_IICDS);
399 400 401 402 403 404 405 406 407

			/* delay after writing the byte to allow the
			 * data setup time on the bus, as writing the
			 * data to the register causes the first bit
			 * to appear on SDA, and SCL will change as
			 * soon as the interrupt is acknowledged */

			ndelay(i2c->tx_setup);

L
Linus Torvalds 已提交
408 409 410 411 412 413
		} else if (!is_lastmsg(i2c)) {
			/* we need to go to the next i2c message */

			dev_dbg(i2c->dev, "WRITE: Next Message\n");

			i2c->msg_ptr = 0;
414
			i2c->msg_idx++;
L
Linus Torvalds 已提交
415
			i2c->msg++;
416

L
Linus Torvalds 已提交
417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442
			/* check to see if we need to do another message */
			if (i2c->msg->flags & I2C_M_NOSTART) {

				if (i2c->msg->flags & I2C_M_RD) {
					/* cannot do this, the controller
					 * forces us to send a new START
					 * when we change direction */

					s3c24xx_i2c_stop(i2c, -EINVAL);
				}

				goto retry_write;
			} else {
				/* send the new start */
				s3c24xx_i2c_message_start(i2c, i2c->msg);
				i2c->state = STATE_START;
			}

		} else {
			/* send stop */

			s3c24xx_i2c_stop(i2c, 0);
		}
		break;

	case STATE_READ:
443
		/* we have a byte of data in the data register, do
444
		 * something with it, and then work out whether we are
L
Linus Torvalds 已提交
445 446 447 448 449 450
		 * going to do any more read/write
		 */

		byte = readb(i2c->regs + S3C2410_IICDS);
		i2c->msg->buf[i2c->msg_ptr++] = byte;

451
 prepare_read:
L
Linus Torvalds 已提交
452 453 454 455 456
		if (is_msglast(i2c)) {
			/* last byte of buffer */

			if (is_lastmsg(i2c))
				s3c24xx_i2c_disable_ack(i2c);
457

L
Linus Torvalds 已提交
458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482
		} else if (is_msgend(i2c)) {
			/* ok, we've read the entire buffer, see if there
			 * is anything else we need to do */

			if (is_lastmsg(i2c)) {
				/* last message, send stop and complete */
				dev_dbg(i2c->dev, "READ: Send Stop\n");

				s3c24xx_i2c_stop(i2c, 0);
			} else {
				/* go to the next transfer */
				dev_dbg(i2c->dev, "READ: Next Transfer\n");

				i2c->msg_ptr = 0;
				i2c->msg_idx++;
				i2c->msg++;
			}
		}

		break;
	}

	/* acknowlegde the IRQ and get back on with the work */

 out_ack:
483
	tmp = readl(i2c->regs + S3C2410_IICCON);
L
Linus Torvalds 已提交
484 485 486 487 488 489 490 491 492 493 494
	tmp &= ~S3C2410_IICCON_IRQPEND;
	writel(tmp, i2c->regs + S3C2410_IICCON);
 out:
	return ret;
}

/* s3c24xx_i2c_irq
 *
 * top level IRQ servicing routine
*/

495
static irqreturn_t s3c24xx_i2c_irq(int irqno, void *dev_id)
L
Linus Torvalds 已提交
496 497 498 499 500 501 502 503
{
	struct s3c24xx_i2c *i2c = dev_id;
	unsigned long status;
	unsigned long tmp;

	status = readl(i2c->regs + S3C2410_IICSTAT);

	if (status & S3C2410_IICSTAT_ARBITR) {
504
		/* deal with arbitration loss */
L
Linus Torvalds 已提交
505 506 507 508 509 510
		dev_err(i2c->dev, "deal with arbitration loss\n");
	}

	if (i2c->state == STATE_IDLE) {
		dev_dbg(i2c->dev, "IRQ: error i2c->state == IDLE\n");

511
		tmp = readl(i2c->regs + S3C2410_IICCON);
L
Linus Torvalds 已提交
512 513 514 515
		tmp &= ~S3C2410_IICCON_IRQPEND;
		writel(tmp, i2c->regs +  S3C2410_IICCON);
		goto out;
	}
516

L
Linus Torvalds 已提交
517 518 519
	/* pretty much this leaves us with the fact that we've
	 * transmitted or received whatever byte we last sent */

520
	i2c_s3c_irq_nextbyte(i2c, status);
L
Linus Torvalds 已提交
521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538

 out:
	return IRQ_HANDLED;
}


/* s3c24xx_i2c_set_master
 *
 * get the i2c bus for a master transaction
*/

static int s3c24xx_i2c_set_master(struct s3c24xx_i2c *i2c)
{
	unsigned long iicstat;
	int timeout = 400;

	while (timeout-- > 0) {
		iicstat = readl(i2c->regs + S3C2410_IICSTAT);
539

L
Linus Torvalds 已提交
540 541 542 543 544 545 546 547
		if (!(iicstat & S3C2410_IICSTAT_BUSBUSY))
			return 0;

		msleep(1);
	}

	return -ETIMEDOUT;
}
548

549 550 551 552 553 554 555 556 557 558
/* s3c24xx_i2c_wait_idle
 *
 * wait for the i2c bus to become idle.
*/

static void s3c24xx_i2c_wait_idle(struct s3c24xx_i2c *i2c)
{
	unsigned long iicstat;
	ktime_t start, now;
	unsigned long delay;
559
	int spins;
560 561 562 563 564 565 566 567 568 569 570 571

	/* ensure the stop has been through the bus */

	dev_dbg(i2c->dev, "waiting for bus idle\n");

	start = now = ktime_get();

	/*
	 * Most of the time, the bus is already idle within a few usec of the
	 * end of a transaction.  However, really slow i2c devices can stretch
	 * the clock, delaying STOP generation.
	 *
572 573
	 * On slower SoCs this typically happens within a very small number of
	 * instructions so busy wait briefly to avoid scheduling overhead.
574
	 */
575
	spins = 3;
576
	iicstat = readl(i2c->regs + S3C2410_IICSTAT);
577 578 579
	while ((iicstat & S3C2410_IICSTAT_START) && --spins) {
		cpu_relax();
		iicstat = readl(i2c->regs + S3C2410_IICSTAT);
580 581
	}

582 583 584 585 586 587 588
	/*
	 * If we do get an appreciable delay as a compromise between idle
	 * detection latency for the normal, fast case, and system load in the
	 * slow device case, use an exponential back off in the polling loop,
	 * up to 1/10th of the total timeout, then continue to poll at a
	 * constant rate up to the timeout.
	 */
589 590 591 592 593 594 595 596 597 598 599 600
	delay = 1;
	while ((iicstat & S3C2410_IICSTAT_START) &&
	       ktime_us_delta(now, start) < S3C2410_IDLE_TIMEOUT) {
		usleep_range(delay, 2 * delay);
		if (delay < S3C2410_IDLE_TIMEOUT / 10)
			delay <<= 1;
		now = ktime_get();
		iicstat = readl(i2c->regs + S3C2410_IICSTAT);
	}

	if (iicstat & S3C2410_IICSTAT_START)
		dev_warn(i2c->dev, "timeout waiting for bus idle\n");
L
Linus Torvalds 已提交
601 602 603 604 605 606 607
}

/* s3c24xx_i2c_doxfer
 *
 * this starts an i2c transfer
*/

608 609
static int s3c24xx_i2c_doxfer(struct s3c24xx_i2c *i2c,
			      struct i2c_msg *msgs, int num)
L
Linus Torvalds 已提交
610
{
611
	unsigned long timeout;
L
Linus Torvalds 已提交
612 613
	int ret;

614
	if (i2c->suspended)
615 616
		return -EIO;

L
Linus Torvalds 已提交
617 618 619 620 621 622 623 624 625 626 627 628 629 630 631
	ret = s3c24xx_i2c_set_master(i2c);
	if (ret != 0) {
		dev_err(i2c->dev, "cannot get bus (error %d)\n", ret);
		ret = -EAGAIN;
		goto out;
	}

	i2c->msg     = msgs;
	i2c->msg_num = num;
	i2c->msg_ptr = 0;
	i2c->msg_idx = 0;
	i2c->state   = STATE_START;

	s3c24xx_i2c_enable_irq(i2c);
	s3c24xx_i2c_message_start(i2c, msgs);
632

L
Linus Torvalds 已提交
633 634 635 636
	timeout = wait_event_timeout(i2c->wait, i2c->msg_num == 0, HZ * 5);

	ret = i2c->msg_idx;

637
	/* having these next two as dev_err() makes life very
L
Linus Torvalds 已提交
638 639 640 641 642 643 644
	 * noisy when doing an i2cdetect */

	if (timeout == 0)
		dev_dbg(i2c->dev, "timeout\n");
	else if (ret != num)
		dev_dbg(i2c->dev, "incomplete xfer (%d)\n", ret);

645 646 647
	/* For QUIRK_HDMIPHY, bus is already disabled */
	if (i2c->quirks & QUIRK_HDMIPHY)
		goto out;
648

649
	s3c24xx_i2c_wait_idle(i2c);
L
Linus Torvalds 已提交
650 651 652 653 654 655 656 657

 out:
	return ret;
}

/* s3c24xx_i2c_xfer
 *
 * first port of call from the i2c bus code when an message needs
658
 * transferring across the i2c bus.
L
Linus Torvalds 已提交
659 660 661 662 663 664 665 666 667
*/

static int s3c24xx_i2c_xfer(struct i2c_adapter *adap,
			struct i2c_msg *msgs, int num)
{
	struct s3c24xx_i2c *i2c = (struct s3c24xx_i2c *)adap->algo_data;
	int retry;
	int ret;

668
	pm_runtime_get_sync(&adap->dev);
669
	clk_prepare_enable(i2c->clk);
670

L
Linus Torvalds 已提交
671 672 673 674
	for (retry = 0; retry < adap->retries; retry++) {

		ret = s3c24xx_i2c_doxfer(i2c, msgs, num);

675
		if (ret != -EAGAIN) {
676
			clk_disable_unprepare(i2c->clk);
677
			pm_runtime_put(&adap->dev);
L
Linus Torvalds 已提交
678
			return ret;
679
		}
L
Linus Torvalds 已提交
680 681 682 683 684 685

		dev_dbg(i2c->dev, "Retrying transmission (%d)\n", retry);

		udelay(100);
	}

686
	clk_disable_unprepare(i2c->clk);
687
	pm_runtime_put(&adap->dev);
L
Linus Torvalds 已提交
688 689 690 691 692 693
	return -EREMOTEIO;
}

/* declare our i2c functionality */
static u32 s3c24xx_i2c_func(struct i2c_adapter *adap)
{
694 695
	return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL | I2C_FUNC_NOSTART |
		I2C_FUNC_PROTOCOL_MANGLING;
L
Linus Torvalds 已提交
696 697 698 699
}

/* i2c bus registration info */

700
static const struct i2c_algorithm s3c24xx_i2c_algorithm = {
L
Linus Torvalds 已提交
701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734
	.master_xfer		= s3c24xx_i2c_xfer,
	.functionality		= s3c24xx_i2c_func,
};

/* s3c24xx_i2c_calcdivisor
 *
 * return the divisor settings for a given frequency
*/

static int s3c24xx_i2c_calcdivisor(unsigned long clkin, unsigned int wanted,
				   unsigned int *div1, unsigned int *divs)
{
	unsigned int calc_divs = clkin / wanted;
	unsigned int calc_div1;

	if (calc_divs > (16*16))
		calc_div1 = 512;
	else
		calc_div1 = 16;

	calc_divs += calc_div1-1;
	calc_divs /= calc_div1;

	if (calc_divs == 0)
		calc_divs = 1;
	if (calc_divs > 17)
		calc_divs = 17;

	*divs = calc_divs;
	*div1 = calc_div1;

	return clkin / (calc_divs * calc_div1);
}

735
/* s3c24xx_i2c_clockrate
L
Linus Torvalds 已提交
736 737 738 739 740 741
 *
 * work out a divisor for the user requested frequency setting,
 * either by the requested frequency, or scanning the acceptable
 * range of frequencies until something is found
*/

742
static int s3c24xx_i2c_clockrate(struct s3c24xx_i2c *i2c, unsigned int *got)
L
Linus Torvalds 已提交
743
{
744
	struct s3c2410_platform_i2c *pdata = i2c->pdata;
L
Linus Torvalds 已提交
745 746
	unsigned long clkin = clk_get_rate(i2c->clk);
	unsigned int divs, div1;
747
	unsigned long target_frequency;
748
	u32 iiccon;
L
Linus Torvalds 已提交
749 750
	int freq;

751
	i2c->clkrate = clkin;
L
Linus Torvalds 已提交
752
	clkin /= 1000;		/* clkin now in KHz */
753

754
	dev_dbg(i2c->dev, "pdata desired frequency %lu\n", pdata->frequency);
L
Linus Torvalds 已提交
755

756
	target_frequency = pdata->frequency ? pdata->frequency : 100000;
L
Linus Torvalds 已提交
757

758
	target_frequency /= 1000; /* Target frequency now in KHz */
L
Linus Torvalds 已提交
759

760
	freq = s3c24xx_i2c_calcdivisor(clkin, target_frequency, &div1, &divs);
L
Linus Torvalds 已提交
761

762 763 764 765 766
	if (freq > target_frequency) {
		dev_err(i2c->dev,
			"Unable to achieve desired frequency %luKHz."	\
			" Lowest achievable %dKHz\n", target_frequency, freq);
		return -EINVAL;
L
Linus Torvalds 已提交
767 768 769
	}

	*got = freq;
770 771 772 773 774 775 776 777 778 779

	iiccon = readl(i2c->regs + S3C2410_IICCON);
	iiccon &= ~(S3C2410_IICCON_SCALEMASK | S3C2410_IICCON_TXDIV_512);
	iiccon |= (divs-1);

	if (div1 == 512)
		iiccon |= S3C2410_IICCON_TXDIV_512;

	writel(iiccon, i2c->regs + S3C2410_IICCON);

780
	if (i2c->quirks & QUIRK_S3C2440) {
781 782 783
		unsigned long sda_delay;

		if (pdata->sda_delay) {
784 785
			sda_delay = clkin * pdata->sda_delay;
			sda_delay = DIV_ROUND_UP(sda_delay, 1000000);
786 787 788 789 790 791 792 793 794 795 796
			sda_delay = DIV_ROUND_UP(sda_delay, 5);
			if (sda_delay > 3)
				sda_delay = 3;
			sda_delay |= S3C2410_IICLC_FILTER_ON;
		} else
			sda_delay = 0;

		dev_dbg(i2c->dev, "IICLC=%08lx\n", sda_delay);
		writel(sda_delay, i2c->regs + S3C2440_IICLC);
	}

797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820
	return 0;
}

#ifdef CONFIG_CPU_FREQ

#define freq_to_i2c(_n) container_of(_n, struct s3c24xx_i2c, freq_transition)

static int s3c24xx_i2c_cpufreq_transition(struct notifier_block *nb,
					  unsigned long val, void *data)
{
	struct s3c24xx_i2c *i2c = freq_to_i2c(nb);
	unsigned int got;
	int delta_f;
	int ret;

	delta_f = clk_get_rate(i2c->clk) - i2c->clkrate;

	/* if we're post-change and the input clock has slowed down
	 * or at pre-change and the clock is about to speed up, then
	 * adjust our clock rate. <0 is slow, >0 speedup.
	 */

	if ((val == CPUFREQ_POSTCHANGE && delta_f < 0) ||
	    (val == CPUFREQ_PRECHANGE && delta_f > 0)) {
821
		i2c_lock_adapter(&i2c->adap);
822
		ret = s3c24xx_i2c_clockrate(i2c, &got);
823
		i2c_unlock_adapter(&i2c->adap);
824 825 826 827 828 829 830

		if (ret < 0)
			dev_err(i2c->dev, "cannot find frequency\n");
		else
			dev_info(i2c->dev, "setting freq %d\n", got);
	}

L
Linus Torvalds 已提交
831 832 833
	return 0;
}

834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850
static inline int s3c24xx_i2c_register_cpufreq(struct s3c24xx_i2c *i2c)
{
	i2c->freq_transition.notifier_call = s3c24xx_i2c_cpufreq_transition;

	return cpufreq_register_notifier(&i2c->freq_transition,
					 CPUFREQ_TRANSITION_NOTIFIER);
}

static inline void s3c24xx_i2c_deregister_cpufreq(struct s3c24xx_i2c *i2c)
{
	cpufreq_unregister_notifier(&i2c->freq_transition,
				    CPUFREQ_TRANSITION_NOTIFIER);
}

#else
static inline int s3c24xx_i2c_register_cpufreq(struct s3c24xx_i2c *i2c)
{
L
Linus Torvalds 已提交
851 852 853
	return 0;
}

854 855 856 857 858
static inline void s3c24xx_i2c_deregister_cpufreq(struct s3c24xx_i2c *i2c)
{
}
#endif

859 860 861 862 863
#ifdef CONFIG_OF
static int s3c24xx_i2c_parse_dt_gpio(struct s3c24xx_i2c *i2c)
{
	int idx, gpio, ret;

864 865 866
	if (i2c->quirks & QUIRK_NO_GPIO)
		return 0;

867 868 869 870 871 872
	for (idx = 0; idx < 2; idx++) {
		gpio = of_get_gpio(i2c->dev->of_node, idx);
		if (!gpio_is_valid(gpio)) {
			dev_err(i2c->dev, "invalid gpio[%d]: %d\n", idx, gpio);
			goto free_gpio;
		}
873
		i2c->gpios[idx] = gpio;
874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891

		ret = gpio_request(gpio, "i2c-bus");
		if (ret) {
			dev_err(i2c->dev, "gpio [%d] request failed\n", gpio);
			goto free_gpio;
		}
	}
	return 0;

free_gpio:
	while (--idx >= 0)
		gpio_free(i2c->gpios[idx]);
	return -EINVAL;
}

static void s3c24xx_i2c_dt_gpio_free(struct s3c24xx_i2c *i2c)
{
	unsigned int idx;
892 893 894 895

	if (i2c->quirks & QUIRK_NO_GPIO)
		return;

896 897 898 899 900 901
	for (idx = 0; idx < 2; idx++)
		gpio_free(i2c->gpios[idx]);
}
#else
static int s3c24xx_i2c_parse_dt_gpio(struct s3c24xx_i2c *i2c)
{
902
	return 0;
903 904 905 906 907 908 909
}

static void s3c24xx_i2c_dt_gpio_free(struct s3c24xx_i2c *i2c)
{
}
#endif

L
Linus Torvalds 已提交
910 911
/* s3c24xx_i2c_init
 *
912
 * initialise the controller, set the IO lines and frequency
L
Linus Torvalds 已提交
913 914 915 916 917 918 919 920 921 922
*/

static int s3c24xx_i2c_init(struct s3c24xx_i2c *i2c)
{
	unsigned long iicon = S3C2410_IICCON_IRQEN | S3C2410_IICCON_ACKEN;
	struct s3c2410_platform_i2c *pdata;
	unsigned int freq;

	/* get the plafrom data */

923
	pdata = i2c->pdata;
L
Linus Torvalds 已提交
924 925

	/* write slave address */
926

L
Linus Torvalds 已提交
927 928 929 930
	writeb(pdata->slave_addr, i2c->regs + S3C2410_IICADD);

	dev_info(i2c->dev, "slave address 0x%02x\n", pdata->slave_addr);

931 932
	writel(iicon, i2c->regs + S3C2410_IICCON);

L
Linus Torvalds 已提交
933 934
	/* we need to work out the divisors for the clock... */

935 936
	if (s3c24xx_i2c_clockrate(i2c, &freq) != 0) {
		writel(0, i2c->regs + S3C2410_IICCON);
L
Linus Torvalds 已提交
937 938 939 940 941 942 943 944 945 946 947 948
		dev_err(i2c->dev, "cannot meet bus frequency required\n");
		return -EINVAL;
	}

	/* todo - check that the i2c lines aren't being dragged anywhere */

	dev_info(i2c->dev, "bus frequency set to %d KHz\n", freq);
	dev_dbg(i2c->dev, "S3C2410_IICCON=0x%02lx\n", iicon);

	return 0;
}

949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976
#ifdef CONFIG_OF
/* s3c24xx_i2c_parse_dt
 *
 * Parse the device tree node and retreive the platform data.
*/

static void
s3c24xx_i2c_parse_dt(struct device_node *np, struct s3c24xx_i2c *i2c)
{
	struct s3c2410_platform_i2c *pdata = i2c->pdata;

	if (!np)
		return;

	pdata->bus_num = -1; /* i2c bus number is dynamically assigned */
	of_property_read_u32(np, "samsung,i2c-sda-delay", &pdata->sda_delay);
	of_property_read_u32(np, "samsung,i2c-slave-addr", &pdata->slave_addr);
	of_property_read_u32(np, "samsung,i2c-max-bus-freq",
				(u32 *)&pdata->frequency);
}
#else
static void
s3c24xx_i2c_parse_dt(struct device_node *np, struct s3c24xx_i2c *i2c)
{
	return;
}
#endif

L
Linus Torvalds 已提交
977 978 979 980 981
/* s3c24xx_i2c_probe
 *
 * called by the bus driver when a suitable device is found
*/

982
static int s3c24xx_i2c_probe(struct platform_device *pdev)
L
Linus Torvalds 已提交
983
{
984
	struct s3c24xx_i2c *i2c;
985
	struct s3c2410_platform_i2c *pdata = NULL;
L
Linus Torvalds 已提交
986 987 988
	struct resource *res;
	int ret;

989 990 991 992 993 994
	if (!pdev->dev.of_node) {
		pdata = pdev->dev.platform_data;
		if (!pdata) {
			dev_err(&pdev->dev, "no platform data\n");
			return -EINVAL;
		}
995
	}
996

997
	i2c = devm_kzalloc(&pdev->dev, sizeof(struct s3c24xx_i2c), GFP_KERNEL);
998 999 1000 1001 1002
	if (!i2c) {
		dev_err(&pdev->dev, "no memory for state\n");
		return -ENOMEM;
	}

1003 1004
	i2c->pdata = devm_kzalloc(&pdev->dev, sizeof(*pdata), GFP_KERNEL);
	if (!i2c->pdata) {
1005 1006
		dev_err(&pdev->dev, "no memory for platform data\n");
		return -ENOMEM;
1007 1008
	}

1009
	i2c->quirks = s3c24xx_get_device_quirks(pdev);
1010 1011
	if (pdata)
		memcpy(i2c->pdata, pdata, sizeof(*pdata));
1012 1013
	else
		s3c24xx_i2c_parse_dt(pdev->dev.of_node, i2c);
1014

1015 1016 1017 1018 1019 1020 1021 1022
	strlcpy(i2c->adap.name, "s3c2410-i2c", sizeof(i2c->adap.name));
	i2c->adap.owner   = THIS_MODULE;
	i2c->adap.algo    = &s3c24xx_i2c_algorithm;
	i2c->adap.retries = 2;
	i2c->adap.class   = I2C_CLASS_HWMON | I2C_CLASS_SPD;
	i2c->tx_setup     = 50;

	init_waitqueue_head(&i2c->wait);
1023

L
Linus Torvalds 已提交
1024 1025
	/* find the clock and enable it */

1026
	i2c->dev = &pdev->dev;
1027
	i2c->clk = devm_clk_get(&pdev->dev, "i2c");
L
Linus Torvalds 已提交
1028
	if (IS_ERR(i2c->clk)) {
1029
		dev_err(&pdev->dev, "cannot get clock\n");
1030
		return -ENOENT;
L
Linus Torvalds 已提交
1031 1032
	}

1033
	dev_dbg(&pdev->dev, "clock source %p\n", i2c->clk);
L
Linus Torvalds 已提交
1034 1035 1036 1037 1038 1039


	/* map the registers */

	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
	if (res == NULL) {
1040
		dev_err(&pdev->dev, "cannot find IO resource\n");
1041
		return -ENOENT;
L
Linus Torvalds 已提交
1042 1043
	}

1044
	i2c->regs = devm_ioremap_resource(&pdev->dev, res);
L
Linus Torvalds 已提交
1045

1046 1047
	if (IS_ERR(i2c->regs))
		return PTR_ERR(i2c->regs);
L
Linus Torvalds 已提交
1048

1049 1050
	dev_dbg(&pdev->dev, "registers %p (%p)\n",
		i2c->regs, res);
L
Linus Torvalds 已提交
1051 1052 1053 1054

	/* setup info block for the i2c core */

	i2c->adap.algo_data = i2c;
1055
	i2c->adap.dev.parent = &pdev->dev;
L
Linus Torvalds 已提交
1056

1057 1058
	i2c->pctrl = devm_pinctrl_get_select_default(i2c->dev);

1059 1060 1061 1062 1063
	/* inititalise the i2c gpio lines */

	if (i2c->pdata->cfg_gpio) {
		i2c->pdata->cfg_gpio(to_platform_device(i2c->dev));
	} else if (IS_ERR(i2c->pctrl) && s3c24xx_i2c_parse_dt_gpio(i2c)) {
1064
		return -EINVAL;
1065 1066
	}

L
Linus Torvalds 已提交
1067 1068
	/* initialise the i2c controller */

1069
	clk_prepare_enable(i2c->clk);
L
Linus Torvalds 已提交
1070
	ret = s3c24xx_i2c_init(i2c);
1071 1072 1073 1074 1075
	clk_disable_unprepare(i2c->clk);
	if (ret != 0) {
		dev_err(&pdev->dev, "I2C controller init failed\n");
		return ret;
	}
L
Linus Torvalds 已提交
1076
	/* find the IRQ for this unit (note, this relies on the init call to
1077
	 * ensure no current IRQs pending
L
Linus Torvalds 已提交
1078 1079
	 */

1080 1081
	i2c->irq = ret = platform_get_irq(pdev, 0);
	if (ret <= 0) {
1082
		dev_err(&pdev->dev, "cannot find IRQ\n");
1083
		return ret;
L
Linus Torvalds 已提交
1084 1085
	}

1086 1087
	ret = devm_request_irq(&pdev->dev, i2c->irq, s3c24xx_i2c_irq, 0,
			       dev_name(&pdev->dev), i2c);
L
Linus Torvalds 已提交
1088 1089

	if (ret != 0) {
1090
		dev_err(&pdev->dev, "cannot claim IRQ %d\n", i2c->irq);
1091
		return ret;
L
Linus Torvalds 已提交
1092 1093
	}

1094
	ret = s3c24xx_i2c_register_cpufreq(i2c);
L
Linus Torvalds 已提交
1095
	if (ret < 0) {
1096
		dev_err(&pdev->dev, "failed to register cpufreq notifier\n");
1097
		return ret;
L
Linus Torvalds 已提交
1098 1099
	}

1100 1101 1102 1103 1104 1105
	/* Note, previous versions of the driver used i2c_add_adapter()
	 * to add the bus at any number. We now pass the bus number via
	 * the platform data, so if unset it will now default to always
	 * being bus 0.
	 */

1106
	i2c->adap.nr = i2c->pdata->bus_num;
1107
	i2c->adap.dev.of_node = pdev->dev.of_node;
1108 1109

	ret = i2c_add_numbered_adapter(&i2c->adap);
L
Linus Torvalds 已提交
1110
	if (ret < 0) {
1111
		dev_err(&pdev->dev, "failed to add bus to i2c core\n");
1112 1113
		s3c24xx_i2c_deregister_cpufreq(i2c);
		return ret;
L
Linus Torvalds 已提交
1114 1115
	}

1116
	of_i2c_register_devices(&i2c->adap);
1117
	platform_set_drvdata(pdev, i2c);
L
Linus Torvalds 已提交
1118

1119 1120 1121
	pm_runtime_enable(&pdev->dev);
	pm_runtime_enable(&i2c->adap.dev);

1122
	dev_info(&pdev->dev, "%s: S3C I2C adapter\n", dev_name(&i2c->adap.dev));
1123
	return 0;
L
Linus Torvalds 已提交
1124 1125 1126 1127 1128 1129 1130
}

/* s3c24xx_i2c_remove
 *
 * called when device is removed from the bus
*/

1131
static int s3c24xx_i2c_remove(struct platform_device *pdev)
L
Linus Torvalds 已提交
1132
{
1133
	struct s3c24xx_i2c *i2c = platform_get_drvdata(pdev);
1134

1135 1136 1137
	pm_runtime_disable(&i2c->adap.dev);
	pm_runtime_disable(&pdev->dev);

1138 1139
	s3c24xx_i2c_deregister_cpufreq(i2c);

1140 1141
	i2c_del_adapter(&i2c->adap);

1142
	clk_disable_unprepare(i2c->clk);
1143

1144 1145
	if (pdev->dev.of_node && IS_ERR(i2c->pctrl))
		s3c24xx_i2c_dt_gpio_free(i2c);
L
Linus Torvalds 已提交
1146 1147 1148 1149

	return 0;
}

1150
#ifdef CONFIG_PM_SLEEP
1151
static int s3c24xx_i2c_suspend_noirq(struct device *dev)
1152
{
1153 1154 1155
	struct platform_device *pdev = to_platform_device(dev);
	struct s3c24xx_i2c *i2c = platform_get_drvdata(pdev);

1156
	i2c->suspended = 1;
1157

1158 1159 1160
	return 0;
}

1161
static int s3c24xx_i2c_resume(struct device *dev)
L
Linus Torvalds 已提交
1162
{
1163 1164
	struct platform_device *pdev = to_platform_device(dev);
	struct s3c24xx_i2c *i2c = platform_get_drvdata(pdev);
1165

1166
	i2c->suspended = 0;
1167
	clk_prepare_enable(i2c->clk);
1168
	s3c24xx_i2c_init(i2c);
1169
	clk_disable_unprepare(i2c->clk);
L
Linus Torvalds 已提交
1170 1171 1172

	return 0;
}
1173
#endif
L
Linus Torvalds 已提交
1174

1175
#ifdef CONFIG_PM
1176
static const struct dev_pm_ops s3c24xx_i2c_dev_pm_ops = {
1177
#ifdef CONFIG_PM_SLEEP
1178 1179
	.suspend_noirq = s3c24xx_i2c_suspend_noirq,
	.resume = s3c24xx_i2c_resume,
1180
#endif
1181 1182 1183
};

#define S3C24XX_DEV_PM_OPS (&s3c24xx_i2c_dev_pm_ops)
L
Linus Torvalds 已提交
1184
#else
1185
#define S3C24XX_DEV_PM_OPS NULL
L
Linus Torvalds 已提交
1186 1187 1188 1189
#endif

/* device driver for platform bus bits */

1190
static struct platform_driver s3c24xx_i2c_driver = {
L
Linus Torvalds 已提交
1191 1192
	.probe		= s3c24xx_i2c_probe,
	.remove		= s3c24xx_i2c_remove,
1193
	.id_table	= s3c24xx_driver_ids,
1194 1195
	.driver		= {
		.owner	= THIS_MODULE,
1196
		.name	= "s3c-i2c",
1197
		.pm	= S3C24XX_DEV_PM_OPS,
1198
		.of_match_table = of_match_ptr(s3c24xx_i2c_match),
1199
	},
L
Linus Torvalds 已提交
1200 1201 1202 1203
};

static int __init i2c_adap_s3c_init(void)
{
1204
	return platform_driver_register(&s3c24xx_i2c_driver);
L
Linus Torvalds 已提交
1205
}
1206
subsys_initcall(i2c_adap_s3c_init);
L
Linus Torvalds 已提交
1207 1208 1209

static void __exit i2c_adap_s3c_exit(void)
{
1210
	platform_driver_unregister(&s3c24xx_i2c_driver);
L
Linus Torvalds 已提交
1211 1212 1213 1214 1215 1216
}
module_exit(i2c_adap_s3c_exit);

MODULE_DESCRIPTION("S3C24XX I2C Bus driver");
MODULE_AUTHOR("Ben Dooks, <ben@simtec.co.uk>");
MODULE_LICENSE("GPL");