File: aug_util.c

package info (click to toggle)
openser 1.1.0-9etch1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 9,828 kB
  • ctags: 11,809
  • sloc: ansic: 120,528; sh: 5,249; yacc: 1,716; makefile: 1,261; php: 656; perl: 205; sql: 190
file content (129 lines) | stat: -rw-r--r-- 3,105 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
/*
 * $Id: aug_util.c,v 1.2 2005/07/01 14:52:35 bogdan_iancu Exp $
 *
 * POSTGRES module, portions of this code were templated using
 * the mysql module, thus it's similarity.
 *
 * Copyright (C) 2003 August.Net Services, LLC
 *
 * This file is part of openser, a free SIP server.
 *
 * openser is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version
 *
 * openser is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License 
 * along with this program; if not, write to the Free Software 
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * ---
 *
 * History
 * -------
 * 2003-04-06 initial code written (Greg Fausak/Andy Fullford)
 *
 */
/*
** ________________________________________________________________________
**
**
**                      $RCSfile: aug_util.c,v $
**                     $Revision: 1.2 $
**
**             Last change $Date: 2005/07/01 14:52:35 $
**           Last change $Author: bogdan_iancu $
**                        $State: Exp $
**                       $Locker:  $
**
**               Original author: Andrew Fullford
**
**           Copyright (C) August Associates  1995
**
** ________________________________________________________________________
*/

#include "aug_std.h"
#include <stdlib.h>
#include <stdio.h>
#include <stdarg.h>
#include <string.h>

static char *aug_module_name = 0;

/*
**  May eventually add ``on exit'' function calls.
*/
augExport void aug_exit(int exit_code)
{
	DABNAME("aug_exit");

#if augDAB_DEBUG == augTRUE
	DABTRACE("Exiting with code %d", exit_code);
#endif
	exit(exit_code);
}

augExport void aug_abort_va(char *file, int line, char *fmt, va_list ap)
{
	DABNAME("aug_abort");

#if augDAB_DEBUG == augTRUE
	DAB("ABORT from +%d %s", line, file);
#endif

	fflush(stdout);
	fprintf(stderr, "\r\n\n");
	if(aug_module_name)
		fprintf(stderr, "%s: ", aug_module_name);
	fprintf(stderr, "ABORT: ");
	vfprintf(stderr, fmt, ap);
	fprintf(stderr, " -- from +%d %s\r\n\n", line, file);

	if(DABLEVEL(DAB_TRACE))
	{
		fprintf(stderr, "Program terminating via abort()\r\n\n");
		abort();
	}

	aug_exit(augEXIT_ABORT);
}

augExport void aug_abort(char *file, int line, char *fmt, ...)
{
	va_list ap;

	va_start(ap, fmt);
	aug_abort_va(file, line, fmt, ap);
	va_end(ap);
}

/*
**  WARNING -- don't use DABs below here, aug_debug.c calls this code.
*/
augExport void aug_setmodule(char *name)
{
	char *prog;

	if(!name)
		return;

	if((prog = strrchr(name, '/')) ||
	   (prog = strrchr(name, '\\')))
		prog++;
	else
		prog = name;

	aug_module_name = malloc(strlen(prog) + 1);
	strcpy(aug_module_name, prog);
}

augExport char *aug_module(void)
{
	return (aug_module_name ? aug_module_name : "");
}