?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Linux 2.6.21-rc3
[linux/fpc-iii.git] / drivers / block / acsi_slm.c
blobe2e04329096385d3d9d34f08a933cbaa22f837d8
1 /*
2 * acsi_slm.c -- Device driver for the Atari SLM laser printer
3 *
4 * Copyright 1995 Roman Hodek <Roman.Hodek@informatik.uni-erlangen.de>
5 *
6 * This file is subject to the terms and conditions of the GNU General Public
7 * License. See the file COPYING in the main directory of this archive for
8 * more details.
9 *
10 */
11
12 /*
13
14 Notes:
15
16 The major number for SLM printers is 28 (like ACSI), but as a character
17 device, not block device. The minor number is the number of the printer (if
18 you have more than one SLM; currently max. 2 (#define-constant) SLMs are
19 supported). The device can be opened for reading and writing. If reading it,
20 you get some status infos (MODE SENSE data). Writing mode is used for the data
21 to be printed. Some ioctls allow to get the printer status and to tune printer
22 modes and some internal variables.
23
24 A special problem of the SLM driver is the timing and thus the buffering of
25 the print data. The problem is that all the data for one page must be present
26 in memory when printing starts, else --when swapping occurs-- the timing could
27 not be guaranteed. There are several ways to assure this:
28
29 1) Reserve a buffer of 1196k (maximum page size) statically by
30 atari_stram_alloc(). The data are collected there until they're complete,
31 and then printing starts. Since the buffer is reserved, no further
32 considerations about memory and swapping are needed. So this is the
33 simplest method, but it needs a lot of memory for just the SLM.
34
35 An striking advantage of this method is (supposed the SLM_CONT_CNT_REPROG
36 method works, see there), that there are no timing problems with the DMA
37 anymore.
38
39 2) The other method would be to reserve the buffer dynamically each time
40 printing is required. I could think of looking at mem_map where the
41 largest unallocted ST-RAM area is, taking the area, and then extending it
42 by swapping out the neighbored pages, until the needed size is reached.
43 This requires some mm hacking, but seems possible. The only obstacle could
44 be pages that cannot be swapped out (reserved pages)...
45
46 3) Another possibility would be to leave the real data in user space and to
47 work with two dribble buffers of about 32k in the driver: While the one
48 buffer is DMAed to the SLM, the other can be filled with new data. But
49 to keep the timing, that requires that the user data remain in memory and
50 are not swapped out. Requires mm hacking, too, but maybe not so bad as
51 method 2).
52
53 */
54
55 #include <linux/module.h>
56
57 #include <linux/errno.h>
58 #include <linux/sched.h>
59 #include <linux/timer.h>
60 #include <linux/fs.h>
61 #include <linux/major.h>
62 #include <linux/kernel.h>
63 #include <linux/delay.h>
64 #include <linux/interrupt.h>
65 #include <linux/time.h>
66 #include <linux/mm.h>
67 #include <linux/slab.h>
68 #include <linux/smp_lock.h>
69
70 #include <asm/pgtable.h>
71 #include <asm/system.h>
72 #include <asm/uaccess.h>
73 #include <asm/atarihw.h>
74 #include <asm/atariints.h>
75 #include <asm/atari_acsi.h>
76 #include <asm/atari_stdma.h>
77 #include <asm/atari_stram.h>
78 #include <asm/atari_SLM.h>
79
80
81 #undef DEBUG
82
83 /* Define this if the page data are continuous in physical memory. That
84 * requires less reprogramming of the ST-DMA */
85 #define SLM_CONTINUOUS_DMA
86
87 /* Use continuous reprogramming of the ST-DMA counter register. This is
88 * --strictly speaking-- not allowed, Atari recommends not to look at the
89 * counter register while a DMA is going on. But I don't know if that applies
90 * only for reading the register, or also writing to it. Writing only works
91 * fine for me... The advantage is that the timing becomes absolutely
92 * uncritical: Just update each, say 200ms, the counter reg to its maximum,
93 * and the DMA will work until the status byte interrupt occurs.
94 */
95 #define SLM_CONT_CNT_REPROG
96
97 #define CMDSET_TARG_LUN(cmd,targ,lun) \
98 do { \
99 cmd[0] = (cmd[0] & ~0xe0) | (targ)<<5; \
100 cmd[1] = (cmd[1] & ~0xe0) | (lun)<<5; \
101 } while(0)
102
103 #define START_TIMER(to) mod_timer(&slm_timer, jiffies + (to))
104 #define STOP_TIMER() del_timer(&slm_timer)
105
106
107 static char slmreqsense_cmd[6] = { 0x03, 0, 0, 0, 0, 0 };
108 static char slmprint_cmd[6] = { 0x0a, 0, 0, 0, 0, 0 };
109 static char slminquiry_cmd[6] = { 0x12, 0, 0, 0, 0, 0x80 };
110 static char slmmsense_cmd[6] = { 0x1a, 0, 0, 0, 255, 0 };
111 #if 0
112 static char slmmselect_cmd[6] = { 0x15, 0, 0, 0, 0, 0 };
113 #endif
114
115
116 #define MAX_SLM 2
117
118 static struct slm {
119 unsigned target; /* target number */
120 unsigned lun; /* LUN in target controller */
121 atomic_t wr_ok; /* set to 0 if output part busy */
122 atomic_t rd_ok; /* set to 0 if status part busy */
123 } slm_info[MAX_SLM];
124
125 int N_SLM_Printers = 0;
126
127 /* printer buffer */
128 static unsigned char *SLMBuffer; /* start of buffer */
129 static unsigned char *BufferP; /* current position in buffer */
130 static int BufferSize; /* length of buffer for page size */
131
132 typedef enum { IDLE, FILLING, PRINTING } SLMSTATE;
133 static SLMSTATE SLMState;
134 static int SLMBufOwner; /* SLM# currently using the buffer */
135
136 /* DMA variables */
137 #ifndef SLM_CONT_CNT_REPROG
138 static unsigned long SLMCurAddr; /* current base addr of DMA chunk */
139 static unsigned long SLMEndAddr; /* expected end addr */
140 static unsigned long SLMSliceSize; /* size of one DMA chunk */
141 #endif
142 static int SLMError;
143
144 /* wait queues */
145 static DECLARE_WAIT_QUEUE_HEAD(slm_wait); /* waiting for buffer */
146 static DECLARE_WAIT_QUEUE_HEAD(print_wait); /* waiting for printing finished */
147
148 /* status codes */
149 #define SLMSTAT_OK 0x00
150 #define SLMSTAT_ORNERY 0x02
151 #define SLMSTAT_TONER 0x03
152 #define SLMSTAT_WARMUP 0x04
153 #define SLMSTAT_PAPER 0x05
154 #define SLMSTAT_DRUM 0x06
155 #define SLMSTAT_INJAM 0x07
156 #define SLMSTAT_THRJAM 0x08
157 #define SLMSTAT_OUTJAM 0x09
158 #define SLMSTAT_COVER 0x0a
159 #define SLMSTAT_FUSER 0x0b
160 #define SLMSTAT_IMAGER 0x0c
161 #define SLMSTAT_MOTOR 0x0d
162 #define SLMSTAT_VIDEO 0x0e
163 #define SLMSTAT_SYSTO 0x10
164 #define SLMSTAT_OPCODE 0x12
165 #define SLMSTAT_DEVNUM 0x15
166 #define SLMSTAT_PARAM 0x1a
167 #define SLMSTAT_ACSITO 0x1b /* driver defined */
168 #define SLMSTAT_NOTALL 0x1c /* driver defined */
169
170 static char *SLMErrors[] = {
171 /* 0x00 */ "OK and ready",
172 /* 0x01 */ NULL,
173 /* 0x02 */ "ornery printer",
174 /* 0x03 */ "toner empty",
175 /* 0x04 */ "warming up",
176 /* 0x05 */ "paper empty",
177 /* 0x06 */ "drum empty",
178 /* 0x07 */ "input jam",
179 /* 0x08 */ "through jam",
180 /* 0x09 */ "output jam",
181 /* 0x0a */ "cover open",
182 /* 0x0b */ "fuser malfunction",
183 /* 0x0c */ "imager malfunction",
184 /* 0x0d */ "motor malfunction",
185 /* 0x0e */ "video malfunction",
186 /* 0x0f */ NULL,
187 /* 0x10 */ "printer system timeout",
188 /* 0x11 */ NULL,
189 /* 0x12 */ "invalid operation code",
190 /* 0x13 */ NULL,
191 /* 0x14 */ NULL,
192 /* 0x15 */ "invalid device number",
193 /* 0x16 */ NULL,
194 /* 0x17 */ NULL,
195 /* 0x18 */ NULL,
196 /* 0x19 */ NULL,
197 /* 0x1a */ "invalid parameter list",
198 /* 0x1b */ "ACSI timeout",
199 /* 0x1c */ "not all printed"
200 };
201
202 #define N_ERRORS (sizeof(SLMErrors)/sizeof(*SLMErrors))
203
204 /* real (driver caused) error? */
205 #define IS_REAL_ERROR(x) (x > 0x10)
206
207
208 static struct {
209 char *name;
210 int w, h;
211 } StdPageSize[] = {
212 { "Letter", 2400, 3180 },
213 { "Legal", 2400, 4080 },
214 { "A4", 2336, 3386 },
215 { "B5", 2016, 2914 }
216 };
217
218 #define N_STD_SIZES (sizeof(StdPageSize)/sizeof(*StdPageSize))
219
220 #define SLM_BUFFER_SIZE (2336*3386/8) /* A4 for now */
221 #define SLM_DMA_AMOUNT 255 /* #sectors to program the DMA for */
222
223 #ifdef SLM_CONTINUOUS_DMA
224 # define SLM_DMA_INT_OFFSET 0 /* DMA goes until seccnt 0, no offs */
225 # define SLM_DMA_END_OFFSET 32 /* 32 Byte ST-DMA FIFO */
226 # define SLM_SLICE_SIZE(w) (255*512)
227 #else
228 # define SLM_DMA_INT_OFFSET 32 /* 32 Byte ST-DMA FIFO */
229 # define SLM_DMA_END_OFFSET 32 /* 32 Byte ST-DMA FIFO */
230 # define SLM_SLICE_SIZE(w) ((254*512)/(w/8)*(w/8))
231 #endif
232
233 /* calculate the number of jiffies to wait for 'n' bytes */
234 #ifdef SLM_CONT_CNT_REPROG
235 #define DMA_TIME_FOR(n) 50
236 #define DMA_STARTUP_TIME 0
237 #else
238 #define DMA_TIME_FOR(n) (n/1400-1)
239 #define DMA_STARTUP_TIME 650
240 #endif
241
242 /***************************** Prototypes *****************************/
243
244 static char *slm_errstr( int stat );
245 static int slm_getstats( char *buffer, int device );
246 static ssize_t slm_read( struct file* file, char *buf, size_t count, loff_t
247 *ppos );
248 static void start_print( int device );
249 static irqreturn_t slm_interrupt(int irc, void *data);
250 static void slm_test_ready( unsigned long dummy );
251 static void set_dma_addr( unsigned long paddr );
252 static unsigned long get_dma_addr( void );
253 static ssize_t slm_write( struct file *file, const char *buf, size_t count,
254 loff_t *ppos );
255 static int slm_ioctl( struct inode *inode, struct file *file, unsigned int
256 cmd, unsigned long arg );
257 static int slm_open( struct inode *inode, struct file *file );
258 static int slm_release( struct inode *inode, struct file *file );
259 static int slm_req_sense( int device );
260 static int slm_mode_sense( int device, char *buffer, int abs_flag );
261 #if 0
262 static int slm_mode_select( int device, char *buffer, int len, int
263 default_flag );
264 #endif
265 static int slm_get_pagesize( int device, int *w, int *h );
266
267 /************************* End of Prototypes **************************/
268
269
270 static DEFINE_TIMER(slm_timer, slm_test_ready, 0, 0);
271
272 static const struct file_operations slm_fops = {
273 .owner = THIS_MODULE,
274 .read = slm_read,
275 .write = slm_write,
276 .ioctl = slm_ioctl,
277 .open = slm_open,
278 .release = slm_release,
279 };
280
281
282 /* ---------------------------------------------------------------------- */
283 /* Status Functions */
284
285
286 static char *slm_errstr( int stat )
287
288 { char *p;
289 static char str[22];
290
291 stat &= 0x1f;
292 if (stat >= 0 && stat < N_ERRORS && (p = SLMErrors[stat]))
293 return( p );
294 sprintf( str, "unknown status 0x%02x", stat );
295 return( str );
296 }
297
298
299 static int slm_getstats( char *buffer, int device )
300
301 { int len = 0, stat, i, w, h;
302 unsigned char buf[256];
303
304 stat = slm_mode_sense( device, buf, 0 );
305 if (IS_REAL_ERROR(stat))
306 return( -EIO );
307
308 #define SHORTDATA(i) ((buf[i] << 8) | buf[i+1])
309 #define BOOLDATA(i,mask) ((buf[i] & mask) ? "on" : "off")
310
311 w = SHORTDATA( 3 );
312 h = SHORTDATA( 1 );
313
314 len += sprintf( buffer+len, "Status\t\t%s\n",
315 slm_errstr( stat ) );
316 len += sprintf( buffer+len, "Page Size\t%dx%d",
317 w, h );
318
319 for( i = 0; i < N_STD_SIZES; ++i ) {
320 if (w == StdPageSize[i].w && h == StdPageSize[i].h)
321 break;
322 }
323 if (i < N_STD_SIZES)
324 len += sprintf( buffer+len, " (%s)", StdPageSize[i].name );
325 buffer[len++] = '\n';
326
327 len += sprintf( buffer+len, "Top/Left Margin\t%d/%d\n",
328 SHORTDATA( 5 ), SHORTDATA( 7 ) );
329 len += sprintf( buffer+len, "Manual Feed\t%s\n",
330 BOOLDATA( 9, 0x01 ) );
331 len += sprintf( buffer+len, "Input Select\t%d\n",
332 (buf[9] >> 1) & 7 );
333 len += sprintf( buffer+len, "Auto Select\t%s\n",
334 BOOLDATA( 9, 0x10 ) );
335 len += sprintf( buffer+len, "Prefeed Paper\t%s\n",
336 BOOLDATA( 9, 0x20 ) );
337 len += sprintf( buffer+len, "Thick Pixels\t%s\n",
338 BOOLDATA( 9, 0x40 ) );
339 len += sprintf( buffer+len, "H/V Resol.\t%d/%d dpi\n",
340 SHORTDATA( 12 ), SHORTDATA( 10 ) );
341 len += sprintf( buffer+len, "System Timeout\t%d\n",
342 buf[14] );
343 len += sprintf( buffer+len, "Scan Time\t%d\n",
344 SHORTDATA( 15 ) );
345 len += sprintf( buffer+len, "Page Count\t%d\n",
346 SHORTDATA( 17 ) );
347 len += sprintf( buffer+len, "In/Out Cap.\t%d/%d\n",
348 SHORTDATA( 19 ), SHORTDATA( 21 ) );
349 len += sprintf( buffer+len, "Stagger Output\t%s\n",
350 BOOLDATA( 23, 0x01 ) );
351 len += sprintf( buffer+len, "Output Select\t%d\n",
352 (buf[23] >> 1) & 7 );
353 len += sprintf( buffer+len, "Duplex Print\t%s\n",
354 BOOLDATA( 23, 0x10 ) );
355 len += sprintf( buffer+len, "Color Sep.\t%s\n",
356 BOOLDATA( 23, 0x20 ) );
357
358 return( len );
359 }
360
361
362 static ssize_t slm_read( struct file *file, char *buf, size_t count,
363 loff_t *ppos )
364
365 {
366 struct inode *node = file->f_path.dentry->d_inode;
367 unsigned long page;
368 int length;
369 int end;
370
371 if (!(page = __get_free_page( GFP_KERNEL )))
372 return( -ENOMEM );
373
374 length = slm_getstats( (char *)page, iminor(node) );
375 if (length < 0) {
376 count = length;
377 goto out;
378 }
379 if (file->f_pos >= length) {
380 count = 0;
381 goto out;
382 }
383 if (count + file->f_pos > length)
384 count = length - file->f_pos;
385 end = count + file->f_pos;
386 if (copy_to_user(buf, (char *)page + file->f_pos, count)) {
387 count = -EFAULT;
388 goto out;
389 }
390 file->f_pos = end;
391 out: free_page( page );
392 return( count );
393 }
394
395
396 /* ---------------------------------------------------------------------- */
397 /* Printing */
398
399
400 static void start_print( int device )
401
402 { struct slm *sip = &slm_info[device];
403 unsigned char *cmd;
404 unsigned long paddr;
405 int i;
406
407 stdma_lock( slm_interrupt, NULL );
408
409 CMDSET_TARG_LUN( slmprint_cmd, sip->target, sip->lun );
410 cmd = slmprint_cmd;
411 paddr = virt_to_phys( SLMBuffer );
412 dma_cache_maintenance( paddr, virt_to_phys(BufferP)-paddr, 1 );
413 DISABLE_IRQ();
414
415 /* Low on A1 */
416 dma_wd.dma_mode_status = 0x88;
417 MFPDELAY();
418
419 /* send the command bytes except the last */
420 for( i = 0; i < 5; ++i ) {
421 DMA_LONG_WRITE( *cmd++, 0x8a );
422 udelay(20);
423 if (!acsi_wait_for_IRQ( HZ/2 )) {
424 SLMError = 1;
425 return; /* timeout */
426 }
427 }
428 /* last command byte */
429 DMA_LONG_WRITE( *cmd++, 0x82 );
430 MFPDELAY();
431 /* set DMA address */
432 set_dma_addr( paddr );
433 /* program DMA for write and select sector counter reg */
434 dma_wd.dma_mode_status = 0x192;
435 MFPDELAY();
436 /* program for 255*512 bytes and start DMA */
437 DMA_LONG_WRITE( SLM_DMA_AMOUNT, 0x112 );
438
439 #ifndef SLM_CONT_CNT_REPROG
440 SLMCurAddr = paddr;
441 SLMEndAddr = paddr + SLMSliceSize + SLM_DMA_INT_OFFSET;
442 #endif
443 START_TIMER( DMA_STARTUP_TIME + DMA_TIME_FOR( SLMSliceSize ));
444 #if !defined(SLM_CONT_CNT_REPROG) && defined(DEBUG)
445 printk( "SLM: CurAddr=%#lx EndAddr=%#lx timer=%ld\n",
446 SLMCurAddr, SLMEndAddr, DMA_TIME_FOR( SLMSliceSize ) );
447 #endif
448
449 ENABLE_IRQ();
450 }
451
452
453 /* Only called when an error happened or at the end of a page */
454
455 static irqreturn_t slm_interrupt(int irc, void *data)
456
457 { unsigned long addr;
458 int stat;
459
460 STOP_TIMER();
461 addr = get_dma_addr();
462 stat = acsi_getstatus();
463 SLMError = (stat < 0) ? SLMSTAT_ACSITO :
464 (addr < virt_to_phys(BufferP)) ? SLMSTAT_NOTALL :
465 stat;
466
467 dma_wd.dma_mode_status = 0x80;
468 MFPDELAY();
469 #ifdef DEBUG
470 printk( "SLM: interrupt, addr=%#lx, error=%d\n", addr, SLMError );
471 #endif
472
473 wake_up( &print_wait );
474 stdma_release();
475 ENABLE_IRQ();
476 return IRQ_HANDLED;
477 }
478
479
480 static void slm_test_ready( unsigned long dummy )
481
482 {
483 #ifdef SLM_CONT_CNT_REPROG
484 /* program for 255*512 bytes again */
485 dma_wd.fdc_acces_seccount = SLM_DMA_AMOUNT;
486 START_TIMER( DMA_TIME_FOR(0) );
487 #ifdef DEBUG
488 printk( "SLM: reprogramming timer for %d jiffies, addr=%#lx\n",
489 DMA_TIME_FOR(0), get_dma_addr() );
490 #endif
491
492 #else /* !SLM_CONT_CNT_REPROG */
493
494 unsigned long flags, addr;
495 int d, ti;
496 #ifdef DEBUG
497 struct timeval start_tm, end_tm;
498 int did_wait = 0;
499 #endif
500
501 local_irq_save(flags);
502
503 addr = get_dma_addr();
504 if ((d = SLMEndAddr - addr) > 0) {
505 local_irq_restore(flags);
506
507 /* slice not yet finished, decide whether to start another timer or to
508 * busy-wait */
509 ti = DMA_TIME_FOR( d );
510 if (ti > 0) {
511 #ifdef DEBUG
512 printk( "SLM: reprogramming timer for %d jiffies, rest %d bytes\n",
513 ti, d );
514 #endif
515 START_TIMER( ti );
516 return;
517 }
518 /* wait for desired end address to be reached */
519 #ifdef DEBUG
520 do_gettimeofday( &start_tm );
521 did_wait = 1;
522 #endif
523 local_irq_disable();
524 while( get_dma_addr() < SLMEndAddr )
525 barrier();
526 }
527
528 /* slice finished, start next one */
529 SLMCurAddr += SLMSliceSize;
530
531 #ifdef SLM_CONTINUOUS_DMA
532 /* program for 255*512 bytes again */
533 dma_wd.fdc_acces_seccount = SLM_DMA_AMOUNT;
534 #else
535 /* set DMA address;
536 * add 2 bytes for the ones in the SLM controller FIFO! */
537 set_dma_addr( SLMCurAddr + 2 );
538 /* toggle DMA to write and select sector counter reg */
539 dma_wd.dma_mode_status = 0x92;
540 MFPDELAY();
541 dma_wd.dma_mode_status = 0x192;
542 MFPDELAY();
543 /* program for 255*512 bytes and start DMA */
544 DMA_LONG_WRITE( SLM_DMA_AMOUNT, 0x112 );
545 #endif
546
547 local_irq_restore(flags);
548
549 #ifdef DEBUG
550 if (did_wait) {
551 int ms;
552 do_gettimeofday( &end_tm );
553 ms = (end_tm.tv_sec*1000000+end_tm.tv_usec) -
554 (start_tm.tv_sec*1000000+start_tm.tv_usec);
555 printk( "SLM: did %ld.%ld ms busy waiting for %d bytes\n",
556 ms/1000, ms%1000, d );
557 }
558 else
559 printk( "SLM: didn't wait (!)\n" );
560 #endif
561
562 if ((unsigned char *)PTOV( SLMCurAddr + SLMSliceSize ) >= BufferP) {
563 /* will be last slice, no timer necessary */
564 #ifdef DEBUG
565 printk( "SLM: CurAddr=%#lx EndAddr=%#lx last slice -> no timer\n",
566 SLMCurAddr, SLMEndAddr );
567 #endif
568 }
569 else {
570 /* not last slice */
571 SLMEndAddr = SLMCurAddr + SLMSliceSize + SLM_DMA_INT_OFFSET;
572 START_TIMER( DMA_TIME_FOR( SLMSliceSize ));
573 #ifdef DEBUG
574 printk( "SLM: CurAddr=%#lx EndAddr=%#lx timer=%ld\n",
575 SLMCurAddr, SLMEndAddr, DMA_TIME_FOR( SLMSliceSize ) );
576 #endif
577 }
578 #endif /* SLM_CONT_CNT_REPROG */
579 }
580
581
582 static void set_dma_addr( unsigned long paddr )
583
584 { unsigned long flags;
585
586 local_irq_save(flags);
587 dma_wd.dma_lo = (unsigned char)paddr;
588 paddr >>= 8;
589 MFPDELAY();
590 dma_wd.dma_md = (unsigned char)paddr;
591 paddr >>= 8;
592 MFPDELAY();
593 if (ATARIHW_PRESENT( EXTD_DMA ))
594 st_dma_ext_dmahi = (unsigned short)paddr;
595 else
596 dma_wd.dma_hi = (unsigned char)paddr;
597 MFPDELAY();
598 local_irq_restore(flags);
599 }
600
601
602 static unsigned long get_dma_addr( void )
603
604 { unsigned long addr;
605
606 addr = dma_wd.dma_lo & 0xff;
607 MFPDELAY();
608 addr |= (dma_wd.dma_md & 0xff) << 8;
609 MFPDELAY();
610 addr |= (dma_wd.dma_hi & 0xff) << 16;
611 MFPDELAY();
612
613 return( addr );
614 }
615
616
617 static ssize_t slm_write( struct file *file, const char *buf, size_t count,
618 loff_t *ppos )
619
620 {
621 struct inode *node = file->f_path.dentry->d_inode;
622 int device = iminor(node);
623 int n, filled, w, h;
624
625 while( SLMState == PRINTING ||
626 (SLMState == FILLING && SLMBufOwner != device) ) {
627 interruptible_sleep_on( &slm_wait );
628 if (signal_pending(current))
629 return( -ERESTARTSYS );
630 }
631 if (SLMState == IDLE) {
632 /* first data of page: get current page size */
633 if (slm_get_pagesize( device, &w, &h ))
634 return( -EIO );
635 BufferSize = w*h/8;
636 if (BufferSize > SLM_BUFFER_SIZE)
637 return( -ENOMEM );
638
639 SLMState = FILLING;
640 SLMBufOwner = device;
641 }
642
643 n = count;
644 filled = BufferP - SLMBuffer;
645 if (filled + n > BufferSize)
646 n = BufferSize - filled;
647
648 if (copy_from_user(BufferP, buf, n))
649 return -EFAULT;
650 BufferP += n;
651 filled += n;
652
653 if (filled == BufferSize) {
654 /* Check the paper size again! The user may have switched it in the
655 * time between starting the data and finishing them. Would end up in
656 * a trashy page... */
657 if (slm_get_pagesize( device, &w, &h ))
658 return( -EIO );
659 if (BufferSize != w*h/8) {
660 printk( KERN_NOTICE "slm%d: page size changed while printing\n",
661 device );
662 return( -EAGAIN );
663 }
664
665 SLMState = PRINTING;
666 /* choose a slice size that is a multiple of the line size */
667 #ifndef SLM_CONT_CNT_REPROG
668 SLMSliceSize = SLM_SLICE_SIZE(w);
669 #endif
670
671 start_print( device );
672 sleep_on( &print_wait );
673 if (SLMError && IS_REAL_ERROR(SLMError)) {
674 printk( KERN_ERR "slm%d: %s\n", device, slm_errstr(SLMError) );
675 n = -EIO;
676 }
677
678 SLMState = IDLE;
679 BufferP = SLMBuffer;
680 wake_up_interruptible( &slm_wait );
681 }
682
683 return( n );
684 }
685
686
687 /* ---------------------------------------------------------------------- */
688 /* ioctl Functions */
689
690
691 static int slm_ioctl( struct inode *inode, struct file *file,
692 unsigned int cmd, unsigned long arg )
693
694 { int device = iminor(inode), err;
695
696 /* I can think of setting:
697 * - manual feed
698 * - paper format
699 * - copy count
700 * - ...
701 * but haven't implemented that yet :-)
702 * BTW, has anybody better docs about the MODE SENSE/MODE SELECT data?
703 */
704 switch( cmd ) {
705
706 case SLMIORESET: /* reset buffer, i.e. empty the buffer */
707 if (!(file->f_mode & 2))
708 return( -EINVAL );
709 if (SLMState == PRINTING)
710 return( -EBUSY );
711 SLMState = IDLE;
712 BufferP = SLMBuffer;
713 wake_up_interruptible( &slm_wait );
714 return( 0 );
715
716 case SLMIOGSTAT: { /* get status */
717 int stat;
718 char *str;
719
720 stat = slm_req_sense( device );
721 if (arg) {
722 str = slm_errstr( stat );
723 if (put_user(stat,
724 (long *)&((struct SLM_status *)arg)->stat))
725 return -EFAULT;
726 if (copy_to_user( ((struct SLM_status *)arg)->str, str,
727 strlen(str) + 1))
728 return -EFAULT;
729 }
730 return( stat );
731 }
732
733 case SLMIOGPSIZE: { /* get paper size */
734 int w, h;
735
736 if ((err = slm_get_pagesize( device, &w, &h ))) return( err );
737
738 if (put_user(w, (long *)&((struct SLM_paper_size *)arg)->width))
739 return -EFAULT;
740 if (put_user(h, (long *)&((struct SLM_paper_size *)arg)->height))
741 return -EFAULT;
742 return( 0 );
743 }
744
745 case SLMIOGMFEED: /* get manual feed */
746 return( -EINVAL );
747
748 case SLMIOSPSIZE: /* set paper size */
749 return( -EINVAL );
750
751 case SLMIOSMFEED: /* set manual feed */
752 return( -EINVAL );
753
754 }
755 return( -EINVAL );
756 }
757
758
759 /* ---------------------------------------------------------------------- */
760 /* Opening and Closing */
761
762
763 static int slm_open( struct inode *inode, struct file *file )
764
765 { int device;
766 struct slm *sip;
767
768 device = iminor(inode);
769 if (device >= N_SLM_Printers)
770 return( -ENXIO );
771 sip = &slm_info[device];
772
773 if (file->f_mode & 2) {
774 /* open for writing is exclusive */
775 if ( !atomic_dec_and_test(&sip->wr_ok) ) {
776 atomic_inc(&sip->wr_ok);
777 return( -EBUSY );
778 }
779 }
780 if (file->f_mode & 1) {
781 /* open for reading is exclusive */
782 if ( !atomic_dec_and_test(&sip->rd_ok) ) {
783 atomic_inc(&sip->rd_ok);
784 return( -EBUSY );
785 }
786 }
787
788 return( 0 );
789 }
790
791
792 static int slm_release( struct inode *inode, struct file *file )
793
794 { int device;
795 struct slm *sip;
796
797 device = iminor(inode);
798 sip = &slm_info[device];
799
800 if (file->f_mode & 2)
801 atomic_inc( &sip->wr_ok );
802 if (file->f_mode & 1)
803 atomic_inc( &sip->rd_ok );
804
805 return( 0 );
806 }
807
808
809 /* ---------------------------------------------------------------------- */
810 /* ACSI Primitives for the SLM */
811
812
813 static int slm_req_sense( int device )
814
815 { int stat, rv;
816 struct slm *sip = &slm_info[device];
817
818 stdma_lock( NULL, NULL );
819
820 CMDSET_TARG_LUN( slmreqsense_cmd, sip->target, sip->lun );
821 if (!acsicmd_nodma( slmreqsense_cmd, 0 ) ||
822 (stat = acsi_getstatus()) < 0)
823 rv = SLMSTAT_ACSITO;
824 else
825 rv = stat & 0x1f;
826
827 ENABLE_IRQ();
828 stdma_release();
829 return( rv );
830 }
831
832
833 static int slm_mode_sense( int device, char *buffer, int abs_flag )
834
835 { unsigned char stat, len;
836 int rv = 0;
837 struct slm *sip = &slm_info[device];
838
839 stdma_lock( NULL, NULL );
840
841 CMDSET_TARG_LUN( slmmsense_cmd, sip->target, sip->lun );
842 slmmsense_cmd[5] = abs_flag ? 0x80 : 0;
843 if (!acsicmd_nodma( slmmsense_cmd, 0 )) {
844 rv = SLMSTAT_ACSITO;
845 goto the_end;
846 }
847
848 if (!acsi_extstatus( &stat, 1 )) {
849 acsi_end_extstatus();
850 rv = SLMSTAT_ACSITO;
851 goto the_end;
852 }
853
854 if (!acsi_extstatus( &len, 1 )) {
855 acsi_end_extstatus();
856 rv = SLMSTAT_ACSITO;
857 goto the_end;
858 }
859 buffer[0] = len;
860 if (!acsi_extstatus( buffer+1, len )) {
861 acsi_end_extstatus();
862 rv = SLMSTAT_ACSITO;
863 goto the_end;
864 }
865
866 acsi_end_extstatus();
867 rv = stat & 0x1f;
868
869 the_end:
870 ENABLE_IRQ();
871 stdma_release();
872 return( rv );
873 }
874
875
876 #if 0
877 /* currently unused */
878 static int slm_mode_select( int device, char *buffer, int len,
879 int default_flag )
880
881 { int stat, rv;
882 struct slm *sip = &slm_info[device];
883
884 stdma_lock( NULL, NULL );
885
886 CMDSET_TARG_LUN( slmmselect_cmd, sip->target, sip->lun );
887 slmmselect_cmd[5] = default_flag ? 0x80 : 0;
888 if (!acsicmd_nodma( slmmselect_cmd, 0 )) {
889 rv = SLMSTAT_ACSITO;
890 goto the_end;
891 }
892
893 if (!default_flag) {
894 unsigned char c = len;
895 if (!acsi_extcmd( &c, 1 )) {
896 rv = SLMSTAT_ACSITO;
897 goto the_end;
898 }
899 if (!acsi_extcmd( buffer, len )) {
900 rv = SLMSTAT_ACSITO;
901 goto the_end;
902 }
903 }
904
905 stat = acsi_getstatus();
906 rv = (stat < 0 ? SLMSTAT_ACSITO : stat);
907
908 the_end:
909 ENABLE_IRQ();
910 stdma_release();
911 return( rv );
912 }
913 #endif
914
915
916 static int slm_get_pagesize( int device, int *w, int *h )
917
918 { char buf[256];
919 int stat;
920
921 stat = slm_mode_sense( device, buf, 0 );
922 ENABLE_IRQ();
923 stdma_release();
924
925 if (stat != SLMSTAT_OK)
926 return( -EIO );
927
928 *w = (buf[3] << 8) | buf[4];
929 *h = (buf[1] << 8) | buf[2];
930 return( 0 );
931 }
932
933
934 /* ---------------------------------------------------------------------- */
935 /* Initialization */
936
937
938 int attach_slm( int target, int lun )
939
940 { static int did_register;
941 int len;
942
943 if (N_SLM_Printers >= MAX_SLM) {
944 printk( KERN_WARNING "Too much SLMs\n" );
945 return( 0 );
946 }
947
948 /* do an INQUIRY */
949 udelay(100);
950 CMDSET_TARG_LUN( slminquiry_cmd, target, lun );
951 if (!acsicmd_nodma( slminquiry_cmd, 0 )) {
952 inq_timeout:
953 printk( KERN_ERR "SLM inquiry command timed out.\n" );
954 inq_fail:
955 acsi_end_extstatus();
956 return( 0 );
957 }
958 /* read status and header of return data */
959 if (!acsi_extstatus( SLMBuffer, 6 ))
960 goto inq_timeout;
961
962 if (SLMBuffer[1] != 2) { /* device type == printer? */
963 printk( KERN_ERR "SLM inquiry returned device type != printer\n" );
964 goto inq_fail;
965 }
966 len = SLMBuffer[5];
967
968 /* read id string */
969 if (!acsi_extstatus( SLMBuffer, len ))
970 goto inq_timeout;
971 acsi_end_extstatus();
972 SLMBuffer[len] = 0;
973
974 if (!did_register) {
975 did_register = 1;
976 }
977
978 slm_info[N_SLM_Printers].target = target;
979 slm_info[N_SLM_Printers].lun = lun;
980 atomic_set(&slm_info[N_SLM_Printers].wr_ok, 1 );
981 atomic_set(&slm_info[N_SLM_Printers].rd_ok, 1 );
982
983 printk( KERN_INFO " Printer: %s\n", SLMBuffer );
984 printk( KERN_INFO "Detected slm%d at id %d lun %d\n",
985 N_SLM_Printers, target, lun );
986 N_SLM_Printers++;
987 return( 1 );
988 }
989
990 int slm_init( void )
991
992 {
993 int i;
994 if (register_chrdev( ACSI_MAJOR, "slm", &slm_fops )) {
995 printk( KERN_ERR "Unable to get major %d for ACSI SLM\n", ACSI_MAJOR );
996 return -EBUSY;
997 }
998
999 if (!(SLMBuffer = atari_stram_alloc( SLM_BUFFER_SIZE, "SLM" ))) {
1000 printk( KERN_ERR "Unable to get SLM ST-Ram buffer.\n" );
1001 unregister_chrdev( ACSI_MAJOR, "slm" );
1002 return -ENOMEM;
1003 }
1004 BufferP = SLMBuffer;
1005 SLMState = IDLE;
1006
1007 return 0;
1008 }
1009
1010 #ifdef MODULE
1011
1012 /* from acsi.c */
1013 void acsi_attach_SLMs( int (*attach_func)( int, int ) );
1014
1015 int init_module(void)
1016 {
1017 int err;
1018
1019 if ((err = slm_init()))
1020 return( err );
1021 /* This calls attach_slm() for every target/lun where acsi.c detected a
1022 * printer */
1023 acsi_attach_SLMs( attach_slm );
1024 return( 0 );
1025 }
1026
1027 void cleanup_module(void)
1028 {
1029 if (unregister_chrdev( ACSI_MAJOR, "slm" ) != 0)
1030 printk( KERN_ERR "acsi_slm: cleanup_module failed\n");
1031 atari_stram_free( SLMBuffer );
1032 }
1033 #endif
Linux with added FPC-III support