7 static char *rcsid_gdb_c = "$Header$";
11 /************************************************************************/
15 /* Global Database Library - main controlling functions and globally
18 /* Author: Noah Mendelsohn
20 /* Copyright: 1986 MIT Project Athena
23 /* In addition to defining the main routines for gdb, this source
24 /* file #includes gdb_lib.h, which does the external definitions
25 /* for all global data used by the library. Everyone else gets
26 /* externs for this data defined by gdb.h.
28 /************************************************************************/
39 extern char *sys_errlist[];
43 int g_inited = FALSE; /* gdb_init has not been */
46 /*----------------------------------------------------------*/
50 /* Initialize the global database facility. Must be
51 /* called before any of the other gdb functions
52 /* are used. Among other things, this function
53 /* sets to ignore signals for writing on broken pipes.
55 /*----------------------------------------------------------*/
61 char hostname[255]; /* name of local host */
62 extern uid_t getuid();
63 int uid; /* Unix user-i.d. number */
64 char *uname; /* string form of i.d. */
66 struct passwd *pw_struct; /* passwd entry comes back */
69 * So we know we've been initialized, and we do it only once
76 * Initialize the system defined types table
81 * Initialize the connection control data structures.
83 gdb_mcons = 0; /* number of connections */
85 for (i=0; i<GDB_MAX_CONNECTIONS; i++) {
86 gdb_cons[i].id = GDB_CON_ID;
87 gdb_cons[i].in.stream_buffer = NULL;
88 gdb_cons[i].in.stream_buffer_length = GDB_STREAM_BUFFER_SIZE;
91 * Initialize the fd maps
95 for (i=0; i<NFDBITS/sizeof(int); i++) {
96 gdb_crfds.fds_bits[i] = 0;
97 gdb_cwfds.fds_bits[i] = 0;
98 gdb_cefds.fds_bits[i] = 0;
102 * Initialize the server/client layer
107 * Ignore the signal generated when writing to a pipe which has been
108 * closed at the other end. gdb_move_data handles this condition
111 (void) signal(SIGPIPE, SIG_IGN);
114 * Make a note of the local host and user name
116 if (gethostname(hostname, sizeof(hostname)-1)!=0)
117 (void) strcpy(hostname, "????");
118 gdb_host = db_alloc(strlen(hostname)+1);
119 (void) strcpy(gdb_host, hostname);
123 pw_struct = getpwuid(uid);
125 if (pw_struct != NULL && pw_struct ->pw_name != NULL &&
126 *pw_struct->pw_name !='\0')
127 uname = pw_struct->pw_name;
130 gdb_uname = db_alloc(strlen(uname)+1);
131 (void) strcpy(gdb_uname, uname);
135 /*----------------------------------------------------------*/
139 /* Make sure gdb has been initialized, blow up if not.
141 /*----------------------------------------------------------*/
147 GDB_GIVEUP("You must call gdb_init before using GDB services.")
150 /*----------------------------------------------------------*/
154 /* Count the number of bits in a word. Adapted from
157 /*----------------------------------------------------------*/
163 register unsigned int x = inp; /* the word to check */
164 register int count; /* the count to return */
166 for (count=0; x !=0; x=x>>1)
173 /*----------------------------------------------------------*/
177 /* Utility routine to conditionally free a null
178 /* terminated string.
180 /*----------------------------------------------------------*/
187 db_free(str, strlen(str)+1);
190 /*----------------------------------------------------------*/
194 /* Called when a fatal error occurs.
196 /*----------------------------------------------------------*/
202 fprintf(gdb_log,"\n\nFATAL GDB ERROR:\n\n\t");
203 fprintf(gdb_log,errormsg);
204 fprintf(gdb_log,"\n\n");
208 /*----------------------------------------------------------*/
212 /* Acts like gdb_perror, but takes its errno from
213 /* the connection. Resets errno as a side effect.
214 /* THIS ROUTINE IS A NO_OP IF connection_status(con)!=CON_STOPPING
216 /*----------------------------------------------------------*/
219 connection_perror(con, msg)
223 if (con == NULL || connection_status(con) != CON_STOPPING)
225 errno = connection_errno(con);
229 /*----------------------------------------------------------*/
233 /* Performs same function as system perror, but does
234 /* it on gdb_log instead of stderr.
236 /*----------------------------------------------------------*/
243 fprintf(gdb_log, "%s: ", msg);
245 fprintf(gdb_log, "%s.\n", sys_errlist[errno]);
247 fprintf(gdb_log, "errno %d is out of range of message table.\n");