mirror of
https://github.com/netwide-assembler/nasm.git
synced 2024-12-09 08:51:18 +08:00
f7b44f6092
* nasm-2.14.xx: (83 commits) NASM 2.14rc16 doc: Update changes preproc: expand_smacro -- Fix nil dereference on error path eval: Eliminate division by zero doc: Update changes opflags: Convert is_class and is_reg_class to helpers preproc: Fix out of range access in expand mmacro doc: Update changes parser: Fix sigsegv on certain equ instruction parsing labels: Make sure nil label is never passed labels: Don't nil dereference if no label provided macho: Add warning message in macho_output() macho/reloc: Fix addr size sensitive conditions macho/reloc: Fix macho_output() to get the offset adjustments by add_reloc() macho/reloc: Fixed offset adjustment in add_reloc() macho/reloc: Allow absolute relocation when forcing a symbol reference macho/reloc: Adjust SUB relocation information macho/reloc: Fixed in handling GOT/GOTLOAD/TLV relocations macho/reloc: Simplified relocation for REL/BRANCH macho/sym: Record initial symbol number always ... Signed-off-by: Cyrill Gorcunov <gorcunov@gmail.com>
223 lines
6.9 KiB
C
223 lines
6.9 KiB
C
/* ----------------------------------------------------------------------- *
|
|
*
|
|
* Copyright 1996-2018 The NASM Authors - All Rights Reserved
|
|
* See the file AUTHORS included with the NASM distribution for
|
|
* the specific copyright holders.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following
|
|
* conditions are met:
|
|
*
|
|
* * Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* * Redistributions in binary form must reproduce the above
|
|
* copyright notice, this list of conditions and the following
|
|
* disclaimer in the documentation and/or other materials provided
|
|
* with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
|
|
* CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
|
|
* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
|
* CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
|
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
|
|
* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
|
|
* EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* ----------------------------------------------------------------------- */
|
|
|
|
/*
|
|
* error.c - error message handling routines for the assembler
|
|
*/
|
|
|
|
#include "compiler.h"
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include "nasmlib.h"
|
|
#include "error.h"
|
|
|
|
/*
|
|
* Description of the suppressible warnings for the command line and
|
|
* the [warning] directive.
|
|
*/
|
|
const struct warning warnings[ERR_WARN_ALL+1] = {
|
|
{"other", "any warning not specifially mentioned below", true},
|
|
{"macro-params", "macro calls with wrong parameter count", true},
|
|
{"macro-selfref", "cyclic macro references", false},
|
|
{"macro-defaults", "macros with more default than optional parameters", true},
|
|
{"orphan-labels", "labels alone on lines without trailing `:'", true},
|
|
{"number-overflow", "numeric constant does not fit", true},
|
|
{"gnu-elf-extensions", "using 8- or 16-bit relocation in ELF32, a GNU extension", false},
|
|
{"float-overflow", "floating point overflow", true},
|
|
{"float-denorm", "floating point denormal", false},
|
|
{"float-underflow", "floating point underflow", false},
|
|
{"float-toolong", "too many digits in floating-point number", true},
|
|
{"user", "%warning directives", true},
|
|
{"lock", "lock prefix on unlockable instructions", true},
|
|
{"hle", "invalid hle prefixes", true},
|
|
{"bnd", "invalid bnd prefixes", true},
|
|
{"zext-reloc", "relocation zero-extended to match output format", true},
|
|
{"ptr", "non-NASM keyword used in other assemblers", true},
|
|
{"bad-pragma", "empty or malformed %pragma", false},
|
|
{"unknown-pragma", "unknown %pragma facility or directive", false},
|
|
{"not-my-pragma", "%pragma not applicable to this compilation", false},
|
|
{"unknown-warning", "unknown warning in -W/-w or warning directive", false},
|
|
{"negative-rep", "regative %rep count", true},
|
|
{"phase", "phase error during stabilization", false},
|
|
|
|
/* THIS ENTRY MUST COME LAST */
|
|
{"all", "all possible warnings", false}
|
|
};
|
|
|
|
uint8_t warning_state[ERR_WARN_ALL];/* Current state */
|
|
uint8_t warning_state_init[ERR_WARN_ALL]; /* Command-line state, for reset */
|
|
|
|
vefunc nasm_verror; /* Global error handling function */
|
|
|
|
void nasm_error(int severity, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
nasm_verror(severity, fmt, ap);
|
|
va_end(ap);
|
|
}
|
|
|
|
fatal_func nasm_fatal(const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
nasm_verror(ERR_FATAL, fmt, ap);
|
|
abort(); /* We should never get here */
|
|
}
|
|
|
|
fatal_func nasm_fatal_fl(int flags, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
nasm_verror(flags | ERR_FATAL, fmt, ap);
|
|
abort(); /* We should never get here */
|
|
}
|
|
|
|
fatal_func nasm_panic(const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
nasm_verror(ERR_PANIC, fmt, ap);
|
|
abort(); /* We should never get here */
|
|
}
|
|
|
|
fatal_func nasm_panic_fl(int flags, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
nasm_verror(flags | ERR_PANIC, fmt, ap);
|
|
abort(); /* We should never get here */
|
|
}
|
|
|
|
fatal_func nasm_panic_from_macro(const char *file, int line)
|
|
{
|
|
nasm_panic("internal error at %s:%d\n", file, line);
|
|
}
|
|
|
|
fatal_func nasm_assert_failed(const char *file, int line, const char *msg)
|
|
{
|
|
nasm_panic("assertion %s failed at %s:%d", msg, file, line);
|
|
}
|
|
|
|
/*
|
|
* This is called when processing a -w or -W option, or a warning directive.
|
|
* Returns true if if the action was successful.
|
|
*/
|
|
bool set_warning_status(const char *value)
|
|
{
|
|
enum warn_action { WID_OFF, WID_ON, WID_RESET };
|
|
enum warn_action action;
|
|
uint8_t mask;
|
|
int i;
|
|
bool ok = false;
|
|
|
|
value = nasm_skip_spaces(value);
|
|
switch (*value) {
|
|
case '-':
|
|
action = WID_OFF;
|
|
value++;
|
|
break;
|
|
case '+':
|
|
action = WID_ON;
|
|
value++;
|
|
break;
|
|
case '*':
|
|
action = WID_RESET;
|
|
value++;
|
|
break;
|
|
case 'N':
|
|
case 'n':
|
|
if (!nasm_strnicmp(value, "no-", 3)) {
|
|
action = WID_OFF;
|
|
value += 3;
|
|
break;
|
|
} else if (!nasm_stricmp(value, "none")) {
|
|
action = WID_OFF;
|
|
value = NULL;
|
|
break;
|
|
}
|
|
/* else fall through */
|
|
default:
|
|
action = WID_ON;
|
|
break;
|
|
}
|
|
|
|
mask = WARN_ST_ENABLED;
|
|
|
|
if (value && !nasm_strnicmp(value, "error", 5)) {
|
|
switch (value[5]) {
|
|
case '=':
|
|
mask = WARN_ST_ERROR;
|
|
value += 6;
|
|
break;
|
|
case '\0':
|
|
mask = WARN_ST_ERROR;
|
|
value = NULL;
|
|
break;
|
|
default:
|
|
/* Just an accidental prefix? */
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (value && !nasm_stricmp(value, "all"))
|
|
value = NULL;
|
|
|
|
/* This is inefficient, but it shouldn't matter... */
|
|
for (i = 0; i < ERR_WARN_ALL; i++) {
|
|
if (!value || !nasm_stricmp(value, warnings[i].name)) {
|
|
ok = true; /* At least one action taken */
|
|
switch (action) {
|
|
case WID_OFF:
|
|
warning_state[i] &= ~mask;
|
|
break;
|
|
case WID_ON:
|
|
warning_state[i] |= mask;
|
|
break;
|
|
case WID_RESET:
|
|
warning_state[i] &= ~mask;
|
|
warning_state[i] |= warning_state_init[i] & mask;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
return ok;
|
|
}
|