* gnu/packages/patches/glibc-2.37-hurd-clock_t_centiseconds.patch
* gnu/packages/patches/glibc-2.37-hurd-local-clock_gettime_MONOTONIC.patch
* gnu/packages/patches/glibc-2.37-versioned-locpath.patch: New patches.
* gnu/local.mk (dist_patch_DATA): Register them.
* gnu/packages/base.scm (glibc/hurd, libc-for-target): New variables.
(glibc/hurd-headers): Use glibc/hurd.
* gnu/packages/commencement.scm (glibc-final-with-bootstrap-bash)[outputs,
source, arguments]
(glibc-final)[source]: Use libc-for-target instead of glibc.
* gnu/packages/cross-base.scm (cross-libc/deprecated, cross-libc*): Use
libc-for-target.
This part fixes
    https://issues.guix.gnu.org/63641#25
* gnu/packages/commencement.scm (%final-inputs): Change to memoized lambda
taking "system".
* gnu/packages/commencement.scm (canonical-package): Likewise, and update
user, passing (%current-system).
(make-gcc-toolchain): Update user, passing (%current-system).
* gnu/packages/base.scm (%final-inputs): Likewise.
* guix/scripts/refresh.scm (options->update-specs): Likewise.
* guix/build-system/gnu.scm (standard-packages): Add optional "system"
parameter.
(lower): Update caller.
Co-authored-by: Ludovic Courtès <ludo@gnu.org>
Co-authored-by: Janneke Nieuwenhuizen <janneke@gnu.org>
		
	
			
		
			
				
	
	
		
			135 lines
		
	
	
	
		
			4.9 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
			
		
		
	
	
			135 lines
		
	
	
	
		
			4.9 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
| Taken from: https://salsa.debian.org/glibc-team/glibc/-/blob/9ce19663f00176f30d6eab29fd14db3e7cd53dcf/debian/patches/hurd-i386/local-clock_gettime_MONOTONIC.diff
 | |
| 
 | |
| Use the realtime clock for the monotonic clock. This is of course not a proper
 | |
| implementation (which is being done in Mach), but will permit to fix at least
 | |
| the iceweasel stack.
 | |
| 
 | |
| vlc however doesn't build when _POSIX_CLOCK_SELECTION is enabled but
 | |
