Subversion Repositories HelenOS-historic

Rev

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

Rev 1129 Rev 1656
1
/*
1
/*
2
 * Copyright (C) 2006 Ondrej Palkovsky
2
 * Copyright (C) 2006 Ondrej Palkovsky
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
 /** @addtogroup libcmips32
-
 
30
 * @{
-
 
31
 */
-
 
32
/** @file
-
 
33
 */
-
 
34
 
29
/* TLS for MIPS is described in http://www.linux-mips.org/wiki/NPTL */
35
/* TLS for MIPS is described in http://www.linux-mips.org/wiki/NPTL */
30
 
36
 
31
#ifndef __LIBC__mips32THREAD_H__
37
#ifndef __LIBC__mips32THREAD_H__
32
#define __LIBC__mips32THREAD_H__
38
#define __LIBC__mips32THREAD_H__
33
 
39
 
34
/* I did not find any specification (neither MIPS nor PowerPC), but
40
/* I did not find any specification (neither MIPS nor PowerPC), but
35
 * as I found it
41
 * as I found it
36
 * - it uses Variant II
42
 * - it uses Variant II
37
 * - TCB is at Address(First TLS Block)+0x7000.
43
 * - TCB is at Address(First TLS Block)+0x7000.
38
 * - DTV is at Address(First TLS Block)+0x8000
44
 * - DTV is at Address(First TLS Block)+0x8000
39
 * - What would happen if the TLS data was larger then 0x7000?
45
 * - What would happen if the TLS data was larger then 0x7000?
40
 * - The linker never accesses DTV directly, has the second definition any
46
 * - The linker never accesses DTV directly, has the second definition any
41
 *   sense?
47
 *   sense?
42
 * We will make it this way:
48
 * We will make it this way:
43
 * - TCB is at TP-0x7000-sizeof(tcb)
49
 * - TCB is at TP-0x7000-sizeof(tcb)
44
 * - No assumption about DTV etc., but it will not have a fixed address
50
 * - No assumption about DTV etc., but it will not have a fixed address
45
 */
51
 */
46
#define MIPS_TP_OFFSET 0x7000
52
#define MIPS_TP_OFFSET 0x7000
47
 
53
 
48
typedef struct {
54
typedef struct {
49
    void *pst_data;
55
    void *pst_data;
50
} tcb_t;
56
} tcb_t;
51
 
57
 
52
static inline void __tcb_set(tcb_t *tcb)
58
static inline void __tcb_set(tcb_t *tcb)
53
{
59
{
54
    void *tp = tcb;
60
    void *tp = tcb;
55
    tp += MIPS_TP_OFFSET + sizeof(tcb_t);
61
    tp += MIPS_TP_OFFSET + sizeof(tcb_t);
56
 
62
 
57
    __asm__ volatile ("add $27, %0, $0" : : "r"(tp)); /* Move tls to K1 */
63
    __asm__ volatile ("add $27, %0, $0" : : "r"(tp)); /* Move tls to K1 */
58
}
64
}
59
 
65
 
60
static inline tcb_t * __tcb_get(void)
66
static inline tcb_t * __tcb_get(void)
61
{
67
{
62
    void * retval;
68
    void * retval;
63
 
69
 
64
    __asm__ volatile("add %0, $27, $0" : "=r"(retval));
70
    __asm__ volatile("add %0, $27, $0" : "=r"(retval));
65
 
71
 
66
    return (tcb_t *)(retval - MIPS_TP_OFFSET - sizeof(tcb_t));
72
    return (tcb_t *)(retval - MIPS_TP_OFFSET - sizeof(tcb_t));
67
}
73
}
68
 
74
 
69
#endif
75
#endif
-
 
76
 
-
 
77
 /** @}
-
 
78
 */
-
 
79
 
70
 
80