about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog37
-rw-r--r--Rules3
-rw-r--r--gmon/Makefile2
-rw-r--r--gmon/gmon.c23
-rw-r--r--hurd/hurdinit.c5
-rw-r--r--mach/Machrules4
-rw-r--r--sysdeps/generic/prof-freq.c59
-rw-r--r--sysdeps/mach/hurd/i386/init-first.c7
-rw-r--r--sysdeps/mach/hurd/prof-freq.c2
-rw-r--r--sysdeps/mach/hurd/profil.c12
-rw-r--r--sysdeps/mach/hurd/sendto.c13
11 files changed, 126 insertions, 41 deletions
diff --git a/ChangeLog b/ChangeLog
index 086524d670..5169639b0e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,38 @@
+Thu Sep  5 13:18:25 1996  Thomas Bushnell, n/BSG  <thomas@gnu.ai.mit.edu>
+
+	* sysdeps/mach/hurd/i386/init-first.c (__libc_argc, __libc_argv):
+	New variables.
+	(init1): Initialize them.
+	* hurd/hurdinit.c (_hurd_setproc): Now that happens to be
+	available, pass __libc_argv in call to __proc_set_arg_locations.
+
+	* gmon/gmon.c (write_hist): Call __profile_frequency instead of
+	hertz. 
+	(hertz): Delete function.
+	* gmon/Makefile (routines): Add `prof-freq'.
+	* sysdeps/generic/prof-freq.c: New file.
+	* sysdeps/mach/hurd/prof-freq.c: New (stubby) file.
+	* sysdeps/mach/hurd/profil.c (profile_tick): New variable.
+	(update_waiter): Store frequency in profile_tick.
+	(__profile_frequency): New function.
+
+	* sysdeps/mach/hurd/sendto.c (sendto): Use prototype definition
+	syntax.
+
+	* Rules (generated): Restore reference to $(generated).
+
+	* mach/Machrules (mig.uh, mig.__h): Don't include $(user-MIGFLAGS)
+	here. 
+
+ 	* malloc/free.c (free): __lib_malloc_lock -> __libc_malloc_lock.
+	
+	* malloc/free.c: Provide extern decl of __libc_malloc_lock.
+	* malloc/realloc.c: Likewise.
+	* malloc/malloc-find.c: Likewise.
+	* malloc/malloc-size.c: Likewise.
+	* malloc/malloc-walk.c: Likewise.
+	* malloc/memalign.c: Likewise.
+
 Thu Sep  5 03:20:42 1996  Ulrich Drepper  <drepper@cygnus.com>
 
 	Change configuration and Makefiles to allow add-ons to have a
@@ -276,7 +311,7 @@ Thu Aug 29 12:00:30 1996  Thomas Bushnell, n/BSG  <thomas@gnu.ai.mit.edu>
  	spelling error of _hurd_itimerval.
 
 	* mach/Makefile (MIGFLAGS-mach/mach4): Define variable.
-  	mach/Machrules (mig.uh, mig.__h): Include $(user-MIGFLAGS) and
+  	* mach/Machrules (mig.uh, mig.__h): Include $(user-MIGFLAGS) and
  	$(MIGFLAGS-$*) here too, as well as in the code-generating MiG calls. 
 	
 	* hurd/hurdinline.c: Include "hurd.h" for function definitions too. 
diff --git a/Rules b/Rules
index 507ec45528..8984967947 100644
--- a/Rules
+++ b/Rules
@@ -136,7 +136,8 @@ subdir_dist: dist
 
 # Convenient target to update all the generated source files.
 .PHONY: generated
-generated: $(addprefix $(common-objpfx),$(common-generated))
+generated: $(addprefix $(common-objpfx),$(common-generated)) \
+	$(addprefix $(objpfx),$(generated))
 
 ifndef libc.so-version
 # Undefine this because it can't work when we libc.so is unversioned.
diff --git a/gmon/Makefile b/gmon/Makefile
index adf6c92c1b..eff18ee029 100644
--- a/gmon/Makefile
+++ b/gmon/Makefile
@@ -23,7 +23,7 @@ subdir	:= gmon
 
 headers	:= sys/gmon.h sys/gmon_out.h
 distribute := machine-gmon.h profil-counter.h
-routines := gmon mcount profil bb_init_func bb_exit_func
+routines := gmon mcount profil bb_init_func bb_exit_func prof-freq
 
 include ../Rules
 
diff --git a/gmon/gmon.c b/gmon/gmon.c
index a356c4cc47..a450d11365 100644
--- a/gmon/gmon.c
+++ b/gmon/gmon.c
@@ -58,27 +58,6 @@ static int	s_scale;
 #define ERR(s) write(2, s, sizeof(s) - 1)
 
 /*
- * Discover the tick frequency of the machine if something goes wrong,
- * we return 0, an impossible hertz.
- */
-static int
-DEFUN_VOID(hertz)
-{
-  struct itimerval tim;
-
-  tim.it_interval.tv_sec = 0;
-  tim.it_interval.tv_usec = 1;
-  tim.it_value.tv_sec = 0;
-  tim.it_value.tv_usec = 0;
-  setitimer(ITIMER_REAL, &tim, 0);
-  setitimer(ITIMER_REAL, 0, &tim);
-  if (tim.it_interval.tv_usec < 2)
-    return 0;
-  return (1000000 / tim.it_interval.tv_usec);
-}
-
-
-/*
  * Control profiling
  *	profiling is what mcount checks to see if
  *	all the data structures are ready.
@@ -183,7 +162,7 @@ DEFUN(write_hist, (fd), int fd)
   if (_gmonparam.kcountsize > 0)
     {
       size = _gmonparam.kcountsize / sizeof(HISTCOUNTER);
-      rate = hertz();
+      rate = __profile_frequency();
       bcopy(&_gmonparam.lowpc, &thdr.low_pc, sizeof(thdr.low_pc));
       bcopy(&_gmonparam.highpc, &thdr.high_pc, sizeof(thdr.high_pc));
       bcopy(&size, &thdr.hist_size, sizeof(thdr.hist_size));
diff --git a/hurd/hurdinit.c b/hurd/hurdinit.c
index 7d946b8bff..df10b5d955 100644
--- a/hurd/hurdinit.c
+++ b/hurd/hurdinit.c
@@ -165,6 +165,7 @@ _hurd_setproc (process_t procserver)
 {
   error_t err;
   mach_port_t oldmsg;
+  extern char **__libc_argv;
 
   /* Give the proc server our message port.  */
   if (err = __proc_setmsgport (procserver, _hurd_msgport, &oldmsg))
@@ -175,8 +176,8 @@ _hurd_setproc (process_t procserver)
 
   /* Tell the proc server where our args and environment are.  */
   if (err = __proc_set_arg_locations (procserver,
-				      /* We don't know the ARGV location.  */
-				      (vm_address_t) 0,
+				      _hide_arguments ? 0 :
+				      (vm_address_t) __libc_argv,
 				      _hide_environment ? 0 :
 				      (vm_address_t) __environ))
     return err;
diff --git a/mach/Machrules b/mach/Machrules
index 2cb3158bbd..47b74aa7b5 100644
--- a/mach/Machrules
+++ b/mach/Machrules
@@ -149,14 +149,14 @@ $(objpfx)%.uh:; $(mig.uh)
 define mig.uh
 $(make-target-directory)
 $(include-%.defs) | \
-$(MIG) - /dev/null $(MIGFLAGS) $(user-MIGFLAGS) $(MIGFLAGS-$*) \
+$(MIG) - /dev/null $(MIGFLAGS) $(MIGFLAGS-$*) \
        -header $@ -server /dev/null -user /dev/null
 endef
 $(objpfx)%.__h:; $(mig.__h)
 define mig.__h
 $(make-target-directory)
 $(include-%.defs) | \
-$(MIG) - /dev/null $(MIGFLAGS) $(user-MIGFLAGS) $(MIGFLAGS-$*) -prefix __ \
+$(MIG) - /dev/null $(MIGFLAGS) $(MIGFLAGS-$*) -prefix __ \
        -header $@ -server /dev/null -user /dev/null
 endef
 
diff --git a/sysdeps/generic/prof-freq.c b/sysdeps/generic/prof-freq.c
new file mode 100644
index 0000000000..4e952e781d
--- /dev/null
+++ b/sysdeps/generic/prof-freq.c
@@ -0,0 +1,59 @@
+/* Return frequency of ticks reported by profil.  Generic version. */
+/*-
+ * Copyright (c) 1983, 1992, 1993
+ *	The Regents of the University of California.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. 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.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *	This product includes software developed by the University of
+ *	California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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.
+ */
+
+
+#include <sys/types.h>
+#include <sys/time.h>
+
+int
+__profile_frequency ()
+{
+  /*
+   * Discover the tick frequency of the machine if something goes wrong,
+   * we return 0, an impossible hertz.
+   */
+  struct itimerval tim;
+
+  tim.it_interval.tv_sec = 0;
+  tim.it_interval.tv_usec = 1;
+  tim.it_value.tv_sec = 0;
+  tim.it_value.tv_usec = 0;
+  setitimer(ITIMER_REAL, &tim, 0);
+  setitimer(ITIMER_REAL, 0, &tim);
+  if (tim.it_interval.tv_usec < 2)
+    return 0;
+  return (1000000 / tim.it_interval.tv_usec);
+}
+
+
diff --git a/sysdeps/mach/hurd/i386/init-first.c b/sysdeps/mach/hurd/i386/init-first.c
index d095580cfd..5203b4c146 100644
--- a/sysdeps/mach/hurd/i386/init-first.c
+++ b/sysdeps/mach/hurd/i386/init-first.c
@@ -31,15 +31,16 @@ extern void __libc_global_ctors (void);
 
 int __libc_multiple_libcs = 1;
 
+int __libc_argc;
+char **__libc_argv;
+
 void *(*_cthread_init_routine) (void); /* Returns new SP to use.  */
 void (*_cthread_exit_routine) (int status) __attribute__ ((__noreturn__));
 
-
 /* Things that want to be run before _hurd_init or much anything else.
    Importantly, these are called before anything tries to use malloc.  */
 DEFINE_HOOK (_hurd_preinit_hook, (void));
 
-
 static void
 init1 (int argc, char *arg0, ...)
 {
@@ -47,6 +48,8 @@ init1 (int argc, char *arg0, ...)
   char **envp = &argv[argc + 1];
   struct hurd_startup_data *d;
 
+  __libc_argc = argc;
+  __libc_argv = argv;
   __environ = envp;
   while (*envp)
     ++envp;
diff --git a/sysdeps/mach/hurd/prof-freq.c b/sysdeps/mach/hurd/prof-freq.c
new file mode 100644
index 0000000000..a3707033a6
--- /dev/null
+++ b/sysdeps/mach/hurd/prof-freq.c
@@ -0,0 +1,2 @@
+/* __profile_frequency is in sysdeps/mach/hurd/profil.c.  This file
+is here as a place-holder to prevent the use of sysdeps/generic/prof-freq.c. */
diff --git a/sysdeps/mach/hurd/profil.c b/sysdeps/mach/hurd/profil.c
index 431982e498..41c7c4b956 100644
--- a/sysdeps/mach/hurd/profil.c
+++ b/sysdeps/mach/hurd/profil.c
@@ -36,6 +36,7 @@ static size_t sample_scale;
 static sampled_pc_seqno_t seqno;
 static struct mutex lock = MUTEX_INITIALIZER;
 static mach_msg_timeout_t collector_timeout; /* ms between collections.  */
+static int profile_tick;
 
 /* Enable statistical profiling, writing samples of the PC into at most
    SIZE bytes of SAMPLE_BUFFER; every processor clock tick while profiling
@@ -62,8 +63,7 @@ update_waiter (u_short *sample_buffer, size_t size, size_t offset, u_int scale)
 
   if (! err)
     {
-      int tick;			/* Microseconds per sample.  */
-      err = __task_enable_pc_sampling (__mach_task_self (), &tick,
+      err = __task_enable_pc_sampling (__mach_task_self (), &profile_tick,
 				       SAMPLED_PC_PERIODIC);
       if (!err && sample_scale == 0)
 	/* Profiling was not turned on, so the collector thread was
@@ -79,7 +79,7 @@ update_waiter (u_short *sample_buffer, size_t size, size_t offset, u_int scale)
 	     and the kernel buffer size we get the length of time it takes
 	     to fill the buffer; translate that to milliseconds for
 	     mach_msg, and chop it in half for general lag factor.  */
-	  collector_timeout = MAX_PC_SAMPLES * tick / 1000 / 2;
+	  collector_timeout = MAX_PC_SAMPLES * profile_tick / 1000 / 2;
 	}
     }
 
@@ -87,6 +87,12 @@ update_waiter (u_short *sample_buffer, size_t size, size_t offset, u_int scale)
 }
 
 int
+__profile_frequency ()
+{
+  return profile_tick;
+}
+
+int
 profil (u_short *sample_buffer, size_t size, size_t offset, u_int scale)
 {
   error_t err;
diff --git a/sysdeps/mach/hurd/sendto.c b/sysdeps/mach/hurd/sendto.c
index 88026b8cf5..1be2cbb6ec 100644
--- a/sysdeps/mach/hurd/sendto.c
+++ b/sysdeps/mach/hurd/sendto.c
@@ -27,13 +27,12 @@ Cambridge, MA 02139, USA.  */
 /* Send N bytes of BUF on socket FD to peer at address ADDR (which is
    ADDR_LEN bytes long).  Returns the number sent, or -1 for errors.  */
 int
-sendto (fd, buf, n, flags, addr, addr_len)
-     int fd;
-     const void *buf;
-     size_t n;
-     int flags;
-     const struct sockaddr_un *addr;
-     size_t addr_len;
+sendto (int fd,
+	const void *buf,
+	size_t n,
+	int flags,
+	const struct sockaddr_un *addr,
+	size_t addr_len)
 {
   addr_port_t aport;
   error_t err;