Subversion Repositories HelenOS

Rev

Rev 1899 | Rev 1978 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1899 Rev 1903
1
/*
1
/*
2
 * Copyright (C) 2005 Martin Decky
2
 * Copyright (C) 2005 Martin Decky
3
 * All rights reserved.
3
 * All rights reserved.
4
 *
4
 *
5
 * Redistribution and use in source and binary forms, with or without
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
6
 * modification, are permitted provided that the following conditions
7
 * are met:
7
 * are met:
8
 *
8
 *
9
 * - Redistributions of source code must retain the above copyright
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
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
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.
15
 *   derived from this software without specific prior written permission.
16
 *
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
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
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
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
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
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
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.
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
27
 */
28
 
28
 
29
/**
29
/**
30
 * @file
30
 * @file
31
 * @brief   Architecture dependent parts of OpenFirmware interface.
31
 * @brief   Architecture dependent parts of OpenFirmware interface.
32
 */
32
 */
33
 
33
 
34
#include <ofwarch.h>  
34
#include <ofwarch.h>  
35
#include <ofw.h>
35
#include <ofw.h>
36
#include <printf.h>
36
#include <printf.h>
37
#include <string.h>
37
#include <string.h>
-
 
38
#include <register.h>
38
#include "main.h"
39
#include "main.h"
39
 
40
 
40
void write(const char *str, const int len)
41
void write(const char *str, const int len)
41
{
42
{
42
    int i;
43
    int i;
43
   
44
   
44
    for (i = 0; i < len; i++) {
45
    for (i = 0; i < len; i++) {
45
        if (str[i] == '\n')
46
        if (str[i] == '\n')
46
            ofw_write("\r", 1);
47
            ofw_write("\r", 1);
47
        ofw_write(&str[i], 1);
48
        ofw_write(&str[i], 1);
48
    }
49
    }
49
}
50
}
50
 
51
 
51
int ofw_translate_failed(ofw_arg_t flag)
52
int ofw_translate_failed(ofw_arg_t flag)
52
{
53
{
53
    return flag != -1;
54
    return flag != -1;
54
}
55
}
55
 
56
 
56
 
-
 
57
#define ASI_UPA_CONFIG      0x4a
-
 
58
#define UPA_CONFIG_MID_SHIFT    17
-
 
59
#define UPA_CONFIG_MID_MASK 0x1f
-
 
60
 
-
 
61
int ofw_cpu(void)
57
int ofw_cpu(void)
62
{
58
{
63
    char type_name[BUF_SIZE];
59
    char type_name[BUF_SIZE];
64
 
60
 
65
    phandle node;
61
    phandle node;
66
    node = ofw_get_child_node(ofw_root);
62
    node = ofw_get_child_node(ofw_root);
67
    if (node == 0 || node == -1) {
63
    if (node == 0 || node == -1) {
68
        printf("Could not find any child nodes of the root node.\n");
64
        printf("Could not find any child nodes of the root node.\n");
69
        return 0;
65
        return 0;
70
    }
66
    }
71
   
67
   
72
    uint64_t current_mid;
68
    uint64_t current_mid;
73
   
69
   
74
    __asm__ volatile ("ldxa [%1] %2, %0\n" : "=r" (current_mid) : "r" (0), "i" (ASI_UPA_CONFIG));
70
    __asm__ volatile ("ldxa [%1] %2, %0\n" : "=r" (current_mid) : "r" (0), "i" (ASI_UPA_CONFIG));
75
    current_mid >>= UPA_CONFIG_MID_SHIFT;
71
    current_mid >>= UPA_CONFIG_MID_SHIFT;
76
    current_mid &= UPA_CONFIG_MID_MASK;
72
    current_mid &= UPA_CONFIG_MID_MASK;
-
 
73
 
-
 
74
    int cpus;
77
   
75
   
78
    for (; node != 0 && node != -1; node = ofw_get_peer_node(node)) {
76
    for (cpus = 0; node != 0 && node != -1; node = ofw_get_peer_node(node), cpus++) {
79
        if (ofw_get_property(node, "device_type", type_name, sizeof(type_name)) > 0) {
77
        if (ofw_get_property(node, "device_type", type_name, sizeof(type_name)) > 0) {
80
            if (strcmp(type_name, "cpu") == 0) {
78
            if (strcmp(type_name, "cpu") == 0) {
81
                uint32_t mid;
79
                uint32_t mid;
82
               
80
               
83
                if (ofw_get_property(node, "upa-portid", &mid, sizeof(mid)) <= 0)
81
                if (ofw_get_property(node, "upa-portid", &mid, sizeof(mid)) <= 0)
84
                    continue;
82
                    continue;
85
                   
83
                   
86
                if (current_mid != mid) {
84
                if (current_mid != mid) {
87
                    /*
85
                    /*
88
                     * Start secondary processor.
86
                     * Start secondary processor.
89
                     */
87
                     */
90
                    (void) ofw_call("SUNW,start-cpu", 3, 1, NULL, node, KERNEL_VIRTUAL_ADDRESS, 0);
88
                    (void) ofw_call("SUNW,start-cpu", 3, 1, NULL, node, KERNEL_VIRTUAL_ADDRESS, 0);
91
                }
89
                }
92
            }
90
            }
93
        }
91
        }
94
    }
92
    }
95
 
93
 
96
    return 1;
94
    return cpus;
97
}
95
}
98
 
96