/ Hex Artifact Content
Login

Artifact 80f5d666f23feb3e6665a6ce04c7197212a88384:


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 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71  .*/.#include "sq
0270: 6c 69 74 65 49 6e 74 2e 68 22 0a 0a 0a 2f 2a 20  liteInt.h".../* 
0280: 41 6c 6c 20 74 68 72 65 61 64 73 20 73 68 61 72  All threads shar
0290: 65 20 61 20 73 69 6e 67 6c 65 20 72 61 6e 64 6f  e a single rando
02a0: 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74  m number generat
02b0: 6f 72 2e 0a 2a 2a 20 54 68 69 73 20 73 74 72 75  or..** This stru
02c0: 63 74 75 72 65 20 69 73 20 74 68 65 20 63 75 72  cture is the cur
02d0: 72 65 6e 74 20 73 74 61 74 65 20 6f 66 20 74 68  rent state of th
02e0: 65 20 67 65 6e 65 72 61 74 6f 72 2e 0a 2a 2f 0a  e generator..*/.
02f0: 73 74 61 74 69 63 20 53 51 4c 49 54 45 5f 57 53  static SQLITE_WS
0300: 44 20 73 74 72 75 63 74 20 73 71 6c 69 74 65 33  D struct sqlite3
0310: 50 72 6e 67 54 79 70 65 20 7b 0a 20 20 75 6e 73  PrngType {.  uns
0320: 69 67 6e 65 64 20 63 68 61 72 20 69 73 49 6e 69  igned char isIni
0330: 74 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54  t;          /* T
0340: 72 75 65 20 69 66 20 69 6e 69 74 69 61 6c 69 7a  rue if initializ
0350: 65 64 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64  ed */.  unsigned
0360: 20 63 68 61 72 20 69 2c 20 6a 3b 20 20 20 20 20   char i, j;     
0370: 20 20 20 20 20 20 20 2f 2a 20 53 74 61 74 65 20         /* State 
0380: 76 61 72 69 61 62 6c 65 73 20 2a 2f 0a 20 20 75  variables */.  u
0390: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 73 5b 32  nsigned char s[2
03a0: 35 36 5d 3b 20 20 20 20 20 20 20 20 20 20 2f 2a  56];          /*
03b0: 20 53 74 61 74 65 20 76 61 72 69 61 62 6c 65 73   State variables
03c0: 20 2a 2f 0a 7d 20 73 71 6c 69 74 65 33 50 72 6e   */.} sqlite3Prn
03d0: 67 3b 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  g;../*.** Return
03e0: 20 4e 20 72 61 6e 64 6f 6d 20 62 79 74 65 73 2e   N random bytes.
03f0: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33  .*/.void sqlite3
0400: 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 69 6e 74 20  _randomness(int 
0410: 4e 2c 20 76 6f 69 64 20 2a 70 42 75 66 29 7b 0a  N, void *pBuf){.
0420: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
0430: 74 3b 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68  t;.  unsigned ch
0440: 61 72 20 2a 7a 42 75 66 20 3d 20 70 42 75 66 3b  ar *zBuf = pBuf;
0450: 0a 0a 20 20 2f 2a 20 54 68 65 20 22 77 73 64 50  ..  /* The "wsdP
0460: 72 6e 67 22 20 6d 61 63 72 6f 20 77 69 6c 6c 20  rng" macro will 
0470: 72 65 73 6f 6c 76 65 20 74 6f 20 74 68 65 20 70  resolve to the p
0480: 73 65 75 64 6f 2d 72 61 6e 64 6f 6d 20 6e 75 6d  seudo-random num
0490: 62 65 72 20 67 65 6e 65 72 61 74 6f 72 0a 20 20  ber generator.  
04a0: 2a 2a 20 73 74 61 74 65 20 76 65 63 74 6f 72 2e  ** state vector.
04b0: 20 20 49 66 20 77 72 69 74 61 62 6c 65 20 73 74    If writable st
04c0: 61 74 69 63 20 64 61 74 61 20 69 73 20 75 6e 73  atic data is uns
04d0: 75 70 70 6f 72 74 65 64 20 6f 6e 20 74 68 65 20  upported on the 
04e0: 74 61 72 67 65 74 2c 0a 20 20 2a 2a 20 77 65 20  target,.  ** we 
04f0: 68 61 76 65 20 74 6f 20 6c 6f 63 61 74 65 20 74  have to locate t
0500: 68 65 20 73 74 61 74 65 20 76 65 63 74 6f 72 20  he state vector 
0510: 61 74 20 72 75 6e 2d 74 69 6d 65 2e 20 20 49 6e  at run-time.  In
0520: 20 74 68 65 20 6d 6f 72 65 20 63 6f 6d 6d 6f 6e   the more common
0530: 0a 20 20 2a 2a 20 63 61 73 65 20 77 68 65 72 65  .  ** case where
0540: 20 77 72 69 74 61 62 6c 65 20 73 74 61 74 69 63   writable static
0550: 20 64 61 74 61 20 69 73 20 73 75 70 70 6f 72 74   data is support
0560: 65 64 2c 20 77 73 64 50 72 6e 67 20 63 61 6e 20  ed, wsdPrng can 
0570: 72 65 66 65 72 20 64 69 72 65 63 74 6c 79 0a 20  refer directly. 
0580: 20 2a 2a 20 74 6f 20 74 68 65 20 22 73 71 6c 69   ** to the "sqli
0590: 74 65 33 50 72 6e 67 22 20 73 74 61 74 65 20 76  te3Prng" state v
05a0: 65 63 74 6f 72 20 64 65 63 6c 61 72 65 64 20 61  ector declared a
05b0: 62 6f 76 65 2e 0a 20 20 2a 2f 0a 23 69 66 64 65  bove..  */.#ifde
05c0: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 57 53  f SQLITE_OMIT_WS
05d0: 44 0a 20 20 73 74 72 75 63 74 20 73 71 6c 69 74  D.  struct sqlit
05e0: 65 33 50 72 6e 67 54 79 70 65 20 2a 70 20 3d 20  e3PrngType *p = 
05f0: 26 47 4c 4f 42 41 4c 28 73 74 72 75 63 74 20 73  &GLOBAL(struct s
0600: 71 6c 69 74 65 33 50 72 6e 67 54 79 70 65 2c 20  qlite3PrngType, 
0610: 73 71 6c 69 74 65 33 50 72 6e 67 29 3b 0a 23 20  sqlite3Prng);.# 
0620: 64 65 66 69 6e 65 20 77 73 64 50 72 6e 67 20 70  define wsdPrng p
0630: 5b 30 5d 0a 23 65 6c 73 65 0a 23 20 64 65 66 69  [0].#else.# defi
0640: 6e 65 20 77 73 64 50 72 6e 67 20 73 71 6c 69 74  ne wsdPrng sqlit
0650: 65 33 50 72 6e 67 0a 23 65 6e 64 69 66 0a 0a 23  e3Prng.#endif..#
0660: 69 66 20 53 51 4c 49 54 45 5f 54 48 52 45 41 44  if SQLITE_THREAD
0670: 53 41 46 45 0a 20 20 73 71 6c 69 74 65 33 5f 6d  SAFE.  sqlite3_m
0680: 75 74 65 78 20 2a 6d 75 74 65 78 3b 0a 23 65 6e  utex *mutex;.#en
0690: 64 69 66 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c  dif..#ifndef SQL
06a0: 49 54 45 5f 4f 4d 49 54 5f 41 55 54 4f 49 4e 49  ITE_OMIT_AUTOINI
06b0: 54 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f  T.  if( sqlite3_
06c0: 69 6e 69 74 69 61 6c 69 7a 65 28 29 20 29 20 72  initialize() ) r
06d0: 65 74 75 72 6e 3b 0a 23 65 6e 64 69 66 0a 0a 23  eturn;.#endif..#
06e0: 69 66 20 53 51 4c 49 54 45 5f 54 48 52 45 41 44  if SQLITE_THREAD
06f0: 53 41 46 45 0a 20 20 6d 75 74 65 78 20 3d 20 73  SAFE.  mutex = s
0700: 71 6c 69 74 65 33 4d 75 74 65 78 41 6c 6c 6f 63  qlite3MutexAlloc
0710: 28 53 51 4c 49 54 45 5f 4d 55 54 45 58 5f 53 54  (SQLITE_MUTEX_ST
0720: 41 54 49 43 5f 50 52 4e 47 29 3b 0a 23 65 6e 64  ATIC_PRNG);.#end
0730: 69 66 0a 0a 20 20 73 71 6c 69 74 65 33 5f 6d 75  if..  sqlite3_mu
0740: 74 65 78 5f 65 6e 74 65 72 28 6d 75 74 65 78 29  tex_enter(mutex)
0750: 3b 0a 20 20 69 66 28 20 4e 3c 3d 30 20 7c 7c 20  ;.  if( N<=0 || 
0760: 70 42 75 66 3d 3d 30 20 29 7b 0a 20 20 20 20 77  pBuf==0 ){.    w
0770: 73 64 50 72 6e 67 2e 69 73 49 6e 69 74 20 3d 20  sdPrng.isInit = 
0780: 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 6d  0;.    sqlite3_m
0790: 75 74 65 78 5f 6c 65 61 76 65 28 6d 75 74 65 78  utex_leave(mutex
07a0: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
07b0: 20 7d 0a 0a 20 20 2f 2a 20 49 6e 69 74 69 61 6c   }..  /* Initial
07c0: 69 7a 65 20 74 68 65 20 73 74 61 74 65 20 6f 66  ize the state of
07d0: 20 74 68 65 20 72 61 6e 64 6f 6d 20 6e 75 6d 62   the random numb
07e0: 65 72 20 67 65 6e 65 72 61 74 6f 72 20 6f 6e 63  er generator onc
07f0: 65 2c 0a 20 20 2a 2a 20 74 68 65 20 66 69 72 73  e,.  ** the firs
0800: 74 20 74 69 6d 65 20 74 68 69 73 20 72 6f 75 74  t time this rout
0810: 69 6e 65 20 69 73 20 63 61 6c 6c 65 64 2e 20 20  ine is called.  
0820: 54 68 65 20 73 65 65 64 20 76 61 6c 75 65 20 64  The seed value d
0830: 6f 65 73 0a 20 20 2a 2a 20 6e 6f 74 20 6e 65 65  oes.  ** not nee
0840: 64 20 74 6f 20 63 6f 6e 74 61 69 6e 20 61 20 6c  d to contain a l
0850: 6f 74 20 6f 66 20 72 61 6e 64 6f 6d 6e 65 73 73  ot of randomness
0860: 20 73 69 6e 63 65 20 77 65 20 61 72 65 20 6e 6f   since we are no
0870: 74 0a 20 20 2a 2a 20 74 72 79 69 6e 67 20 74 6f  t.  ** trying to
0880: 20 64 6f 20 73 65 63 75 72 65 20 65 6e 63 72 79   do secure encry
0890: 70 74 69 6f 6e 20 6f 72 20 61 6e 79 74 68 69 6e  ption or anythin
08a0: 67 20 6c 69 6b 65 20 74 68 61 74 2e 2e 2e 0a 20  g like that.... 
08b0: 20 2a 2a 0a 20 20 2a 2a 20 4e 6f 74 68 69 6e 67   **.  ** Nothing
08c0: 20 69 6e 20 74 68 69 73 20 66 69 6c 65 20 6f 72   in this file or
08d0: 20 61 6e 79 77 68 65 72 65 20 65 6c 73 65 20 69   anywhere else i
08e0: 6e 20 53 51 4c 69 74 65 20 64 6f 65 73 20 61 6e  n SQLite does an
08f0: 79 20 6b 69 6e 64 20 6f 66 0a 20 20 2a 2a 20 65  y kind of.  ** e
0900: 6e 63 72 79 70 74 69 6f 6e 2e 20 20 54 68 65 20  ncryption.  The 
0910: 52 43 34 20 61 6c 67 6f 72 69 74 68 6d 20 69 73  RC4 algorithm is
0920: 20 62 65 69 6e 67 20 75 73 65 64 20 61 73 20 61   being used as a
0930: 20 50 52 4e 47 20 28 70 73 65 75 64 6f 2d 72 61   PRNG (pseudo-ra
0940: 6e 64 6f 6d 0a 20 20 2a 2a 20 6e 75 6d 62 65 72  ndom.  ** number
0950: 20 67 65 6e 65 72 61 74 6f 72 29 20 6e 6f 74 20   generator) not 
0960: 61 73 20 61 6e 20 65 6e 63 72 79 70 74 69 6f 6e  as an encryption
0970: 20 64 65 76 69 63 65 2e 0a 20 20 2a 2f 0a 20 20   device..  */.  
0980: 69 66 28 20 21 77 73 64 50 72 6e 67 2e 69 73 49  if( !wsdPrng.isI
0990: 6e 69 74 20 29 7b 0a 20 20 20 20 69 6e 74 20 69  nit ){.    int i
09a0: 3b 0a 20 20 20 20 63 68 61 72 20 6b 5b 32 35 36  ;.    char k[256
09b0: 5d 3b 0a 20 20 20 20 77 73 64 50 72 6e 67 2e 6a  ];.    wsdPrng.j
09c0: 20 3d 20 30 3b 0a 20 20 20 20 77 73 64 50 72 6e   = 0;.    wsdPrn
09d0: 67 2e 69 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c  g.i = 0;.    sql
09e0: 69 74 65 33 4f 73 52 61 6e 64 6f 6d 6e 65 73 73  ite3OsRandomness
09f0: 28 73 71 6c 69 74 65 33 5f 76 66 73 5f 66 69 6e  (sqlite3_vfs_fin
0a00: 64 28 30 29 2c 20 32 35 36 2c 20 6b 29 3b 0a 20  d(0), 256, k);. 
0a10: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 32 35     for(i=0; i<25
0a20: 36 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 77  6; i++){.      w
0a30: 73 64 50 72 6e 67 2e 73 5b 69 5d 20 3d 20 28 75  sdPrng.s[i] = (u
0a40: 38 29 69 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66  8)i;.    }.    f
0a50: 6f 72 28 69 3d 30 3b 20 69 3c 32 35 36 3b 20 69  or(i=0; i<256; i
0a60: 2b 2b 29 7b 0a 20 20 20 20 20 20 77 73 64 50 72  ++){.      wsdPr
0a70: 6e 67 2e 6a 20 2b 3d 20 77 73 64 50 72 6e 67 2e  ng.j += wsdPrng.
0a80: 73 5b 69 5d 20 2b 20 6b 5b 69 5d 3b 0a 20 20 20  s[i] + k[i];.   
0a90: 20 20 20 74 20 3d 20 77 73 64 50 72 6e 67 2e 73     t = wsdPrng.s
0aa0: 5b 77 73 64 50 72 6e 67 2e 6a 5d 3b 0a 20 20 20  [wsdPrng.j];.   
0ab0: 20 20 20 77 73 64 50 72 6e 67 2e 73 5b 77 73 64     wsdPrng.s[wsd
0ac0: 50 72 6e 67 2e 6a 5d 20 3d 20 77 73 64 50 72 6e  Prng.j] = wsdPrn
0ad0: 67 2e 73 5b 69 5d 3b 0a 20 20 20 20 20 20 77 73  g.s[i];.      ws
0ae0: 64 50 72 6e 67 2e 73 5b 69 5d 20 3d 20 74 3b 0a  dPrng.s[i] = t;.
0af0: 20 20 20 20 7d 0a 20 20 20 20 77 73 64 50 72 6e      }.    wsdPrn
0b00: 67 2e 69 73 49 6e 69 74 20 3d 20 31 3b 0a 20 20  g.isInit = 1;.  
0b10: 7d 0a 0a 20 20 61 73 73 65 72 74 28 20 4e 3e 30  }..  assert( N>0
0b20: 20 29 3b 0a 20 20 64 6f 7b 0a 20 20 20 20 77 73   );.  do{.    ws
0b30: 64 50 72 6e 67 2e 69 2b 2b 3b 0a 20 20 20 20 74  dPrng.i++;.    t
0b40: 20 3d 20 77 73 64 50 72 6e 67 2e 73 5b 77 73 64   = wsdPrng.s[wsd
0b50: 50 72 6e 67 2e 69 5d 3b 0a 20 20 20 20 77 73 64  Prng.i];.    wsd
0b60: 50 72 6e 67 2e 6a 20 2b 3d 20 74 3b 0a 20 20 20  Prng.j += t;.   
0b70: 20 77 73 64 50 72 6e 67 2e 73 5b 77 73 64 50 72   wsdPrng.s[wsdPr
0b80: 6e 67 2e 69 5d 20 3d 20 77 73 64 50 72 6e 67 2e  ng.i] = wsdPrng.
0b90: 73 5b 77 73 64 50 72 6e 67 2e 6a 5d 3b 0a 20 20  s[wsdPrng.j];.  
0ba0: 20 20 77 73 64 50 72 6e 67 2e 73 5b 77 73 64 50    wsdPrng.s[wsdP
0bb0: 72 6e 67 2e 6a 5d 20 3d 20 74 3b 0a 20 20 20 20  rng.j] = t;.    
0bc0: 74 20 2b 3d 20 77 73 64 50 72 6e 67 2e 73 5b 77  t += wsdPrng.s[w
0bd0: 73 64 50 72 6e 67 2e 69 5d 3b 0a 20 20 20 20 2a  sdPrng.i];.    *
0be0: 28 7a 42 75 66 2b 2b 29 20 3d 20 77 73 64 50 72  (zBuf++) = wsdPr
0bf0: 6e 67 2e 73 5b 74 5d 3b 0a 20 20 7d 77 68 69 6c  ng.s[t];.  }whil
0c00: 65 28 20 2d 2d 4e 20 29 3b 0a 20 20 73 71 6c 69  e( --N );.  sqli
0c10: 74 65 33 5f 6d 75 74 65 78 5f 6c 65 61 76 65 28  te3_mutex_leave(
0c20: 6d 75 74 65 78 29 3b 0a 7d 0a 0a 23 69 66 6e 64  mutex);.}..#ifnd
0c30: 65 66 20 53 51 4c 49 54 45 5f 55 4e 54 45 53 54  ef SQLITE_UNTEST
0c40: 41 42 4c 45 0a 2f 2a 0a 2a 2a 20 46 6f 72 20 74  ABLE./*.** For t
0c50: 65 73 74 69 6e 67 20 70 75 72 70 6f 73 65 73 2c  esting purposes,
0c60: 20 77 65 20 73 6f 6d 65 74 69 6d 65 73 20 77 61   we sometimes wa
0c70: 6e 74 20 74 6f 20 70 72 65 73 65 72 76 65 20 74  nt to preserve t
0c80: 68 65 20 73 74 61 74 65 20 6f 66 0a 2a 2a 20 50  he state of.** P
0c90: 52 4e 47 20 61 6e 64 20 72 65 73 74 6f 72 65 20  RNG and restore 
0ca0: 74 68 65 20 50 52 4e 47 20 74 6f 20 69 74 73 20  the PRNG to its 
0cb0: 73 61 76 65 64 20 73 74 61 74 65 20 61 74 20 61  saved state at a
0cc0: 20 6c 61 74 65 72 20 74 69 6d 65 2c 20 6f 72 0a   later time, or.
0cd0: 2a 2a 20 74 6f 20 72 65 73 65 74 20 74 68 65 20  ** to reset the 
0ce0: 50 52 4e 47 20 74 6f 20 69 74 73 20 69 6e 69 74  PRNG to its init
0cf0: 69 61 6c 20 73 74 61 74 65 2e 20 20 54 68 65 73  ial state.  Thes
0d00: 65 20 72 6f 75 74 69 6e 65 73 20 61 63 63 6f 6d  e routines accom
0d10: 70 6c 69 73 68 0a 2a 2a 20 74 68 6f 73 65 20 74  plish.** those t
0d20: 61 73 6b 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  asks..**.** The 
0d30: 73 71 6c 69 74 65 33 5f 74 65 73 74 5f 63 6f 6e  sqlite3_test_con
0d40: 74 72 6f 6c 28 29 20 69 6e 74 65 72 66 61 63 65  trol() interface
0d50: 20 63 61 6c 6c 73 20 74 68 65 73 65 20 72 6f 75   calls these rou
0d60: 74 69 6e 65 73 20 74 6f 0a 2a 2a 20 63 6f 6e 74  tines to.** cont
0d70: 72 6f 6c 20 74 68 65 20 50 52 4e 47 2e 0a 2a 2f  rol the PRNG..*/
0d80: 0a 73 74 61 74 69 63 20 53 51 4c 49 54 45 5f 57  .static SQLITE_W
0d90: 53 44 20 73 74 72 75 63 74 20 73 71 6c 69 74 65  SD struct sqlite
0da0: 33 50 72 6e 67 54 79 70 65 20 73 71 6c 69 74 65  3PrngType sqlite
0db0: 33 53 61 76 65 64 50 72 6e 67 3b 0a 76 6f 69 64  3SavedPrng;.void
0dc0: 20 73 71 6c 69 74 65 33 50 72 6e 67 53 61 76 65   sqlite3PrngSave
0dd0: 53 74 61 74 65 28 76 6f 69 64 29 7b 0a 20 20 6d  State(void){.  m
0de0: 65 6d 63 70 79 28 0a 20 20 20 20 26 47 4c 4f 42  emcpy(.    &GLOB
0df0: 41 4c 28 73 74 72 75 63 74 20 73 71 6c 69 74 65  AL(struct sqlite
0e00: 33 50 72 6e 67 54 79 70 65 2c 20 73 71 6c 69 74  3PrngType, sqlit
0e10: 65 33 53 61 76 65 64 50 72 6e 67 29 2c 0a 20 20  e3SavedPrng),.  
0e20: 20 20 26 47 4c 4f 42 41 4c 28 73 74 72 75 63 74    &GLOBAL(struct
0e30: 20 73 71 6c 69 74 65 33 50 72 6e 67 54 79 70 65   sqlite3PrngType
0e40: 2c 20 73 71 6c 69 74 65 33 50 72 6e 67 29 2c 0a  , sqlite3Prng),.
0e50: 20 20 20 20 73 69 7a 65 6f 66 28 73 71 6c 69 74      sizeof(sqlit
0e60: 65 33 50 72 6e 67 29 0a 20 20 29 3b 0a 7d 0a 76  e3Prng).  );.}.v
0e70: 6f 69 64 20 73 71 6c 69 74 65 33 50 72 6e 67 52  oid sqlite3PrngR
0e80: 65 73 74 6f 72 65 53 74 61 74 65 28 76 6f 69 64  estoreState(void
0e90: 29 7b 0a 20 20 6d 65 6d 63 70 79 28 0a 20 20 20  ){.  memcpy(.   
0ea0: 20 26 47 4c 4f 42 41 4c 28 73 74 72 75 63 74 20   &GLOBAL(struct 
0eb0: 73 71 6c 69 74 65 33 50 72 6e 67 54 79 70 65 2c  sqlite3PrngType,
0ec0: 20 73 71 6c 69 74 65 33 50 72 6e 67 29 2c 0a 20   sqlite3Prng),. 
0ed0: 20 20 20 26 47 4c 4f 42 41 4c 28 73 74 72 75 63     &GLOBAL(struc
0ee0: 74 20 73 71 6c 69 74 65 33 50 72 6e 67 54 79 70  t sqlite3PrngTyp
0ef0: 65 2c 20 73 71 6c 69 74 65 33 53 61 76 65 64 50  e, sqlite3SavedP
0f00: 72 6e 67 29 2c 0a 20 20 20 20 73 69 7a 65 6f 66  rng),.    sizeof
0f10: 28 73 71 6c 69 74 65 33 50 72 6e 67 29 0a 20 20  (sqlite3Prng).  
0f20: 29 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53  );.}.#endif /* S
0f30: 51 4c 49 54 45 5f 55 4e 54 45 53 54 41 42 4c 45  QLITE_UNTESTABLE
0f40: 20 2a 2f 0a                                       */.