Subversion Repositories HelenOS

/*

 * Copyright (c) 2005 Jakub Jermar

 * All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 *

 * - Redistributions of source code must retain the above copyright

 *   notice, this list of conditions and the following disclaimer.

 * - 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.

 * - The name of the author may not be used to endorse or promote products

 *   derived from this software without specific prior written permission.

 *

 * 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.

 */

/** @addtogroup sparc64

 * @{

 */

/** @file

 */

#include <arch/cpu_family.h>

#include <cpu.h>

#include <arch.h>

#include <genarch/ofw/ofw_tree.h>

#include <arch/drivers/tick.h>

#include <print.h>

#include <arch/cpu_node.h>

/**

 * Finds out the clock frequency of the current CPU.

 *

 * @param node	node representing the current CPU in the OFW tree

 * @return 	clock frequency if "node" is the current CPU and no error

 *		occurs,	-1 if "node" is not the current CPU or on error

 */

static int find_cpu_frequency(ofw_tree_node_t *node)

{

	ofw_tree_property_t *prop;

	uint32_t mid;

	/* 'upa-portid' for US, 'portid' for US-III, 'cpuid' for US-IV */

	prop = ofw_tree_getprop(node, "upa-portid");

	if ((!prop) || (!prop->value))

		prop = ofw_tree_getprop(node, "portid");

	if ((!prop) || (!prop->value))

		prop = ofw_tree_getprop(node, "cpuid");

	if (prop && prop->value) {

		mid = *((uint32_t *) prop->value);

		if (mid == CPU->arch.mid) {

			prop = ofw_tree_getprop(node, "clock-frequency");

			if (prop && prop->value) {

				return *((uint32_t *) prop->value);

			}

		}

	}

	return -1;

}

/** Perform sparc64 specific initialization of the processor structure for the

 * current processor.

 */

void cpu_arch_init(void)

{

	ofw_tree_node_t *node;

	uint32_t clock_frequency = 0;

	CPU->arch.mid = read_mid();

	/*

	 * Detect processor frequency.

	 */

	if (is_us() || is_us_iii()) { 

		node = ofw_tree_find_child_by_device_type(cpus_parent(), "cpu");

		while (node) {

			int f = find_cpu_frequency(node);

			if (f != -1) 

				clock_frequency = (uint32_t) f;

			node = ofw_tree_find_peer_by_device_type(node, "cpu");

		}

	} else if (is_us_iv()) {

		node = ofw_tree_find_child(cpus_parent(), "cmp");

		while (node) {

			int f;

			f = find_cpu_frequency(

				ofw_tree_find_child(node, "cpu@0"));

			if (f != -1) 

				clock_frequency = (uint32_t) f;

			f = find_cpu_frequency(

				ofw_tree_find_child(node, "cpu@1"));

			if (f != -1) 

				clock_frequency = (uint32_t) f;

			node = ofw_tree_find_peer_by_name(node, "cmp");

		}

	}

	CPU->arch.clock_frequency = clock_frequency;

	tick_init();

}

/** Read version information from the current processor. */

void cpu_identify(void)

{

	CPU->arch.ver.value = ver_read();

}

/** Print version information for a processor.

 *

 * This function is called by the bootstrap processor.

 *

 * @param m Processor structure of the CPU for which version information is to

 * 	be printed.

 */

void cpu_print_report(cpu_t *m)

{

	char *manuf, *impl;

	switch (m->arch.ver.manuf) {

	case MANUF_FUJITSU:

		manuf = "Fujitsu";

		break;

	case MANUF_ULTRASPARC:

		manuf = "UltraSPARC";

		break;

	case MANUF_SUN:

	    	manuf = "Sun";

		break;

	default:

		manuf = "Unknown";

		break;

	}

	switch (CPU->arch.ver.impl) {

	case IMPL_ULTRASPARCI:

		impl = "UltraSPARC I";

		break;

	case IMPL_ULTRASPARCII:

		impl = "UltraSPARC II";

		break;

	case IMPL_ULTRASPARCII_I:

		impl = "UltraSPARC IIi";

		break;

	case IMPL_ULTRASPARCII_E:

		impl = "UltraSPARC IIe";

		break;

	case IMPL_ULTRASPARCIII:

		impl = "UltraSPARC III";

		break;

	case IMPL_ULTRASPARCIII_PLUS:

		impl = "UltraSPARC III+";

		break;

	case IMPL_ULTRASPARCIII_I:

		impl = "UltraSPARC IIIi";

		break;

	case IMPL_ULTRASPARCIV:

		impl = "UltraSPARC IV";

		break;

	case IMPL_ULTRASPARCIV_PLUS:

		impl = "UltraSPARC IV+";

		break;

	case IMPL_SPARC64V:

		impl = "SPARC 64V";

		break;

	default:

		impl = "Unknown";

		break;

	}

	printf("cpu%d: manuf=%s, impl=%s, mask=%d (%d MHz)\n", m->id, manuf,

		impl, m->arch.ver.mask, m->arch.clock_frequency / 1000000);

}

/** @}

 */