The start of Origin 200 support. Based on some code contributed by pefo@

some years ago for KL enumeration, building on the existing XBow support
to limit ourselves to a single node for now.

This is a work-in-progress; it currently lacks complete interrupt code,
as well as PCI resource management. And there are likely bugs creeping
inside.

2 files changed, 379 insertions, 2 deletions

diff --git a/sys/arch/sgi/include/bus.h b/sys/arch/sgi/include/bus.h
index dfd9a7f615f..41fae205c06 100644
--- a/sys/arch/sgi/include/bus.h
+++ b/sys/arch/sgi/include/bus.h
@@ -1,4 +1,4 @@
-/*	$OpenBSD: bus.h,v 1.11 2008/08/25 14:05:51 jsing Exp $	*/
+/*	$OpenBSD: bus.h,v 1.12 2009/04/13 21:17:54 miod Exp $	*/
 
 /*
  * Copyright (c) 2003-2004 Opsycon AB Sweden.  All rights reserved.
@@ -48,7 +48,7 @@ typedef struct mips_bus_space bus_space_t;
 struct mips_bus_space {
 	struct extent	*bus_extent;
 	bus_addr_t	bus_base;
-	bus_addr_t	bus_base_dma;
+	void		*bus_private;
 	int32_t		bus_reverse;
 	u_int8_t	(*_space_read_1)(bus_space_tag_t , bus_space_handle_t,
 			  bus_size_t);
diff --git a/sys/arch/sgi/include/mnode.h b/sys/arch/sgi/include/mnode.h
new file mode 100644
index 00000000000..e0ed9a39329
--- /dev/null
+++ b/sys/arch/sgi/include/mnode.h
@@ -0,0 +1,377 @@
+/*	$OpenBSD: mnode.h,v 1.1 2009/04/13 21:17:54 miod Exp $ */
+
+/*
+ * Copyright (c) 2004 Opsycon AB  (www.opsycon.se / www.opsycon.com)
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+ * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ */
+
+#ifndef __MACHINE_MNODE_H__
+#define __MACHINE_MNODE_H__
+
+/*
+ *  Definitions for Nodes set up in M-Mode. Some stuff here
+ *  inspired by information gathered from Linux source code.
+ */
+
+/*
+ * IP27 uses XKSSEG to access the 1TB memory area.
+ */
+#define	IP27_CAC_BASE	0xa800000000000000	/* Cached space */
+
+/*
+ *  IP27 uses XKPHYS space for accessing special objects.
+ *  Note that IP27_UNCAC_BASE is a linear space without specials.
+ */
+#define	IP27_HSPEC_BASE	0x9000000000000000	/* Hub Special space */
+#define	IP27_IO_BASE	0x9200000000000000	/* I/O space */
+#define	IP27_MSPEC_BASE	0x9400000000000000	/* Memory Special space */
+#define	IP27_UNCAC_BASE	0x9600000000000000	/* Uncached space */
+
+/*
+ *  Macros used to find the base of each nodes address space.
+ *  In M mode each node space is 4GB.
+ */
+#define IP27_NODE_BASE(space, node) (space + ((long)(node) << 32))
+#define	OP27_NODE_SIZE		0x00000000100000000ULL
+#define	IP27_NODE_SIZE_MASK	0x000000000ffffffffULL
+
+#define IP27_NODE_CAC_BASE(node)       (IP27_NODE_BASE(IP27_CAC_BASE, node))
+#define IP27_NODE_HSPEC_BASE(node)     (IP27_NODE_BASE(IP27_HSPEC_BASE, node))
+#define IP27_NODE_IO_BASE(node)        (IP27_NODE_BASE(IP27_IO_BASE, node))
+#define IP27_NODE_MSPEC_BASE(node)     (IP27_NODE_BASE(IP27_MSPEC_BASE, node))
+#define IP27_NODE_UNCAC_BASE(node)     (IP27_NODE_BASE(IP27_UNCAC_BASE, node))
+
+/* Get typed address to nodes uncached space */
+#define IP27_UNCAC_ADDR(type, node, offs) \
+	((type)(IP27_NODE_UNCAC_BASE(node) + ((offs) & IP27_NODE_SIZE_MASK)))
+
+/*
+ *  IP27 platforms uses something called kldir to describe each
+ *  nodes configuration. Directory entries looks like:
+ */
+#define IP27_KLDIR_MAGIC	0x434d5f53505f5357
+
+typedef struct kldir_entry {
+	uint64_t	magic;
+        off_t           offset;	/* Offset from start of node space  */
+        void		*pointer;
+        size_t          size;	/* Size in bytes                    */
+        uint64_t	count;	/* Number of entries if array, 1 if not  */
+        size_t          stride;         /* Stride if array, 0 if not        */
+        char            rsvd[16];       /* Pad entry to 0x40 bytes          */
+        /* NOTE: These 16 bytes are used in the Partition KLDIR
+           entry to store partition info. Refer to klpart.h for this. */
+} kldir_entry_t;
+
+/* Get address to a specific directory entry */
+#define IP27_KLD_BASE(node)	IP27_UNCAC_ADDR(kldir_entry_t *, node, 0x2000)
+#define IP27_KLD_LAUNCH(node)		(IP27_KLD_BASE(node) + 0)
+#define IP27_KLD_KLCONFIG(node)		(IP27_KLD_BASE(node) + 1)
+#define IP27_KLD_NMI(node)		(IP27_KLD_BASE(node) + 2)
+#define IP27_KLD_GDA(node)		(IP27_KLD_BASE(node) + 3)
+#define IP27_KLD_FREEMEM(node)		(IP27_KLD_BASE(node) + 4)
+#define IP27_KLD_SYMMON_STK(node)	(IP27_KLD_BASE(node) + 5)
+#define IP27_KLD_PI_ERROR(node)		(IP27_KLD_BASE(node) + 6)
+#define IP27_KLD_KERN_VARS(node)	(IP27_KLD_BASE(node) + 7)
+#define IP27_KLD_KERN_XP(node)		(IP27_KLD_BASE(node) + 8)
+#define IP27_KLD_KERN_PARTID(node)	(IP27_KLD_BASE(node) + 9)
+
+/*
+ *  KLCONFIG is a linked list of data structures describing the
+ *  system configuration. 
+ */
+typedef uint32_t klconf_off_t;
+typedef char confidence_t;
+ 
+typedef struct console_s {
+	unsigned long	uart_base;
+	unsigned long	config_base;
+	unsigned long	memory_base;
+	short		baud;
+	short		flag;
+	int		type;
+	int16_t		nasid;
+	char		wid;
+	char		npci;
+	uint64_t	baseio_nic;
+} console_t;
+
+typedef struct klc_malloc_hdr {
+        klconf_off_t km_base;
+        klconf_off_t km_limit;
+        klconf_off_t km_current;
+} klc_malloc_hdr_t;
+
+/*  KLCONFIG header addressed by IP27_KLCONFIG_HDR(node) */
+#define IP27_KLCONFIG_HDR(n) \
+	IP27_UNCAC_ADDR(kl_config_hdr_t *, n, IP27_KLD_KLCONFIG(n)->offset)
+
+typedef struct kl_config_hdr {
+	uint64_t	magic;       /* set this to KLCFGINFO_MAGIC */
+        uint32_t	version;    /* structure version number */
+        klconf_off_t	malloc_hdr_off; /* offset of ch_malloc_hdr */
+        klconf_off_t	cons_off;       /* offset of ch_cons */
+        klconf_off_t	board_info;  /* the link list of boards */
+        console_t	cons_info;   /* address info of the console */
+        klc_malloc_hdr_t malloc_hdr[3];
+        confidence_t	sw_belief;   /* confidence that software is bad*/
+        confidence_t	sn0net_belief; /* confidence that sn0net is bad */
+} kl_config_hdr_t;
+
+/* Board info. */
+#define IP27_KLFIRST_BOARD(n) \
+	IP27_UNCAC_ADDR(lboard_t *, n, IP27_KLCONFIG_HDR(n)->board_info)
+#define IP27_KLNEXT_BOARD(n, board) \
+	IP27_UNCAC_ADDR(lboard_t *, n, board->brd_next)
+#define	MAX_COMPTS_PER_BRD	24
+typedef struct lboard_s {
+	klconf_off_t	brd_next;	/* Next BOARD */
+	uint8_t		struct_type;	/* type, local or remote */
+	unsigned char	brd_type;	/* type+class */
+	unsigned char	brd_sversion;	/* version of this structure */
+	unsigned char	brd_brevision;	/* board revision */
+	unsigned char	brd_promver;	/* board prom version, if any */
+	unsigned char	brd_flags;	/* Enabled, Disabled etc */
+	unsigned char	brd_slot;	/* slot number */
+	unsigned short	brd_debugsw;	/* Debug switches */
+	short		brd_module;	/* module to which it belongs */
+	char	        brd_partition;	/* Partition number */
+	unsigned short  brd_diagval;	/* diagnostic value */
+	unsigned short  brd_diagparm;	/* diagnostic parameter */
+	unsigned char   brd_inventory;	/* inventory history */
+	unsigned char   brd_numcompts;	/* Number of components */
+	uint64_t	brd_nic;	/* Number in CAN */
+	int16_t		brd_nasid;	/* passed parameter */
+	klconf_off_t    brd_compts[MAX_COMPTS_PER_BRD]; /* COMPONENTS */
+	klconf_off_t    brd_errinfo;	/* Board's error information */
+	struct lboard_s *brd_parent;	/* Logical parent for this brd */
+	uint32_t	brd_graph_link;	/* vertex hdl to connect extrn compts */
+	confidence_t	brd_confidence;	/* confidence that the board is bad */
+	int16_t		brd_owner;	/* who owns this board */
+	uint8_t		brd_nic_flags;	/* To handle 8 more NICs */
+	char		brd_name[32];
+} lboard_t;
+
+/* Definitions of board type and class */
+#define	IP27_BC_MASK	0xf0
+#define	IP27_BC_NODE	0x10
+#define	IP27_BC_IO	0x20
+#define	IP27_BC_ROUTER	0x30
+#define	IP27_BC_MPLANE	0x40
+#define	IP27_BC_GRAF	0x50
+#define	IP27_BC_HDTV	0x60
+#define	IP27_BC_BRICK	0x70
+
+#define	IP27_BT_MASK	0x0f
+#define	IP27_BT_CPU	0x01
+#define	IP27_BT_BASEIO	0x01
+#define	IP27_BT_MPLANE8	0x01
+
+
+/* Component info. Common info about a component. */
+typedef struct klinfo_s {                  /* Generic info */
+	unsigned char   struct_type;       /* type of this structure */
+	unsigned char   struct_version;    /* version of this structure */
+	unsigned char   flags;            /* Enabled, disabled etc */
+	unsigned char   revision;         /* component revision */
+	unsigned short  diagval;          /* result of diagnostics */
+	unsigned short  diagparm;         /* diagnostic parameter */
+	unsigned char   inventory;        /* previous inventory status */
+	uint64_t	nic;              /* Must be aligned properly */
+	unsigned char   physid;           /* physical id of component */
+	unsigned int    virtid;           /* virtual id as seen by system */
+	unsigned char   widid;            /* Widget id - if applicable */
+	int16_t         nasid;            /* node number - from parent */
+	char            pad1;             /* pad out structure. */
+	char            pad2;             /* pad out structure. */
+	void       *arcs_compt;      /* ptr to the arcs struct for ease*/
+	klconf_off_t    errinfo;          /* component specific errors */
+	unsigned short  pad3;             /* pci fields have moved over to */
+	unsigned short  pad4;             /* klbri_t */
+} klinfo_t;
+
+#define KLCONFIG_INFO_ENABLED(_i)       ((_i)->flags & KLINFO_ENABLE)
+/*
+ * Component structures.
+ * Following are the currently identified components:
+ *  CPU, HUB, MEM_BANK,
+ *  XBOW(consists of 16 WIDGETs, each of which can be HUB or GRAPHICS or BRIDGE)
+ *  BRIDGE, IOC3, SuperIO, SCSI, FDDI
+ *  ROUTER
+ *  GRAPHICS
+ */
+#define	KLSTRUCT_UNKNOWN	0
+#define	KLSTRUCT_CPU		1
+#define	KLSTRUCT_HUB		2
+#define	KLSTRUCT_MEMBNK		3
+#define	KLSTRUCT_XBOW		4
+#define	KLSTRUCT_BRI		5
+#define	KLSTRUCT_IOC3		6
+#define	KLSTRUCT_PCI		7
+#define	KLSTRUCT_VME		8
+#define	KLSTRUCT_ROU		9
+#define	KLSTRUCT_GFX		10
+#define	KLSTRUCT_SCSI		11
+#define	KLSTRUCT_FDDI		12
+#define	KLSTRUCT_MIO		13
+#define	KLSTRUCT_DISK		14
+#define	KLSTRUCT_TAPE		15
+#define	KLSTRUCT_CDROM		16
+#define	KLSTRUCT_HUB_UART	17
+#define	KLSTRUCT_IOC3ENET	18
+#define	KLSTRUCT_IOC3UART	19
+#define	KLSTRUCT_UNUSED		20 /* XXX UNUSED */
+#define	KLSTRUCT_IOC3PCKM	21
+#define	KLSTRUCT_RAD		22
+#define	KLSTRUCT_HUB_TTY	23
+#define	KLSTRUCT_IOC3_TTY	24
+
+typedef struct klport_s {
+	int16_t		port_nasid;
+	unsigned char	port_flag;
+	klconf_off_t	port_offset;
+} klport_t;
+
+/* KLSTRUCT_CPU: CPU component info */
+typedef struct klcpu_s {
+	klinfo_t	cpu_info;
+	uint16_t	cpu_prid;       /* Processor PRID value */
+	uint16_t	cpu_fpirr;      /* FPU IRR value */
+	uint16_t	cpu_speed;      /* Speed in MHZ */
+	uint16_t	cpu_scachesz;   /* secondary cache size in MB */
+	uint16_t	cpu_scachespeed;/* secondary cache speed in MHz */
+} klcpu_t;
+
+/* KLSTRUCT_HUB: Hub */
+typedef struct klhub_s {
+	klinfo_t	hub_info;
+	uint32_t	hub_flags;	/* PCFG_HUB_xxx flags */
+	klport_t	hub_port;	/* hub is connected to this */
+	uint64_t	hub_box_nic;	/* nic of containing box */
+	klconf_off_t	hub_mfg_nic;	/* MFG NIC string */
+	uint64_t	hub_speed;	/* Speed of hub in HZ */
+} klhub_t;
+
+/* KLSTRUCT_MEMBNK: Memory bank */
+#define	MD_MEM_BANKS_M	8	/* M-Mode */
+typedef struct klmembnk_m_s {
+	klinfo_t	membnk_info;
+	int16_t		membnk_memsz;		/* Total memory in megabytes */
+	int16_t		membnk_dimm_select;	/* bank to phys addr mapping*/
+	int16_t		membnk_bnksz[MD_MEM_BANKS_M]; /* Memory bank sizes */
+        int16_t		membnk_attr;
+} klmembnk_m_t;
+
+#define	MD_MEM_BANKS_N	4	/* N-Mode */
+typedef struct klmembnk_n_s {
+	klinfo_t	membnk_info;
+	int16_t		membnk_memsz;		/* Total memory in megabytes */
+	int16_t		membnk_dimm_select;	/* bank to phys addr mapping*/
+	int16_t		membnk_bnksz[MD_MEM_BANKS_N]; /* Memory bank sizes */
+        int16_t		membnk_attr;
+} klmembnk_n_t;
+
+/* KLSTRUCT_IOC3: Basic I/O Controller */
+typedef struct klioc3_s {
+	klinfo_t	ioc3_info;
+	unsigned char	ioc3_ssram;	/* Info about ssram */
+	unsigned char	ioc3_nvram;	/* Info about nvram */
+	klinfo_t	ioc3_superio;	/* Info about superio */
+	klconf_off_t	ioc3_tty_off;
+	klinfo_t	ioc3_enet;
+	klconf_off_t	ioc3_enet_off;
+	klconf_off_t	ioc3_kbd_off;
+} klioc3_t;
+
+/* KLSTRUCT_IOC3_TTY: IOC3 attached TTY */
+typedef struct klttydev_s {
+	klinfo_t        ttydev_info;
+	struct terminal_data *ttydev_cfg;	/* driver fills up this */
+} klttydev_t;
+
+
+/*                            H U B                    */
+/*                            =====                    */
+/*
+ *  HUB access macros.
+ */
+#define	BWIN_SIZE_BITS		29
+#define	BWIN_INDEX_BITS		3
+#define	BWIN_SIZE		(1ULL << BWIN_SIZE_BITS)
+#define	BWIN_SIZEMASK		(BWIN_SIZE - 1)
+#define	BWIN_WIDGET_MASK	0x7
+
+#define	LWIN_SIZE_BITS		24
+#define	LWIN_SIZE		(1ULL << LWIN_SIZE_BITS)
+#define	LWIN_SIZEMASK		(LWIN_SIZE - 1)
+#define	LWIN_WIDGET_MASK	0xF
+
+#define	RAW_NODE_LWIN_BASE(nasid, widget)                               \
+        (IP27_NODE_IO_BASE(nasid) + ((uint64_t)(widget) << LWIN_SIZE_BITS))
+
+#define	NODE_BWIN_BASE0(nasid)  (IP27_NODE_IO_BASE(nasid) + BWIN_SIZE)
+#define	NODE_BWIN_BASE(nasid, bigwin)   (NODE_BWIN_BASE0(nasid) +       \
+                        ((uint64_t)(bigwin) << BWIN_SIZE_BITS))
+
+#define	NODE_LWIN_BASE(nasid, widget)					\
+	((widget == 0) ? NODE_BWIN_BASE((nasid), 6)			\
+			: RAW_NODE_LWIN_BASE(nasid, widget))
+
+
+#define	IP27_LHUB_ADDR(_x) \
+	((volatile uint64_t *)(NODE_LWIN_BASE(0, 1) + (_x)))
+#define	IP27_RHUB_ADDR(_n, _x) \
+	((volatile uint64_t *)(NODE_LWIN_BASE(_n, 1) + 0x800000 + (_x)))
+#define	IP27_RHUB_PI_ADDR(_n, _sn, _x) \
+	((volatile uint64_t *)(NODE_LWIN_BASE(_n, 1) + 0x800000 + (_x)))
+
+#define	IP27_LHUB_L(r)			*(IP27_LHUB_ADDR(r))
+#define	IP27_LHUB_S(r, d)		*(IP27_LHUB_ADDR(r)) = (d)
+#define	IP27_RHUB_L(n, r)		*(IP27_RHUB_ADDR((n), (r))
+#define	IP27_RHUB_S(n, r, d)		*(IP27_RHUB_ADDR((n), (r)) = (d)
+#define IP27_RHUB_PI_L(n, s, r)		*(IP27_RHUB_PI_ADDR((n), (s), (r))
+#define	IP27_RHUB_PI_S(n, s, r, d)	*(IP27_RHUB_PI_ADDR((n), (s), (r)) = (d)
+
+
+/* HUB I/O registers */
+#define	PI_REGION_PRESENT       0x000018
+#define	PI_CALIAS_SIZE          0x000028
+#define		PI_CALIAS_SIZE_0	0
+
+
+/* HUB network interface */
+#define	NI_STATUS_REV_ID	0x600000
+
+#define	NSRI_MORENODES_MASK	(1ULL << 18)	/* Mnodes  */
+
+/*
+ *  Functions.
+ */
+
+void	kl_scan_config(int);
+vaddr_t	kl_get_console_base(void);
+
+int	kl_n_mode;
+
+#endif /* __MACHINE_MNODE_H__ */