1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
/****************************************************************/
/* mdso: midipix dso scavenger */
/* Copyright (C) 2015--2017 Z. Gilboa */
/* Released under GPLv2 and GPLv3; see COPYING.MDSO. */
/****************************************************************/
#include <stdint.h>
#include <stdio.h>
#include <mdso/mdso.h>
#include <mdso/mdso_specs.h>
#include "mdso_errinfo_impl.h"
static const char * const asm_hdr_lines[] = {
"\t.file \".dsometa_%s.s\"\n",
"\t.section " MDSO_META_SECTION ",\"r\"\n",
"\t.globl .dsometa_%s\n",
0
};
static const char * const asm_meta_lines[] = {
"\t.long\t0\t\t# priority\n",
"\t.long\t0\t\t# nsyms\n",
"\t.long\t0\t\t# padding\n",
"\t%s\t0\t\t# hashtbl\n",
"\t%s\t0\t\t# symtbl\n",
"\t%s\t0\t\t# fncarg\n",
"\t%s\t0\t\t# fncargarr\n",
"\t%s\t0\t\t# fnr1\n",
"\t%s\t0\t\t# fnr2\n",
0
};
static const char * const asm_libname_fmt =
"\n\n"
"\t.section " MDSO_STRS_SECTION ",\"r0\"\n\n"
".libname:\n"
"\t.ascii\t\"%s\\0\"\n\n";
int mdso_asmgen_dsometa(
const struct mdso_driver_ctx * dctx,
FILE * fout)
{
const char * const * line;
const char * alignstr;
const char * ptrsize;
if (dctx->cctx->drvflags & MDSO_DRIVER_QUAD_PTR) {
alignstr = "\t.balign 16\n\n";
ptrsize = ".quad";
} else {
alignstr = "\t.balign 8\n\n";
ptrsize = ".long";
}
for (line=asm_hdr_lines; *line; line++)
if ((fprintf(fout,*line,dctx->cctx->libname)) < 0)
return MDSO_FILE_ERROR(dctx);
if ((fputs(alignstr,fout)) < 0)
return MDSO_FILE_ERROR(dctx);
if ((fprintf(fout,".dsometa_%s:\n",dctx->cctx->libname)) < 0)
return MDSO_FILE_ERROR(dctx);
if ((fprintf(fout,"\t%s\t%d\t\t# base\n",ptrsize,0)) < 0)
return MDSO_FILE_ERROR(dctx);
if ((fprintf(fout,"\t%s\t%s\t# name\n",ptrsize,".libname")) < 0)
return MDSO_FILE_ERROR(dctx);
if ((fprintf(fout,"\t%s\t%u\t\t# flags\n",".long",dctx->cctx->dsoflags)) < 0)
return MDSO_FILE_ERROR(dctx);
for (line=asm_meta_lines; *line; line++)
if ((fprintf(fout,*line,ptrsize)) < 0)
return MDSO_FILE_ERROR(dctx);
if (fprintf(fout,asm_libname_fmt,dctx->cctx->libname) < 0)
return MDSO_FILE_ERROR(dctx);
return 0;
}
|
