1260684Skaiw/*- 2260684Skaiw * Copyright (c) 2010 Joseph Koshy 3260684Skaiw * All rights reserved. 4260684Skaiw * 5260684Skaiw * Redistribution and use in source and binary forms, with or without 6260684Skaiw * modification, are permitted provided that the following conditions 7260684Skaiw * are met: 8260684Skaiw * 1. Redistributions of source code must retain the above copyright 9260684Skaiw * notice, this list of conditions and the following disclaimer. 10260684Skaiw * 2. Redistributions in binary form must reproduce the above copyright 11260684Skaiw * notice, this list of conditions and the following disclaimer in the 12260684Skaiw * documentation and/or other materials provided with the distribution. 13260684Skaiw * 14260684Skaiw * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15260684Skaiw * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16260684Skaiw * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17260684Skaiw * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18260684Skaiw * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19260684Skaiw * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20260684Skaiw * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21260684Skaiw * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22260684Skaiw * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23260684Skaiw * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24260684Skaiw * SUCH DAMAGE. 25260684Skaiw */ 26260684Skaiw 27260684Skaiw#include "_libdwarf.h" 28260684Skaiw 29260684SkaiwELFTC_VCSID("$Id: dwarf_seterror.c 2075 2011-10-27 03:47:28Z jkoshy $"); 30260684Skaiw 31260684Skaiw#define _SET_FIELD(R, F, V) \ 32260684Skaiw do { \ 33260684Skaiw (R) = (F); \ 34260684Skaiw (F) = (V); \ 35260684Skaiw } while (0) 36260684Skaiw 37260684Skaiw#define SET_FIELD(D, R, F) \ 38260684Skaiw do { \ 39260684Skaiw if (D) \ 40260684Skaiw _SET_FIELD(R, (D)->dbg_##F, F); \ 41260684Skaiw else \ 42260684Skaiw _SET_FIELD(R, _libdwarf.F, F); \ 43260684Skaiw } while (0) 44260684Skaiw 45260684SkaiwDwarf_Handler 46260684Skaiwdwarf_seterrhand(Dwarf_Debug dbg, Dwarf_Handler errhand) 47260684Skaiw{ 48260684Skaiw Dwarf_Handler oldhandler; 49260684Skaiw 50260684Skaiw SET_FIELD(dbg, oldhandler, errhand); 51260684Skaiw 52260684Skaiw return (oldhandler); 53260684Skaiw} 54260684Skaiw 55260684SkaiwDwarf_Ptr 56260684Skaiwdwarf_seterrarg(Dwarf_Debug dbg, Dwarf_Ptr errarg) 57260684Skaiw{ 58260684Skaiw Dwarf_Ptr oldarg; 59260684Skaiw 60260684Skaiw SET_FIELD(dbg, oldarg, errarg); 61260684Skaiw 62260684Skaiw return (oldarg); 63260684Skaiw} 64