Artifact
05bbcda803761c7084aeb79e272a5e34d9fb94d0:
0000: 2f 2a 0a 2a 2a 20 32 30 30 31 20 53 65 70 74 65 /*.** 2001 Septe
0010: 6d 62 65 72 20 31 35 0a 2a 2a 0a 2a 2a 20 54 68 mber 15.**.** Th
0020: 65 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 e author disclai
0030: 6d 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 ms copyright to
0040: 74 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 this source code
0050: 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a . In place of.*
0060: 2a 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 * a legal notice
0070: 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 , here is a bles
0080: 73 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d sing:.**.** M
0090: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 ay you do good a
00a0: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 nd not evil..**
00b0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 May you find
00c0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 forgiveness for
00d0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 yourself and for
00e0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 give others..**
00f0: 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 May you share
0100: 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 freely, never t
0110: 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 aking more than
0120: 79 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a you give..**.***
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0170: 2a 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 ******.** This f
0180: 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 63 6f 64 ile contains cod
0190: 65 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 61 e to implement a
01a0: 20 70 73 65 75 64 6f 2d 72 61 6e 64 6f 6d 20 6e pseudo-random n
01b0: 75 6d 62 65 72 0a 2a 2a 20 67 65 6e 65 72 61 74 umber.** generat
01c0: 6f 72 20 28 50 52 4e 47 29 20 66 6f 72 20 53 51 or (PRNG) for SQ
01d0: 4c 69 74 65 2e 0a 2a 2a 0a 2a 2a 20 52 61 6e 64 Lite..**.** Rand
01e0: 6f 6d 20 6e 75 6d 62 65 72 73 20 61 72 65 20 75 om numbers are u
01f0: 73 65 64 20 62 79 20 73 6f 6d 65 20 6f 66 20 74 sed by some of t
0200: 68 65 20 64 61 74 61 62 61 73 65 20 62 61 63 6b he database back
0210: 65 6e 64 73 20 69 6e 20 6f 72 64 65 72 0a 2a 2a ends in order.**
0220: 20 74 6f 20 67 65 6e 65 72 61 74 65 20 72 61 6e to generate ran
0230: 64 6f 6d 20 69 6e 74 65 67 65 72 20 6b 65 79 73 dom integer keys
0240: 20 66 6f 72 20 74 61 62 6c 65 73 20 6f 72 20 72 for tables or r
0250: 61 6e 64 6f 6d 20 66 69 6c 65 6e 61 6d 65 73 2e andom filenames.
0260: 0a 2a 2a 0a 2a 2a 20 24 49 64 3a 20 72 61 6e 64 .**.** $Id: rand
0270: 6f 6d 2e 63 2c 76 20 31 2e 32 32 20 32 30 30 36 om.c,v 1.22 2006
0280: 2f 30 38 2f 31 33 20 31 35 3a 35 36 3a 30 38 20 /08/13 15:56:08
0290: 72 6d 73 69 6d 70 73 6f 6e 20 45 78 70 20 24 0a rmsimpson Exp $.
02a0: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c */.#include "sql
02b0: 69 74 65 49 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 iteInt.h".#inclu
02c0: 64 65 20 22 6f 73 2e 68 22 0a 0a 0a 2f 2a 0a 2a de "os.h".../*.*
02d0: 2a 20 47 65 74 20 61 20 73 69 6e 67 6c 65 20 38 * Get a single 8
02e0: 2d 62 69 74 20 72 61 6e 64 6f 6d 20 76 61 6c 75 -bit random valu
02f0: 65 20 66 72 6f 6d 20 74 68 65 20 52 43 34 20 50 e from the RC4 P
0300: 52 4e 47 2e 20 20 54 68 65 20 4d 75 74 65 78 0a RNG. The Mutex.
0310: 2a 2a 20 6d 75 73 74 20 62 65 20 68 65 6c 64 20 ** must be held
0320: 77 68 69 6c 65 20 65 78 65 63 75 74 69 6e 67 20 while executing
0330: 74 68 69 73 20 72 6f 75 74 69 6e 65 2e 0a 2a 2a this routine..**
0340: 0a 2a 2a 20 57 68 79 20 6e 6f 74 20 6a 75 73 74 .** Why not just
0350: 20 75 73 65 20 61 20 6c 69 62 72 61 72 79 20 72 use a library r
0360: 61 6e 64 6f 6d 20 67 65 6e 65 72 61 74 6f 72 20 andom generator
0370: 6c 69 6b 65 20 6c 72 61 6e 64 34 38 28 29 20 66 like lrand48() f
0380: 6f 72 20 74 68 69 73 3f 0a 2a 2a 20 42 65 63 61 or this?.** Beca
0390: 75 73 65 20 74 68 65 20 4f 50 5f 4e 65 77 52 6f use the OP_NewRo
03a0: 77 69 64 20 6f 70 63 6f 64 65 20 69 6e 20 74 68 wid opcode in th
03b0: 65 20 56 44 42 45 20 64 65 70 65 6e 64 73 20 6f e VDBE depends o
03c0: 6e 20 68 61 76 69 6e 67 20 61 20 76 65 72 79 0a n having a very.
03d0: 2a 2a 20 67 6f 6f 64 20 73 6f 75 72 63 65 20 6f ** good source o
03e0: 66 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 65 72 73 f random numbers
03f0: 2e 20 20 54 68 65 20 6c 72 61 6e 64 34 38 28 29 . The lrand48()
0400: 20 6c 69 62 72 61 72 79 20 66 75 6e 63 74 69 6f library functio
0410: 6e 20 6d 61 79 0a 2a 2a 20 77 65 6c 6c 20 62 65 n may.** well be
0420: 20 67 6f 6f 64 20 65 6e 6f 75 67 68 2e 20 20 42 good enough. B
0430: 75 74 20 6d 61 79 62 65 20 6e 6f 74 2e 20 20 4f ut maybe not. O
0440: 72 20 6d 61 79 62 65 20 6c 72 61 6e 64 34 38 28 r maybe lrand48(
0450: 29 20 68 61 73 20 73 6f 6d 65 0a 2a 2a 20 73 75 ) has some.** su
0460: 62 74 6c 65 20 70 72 6f 62 6c 65 6d 73 20 6f 6e btle problems on
0470: 20 73 6f 6d 65 20 73 79 73 74 65 6d 73 20 74 68 some systems th
0480: 61 74 20 63 6f 75 6c 64 20 63 61 75 73 65 20 70 at could cause p
0490: 72 6f 62 6c 65 6d 73 2e 20 20 49 74 20 69 73 20 roblems. It is
04a0: 68 61 72 64 0a 2a 2a 20 74 6f 20 6b 6e 6f 77 2e hard.** to know.
04b0: 20 20 54 6f 20 6d 69 6e 69 6d 69 7a 65 20 74 68 To minimize th
04c0: 65 20 72 69 73 6b 20 6f 66 20 70 72 6f 62 6c 65 e risk of proble
04d0: 6d 73 20 64 75 65 20 74 6f 20 62 61 64 20 6c 72 ms due to bad lr
04e0: 61 6e 64 34 38 28 29 0a 2a 2a 20 69 6d 70 6c 65 and48().** imple
04f0: 6d 65 6e 74 61 74 69 6f 6e 73 2c 20 53 51 4c 69 mentations, SQLi
0500: 74 65 20 75 73 65 73 20 74 68 69 73 20 72 61 6e te uses this ran
0510: 64 6f 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 dom number gener
0520: 61 74 6f 72 20 62 61 73 65 64 0a 2a 2a 20 6f 6e ator based.** on
0530: 20 52 43 34 2c 20 77 68 69 63 68 20 77 65 20 6b RC4, which we k
0540: 6e 6f 77 20 77 6f 72 6b 73 20 76 65 72 79 20 77 now works very w
0550: 65 6c 6c 2e 0a 2a 2a 0a 2a 2a 20 28 4c 61 74 65 ell..**.** (Late
0560: 72 29 3a 20 20 41 63 74 75 61 6c 6c 79 2c 20 4f r): Actually, O
0570: 50 5f 4e 65 77 52 6f 77 69 64 20 64 6f 65 73 20 P_NewRowid does
0580: 6e 6f 74 20 64 65 70 65 6e 64 20 6f 6e 20 61 20 not depend on a
0590: 67 6f 6f 64 20 73 6f 75 72 63 65 20 6f 66 0a 2a good source of.*
05a0: 2a 20 72 61 6e 64 6f 6d 6e 65 73 73 20 61 6e 79 * randomness any
05b0: 20 6d 6f 72 65 2e 20 20 42 75 74 20 77 65 20 77 more. But we w
05c0: 69 6c 6c 20 6c 65 61 76 65 20 74 68 69 73 20 63 ill leave this c
05d0: 6f 64 65 20 69 6e 20 61 6c 6c 20 74 68 65 20 73 ode in all the s
05e0: 61 6d 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 ame..*/.static i
05f0: 6e 74 20 72 61 6e 64 6f 6d 42 79 74 65 28 29 7b nt randomByte(){
0600: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 . unsigned char
0610: 20 74 3b 0a 0a 20 20 2f 2a 20 41 6c 6c 20 74 68 t;.. /* All th
0620: 72 65 61 64 73 20 73 68 61 72 65 20 61 20 73 69 reads share a si
0630: 6e 67 6c 65 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 ngle random numb
0640: 65 72 20 67 65 6e 65 72 61 74 6f 72 2e 0a 20 20 er generator..
0650: 2a 2a 20 54 68 69 73 20 73 74 72 75 63 74 75 72 ** This structur
0660: 65 20 69 73 20 74 68 65 20 63 75 72 72 65 6e 74 e is the current
0670: 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 67 65 state of the ge
0680: 6e 65 72 61 74 6f 72 2e 0a 20 20 2a 2f 0a 20 20 nerator.. */.
0690: 73 74 61 74 69 63 20 73 74 72 75 63 74 20 7b 0a static struct {.
06a0: 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 unsigned cha
06b0: 72 20 69 73 49 6e 69 74 3b 20 20 20 20 20 20 20 r isInit;
06c0: 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 69 6e /* True if in
06d0: 69 74 69 61 6c 69 7a 65 64 20 2a 2f 0a 20 20 20 itialized */.
06e0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 69 unsigned char i
06f0: 2c 20 6a 3b 20 20 20 20 20 20 20 20 20 20 20 20 , j;
0700: 2f 2a 20 53 74 61 74 65 20 76 61 72 69 61 62 6c /* State variabl
0710: 65 73 20 2a 2f 0a 20 20 20 20 75 6e 73 69 67 6e es */. unsign
0720: 65 64 20 63 68 61 72 20 73 5b 32 35 36 5d 3b 20 ed char s[256];
0730: 20 20 20 20 20 20 20 20 20 2f 2a 20 53 74 61 74 /* Stat
0740: 65 20 76 61 72 69 61 62 6c 65 73 20 2a 2f 0a 20 e variables */.
0750: 20 7d 20 70 72 6e 67 3b 0a 0a 20 20 2f 2a 20 49 } prng;.. /* I
0760: 6e 69 74 69 61 6c 69 7a 65 20 74 68 65 20 73 74 nitialize the st
0770: 61 74 65 20 6f 66 20 74 68 65 20 72 61 6e 64 6f ate of the rando
0780: 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74 m number generat
0790: 6f 72 20 6f 6e 63 65 2c 0a 20 20 2a 2a 20 74 68 or once,. ** th
07a0: 65 20 66 69 72 73 74 20 74 69 6d 65 20 74 68 69 e first time thi
07b0: 73 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 6c s routine is cal
07c0: 6c 65 64 2e 20 20 54 68 65 20 73 65 65 64 20 76 led. The seed v
07d0: 61 6c 75 65 20 64 6f 65 73 0a 20 20 2a 2a 20 6e alue does. ** n
07e0: 6f 74 20 6e 65 65 64 20 74 6f 20 63 6f 6e 74 61 ot need to conta
07f0: 69 6e 20 61 20 6c 6f 74 20 6f 66 20 72 61 6e 64 in a lot of rand
0800: 6f 6d 6e 65 73 73 20 73 69 6e 63 65 20 77 65 20 omness since we
0810: 61 72 65 20 6e 6f 74 0a 20 20 2a 2a 20 74 72 79 are not. ** try
0820: 69 6e 67 20 74 6f 20 64 6f 20 73 65 63 75 72 65 ing to do secure
0830: 20 65 6e 63 72 79 70 74 69 6f 6e 20 6f 72 20 61 encryption or a
0840: 6e 79 74 68 69 6e 67 20 6c 69 6b 65 20 74 68 61 nything like tha
0850: 74 2e 2e 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 4e t.... **. ** N
0860: 6f 74 68 69 6e 67 20 69 6e 20 74 68 69 73 20 66 othing in this f
0870: 69 6c 65 20 6f 72 20 61 6e 79 77 68 65 72 65 20 ile or anywhere
0880: 65 6c 73 65 20 69 6e 20 53 51 4c 69 74 65 20 64 else in SQLite d
0890: 6f 65 73 20 61 6e 79 20 6b 69 6e 64 20 6f 66 0a oes any kind of.
08a0: 20 20 2a 2a 20 65 6e 63 72 79 70 74 69 6f 6e 2e ** encryption.
08b0: 20 20 54 68 65 20 52 43 34 20 61 6c 67 6f 72 69 The RC4 algori
08c0: 74 68 6d 20 69 73 20 62 65 69 6e 67 20 75 73 65 thm is being use
08d0: 64 20 61 73 20 61 20 50 52 4e 47 20 28 70 73 65 d as a PRNG (pse
08e0: 75 64 6f 2d 72 61 6e 64 6f 6d 0a 20 20 2a 2a 20 udo-random. **
08f0: 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74 6f 72 number generator
0900: 29 20 6e 6f 74 20 61 73 20 61 6e 20 65 6e 63 72 ) not as an encr
0910: 79 70 74 69 6f 6e 20 64 65 76 69 63 65 2e 0a 20 yption device..
0920: 20 2a 2f 0a 20 20 69 66 28 20 21 70 72 6e 67 2e */. if( !prng.
0930: 69 73 49 6e 69 74 20 29 7b 0a 20 20 20 20 69 6e isInit ){. in
0940: 74 20 69 3b 0a 20 20 20 20 63 68 61 72 20 6b 5b t i;. char k[
0950: 32 35 36 5d 3b 0a 20 20 20 20 70 72 6e 67 2e 6a 256];. prng.j
0960: 20 3d 20 30 3b 0a 20 20 20 20 70 72 6e 67 2e 69 = 0;. prng.i
0970: 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 = 0;. sqlite
0980: 33 4f 73 52 61 6e 64 6f 6d 53 65 65 64 28 6b 29 3OsRandomSeed(k)
0990: 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 ;. for(i=0; i
09a0: 3c 32 35 36 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 <256; i++){.
09b0: 20 20 70 72 6e 67 2e 73 5b 69 5d 20 3d 20 69 3b prng.s[i] = i;
09c0: 0a 20 20 20 20 7d 0a 20 20 20 20 66 6f 72 28 69 . }. for(i
09d0: 3d 30 3b 20 69 3c 32 35 36 3b 20 69 2b 2b 29 7b =0; i<256; i++){
09e0: 0a 20 20 20 20 20 20 70 72 6e 67 2e 6a 20 2b 3d . prng.j +=
09f0: 20 70 72 6e 67 2e 73 5b 69 5d 20 2b 20 6b 5b 69 prng.s[i] + k[i
0a00: 5d 3b 0a 20 20 20 20 20 20 74 20 3d 20 70 72 6e ];. t = prn
0a10: 67 2e 73 5b 70 72 6e 67 2e 6a 5d 3b 0a 20 20 20 g.s[prng.j];.
0a20: 20 20 20 70 72 6e 67 2e 73 5b 70 72 6e 67 2e 6a prng.s[prng.j
0a30: 5d 20 3d 20 70 72 6e 67 2e 73 5b 69 5d 3b 0a 20 ] = prng.s[i];.
0a40: 20 20 20 20 20 70 72 6e 67 2e 73 5b 69 5d 20 3d prng.s[i] =
0a50: 20 74 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70 72 t;. }. pr
0a60: 6e 67 2e 69 73 49 6e 69 74 20 3d 20 31 3b 0a 20 ng.isInit = 1;.
0a70: 20 7d 0a 0a 20 20 2f 2a 20 47 65 6e 65 72 61 74 }.. /* Generat
0a80: 65 20 61 6e 64 20 72 65 74 75 72 6e 20 73 69 6e e and return sin
0a90: 67 6c 65 20 72 61 6e 64 6f 6d 20 62 79 74 65 0a gle random byte.
0aa0: 20 20 2a 2f 0a 20 20 70 72 6e 67 2e 69 2b 2b 3b */. prng.i++;
0ab0: 0a 20 20 74 20 3d 20 70 72 6e 67 2e 73 5b 70 72 . t = prng.s[pr
0ac0: 6e 67 2e 69 5d 3b 0a 20 20 70 72 6e 67 2e 6a 20 ng.i];. prng.j
0ad0: 2b 3d 20 74 3b 0a 20 20 70 72 6e 67 2e 73 5b 70 += t;. prng.s[p
0ae0: 72 6e 67 2e 69 5d 20 3d 20 70 72 6e 67 2e 73 5b rng.i] = prng.s[
0af0: 70 72 6e 67 2e 6a 5d 3b 0a 20 20 70 72 6e 67 2e prng.j];. prng.
0b00: 73 5b 70 72 6e 67 2e 6a 5d 20 3d 20 74 3b 0a 20 s[prng.j] = t;.
0b10: 20 74 20 2b 3d 20 70 72 6e 67 2e 73 5b 70 72 6e t += prng.s[prn
0b20: 67 2e 69 5d 3b 0a 20 20 72 65 74 75 72 6e 20 70 g.i];. return p
0b30: 72 6e 67 2e 73 5b 74 5d 3b 0a 7d 0a 0a 2f 2a 0a rng.s[t];.}../*.
0b40: 2a 2a 20 52 65 74 75 72 6e 20 4e 20 72 61 6e 64 ** Return N rand
0b50: 6f 6d 20 62 79 74 65 73 2e 0a 2a 2f 0a 76 6f 69 om bytes..*/.voi
0b60: 64 20 73 71 6c 69 74 65 33 52 61 6e 64 6f 6d 6e d sqlite3Randomn
0b70: 65 73 73 28 69 6e 74 20 4e 2c 20 76 6f 69 64 20 ess(int N, void
0b80: 2a 70 42 75 66 29 7b 0a 20 20 75 6e 73 69 67 6e *pBuf){. unsign
0b90: 65 64 20 63 68 61 72 20 2a 7a 42 75 66 20 3d 20 ed char *zBuf =
0ba0: 70 42 75 66 3b 0a 20 20 73 71 6c 69 74 65 33 4f pBuf;. sqlite3O
0bb0: 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20 sEnterMutex();.
0bc0: 20 77 68 69 6c 65 28 20 4e 2d 2d 20 29 7b 0a 20 while( N-- ){.
0bd0: 20 20 20 2a 28 7a 42 75 66 2b 2b 29 20 3d 20 72 *(zBuf++) = r
0be0: 61 6e 64 6f 6d 42 79 74 65 28 29 3b 0a 20 20 7d andomByte();. }
0bf0: 0a 20 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76 . sqlite3OsLeav
0c00: 65 4d 75 74 65 78 28 29 3b 0a 7d 0a eMutex();.}.