| /****************************************************************************** | |
| * Copyright (c) 2005 The Regents of the University of California. | |
| * This material was produced under U.S. Government contract W-7405-ENG-36 | |
| * for Los Alamos National Laboratory, which is operated by the University | |
| * of California for the U.S. Department of Energy. The U.S. Government has | |
| * rights to use, reproduce, and distribute this software. NEITHER THE | |
| * GOVERNMENT NOR THE UNIVERSITY MAKES ANY WARRANTY, EXPRESS OR IMPLIED, OR | |
| * ASSUMES ANY LIABILITY FOR THE USE OF THIS SOFTWARE. If software is modified | |
| * to produce derivative works, such modified software should be clearly | |
| * marked, so as not to confuse it with the version available from LANL. | |
| * | |
| * Additionally, this program and the accompanying materials | |
| * are made available under the terms of the Eclipse Public License v1.0 | |
| * which accompanies this distribution, and is available at | |
| * http://www.eclipse.org/legal/epl-v10.html | |
| * | |
| * LA-CC 04-115 | |
| ******************************************************************************/ | |
| #ifdef __gnu_linux__ | |
| #define _GNU_SOURCE | |
| #endif /* __gnu_linux__ */ | |
| #include <stdio.h> | |
| #include <stdlib.h> | |
| #include <string.h> | |
| #include "dbg.h" | |
| static int dbg_errno = DBGRES_OK; | |
| static char * dbg_errstr = NULL; | |
| static char * dbg_error_tab[] = | |
| { | |
| /* 0 */ "NO_ERROR", | |
| /* DBGERR_NOTIMP */ "Protocol not implemented", | |
| /* DBGERR_PROXY_TERM */ "Proxy connection unexpectedly terminated", | |
| /* DBGERR_PROXY_PROTO */ "Bad message received by proxy", | |
| /* DBGERR_DEBUGGER */ "Debugger error: %s", | |
| /* DBGERR_NOBACKEND */ "Backend debugger executable \"%s\" not found", | |
| /* DBGERR_INPROGRESS */ "Callback in progress", | |
| /* DBGERR_CBCREATE */ "No server to register callback", | |
| /* DBGERR_NOSESSION */ "Must start session first", | |
| /* DBGERR_SESSION */ "Session already established", | |
| /* DBGERR_NOLINE */ "No line %s in file ", | |
| /* DBGERR_NOFUNC */ "Function \"%s\" not defined", | |
| /* DBGERR_NOFILE */ "No source file named \"%s\"", | |
| /* DBGERR_NOBP */ "No breakpoint number %s", | |
| /* DBGERR_NOSYM */ "No symbol \"%s\" in current context", | |
| /* DBGERR_NOMEM */ "Can't access memory", | |
| /* DBGERR_CANTRUN */ "Can't run the program", | |
| /* DBGERR_INVOKE */ "Could not invoke the program", | |
| /* DBGERR_ISRUNNING */ "Program is running", | |
| /* DBGERR_NOTRUN */ "The program is not being run", | |
| /* DBGERR_FIRSTFRAME */ "Initial frame selected; you cannot go up", | |
| /* DBGERR_LASTFRAME */ "Bottom (i.e., innermost) frame selected; you cannot go down", | |
| /* DBGERR_BADBPARG */ "Argument required (breakpoint number)", | |
| /* DBGERR_REGEX */ "Error in regular expression", | |
| /* DBGERR_NOSTACK */ "No stack.", | |
| /* DBGERR_OUTOFRANGE */ "Line number %s is out of range for ", | |
| /* DBGERR_NOFILEDIR */ "%s: No such file or directory", | |
| /* DBGERR_NOSYMS */ "No debugging symbols", | |
| /* DBGERR_TEMP */ "Could not create temporary file", | |
| /* DBGERR_PIPE */ "pipe: %s", | |
| /* DBGERR_FORK */ "fork: %s", | |
| /* DBGERR_SYSTEM */ "system error: %s", | |
| /* DBGERR_NOTEXEC */ "%s: not in executable format", | |
| /* DBGERR_CHDIR */ "%s", | |
| /* DBGERR_SOURCE */ "Source file is more recent than executable", | |
| /* DBGERR_SETVAR */ "Can't set variable.", | |
| /* DBGERR_PROCSET */ "Invalid process set", | |
| /* DBGERR_UNKNOWN */ "Unknown error: \"%s\"", | |
| /* DBGERR_UNKNOWN_TYPE */ "Unknown type: \"%s\"", | |
| /* DBGERR_UNKNOWN_VARIABLE */"Unknown variable: \"%s\"" | |
| }; | |
| /* | |
| * Error handling | |
| */ | |
| void | |
| DbgSetError(int errnum, char *msg) | |
| { | |
| dbg_errno = errnum; | |
| if (dbg_errstr != NULL) { | |
| free(dbg_errstr); | |
| dbg_errstr = NULL; | |
| } | |
| if (dbg_errno >= sizeof(dbg_error_tab)/sizeof(char *)) { | |
| if (msg != NULL) { | |
| dbg_errstr = strdup(msg); | |
| } else { | |
| asprintf(&dbg_errstr, "Error %d occurred.", dbg_errno); | |
| } | |
| } else { | |
| if (msg == NULL) | |
| msg = "<null>"; | |
| asprintf(&dbg_errstr, dbg_error_tab[dbg_errno], msg); | |
| } | |
| } | |
| int | |
| DbgGetError(void) | |
| { | |
| return dbg_errno; | |
| } | |
| char * | |
| DbgGetErrorStr(void) | |
| { | |
| if (dbg_errstr == NULL) | |
| return ""; | |
| return dbg_errstr; | |
| } |