1 /* 2 * This file and its contents are supplied under the terms of the 3 * Common Development and Distribution License ("CDDL"), version 1.0. 4 * You may only use this file in accordance with the terms of version 5 * 1.0 of the CDDL. 6 * 7 * A full copy of the text of the CDDL should have accompanied this 8 * source. A copy of the CDDL is also available via the Internet at 9 * http://www.illumos.org/license/CDDL. 10 */ 11 12 /* 13 * Copyright 2015 Joyent, Inc. 14 */ 15 16 /* 17 * Main conversion entry points. This has been designed such that there can be 18 * any number of different conversion backends. Currently we only have one that 19 * understands DWARFv2 (and bits of DWARFv4). Each backend should be placed in 20 * the ctf_converters list and each will be tried in turn. 21 */ 22 23 #include <libctf_impl.h> 24 #include <gelf.h> 25 26 ctf_convert_f ctf_converters[] = { 27 ctf_dwarf_convert 28 }; 29 30 #define NCONVERTS (sizeof (ctf_converters) / sizeof (ctf_convert_f)) 31 32 typedef enum ctf_convert_source { 33 CTFCONV_SOURCE_NONE = 0x0, 34 CTFCONV_SOURCE_UNKNOWN = 0x01, 35 CTFCONV_SOURCE_C = 0x02, 36 CTFCONV_SOURCE_S = 0x04 37 } ctf_convert_source_t; 38 39 static void 40 ctf_convert_ftypes(Elf *elf, ctf_convert_source_t *types) 41 { 42 int i; 43 Elf_Scn *scn = NULL, *strscn; 44 *types = CTFCONV_SOURCE_NONE; 45 GElf_Shdr shdr; 46 Elf_Data *data, *strdata; 47 48 while ((scn = elf_nextscn(elf, scn)) != NULL) { 49 50 if (gelf_getshdr(scn, &shdr) == NULL) 51 return; 52 53 if (shdr.sh_type == SHT_SYMTAB) 54 break; 55 } 56 57 if (scn == NULL) 58 return; 59 60 if ((strscn = elf_getscn(elf, shdr.sh_link)) == NULL) 61 return; 62 63 if ((data = elf_getdata(scn, NULL)) == NULL) 64 return; 65 66 if ((strdata = elf_getdata(strscn, NULL)) == NULL) 67 return; 68 69 for (i = 0; i < shdr.sh_size / shdr.sh_entsize; i++) { 70 GElf_Sym sym; 71 const char *file; 72 size_t len; 73 74 if (gelf_getsym(data, i, &sym) == NULL) 75 return; 76 77 if (GELF_ST_TYPE(sym.st_info) != STT_FILE) 78 continue; 79 80 file = (const char *)((uintptr_t)strdata->d_buf + sym.st_name); 81 len = strlen(file); 82 if (len < 2 || file[len - 2] != '.') { 83 *types |= CTFCONV_SOURCE_UNKNOWN; 84 continue; 85 } 86 87 switch (file[len - 1]) { 88 case 'c': 89 *types |= CTFCONV_SOURCE_C; 90 break; 91 case 'h': 92 /* We traditionally ignore header files... */ 93 break; 94 case 's': 95 *types |= CTFCONV_SOURCE_S; 96 break; 97 default: 98 *types |= CTFCONV_SOURCE_UNKNOWN; 99 break; 100 } 101 } 102 } 103 104 static ctf_file_t * 105 ctf_elfconvert(int fd, Elf *elf, const char *label, uint_t nthrs, uint_t flags, 106 int *errp, char *errbuf, size_t errlen) 107 { 108 int err, i; 109 ctf_file_t *fp = NULL; 110 boolean_t notsup = B_TRUE; 111 ctf_convert_source_t type; 112 113 if (errp == NULL) 114 errp = &err; 115 116 if (elf == NULL) { 117 *errp = EINVAL; 118 return (NULL); 119 } 120 121 if (flags & ~CTF_CONVERT_F_IGNNONC) { 122 *errp = EINVAL; 123 return (NULL); 124 } 125 126 if (elf_kind(elf) != ELF_K_ELF) { 127 *errp = ECTF_FMT; 128 return (NULL); 129 } 130 131 ctf_convert_ftypes(elf, &type); 132 ctf_dprintf("got types: %d\n", type); 133 if (flags & CTF_CONVERT_F_IGNNONC) { 134 if (type == CTFCONV_SOURCE_NONE || 135 (type & CTFCONV_SOURCE_UNKNOWN)) { 136 *errp = ECTF_CONVNOCSRC; 137 return (NULL); 138 } 139 } 140 141 for (i = 0; i < NCONVERTS; i++) { 142 ctf_conv_status_t cs; 143 144 fp = NULL; 145 cs = ctf_converters[i](fd, elf, nthrs, errp, &fp, errbuf, 146 errlen); 147 if (cs == CTF_CONV_SUCCESS) { 148 notsup = B_FALSE; 149 break; 150 } 151 if (cs == CTF_CONV_ERROR) { 152 fp = NULL; 153 notsup = B_FALSE; 154 break; 155 } 156 } 157 158 if (notsup == B_TRUE) { 159 if ((flags & CTF_CONVERT_F_IGNNONC) != 0 && 160 (type & CTFCONV_SOURCE_C) == 0) { 161 *errp = ECTF_CONVNOCSRC; 162 return (NULL); 163 } 164 *errp = ECTF_NOCONVBKEND; 165 return (NULL); 166 } 167 168 /* 169 * Succsesful conversion. 170 */ 171 if (fp != NULL) { 172 if (label == NULL) 173 label = ""; 174 if (ctf_add_label(fp, label, fp->ctf_typemax, 0) == CTF_ERR) { 175 *errp = ctf_errno(fp); 176 ctf_close(fp); 177 return (NULL); 178 } 179 if (ctf_update(fp) == CTF_ERR) { 180 *errp = ctf_errno(fp); 181 ctf_close(fp); 182 return (NULL); 183 } 184 } 185 186 return (fp); 187 } 188 189 ctf_file_t * 190 ctf_fdconvert(int fd, const char *label, uint_t nthrs, uint_t flags, int *errp, 191 char *errbuf, size_t errlen) 192 { 193 int err; 194 Elf *elf; 195 ctf_file_t *fp; 196 197 if (errp == NULL) 198 errp = &err; 199 200 elf = elf_begin(fd, ELF_C_READ, NULL); 201 if (elf == NULL) { 202 *errp = ECTF_FMT; 203 return (NULL); 204 } 205 206 fp = ctf_elfconvert(fd, elf, label, nthrs, flags, errp, errbuf, errlen); 207 208 (void) elf_end(elf); 209 return (fp); 210 } 211