Home | History | Annotate | Line # | Download | only in sun3
      1 /*	$NetBSD: leds.c,v 1.16 2023/12/20 05:18:00 thorpej Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1997 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Gordon W. Ross and der Mouse.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 /*
     33  * Functions to flash the LEDs with some pattern.
     34  * The 3/80 has just one LED on the front panel,
     35  * which we turn on during boot and leave alone.
     36  * All other Sun3 machines have an 8-position LED
     37  * array in which some pattern is animated.
     38  */
     39 
     40 #include <sys/cdefs.h>
     41 __KERNEL_RCSID(0, "$NetBSD: leds.c,v 1.16 2023/12/20 05:18:00 thorpej Exp $");
     42 
     43 #include <sys/param.h>
     44 #include <sys/systm.h>
     45 #include <sys/device.h>
     46 #include <sys/conf.h>
     47 #include <sys/buf.h>
     48 #include <sys/proc.h>
     49 
     50 #include <uvm/uvm_extern.h>
     51 
     52 #include <machine/autoconf.h>
     53 #include <machine/idprom.h>
     54 #include <machine/leds.h>
     55 
     56 #include <sun3/sun3/machdep.h>
     57 #ifdef	_SUN3_
     58 #include <sun3/sun3/control.h>
     59 #endif
     60 #ifdef	_SUN3X_
     61 #include <sun3/sun3x/obio.h>
     62 static volatile uint8_t *diagreg;
     63 #endif
     64 
     65 static u_char led_countdown = 0;
     66 static u_char led_px = 0;
     67 
     68 /*
     69  * Initial value is the default pattern set. Note, only bit zero
     70  * shows on the 3/80, and it is active-high (3/470 is active-low).
     71  * We normally want the 3/80's LED to just stay ON, so the 3/80
     72  * will change the default patlen to one, causing the LED to keep
     73  * using the first byte of the pattern where bit zero is ON.
     74  */
     75 static struct led_patterns ledpat = {
     76 	8,	/* divisor */
     77 	8,	/* patlen */
     78 	{	/* patterns */
     79 		0x0F, 0x1E, 0x3C, 0x78,
     80 		0xF0, 0xE1, 0xC3, 0x87,
     81 	}
     82 };
     83 
     84 /*
     85  * This is called early during startup to find the
     86  * diag register (LEDs) and turn on the light(s).
     87  */
     88 void
     89 leds_init(void)
     90 {
     91 #ifdef	_SUN3X_
     92 	vaddr_t va;
     93 
     94 	find_prom_map(OBIO_DIAGREG, PMAP_OBIO, 1, &va);
     95 	diagreg = (void *)va;
     96 	if (cpu_machine_id == ID_SUN3X_80)
     97 		ledpat.patlen = 1;
     98 #endif	/* SUN3X */
     99 
    100 	/* Turn on some lights. */
    101 	leds_intr();
    102 }
    103 
    104 /*
    105  * This is called by the clock interrupt.
    106  */
    107 void
    108 leds_intr(void)
    109 {
    110 	u_char i;
    111 
    112 	if (led_countdown) {
    113 		led_countdown--;
    114 		return;
    115 	}
    116 
    117 	led_countdown = ledpat.divisor - 1;
    118 	i = led_px;
    119 
    120 #ifdef	_SUN3X_
    121 	*diagreg = (char) ledpat.pat[i];
    122 #else
    123 	set_control_byte(DIAG_REG, ledpat.pat[i]);
    124 #endif
    125 
    126 	i = i+1;
    127 	if (i == ledpat.patlen)
    128 		i = 0;
    129 	led_px = i;
    130 }
    131 
    132 /*
    133  * This is called by mem.c to handle /dev/leds
    134  */
    135 int
    136 leds_uio(struct uio *uio)
    137 {
    138 	int cnt, error;
    139 	int off;	/* NOT off_t */
    140 	void *va;
    141 
    142 	off = uio->uio_offset;
    143 	if ((off < 0) || (off > sizeof(ledpat)))
    144 		return (EIO);
    145 
    146 	cnt = uimin(uio->uio_resid, (sizeof(ledpat) - off));
    147 	if (cnt == 0)
    148 		return (0); /* EOF */
    149 
    150 	va = ((char*)(&ledpat)) + off;
    151 	error = uiomove(va, cnt, uio);
    152 
    153 	return (error);
    154 }
    155