| _POSIX_TIMERS is not, and they refuse to fix that (see #765578), so disable the
 | |
| former.
 | |
| 
 | |
| ---
 | |
|  sysdeps/mach/hurd/bits/posix_opt.h |    2 +-
 | |
|  sysdeps/unix/clock_gettime.c       |    1 +
 | |
|  2 files changed, 2 insertions(+), 1 deletion(-)
 | |
| Index: glibc-2.27/sysdeps/mach/clock_gettime.c
 | |
| ===================================================================
 | |
| --- glibc-2.27.orig/sysdeps/mach/clock_gettime.c
 | |
| +++ glibc-2.27/sysdeps/mach/clock_gettime.c
 | |
| @@ -31,6 +31,10 @@ __clock_gettime (clockid_t clock_id, str
 | |
|    switch (clock_id) {
 | |
|  
 | |
|      case CLOCK_REALTIME:
 | |
| +    case CLOCK_MONOTONIC:
 | |
| +    case CLOCK_MONOTONIC_RAW:
 | |
| +    case CLOCK_REALTIME_COARSE:
 | |
| +    case CLOCK_MONOTONIC_COARSE:
 | |
|        {
 | |
|  	/* __host_get_time can only fail if passed an invalid host_t.
 | |
|  	   __mach_host_self could theoretically fail (producing an
 | |
| Index: glibc-2.27/rt/timer_create.c
 | |
| ===================================================================
 | |
| --- glibc-2.27.orig/rt/timer_create.c
 | |
| +++ glibc-2.27/rt/timer_create.c
 | |
| @@ -48,7 +48,7 @@ timer_create (clockid_t clock_id, struct
 | |
|        return -1;
 | |
|      }
 | |
|  
 | |
| -  if (clock_id != CLOCK_REALTIME)
 | |
| +  if (clock_id != CLOCK_REALTIME && clock_id != CLOCK_MONOTONIC && clock_id != CLOCK_MONOTONIC_RAW && clock_id != CLOCK_REALTIME_COARSE && clock_id != CLOCK_MONOTONIC_COARSE)
 | |
|      {
 | |
|        __set_errno (EINVAL);
 | |
|        return -1;
 | |
| Index: glibc-2.27/sysdeps/mach/hurd/bits/posix_opt.h
 | |
| ===================================================================
 | |
| --- glibc-2.27.orig/sysdeps/mach/hurd/bits/posix_opt.h
 | |
| +++ glibc-2.27/sysdeps/mach/hurd/bits/posix_opt.h
 | |
| @@ -163,10 +163,10 @@
 | |
|  #define _POSIX_THREAD_PROCESS_SHARED	-1
 | |
|  
 | |
|  /* The monotonic clock might be available.  */
 | |
| -#define _POSIX_MONOTONIC_CLOCK	0
 | |
| +#define _POSIX_MONOTONIC_CLOCK	200809L
 | |
|  
 | |
| -/* The clock selection interfaces are available.  */
 | |
| -#define _POSIX_CLOCK_SELECTION	200809L
 | |
| +/* The clock selection interfaces are not really available yet.  */
 | |
| +#define _POSIX_CLOCK_SELECTION	-1
 | |
|  
 | |
|  /* Advisory information interfaces could be available in future.  */
 | |
|  #define _POSIX_ADVISORY_INFO	0
 | |
| Index: glibc-upstream/sysdeps/posix/clock_getres.c
 | |
| ===================================================================
 | |
| --- glibc-upstream.orig/sysdeps/posix/clock_getres.c
 | |
| +++ glibc-upstream/sysdeps/posix/clock_getres.c
 | |
| @@ -52,6 +52,10 @@ __clock_getres (clockid_t clock_id, stru
 | |
|    switch (clock_id)
 | |
|      {
 | |
|      case CLOCK_REALTIME:
 | |
| +    case CLOCK_MONOTONIC:
 | |
| +    case CLOCK_MONOTONIC_RAW:
 | |
| +    case CLOCK_REALTIME_COARSE:
 | |
| +    case CLOCK_MONOTONIC_COARSE:
 | |
|        retval = realtime_getres (res);
 | |
|        break;
 | |
|  
 | |
| --- ./sysdeps/mach/clock_nanosleep.c.original	2020-07-21 00:31:35.226113142 +0200
 | |
| +++ ./sysdeps/mach/clock_nanosleep.c	2020-07-21 00:31:49.026185761 +0200
 | |
| @@ -62,7 +62,7 @@
 | |
|  __clock_nanosleep (clockid_t clock_id, int flags, const struct timespec *req,
 | |
|  		   struct timespec *rem)
 | |
|  {
 | |
| -  if (clock_id != CLOCK_REALTIME
 | |
| +  if ((clock_id != CLOCK_REALTIME && clock_id != CLOCK_MONOTONIC && clock_id != CLOCK_MONOTONIC_RAW && clock_id != CLOCK_REALTIME_COARSE && clock_id != CLOCK_MONOTONIC_COARSE)
 | |
|        || !valid_nanoseconds (req->tv_nsec)
 | |
|        || (flags != 0 && flags != TIMER_ABSTIME))
 | |
|      return EINVAL;
 | |
| Index: glibc-2.32/hurd/hurdlock.c
 | |
| ===================================================================
 | |
| --- glibc-2.32.orig/hurd/hurdlock.c
 | |
| +++ glibc-2.32/hurd/hurdlock.c
 | |
| @@ -47,7 +47,7 @@ int
 | |
|  __lll_abstimed_wait (void *ptr, int val,
 | |
|    const struct timespec *tsp, int flags, int clk)
 | |
|  {
 | |
| -  if (clk != CLOCK_REALTIME)
 | |
| +  if (clk != CLOCK_REALTIME && clk != CLOCK_MONOTONIC)
 | |
|      return EINVAL;
 | |
|  
 | |
|    int mlsec = compute_reltime (tsp, clk);
 | |
| @@ -59,7 +59,7 @@ int
 | |
|  __lll_abstimed_wait_intr (void *ptr, int val,
 | |
|    const struct timespec *tsp, int flags, int clk)
 | |
|  {
 | |
| -  if (clk != CLOCK_REALTIME)
 | |
| +  if (clk != CLOCK_REALTIME && clk != CLOCK_MONOTONIC)
 | |
|      return EINVAL;
 | |
|  
 | |
|    int mlsec = compute_reltime (tsp, clk);
 | |
| @@ -79,7 +79,7 @@ int
 | |
|  __lll_abstimed_xwait (void *ptr, int lo, int hi,
 | |
|    const struct timespec *tsp, int flags, int clk)
 | |
|  {
 | |
| -  if (clk != CLOCK_REALTIME)
 | |
| +  if (clk != CLOCK_REALTIME && clk != CLOCK_MONOTONIC)
 | |
|      return EINVAL;
 | |
|  
 | |
|    int mlsec = compute_reltime (tsp, clk);
 | |
| @@ -91,7 +91,7 @@ int
 | |
|  __lll_abstimed_lock (void *ptr,
 | |
|    const struct timespec *tsp, int flags, int clk)
 | |
|  {
 | |
| -  if (clk != CLOCK_REALTIME)
 | |
| +  if (clk != CLOCK_REALTIME && clk != CLOCK_MONOTONIC)
 | |
|      return EINVAL;
 | |
|  
 | |
|    if (__lll_trylock (ptr) == 0)
 | |
| @@ -177,7 +177,7 @@ __lll_robust_abstimed_lock (void *ptr,
 | |
|    int wait_time = 25;
 | |
|    unsigned int val;
 | |
|  
 | |
| -  if (clk != CLOCK_REALTIME)
 | |
| +  if (clk != CLOCK_REALTIME && clk != CLOCK_MONOTONIC)
 | |
|      return EINVAL;
 | |
|  
 | |
|    while (1)
 |