drivers/misc/c2port/core.c

   1 /*
   2  *  Silicon Labs C2 port core Linux support
   3  *
   4  *  Copyright (c) 2007 Rodolfo Giometti <[email protected]>
   5  *  Copyright (c) 2007 Eurotech S.p.A. <[email protected]>
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License version 2 as published by
   9  * the Free Software Foundation
  10  */
  11
  12 #include <linux/module.h>
  13 #include <linux/init.h>
  14 #include <linux/device.h>
  15 #include <linux/errno.h>
  16 #include <linux/err.h>
  17 #include <linux/kernel.h>
  18 #include <linux/kmemcheck.h>
  19 #include <linux/ctype.h>
  20 #include <linux/delay.h>
  21 #include <linux/idr.h>
  22 #include <linux/sched.h>
  23 #include <linux/slab.h>
  24
  25 #include <linux/c2port.h>
  26
  27 #define DRIVER_NAME             "c2port"
  28 #define DRIVER_VERSION          "0.51.0"
  29
  30 static DEFINE_SPINLOCK(c2port_idr_lock);
  31 static DEFINE_IDR(c2port_idr);
  32
  33 /*
  34  * Local variables
  35  */
  36
  37 static struct class *c2port_class;
  38
  39 /*
  40  * C2 registers & commands defines
  41  */
  42
  43 /* C2 registers */
  44 #define C2PORT_DEVICEID         0x00
  45 #define C2PORT_REVID            0x01
  46 #define C2PORT_FPCTL            0x02
  47 #define C2PORT_FPDAT            0xB4
  48
  49 /* C2 interface commands */
  50 #define C2PORT_GET_VERSION      0x01
  51 #define C2PORT_DEVICE_ERASE     0x03
  52 #define C2PORT_BLOCK_READ       0x06
  53 #define C2PORT_BLOCK_WRITE      0x07
  54 #define C2PORT_PAGE_ERASE       0x08
  55
  56 /* C2 status return codes */
  57 #define C2PORT_INVALID_COMMAND  0x00
  58 #define C2PORT_COMMAND_FAILED   0x02
  59 #define C2PORT_COMMAND_OK       0x0d
  60
  61 /*
  62  * C2 port low level signal managements
  63  */
  64
  65 static void c2port_reset(struct c2port_device *dev)
  66 {
  67         struct c2port_ops *ops = dev->ops;
  68
  69         /* To reset the device we have to keep clock line low for at least
  70          * 20us.
  71          */
  72         local_irq_disable();
  73         ops->c2ck_set(dev, 0);
  74         udelay(25);
  75         ops->c2ck_set(dev, 1);
  76         local_irq_enable();
  77
  78         udelay(1);
  79 }
  80
  81 static void c2port_strobe_ck(struct c2port_device *dev)
  82 {
  83         struct c2port_ops *ops = dev->ops;
  84
  85         /* During hi-low-hi transition we disable local IRQs to avoid
  86          * interructions since C2 port specification says that it must be
  87          * shorter than 5us, otherwise the microcontroller may consider
  88          * it as a reset signal!
  89          */
  90         local_irq_disable();
  91         ops->c2ck_set(dev, 0);
  92         udelay(1);
  93         ops->c2ck_set(dev, 1);
  94         local_irq_enable();
  95
  96         udelay(1);
  97 }
  98
  99 /*
 100  * C2 port basic functions
 101  */
 102
 103 static void c2port_write_ar(struct c2port_device *dev, u8 addr)
 104 {
 105         struct c2port_ops *ops = dev->ops;
 106         int i;
 107
 108         /* START field */
 109         c2port_strobe_ck(dev);
 110
 111         /* INS field (11b, LSB first) */
 112         ops->c2d_dir(dev, 0);
 113         ops->c2d_set(dev, 1);
 114         c2port_strobe_ck(dev);
 115         ops->c2d_set(dev, 1);
 116         c2port_strobe_ck(dev);
 117
 118         /* ADDRESS field */
 119         for (i = 0; i < 8; i++) {
 120                 ops->c2d_set(dev, addr & 0x01);
 121                 c2port_strobe_ck(dev);
 122
 123                 addr >>= 1;
 124         }
 125
 126         /* STOP field */
 127         ops->c2d_dir(dev, 1);
 128         c2port_strobe_ck(dev);
 129 }
 130
 131 static int c2port_read_ar(struct c2port_device *dev, u8 *addr)
 132 {
 133         struct c2port_ops *ops = dev->ops;
 134         int i;
 135
 136         /* START field */
 137         c2port_strobe_ck(dev);
 138
 139         /* INS field (10b, LSB first) */
 140         ops->c2d_dir(dev, 0);
 141         ops->c2d_set(dev, 0);
 142         c2port_strobe_ck(dev);
 143         ops->c2d_set(dev, 1);
 144         c2port_strobe_ck(dev);
 145
 146         /* ADDRESS field */
 147         ops->c2d_dir(dev, 1);
 148         *addr = 0;
 149         for (i = 0; i < 8; i++) {
 150                 *addr >>= 1;    /* shift in 8-bit ADDRESS field LSB first */
 151
 152                 c2port_strobe_ck(dev);
 153                 if (ops->c2d_get(dev))
 154                         *addr |= 0x80;
 155         }
 156
 157         /* STOP field */
 158         c2port_strobe_ck(dev);
 159
 160         return 0;
 161 }
 162
 163 static int c2port_write_dr(struct c2port_device *dev, u8 data)
 164 {
 165         struct c2port_ops *ops = dev->ops;
 166         int timeout, i;
 167
 168         /* START field */
 169         c2port_strobe_ck(dev);
 170
 171         /* INS field (01b, LSB first) */
 172         ops->c2d_dir(dev, 0);
 173         ops->c2d_set(dev, 1);
 174         c2port_strobe_ck(dev);
 175         ops->c2d_set(dev, 0);
 176         c2port_strobe_ck(dev);
 177
 178         /* LENGTH field (00b, LSB first -> 1 byte) */
 179         ops->c2d_set(dev, 0);
 180         c2port_strobe_ck(dev);
 181         ops->c2d_set(dev, 0);
 182         c2port_strobe_ck(dev);
 183
 184         /* DATA field */
 185         for (i = 0; i < 8; i++) {
 186                 ops->c2d_set(dev, data & 0x01);
 187                 c2port_strobe_ck(dev);
 188
 189                 data >>= 1;
 190         }
 191
 192         /* WAIT field */
 193         ops->c2d_dir(dev, 1);
 194         timeout = 20;
 195         do {
 196                 c2port_strobe_ck(dev);
 197                 if (ops->c2d_get(dev))
 198                         break;
 199
 200                 udelay(1);
 201         } while (--timeout > 0);
 202         if (timeout == 0)
 203                 return -EIO;
 204
 205         /* STOP field */
 206         c2port_strobe_ck(dev);
 207
 208         return 0;
 209 }
 210
 211 static int c2port_read_dr(struct c2port_device *dev, u8 *data)
 212 {
 213         struct c2port_ops *ops = dev->ops;
 214         int timeout, i;
 215
 216         /* START field */
 217         c2port_strobe_ck(dev);
 218
 219         /* INS field (00b, LSB first) */
 220         ops->c2d_dir(dev, 0);
 221         ops->c2d_set(dev, 0);
 222         c2port_strobe_ck(dev);
 223         ops->c2d_set(dev, 0);
 224         c2port_strobe_ck(dev);
 225
 226         /* LENGTH field (00b, LSB first -> 1 byte) */
 227         ops->c2d_set(dev, 0);
 228         c2port_strobe_ck(dev);
 229         ops->c2d_set(dev, 0);
 230         c2port_strobe_ck(dev);
 231
 232         /* WAIT field */
 233         ops->c2d_dir(dev, 1);
 234         timeout = 20;
 235         do {
 236                 c2port_strobe_ck(dev);
 237                 if (ops->c2d_get(dev))
 238                         break;
 239
 240                 udelay(1);
 241         } while (--timeout > 0);
 242         if (timeout == 0)
 243                 return -EIO;
 244
 245         /* DATA field */
 246         *data = 0;
 247         for (i = 0; i < 8; i++) {
 248                 *data >>= 1;    /* shift in 8-bit DATA field LSB first */
 249
 250                 c2port_strobe_ck(dev);
 251                 if (ops->c2d_get(dev))
 252                         *data |= 0x80;
 253         }
 254
 255         /* STOP field */
 256         c2port_strobe_ck(dev);
 257
 258         return 0;
 259 }
 260
 261 static int c2port_poll_in_busy(struct c2port_device *dev)
 262 {
 263         u8 addr;
 264         int ret, timeout = 20;
 265
 266         do {
 267                 ret = (c2port_read_ar(dev, &addr));
 268                 if (ret < 0)
 269                         return -EIO;
 270
 271                 if (!(addr & 0x02))
 272                         break;
 273
 274                 udelay(1);
 275         } while (--timeout > 0);
 276         if (timeout == 0)
 277                 return -EIO;
 278
 279         return 0;
 280 }
 281
 282 static int c2port_poll_out_ready(struct c2port_device *dev)
 283 {
 284         u8 addr;
 285         int ret, timeout = 10000; /* erase flash needs long time... */
 286
 287         do {
 288                 ret = (c2port_read_ar(dev, &addr));
 289                 if (ret < 0)
 290                         return -EIO;
 291
 292                 if (addr & 0x01)
 293                         break;
 294
 295                 udelay(1);
 296         } while (--timeout > 0);
 297         if (timeout == 0)
 298                 return -EIO;
 299
 300         return 0;
 301 }
 302
 303 /*
 304  * sysfs methods
 305  */
 306
 307 static ssize_t c2port_show_name(struct device *dev,
 308                                 struct device_attribute *attr, char *buf)
 309 {
 310         struct c2port_device *c2dev = dev_get_drvdata(dev);
 311
 312         return sprintf(buf, "%s\n", c2dev->name);
 313 }
 314 static DEVICE_ATTR(name, 0444, c2port_show_name, NULL);
 315
 316 static ssize_t c2port_show_flash_blocks_num(struct device *dev,
 317                                 struct device_attribute *attr, char *buf)
 318 {
 319         struct c2port_device *c2dev = dev_get_drvdata(dev);
 320         struct c2port_ops *ops = c2dev->ops;
 321
 322         return sprintf(buf, "%d\n", ops->blocks_num);
 323 }
 324 static DEVICE_ATTR(flash_blocks_num, 0444, c2port_show_flash_blocks_num, NULL);
 325
 326 static ssize_t c2port_show_flash_block_size(struct device *dev,
 327                                 struct device_attribute *attr, char *buf)
 328 {
 329         struct c2port_device *c2dev = dev_get_drvdata(dev);
 330         struct c2port_ops *ops = c2dev->ops;
 331
 332         return sprintf(buf, "%d\n", ops->block_size);
 333 }
 334 static DEVICE_ATTR(flash_block_size, 0444, c2port_show_flash_block_size, NULL);
 335
 336 static ssize_t c2port_show_flash_size(struct device *dev,
 337                                 struct device_attribute *attr, char *buf)
 338 {
 339         struct c2port_device *c2dev = dev_get_drvdata(dev);
 340         struct c2port_ops *ops = c2dev->ops;
 341
 342         return sprintf(buf, "%d\n", ops->blocks_num * ops->block_size);
 343 }
 344 static DEVICE_ATTR(flash_size, 0444, c2port_show_flash_size, NULL);
 345
 346 static ssize_t access_show(struct device *dev, struct device_attribute *attr,
 347                            char *buf)
 348 {
 349         struct c2port_device *c2dev = dev_get_drvdata(dev);
 350
 351         return sprintf(buf, "%d\n", c2dev->access);
 352 }
 353
 354 static ssize_t access_store(struct device *dev, struct device_attribute *attr,
 355                             const char *buf, size_t count)
 356 {
 357         struct c2port_device *c2dev = dev_get_drvdata(dev);
 358         struct c2port_ops *ops = c2dev->ops;
 359         int status, ret;
 360
 361         ret = sscanf(buf, "%d", &status);
 362         if (ret != 1)
 363                 return -EINVAL;
 364
 365         mutex_lock(&c2dev->mutex);
 366
 367         c2dev->access = !!status;
 368
 369         /* If access is "on" clock should be HIGH _before_ setting the line
 370          * as output and data line should be set as INPUT anyway */
 371         if (c2dev->access)
 372                 ops->c2ck_set(c2dev, 1);
 373         ops->access(c2dev, c2dev->access);
 374         if (c2dev->access)
 375                 ops->c2d_dir(c2dev, 1);
 376
 377         mutex_unlock(&c2dev->mutex);
 378
 379         return count;
 380 }
 381 static DEVICE_ATTR_RW(access);
 382
 383 static ssize_t c2port_store_reset(struct device *dev,
 384                                 struct device_attribute *attr,
 385                                 const char *buf, size_t count)
 386 {
 387         struct c2port_device *c2dev = dev_get_drvdata(dev);
 388
 389         /* Check the device access status */
 390         if (!c2dev->access)
 391                 return -EBUSY;
 392
 393         mutex_lock(&c2dev->mutex);
 394
 395         c2port_reset(c2dev);
 396         c2dev->flash_access = 0;
 397
 398         mutex_unlock(&c2dev->mutex);
 399
 400         return count;
 401 }
 402 static DEVICE_ATTR(reset, 0200, NULL, c2port_store_reset);
 403
 404 static ssize_t __c2port_show_dev_id(struct c2port_device *dev, char *buf)
 405 {
 406         u8 data;
 407         int ret;
 408
 409         /* Select DEVICEID register for C2 data register accesses */
 410         c2port_write_ar(dev, C2PORT_DEVICEID);
 411
 412         /* Read and return the device ID register */
 413         ret = c2port_read_dr(dev, &data);
 414         if (ret < 0)
 415                 return ret;
 416
 417         return sprintf(buf, "%d\n", data);
 418 }
 419
 420 static ssize_t c2port_show_dev_id(struct device *dev,
 421                                 struct device_attribute *attr, char *buf)
 422 {
 423         struct c2port_device *c2dev = dev_get_drvdata(dev);
 424         ssize_t ret;
 425
 426         /* Check the device access status */
 427         if (!c2dev->access)
 428                 return -EBUSY;
 429
 430         mutex_lock(&c2dev->mutex);
 431         ret = __c2port_show_dev_id(c2dev, buf);
 432         mutex_unlock(&c2dev->mutex);
 433
 434         if (ret < 0)
 435                 dev_err(dev, "cannot read from %s\n", c2dev->name);
 436
 437         return ret;
 438 }
 439 static DEVICE_ATTR(dev_id, 0444, c2port_show_dev_id, NULL);
 440
 441 static ssize_t __c2port_show_rev_id(struct c2port_device *dev, char *buf)
 442 {
 443         u8 data;
 444         int ret;
 445
 446         /* Select REVID register for C2 data register accesses */
 447         c2port_write_ar(dev, C2PORT_REVID);
 448
 449         /* Read and return the revision ID register */
 450         ret = c2port_read_dr(dev, &data);
 451         if (ret < 0)
 452                 return ret;
 453
 454         return sprintf(buf, "%d\n", data);
 455 }
 456
 457 static ssize_t c2port_show_rev_id(struct device *dev,
 458                                 struct device_attribute *attr, char *buf)
 459 {
 460         struct c2port_device *c2dev = dev_get_drvdata(dev);
 461         ssize_t ret;
 462
 463         /* Check the device access status */
 464         if (!c2dev->access)
 465                 return -EBUSY;
 466
 467         mutex_lock(&c2dev->mutex);
 468         ret = __c2port_show_rev_id(c2dev, buf);
 469         mutex_unlock(&c2dev->mutex);
 470
 471         if (ret < 0)
 472                 dev_err(c2dev->dev, "cannot read from %s\n", c2dev->name);
 473
 474         return ret;
 475 }
 476 static DEVICE_ATTR(rev_id, 0444, c2port_show_rev_id, NULL);
 477
 478 static ssize_t c2port_show_flash_access(struct device *dev,
 479                                 struct device_attribute *attr, char *buf)
 480 {
 481         struct c2port_device *c2dev = dev_get_drvdata(dev);
 482
 483         return sprintf(buf, "%d\n", c2dev->flash_access);
 484 }
 485
 486 static ssize_t __c2port_store_flash_access(struct c2port_device *dev,
 487                                                 int status)
 488 {
 489         int ret;
 490
 491         /* Check the device access status */
 492         if (!dev->access)
 493                 return -EBUSY;
 494
 495         dev->flash_access = !!status;
 496
 497         /* If flash_access is off we have nothing to do... */
 498         if (dev->flash_access == 0)
 499                 return 0;
 500
 501         /* Target the C2 flash programming control register for C2 data
 502          * register access */
 503         c2port_write_ar(dev, C2PORT_FPCTL);
 504
 505         /* Write the first keycode to enable C2 Flash programming */
 506         ret = c2port_write_dr(dev, 0x02);
 507         if (ret < 0)
 508                 return ret;
 509
 510         /* Write the second keycode to enable C2 Flash programming */
 511         ret = c2port_write_dr(dev, 0x01);
 512         if (ret < 0)
 513                 return ret;
 514
 515         /* Delay for at least 20ms to ensure the target is ready for
 516          * C2 flash programming */
 517         mdelay(25);
 518
 519         return 0;
 520 }
 521
 522 static ssize_t c2port_store_flash_access(struct device *dev,
 523                                 struct device_attribute *attr,
 524                                 const char *buf, size_t count)
 525 {
 526         struct c2port_device *c2dev = dev_get_drvdata(dev);
 527         int status;
 528         ssize_t ret;
 529
 530         ret = sscanf(buf, "%d", &status);
 531         if (ret != 1)
 532                 return -EINVAL;
 533
 534         mutex_lock(&c2dev->mutex);
 535         ret = __c2port_store_flash_access(c2dev, status);
 536         mutex_unlock(&c2dev->mutex);
 537
 538         if (ret < 0) {
 539                 dev_err(c2dev->dev, "cannot enable %s flash programming\n",
 540                         c2dev->name);
 541                 return ret;
 542         }
 543
 544         return count;
 545 }
 546 static DEVICE_ATTR(flash_access, 0644, c2port_show_flash_access,
 547                    c2port_store_flash_access);
 548
 549 static ssize_t __c2port_write_flash_erase(struct c2port_device *dev)
 550 {
 551         u8 status;
 552         int ret;
 553
 554         /* Target the C2 flash programming data register for C2 data register
 555          * access.
 556          */
 557         c2port_write_ar(dev, C2PORT_FPDAT);
 558
 559         /* Send device erase command */
 560         c2port_write_dr(dev, C2PORT_DEVICE_ERASE);
 561
 562         /* Wait for input acknowledge */
 563         ret = c2port_poll_in_busy(dev);
 564         if (ret < 0)
 565                 return ret;
 566
 567         /* Should check status before starting FLASH access sequence */
 568
 569         /* Wait for status information */
 570         ret = c2port_poll_out_ready(dev);
 571         if (ret < 0)
 572                 return ret;
 573
 574         /* Read flash programming interface status */
 575         ret = c2port_read_dr(dev, &status);
 576         if (ret < 0)
 577                 return ret;
 578         if (status != C2PORT_COMMAND_OK)
 579                 return -EBUSY;
 580
 581         /* Send a three-byte arming sequence to enable the device erase.
 582          * If the sequence is not received correctly, the command will be
 583          * ignored.
 584          * Sequence is: 0xde, 0xad, 0xa5.
 585          */
 586         c2port_write_dr(dev, 0xde);
 587         ret = c2port_poll_in_busy(dev);
 588         if (ret < 0)
 589                 return ret;
 590         c2port_write_dr(dev, 0xad);
 591         ret = c2port_poll_in_busy(dev);
 592         if (ret < 0)
 593                 return ret;
 594         c2port_write_dr(dev, 0xa5);
 595         ret = c2port_poll_in_busy(dev);
 596         if (ret < 0)
 597                 return ret;
 598
 599         ret = c2port_poll_out_ready(dev);
 600         if (ret < 0)
 601                 return ret;
 602
 603         return 0;
 604 }
 605
 606 static ssize_t c2port_store_flash_erase(struct device *dev,
 607                                 struct device_attribute *attr,
 608                                 const char *buf, size_t count)
 609 {
 610         struct c2port_device *c2dev = dev_get_drvdata(dev);
 611         int ret;
 612
 613         /* Check the device and flash access status */
 614         if (!c2dev->access || !c2dev->flash_access)
 615                 return -EBUSY;
 616
 617         mutex_lock(&c2dev->mutex);
 618         ret = __c2port_write_flash_erase(c2dev);
 619         mutex_unlock(&c2dev->mutex);
 620
 621         if (ret < 0) {
 622                 dev_err(c2dev->dev, "cannot erase %s flash\n", c2dev->name);
 623                 return ret;
 624         }
 625
 626         return count;
 627 }
 628 static DEVICE_ATTR(flash_erase, 0200, NULL, c2port_store_flash_erase);
 629
 630 static ssize_t __c2port_read_flash_data(struct c2port_device *dev,
 631                                 char *buffer, loff_t offset, size_t count)
 632 {
 633         struct c2port_ops *ops = dev->ops;
 634         u8 status, nread = 128;
 635         int i, ret;
 636
 637         /* Check for flash end */
 638         if (offset >= ops->block_size * ops->blocks_num)
 639                 return 0;
 640
 641         if (ops->block_size * ops->blocks_num - offset < nread)
 642                 nread = ops->block_size * ops->blocks_num - offset;
 643         if (count < nread)
 644                 nread = count;
 645         if (nread == 0)
 646                 return nread;
 647
 648         /* Target the C2 flash programming data register for C2 data register
 649          * access */
 650         c2port_write_ar(dev, C2PORT_FPDAT);
 651
 652         /* Send flash block read command */
 653         c2port_write_dr(dev, C2PORT_BLOCK_READ);
 654
 655         /* Wait for input acknowledge */
 656         ret = c2port_poll_in_busy(dev);
 657         if (ret < 0)
 658                 return ret;
 659
 660         /* Should check status before starting FLASH access sequence */
 661
 662         /* Wait for status information */
 663         ret = c2port_poll_out_ready(dev);
 664         if (ret < 0)
 665                 return ret;
 666
 667         /* Read flash programming interface status */
 668         ret = c2port_read_dr(dev, &status);
 669         if (ret < 0)
 670                 return ret;
 671         if (status != C2PORT_COMMAND_OK)
 672                 return -EBUSY;
 673
 674         /* Send address high byte */
 675         c2port_write_dr(dev, offset >> 8);
 676         ret = c2port_poll_in_busy(dev);
 677         if (ret < 0)
 678                 return ret;
 679
 680         /* Send address low byte */
 681         c2port_write_dr(dev, offset & 0x00ff);
 682         ret = c2port_poll_in_busy(dev);
 683         if (ret < 0)
 684                 return ret;
 685
 686         /* Send address block size */
 687         c2port_write_dr(dev, nread);
 688         ret = c2port_poll_in_busy(dev);
 689         if (ret < 0)
 690                 return ret;
 691
 692         /* Should check status before reading FLASH block */
 693
 694         /* Wait for status information */
 695         ret = c2port_poll_out_ready(dev);
 696         if (ret < 0)
 697                 return ret;
 698
 699         /* Read flash programming interface status */
 700         ret = c2port_read_dr(dev, &status);
 701         if (ret < 0)
 702                 return ret;
 703         if (status != C2PORT_COMMAND_OK)
 704                 return -EBUSY;
 705
 706         /* Read flash block */
 707         for (i = 0; i < nread; i++) {
 708                 ret = c2port_poll_out_ready(dev);
 709                 if (ret < 0)
 710                         return ret;
 711
 712                 ret = c2port_read_dr(dev, buffer+i);
 713                 if (ret < 0)
 714                         return ret;
 715         }
 716
 717         return nread;
 718 }
 719
 720 static ssize_t c2port_read_flash_data(struct file *filp, struct kobject *kobj,
 721                                 struct bin_attribute *attr,
 722                                 char *buffer, loff_t offset, size_t count)
 723 {
 724         struct c2port_device *c2dev = dev_get_drvdata(kobj_to_dev(kobj));
 725         ssize_t ret;
 726
 727         /* Check the device and flash access status */
 728         if (!c2dev->access || !c2dev->flash_access)
 729                 return -EBUSY;
 730
 731         mutex_lock(&c2dev->mutex);
 732         ret = __c2port_read_flash_data(c2dev, buffer, offset, count);
 733         mutex_unlock(&c2dev->mutex);
 734
 735         if (ret < 0)
 736                 dev_err(c2dev->dev, "cannot read %s flash\n", c2dev->name);
 737
 738         return ret;
 739 }
 740
 741 static ssize_t __c2port_write_flash_data(struct c2port_device *dev,
 742                                 char *buffer, loff_t offset, size_t count)
 743 {
 744         struct c2port_ops *ops = dev->ops;
 745         u8 status, nwrite = 128;
 746         int i, ret;
 747
 748         if (nwrite > count)
 749                 nwrite = count;
 750         if (ops->block_size * ops->blocks_num - offset < nwrite)
 751                 nwrite = ops->block_size * ops->blocks_num - offset;
 752
 753         /* Check for flash end */
 754         if (offset >= ops->block_size * ops->blocks_num)
 755                 return -EINVAL;
 756
 757         /* Target the C2 flash programming data register for C2 data register
 758          * access */
 759         c2port_write_ar(dev, C2PORT_FPDAT);
 760
 761         /* Send flash block write command */
 762         c2port_write_dr(dev, C2PORT_BLOCK_WRITE);
 763
 764         /* Wait for input acknowledge */
 765         ret = c2port_poll_in_busy(dev);
 766         if (ret < 0)
 767                 return ret;
 768
 769         /* Should check status before starting FLASH access sequence */
 770
 771         /* Wait for status information */
 772         ret = c2port_poll_out_ready(dev);
 773         if (ret < 0)
 774                 return ret;
 775
 776         /* Read flash programming interface status */
 777         ret = c2port_read_dr(dev, &status);
 778         if (ret < 0)
 779                 return ret;
 780         if (status != C2PORT_COMMAND_OK)
 781                 return -EBUSY;
 782
 783         /* Send address high byte */
 784         c2port_write_dr(dev, offset >> 8);
 785         ret = c2port_poll_in_busy(dev);
 786         if (ret < 0)
 787                 return ret;
 788
 789         /* Send address low byte */
 790         c2port_write_dr(dev, offset & 0x00ff);
 791         ret = c2port_poll_in_busy(dev);
 792         if (ret < 0)
 793                 return ret;
 794
 795         /* Send address block size */
 796         c2port_write_dr(dev, nwrite);
 797         ret = c2port_poll_in_busy(dev);
 798         if (ret < 0)
 799                 return ret;
 800
 801         /* Should check status before writing FLASH block */
 802
 803         /* Wait for status information */
 804         ret = c2port_poll_out_ready(dev);
 805         if (ret < 0)
 806                 return ret;
 807
 808         /* Read flash programming interface status */
 809         ret = c2port_read_dr(dev, &status);
 810         if (ret < 0)
 811                 return ret;
 812         if (status != C2PORT_COMMAND_OK)
 813                 return -EBUSY;
 814
 815         /* Write flash block */
 816         for (i = 0; i < nwrite; i++) {
 817                 ret = c2port_write_dr(dev, *(buffer+i));
 818                 if (ret < 0)
 819                         return ret;
 820
 821                 ret = c2port_poll_in_busy(dev);
 822                 if (ret < 0)
 823                         return ret;
 824
 825         }
 826
 827         /* Wait for last flash write to complete */
 828         ret = c2port_poll_out_ready(dev);
 829         if (ret < 0)
 830                 return ret;
 831
 832         return nwrite;
 833 }
 834
 835 static ssize_t c2port_write_flash_data(struct file *filp, struct kobject *kobj,
 836                                 struct bin_attribute *attr,
 837                                 char *buffer, loff_t offset, size_t count)
 838 {
 839         struct c2port_device *c2dev = dev_get_drvdata(kobj_to_dev(kobj));
 840         int ret;
 841
 842         /* Check the device access status */
 843         if (!c2dev->access || !c2dev->flash_access)
 844                 return -EBUSY;
 845
 846         mutex_lock(&c2dev->mutex);
 847         ret = __c2port_write_flash_data(c2dev, buffer, offset, count);
 848         mutex_unlock(&c2dev->mutex);
 849
 850         if (ret < 0)
 851                 dev_err(c2dev->dev, "cannot write %s flash\n", c2dev->name);
 852
 853         return ret;
 854 }
 855 /* size is computed at run-time */
 856 static BIN_ATTR(flash_data, 0644, c2port_read_flash_data,
 857                 c2port_write_flash_data, 0);
 858
 859 /*
 860  * Class attributes
 861  */
 862 static struct attribute *c2port_attrs[] = {
 863         &dev_attr_name.attr,
 864         &dev_attr_flash_blocks_num.attr,
 865         &dev_attr_flash_block_size.attr,
 866         &dev_attr_flash_size.attr,
 867         &dev_attr_access.attr,
 868         &dev_attr_reset.attr,
 869         &dev_attr_dev_id.attr,
 870         &dev_attr_rev_id.attr,
 871         &dev_attr_flash_access.attr,
 872         &dev_attr_flash_erase.attr,
 873         NULL,
 874 };
 875
 876 static struct bin_attribute *c2port_bin_attrs[] = {
 877         &bin_attr_flash_data,
 878         NULL,
 879 };
 880
 881 static const struct attribute_group c2port_group = {
 882         .attrs = c2port_attrs,
 883         .bin_attrs = c2port_bin_attrs,
 884 };
 885
 886 static const struct attribute_group *c2port_groups[] = {
 887         &c2port_group,
 888         NULL,
 889 };
 890
 891 /*
 892  * Exported functions
 893  */
 894
 895 struct c2port_device *c2port_device_register(char *name,
 896                                         struct c2port_ops *ops, void *devdata)
 897 {
 898         struct c2port_device *c2dev;
 899         int ret;
 900
 901         if (unlikely(!ops) || unlikely(!ops->access) || \
 902                 unlikely(!ops->c2d_dir) || unlikely(!ops->c2ck_set) || \
 903                 unlikely(!ops->c2d_get) || unlikely(!ops->c2d_set))
 904                 return ERR_PTR(-EINVAL);
 905
 906         c2dev = kmalloc(sizeof(struct c2port_device), GFP_KERNEL);
 907         kmemcheck_annotate_bitfield(c2dev, flags);
 908         if (unlikely(!c2dev))
 909                 return ERR_PTR(-ENOMEM);
 910
 911         idr_preload(GFP_KERNEL);
 912         spin_lock_irq(&c2port_idr_lock);
 913         ret = idr_alloc(&c2port_idr, c2dev, 0, 0, GFP_NOWAIT);
 914         spin_unlock_irq(&c2port_idr_lock);
 915         idr_preload_end();
 916
 917         if (ret < 0)
 918                 goto error_idr_alloc;
 919         c2dev->id = ret;
 920
 921         bin_attr_flash_data.size = ops->blocks_num * ops->block_size;
 922
 923         c2dev->dev = device_create(c2port_class, NULL, 0, c2dev,
 924                                    "c2port%d", c2dev->id);
 925         if (IS_ERR(c2dev->dev)) {
 926                 ret = PTR_ERR(c2dev->dev);
 927                 goto error_device_create;
 928         }
 929         dev_set_drvdata(c2dev->dev, c2dev);
 930
 931         strncpy(c2dev->name, name, C2PORT_NAME_LEN);
 932         c2dev->ops = ops;
 933         mutex_init(&c2dev->mutex);
 934
 935         /* By default C2 port access is off */
 936         c2dev->access = c2dev->flash_access = 0;
 937         ops->access(c2dev, 0);
 938
 939         dev_info(c2dev->dev, "C2 port %s added\n", name);
 940         dev_info(c2dev->dev, "%s flash has %d blocks x %d bytes "
 941                                 "(%d bytes total)\n",
 942                                 name, ops->blocks_num, ops->block_size,
 943                                 ops->blocks_num * ops->block_size);
 944
 945         return c2dev;
 946
 947 error_device_create:
 948         spin_lock_irq(&c2port_idr_lock);
 949         idr_remove(&c2port_idr, c2dev->id);
 950         spin_unlock_irq(&c2port_idr_lock);
 951
 952 error_idr_alloc:
 953         kfree(c2dev);
 954
 955         return ERR_PTR(ret);
 956 }
 957 EXPORT_SYMBOL(c2port_device_register);
 958
 959 void c2port_device_unregister(struct c2port_device *c2dev)
 960 {
 961         if (!c2dev)
 962                 return;
 963
 964         dev_info(c2dev->dev, "C2 port %s removed\n", c2dev->name);
 965
 966         spin_lock_irq(&c2port_idr_lock);
 967         idr_remove(&c2port_idr, c2dev->id);
 968         spin_unlock_irq(&c2port_idr_lock);
 969
 970         device_destroy(c2port_class, c2dev->id);
 971
 972         kfree(c2dev);
 973 }
 974 EXPORT_SYMBOL(c2port_device_unregister);
 975
 976 /*
 977  * Module stuff
 978  */
 979
 980 static int __init c2port_init(void)
 981 {
 982         printk(KERN_INFO "Silicon Labs C2 port support v. " DRIVER_VERSION
 983                 " - (C) 2007 Rodolfo Giometti\n");
 984
 985         c2port_class = class_create(THIS_MODULE, "c2port");
 986         if (IS_ERR(c2port_class)) {
 987                 printk(KERN_ERR "c2port: failed to allocate class\n");
 988                 return PTR_ERR(c2port_class);
 989         }
 990         c2port_class->dev_groups = c2port_groups;
 991
 992         return 0;
 993 }
 994
 995 static void __exit c2port_exit(void)
 996 {
 997         class_destroy(c2port_class);
 998 }
 999
1000 module_init(c2port_init);
1001 module_exit(c2port_exit);
1002
1003 MODULE_AUTHOR("Rodolfo Giometti <[email protected]>");
1004 MODULE_DESCRIPTION("Silicon Labs C2 port support v. " DRIVER_VERSION);
1005 MODULE_LICENSE("GPL");