1e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata/*
2e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This file is part of ltrace.
3f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata * Copyright (C) 2013 Petr Machata, Red Hat Inc.
4e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Copyright (C) 2004,2008,2009 Juan Cespedes
5e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata *
6e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This program is free software; you can redistribute it and/or
7e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * modify it under the terms of the GNU General Public License as
8e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * published by the Free Software Foundation; either version 2 of the
9e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * License, or (at your option) any later version.
10e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata *
11e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * This program is distributed in the hope that it will be useful, but
12e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * WITHOUT ANY WARRANTY; without even the implied warranty of
13e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * General Public License for more details.
15e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata *
16e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * You should have received a copy of the GNU General Public License
17e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * along with this program; if not, write to the Free Software
18e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
19e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata * 02110-1301 USA
20e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata */
21e99af270a60891e68d465c4cd97dbe29cd1a05e4Petr Machata
22d914a206a11cc1011a45f00674b1e16988fae77fJuan Cespedes#include <gelf.h>
23f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata#include <stdbool.h>
24f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata
25366c2f46d844f040458df9b7e35fc3b8527ed2d3Petr Machata#include "proc.h"
26f728123bd75a65a6a1536e198c3c30719e494e71Juan Cespedes#include "common.h"
275f8a5e78e9d410b8cb10401e463f9ffc9e062505Petr Machata#include "library.h"
28f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata#include "trace.h"
29d914a206a11cc1011a45f00674b1e16988fae77fJuan Cespedes
30f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan CespedesGElf_Addr
31f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesarch_plt_sym_val(struct ltelf *lte, size_t ndx, GElf_Rela * rela) {
322d45b1a8e26a36a9f85dc49e721c4390ca93dc40Ian Wienand	return lte->plt_addr + (ndx + 1) * 32;
339a2ad351a1c3215dc596ff3e2e3fd4bc24445a6bIan Wienand}
349a2ad351a1c3215dc596ff3e2e3fd4bc24445a6bIan Wienand
35f13505251e6402460f6cc7ec84e0d8ca91607b4fJuan Cespedesvoid *
36929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machatasym2addr(struct process *proc, struct library_symbol *sym)
37929bd57ca202fd2f2e8485ebf65d683e664f67b5Petr Machata{
3876c61f15d7989bf7adffed2e46a44c34a80bd927Paul Gilliam	return sym->enter_addr;
39d914a206a11cc1011a45f00674b1e16988fae77fJuan Cespedes}
40f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata
41f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machataenum plt_status
42f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machataarch_elf_add_plt_entry(struct process *proc, struct ltelf *lte,
43f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata		       const char *a_name, GElf_Rela *rela, size_t ndx,
44f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata		       struct library_symbol **ret)
45f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata{
46f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata#ifdef R_390_IRELATIVE
47f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata	bool irelative = GELF_R_TYPE(rela->r_info) == R_390_IRELATIVE;
48f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata#else
49f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata	bool irelative = false;
50f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata#endif
51f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata
52f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata	if (irelative)
53f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata		return linux_elf_add_plt_entry_irelative(proc, lte, rela,
54f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata							 ndx, ret);
55f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata
56f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata	return PLT_DEFAULT;
57f7864d60f0c8180806ed9b7d8dac26b250bd7120Petr Machata}
58