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: stable/11/sys/arm/annapurna/alpine/common.c 314506 2017-03-01 19:55:04Z ian $");
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;
59
60static int alpine_get_wdt_base(uint32_t *pbase, uint32_t *psize);
61static int alpine_pic_decode_fdt(uint32_t iparent, uint32_t *intr,
62    int *interrupt, int *trig, int *pol);
63
64int alpine_get_devmap_base(bus_addr_t *pa, bus_addr_t *size);
65
66int alpine_get_devmap_base(bus_addr_t *pa, bus_addr_t *size)
67{
68	phandle_t node;
69
70	if ((node = OF_finddevice("/")) == 0)
71		return (ENXIO);
72
73	if ((node = fdt_find_compatible(node, "simple-bus", 1)) == 0)
74		return (ENXIO);
75
76	return fdt_get_range(node, 0, pa, size);
77}
78
79static int
80alpine_get_wdt_base(uint32_t *pbase, uint32_t *psize)
81{
82	phandle_t node;
83	u_long base = 0;
84	u_long size = 0;
85
86	if (pbase == NULL || psize == NULL)
87		return (EINVAL);
88
89	if ((node = OF_finddevice("/")) == -1)
90		return (EFAULT);
91
92	if ((node = fdt_find_compatible(node, "simple-bus", 1)) == 0)
93		return (EFAULT);
94
95	if ((node =
96	    fdt_find_compatible(node, "arm,sp805", 1)) == 0)
97		return (EFAULT);
98
99	if (fdt_regsize(node, &base, &size))
100		return (EFAULT);
101
102	*pbase = base;
103	*psize = size;
104
105	return (0);
106}
107
108void
109cpu_reset(void)
110{
111	uint32_t wdbase, wdsize;
112	bus_addr_t wdbaddr;
113	int ret;
114
115	ret = alpine_get_wdt_base(&wdbase, &wdsize);
116	if (ret) {
117		printf("Unable to get WDT base, do power down manually...");
118		goto infinite;
119	}
120
121	ret = bus_space_map(fdtbus_bs_tag, al_devmap_pa + wdbase,
122	    wdsize, 0, &wdbaddr);
123	if (ret) {
124		printf("Unable to map WDT base, do power down manually...");
125		goto infinite;
126	}
127
128	bus_space_write_4(fdtbus_bs_tag, wdbaddr, WDTLOCK, UNLOCK);
129	bus_space_write_4(fdtbus_bs_tag, wdbaddr, WDTLOAD, LOAD_MIN);
130	bus_space_write_4(fdtbus_bs_tag, wdbaddr, WDTCONTROL, INT_ENABLE | RESET_ENABLE);
131
132infinite:
133	while (1) {}
134}
135
136#ifndef INTRNG
137static int
138alpine_pic_decode_fdt(uint32_t iparent, uint32_t *intr, int *interrupt,
139    int *trig, int *pol)
140{
141	int rv = 0;
142
143	rv = gic_decode_fdt(iparent, intr, interrupt, trig, pol);
144	if (rv == 0) {
145		/* This was recognized as our PIC and decoded. */
146		interrupt = FDT_MAP_IRQ(iparent, interrupt);
147
148		/* Configure the interrupt if callback provided */
149		if (arm_config_irq)
150			(*arm_config_irq)(*interrupt, *trig, *pol);
151	}
152	return (rv);
153}
154
155fdt_pic_decode_t fdt_pic_table[] = {
156	&alpine_pic_decode_fdt,
157	NULL
158};
159#endif
160