1 /*-
2 * Copyright (c) 2013 Ruslan Bukin <br@bsdpad.com>
3 * Copyright (c) 2015 Semihalf.
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 * SUCH DAMAGE.
26 *
27 */
28
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31
32 #include "opt_platform.h"
33
34 #include <sys/param.h>
35 #include <sys/systm.h>
36 #include <sys/bus.h>
37 #include <sys/kernel.h>
38
39 #include <dev/fdt/fdt_common.h>
40 #include <dev/ofw/openfirm.h>
41
42 #include <machine/bus.h>
43 #include <machine/fdt.h>
44 #include <machine/intr.h>
45
46 #define WDTLOAD 0x000
47 #define LOAD_MIN 0x00000001
48 #define LOAD_MAX 0xFFFFFFFF
49 #define WDTVALUE 0x004
50 #define WDTCONTROL 0x008
51 /* control register masks */
52 #define INT_ENABLE (1 << 0)
53 #define RESET_ENABLE (1 << 1)
54 #define WDTLOCK 0xC00
55 #define UNLOCK 0x1ACCE551
56 #define LOCK 0x00000001
57
58 extern bus_addr_t al_devmap_pa;
59 struct fdt_fixup_entry fdt_fixup_table[] = {
60 { NULL, NULL }
61 };
62
63 static int alpine_get_wdt_base(uint32_t *pbase, uint32_t *psize);
64 static int alpine_pic_decode_fdt(uint32_t iparent, uint32_t *intr,
65 int *interrupt, int *trig, int *pol);
66
67 int alpine_get_devmap_base(bus_addr_t *pa, bus_addr_t *size);
68
alpine_get_devmap_base(bus_addr_t * pa,bus_addr_t * size)69 int alpine_get_devmap_base(bus_addr_t *pa, bus_addr_t *size)
70 {
71 phandle_t node;
72
73 if ((node = OF_finddevice("/")) == 0)
74 return (ENXIO);
75
76 if ((node = fdt_find_compatible(node, "simple-bus", 1)) == 0)
77 return (ENXIO);
78
79 return fdt_get_range(node, 0, pa, size);
80 }
81
82 static int
alpine_get_wdt_base(uint32_t * pbase,uint32_t * psize)83 alpine_get_wdt_base(uint32_t *pbase, uint32_t *psize)
84 {
85 phandle_t node;
86 u_long base = 0;
87 u_long size = 0;
88
89 if (pbase == NULL || psize == NULL)
90 return (EINVAL);
91
92 if ((node = OF_finddevice("/")) == -1)
93 return (EFAULT);
94
95 if ((node = fdt_find_compatible(node, "simple-bus", 1)) == 0)
96 return (EFAULT);
97
98 if ((node =
99 fdt_find_compatible(node, "arm,sp805", 1)) == 0)
100 return (EFAULT);
101
102 if (fdt_regsize(node, &base, &size))
103 return (EFAULT);
104
105 *pbase = base;
106 *psize = size;
107
108 return (0);
109 }
110
111 void
cpu_reset(void)112 cpu_reset(void)
113 {
114 uint32_t wdbase, wdsize;
115 bus_addr_t wdbaddr;
116 int ret;
117
118 ret = alpine_get_wdt_base(&wdbase, &wdsize);
119 if (ret) {
120 printf("Unable to get WDT base, do power down manually...");
121 goto infinite;
122 }
123
124 ret = bus_space_map(fdtbus_bs_tag, al_devmap_pa + wdbase,
125 wdsize, 0, &wdbaddr);
126 if (ret) {
127 printf("Unable to map WDT base, do power down manually...");
128 goto infinite;
129 }
130
131 bus_space_write_4(fdtbus_bs_tag, wdbaddr, WDTLOCK, UNLOCK);
132 bus_space_write_4(fdtbus_bs_tag, wdbaddr, WDTLOAD, LOAD_MIN);
133 bus_space_write_4(fdtbus_bs_tag, wdbaddr, WDTCONTROL, INT_ENABLE | RESET_ENABLE);
134
135 infinite:
136 while (1) {}
137 }
138
139 static int
alpine_pic_decode_fdt(uint32_t iparent,uint32_t * intr,int * interrupt,int * trig,int * pol)140 alpine_pic_decode_fdt(uint32_t iparent, uint32_t *intr, int *interrupt,
141 int *trig, int *pol)
142 {
143 int rv = 0;
144
145 rv = gic_decode_fdt(iparent, intr, interrupt, trig, pol);
146 if (rv == 0) {
147 /* This was recognized as our PIC and decoded. */
148 interrupt = FDT_MAP_IRQ(iparent, interrupt);
149
150 /* Configure the interrupt if callback provided */
151 if (arm_config_irq)
152 (*arm_config_irq)(*interrupt, *trig, *pol);
153 }
154 return (rv);
155 }
156
157 fdt_pic_decode_t fdt_pic_table[] = {
158 &alpine_pic_decode_fdt,
159 NULL
160 };
161