drivers/parport/parport_mfc3.c

   1 /* Low-level parallel port routines for the Multiface 3 card
   2  *
   3  * Author: Joerg Dorchain <dorchain@wirbel.com>
   4  *
   5  * (C) The elitist m68k Users(TM)
   6  *
   7  * based on the existing parport_amiga and lp_mfc
   8  *
   9  *
  10  * From the MFC3 documentation:
  11  *
  12  * Miscellaneous PIA Details
  13  * -------------------------
  14  *
  15  *      The two open-drain interrupt outputs /IRQA and /IRQB are routed to
  16  * /INT2 of the Z2 bus.
  17  *
  18  *      The CPU data bus of the PIA (D0-D7) is connected to D8-D15 on the Z2
  19  * bus. This means that any PIA registers are accessed at even addresses.
  20  *
  21  * Centronics Pin Connections for the PIA
  22  * --------------------------------------
  23  *
  24  *      The following table shows the connections between the PIA and the
  25  * Centronics interface connector. These connections implement a single, but
  26  * very complete, Centronics type interface. The Pin column gives the pin
  27  * numbers of the PIA. The Centronics pin numbers can be found in the section
  28  * "Parallel Connectors".
  29  *
  30  *
  31  *    Pin | PIA | Dir | Centronics Names
  32  * -------+-----+-----+---------------------------------------------------------
  33  *     19 | CB2 | --> | /STROBE (aka /DRDY)
  34  *  10-17 | PBx | <-> | DATA0 - DATA7
  35  *     18 | CB1 | <-- | /ACK
  36  *     40 | CA1 | <-- | BUSY
  37  *      3 | PA1 | <-- | PAPER-OUT (aka POUT)
  38  *      4 | PA2 | <-- | SELECTED (aka SEL)
  39  *      9 | PA7 | --> | /INIT (aka /RESET or /INPUT-PRIME)
  40  *      6 | PA4 | <-- | /ERROR (aka /FAULT)
  41  *      7 | PA5 | --> | DIR (aka /SELECT-IN)
  42  *      8 | PA6 | --> | /AUTO-FEED-XT
  43  *     39 | CA2 | --> | open
  44  *      5 | PA3 | <-- | /ACK (same as CB1!)
  45  *      2 | PA0 | <-- | BUSY (same as CA1!)
  46  * -------+-----+-----+---------------------------------------------------------
  47  *
  48  * Should be enough to understand some of the driver.
  49  */
  50
  51 #include "multiface.h"
  52 #include <linux/module.h>
  53 #include <linux/init.h>
  54 #include <linux/parport.h>
  55 #include <linux/delay.h>
  56 #include <linux/mc6821.h>
  57 #include <linux/zorro.h>
  58 #include <asm/setup.h>
  59 #include <asm/amigahw.h>
  60 #include <asm/irq.h>
  61 #include <asm/amigaints.h>
  62
  63 /* Maximum Number of Cards supported */
  64 #define MAX_MFC 5
  65
  66 #undef DEBUG
  67 #ifdef DEBUG
  68 #define DPRINTK printk
  69 #else
  70 static inline int DPRINTK() {return 0;}
  71 #endif
  72
  73 static struct parport *this_port[MAX_MFC] = {NULL, };
  74 static volatile int dummy; /* for trigger readds */
  75
  76 #define pia(dev) ((struct pia *)(dev->base))
  77 static struct parport_operations pp_mfc3_ops;
  78
  79 static void mfc3_write_data(struct parport *p, unsigned char data)
  80 {
  81 DPRINTK("write_data %c\n",data);
  82
  83         dummy = pia(p)->pprb; /* clears irq bit */
  84         /* Triggers also /STROBE.*/
  85         pia(p)->pprb = data;
  86 }
  87
  88 static unsigned char mfc3_read_data(struct parport *p)
  89 {
  90         /* clears interupt bit. Triggers also /STROBE. */
  91         return pia(p)->pprb;
  92 }
  93
  94 static unsigned char control_pc_to_mfc3(unsigned char control)
  95 {
  96         unsigned char ret = 32|64;
  97
  98         if (control & PARPORT_CONTROL_DIRECTION) /* XXX: What is this? */
  99                 ;
 100         if (control & PARPORT_CONTROL_INTEN) /* XXX: What is INTEN? */
 101                 ;
 102         if (control & PARPORT_CONTROL_SELECT) /* XXX: What is SELECP? */
 103                 ret &= ~32; /* /SELECT_IN */
 104         if (control & PARPORT_CONTROL_INIT) /* INITP */
 105                 ret |= 128;
 106         if (control & PARPORT_CONTROL_AUTOFD) /* AUTOLF */
 107                 ret &= ~64;
 108         if (control & PARPORT_CONTROL_STROBE) /* Strobe */
 109                 /* Handled directly by hardware */;
 110         return ret;
 111 }
 112
 113 static unsigned char control_mfc3_to_pc(unsigned char control)
 114 {
 115         unsigned char ret = PARPORT_CONTROL_INTEN | PARPORT_CONTROL_STROBE
 116                           | PARPORT_CONTROL_AUTOFD | PARPORT_CONTROL_SELECT;
 117
 118         if (control & 128) /* /INITP */
 119                 ret |= PARPORT_CONTROL_INIT;
 120         if (control & 64) /* /AUTOLF */
 121                 ret &= ~PARPORT_CONTROL_AUTOFD;
 122         if (control & 32) /* /SELECT_IN */
 123                 ret &= ~PARPORT_CONTROL_SELECT;
 124         return ret;
 125 }
 126
 127 static void mfc3_write_control(struct parport *p, unsigned char control)
 128 {
 129 DPRINTK("write_control %02x\n",control);
 130         pia(p)->ppra = (pia(p)->ppra & 0x1f) | control_pc_to_mfc3(control);
 131 }
 132
 133 static unsigned char mfc3_read_control( struct parport *p)
 134 {
 135 DPRINTK("read_control \n");
 136         return control_mfc3_to_pc(pia(p)->ppra & 0xe0);
 137 }
 138
 139 static unsigned char mfc3_frob_control( struct parport *p, unsigned char mask, unsigned char val)
 140 {
 141         unsigned char old;
 142
 143 DPRINTK("frob_control mask %02x, value %02x\n",mask,val);
 144         old = mfc3_read_control(p);
 145         mfc3_write_control(p, (old & ~mask) ^ val);
 146         return old;
 147 }
 148
 149
 150 static unsigned char status_pc_to_mfc3(unsigned char status)
 151 {
 152         unsigned char ret = 1;
 153
 154         if (status & PARPORT_STATUS_BUSY) /* Busy */
 155                 ret &= ~1;
 156         if (status & PARPORT_STATUS_ACK) /* Ack */
 157                 ret |= 8;
 158         if (status & PARPORT_STATUS_PAPEROUT) /* PaperOut */
 159                 ret |= 2;
 160         if (status & PARPORT_STATUS_SELECT) /* select */
 161                 ret |= 4;
 162         if (status & PARPORT_STATUS_ERROR) /* error */
 163                 ret |= 16;
 164         return ret;
 165 }
 166
 167 static unsigned char status_mfc3_to_pc(unsigned char status)
 168 {
 169         unsigned char ret = PARPORT_STATUS_BUSY;
 170
 171         if (status & 1) /* Busy */
 172                 ret &= ~PARPORT_STATUS_BUSY;
 173         if (status & 2) /* PaperOut */
 174                 ret |= PARPORT_STATUS_PAPEROUT;
 175         if (status & 4) /* Selected */
 176                 ret |= PARPORT_STATUS_SELECT;
 177         if (status & 8) /* Ack */
 178                 ret |= PARPORT_STATUS_ACK;
 179         if (status & 16) /* /ERROR */
 180                 ret |= PARPORT_STATUS_ERROR;
 181
 182         return ret;
 183 }
 184
 185 static void mfc3_write_status( struct parport *p, unsigned char status)
 186 {
 187 DPRINTK("write_status %02x\n",status);
 188         pia(p)->ppra = (pia(p)->ppra & 0xe0) | status_pc_to_mfc3(status);
 189 }
 190
 191 static unsigned char mfc3_read_status(struct parport *p)
 192 {
 193         unsigned char status;
 194
 195         status = status_mfc3_to_pc(pia(p)->ppra & 0x1f);
 196 DPRINTK("read_status %02x\n", status);
 197         return status;
 198 }
 199
 200 static void mfc3_change_mode( struct parport *p, int m)
 201 {
 202         /* XXX: This port only has one mode, and I am
 203         not sure about the corresponding PC-style mode*/
 204 }
 205
 206 static int use_cnt = 0;
 207
 208 static void mfc3_interrupt(int irq, void *dev_id, struct pt_regs *regs)
 209 {
 210         int i;
 211
 212         for( i = 0; i < MAX_MFC; i++)
 213                 if (this_port[i] != NULL)
 214                         if (pia(this_port[i])->crb & 128) { /* Board caused interrupt */
 215                                 dummy = pia(this_port[i])->pprb; /* clear irq bit */
 216                                 parport_generic_irq(irq, this_port[i], regs);
 217                         }
 218 }
 219
 220 static int mfc3_claim_resources(struct parport *p)
 221 {
 222 DPRINTK("claim_resources\n");
 223 }
 224
 225 static void mfc3_init_state(struct parport_state *s)
 226 {
 227         s->u.amiga.data = 0;
 228         s->u.amiga.datadir = 255;
 229         s->u.amiga.status = 0;
 230         s->u.amiga.statusdir = 0xe0;
 231 }
 232
 233 static void mfc3_save_state(struct parport *p, struct parport_state *s)
 234 {
 235         s->u.amiga.data = pia(p)->pprb;
 236         pia(p)->crb &= ~PIA_DDR;
 237         s->u.amiga.datadir = pia(p)->pddrb;
 238         pia(p)->crb |= PIA_DDR;
 239         s->u.amiga.status = pia(p)->ppra;
 240         pia(p)->cra &= ~PIA_DDR;
 241         s->u.amiga.statusdir = pia(p)->pddrb;
 242         pia(p)->cra |= PIA_DDR;
 243 }
 244
 245 static void mfc3_restore_state(struct parport *p, struct parport_state *s)
 246 {
 247         pia(p)->pprb = s->u.amiga.data;
 248         pia(p)->crb &= ~PIA_DDR;
 249         pia(p)->pddrb = s->u.amiga.datadir;
 250         pia(p)->crb |= PIA_DDR;
 251         pia(p)->ppra = s->u.amiga.status;
 252         pia(p)->cra &= ~PIA_DDR;
 253         pia(p)->pddrb = s->u.amiga.statusdir;
 254         pia(p)->cra |= PIA_DDR;
 255 }
 256
 257 static void mfc3_enable_irq(struct parport *p)
 258 {
 259         pia(p)->crb |= PIA_C1_ENABLE_IRQ;
 260 }
 261
 262 static void mfc3_disable_irq(struct parport *p)
 263 {
 264         pia(p)->crb &= ~PIA_C1_ENABLE_IRQ;
 265 }
 266
 267 static void mfc3_inc_use_count(void)
 268 {
 269         MOD_INC_USE_COUNT;
 270 }
 271
 272 static void mfc3_dec_use_count(void)
 273 {
 274         MOD_DEC_USE_COUNT;
 275 }
 276
 277 static struct parport_operations pp_mfc3_ops = {
 278         mfc3_write_data,
 279         mfc3_read_data,
 280
 281         mfc3_write_control,
 282         mfc3_read_control,
 283         mfc3_frob_control,
 284
 285         mfc3_read_status,
 286
 287         mfc3_enable_irq,
 288         mfc3_disable_irq,
 289
 290         NULL, /* data_forward - FIXME */
 291         NULL, /* data_reverse - FIXME */
 292
 293         mfc3_init_state,
 294         mfc3_save_state,
 295         mfc3_restore_state,
 296
 297         mfc3_inc_use_count,
 298         mfc3_dec_use_count,
 299
 300         parport_ieee1284_epp_write_data,
 301         parport_ieee1284_epp_read_data,
 302         parport_ieee1284_epp_write_addr,
 303         parport_ieee1284_epp_read_addr,
 304
 305         parport_ieee1284_ecp_write_data,
 306         parport_ieee1284_ecp_read_data,
 307         parport_ieee1284_ecp_write_addr,
 308
 309         parport_ieee1284_write_compat,
 310         parport_ieee1284_read_nibble,
 311         parport_ieee1284_read_byte,
 312 };
 313
 314 /* ----------- Initialisation code --------------------------------- */
 315
 316 int __init parport_mfc3_init(void)
 317 {
 318         struct parport *p;
 319         int pias = 0;
 320         struct pia *pp;
 321         unsigned int key = 0;
 322         const struct ConfigDev *cd;
 323
 324         if (MACH_IS_AMIGA) {
 325                 while ((key = zorro_find(ZORRO_PROD_BSC_MULTIFACE_III, 0, key))) {
 326                         cd = zorro_get_board(key);
 327                         pp = (struct pia *)ZTWO_VADDR((((u_char *)cd->cd_BoardAddr)+PIABASE));
 328                         if (pias < MAX_MFC) {
 329                                 pp->crb = 0;
 330                                 pp->pddrb = 255; /* all data pins output */
 331                                 pp->crb = PIA_DDR|32|8;
 332                                 dummy = pp->pddrb; /* reading clears interrupt */
 333                                 pp->cra = 0;
 334                                 pp->pddra = 0xe0; /* /RESET,  /DIR ,/AUTO-FEED output */
 335                                 pp->cra = PIA_DDR;
 336                                 pp->ppra = 0; /* reset printer */
 337                                 udelay(10);
 338                                 pp->ppra = 128;
 339                                 if ((p = parport_register_port((unsigned long)pp,
 340                                         IRQ_AMIGA_PORTS, PARPORT_DMA_NONE,
 341                                         &pp_mfc3_ops))) {
 342                                         this_port[pias++] = p;
 343                                         printk(KERN_INFO "%s: Multiface III port using irq\n", p->name);
 344                                         /* XXX: set operating mode */
 345                                         parport_proc_register(p);
 346
 347                                         if (p->irq != PARPORT_IRQ_NONE)
 348                                                 if (use_cnt++ == 0)
 349                                                         if (request_irq(IRQ_AMIGA_PORTS, mfc3_interrupt, SA_SHIRQ, p->name, &pp_mfc3_ops))
 350                                                                 use_cnt--;
 351
 352                                         if (parport_probe_hook)
 353                                                 (*parport_probe_hook)(p);
 354                                         zorro_config_board(key, 0);
 355                                         p->private_data = (void *)key;
 356                                         parport_announce_port (p);
 357                                 }
 358                         }
 359                 }
 360         }
 361         return pias;
 362 }
 363
 364 #ifdef MODULE
 365
 366 MODULE_AUTHOR("Joerg Dorchain");
 367 MODULE_DESCRIPTION("Parport Driver for Multiface 3 expansion cards Paralllel Port");
 368 MODULE_SUPPORTED_DEVICE("Multiface 3 Parallel Port");
 369
 370 int init_module(void)
 371 {
 372         return ! parport_mfc3_init();
 373 }
 374
 375 void cleanup_module(void)
 376 {
 377         int i;
 378
 379         for (i = 0; i < MAX_MFC; i++)
 380                 if (this_port[i] != NULL) {
 381                         if (p->irq != PARPORT_IRQ_NONE)
 382                                 if (--use_cnt == 0)
 383                         free_irq(IRQ_AMIGA_PORTS, &pp_mfc3_ops);
 384                         parport_proc_unregister(this_port[i]);
 385                         parport_unregister_port(this_port[i]);
 386                         zorro_unconfig_board((unsigned int)this_port[i]->private_data, 0);
 387                 }
 388 }
 389 #endif
 390
 391