Home | History | Annotate | Line # | Download | only in stdlib
      1  1.8    lukem /*	$NetBSD: seed48.c,v 1.8 2005/06/12 05:21:28 lukem Exp $	*/
      2  1.4    perry 
      3  1.1   brezak /*
      4  1.1   brezak  * Copyright (c) 1993 Martin Birgmeier
      5  1.1   brezak  * All rights reserved.
      6  1.1   brezak  *
      7  1.1   brezak  * You may redistribute unmodified or modified versions of this source
      8  1.1   brezak  * code provided that the above copyright notice and this and the
      9  1.1   brezak  * following conditions are retained.
     10  1.1   brezak  *
     11  1.1   brezak  * This software is provided ``as is'', and comes with no warranties
     12  1.1   brezak  * of any kind. I shall in no event be liable for anything that happens
     13  1.1   brezak  * to anyone/anything when using this software.
     14  1.1   brezak  */
     15  1.1   brezak 
     16  1.8    lukem #include <sys/cdefs.h>
     17  1.8    lukem #if defined(LIBC_SCCS) && !defined(lint)
     18  1.8    lukem __RCSID("$NetBSD: seed48.c,v 1.8 2005/06/12 05:21:28 lukem Exp $");
     19  1.8    lukem #endif /* LIBC_SCCS and not lint */
     20  1.8    lukem 
     21  1.3      jtc #include "namespace.h"
     22  1.5    lukem 
     23  1.5    lukem #include <assert.h>
     24  1.5    lukem 
     25  1.1   brezak #include "rand48.h"
     26  1.1   brezak 
     27  1.3      jtc #ifdef __weak_alias
     28  1.7  mycroft __weak_alias(seed48,_seed48)
     29  1.3      jtc #endif
     30  1.1   brezak 
     31  1.1   brezak unsigned short *
     32  1.1   brezak seed48(unsigned short xseed[3])
     33  1.1   brezak {
     34  1.1   brezak 	static unsigned short sseed[3];
     35  1.5    lukem 
     36  1.5    lukem 	_DIAGASSERT(xseed != NULL);
     37  1.1   brezak 
     38  1.2      jtc 	sseed[0] = __rand48_seed[0];
     39  1.2      jtc 	sseed[1] = __rand48_seed[1];
     40  1.2      jtc 	sseed[2] = __rand48_seed[2];
     41  1.2      jtc 	__rand48_seed[0] = xseed[0];
     42  1.2      jtc 	__rand48_seed[1] = xseed[1];
     43  1.2      jtc 	__rand48_seed[2] = xseed[2];
     44  1.2      jtc 	__rand48_mult[0] = RAND48_MULT_0;
     45  1.2      jtc 	__rand48_mult[1] = RAND48_MULT_1;
     46  1.2      jtc 	__rand48_mult[2] = RAND48_MULT_2;
     47  1.2      jtc 	__rand48_add = RAND48_ADD;
     48  1.1   brezak 	return sseed;
     49  1.1   brezak }
     50