Subversion Repositories HelenOS

Rev

Rev 1909 | Rev 1946 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1849 jermar 1
/*
2
 * Copyright (C) 2006 Jakub Jermar
3
 * All rights reserved.
4
 *
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
7
 * are met:
8
 *
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - 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
 * - The name of the author may not be used to endorse or promote products
15
 *   derived from this software without specific prior written permission.
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
28
 
29
/** @addtogroup sparc64
30
 * @{
31
 */
32
/**
33
 * @file
34
 * @brief	FireHose Controller (FHC) driver.
35
 *
36
 * Note that this driver is a result of reverse engineering
37
 * rather than implementation of a specification. This
38
 * is due to the fact that the FHC documentation is not
39
 * publicly available.
40
 */
41
 
42
#include <arch/drivers/fhc.h>
43
#include <arch/mm/page.h>
1909 jermar 44
#include <mm/slab.h>
1849 jermar 45
#include <arch/types.h>
46
#include <typedefs.h>
1909 jermar 47
#include <genarch/ofw/ofw_tree.h>
1849 jermar 48
#include <genarch/kbd/z8530.h>
49
 
1909 jermar 50
fhc_t *central_fhc = NULL;
1849 jermar 51
 
1909 jermar 52
/**
53
 * I suspect this must be hardcoded in the FHC.
54
 * If it is not, than we can read all IMAP registers
55
 * and get the complete mapping.
56
 */
1910 jermar 57
#define FHC_UART_INR	0x39	
1849 jermar 58
 
59
#define FHC_UART_IMAP	0x0
60
#define FHC_UART_ICLR	0x4
61
 
1909 jermar 62
#define UART_IMAP_REG	4
63
 
64
fhc_t *fhc_init(ofw_tree_node_t *node)
1849 jermar 65
{
1909 jermar 66
	fhc_t *fhc;
67
	ofw_tree_property_t *prop;
1849 jermar 68
 
1909 jermar 69
	prop = ofw_tree_getprop(node, "reg");
70
 
71
	if (!prop || !prop->value)
72
		return NULL;
73
 
74
	count_t regs = prop->size / sizeof(ofw_central_reg_t);
75
	if (regs + 1 < UART_IMAP_REG)
76
		return NULL;
77
 
78
	ofw_central_reg_t *reg = &((ofw_central_reg_t *) prop->value)[UART_IMAP_REG];
79
 
80
	uintptr_t paddr;
81
	if (!ofw_central_apply_ranges(node->parent, reg, &paddr))
82
		return NULL;
83
 
84
	fhc = (fhc_t *) malloc(sizeof(fhc_t), FRAME_ATOMIC);
85
	if (!fhc)
86
		return NULL;
87
 
88
	fhc->uart_imap = (uint32_t *) hw_map(paddr, reg->size);
89
 
90
	return fhc;
1849 jermar 91
}
92
 
1910 jermar 93
void fhc_enable_interrupt(fhc_t *fhc, int inr)
1849 jermar 94
{
1910 jermar 95
	switch (inr) {
96
	case FHC_UART_INR:
1909 jermar 97
		fhc->uart_imap[FHC_UART_ICLR] = 0x0;
98
		fhc->uart_imap[FHC_UART_IMAP] = 0x80000000;
99
		break;
100
	default:
1910 jermar 101
		panic("Unexpected INR (%d)\n", inr);
1909 jermar 102
		break;
103
	}
1849 jermar 104
}
105
 
1910 jermar 106
void fhc_clear_interrupt(fhc_t *fhc, int inr)
1909 jermar 107
{
108
	ASSERT(fhc->uart_imap);
109
 
1910 jermar 110
	switch (inr) {
111
	case FHC_UART_INR:
1909 jermar 112
		fhc->uart_imap[FHC_UART_ICLR] = 0;
113
		break;
114
	default:
1910 jermar 115
		panic("Unexpected INR (%d)\n", inr);
1909 jermar 116
		break;
117
	}
118
}
119
 
1849 jermar 120
/** @}
121
 */