File: rand.c

package info (click to toggle)
qemu 1%3A10.1.2%2Bds-2
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 415,932 kB
  • sloc: ansic: 4,763,605; pascal: 115,173; python: 105,698; asm: 68,689; sh: 53,146; makefile: 27,519; perl: 18,863; cpp: 11,443; xml: 3,629; objc: 2,877; yacc: 2,505; php: 1,299; tcl: 1,296; lex: 1,110; sql: 71; awk: 43; sed: 35; javascript: 7
file content (29 lines) | stat: -rw-r--r-- 728 bytes parent folder | download | duplicates (10) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
/******************************************************************************
 * Copyright (c) 2004, 2008 IBM Corporation
 * All rights reserved.
 * This program and the accompanying materials
 * are made available under the terms of the BSD License
 * which accompanies this distribution, and is available at
 * http://www.opensource.org/licenses/bsd-license.php
 *
 * Contributors:
 *     IBM Corporation - initial implementation
 *****************************************************************************/

#include <stdlib.h>


static unsigned long _rand = 1;

int
rand(void)
{
	_rand = _rand * 1237732973 + 34563;

	return ((unsigned int) (_rand >> 16) & RAND_MAX);
}

void srand(unsigned int seed)
{
	_rand = seed;
}