1 files changed, 175 insertions, 0 deletions

diff --git a/qemu/roms/openbios/arch/ppc/mol/prom.c b/qemu/roms/openbios/arch/ppc/mol/prom.c
new file mode 100644
index 000000000..0bc8bcfbc
--- /dev/null
+++ b/qemu/roms/openbios/arch/ppc/mol/prom.c
@@ -0,0 +1,175 @@
+/*
+ *   Creation Date: <2002/10/03 20:55:02 samuel>
+ *   Time-stamp: <2002/10/29 13:00:23 samuel>
+ *
+ *	<prom.c>
+ *
+ *	oftree interface
+ *
+ *   Copyright (C) 2002, 2003 Samuel Rydh (samuel@ibrium.se)
+ *
+ *   This program is free software; you can redistribute it and/or
+ *   modify it under the terms of the GNU General Public License
+ *   as published by the Free Software Foundation
+ *
+ */
+
+#include "config.h"
+#include "osi_calls.h"
+#include "mol/prom.h"
+
+/* OSI_PromClose (free linux side device tree) */
+int
+prom_close( void )
+{
+	return OSI_PromIface( kPromClose, 0 );
+}
+
+/* ret: 0 no more peers, -1 if error */
+mol_phandle_t
+prom_peer( mol_phandle_t phandle )
+{
+	return OSI_PromIface( kPromPeer, phandle );
+}
+
+/* ret: 0 no child, -1 if error */
+mol_phandle_t
+prom_child( mol_phandle_t phandle )
+{
+	return OSI_PromIface( kPromChild, phandle );
+}
+
+/* ret: 0 if root node, -1 if error */
+mol_phandle_t
+prom_parent( mol_phandle_t phandle )
+{
+	return OSI_PromIface( kPromParent, phandle );
+}
+
+/* ret: -1 error */
+int
+prom_package_to_path( mol_phandle_t phandle, char *buf, long buflen )
+{
+	return OSI_PromIface2( kPromPackageToPath, phandle, (int)buf, buflen );
+}
+
+/* ret: -1 error */
+int
+prom_get_prop_len( mol_phandle_t phandle, const char *name )
+{
+	return OSI_PromIface1( kPromGetPropLen, phandle, (int)name );
+}
+
+/* ret: prop len or -1 if error */
+int
+prom_get_prop( mol_phandle_t phandle, const char *name, char *buf, long buflen )
+{
+	return OSI_PromIface3( kPromGetProp, phandle, (int)name, (int)buf, buflen );
+}
+
+/* ret: prop len or -1 if error */
+int
+prom_get_prop_by_path( const char *path, const char *name, char *buf, long buflen )
+{
+	mol_phandle_t ph = prom_find_device(path);
+	return (ph != -1)? prom_get_prop( ph, name, buf, buflen) : -1;
+}
+
+/* ret: -1 error, 0 last prop, 1 otherwise */
+int
+prom_next_prop( mol_phandle_t phandle, const char *prev, char *buf )
+{
+	return OSI_PromIface2( kPromNextProp, phandle, (int)prev, (int)buf );
+}
+
+/* ret: -1 if error */
+int
+prom_set_prop( mol_phandle_t phandle, const char *name, char *buf, long buflen )
+{
+	return OSI_PromIface3( kPromSetProp, phandle, (int)name, (int)buf, buflen );
+}
+
+/* ret: -1 if error */
+mol_phandle_t
+prom_create_node( const char *path )
+{
+	return OSI_PromPathIface( kPromCreateNode, path );
+}
+
+/* ret: -1 if not found */
+mol_phandle_t
+prom_find_device( const char *path )
+{
+	mol_phandle_t ph;
+	char buf2[256], ch, *p;
+
+	if( !path )
+		return -1;
+
+	if( (ph=OSI_PromPathIface( kPromFindDevice, path )) != -1 )
+		return ph;
+	else if( path[0] == '/' )
+		return -1;
+
+	/* might be an alias */
+	if( !(p=strpbrk(path, "@:/")) )
+		p = (char*)path + strlen(path);
+
+	ch = *p;
+	*p = 0;
+	if( (ph=prom_get_prop(prom_find_device("/aliases"), path, buf2, sizeof(buf2))) == -1 )
+		return -1;
+	*p = ch;
+	strncat( buf2, p, sizeof(buf2) );
+
+	if( buf2[0] != '/' ) {
+		printk("Error: aliases must be absolute!\n");
+		return -1;
+	}
+	ph = OSI_PromPathIface( kPromFindDevice, buf2 );
+	return ph;
+}
+
+
+
+/************************************************************************/
+/*	search the tree for nodes with matching device_type		*/
+/************************************************************************/
+
+static mol_phandle_t
+prom_find_device_type_( mol_phandle_t ph, const char *type, int *icount, int index )
+{
+	char buf[64];
+	int ph2;
+
+	if( ph == -1 || !ph )
+		return -1;
+	if( prom_get_prop( ph, "device_type", buf, sizeof(buf)) > 0 )
+		if( !strcmp(buf, type) )
+			if( (*icount)++ == index )
+				return ph;
+	if( (ph2=prom_find_device_type_( prom_peer(ph), type, icount, index )) != -1 )
+		return ph2;
+	if( (ph2=prom_find_device_type_( prom_child(ph), type, icount, index )) != -1 )
+		return ph2;
+	return -1;
+}
+
+mol_phandle_t
+prom_find_device_type( const char *type, int index )
+{
+	int count = 0;
+	return prom_find_device_type_( prom_peer(0), type, &count, index );
+}
+
+
+/************************************************************************/
+/*	device tree tweaking						*/
+/************************************************************************/
+
+/* -1 if error */
+int
+prom_change_phandle( mol_phandle_t old_ph, mol_phandle_t new_ph )
+{
+	return OSI_PromIface1( kPromChangePHandle, old_ph, (int)new_ph );
+}