Home | History | Annotate | Line # | Download | only in vsa 
      1 /*	$NetBSD: leds.c,v 1.11 2023/12/20 15:34:46 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  */
     35 
     36 #include <sys/cdefs.h>
     37 __KERNEL_RCSID(0, "$NetBSD: leds.c,v 1.11 2023/12/20 15:34:46 thorpej Exp $");
     38 
     39 #include <sys/param.h>
     40 #include <sys/systm.h>
     41 #include <sys/cpu.h>
     42 #include <sys/conf.h>
     43 #include <sys/device.h>
     44 #include <sys/proc.h>
     45 
     46 #include <machine/sid.h>
     47 #include <machine/leds.h>
     48 
     49 #include "opt_cputype.h"
     50 
     51 static volatile u_short *diagreg = 0;
     52 static u_char led_countdown = 0;
     53 static u_char led_px = 0;
     54 
     55 /*
     56  * Initial value is the default pattern set.
     57  */
     58 struct led_patterns ledpat = {
     59 	16,	/* divisor */
     60 	12,	/* patlen */
     61 	{	/* patterns */
     62 		0x03, 0x06, 0x0c, 0x18,
     63 		0x30, 0x60, 0xc0, 0x60,
     64 		0x30, 0x18, 0x0c, 0x06,
     65 	}
     66 };
     67 
     68 void
     69 ledsattach(int a)
     70 {
     71 	switch (vax_boardtype) {
     72 #if VAX46 || VAXANY
     73 	case VAX_BTYP_46: {
     74 		extern struct vs_cpu *ka46_cpu;
     75 		diagreg = (volatile u_short *)(&ka46_cpu->vc_diagdsp);
     76 		break;
     77 		}
     78 #endif
     79 #if VAX48 || VAXANY
     80 	case VAX_BTYP_48: {
     81 		extern struct vs_cpu *ka48_cpu;
     82 		diagreg = (volatile u_short *)(&ka48_cpu->vc_diagdsp);
     83 		break;
     84 		}
     85 #endif
     86 #if VAX49 || VAXANY
     87 	case VAX_BTYP_49:
     88 		diagreg = (volatile u_short *)vax_map_physmem(0x25800000, 1);
     89 		diagreg += 2;
     90 		break;
     91 #endif
     92 	default:
     93 		return;
     94 	}
     95 
     96 	/* Turn on some lights. */
     97 	leds_intr();
     98 }
     99 
    100 /*
    101  * This is called by the clock interrupt.
    102  */
    103 void
    104 leds_intr(void)
    105 {
    106 	register u_char i;
    107 
    108 	if (diagreg == 0)
    109 		return;
    110 
    111 	if (led_countdown) {
    112 		led_countdown--;
    113 		return;
    114 	}
    115 
    116 	led_countdown = ledpat.divisor - 1;
    117 	i = led_px;
    118 
    119 	*diagreg = ~ledpat.pat[i];
    120 
    121 	i = i+1;
    122 	if (i == ledpat.patlen)
    123 		i = 0;
    124 	led_px = i;
    125 }
    126 
    127 /*
    128  * This is called by mem.c to handle /dev/leds
    129  */
    130 int
    131 leds_uio(struct uio *uio)
    132 {
    133 	int cnt, error;
    134 	int off;	/* NOT off_t */
    135 	char *va;
    136 
    137 	off = uio->uio_offset;
    138 	if ((off < 0) || (off > sizeof(ledpat)))
    139 		return (EIO);
    140 
    141 	cnt = uimin(uio->uio_resid, (sizeof(ledpat) - off));
    142 	if (cnt == 0)
    143 		return (0); /* EOF */
    144 
    145 
    146 	va = (char *)&ledpat;
    147 	va = va + off;
    148 	error = uiomove(va, cnt, uio);
    149 
    150 	return (error);
    151 }
    152 
    153