common.c revision 295509 
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: head/sys/arm/annapurna/alpine/common.c 295509 2016-02-11 11:49:27Z andrew $");
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
58extern bus_addr_t  al_devmap_pa;
59struct fdt_fixup_entry fdt_fixup_table[] = {
60	{ NULL, NULL }
61};
62
63static int alpine_get_wdt_base(uint32_t *pbase, uint32_t *psize);
64static int alpine_pic_decode_fdt(uint32_t iparent, uint32_t *intr,
65    int *interrupt, int *trig, int *pol);
66
67int alpine_get_devmap_base(bus_addr_t *pa, bus_addr_t *size);
68
69int 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
82static int
83alpine_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
111void
112cpu_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
135infinite:
136	while (1) {}
137}
138
139#ifndef ARM_INTRNG
140static int
141alpine_pic_decode_fdt(uint32_t iparent, uint32_t *intr, int *interrupt,
142    int *trig, int *pol)
143{
144	int rv = 0;
145
146	rv = gic_decode_fdt(iparent, intr, interrupt, trig, pol);
147	if (rv == 0) {
148		/* This was recognized as our PIC and decoded. */
149		interrupt = FDT_MAP_IRQ(iparent, interrupt);
150
151		/* Configure the interrupt if callback provided */
152		if (arm_config_irq)
153			(*arm_config_irq)(*interrupt, *trig, *pol);
154	}
155	return (rv);
156}
157
158fdt_pic_decode_t fdt_pic_table[] = {
159	&alpine_pic_decode_fdt,
160	NULL
161};
162#endif
163