GLIBC_2.1.3.
1999-11-13 Roland McGrath <roland@baalperazim.frob.com>
+1999-11-13 Roland McGrath <roland@baalperazim.frob.com>
+
+ * Versions.def (libc): Move GLIBC_2.2 dependency from GLIBC_2.1.1 to
+ GLIBC_2.1.3.
+
1999-11-13 Roland McGrath <roland@baalperazim.frob.com>
* hurd/Versions (GLIBC_2.1.3): Define, adding directory_name_split and
GLIBC_2.0
GLIBC_2.1 GLIBC_2.0
GLIBC_2.1.1 GLIBC_2.1
- GLIBC_2.2 GLIBC_2.1.1
+ GLIBC_2.1.2 GLIBC_2.1.1
+ GLIBC_2.1.3 GLIBC_2.1.2
+ GLIBC_2.2 GLIBC_2.1.3
}
libcrypt {
GLIBC_2.0
# s*
seteuids;
}
+ GLIBC_2.1.3 {
+ # d*
+ directory_name_split;
+
+ # h*
+ hurd_directory_name_split;
+ }
}
extern file_t __file_name_split (const char *file, char **name);
extern file_t file_name_split (const char *file, char **name);
+/* Split DIRECTORY into a parent directory and a name within the directory.
+ This is the same as file_name_split, but ignores trailing slashes. */
+
+extern file_t __directory_name_split (const char *file, char **name);
+extern file_t directory_name_split (const char *file, char **name);
+
/* Open a port to FILE with the given FLAGS and MODE (see <fcntl.h>).
The file lookup uses the current root and working directory.
Returns a port to the file if successful; otherwise sets `errno'
}
weak_alias (__hurd_file_name_split, hurd_file_name_split)
+/* This is the same as hurd_file_name_split, except that it ignores
+ trailing slashes (so *NAME is never ""). */
+error_t
+__hurd_directory_name_split (error_t (*use_init_port)
+ (int which, error_t (*operate) (file_t)),
+ file_t (*get_dtable_port) (int fd),
+ error_t (*lookup)
+ (file_t dir, char *name, int flags, mode_t mode,
+ retry_type *do_retry, string_t retry_name,
+ mach_port_t *result),
+ const char *file_name,
+ file_t *dir, char **name)
+{
+ error_t addref (file_t crdir)
+ {
+ *dir = crdir;
+ return __mach_port_mod_refs (__mach_task_self (),
+ crdir, MACH_PORT_RIGHT_SEND, +1);
+ }
+
+ const char *lastslash = strrchr (file_name, '/');
+
+ if (lastslash != NULL && lastslash[1] == '\0')
+ {
+ /* Trailing slash doesn't count. Look back further. */
+
+ /* Back up over all trailing slashes. */
+ while (lastslash > file_name && *lastslash == '/')
+ --lastslash;
+
+ /* Find the last one earlier in the string, before the trailing ones. */
+#if __GLIBC__ > 2 || __GLIBC_MINOR__ >= 2
+ lastslash = __memrchr (file_name, '/', lastslash - file_name);
+#else
+ /* Keep backing up, looking for a slash. */
+ do
+ if (lastslash == file_name)
+ {
+ /* Hit the start with no slash. */
+ lastslash = NULL;
+ break;
+ }
+ while (*lastslash-- != '/');
+#endif
+ }
+
+ if (lastslash != NULL)
+ {
+ if (lastslash == file_name)
+ {
+ /* "/foobar" => crdir + "foobar". */
+ *name = (char *) file_name + 1;
+ return (*use_init_port) (INIT_PORT_CRDIR, &addref);
+ }
+ else
+ {
+ /* "/dir1/dir2/.../file". */
+ char dirname[lastslash - file_name + 1];
+ memcpy (dirname, file_name, lastslash - file_name);
+ dirname[lastslash - file_name] = '\0';
+ *name = (char *) lastslash + 1;
+ return
+ __hurd_file_name_lookup (use_init_port, get_dtable_port, lookup,
+ dirname, 0, 0, dir);
+ }
+ }
+ else
+ {
+ /* "foobar" => cwdir + "foobar". */
+ *name = (char *) file_name;
+ return (*use_init_port) (INIT_PORT_CWDIR, &addref);
+ }
+}
+weak_alias (__hurd_directory_name_split, hurd_directory_name_split)
+
\f
file_t
__file_name_lookup (const char *file_name, int flags, mode_t mode)
}
weak_alias (__file_name_split, file_name_split)
+file_t
+__directory_name_split (const char *directory_name, char **name)
+{
+ error_t err;
+ file_t result;
+
+ err = __hurd_directory_name_split (&_hurd_ports_use, &__getdport, 0,
+ directory_name, &result, name);
+
+ return err ? (__hurd_fail (err), MACH_PORT_NULL) : result;
+}
+weak_alias (__directory_name_split, directory_name_split)
+
file_t
__file_name_lookup_under (file_t startdir,
/* Report on what a thread in our task is waiting for.
- Copyright (C) 1996, 1997 Free Software Foundation, Inc.
+ Copyright (C) 1996, 1997, 1999 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
#include "thread_state.h"
#include "intr-msg.h"
-static void
-describe_number (string_t description, const char *flavor, unsigned long int i)
+static char *
+describe_number (string_t description, const char *flavor, long int i)
{
unsigned long int j;
- char *p = __stpcpy (description, flavor);
+ char *p = flavor ? description : __stpcpy (description, flavor);
+ char *end;
+
+ /* Handle sign. */
+ if (i < 0)
+ {
+ i = -i;
+ *p++ = '-';
+ }
/* Allocate space for the number at the end of DESCRIPTION. */
for (j = i; j >= 10; j /= 10)
p++;
- p[1] = '\0';
+ end = p + 1;
+ *end = '\0';
do
{
*p-- = '0' + i % 10;
i /= 10;
} while (i != 0);
- assert (*p == '#');
+
+ return end;
}
-static void
+static char *
describe_port (string_t description, mach_port_t port)
{
int i;
+ if (port == MACH_PORT_NULL)
+ return __stpcpy (description, "(null)");
+ if (port == MACH_PORT_DEAD)
+ return __stpcpy (description, "(dead)");
+
if (port == __mach_task_self ())
- {
- strcpy (description, "task-self");
- return;
- }
+ return __stpcpy (description, "task-self");
for (i = 0; i < _hurd_nports; ++i)
if (port == _hurd_ports[i].port)
- {
- describe_number (description, "init#", i);
- return;
- }
+ return describe_number (description, "init#", i);
if (_hurd_init_dtable)
{
for (i = 0; i < _hurd_init_dtablesize; ++i)
if (port == _hurd_init_dtable[i])
- {
- describe_number (description, "fd#", i);
- return;
- }
+ return describe_number (description, "fd#", i);
}
else if (_hurd_dtable)
{
if (_hurd_dtable[i] == NULL)
continue;
else if (port == _hurd_dtable[i]->port.port)
- {
- describe_number (description, "fd#", i);
- return;
- }
+ return describe_number (description, "fd#", i);
else if (port == _hurd_dtable[i]->ctty.port)
- {
- describe_number (description, "bgfd#", i);
- return;
- }
+ return describe_number (description, "bgfd#", i);
}
- describe_number (description, "port#", port);
+ return describe_number (description, "port#", port);
}
assert (count == MACHINE_THREAD_STATE_COUNT);
if (SYSCALL_EXAMINE (&state, msgid))
{
+ mach_port_t send_port, rcv_port;
+ mach_msg_option_t option;
+ mach_msg_timeout_t timeout;
+
/* Blocked in a system call. */
- if (*msgid == -25)
- /* mach_msg system call. Examine its parameters. */
- describe_port (description, MSG_EXAMINE (&state, msgid));
- else
- strcpy (description, "kernel");
+ if (*msgid == -25
+ /* mach_msg system call. Examine its parameters. */
+ && MSG_EXAMINE (&state, msgid, &send_port, &rcv_port,
+ &option, &timeout) == 0)
+ {
+ char *p;
+ if (send_port != MACH_PORT_NULL && *msgid != 0)
+ {
+ /* For the normal case of RPCs, we consider the
+ destination port to be the interesting thing
+ whether we are in fact sending or receiving at the
+ moment. That tells us who we are waiting for the
+ reply from. */
+ if (send_port == ss->intr_port)
+ {
+ /* This is a Hurd interruptible RPC.
+ Mark it by surrounding the port description
+ string with [...] brackets. */
+ description[0] = '[';
+ p = describe_port (description + 1, send_port);
+ *p++ = ']';
+ *p = '\0';
+ }
+ else
+ (void) describe_port (description, send_port);
+ }
+ else if (rcv_port != MACH_PORT_NULL)
+ {
+ /* This system call had no send port, but had a
+ receive port. The msgid we extracted is then just
+ some garbage or perhaps the msgid of the last
+ message this thread received, but it's not a
+ helpful thing to return. */
+ strcpy (describe_port (description, rcv_port), ":rcv");
+ *msgid = 0;
+ }
+ else if ((option & (MACH_RCV_MSG|MACH_RCV_TIMEOUT))
+ == (MACH_RCV_MSG|MACH_RCV_TIMEOUT))
+ {
+ /* A receive with no valid port can be used for a
+ pure timeout. Report the timeout value (counted
+ in milliseconds); note this is the original total
+ time, not the time remaining. */
+ strcpy (describe_number (description, 0, timeout), "ms");
+ *msgid = 0;
+ }
+ else
+ {
+ strcpy (description, "mach_msg");
+ *msgid = 0;
+ }
+ }
+ else /* Some other system call. */
+ {
+ (void) describe_number (description, "syscall#", *msgid);
+ *msgid = 0;
+ }
}
else
description[0] = '\0';
};
-static inline mach_port_t
-MSG_EXAMINE (struct i386_thread_state *state, int *msgid)
+static inline int
+MSG_EXAMINE (struct i386_thread_state *state, int *msgid,
+ mach_port_t *rcv_name, mach_port_t *send_name,
+ mach_msg_option_t *option, mach_msg_timeout_t *timeout)
{
const struct mach_msg_trap_args *args = (const void *) state->uesp;
mach_msg_header_t *msg;
- mach_port_t send_port;
if (_hurdsig_catch_memory_fault (args))
- return MACH_PORT_NULL;
+ return -1;
msg = args->msg;
+ *option = args->option;
+ *timeout = args->timeout;
+ *rcv_name = args->rcv_name;
_hurdsig_end_catch_fault ();
- if (_hurdsig_catch_memory_fault (msg))
- return MACH_PORT_NULL;
- send_port = msg->msgh_remote_port;
- *msgid = msg->msgh_id;
- _hurdsig_end_catch_fault ();
+ if (msg == 0)
+ {
+ *send_name = MACH_PORT_NULL;
+ *msgid = 0;
+ }
+ else
+ {
+ if (_hurdsig_catch_memory_fault (msg))
+ return -1;
+ *send_name = msg->msgh_remote_port;
+ *msgid = msg->msgh_id;
+ _hurdsig_end_catch_fault ();
+ }
- return send_port;
+ return 0;
}
-/* Copyright (C) 1991, 92, 93, 94, 96, 97 Free Software Foundation, Inc.
+/* Copyright (C) 1991,92,93,94,96,97,99 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
file_t olddir, newdir;
const char *oldname, *newname;
- olddir = __file_name_split (old, (char **) &oldname);
+ olddir = __directory_name_split (old, (char **) &oldname);
if (olddir == MACH_PORT_NULL)
return -1;
- newdir = __file_name_split (new, (char **) &newname);
+ newdir = __directory_name_split (new, (char **) &newname);
if (newdir == MACH_PORT_NULL)
{
__mach_port_deallocate (__mach_task_self (), olddir);
-/* Copyright (C) 1991, 92, 93, 94, 95, 97 Free Software Foundation, Inc.
+/* Copyright (C) 1991,92,93,94,95,97,99 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
{
error_t err;
const char *name;
- file_t parent = __file_name_split (file_name, (char **) &name);
+ file_t parent = __directory_name_split (file_name, (char **) &name);
if (parent == MACH_PORT_NULL)
return -1;
err = __dir_rmdir (parent, name);