1c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata/* 2c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * This file is part of ltrace. 3a2e16c5cc8cc2343d40a44ac8b4d2230de9fc985Petr Machata * Copyright (C) 2011, 2012 Petr Machata, Red Hat Inc. 4c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * 5c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * This program is free software; you can redistribute it and/or 6c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * modify it under the terms of the GNU General Public License as 7c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * published by the Free Software Foundation; either version 2 of the 8c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * License, or (at your option) any later version. 9c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * 10c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * This program is distributed in the hope that it will be useful, but 11c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * WITHOUT ANY WARRANTY; without even the implied warranty of 12c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 13c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * General Public License for more details. 14c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * 15c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * You should have received a copy of the GNU General Public License 16c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * along with this program; if not, write to the Free Software 17c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 18c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * 02110-1301 USA 19c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata */ 20c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 21c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include <stdlib.h> 22c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include <assert.h> 23c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include <string.h> 24c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 25c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include "lens_enum.h" 26c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include "lens_default.h" 27c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include "value.h" 28a2e16c5cc8cc2343d40a44ac8b4d2230de9fc985Petr Machata#include "sysdep.h" 29c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#include "type.h" 30c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 31c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatastruct enum_entry { 32c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata char *key; 33c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata int own_key; 34c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct value *value; 35c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata int own_value; 36c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata}; 37c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 38c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatastatic void 39c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataenum_entry_dtor(struct enum_entry *entry, void *data) 40c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 41c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (entry->own_key) 42c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata free(entry->key); 43c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (entry->own_value) { 44c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata value_destroy(entry->value); 45c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata free(entry->value); 46c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata } 47c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 48c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 49c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatastatic void 50c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataenum_lens_destroy_cb(struct lens *lens) 51c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 52c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct enum_lens *self = (void *)lens; 53c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 54c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata VECT_DESTROY(&self->entries, struct enum_entry, 55c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata enum_entry_dtor, NULL); 56c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 57c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 58c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataenum { 59c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#ifdef ARCH_ENDIAN_BIG 60c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata big_endian = 1, 61c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#elif defined (ARCH_ENDIAN_LITTLE) 62c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata big_endian = 0, 63c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#else 64c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata# error Undefined endianness. 65c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata#endif 66c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata}; 67c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 68c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata/* Returns 0 if they are not equal, >0 if they are, and <0 if there 69c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * was an error. */ 70c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatastatic int 71c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataenum_values_equal(struct value *inf_value, struct value *enum_value, 72c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct value_dict *arguments) 73c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 74c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata /* Width may not match between what's defined in config file 75c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * and what arrives from the back end. Typically, if there is 76c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * a mismatch, the config file size will be larger, as we are 77c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * in a situation where 64-bit tracer traces 32-bit process. 78c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * But opposite situation can occur e.g. on PPC, where it's 79c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * apparently possible for 32-bit tracer to trace 64-bit 80c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata * inferior, or hypothetically in a x32/x86_64 situation. */ 81c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 82c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata unsigned char *inf_data = value_get_data(inf_value, arguments); 83c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata size_t inf_sz = value_size(inf_value, arguments); 84c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (inf_data == NULL || inf_sz == (size_t)-1) 85c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return -1; 86c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 87c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata assert(inf_value->type->type == enum_value->type->type); 88c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 89c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata unsigned char *enum_data = value_get_data(enum_value, arguments); 90c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata size_t enum_sz = value_size(enum_value, arguments); 91c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (enum_data == NULL || enum_sz == (size_t)-1) 92c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return -1; 93c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 94c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata size_t sz = enum_sz > inf_sz ? inf_sz : enum_sz; 95c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 96c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (big_endian) 97c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return memcmp(enum_data + enum_sz - sz, 98c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata inf_data + inf_sz - sz, sz) == 0; 99c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata else 100c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return memcmp(enum_data, inf_data, sz) == 0; 101c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 102c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 103c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatastatic const char * 104c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataenum_get(struct enum_lens *lens, struct value *value, 105c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct value_dict *arguments) 106c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 107c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata size_t i; 108c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata for (i = 0; i < vect_size(&lens->entries); ++i) { 109c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct enum_entry *entry = VECT_ELEMENT(&lens->entries, 110c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct enum_entry, i); 111c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata int st = enum_values_equal(value, entry->value, arguments); 112c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (st < 0) 113c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return NULL; 114c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata else if (st != 0) 115c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return entry->key; 116c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata } 117c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return NULL; 118c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 119c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 120c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatastatic int 121c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataenum_lens_format_cb(struct lens *lens, FILE *stream, 122c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct value *value, struct value_dict *arguments) 123c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 124c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct enum_lens *self = (void *)lens; 125c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 126c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata const char *name = enum_get(self, value, arguments); 127c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata if (name != NULL) 128c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return fprintf(stream, "%s", name); 129c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 130c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return lens_format(&default_lens, stream, value, arguments); 131c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 132c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 133c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 134c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatavoid 135c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatalens_init_enum(struct enum_lens *lens) 136c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 137c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata *lens = (struct enum_lens){ 138c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata { 139c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata .format_cb = enum_lens_format_cb, 140c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata .destroy_cb = enum_lens_destroy_cb, 141c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata }, 142c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata }; 143c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata VECT_INIT(&lens->entries, struct enum_entry); 144c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 145c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 146c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machataint 147c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatalens_enum_add(struct enum_lens *lens, 148c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata const char *key, int own_key, 149c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct value *value, int own_value) 150c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 151c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata struct enum_entry entry = { (char *)key, own_key, value, own_value }; 152c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return VECT_PUSHBACK(&lens->entries, &entry); 153c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 154c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata 155c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatasize_t 156c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machatalens_enum_size(struct enum_lens *lens) 157c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata{ 158c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata return vect_size(&lens->entries); 159c07a26a8d0f86bc4137eb7b7fea8bbf9021275f1Petr Machata} 160