File: srand.c

package info (click to toggle)
xscorch 0.2.0-4
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k, lenny
  • size: 4,636 kB
  • ctags: 3,399
  • sloc: ansic: 31,504; sh: 8,826; makefile: 467; perl: 16
file content (110 lines) | stat: -rw-r--r-- 1,866 bytes parent folder | download | duplicates (2)
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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
/* $Header: /fridge/cvs/xscorch/sutil/srand.c,v 1.6 2004/02/26 06:34:57 justins Exp $ */
/*

   xscorch - srand.c          Copyright(c) 2000 Justin David Smith
   justins(at)chaos2.org      http://chaos2.org/

   Scorched random number generator


   This program is free software; you can redistribute it and/or modify 
   it under the terms of the GNU General Public License as published by 
   the Free Software Foundation, version 2 of the License ONLY. 

   This program is distributed in the hope that it will be useful, 
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
   General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software Foundation, 
   Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

*/
#include <stdlib.h>

#include <srand.h>



void sys_randomize(void) {

   struct timeval t;
   gettimeofday(&t, NULL);
   srand(t.tv_sec * 1000 + t.tv_usec / 1000);
   game_randomize(sys_rand());

}



long sys_rand(void) {

   return(rand());

}



double sys_drand(void) {

   return(sys_rand() / (RAND_MAX + 1.0));

}



long sys_lrand(long max) {

   return((long)(sys_drand() * max));

}



static dword _sc_game_random_value;



void game_randomize(dword seed) {

   _sc_game_random_value = seed;

}



dword game_rand_peek(void) {

   dword result;

   result = _sc_game_random_value * 1664525L + 1013904223L;
   result = result % GAME_RAND_MAX;
   return(result);

}



dword game_rand(void) {

   _sc_game_random_value = game_rand_peek();
   return(_sc_game_random_value);

}



double game_drand(void) {

   return(game_rand() / (GAME_RAND_MAX + 1.0));

}



dword game_lrand(dword max) {

   return((dword)(game_drand() * max));

}