Subversion Repositories HelenOS

Rev

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

Rev 2990 Rev 2996
1
/*
1
/*
2
 * Copyright (c) 2008 Jiri Svoboda
2
 * Copyright (c) 2008 Jiri Svoboda
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 rtld rtld
29
/** @addtogroup rtld rtld
30
 * @brief
30
 * @brief
31
 * @{
31
 * @{
32
 */
32
 */
33
/**
33
/**
34
 * @file
34
 * @file
35
 */
35
 */
36
 
36
 
37
#include <stdio.h>
37
#include <stdio.h>
38
#include <unistd.h>
38
#include <unistd.h>
39
#include <fcntl.h>
39
#include <fcntl.h>
40
 
40
 
41
#include <rtld.h>
41
#include <rtld.h>
42
#include <dynamic.h>
42
#include <dynamic.h>
43
#include <pcb.h>
43
#include <pcb.h>
44
#include <elf_load.h>
44
#include <elf_load.h>
45
#include <arch.h>
45
#include <arch.h>
46
 
46
 
47
runtime_env_t runtime_env;
47
runtime_env_t runtime_env;
48
 
48
 
-
 
49
void module_process_relocs(module_t *m)
-
 
50
{
-
 
51
    if (m->dyn.plt_rel == DT_REL) {
-
 
52
        if (m->dyn.rel != NULL)
-
 
53
            rel_table_process(m, m->dyn.rel, m->dyn.rel_sz);
-
 
54
        /* FIXME: this seems wrong */
-
 
55
        if (m->dyn.jmp_rel != NULL)
-
 
56
            rel_table_process(m, m->dyn.jmp_rel, m->dyn.plt_rel_sz);
-
 
57
    } else { /* (m->dyn.plt_rel == DT_RELA) */
-
 
58
        printf("table type DT_RELA\n");
-
 
59
        if (m->dyn.rela != NULL) {
-
 
60
            printf("non-empty\n");
-
 
61
            rela_table_process(m, m->dyn.rela, m->dyn.rela_sz);
-
 
62
        }
-
 
63
    }
-
 
64
}
-
 
65
 
49
void _rtld_main(void)
66
void _rtld_main(void)
50
{
67
{
51
    pcb_t *pcb;
68
    pcb_t *pcb;
52
    elf_info_t lib_info;
69
    elf_info_t lib_info;
53
    static module_t prog;
70
    static module_t prog;
54
    static module_t lib;
71
    static module_t lib;
55
    module_t *rtld;
72
    module_t *rtld;
56
    int rc;
73
    int rc;
57
 
74
 
58
    printf("Hello, world! (from rtld)\n");
75
    printf("Hello, world! (from rtld)\n");
59
    getchar();
76
//  getchar();
60
 
77
 
61
    /* rtld_dynamic and rtld->bias were filled out by the bootstrap code */
78
    /* rtld_dynamic and rtld->bias were filled out by the bootstrap code */
62
    rtld = &runtime_env.rtld;
79
    rtld = &runtime_env.rtld;
-
 
80
    printf("Parse rtld .dynamic section at 0x%x\n", runtime_env.rtld_dynamic);
63
    dynamic_parse(runtime_env.rtld_dynamic, rtld->bias, &rtld->dyn);
81
    dynamic_parse(runtime_env.rtld_dynamic, rtld->bias, &rtld->dyn);
-
 
82
//  getchar();
64
 
83
 
65
    printf("Parse .dynamic section\n");
-
 
66
    pcb = __pcb_get();
84
    pcb = __pcb_get();
-
 
85
    printf("Parse program .dynamic section at 0x%x\n", pcb->dynamic);
67
    dynamic_parse(pcb->dynamic, 0, &prog.dyn);
86
    dynamic_parse(pcb->dynamic, 0, &prog.dyn);
68
    prog.bias = 0;
87
    prog.bias = 0;
69
    prog.dyn.soname = "[program]";
88
    prog.dyn.soname = "[program]";
70
 
89
 
71
    printf("Program requested library '%s'\n", prog.dyn.needed);
90
    printf("Program requested library '%s'\n", prog.dyn.needed);
-
 
91
//  getchar();
72
   
92
   
73
    rc = elf_load_file("/libc.so.0", 0x20000, &lib_info);
93
    rc = elf_load_file("/libc.so.0", 0x20000, &lib_info);
74
    if (rc < 0) {
94
    if (rc < 0) {
75
        printf("failed to load library\n");
95
        printf("failed to load library\n");
76
        return;
96
        return;
77
    }
97
    }
78
 
98
 
79
    dynamic_parse(lib_info.dynamic, 0x20000, &lib.dyn);
99
    dynamic_parse(lib_info.dynamic, 0x20000, &lib.dyn);
80
    lib.bias = 0x20000;
100
    lib.bias = 0x20000;
81
    printf("lib.bias=0x%x\n", lib.bias);
101
    printf("lib.bias=0x%x\n", lib.bias);
82
 
102
 
83
    runtime_env.program = &prog;
103
    runtime_env.program = &prog;
84
    runtime_env.libc = &lib;
104
    runtime_env.libc = &lib;
85
 
105
 
86
    /* Parse program's relocation tables */
106
    /* Parse program's relocation tables */
87
    printf("Resolve references in program\n");
107
    printf("Resolve references in program\n");
88
    if (prog.dyn.rel != NULL)
108
    module_process_relocs(&prog);
89
        rel_table_process(&prog, prog.dyn.rel, prog.dyn.rel_sz);
-
 
90
    if (prog.dyn.jmp_rel != NULL)
-
 
91
        rel_table_process(&prog, prog.dyn.jmp_rel, prog.dyn.plt_rel_sz);
-
 
92
 
109
 
93
    /* Parse lib's relocation tables */
110
    /* Parse lib's relocation tables */
94
    printf("Resolve references in library\n");
111
    printf("Resolve references in library\n");
95
    if (lib.dyn.rel != NULL)
-
 
96
        rel_table_process(&lib, lib.dyn.rel, lib.dyn.rel_sz);
-
 
97
    if (lib.dyn.jmp_rel != NULL)
112
    module_process_relocs(&lib);
98
        rel_table_process(&lib, lib.dyn.jmp_rel, lib.dyn.plt_rel_sz);
-
 
99
 
113
 
100
    printf("lib.bias=0x%x\n", lib.bias);
114
    printf("lib.bias=0x%x\n", lib.bias);
101
 
115
 
102
    printf("Run program..\n");
116
    printf("Run program.. (at 0x%x)\n", (uintptr_t)pcb->entry);
-
 
117
    getchar();
103
    pcb->entry();
118
    pcb->entry();
104
}
119
}
105
 
120
 
106
/** @}
121
/** @}
107
 */
122
 */
108
 
123