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 69 ******.** This i
0180: 73 20 74 68 65 20 69 6d 70 6c 65 6d 65 6e 74 61 s the implementa
0190: 74 69 6f 6e 20 6f 66 20 74 68 65 20 70 61 67 65 tion of the page
01a0: 20 63 61 63 68 65 20 73 75 62 73 79 73 74 65 6d cache subsystem
01b0: 20 6f 72 20 22 70 61 67 65 72 22 2e 0a 2a 2a 20 or "pager"..**
01c0: 0a 2a 2a 20 54 68 65 20 70 61 67 65 72 20 69 73 .** The pager is
01d0: 20 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 used to access
01e0: 61 20 64 61 74 61 62 61 73 65 20 64 69 73 6b 20 a database disk
01f0: 66 69 6c 65 2e 20 20 49 74 20 69 6d 70 6c 65 6d file. It implem
0200: 65 6e 74 73 0a 2a 2a 20 61 74 6f 6d 69 63 20 63 ents.** atomic c
0210: 6f 6d 6d 69 74 20 61 6e 64 20 72 6f 6c 6c 62 61 ommit and rollba
0220: 63 6b 20 74 68 72 6f 75 67 68 20 74 68 65 20 75 ck through the u
0230: 73 65 20 6f 66 20 61 20 6a 6f 75 72 6e 61 6c 20 se of a journal
0240: 66 69 6c 65 20 74 68 61 74 0a 2a 2a 20 69 73 20 file that.** is
0250: 73 65 70 61 72 61 74 65 20 66 72 6f 6d 20 74 68 separate from th
0260: 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 2e e database file.
0270: 20 20 54 68 65 20 70 61 67 65 72 20 61 6c 73 6f The pager also
0280: 20 69 6d 70 6c 65 6d 65 6e 74 73 20 66 69 6c 65 implements file
0290: 0a 2a 2a 20 6c 6f 63 6b 69 6e 67 20 74 6f 20 70 .** locking to p
02a0: 72 65 76 65 6e 74 20 74 77 6f 20 70 72 6f 63 65 revent two proce
02b0: 73 73 65 73 20 66 72 6f 6d 20 77 72 69 74 69 6e sses from writin
02c0: 67 20 74 68 65 20 73 61 6d 65 20 64 61 74 61 62 g the same datab
02d0: 61 73 65 0a 2a 2a 20 66 69 6c 65 20 73 69 6d 75 ase.** file simu
02e0: 6c 74 61 6e 65 6f 75 73 6c 79 2c 20 6f 72 20 6f ltaneously, or o
02f0: 6e 65 20 70 72 6f 63 65 73 73 20 66 72 6f 6d 20 ne process from
0300: 72 65 61 64 69 6e 67 20 74 68 65 20 64 61 74 61 reading the data
0310: 62 61 73 65 20 77 68 69 6c 65 0a 2a 2a 20 61 6e base while.** an
0320: 6f 74 68 65 72 20 69 73 20 77 72 69 74 69 6e 67 other is writing
0330: 2e 0a 2a 2a 0a 2a 2a 20 40 28 23 29 20 24 49 64 ..**.** @(#) $Id
0340: 3a 20 70 61 67 65 72 2e 63 2c 76 20 31 2e 32 30 : pager.c,v 1.20
0350: 20 32 30 30 31 2f 30 39 2f 31 36 20 30 30 3a 31 2001/09/16 00:1
0360: 33 3a 32 37 20 64 72 68 20 45 78 70 20 24 0a 2a 3:27 drh Exp $.*
0370: 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 /.#include "sqli
0380: 74 65 49 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 teInt.h".#includ
0390: 65 20 22 70 61 67 65 72 2e 68 22 0a 23 69 6e 63 e "pager.h".#inc
03a0: 6c 75 64 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a 23 lude <fcntl.h>.#
03b0: 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 73 74 61 include <sys/sta
03c0: 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 75 t.h>.#include <u
03d0: 6e 69 73 74 64 2e 68 3e 0a 23 69 6e 63 6c 75 64 nistd.h>.#includ
03e0: 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69 6e e <assert.h>.#in
03f0: 63 6c 75 64 65 20 3c 73 74 72 69 6e 67 2e 68 3e clude <string.h>
0400: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 70 61 67 65 ../*.** The page
0410: 20 63 61 63 68 65 20 61 73 20 61 20 77 68 6f 6c cache as a whol
0420: 65 20 69 73 20 61 6c 77 61 79 73 20 69 6e 20 6f e is always in o
0430: 6e 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 ne of the follow
0440: 69 6e 67 0a 2a 2a 20 73 74 61 74 65 73 3a 0a 2a ing.** states:.*
0450: 2a 0a 2a 2a 20 20 20 53 51 4c 49 54 45 5f 55 4e *.** SQLITE_UN
0460: 4c 4f 43 4b 20 20 20 20 20 20 20 54 68 65 20 70 LOCK The p
0470: 61 67 65 20 63 61 63 68 65 20 69 73 20 6e 6f 74 age cache is not
0480: 20 63 75 72 72 65 6e 74 6c 79 20 72 65 61 64 69 currently readi
0490: 6e 67 20 6f 72 20 0a 2a 2a 20 20 20 20 20 20 20 ng or .**
04a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
04b0: 77 72 69 74 69 6e 67 20 74 68 65 20 64 61 74 61 writing the data
04c0: 62 61 73 65 20 66 69 6c 65 2e 20 20 54 68 65 72 base file. Ther
04d0: 65 20 69 73 20 6e 6f 0a 2a 2a 20 20 20 20 20 20 e is no.**
04e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
04f0: 20 64 61 74 61 20 68 65 6c 64 20 69 6e 20 6d 65 data held in me
0500: 6d 6f 72 79 2e 20 20 54 68 69 73 20 69 73 20 74 mory. This is t
0510: 68 65 20 69 6e 69 74 69 61 6c 0a 2a 2a 20 20 20 he initial.**
0520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0530: 20 20 20 20 73 74 61 74 65 2e 0a 2a 2a 0a 2a 2a state..**.**
0540: 20 20 20 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f SQLITE_READLO
0550: 43 4b 20 20 20 20 20 54 68 65 20 70 61 67 65 20 CK The page
0560: 63 61 63 68 65 20 69 73 20 72 65 61 64 69 6e 67 cache is reading
0570: 20 74 68 65 20 64 61 74 61 62 61 73 65 2e 0a 2a the database..*
0580: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
0590: 20 20 20 20 20 20 20 20 57 72 69 74 69 6e 67 20 Writing
05a0: 69 73 20 6e 6f 74 20 70 65 72 6d 69 74 74 65 64 is not permitted
05b0: 2e 20 20 54 68 65 72 65 20 63 61 6e 20 62 65 0a . There can be.
05c0: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
05d0: 20 20 20 20 20 20 20 20 20 6d 75 6c 74 69 70 6c multipl
05e0: 65 20 72 65 61 64 65 72 73 20 61 63 63 65 73 73 e readers access
05f0: 69 6e 67 20 74 68 65 20 73 61 6d 65 20 64 61 74 ing the same dat
0600: 61 62 61 73 65 0a 2a 2a 20 20 20 20 20 20 20 20 abase.**
0610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 f
0620: 69 6c 65 20 61 74 20 74 68 65 20 73 61 6d 65 20 ile at the same
0630: 74 69 6d 65 2e 0a 2a 2a 0a 2a 2a 20 20 20 53 51 time..**.** SQ
0640: 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 20 20 LITE_WRITELOCK
0650: 20 20 54 68 65 20 70 61 67 65 20 63 61 63 68 65 The page cache
0660: 20 69 73 20 77 72 69 74 69 6e 67 20 74 68 65 20 is writing the
0670: 64 61 74 61 62 61 73 65 2e 0a 2a 2a 20 20 20 20 database..**
0680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0690: 20 20 20 41 63 63 65 73 73 20 69 73 20 65 78 63 Access is exc
06a0: 6c 75 73 69 76 65 2e 20 20 4e 6f 20 6f 74 68 65 lusive. No othe
06b0: 72 20 70 72 6f 63 65 73 73 65 73 20 6f 72 0a 2a r processes or.*
06c0: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
06d0: 20 20 20 20 20 20 20 20 74 68 72 65 61 64 73 20 threads
06e0: 63 61 6e 20 62 65 20 72 65 61 64 69 6e 67 20 6f can be reading o
06f0: 72 20 77 72 69 74 69 6e 67 20 77 68 69 6c 65 20 r writing while
0700: 6f 6e 65 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 one.**
0710: 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 6f pro
0720: 63 65 73 73 20 69 73 20 77 72 69 74 69 6e 67 2e cess is writing.
0730: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 70 61 67 65 20 .**.** The page
0740: 63 61 63 68 65 20 63 6f 6d 65 73 20 75 70 20 69 cache comes up i
0750: 6e 20 53 51 4c 49 54 45 5f 55 4e 4c 4f 43 4b 2e n SQLITE_UNLOCK.
0760: 20 20 54 68 65 20 66 69 72 73 74 20 74 69 6d 65 The first time
0770: 20 61 0a 2a 2a 20 73 71 6c 69 74 65 5f 70 61 67 a.** sqlite_pag
0780: 65 5f 67 65 74 28 29 20 6f 63 63 75 72 73 2c 20 e_get() occurs,
0790: 74 68 65 20 73 74 61 74 65 20 74 72 61 6e 73 69 the state transi
07a0: 74 69 6f 6e 73 20 74 6f 20 53 51 4c 49 54 45 5f tions to SQLITE_
07b0: 52 45 41 44 4c 4f 43 4b 2e 0a 2a 2a 20 41 66 74 READLOCK..** Aft
07c0: 65 72 20 61 6c 6c 20 70 61 67 65 73 20 68 61 76 er all pages hav
07d0: 65 20 62 65 65 6e 20 72 65 6c 65 61 73 65 64 20 e been released
07e0: 75 73 69 6e 67 20 73 71 6c 69 74 65 5f 70 61 67 using sqlite_pag
07f0: 65 5f 75 6e 72 65 66 28 29 2c 0a 2a 2a 20 74 68 e_unref(),.** th
0800: 65 20 73 74 61 74 65 20 74 72 61 6e 73 69 74 69 e state transiti
0810: 6f 6e 73 20 62 61 63 6b 20 74 6f 20 53 51 4c 49 ons back to SQLI
0820: 54 45 5f 55 4e 4c 4f 43 4b 2e 20 20 54 68 65 20 TE_UNLOCK. The
0830: 66 69 72 73 74 20 74 69 6d 65 0a 2a 2a 20 74 68 first time.** th
0840: 61 74 20 73 71 6c 69 74 65 5f 70 61 67 65 5f 77 at sqlite_page_w
0850: 72 69 74 65 28 29 20 69 73 20 63 61 6c 6c 65 64 rite() is called
0860: 2c 20 74 68 65 20 73 74 61 74 65 20 74 72 61 6e , the state tran
0870: 73 69 74 69 6f 6e 73 20 74 6f 0a 2a 2a 20 53 51 sitions to.** SQ
0880: 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 2e 20 LITE_WRITELOCK.
0890: 20 28 4e 6f 74 65 20 74 68 61 74 20 73 71 6c 69 (Note that sqli
08a0: 74 65 5f 70 61 67 65 5f 77 72 69 74 65 28 29 20 te_page_write()
08b0: 63 61 6e 20 6f 6e 6c 79 20 62 65 0a 2a 2a 20 63 can only be.** c
08c0: 61 6c 6c 65 64 20 6f 6e 20 61 6e 20 6f 75 74 73 alled on an outs
08d0: 74 61 6e 64 69 6e 67 20 70 61 67 65 20 77 68 69 tanding page whi
08e0: 63 68 20 6d 65 61 6e 73 20 74 68 61 74 20 74 68 ch means that th
08f0: 65 20 70 61 67 65 72 20 6d 75 73 74 0a 2a 2a 20 e pager must.**
0900: 62 65 20 69 6e 20 53 51 4c 49 54 45 5f 52 45 41 be in SQLITE_REA
0910: 44 4c 4f 43 4b 20 62 65 66 6f 72 65 20 69 74 20 DLOCK before it
0920: 74 72 61 6e 73 69 74 69 6f 6e 73 20 74 6f 20 53 transitions to S
0930: 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 2e QLITE_WRITELOCK.
0940: 29 0a 2a 2a 20 54 68 65 20 73 71 6c 69 74 65 5f ).** The sqlite_
0950: 70 61 67 65 5f 72 6f 6c 6c 62 61 63 6b 28 29 20 page_rollback()
0960: 61 6e 64 20 73 71 6c 69 74 65 5f 70 61 67 65 5f and sqlite_page_
0970: 63 6f 6d 6d 69 74 28 29 20 66 75 6e 63 74 69 6f commit() functio
0980: 6e 73 20 0a 2a 2a 20 74 72 61 6e 73 69 74 69 6f ns .** transitio
0990: 6e 20 74 68 65 20 73 74 61 74 65 20 66 72 6f 6d n the state from
09a0: 20 53 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 SQLITE_WRITELOC
09b0: 4b 20 62 61 63 6b 20 74 6f 20 53 51 4c 49 54 45 K back to SQLITE
09c0: 5f 52 45 41 44 4c 4f 43 4b 2e 0a 2a 2f 0a 23 64 _READLOCK..*/.#d
09d0: 65 66 69 6e 65 20 53 51 4c 49 54 45 5f 55 4e 4c efine SQLITE_UNL
09e0: 4f 43 4b 20 20 20 20 20 20 30 0a 23 64 65 66 69 OCK 0.#defi
09f0: 6e 65 20 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f ne SQLITE_READLO
0a00: 43 4b 20 20 20 20 31 0a 23 64 65 66 69 6e 65 20 CK 1.#define
0a10: 53 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b SQLITE_WRITELOCK
0a20: 20 20 20 32 0a 0a 0a 2f 2a 0a 2a 2a 20 45 61 63 2.../*.** Eac
0a30: 68 20 69 6e 2d 6d 65 6d 6f 72 79 20 69 6d 61 67 h in-memory imag
0a40: 65 20 6f 66 20 61 20 70 61 67 65 20 62 65 67 69 e of a page begi
0a50: 6e 73 20 77 69 74 68 20 74 68 65 20 66 6f 6c 6c ns with the foll
0a60: 6f 77 69 6e 67 20 68 65 61 64 65 72 2e 0a 2a 2a owing header..**
0a70: 20 54 68 69 73 20 68 65 61 64 65 72 20 69 73 20 This header is
0a80: 6f 6e 6c 79 20 76 69 73 69 62 6c 65 20 74 6f 20 only visible to
0a90: 74 68 69 73 20 70 61 67 65 72 20 6d 6f 64 75 6c this pager modul
0aa0: 65 2e 20 20 54 68 65 20 63 6c 69 65 6e 74 0a 2a e. The client.*
0ab0: 2a 20 63 6f 64 65 20 74 68 61 74 20 63 61 6c 6c * code that call
0ac0: 73 20 70 61 67 65 72 20 73 65 65 73 20 6f 6e 6c s pager sees onl
0ad0: 79 20 74 68 65 20 64 61 74 61 20 74 68 61 74 20 y the data that
0ae0: 66 6f 6c 6c 6f 77 73 20 74 68 65 20 68 65 61 64 follows the head
0af0: 65 72 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 er..*/.typedef s
0b00: 74 72 75 63 74 20 50 67 48 64 72 20 50 67 48 64 truct PgHdr PgHd
0b10: 72 3b 0a 73 74 72 75 63 74 20 50 67 48 64 72 20 r;.struct PgHdr
0b20: 7b 0a 20 20 50 61 67 65 72 20 2a 70 50 61 67 65 {. Pager *pPage
0b30: 72 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r;
0b40: 20 20 20 2f 2a 20 54 68 65 20 70 61 67 65 72 20 /* The pager
0b50: 74 6f 20 77 68 69 63 68 20 74 68 69 73 20 70 61 to which this pa
0b60: 67 65 20 62 65 6c 6f 6e 67 73 20 2a 2f 0a 20 20 ge belongs */.
0b70: 50 67 6e 6f 20 70 67 6e 6f 3b 20 20 20 20 20 20 Pgno pgno;
0b80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
0b90: 2a 20 54 68 65 20 70 61 67 65 20 6e 75 6d 62 65 * The page numbe
0ba0: 72 20 66 6f 72 20 74 68 69 73 20 70 61 67 65 20 r for this page
0bb0: 2a 2f 0a 20 20 50 67 48 64 72 20 2a 70 4e 65 78 */. PgHdr *pNex
0bc0: 74 48 61 73 68 2c 20 2a 70 50 72 65 76 48 61 73 tHash, *pPrevHas
0bd0: 68 3b 20 20 2f 2a 20 48 61 73 68 20 63 6f 6c 6c h; /* Hash coll
0be0: 69 73 69 6f 6e 20 63 68 61 69 6e 20 66 6f 72 20 ision chain for
0bf0: 50 67 48 64 72 2e 70 67 6e 6f 20 2a 2f 0a 20 20 PgHdr.pgno */.
0c00: 69 6e 74 20 6e 52 65 66 3b 20 20 20 20 20 20 20 int nRef;
0c10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
0c20: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 75 73 65 72 * Number of user
0c30: 73 20 6f 66 20 74 68 69 73 20 70 61 67 65 20 2a s of this page *
0c40: 2f 0a 20 20 50 67 48 64 72 20 2a 70 4e 65 78 74 /. PgHdr *pNext
0c50: 46 72 65 65 2c 20 2a 70 50 72 65 76 46 72 65 65 Free, *pPrevFree
0c60: 3b 20 20 2f 2a 20 46 72 65 65 6c 69 73 74 20 6f ; /* Freelist o
0c70: 66 20 70 61 67 65 73 20 77 68 65 72 65 20 6e 52 f pages where nR
0c80: 65 66 3d 3d 30 20 2a 2f 0a 20 20 50 67 48 64 72 ef==0 */. PgHdr
0c90: 20 2a 70 4e 65 78 74 41 6c 6c 2c 20 2a 70 50 72 *pNextAll, *pPr
0ca0: 65 76 41 6c 6c 3b 20 20 20 20 2f 2a 20 41 20 6c evAll; /* A l
0cb0: 69 73 74 20 6f 66 20 61 6c 6c 20 70 61 67 65 73 ist of all pages
0cc0: 20 2a 2f 0a 20 20 63 68 61 72 20 69 6e 4a 6f 75 */. char inJou
0cd0: 72 6e 61 6c 3b 20 20 20 20 20 20 20 20 20 20 20 rnal;
0ce0: 20 20 20 20 20 2f 2a 20 54 52 55 45 20 69 66 20 /* TRUE if
0cf0: 68 61 73 20 62 65 65 6e 20 77 72 69 74 74 65 6e has been written
0d00: 20 74 6f 20 6a 6f 75 72 6e 61 6c 20 2a 2f 0a 20 to journal */.
0d10: 20 63 68 61 72 20 64 69 72 74 79 3b 20 20 20 20 char dirty;
0d20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0d30: 2f 2a 20 54 52 55 45 20 69 66 20 77 65 20 6e 65 /* TRUE if we ne
0d40: 65 64 20 74 6f 20 77 72 69 74 65 20 62 61 63 6b ed to write back
0d50: 20 63 68 61 6e 67 65 73 20 2a 2f 0a 20 20 2f 2a changes */. /*
0d60: 20 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a SQLITE_PAGE_SIZ
0d70: 45 20 62 79 74 65 73 20 6f 66 20 70 61 67 65 20 E bytes of page
0d80: 64 61 74 61 20 66 6f 6c 6c 6f 77 20 74 68 69 73 data follow this
0d90: 20 68 65 61 64 65 72 20 2a 2f 0a 20 20 2f 2a 20 header */. /*
0da0: 50 61 67 65 72 2e 6e 45 78 74 72 61 20 62 79 74 Pager.nExtra byt
0db0: 65 73 20 6f 66 20 6c 6f 63 61 6c 20 64 61 74 61 es of local data
0dc0: 20 66 6f 6c 6c 6f 77 20 74 68 65 20 70 61 67 65 follow the page
0dd0: 20 64 61 74 61 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a data */.};../*.
0de0: 2a 2a 20 43 6f 6e 76 65 72 74 20 61 20 70 6f 69 ** Convert a poi
0df0: 6e 74 65 72 20 74 6f 20 61 20 50 67 48 64 72 20 nter to a PgHdr
0e00: 69 6e 74 6f 20 61 20 70 6f 69 6e 74 65 72 20 74 into a pointer t
0e10: 6f 20 69 74 73 20 64 61 74 61 0a 2a 2a 20 61 6e o its data.** an
0e20: 64 20 62 61 63 6b 20 61 67 61 69 6e 2e 0a 2a 2f d back again..*/
0e30: 0a 23 64 65 66 69 6e 65 20 50 47 48 44 52 5f 54 .#define PGHDR_T
0e40: 4f 5f 44 41 54 41 28 50 29 20 20 28 28 76 6f 69 O_DATA(P) ((voi
0e50: 64 2a 29 28 26 28 50 29 5b 31 5d 29 29 0a 23 64 d*)(&(P)[1])).#d
0e60: 65 66 69 6e 65 20 44 41 54 41 5f 54 4f 5f 50 47 efine DATA_TO_PG
0e70: 48 44 52 28 44 29 20 20 28 26 28 28 50 67 48 64 HDR(D) (&((PgHd
0e80: 72 2a 29 28 44 29 29 5b 2d 31 5d 29 0a 23 64 65 r*)(D))[-1]).#de
0e90: 66 69 6e 65 20 50 47 48 44 52 5f 54 4f 5f 45 58 fine PGHDR_TO_EX
0ea0: 54 52 41 28 50 29 20 28 28 76 6f 69 64 2a 29 26 TRA(P) ((void*)&
0eb0: 28 28 63 68 61 72 2a 29 28 26 28 50 29 5b 31 5d ((char*)(&(P)[1]
0ec0: 29 29 5b 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 ))[SQLITE_PAGE_S
0ed0: 49 5a 45 5d 29 0a 0a 2f 2a 0a 2a 2a 20 48 6f 77 IZE])../*.** How
0ee0: 20 62 69 67 20 74 6f 20 6d 61 6b 65 20 74 68 65 big to make the
0ef0: 20 68 61 73 68 20 74 61 62 6c 65 20 75 73 65 64 hash table used
0f00: 20 66 6f 72 20 6c 6f 63 61 74 69 6e 67 20 69 6e for locating in
0f10: 2d 6d 65 6d 6f 72 79 20 70 61 67 65 73 0a 2a 2a -memory pages.**
0f20: 20 62 79 20 70 61 67 65 20 6e 75 6d 62 65 72 2e by page number.
0f30: 20 20 4b 6e 75 74 68 20 73 61 79 73 20 74 68 69 Knuth says thi
0f40: 73 20 73 68 6f 75 6c 64 20 62 65 20 61 20 70 72 s should be a pr
0f50: 69 6d 65 20 6e 75 6d 62 65 72 2e 0a 2a 2f 0a 23 ime number..*/.#
0f60: 64 65 66 69 6e 65 20 4e 5f 50 47 5f 48 41 53 48 define N_PG_HASH
0f70: 20 33 37 33 0a 0a 2f 2a 0a 2a 2a 20 41 20 6f 70 373../*.** A op
0f80: 65 6e 20 70 61 67 65 20 63 61 63 68 65 20 69 73 en page cache is
0f90: 20 61 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 an instance of
0fa0: 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 the following st
0fb0: 72 75 63 74 75 72 65 2e 0a 2a 2f 0a 73 74 72 75 ructure..*/.stru
0fc0: 63 74 20 50 61 67 65 72 20 7b 0a 20 20 63 68 61 ct Pager {. cha
0fd0: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 3b 20 20 20 r *zFilename;
0fe0: 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 61 6d 65 /* Name
0ff0: 20 6f 66 20 74 68 65 20 64 61 74 61 62 61 73 65 of the database
1000: 20 66 69 6c 65 20 2a 2f 0a 20 20 63 68 61 72 20 file */. char
1010: 2a 7a 4a 6f 75 72 6e 61 6c 3b 20 20 20 20 20 20 *zJournal;
1020: 20 20 20 20 20 20 20 2f 2a 20 4e 61 6d 65 20 6f /* Name o
1030: 66 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 66 69 f the journal fi
1040: 6c 65 20 2a 2f 0a 20 20 69 6e 74 20 66 64 2c 20 le */. int fd,
1050: 6a 66 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 jfd;
1060: 20 20 20 20 2f 2a 20 46 69 6c 65 20 64 65 73 63 /* File desc
1070: 72 69 70 74 6f 72 73 20 66 6f 72 20 64 61 74 61 riptors for data
1080: 62 61 73 65 20 61 6e 64 20 6a 6f 75 72 6e 61 6c base and journal
1090: 20 2a 2f 0a 20 20 69 6e 74 20 64 62 53 69 7a 65 */. int dbSize
10a0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
10b0: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 70 /* Number of p
10c0: 61 67 65 73 20 69 6e 20 74 68 65 20 66 69 6c 65 ages in the file
10d0: 20 2a 2f 0a 20 20 69 6e 74 20 6f 72 69 67 44 62 */. int origDb
10e0: 53 69 7a 65 3b 20 20 20 20 20 20 20 20 20 20 20 Size;
10f0: 20 20 2f 2a 20 64 62 53 69 7a 65 20 62 65 66 6f /* dbSize befo
1100: 72 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 63 re the current c
1110: 68 61 6e 67 65 20 2a 2f 0a 20 20 69 6e 74 20 6e hange */. int n
1120: 45 78 74 72 61 3b 20 20 20 20 20 20 20 20 20 20 Extra;
1130: 20 20 20 20 20 20 20 2f 2a 20 41 64 64 20 74 68 /* Add th
1140: 69 73 20 6d 61 6e 79 20 62 79 74 65 73 20 74 6f is many bytes to
1150: 20 65 61 63 68 20 69 6e 2d 6d 65 6d 6f 72 79 20 each in-memory
1160: 70 61 67 65 20 2a 2f 0a 20 20 76 6f 69 64 20 28 page */. void (
1170: 2a 78 44 65 73 74 72 75 63 74 6f 72 29 28 76 6f *xDestructor)(vo
1180: 69 64 2a 29 3b 20 2f 2a 20 43 61 6c 6c 20 74 68 id*); /* Call th
1190: 69 73 20 72 6f 75 74 69 6e 65 20 77 68 65 6e 20 is routine when
11a0: 66 72 65 65 69 6e 67 20 70 61 67 65 73 20 2a 2f freeing pages */
11b0: 0a 20 20 69 6e 74 20 6e 50 61 67 65 3b 20 20 20 . int nPage;
11c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
11d0: 2a 20 54 6f 74 61 6c 20 6e 75 6d 62 65 72 20 6f * Total number o
11e0: 66 20 69 6e 2d 6d 65 6d 6f 72 79 20 70 61 67 65 f in-memory page
11f0: 73 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 66 3b s */. int nRef;
1200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1210: 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 /* Number of
1220: 69 6e 2d 6d 65 6d 6f 72 79 20 70 61 67 65 73 20 in-memory pages
1230: 77 69 74 68 20 50 67 48 64 72 2e 6e 52 65 66 3e with PgHdr.nRef>
1240: 30 20 2a 2f 0a 20 20 69 6e 74 20 6d 78 50 61 67 0 */. int mxPag
1250: 65 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e;
1260: 20 20 20 2f 2a 20 4d 61 78 69 6d 75 6d 20 6e 75 /* Maximum nu
1270: 6d 62 65 72 20 6f 66 20 70 61 67 65 73 20 74 6f mber of pages to
1280: 20 68 6f 6c 64 20 69 6e 20 63 61 63 68 65 20 2a hold in cache *
1290: 2f 0a 20 20 69 6e 74 20 6e 48 69 74 2c 20 6e 4d /. int nHit, nM
12a0: 69 73 73 2c 20 6e 4f 76 66 6c 3b 20 20 20 20 20 iss, nOvfl;
12b0: 2f 2a 20 43 61 63 68 65 20 68 69 74 73 2c 20 6d /* Cache hits, m
12c0: 69 73 73 69 6e 67 2c 20 61 6e 64 20 4c 52 55 20 issing, and LRU
12d0: 6f 76 65 72 66 6c 6f 77 73 20 2a 2f 0a 20 20 75 overflows */. u
12e0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 73 74 61 nsigned char sta
12f0: 74 65 3b 20 20 20 20 20 20 20 20 2f 2a 20 53 51 te; /* SQ
1300: 4c 49 54 45 5f 55 4e 4c 4f 43 4b 2c 20 5f 52 45 LITE_UNLOCK, _RE
1310: 41 44 4c 4f 43 4b 20 6f 72 20 5f 57 52 49 54 45 ADLOCK or _WRITE
1320: 4c 4f 43 4b 20 2a 2f 0a 20 20 75 6e 73 69 67 6e LOCK */. unsign
1330: 65 64 20 63 68 61 72 20 65 72 72 4d 61 73 6b 3b ed char errMask;
1340: 20 20 20 20 20 20 2f 2a 20 4f 6e 65 20 6f 66 20 /* One of
1350: 73 65 76 65 72 61 6c 20 6b 69 6e 64 73 20 6f 66 several kinds of
1360: 20 65 72 72 6f 72 73 20 2a 2f 0a 20 20 75 6e 73 errors */. uns
1370: 69 67 6e 65 64 20 63 68 61 72 20 74 65 6d 70 46 igned char tempF
1380: 69 6c 65 3b 20 20 20 20 20 2f 2a 20 7a 46 69 6c ile; /* zFil
1390: 65 6e 61 6d 65 20 69 73 20 61 20 74 65 6d 70 6f ename is a tempo
13a0: 72 61 72 79 20 66 69 6c 65 20 2a 2f 0a 20 20 75 rary file */. u
13b0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 72 65 61 nsigned char rea
13c0: 64 4f 6e 6c 79 3b 20 20 20 20 20 2f 2a 20 54 72 dOnly; /* Tr
13d0: 75 65 20 66 6f 72 20 61 20 72 65 61 64 2d 6f 6e ue for a read-on
13e0: 6c 79 20 64 61 74 61 62 61 73 65 20 2a 2f 0a 20 ly database */.
13f0: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 6e unsigned char n
1400: 65 65 64 53 79 6e 63 3b 20 20 20 20 20 2f 2a 20 eedSync; /*
1410: 54 72 75 65 20 69 66 20 61 6e 20 66 73 79 6e 63 True if an fsync
1420: 28 29 20 69 73 20 6e 65 65 64 65 64 20 6f 6e 20 () is needed on
1430: 74 68 65 20 6a 6f 75 72 6e 61 6c 20 2a 2f 0a 20 the journal */.
1440: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a unsigned char *
1450: 61 49 6e 4a 6f 75 72 6e 61 6c 3b 20 20 2f 2a 20 aInJournal; /*
1460: 4f 6e 65 20 62 69 74 20 66 6f 72 20 65 61 63 68 One bit for each
1470: 20 70 61 67 65 20 69 6e 20 74 68 65 20 64 61 74 page in the dat
1480: 61 62 61 73 65 20 66 69 6c 65 20 2a 2f 0a 20 20 abase file */.
1490: 50 67 48 64 72 20 2a 70 46 69 72 73 74 2c 20 2a PgHdr *pFirst, *
14a0: 70 4c 61 73 74 3b 20 20 20 20 20 20 2f 2a 20 4c pLast; /* L
14b0: 69 73 74 20 6f 66 20 66 72 65 65 20 70 61 67 65 ist of free page
14c0: 73 20 2a 2f 0a 20 20 50 67 48 64 72 20 2a 70 41 s */. PgHdr *pA
14d0: 6c 6c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ll;
14e0: 20 20 20 2f 2a 20 4c 69 73 74 20 6f 66 20 61 6c /* List of al
14f0: 6c 20 70 61 67 65 73 20 2a 2f 0a 20 20 50 67 48 l pages */. PgH
1500: 64 72 20 2a 61 48 61 73 68 5b 4e 5f 50 47 5f 48 dr *aHash[N_PG_H
1510: 41 53 48 5d 3b 20 20 20 20 2f 2a 20 48 61 73 68 ASH]; /* Hash
1520: 20 74 61 62 6c 65 20 74 6f 20 6d 61 70 20 70 61 table to map pa
1530: 67 65 20 6e 75 6d 62 65 72 20 6f 66 20 50 67 48 ge number of PgH
1540: 64 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 dr */.};../*.**
1550: 54 68 65 73 65 20 61 72 65 20 62 69 74 73 20 74 These are bits t
1560: 68 61 74 20 63 61 6e 20 62 65 20 73 65 74 20 69 hat can be set i
1570: 6e 20 50 61 67 65 72 2e 65 72 72 4d 61 73 6b 2e n Pager.errMask.
1580: 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 50 41 47 45 .*/.#define PAGE
1590: 52 5f 45 52 52 5f 46 55 4c 4c 20 20 20 20 20 30 R_ERR_FULL 0
15a0: 78 30 31 20 20 2f 2a 20 61 20 77 72 69 74 65 28 x01 /* a write(
15b0: 29 20 66 61 69 6c 65 64 20 2a 2f 0a 23 64 65 66 ) failed */.#def
15c0: 69 6e 65 20 50 41 47 45 52 5f 45 52 52 5f 4d 45 ine PAGER_ERR_ME
15d0: 4d 20 20 20 20 20 20 30 78 30 32 20 20 2f 2a 20 M 0x02 /*
15e0: 6d 61 6c 6c 6f 63 28 29 20 66 61 69 6c 65 64 20 malloc() failed
15f0: 2a 2f 0a 23 64 65 66 69 6e 65 20 50 41 47 45 52 */.#define PAGER
1600: 5f 45 52 52 5f 4c 4f 43 4b 20 20 20 20 20 30 78 _ERR_LOCK 0x
1610: 30 34 20 20 2f 2a 20 65 72 72 6f 72 20 69 6e 20 04 /* error in
1620: 74 68 65 20 6c 6f 63 6b 69 6e 67 20 70 72 6f 74 the locking prot
1630: 6f 63 6f 6c 20 2a 2f 0a 23 64 65 66 69 6e 65 20 ocol */.#define
1640: 50 41 47 45 52 5f 45 52 52 5f 43 4f 52 52 55 50 PAGER_ERR_CORRUP
1650: 54 20 20 30 78 30 38 20 20 2f 2a 20 64 61 74 61 T 0x08 /* data
1660: 62 61 73 65 20 6f 72 20 6a 6f 75 72 6e 61 6c 20 base or journal
1670: 63 6f 72 72 75 70 74 69 6f 6e 20 2a 2f 0a 0a 2f corruption */../
1680: 2a 0a 2a 2a 20 54 68 65 20 6a 6f 75 72 6e 61 6c *.** The journal
1690: 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 70 file contains p
16a0: 61 67 65 20 72 65 63 6f 72 64 73 20 69 6e 20 74 age records in t
16b0: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a 20 he following.**
16c0: 66 6f 72 6d 61 74 2e 0a 2a 2f 0a 74 79 70 65 64 format..*/.typed
16d0: 65 66 20 73 74 72 75 63 74 20 50 61 67 65 52 65 ef struct PageRe
16e0: 63 6f 72 64 20 50 61 67 65 52 65 63 6f 72 64 3b cord PageRecord;
16f0: 0a 73 74 72 75 63 74 20 50 61 67 65 52 65 63 6f .struct PageReco
1700: 72 64 20 7b 0a 20 20 50 67 6e 6f 20 70 67 6e 6f rd {. Pgno pgno
1710: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
1720: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 70 61 67 /* The pag
1730: 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 63 68 e number */. ch
1740: 61 72 20 61 44 61 74 61 5b 53 51 4c 49 54 45 5f ar aData[SQLITE_
1750: 50 41 47 45 5f 53 49 5a 45 5d 3b 20 20 2f 2a 20 PAGE_SIZE]; /*
1760: 4f 72 69 67 69 6e 61 6c 20 64 61 74 61 20 66 6f Original data fo
1770: 72 20 70 61 67 65 20 70 67 6e 6f 20 2a 2f 0a 7d r page pgno */.}
1780: 3b 0a 0a 2f 2a 0a 2a 2a 20 4a 6f 75 72 6e 61 6c ;../*.** Journal
1790: 20 66 69 6c 65 73 20 62 65 67 69 6e 20 77 69 74 files begin wit
17a0: 68 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 h the following
17b0: 6d 61 67 69 63 20 73 74 72 69 6e 67 2e 20 20 54 magic string. T
17c0: 68 65 20 64 61 74 61 0a 2a 2a 20 77 61 73 20 6f he data.** was o
17d0: 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 2f 64 65 btained from /de
17e0: 76 2f 72 61 6e 64 6f 6d 2e 20 20 49 74 20 69 73 v/random. It is
17f0: 20 75 73 65 64 20 6f 6e 6c 79 20 61 73 20 61 20 used only as a
1800: 73 61 6e 69 74 79 20 63 68 65 63 6b 2e 0a 2a 2f sanity check..*/
1810: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e .static const un
1820: 73 69 67 6e 65 64 20 63 68 61 72 20 61 4a 6f 75 signed char aJou
1830: 72 6e 61 6c 4d 61 67 69 63 5b 5d 20 3d 20 7b 0a rnalMagic[] = {.
1840: 20 20 30 78 64 39 2c 20 30 78 64 35 2c 20 30 78 0xd9, 0xd5, 0x
1850: 30 35 2c 20 30 78 66 39 2c 20 30 78 32 30 2c 20 05, 0xf9, 0x20,
1860: 30 78 61 31 2c 20 30 78 36 33 2c 20 30 78 64 34 0xa1, 0x63, 0xd4
1870: 2c 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 48 61 73 68 ,.};../*.** Hash
1880: 20 61 20 70 61 67 65 20 6e 75 6d 62 65 72 0a 2a a page number.*
1890: 2f 0a 23 64 65 66 69 6e 65 20 70 61 67 65 72 5f /.#define pager_
18a0: 68 61 73 68 28 50 4e 29 20 20 28 28 50 4e 29 25 hash(PN) ((PN)%
18b0: 4e 5f 50 47 5f 48 41 53 48 29 0a 0a 2f 2a 0a 2a N_PG_HASH)../*.*
18c0: 2a 20 45 6e 61 62 6c 65 20 72 65 66 65 72 65 6e * Enable referen
18d0: 63 65 20 63 6f 75 6e 74 20 74 72 61 63 6b 69 6e ce count trackin
18e0: 67 20 68 65 72 65 3a 0a 2a 2f 0a 23 69 66 20 53 g here:.*/.#if S
18f0: 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 69 6e 74 QLITE_TEST. int
1900: 20 70 61 67 65 72 5f 72 65 66 69 6e 66 6f 5f 65 pager_refinfo_e
1910: 6e 61 62 6c 65 20 3d 20 30 3b 0a 20 20 73 74 61 nable = 0;. sta
1920: 74 69 63 20 76 6f 69 64 20 70 61 67 65 72 5f 72 tic void pager_r
1930: 65 66 69 6e 66 6f 28 50 67 48 64 72 20 2a 70 29 efinfo(PgHdr *p)
1940: 7b 0a 20 20 20 20 73 74 61 74 69 63 20 69 6e 74 {. static int
1950: 20 63 6e 74 20 3d 20 30 3b 0a 20 20 20 20 69 66 cnt = 0;. if
1960: 28 20 21 70 61 67 65 72 5f 72 65 66 69 6e 66 6f ( !pager_refinfo
1970: 5f 65 6e 61 62 6c 65 20 29 20 72 65 74 75 72 6e _enable ) return
1980: 3b 0a 20 20 20 20 70 72 69 6e 74 66 28 0a 20 20 ;. printf(.
1990: 20 20 20 20 20 22 52 45 46 43 4e 54 3a 20 25 34 "REFCNT: %4
19a0: 64 20 61 64 64 72 3d 30 78 25 30 38 78 20 6e 52 d addr=0x%08x nR
19b0: 65 66 3d 25 64 5c 6e 22 2c 0a 20 20 20 20 20 20 ef=%d\n",.
19c0: 20 70 2d 3e 70 67 6e 6f 2c 20 28 69 6e 74 29 50 p->pgno, (int)P
19d0: 47 48 44 52 5f 54 4f 5f 44 41 54 41 28 70 29 2c GHDR_TO_DATA(p),
19e0: 20 70 2d 3e 6e 52 65 66 0a 20 20 20 20 29 3b 0a p->nRef. );.
19f0: 20 20 20 20 63 6e 74 2b 2b 3b 20 20 20 2f 2a 20 cnt++; /*
1a00: 53 6f 6d 65 74 68 69 6e 67 20 74 6f 20 73 65 74 Something to set
1a10: 20 61 20 62 72 65 61 6b 70 6f 69 6e 74 20 6f 6e a breakpoint on
1a20: 20 2a 2f 0a 20 20 7d 0a 23 20 64 65 66 69 6e 65 */. }.# define
1a30: 20 52 45 46 49 4e 46 4f 28 58 29 20 20 70 61 67 REFINFO(X) pag
1a40: 65 72 5f 72 65 66 69 6e 66 6f 28 58 29 0a 23 65 er_refinfo(X).#e
1a50: 6c 73 65 0a 23 20 64 65 66 69 6e 65 20 52 45 46 lse.# define REF
1a60: 49 4e 46 4f 28 58 29 0a 23 65 6e 64 69 66 0a 0a INFO(X).#endif..
1a70: 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f /*.** Attempt to
1a80: 20 61 63 71 75 69 72 65 20 61 20 72 65 61 64 20 acquire a read
1a90: 6c 6f 63 6b 20 28 69 66 20 77 72 6c 6f 63 6b 3d lock (if wrlock=
1aa0: 3d 30 29 20 6f 72 20 61 20 77 72 69 74 65 20 6c =0) or a write l
1ab0: 6f 63 6b 20 28 69 66 20 77 72 6c 6f 63 6b 3d 3d ock (if wrlock==
1ac0: 31 29 0a 2a 2a 20 6f 6e 20 74 68 65 20 64 61 74 1).** on the dat
1ad0: 61 62 61 73 65 20 66 69 6c 65 2e 20 20 52 65 74 abase file. Ret
1ae0: 75 72 6e 20 30 20 6f 6e 20 73 75 63 63 65 73 73 urn 0 on success
1af0: 20 61 6e 64 20 6e 6f 6e 2d 7a 65 72 6f 20 69 66 and non-zero if
1b00: 20 74 68 65 20 6c 6f 63 6b 20 0a 2a 2a 20 63 6f the lock .** co
1b10: 75 6c 64 20 6e 6f 74 20 62 65 20 61 63 71 75 69 uld not be acqui
1b20: 72 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 red..*/.static i
1b30: 6e 74 20 70 61 67 65 72 5f 6c 6f 63 6b 28 69 6e nt pager_lock(in
1b40: 74 20 66 64 2c 20 69 6e 74 20 77 72 6c 6f 63 6b t fd, int wrlock
1b50: 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 73 ){. int rc;. s
1b60: 74 72 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b truct flock lock
1b70: 3b 0a 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 ;. lock.l_type
1b80: 3d 20 77 72 6c 6f 63 6b 20 3f 20 46 5f 57 52 4c = wrlock ? F_WRL
1b90: 43 4b 20 3a 20 46 5f 52 44 4c 43 4b 3b 0a 20 20 CK : F_RDLCK;.
1ba0: 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d 20 lock.l_whence =
1bb0: 53 45 45 4b 5f 53 45 54 3b 0a 20 20 6c 6f 63 6b SEEK_SET;. lock
1bc0: 2e 6c 5f 73 74 61 72 74 20 3d 20 6c 6f 63 6b 2e .l_start = lock.
1bd0: 6c 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20 20 72 63 l_len = 0L;. rc
1be0: 20 3d 20 66 63 6e 74 6c 28 66 64 2c 20 46 5f 53 = fcntl(fd, F_S
1bf0: 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20 ETLK, &lock);.
1c00: 72 65 74 75 72 6e 20 72 63 21 3d 30 3b 0a 7d 0a return rc!=0;.}.
1c10: 0a 2f 2a 0a 2a 2a 20 55 6e 6c 6f 63 6b 20 74 68 ./*.** Unlock th
1c20: 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 2e e database file.
1c30: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70 .*/.static int p
1c40: 61 67 65 72 5f 75 6e 6c 6f 63 6b 28 66 64 29 7b ager_unlock(fd){
1c50: 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 73 74 72 . int rc;. str
1c60: 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a uct flock lock;.
1c70: 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 lock.l_type =
1c80: 46 5f 55 4e 4c 43 4b 3b 0a 20 20 6c 6f 63 6b 2e F_UNLCK;. lock.
1c90: 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f l_whence = SEEK_
1ca0: 53 45 54 3b 0a 20 20 6c 6f 63 6b 2e 6c 5f 73 74 SET;. lock.l_st
1cb0: 61 72 74 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e art = lock.l_len
1cc0: 20 3d 20 30 4c 3b 0a 20 20 72 63 20 3d 20 66 63 = 0L;. rc = fc
1cd0: 6e 74 6c 28 66 64 2c 20 46 5f 53 45 54 4c 4b 2c ntl(fd, F_SETLK,
1ce0: 20 26 6c 6f 63 6b 29 3b 0a 20 20 72 65 74 75 72 &lock);. retur
1cf0: 6e 20 72 63 21 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a n rc!=0;.}../*.*
1d00: 2a 20 4d 6f 76 65 20 74 68 65 20 63 75 72 73 6f * Move the curso
1d10: 72 20 66 6f 72 20 66 69 6c 65 20 64 65 73 63 72 r for file descr
1d20: 69 70 74 6f 72 20 66 64 20 74 6f 20 74 68 65 20 iptor fd to the
1d30: 70 6f 69 6e 74 20 77 68 65 72 65 74 6f 20 66 72 point whereto fr
1d40: 6f 6d 0a 2a 2a 20 74 68 65 20 62 65 67 69 6e 6e om.** the beginn
1d50: 69 6e 67 20 6f 66 20 74 68 65 20 66 69 6c 65 2e ing of the file.
1d60: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70 .*/.static int p
1d70: 61 67 65 72 5f 73 65 65 6b 28 69 6e 74 20 66 64 ager_seek(int fd
1d80: 2c 20 6f 66 66 5f 74 20 77 68 65 72 65 74 6f 29 , off_t whereto)
1d90: 7b 0a 20 20 2f 2a 70 72 69 6e 74 66 28 22 53 45 {. /*printf("SE
1da0: 45 4b 20 74 6f 20 70 61 67 65 20 25 64 5c 6e 22 EK to page %d\n"
1db0: 2c 20 77 68 65 72 65 74 6f 2f 53 51 4c 49 54 45 , whereto/SQLITE
1dc0: 5f 50 41 47 45 5f 53 49 5a 45 20 2b 20 31 29 3b _PAGE_SIZE + 1);
1dd0: 2a 2f 0a 20 20 6c 73 65 65 6b 28 66 64 2c 20 77 */. lseek(fd, w
1de0: 68 65 72 65 74 6f 2c 20 53 45 45 4b 5f 53 45 54 hereto, SEEK_SET
1df0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 );. return SQLI
1e00: 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 TE_OK;.}../*.**
1e10: 54 72 75 6e 63 61 74 65 20 74 68 65 20 67 69 76 Truncate the giv
1e20: 65 6e 20 66 69 6c 65 20 73 6f 20 74 68 61 74 20 en file so that
1e30: 69 74 20 63 6f 6e 74 61 69 6e 73 20 65 78 61 63 it contains exac
1e40: 74 6c 79 20 6d 78 50 67 20 70 61 67 65 73 0a 2a tly mxPg pages.*
1e50: 2a 20 6f 66 20 64 61 74 61 2e 0a 2a 2f 0a 73 74 * of data..*/.st
1e60: 61 74 69 63 20 69 6e 74 20 70 61 67 65 72 5f 74 atic int pager_t
1e70: 72 75 6e 63 61 74 65 28 69 6e 74 20 66 64 2c 20 runcate(int fd,
1e80: 50 67 6e 6f 20 6d 78 50 67 29 7b 0a 20 20 69 6e Pgno mxPg){. in
1e90: 74 20 72 63 3b 0a 20 20 72 63 20 3d 20 66 74 72 t rc;. rc = ftr
1ea0: 75 6e 63 61 74 65 28 66 64 2c 20 6d 78 50 67 2a uncate(fd, mxPg*
1eb0: 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 SQLITE_PAGE_SIZE
1ec0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 21 3d );. return rc!=
1ed0: 30 20 3f 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 0 ? SQLITE_IOERR
1ee0: 20 3a 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a : SQLITE_OK;.}.
1ef0: 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 6e 42 79 74 ./*.** Read nByt
1f00: 65 73 20 6f 66 20 64 61 74 61 20 66 72 6f 6d 20 es of data from
1f10: 66 64 20 69 6e 74 6f 20 70 42 75 66 2e 20 20 49 fd into pBuf. I
1f20: 66 20 74 68 65 20 64 61 74 61 20 63 61 6e 6e 6f f the data canno
1f30: 74 20 62 65 0a 2a 2a 20 72 65 61 64 20 6f 72 20 t be.** read or
1f40: 6f 6e 6c 79 20 61 20 70 61 72 74 69 61 6c 20 72 only a partial r
1f50: 65 61 64 20 6f 63 63 75 72 73 2c 20 74 68 65 6e ead occurs, then
1f60: 20 74 68 65 20 75 6e 72 65 61 64 20 70 61 72 74 the unread part
1f70: 73 20 6f 66 0a 2a 2a 20 70 42 75 66 20 61 72 65 s of.** pBuf are
1f80: 20 66 69 6c 6c 65 64 20 77 69 74 68 20 7a 65 72 filled with zer
1f90: 6f 73 20 61 6e 64 20 74 68 69 73 20 72 6f 75 74 os and this rout
1fa0: 69 6e 65 20 72 65 74 75 72 6e 73 20 53 51 4c 49 ine returns SQLI
1fb0: 54 45 5f 49 4f 45 52 52 2e 0a 2a 2a 20 49 66 20 TE_IOERR..** If
1fc0: 74 68 65 20 72 65 61 64 20 69 73 20 63 6f 6d 70 the read is comp
1fd0: 6c 65 74 65 6c 79 20 73 75 63 63 65 73 73 66 75 letely successfu
1fe0: 6c 2c 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 l, return SQLITE
1ff0: 5f 4f 4b 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 _OK..*/.static i
2000: 6e 74 20 70 61 67 65 72 5f 72 65 61 64 28 69 6e nt pager_read(in
2010: 74 20 66 64 2c 20 76 6f 69 64 20 2a 70 42 75 66 t fd, void *pBuf
2020: 2c 20 69 6e 74 20 6e 42 79 74 65 29 7b 0a 20 20 , int nByte){.
2030: 69 6e 74 20 72 63 3b 0a 20 20 2f 2a 20 70 72 69 int rc;. /* pri
2040: 6e 74 66 28 22 52 45 41 44 5c 6e 22 29 3b 2a 2f ntf("READ\n");*/
2050: 0a 20 20 72 63 20 3d 20 72 65 61 64 28 66 64 2c . rc = read(fd,
2060: 20 70 42 75 66 2c 20 6e 42 79 74 65 29 3b 0a 20 pBuf, nByte);.
2070: 20 69 66 28 20 72 63 3c 30 20 29 7b 0a 20 20 20 if( rc<0 ){.
2080: 20 6d 65 6d 73 65 74 28 70 42 75 66 2c 20 30 2c memset(pBuf, 0,
2090: 20 6e 42 79 74 65 29 3b 0a 20 20 20 20 72 65 74 nByte);. ret
20a0: 75 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 urn SQLITE_IOERR
20b0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 72 63 3c 6e ;. }. if( rc<n
20c0: 42 79 74 65 20 29 7b 0a 20 20 20 20 6d 65 6d 73 Byte ){. mems
20d0: 65 74 28 26 28 28 63 68 61 72 2a 29 70 42 75 66 et(&((char*)pBuf
20e0: 29 5b 72 63 5d 2c 20 30 2c 20 6e 42 79 74 65 20 )[rc], 0, nByte
20f0: 2d 20 72 63 29 3b 0a 20 20 20 20 72 63 20 3d 20 - rc);. rc =
2100: 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 SQLITE_IOERR;.
2110: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 3d 20 }else{. rc =
2120: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 20 SQLITE_OK;. }.
2130: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f return rc;.}../
2140: 2a 0a 2a 2a 20 57 72 69 74 65 20 6e 42 79 74 65 *.** Write nByte
2150: 73 20 6f 66 20 64 61 74 61 20 69 6e 74 6f 20 66 s of data into f
2160: 64 2e 20 20 49 66 20 61 6e 79 20 70 72 6f 62 6c d. If any probl
2170: 65 6d 20 6f 63 63 75 72 73 20 6f 72 20 69 66 20 em occurs or if
2180: 74 68 65 0a 2a 2a 20 77 72 69 74 65 20 69 73 20 the.** write is
2190: 69 6e 63 6f 6d 70 6c 65 74 65 2c 20 53 51 4c 49 incomplete, SQLI
21a0: 54 45 5f 49 4f 45 52 52 20 69 73 20 72 65 74 75 TE_IOERR is retu
21b0: 72 6e 65 64 2e 20 20 53 51 4c 49 54 45 5f 4f 4b rned. SQLITE_OK
21c0: 20 69 73 0a 2a 2a 20 72 65 74 75 72 6e 65 64 20 is.** returned
21d0: 75 70 6f 6e 20 63 6f 6d 70 6c 65 74 65 20 73 75 upon complete su
21e0: 63 63 65 73 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 ccess..*/.static
21f0: 20 69 6e 74 20 70 61 67 65 72 5f 77 72 69 74 65 int pager_write
2200: 28 69 6e 74 20 66 64 2c 20 63 6f 6e 73 74 20 76 (int fd, const v
2210: 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20 6e oid *pBuf, int n
2220: 42 79 74 65 29 7b 0a 20 20 69 6e 74 20 72 63 3b Byte){. int rc;
2230: 0a 20 20 2f 2a 70 72 69 6e 74 66 28 22 57 52 49 . /*printf("WRI
2240: 54 45 5c 6e 22 29 3b 2a 2f 0a 20 20 72 63 20 3d TE\n");*/. rc =
2250: 20 77 72 69 74 65 28 66 64 2c 20 70 42 75 66 2c write(fd, pBuf,
2260: 20 6e 42 79 74 65 29 3b 0a 20 20 69 66 28 20 72 nByte);. if( r
2270: 63 3c 6e 42 79 74 65 20 29 7b 0a 20 20 20 20 72 c<nByte ){. r
2280: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c eturn SQLITE_FUL
2290: 4c 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 L;. }else{.
22a0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b return SQLITE_OK
22b0: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 ;. }.}../*.** C
22c0: 6f 6e 76 65 72 74 20 74 68 65 20 62 69 74 73 20 onvert the bits
22d0: 69 6e 20 74 68 65 20 70 50 61 67 65 72 2d 3e 65 in the pPager->e
22e0: 72 72 4d 61 73 6b 20 69 6e 74 6f 20 61 6e 20 61 rrMask into an a
22f0: 70 70 72 6f 70 72 61 74 65 0a 2a 2a 20 72 65 74 pproprate.** ret
2300: 75 72 6e 20 63 6f 64 65 2e 0a 2a 2f 0a 73 74 61 urn code..*/.sta
2310: 74 69 63 20 69 6e 74 20 70 61 67 65 72 5f 65 72 tic int pager_er
2320: 72 63 6f 64 65 28 50 61 67 65 72 20 2a 70 50 61 rcode(Pager *pPa
2330: 67 65 72 29 7b 0a 20 20 69 6e 74 20 72 63 20 3d ger){. int rc =
2340: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 69 66 SQLITE_OK;. if
2350: 28 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 ( pPager->errMas
2360: 6b 20 26 20 50 41 47 45 52 5f 45 52 52 5f 4c 4f k & PAGER_ERR_LO
2370: 43 4b 20 29 20 20 20 20 72 63 20 3d 20 53 51 4c CK ) rc = SQL
2380: 49 54 45 5f 50 52 4f 54 4f 43 4f 4c 3b 0a 20 20 ITE_PROTOCOL;.
2390: 69 66 28 20 70 50 61 67 65 72 2d 3e 65 72 72 4d if( pPager->errM
23a0: 61 73 6b 20 26 20 50 41 47 45 52 5f 45 52 52 5f ask & PAGER_ERR_
23b0: 46 55 4c 4c 20 29 20 20 20 20 72 63 20 3d 20 53 FULL ) rc = S
23c0: 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a 20 20 69 66 QLITE_FULL;. if
23d0: 28 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 ( pPager->errMas
23e0: 6b 20 26 20 50 41 47 45 52 5f 45 52 52 5f 4d 45 k & PAGER_ERR_ME
23f0: 4d 20 29 20 20 20 20 20 72 63 20 3d 20 53 51 4c M ) rc = SQL
2400: 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 69 66 28 ITE_NOMEM;. if(
2410: 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b pPager->errMask
2420: 20 26 20 50 41 47 45 52 5f 45 52 52 5f 43 4f 52 & PAGER_ERR_COR
2430: 52 55 50 54 20 29 20 72 63 20 3d 20 53 51 4c 49 RUPT ) rc = SQLI
2440: 54 45 5f 43 4f 52 52 55 50 54 3b 0a 20 20 72 65 TE_CORRUPT;. re
2450: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a turn rc;.}../*.*
2460: 2a 20 46 69 6e 64 20 61 20 70 61 67 65 20 69 6e * Find a page in
2470: 20 74 68 65 20 68 61 73 68 20 74 61 62 6c 65 20 the hash table
2480: 67 69 76 65 6e 20 69 74 73 20 70 61 67 65 20 6e given its page n
2490: 75 6d 62 65 72 2e 20 20 52 65 74 75 72 6e 0a 2a umber. Return.*
24a0: 2a 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 * a pointer to t
24b0: 68 65 20 70 61 67 65 20 6f 72 20 4e 55 4c 4c 20 he page or NULL
24c0: 69 66 20 6e 6f 74 20 66 6f 75 6e 64 2e 0a 2a 2f if not found..*/
24d0: 0a 73 74 61 74 69 63 20 50 67 48 64 72 20 2a 70 .static PgHdr *p
24e0: 61 67 65 72 5f 6c 6f 6f 6b 75 70 28 50 61 67 65 ager_lookup(Page
24f0: 72 20 2a 70 50 61 67 65 72 2c 20 50 67 6e 6f 20 r *pPager, Pgno
2500: 70 67 6e 6f 29 7b 0a 20 20 50 67 48 64 72 20 2a pgno){. PgHdr *
2510: 70 20 3d 20 70 50 61 67 65 72 2d 3e 61 48 61 73 p = pPager->aHas
2520: 68 5b 70 67 6e 6f 20 25 20 4e 5f 50 47 5f 48 41 h[pgno % N_PG_HA
2530: 53 48 5d 3b 0a 20 20 77 68 69 6c 65 28 20 70 20 SH];. while( p
2540: 26 26 20 70 2d 3e 70 67 6e 6f 21 3d 70 67 6e 6f && p->pgno!=pgno
2550: 20 29 7b 0a 20 20 20 20 70 20 3d 20 70 2d 3e 70 ){. p = p->p
2560: 4e 65 78 74 48 61 73 68 3b 0a 20 20 7d 0a 20 20 NextHash;. }.
2570: 72 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a return p;.}../*.
2580: 2a 2a 20 55 6e 6c 6f 63 6b 20 74 68 65 20 64 61 ** Unlock the da
2590: 74 61 62 61 73 65 20 61 6e 64 20 63 6c 65 61 72 tabase and clear
25a0: 20 74 68 65 20 69 6e 2d 6d 65 6d 6f 72 79 20 63 the in-memory c
25b0: 61 63 68 65 2e 20 20 54 68 69 73 20 72 6f 75 74 ache. This rout
25c0: 69 6e 65 0a 2a 2a 20 73 65 74 73 20 74 68 65 20 ine.** sets the
25d0: 73 74 61 74 65 20 6f 66 20 74 68 65 20 70 61 67 state of the pag
25e0: 65 72 20 62 61 63 6b 20 74 6f 20 77 68 61 74 20 er back to what
25f0: 69 74 20 77 61 73 20 77 68 65 6e 20 69 74 20 77 it was when it w
2600: 61 73 20 66 69 72 73 74 0a 2a 2a 20 6f 70 65 6e as first.** open
2610: 65 64 2e 20 20 41 6e 79 20 6f 75 74 73 74 61 6e ed. Any outstan
2620: 64 69 6e 67 20 70 61 67 65 73 20 61 72 65 20 69 ding pages are i
2630: 6e 76 61 6c 69 64 61 74 65 64 20 61 6e 64 20 73 nvalidated and s
2640: 75 62 73 65 71 75 65 6e 74 20 61 74 74 65 6d 70 ubsequent attemp
2650: 74 73 0a 2a 2a 20 74 6f 20 61 63 63 65 73 73 20 ts.** to access
2660: 74 68 6f 73 65 20 70 61 67 65 73 20 77 69 6c 6c those pages will
2670: 20 6c 69 6b 65 6c 79 20 72 65 73 75 6c 74 20 69 likely result i
2680: 6e 20 61 20 63 6f 72 65 64 75 6d 70 2e 0a 2a 2f n a coredump..*/
2690: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 70 61 67 .static void pag
26a0: 65 72 5f 72 65 73 65 74 28 50 61 67 65 72 20 2a er_reset(Pager *
26b0: 70 50 61 67 65 72 29 7b 0a 20 20 50 67 48 64 72 pPager){. PgHdr
26c0: 20 2a 70 50 67 2c 20 2a 70 4e 65 78 74 3b 0a 20 *pPg, *pNext;.
26d0: 20 66 6f 72 28 70 50 67 3d 70 50 61 67 65 72 2d for(pPg=pPager-
26e0: 3e 70 41 6c 6c 3b 20 70 50 67 3b 20 70 50 67 3d >pAll; pPg; pPg=
26f0: 70 4e 65 78 74 29 7b 0a 20 20 20 20 70 4e 65 78 pNext){. pNex
2700: 74 20 3d 20 70 50 67 2d 3e 70 4e 65 78 74 41 6c t = pPg->pNextAl
2710: 6c 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 l;. sqliteFre
2720: 65 28 70 50 67 29 3b 0a 20 20 7d 0a 20 20 70 50 e(pPg);. }. pP
2730: 61 67 65 72 2d 3e 70 46 69 72 73 74 20 3d 20 30 ager->pFirst = 0
2740: 3b 0a 20 20 70 50 61 67 65 72 2d 3e 70 4c 61 73 ;. pPager->pLas
2750: 74 20 3d 20 30 3b 0a 20 20 70 50 61 67 65 72 2d t = 0;. pPager-
2760: 3e 70 41 6c 6c 20 3d 20 30 3b 0a 20 20 6d 65 6d >pAll = 0;. mem
2770: 73 65 74 28 70 50 61 67 65 72 2d 3e 61 48 61 73 set(pPager->aHas
2780: 68 2c 20 30 2c 20 73 69 7a 65 6f 66 28 70 50 61 h, 0, sizeof(pPa
2790: 67 65 72 2d 3e 61 48 61 73 68 29 29 3b 0a 20 20 ger->aHash));.
27a0: 70 50 61 67 65 72 2d 3e 6e 50 61 67 65 20 3d 20 pPager->nPage =
27b0: 30 3b 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 0;. if( pPager-
27c0: 3e 73 74 61 74 65 3d 3d 53 51 4c 49 54 45 5f 57 >state==SQLITE_W
27d0: 52 49 54 45 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 RITELOCK ){.
27e0: 73 71 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c sqlitepager_roll
27f0: 62 61 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 back(pPager);.
2800: 7d 0a 20 20 70 61 67 65 72 5f 75 6e 6c 6f 63 6b }. pager_unlock
2810: 28 70 50 61 67 65 72 2d 3e 66 64 29 3b 0a 20 20 (pPager->fd);.
2820: 70 50 61 67 65 72 2d 3e 73 74 61 74 65 20 3d 20 pPager->state =
2830: 53 51 4c 49 54 45 5f 55 4e 4c 4f 43 4b 3b 0a 20 SQLITE_UNLOCK;.
2840: 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 20 pPager->dbSize
2850: 3d 20 2d 31 3b 0a 20 20 70 50 61 67 65 72 2d 3e = -1;. pPager->
2860: 6e 52 65 66 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a nRef = 0;.}../*.
2870: 2a 2a 20 57 68 65 6e 20 74 68 69 73 20 72 6f 75 ** When this rou
2880: 74 69 6e 65 20 69 73 20 63 61 6c 6c 65 64 2c 20 tine is called,
2890: 74 68 65 20 70 61 67 65 72 20 68 61 73 20 74 68 the pager has th
28a0: 65 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 20 6f e journal file o
28b0: 70 65 6e 20 61 6e 64 0a 2a 2a 20 61 20 77 72 69 pen and.** a wri
28c0: 74 65 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 64 te lock on the d
28d0: 61 74 61 62 61 73 65 2e 20 20 54 68 69 73 20 72 atabase. This r
28e0: 6f 75 74 69 6e 65 20 72 65 6c 65 61 73 65 73 20 outine releases
28f0: 74 68 65 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 the database.**
2900: 77 72 69 74 65 20 6c 6f 63 6b 20 61 6e 64 20 61 write lock and a
2910: 63 71 75 69 72 65 73 20 61 20 72 65 61 64 20 6c cquires a read l
2920: 6f 63 6b 20 69 6e 20 69 74 73 20 70 6c 61 63 65 ock in its place
2930: 2e 20 20 54 68 65 20 6a 6f 75 72 6e 61 6c 20 66 . The journal f
2940: 69 6c 65 0a 2a 2a 20 69 73 20 64 65 6c 65 74 65 ile.** is delete
2950: 64 20 61 6e 64 20 63 6c 6f 73 65 64 2e 0a 2a 2a d and closed..**
2960: 0a 2a 2a 20 57 65 20 68 61 76 65 20 74 6f 20 72 .** We have to r
2970: 65 6c 65 61 73 65 20 74 68 65 20 77 72 69 74 65 elease the write
2980: 20 6c 6f 63 6b 20 62 65 66 6f 72 65 20 61 63 71 lock before acq
2990: 75 69 72 69 6e 67 20 74 68 65 20 72 65 61 64 20 uiring the read
29a0: 6c 6f 63 6b 2c 0a 2a 2a 20 73 6f 20 74 68 65 72 lock,.** so ther
29b0: 65 20 69 73 20 61 20 72 61 63 65 20 63 6f 6e 64 e is a race cond
29c0: 69 74 69 6f 6e 20 77 68 65 72 65 20 61 6e 6f 74 ition where anot
29d0: 68 65 72 20 70 72 6f 63 65 73 73 20 63 61 6e 20 her process can
29e0: 67 65 74 20 74 68 65 20 6c 6f 63 6b 0a 2a 2a 20 get the lock.**
29f0: 77 68 69 6c 65 20 77 65 20 61 72 65 20 6e 6f 74 while we are not
2a00: 20 68 6f 6c 64 69 6e 67 20 69 74 2e 20 20 42 75 holding it. Bu
2a10: 74 2c 20 6e 6f 20 6f 74 68 65 72 20 70 72 6f 63 t, no other proc
2a20: 65 73 73 20 73 68 6f 75 6c 64 20 64 6f 20 74 68 ess should do th
2a30: 69 73 0a 2a 2a 20 62 65 63 61 75 73 65 20 77 65 is.** because we
2a40: 20 61 72 65 20 61 6c 73 6f 20 68 6f 6c 64 69 6e are also holdin
2a50: 67 20 61 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 g a lock on the
2a60: 6a 6f 75 72 6e 61 6c 2c 20 61 6e 64 20 6e 6f 20 journal, and no
2a70: 70 72 6f 63 65 73 73 0a 2a 2a 20 73 68 6f 75 6c process.** shoul
2a80: 64 20 67 65 74 20 61 20 77 72 69 74 65 20 6c 6f d get a write lo
2a90: 63 6b 20 6f 6e 20 74 68 65 20 64 61 74 61 62 61 ck on the databa
2aa0: 73 65 20 77 69 74 68 6f 75 74 20 66 69 72 73 74 se without first
2ab0: 20 67 65 74 74 69 6e 67 20 61 20 6c 6f 63 6b 0a getting a lock.
2ac0: 2a 2a 20 6f 6e 20 74 68 65 20 6a 6f 75 72 6e 61 ** on the journa
2ad0: 6c 2e 20 20 53 6f 20 74 68 69 73 20 72 6f 75 74 l. So this rout
2ae0: 69 6e 65 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 ine should never
2af0: 20 66 61 69 6c 2e 20 20 42 75 74 20 69 74 20 63 fail. But it c
2b00: 61 6e 20 66 61 69 6c 0a 2a 2a 20 69 66 20 61 6e an fail.** if an
2b10: 6f 74 68 65 72 20 70 72 6f 63 65 73 73 20 69 73 other process is
2b20: 20 6e 6f 74 20 70 6c 61 79 69 6e 67 20 62 79 20 not playing by
2b30: 74 68 65 20 72 75 6c 65 73 2e 20 20 49 66 20 69 the rules. If i
2b40: 74 20 64 6f 65 73 20 66 61 69 6c 2c 0a 2a 2a 20 t does fail,.**
2b50: 61 6c 6c 20 69 6e 2d 6d 65 6d 6f 72 79 20 63 61 all in-memory ca
2b60: 63 68 65 20 70 61 67 65 73 20 61 72 65 20 69 6e che pages are in
2b70: 76 61 6c 69 64 61 74 65 64 2c 20 74 68 65 20 50 validated, the P
2b80: 41 47 45 52 5f 45 52 52 5f 4c 4f 43 4b 20 62 69 AGER_ERR_LOCK bi
2b90: 74 0a 2a 2a 20 69 73 20 73 65 74 20 69 6e 20 70 t.** is set in p
2ba0: 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b 2c 20 Pager->errMask,
2bb0: 61 6e 64 20 74 68 69 73 20 72 6f 75 74 69 6e 65 and this routine
2bc0: 20 72 65 74 75 72 6e 73 20 53 51 4c 49 54 45 5f returns SQLITE_
2bd0: 50 52 4f 54 4f 43 4f 4c 2e 0a 2a 2a 20 53 51 4c PROTOCOL..** SQL
2be0: 49 54 45 5f 4f 4b 20 69 73 20 72 65 74 75 72 6e ITE_OK is return
2bf0: 65 64 20 6f 6e 20 73 75 63 63 65 73 73 2e 0a 2a ed on success..*
2c00: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70 61 67 /.static int pag
2c10: 65 72 5f 75 6e 77 72 69 74 65 6c 6f 63 6b 28 50 er_unwritelock(P
2c20: 61 67 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 ager *pPager){.
2c30: 20 69 6e 74 20 72 63 3b 0a 20 20 50 67 48 64 72 int rc;. PgHdr
2c40: 20 2a 70 50 67 3b 0a 20 20 69 66 28 20 70 50 61 *pPg;. if( pPa
2c50: 67 65 72 2d 3e 73 74 61 74 65 21 3d 53 51 4c 49 ger->state!=SQLI
2c60: 54 45 5f 57 52 49 54 45 4c 4f 43 4b 20 29 20 72 TE_WRITELOCK ) r
2c70: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b eturn SQLITE_OK;
2c80: 0a 20 20 70 61 67 65 72 5f 75 6e 6c 6f 63 6b 28 . pager_unlock(
2c90: 70 50 61 67 65 72 2d 3e 66 64 29 3b 0a 20 20 72 pPager->fd);. r
2ca0: 63 20 3d 20 70 61 67 65 72 5f 6c 6f 63 6b 28 70 c = pager_lock(p
2cb0: 50 61 67 65 72 2d 3e 66 64 2c 20 30 29 3b 0a 20 Pager->fd, 0);.
2cc0: 20 75 6e 6c 69 6e 6b 28 70 50 61 67 65 72 2d 3e unlink(pPager->
2cd0: 7a 4a 6f 75 72 6e 61 6c 29 3b 0a 20 20 63 6c 6f zJournal);. clo
2ce0: 73 65 28 70 50 61 67 65 72 2d 3e 6a 66 64 29 3b se(pPager->jfd);
2cf0: 0a 20 20 70 50 61 67 65 72 2d 3e 6a 66 64 20 3d . pPager->jfd =
2d00: 20 2d 31 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 -1;. sqliteFre
2d10: 65 28 20 70 50 61 67 65 72 2d 3e 61 49 6e 4a 6f e( pPager->aInJo
2d20: 75 72 6e 61 6c 20 29 3b 0a 20 20 70 50 61 67 65 urnal );. pPage
2d30: 72 2d 3e 61 49 6e 4a 6f 75 72 6e 61 6c 20 3d 20 r->aInJournal =
2d40: 30 3b 0a 20 20 66 6f 72 28 70 50 67 3d 70 50 61 0;. for(pPg=pPa
2d50: 67 65 72 2d 3e 70 41 6c 6c 3b 20 70 50 67 3b 20 ger->pAll; pPg;
2d60: 70 50 67 3d 70 50 67 2d 3e 70 4e 65 78 74 41 6c pPg=pPg->pNextAl
2d70: 6c 29 7b 0a 20 20 20 20 70 50 67 2d 3e 69 6e 4a l){. pPg->inJ
2d80: 6f 75 72 6e 61 6c 20 3d 20 30 3b 0a 20 20 20 20 ournal = 0;.
2d90: 70 50 67 2d 3e 64 69 72 74 79 20 3d 20 30 3b 0a pPg->dirty = 0;.
2da0: 20 20 7d 0a 20 20 69 66 28 20 72 63 21 3d 53 51 }. if( rc!=SQ
2db0: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 70 LITE_OK ){. p
2dc0: 50 61 67 65 72 2d 3e 73 74 61 74 65 20 3d 20 53 Pager->state = S
2dd0: 51 4c 49 54 45 5f 55 4e 4c 4f 43 4b 3b 0a 20 20 QLITE_UNLOCK;.
2de0: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 50 52 rc = SQLITE_PR
2df0: 4f 54 4f 43 4f 4c 3b 0a 20 20 20 20 70 50 61 67 OTOCOL;. pPag
2e00: 65 72 2d 3e 65 72 72 4d 61 73 6b 20 7c 3d 20 50 er->errMask |= P
2e10: 41 47 45 52 5f 45 52 52 5f 4c 4f 43 4b 3b 0a 20 AGER_ERR_LOCK;.
2e20: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 3d }else{. rc =
2e30: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20 20 SQLITE_OK;.
2e40: 70 50 61 67 65 72 2d 3e 73 74 61 74 65 20 3d 20 pPager->state =
2e50: 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f 43 4b 3b SQLITE_READLOCK;
2e60: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 . }. return rc
2e70: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 6c 61 79 62 ;.}../*.** Playb
2e80: 61 63 6b 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 ack the journal
2e90: 61 6e 64 20 74 68 75 73 20 72 65 73 74 6f 72 65 and thus restore
2ea0: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 66 69 the database fi
2eb0: 6c 65 20 74 6f 0a 2a 2a 20 74 68 65 20 73 74 61 le to.** the sta
2ec0: 74 65 20 69 74 20 77 61 73 20 69 6e 20 62 65 66 te it was in bef
2ed0: 6f 72 65 20 77 65 20 73 74 61 72 74 65 64 20 6d ore we started m
2ee0: 61 6b 69 6e 67 20 63 68 61 6e 67 65 73 2e 20 20 aking changes.
2ef0: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 6a 6f 75 72 6e .**.** The journ
2f00: 61 6c 20 66 69 6c 65 20 66 6f 72 6d 61 74 20 69 al file format i
2f10: 73 20 61 73 20 66 6f 6c 6c 6f 77 73 3a 20 20 54 s as follows: T
2f20: 68 65 72 65 20 69 73 20 61 6e 20 69 6e 69 74 69 here is an initi
2f30: 61 6c 0a 2a 2a 20 66 69 6c 65 2d 74 79 70 65 20 al.** file-type
2f40: 73 74 72 69 6e 67 20 66 6f 72 20 73 61 6e 69 74 string for sanit
2f50: 79 20 63 68 65 63 6b 69 6e 67 2e 20 20 54 68 65 y checking. The
2f60: 6e 20 74 68 65 72 65 20 69 73 20 61 20 73 69 6e n there is a sin
2f70: 67 6c 65 0a 2a 2a 20 50 67 6e 6f 20 6e 75 6d 62 gle.** Pgno numb
2f80: 65 72 20 77 68 69 63 68 20 69 73 20 74 68 65 20 er which is the
2f90: 6e 75 6d 62 65 72 20 6f 66 20 70 61 67 65 73 20 number of pages
2fa0: 69 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 20 in the database
2fb0: 62 65 66 6f 72 65 0a 2a 2a 20 63 68 61 6e 67 65 before.** change
2fc0: 73 20 77 65 72 65 20 6d 61 64 65 2e 20 20 54 68 s were made. Th
2fd0: 65 20 64 61 74 61 62 61 73 65 20 69 73 20 74 72 e database is tr
2fe0: 75 6e 63 61 74 65 64 20 74 6f 20 74 68 69 73 20 uncated to this
2ff0: 73 69 7a 65 2e 0a 2a 2a 20 4e 65 78 74 20 63 6f size..** Next co
3000: 6d 65 20 7a 65 72 6f 20 6f 72 20 6d 6f 72 65 20 me zero or more
3010: 70 61 67 65 20 72 65 63 6f 72 64 73 20 77 68 65 page records whe
3020: 72 65 20 65 61 63 68 20 70 61 67 65 20 72 65 63 re each page rec
3030: 6f 72 64 0a 2a 2a 20 63 6f 6e 73 69 73 74 73 20 ord.** consists
3040: 6f 66 20 61 20 50 67 6e 6f 20 61 6e 64 20 53 51 of a Pgno and SQ
3050: 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 20 62 LITE_PAGE_SIZE b
3060: 79 74 65 73 20 6f 66 20 64 61 74 61 2e 20 20 53 ytes of data. S
3070: 65 65 0a 2a 2a 20 74 68 65 20 50 61 67 65 52 65 ee.** the PageRe
3080: 63 6f 72 64 20 73 74 72 75 63 74 75 72 65 20 66 cord structure f
3090: 6f 72 20 64 65 74 61 69 6c 73 2e 0a 2a 2a 0a 2a or details..**.*
30a0: 2a 20 46 6f 72 20 70 6c 61 79 62 61 63 6b 2c 20 * For playback,
30b0: 74 68 65 20 70 61 67 65 73 20 68 61 76 65 20 74 the pages have t
30c0: 6f 20 62 65 20 72 65 61 64 20 66 72 6f 6d 20 74 o be read from t
30d0: 68 65 20 6a 6f 75 72 6e 61 6c 20 69 6e 0a 2a 2a he journal in.**
30e0: 20 72 65 76 65 72 73 65 20 6f 72 64 65 72 20 61 reverse order a
30f0: 6e 64 20 70 75 74 20 62 61 63 6b 20 69 6e 74 6f nd put back into
3100: 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 64 61 the original da
3110: 74 61 62 61 73 65 20 66 69 6c 65 2e 0a 2a 2a 0a tabase file..**.
3120: 2a 2a 20 49 66 20 74 68 65 20 66 69 6c 65 20 6f ** If the file o
3130: 70 65 6e 65 64 20 61 73 20 74 68 65 20 6a 6f 75 pened as the jou
3140: 72 6e 61 6c 20 66 69 6c 65 20 69 73 20 6e 6f 74 rnal file is not
3150: 20 61 20 77 65 6c 6c 2d 66 6f 72 6d 65 64 0a 2a a well-formed.*
3160: 2a 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 20 28 * journal file (
3170: 61 73 20 64 65 74 65 72 6d 69 6e 65 64 20 62 79 as determined by
3180: 20 6c 6f 6f 6b 69 6e 67 20 61 74 20 74 68 65 20 looking at the
3190: 6d 61 67 69 63 20 6e 75 6d 62 65 72 0a 2a 2a 20 magic number.**
31a0: 61 74 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 at the beginning
31b0: 29 20 74 68 65 6e 20 74 68 69 73 20 72 6f 75 74 ) then this rout
31c0: 69 6e 65 20 72 65 74 75 72 6e 73 20 53 51 4c 49 ine returns SQLI
31d0: 54 45 5f 50 52 4f 54 4f 43 4f 4c 2e 0a 2a 2a 20 TE_PROTOCOL..**
31e0: 49 66 20 61 6e 79 20 6f 74 68 65 72 20 65 72 72 If any other err
31f0: 6f 72 73 20 6f 63 63 75 72 20 64 75 72 69 6e 67 ors occur during
3200: 20 70 6c 61 79 62 61 63 6b 2c 20 74 68 65 20 64 playback, the d
3210: 61 74 61 62 61 73 65 20 77 69 6c 6c 0a 2a 2a 20 atabase will.**
3220: 6c 69 6b 65 6c 79 20 62 65 20 63 6f 72 72 75 70 likely be corrup
3230: 74 65 64 2c 20 73 6f 20 74 68 65 20 50 41 47 45 ted, so the PAGE
3240: 52 5f 45 52 52 5f 43 4f 52 52 55 50 54 20 62 69 R_ERR_CORRUPT bi
3250: 74 20 69 73 20 73 65 74 20 69 6e 0a 2a 2a 20 70 t is set in.** p
3260: 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b 20 61 Pager->errMask a
3270: 6e 64 20 53 51 4c 49 54 45 5f 43 4f 52 52 55 50 nd SQLITE_CORRUP
3280: 54 20 69 73 20 72 65 74 75 72 6e 65 64 2e 20 20 T is returned.
3290: 49 66 20 69 74 20 61 6c 6c 0a 2a 2a 20 77 6f 72 If it all.** wor
32a0: 6b 73 2c 20 74 68 65 6e 20 74 68 69 73 20 72 6f ks, then this ro
32b0: 75 74 69 6e 65 20 72 65 74 75 72 6e 73 20 53 51 utine returns SQ
32c0: 4c 49 54 45 5f 4f 4b 2e 0a 2a 2f 0a 73 74 61 74 LITE_OK..*/.stat
32d0: 69 63 20 69 6e 74 20 70 61 67 65 72 5f 70 6c 61 ic int pager_pla
32e0: 79 62 61 63 6b 28 50 61 67 65 72 20 2a 70 50 61 yback(Pager *pPa
32f0: 67 65 72 29 7b 0a 20 20 69 6e 74 20 6e 52 65 63 ger){. int nRec
3300: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
3310: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 52 65 /* Number of Re
3320: 63 6f 72 64 73 20 2a 2f 0a 20 20 69 6e 74 20 69 cords */. int i
3330: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
3340: 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e /* Loop coun
3350: 74 65 72 20 2a 2f 0a 20 20 50 67 6e 6f 20 6d 78 ter */. Pgno mx
3360: 50 67 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 Pg = 0;
3370: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 74 68 65 /* Size of the
3380: 20 6f 72 69 67 69 6e 61 6c 20 66 69 6c 65 20 69 original file i
3390: 6e 20 70 61 67 65 73 20 2a 2f 0a 20 20 73 74 72 n pages */. str
33a0: 75 63 74 20 73 74 61 74 20 73 74 61 74 62 75 66 uct stat statbuf
33b0: 3b 20 20 20 20 20 2f 2a 20 55 73 65 64 20 74 6f ; /* Used to
33c0: 20 73 69 7a 65 20 74 68 65 20 6a 6f 75 72 6e 61 size the journa
33d0: 6c 20 2a 2f 0a 20 20 50 67 48 64 72 20 2a 70 50 l */. PgHdr *pP
33e0: 67 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 g;
33f0: 2f 2a 20 41 6e 20 65 78 69 73 74 69 6e 67 20 70 /* An existing p
3400: 61 67 65 20 69 6e 20 74 68 65 20 63 61 63 68 65 age in the cache
3410: 20 2a 2f 0a 20 20 50 61 67 65 52 65 63 6f 72 64 */. PageRecord
3420: 20 70 67 52 65 63 3b 0a 20 20 75 6e 73 69 67 6e pgRec;. unsign
3430: 65 64 20 63 68 61 72 20 61 4d 61 67 69 63 5b 73 ed char aMagic[s
3440: 69 7a 65 6f 66 28 61 4a 6f 75 72 6e 61 6c 4d 61 izeof(aJournalMa
3450: 67 69 63 29 5d 3b 0a 20 20 69 6e 74 20 72 63 3b gic)];. int rc;
3460: 0a 0a 20 20 2f 2a 20 52 65 61 64 20 74 68 65 20 .. /* Read the
3470: 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 beginning of the
3480: 20 6a 6f 75 72 6e 61 6c 20 61 6e 64 20 74 72 75 journal and tru
3490: 6e 63 61 74 65 20 74 68 65 0a 20 20 2a 2a 20 64 ncate the. ** d
34a0: 61 74 61 62 61 73 65 20 66 69 6c 65 20 62 61 63 atabase file bac
34b0: 6b 20 74 6f 20 69 74 73 20 6f 72 69 67 69 6e 61 k to its origina
34c0: 6c 20 73 69 7a 65 2e 0a 20 20 2a 2f 0a 20 20 61 l size.. */. a
34d0: 73 73 65 72 74 28 20 70 50 61 67 65 72 2d 3e 6a ssert( pPager->j
34e0: 66 64 3e 3d 30 20 29 3b 0a 20 20 70 61 67 65 72 fd>=0 );. pager
34f0: 5f 73 65 65 6b 28 70 50 61 67 65 72 2d 3e 6a 66 _seek(pPager->jf
3500: 64 2c 20 30 29 3b 0a 20 20 72 63 20 3d 20 70 61 d, 0);. rc = pa
3510: 67 65 72 5f 72 65 61 64 28 70 50 61 67 65 72 2d ger_read(pPager-
3520: 3e 6a 66 64 2c 20 61 4d 61 67 69 63 2c 20 73 69 >jfd, aMagic, si
3530: 7a 65 6f 66 28 61 4d 61 67 69 63 29 29 3b 0a 20 zeof(aMagic));.
3540: 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f if( rc!=SQLITE_
3550: 4f 4b 20 7c 7c 20 6d 65 6d 63 6d 70 28 61 4d 61 OK || memcmp(aMa
3560: 67 69 63 2c 61 4a 6f 75 72 6e 61 6c 4d 61 67 69 gic,aJournalMagi
3570: 63 2c 73 69 7a 65 6f 66 28 61 4d 61 67 69 63 29 c,sizeof(aMagic)
3580: 29 21 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 )!=0 ){. retu
3590: 72 6e 20 53 51 4c 49 54 45 5f 50 52 4f 54 4f 43 rn SQLITE_PROTOC
35a0: 4f 4c 3b 0a 20 20 7d 0a 20 20 72 63 20 3d 20 70 OL;. }. rc = p
35b0: 61 67 65 72 5f 72 65 61 64 28 70 50 61 67 65 72 ager_read(pPager
35c0: 2d 3e 6a 66 64 2c 20 26 6d 78 50 67 2c 20 73 69 ->jfd, &mxPg, si
35d0: 7a 65 6f 66 28 6d 78 50 67 29 29 3b 0a 20 20 69 zeof(mxPg));. i
35e0: 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b f( rc!=SQLITE_OK
35f0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 ){. return S
3600: 51 4c 49 54 45 5f 50 52 4f 54 4f 43 4f 4c 3b 0a QLITE_PROTOCOL;.
3610: 20 20 7d 0a 20 20 70 61 67 65 72 5f 74 72 75 6e }. pager_trun
3620: 63 61 74 65 28 70 50 61 67 65 72 2d 3e 66 64 2c cate(pPager->fd,
3630: 20 6d 78 50 67 29 3b 0a 20 20 70 50 61 67 65 72 mxPg);. pPager
3640: 2d 3e 64 62 53 69 7a 65 20 3d 20 6d 78 50 67 3b ->dbSize = mxPg;
3650: 0a 20 20 0a 20 20 2f 2a 20 42 65 67 69 6e 20 72 . . /* Begin r
3660: 65 61 64 69 6e 67 20 74 68 65 20 6a 6f 75 72 6e eading the journ
3670: 61 6c 20 62 65 67 69 6e 6e 69 6e 67 20 61 74 20 al beginning at
3680: 74 68 65 20 65 6e 64 20 61 6e 64 20 6d 6f 76 69 the end and movi
3690: 6e 67 0a 20 20 2a 2a 20 74 6f 77 61 72 64 20 74 ng. ** toward t
36a0: 68 65 20 62 65 67 69 6e 6e 69 6e 67 2e 0a 20 20 he beginning..
36b0: 2a 2f 0a 20 20 69 66 28 20 66 73 74 61 74 28 70 */. if( fstat(p
36c0: 50 61 67 65 72 2d 3e 6a 66 64 2c 20 26 73 74 61 Pager->jfd, &sta
36d0: 74 62 75 66 29 21 3d 30 20 29 7b 0a 20 20 20 20 tbuf)!=0 ){.
36e0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b return SQLITE_OK
36f0: 3b 0a 20 20 7d 0a 20 20 6e 52 65 63 20 3d 20 28 ;. }. nRec = (
3700: 73 74 61 74 62 75 66 2e 73 74 5f 73 69 7a 65 20 statbuf.st_size
3710: 2d 20 28 73 69 7a 65 6f 66 28 61 4d 61 67 69 63 - (sizeof(aMagic
3720: 29 2b 73 69 7a 65 6f 66 28 50 67 6e 6f 29 29 29 )+sizeof(Pgno)))
3730: 20 2f 20 73 69 7a 65 6f 66 28 50 61 67 65 52 65 / sizeof(PageRe
3740: 63 6f 72 64 29 3b 0a 0a 20 20 2f 2a 20 50 72 6f cord);.. /* Pro
3750: 63 65 73 73 20 73 65 67 6d 65 6e 74 73 20 62 65 cess segments be
3760: 67 69 6e 6e 69 6e 67 20 77 69 74 68 20 74 68 65 ginning with the
3770: 20 6c 61 73 74 20 61 6e 64 20 77 6f 72 6b 69 6e last and workin
3780: 67 20 62 61 63 6b 77 61 72 64 73 0a 20 20 2a 2a g backwards. **
3790: 20 74 6f 20 74 68 65 20 66 69 72 73 74 2e 0a 20 to the first..
37a0: 20 2a 2f 0a 20 20 66 6f 72 28 69 3d 6e 52 65 63 */. for(i=nRec
37b0: 2d 31 3b 20 69 3e 3d 30 3b 20 69 2d 2d 29 7b 0a -1; i>=0; i--){.
37c0: 20 20 20 20 2f 2a 20 53 65 65 6b 20 74 6f 20 74 /* Seek to t
37d0: 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 he beginning of
37e0: 74 68 65 20 73 65 67 6d 65 6e 74 20 2a 2f 0a 20 the segment */.
37f0: 20 20 20 6f 66 66 5f 74 20 6f 66 73 74 3b 0a 20 off_t ofst;.
3800: 20 20 20 6f 66 73 74 20 3d 20 69 2a 73 69 7a 65 ofst = i*size
3810: 6f 66 28 50 61 67 65 52 65 63 6f 72 64 29 20 2b of(PageRecord) +
3820: 20 73 69 7a 65 6f 66 28 61 4d 61 67 69 63 29 20 sizeof(aMagic)
3830: 2b 20 73 69 7a 65 6f 66 28 50 67 6e 6f 29 3b 0a + sizeof(Pgno);.
3840: 20 20 20 20 72 63 20 3d 20 70 61 67 65 72 5f 73 rc = pager_s
3850: 65 65 6b 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c eek(pPager->jfd,
3860: 20 6f 66 73 74 29 3b 0a 20 20 20 20 69 66 28 20 ofst);. if(
3870: 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 20 rc!=SQLITE_OK )
3880: 62 72 65 61 6b 3b 0a 20 20 20 20 72 63 20 3d 20 break;. rc =
3890: 70 61 67 65 72 5f 72 65 61 64 28 70 50 61 67 65 pager_read(pPage
38a0: 72 2d 3e 6a 66 64 2c 20 26 70 67 52 65 63 2c 20 r->jfd, &pgRec,
38b0: 73 69 7a 65 6f 66 28 70 67 52 65 63 29 29 3b 0a sizeof(pgRec));.
38c0: 20 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 if( rc!=SQLI
38d0: 54 45 5f 4f 4b 20 29 20 62 72 65 61 6b 3b 0a 0a TE_OK ) break;..
38e0: 20 20 20 20 2f 2a 20 53 61 6e 69 74 79 20 63 68 /* Sanity ch
38f0: 65 63 6b 69 6e 67 20 6f 6e 20 74 68 65 20 70 61 ecking on the pa
3900: 67 65 20 2a 2f 0a 20 20 20 20 69 66 28 20 70 67 ge */. if( pg
3910: 52 65 63 2e 70 67 6e 6f 3e 6d 78 50 67 20 7c 7c Rec.pgno>mxPg ||
3920: 20 70 67 52 65 63 2e 70 67 6e 6f 3d 3d 30 20 29 pgRec.pgno==0 )
3930: 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c {. rc = SQL
3940: 49 54 45 5f 43 4f 52 52 55 50 54 3b 0a 20 20 20 ITE_CORRUPT;.
3950: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a break;. }.
3960: 0a 20 20 20 20 2f 2a 20 50 6c 61 79 62 61 63 6b . /* Playback
3970: 20 74 68 65 20 70 61 67 65 2e 20 20 55 70 64 61 the page. Upda
3980: 74 65 20 74 68 65 20 69 6e 2d 6d 65 6d 6f 72 79 te the in-memory
3990: 20 63 6f 70 79 20 6f 66 20 74 68 65 20 70 61 67 copy of the pag
39a0: 65 0a 20 20 20 20 2a 2a 20 61 74 20 74 68 65 20 e. ** at the
39b0: 73 61 6d 65 20 74 69 6d 65 2c 20 69 66 20 74 68 same time, if th
39c0: 65 72 65 20 69 73 20 6f 6e 65 2e 0a 20 20 20 20 ere is one..
39d0: 2a 2f 0a 20 20 20 20 70 50 67 20 3d 20 70 61 67 */. pPg = pag
39e0: 65 72 5f 6c 6f 6f 6b 75 70 28 70 50 61 67 65 72 er_lookup(pPager
39f0: 2c 20 70 67 52 65 63 2e 70 67 6e 6f 29 3b 0a 20 , pgRec.pgno);.
3a00: 20 20 20 69 66 28 20 70 50 67 20 29 7b 0a 20 20 if( pPg ){.
3a10: 20 20 20 20 6d 65 6d 63 70 79 28 50 47 48 44 52 memcpy(PGHDR
3a20: 5f 54 4f 5f 44 41 54 41 28 70 50 67 29 2c 20 70 _TO_DATA(pPg), p
3a30: 67 52 65 63 2e 61 44 61 74 61 2c 20 53 51 4c 49 gRec.aData, SQLI
3a40: 54 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 TE_PAGE_SIZE);.
3a50: 20 20 20 20 20 6d 65 6d 73 65 74 28 50 47 48 44 memset(PGHD
3a60: 52 5f 54 4f 5f 45 58 54 52 41 28 70 50 67 29 2c R_TO_EXTRA(pPg),
3a70: 20 30 2c 20 70 50 61 67 65 72 2d 3e 6e 45 78 74 0, pPager->nExt
3a80: 72 61 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 72 ra);. }. r
3a90: 63 20 3d 20 70 61 67 65 72 5f 73 65 65 6b 28 70 c = pager_seek(p
3aa0: 50 61 67 65 72 2d 3e 66 64 2c 20 28 70 67 52 65 Pager->fd, (pgRe
3ab0: 63 2e 70 67 6e 6f 2d 31 29 2a 53 51 4c 49 54 45 c.pgno-1)*SQLITE
3ac0: 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 _PAGE_SIZE);.
3ad0: 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f if( rc!=SQLITE_
3ae0: 4f 4b 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 OK ) break;.
3af0: 72 63 20 3d 20 70 61 67 65 72 5f 77 72 69 74 65 rc = pager_write
3b00: 28 70 50 61 67 65 72 2d 3e 66 64 2c 20 70 67 52 (pPager->fd, pgR
3b10: 65 63 2e 61 44 61 74 61 2c 20 53 51 4c 49 54 45 ec.aData, SQLITE
3b20: 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 _PAGE_SIZE);.
3b30: 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f if( rc!=SQLITE_
3b40: 4f 4b 20 29 20 62 72 65 61 6b 3b 0a 20 20 7d 0a OK ) break;. }.
3b50: 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 if( rc!=SQLITE
3b60: 5f 4f 4b 20 29 7b 0a 20 20 20 20 70 61 67 65 72 _OK ){. pager
3b70: 5f 75 6e 77 72 69 74 65 6c 6f 63 6b 28 70 50 61 _unwritelock(pPa
3b80: 67 65 72 29 3b 0a 20 20 20 20 70 50 61 67 65 72 ger);. pPager
3b90: 2d 3e 65 72 72 4d 61 73 6b 20 7c 3d 20 50 41 47 ->errMask |= PAG
3ba0: 45 52 5f 45 52 52 5f 43 4f 52 52 55 50 54 3b 0a ER_ERR_CORRUPT;.
3bb0: 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f rc = SQLITE_
3bc0: 43 4f 52 52 55 50 54 3b 0a 20 20 7d 65 6c 73 65 CORRUPT;. }else
3bd0: 7b 0a 20 20 20 20 72 63 20 3d 20 70 61 67 65 72 {. rc = pager
3be0: 5f 75 6e 77 72 69 74 65 6c 6f 63 6b 28 70 50 61 _unwritelock(pPa
3bf0: 67 65 72 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 ger);. }. retu
3c00: 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 rn rc;.}../*.**
3c10: 4c 6f 63 61 74 65 20 61 20 64 69 72 65 63 74 6f Locate a directo
3c20: 72 79 20 77 68 65 72 65 20 77 65 20 63 61 6e 20 ry where we can
3c30: 70 6f 74 65 6e 74 69 61 6c 6c 79 20 63 72 65 61 potentially crea
3c40: 74 65 20 61 20 74 65 6d 70 6f 72 61 72 79 0a 2a te a temporary.*
3c50: 2a 20 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 * file..*/.stati
3c60: 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 66 69 c const char *fi
3c70: 6e 64 54 65 6d 70 44 69 72 28 76 6f 69 64 29 7b ndTempDir(void){
3c80: 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 . static const
3c90: 63 68 61 72 20 2a 61 7a 44 69 72 73 5b 5d 20 3d char *azDirs[] =
3ca0: 20 7b 0a 20 20 20 20 20 22 2e 22 2c 0a 20 20 20 {. ".",.
3cb0: 20 20 22 2f 76 61 72 2f 74 6d 70 22 2c 0a 20 20 "/var/tmp",.
3cc0: 20 20 20 22 2f 75 73 72 2f 74 6d 70 22 2c 0a 20 "/usr/tmp",.
3cd0: 20 20 20 20 22 2f 74 6d 70 22 2c 0a 20 20 20 20 "/tmp",.
3ce0: 20 22 2f 74 65 6d 70 22 2c 0a 20 20 20 20 20 22 "/temp",. "
3cf0: 2e 2f 74 65 6d 70 22 2c 0a 20 20 7d 3b 0a 20 20 ./temp",. };.
3d00: 69 6e 74 20 69 3b 0a 20 20 73 74 72 75 63 74 20 int i;. struct
3d10: 73 74 61 74 20 62 75 66 3b 0a 20 20 66 6f 72 28 stat buf;. for(
3d20: 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 7a i=0; i<sizeof(az
3d30: 44 69 72 73 29 2f 73 69 7a 65 6f 66 28 61 7a 44 Dirs)/sizeof(azD
3d40: 69 72 73 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 irs[0]); i++){.
3d50: 20 20 20 69 66 28 20 73 74 61 74 28 61 7a 44 69 if( stat(azDi
3d60: 72 73 5b 69 5d 2c 20 26 62 75 66 29 20 29 20 63 rs[i], &buf) ) c
3d70: 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69 66 28 ontinue;. if(
3d80: 20 21 53 5f 49 53 44 49 52 28 62 75 66 2e 73 74 !S_ISDIR(buf.st
3d90: 5f 6d 6f 64 65 29 20 29 20 63 6f 6e 74 69 6e 75 _mode) ) continu
3da0: 65 3b 0a 20 20 20 20 69 66 28 20 61 63 63 65 73 e;. if( acces
3db0: 73 28 61 7a 44 69 72 73 5b 69 5d 2c 20 30 37 29 s(azDirs[i], 07)
3dc0: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 ) continue;.
3dd0: 20 72 65 74 75 72 6e 20 61 7a 44 69 72 73 5b 69 return azDirs[i
3de0: 5d 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 ];. }. return
3df0: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 61 6e 0;.}../*.** Chan
3e00: 67 65 20 74 68 65 20 6d 61 78 69 6d 75 6d 20 6e ge the maximum n
3e10: 75 6d 62 65 72 20 6f 66 20 69 6e 2d 6d 65 6d 6f umber of in-memo
3e20: 72 79 20 70 61 67 65 73 20 74 68 61 74 20 61 72 ry pages that ar
3e30: 65 20 61 6c 6c 6f 77 65 64 2e 0a 2a 2f 0a 76 6f e allowed..*/.vo
3e40: 69 64 20 73 71 6c 69 74 65 70 61 67 65 72 5f 73 id sqlitepager_s
3e50: 65 74 5f 63 61 63 68 65 73 69 7a 65 28 50 61 67 et_cachesize(Pag
3e60: 65 72 20 2a 70 50 61 67 65 72 2c 20 69 6e 74 20 er *pPager, int
3e70: 6d 78 50 61 67 65 29 7b 0a 20 20 69 66 28 20 6d mxPage){. if( m
3e80: 78 50 61 67 65 3e 31 30 20 29 7b 0a 20 20 20 20 xPage>10 ){.
3e90: 70 50 61 67 65 72 2d 3e 6d 78 50 61 67 65 20 3d pPager->mxPage =
3ea0: 20 6d 78 50 61 67 65 3b 0a 20 20 7d 0a 7d 0a 0a mxPage;. }.}..
3eb0: 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20 6e /*.** Create a n
3ec0: 65 77 20 70 61 67 65 20 63 61 63 68 65 20 61 6e ew page cache an
3ed0: 64 20 70 75 74 20 61 20 70 6f 69 6e 74 65 72 20 d put a pointer
3ee0: 74 6f 20 74 68 65 20 70 61 67 65 20 63 61 63 68 to the page cach
3ef0: 65 20 69 6e 20 2a 70 70 50 61 67 65 72 2e 0a 2a e in *ppPager..*
3f00: 2a 20 54 68 65 20 66 69 6c 65 20 74 6f 20 62 65 * The file to be
3f10: 20 63 61 63 68 65 64 20 6e 65 65 64 20 6e 6f 74 cached need not
3f20: 20 65 78 69 73 74 2e 20 20 54 68 65 20 66 69 6c exist. The fil
3f30: 65 20 69 73 20 6e 6f 74 20 6c 6f 63 6b 65 64 20 e is not locked
3f40: 75 6e 74 69 6c 0a 2a 2a 20 74 68 65 20 66 69 72 until.** the fir
3f50: 73 74 20 63 61 6c 6c 20 74 6f 20 73 71 6c 69 74 st call to sqlit
3f60: 65 70 61 67 65 72 5f 67 65 74 28 29 20 61 6e 64 epager_get() and
3f70: 20 69 73 20 6f 6e 6c 79 20 68 65 6c 64 20 6f 70 is only held op
3f80: 65 6e 20 75 6e 74 69 6c 20 74 68 65 0a 2a 2a 20 en until the.**
3f90: 6c 61 73 74 20 70 61 67 65 20 69 73 20 72 65 6c last page is rel
3fa0: 65 61 73 65 64 20 75 73 69 6e 67 20 73 71 6c 69 eased using sqli
3fb0: 74 65 70 61 67 65 72 5f 75 6e 72 65 66 28 29 2e tepager_unref().
3fc0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 70 61 .*/.int sqlitepa
3fd0: 67 65 72 5f 6f 70 65 6e 28 0a 20 20 50 61 67 65 ger_open(. Page
3fe0: 72 20 2a 2a 70 70 50 61 67 65 72 2c 20 20 20 20 r **ppPager,
3ff0: 20 20 20 20 20 2f 2a 20 52 65 74 75 72 6e 20 74 /* Return t
4000: 68 65 20 50 61 67 65 72 20 73 74 72 75 63 74 75 he Pager structu
4010: 72 65 20 68 65 72 65 20 2a 2f 0a 20 20 63 6f 6e re here */. con
4020: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 st char *zFilena
4030: 6d 65 2c 20 20 20 2f 2a 20 4e 61 6d 65 20 6f 66 me, /* Name of
4040: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 66 69 the database fi
4050: 6c 65 20 74 6f 20 6f 70 65 6e 20 2a 2f 0a 20 20 le to open */.
4060: 69 6e 74 20 6d 78 50 61 67 65 2c 20 20 20 20 20 int mxPage,
4070: 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 61 78 20 /* Max
4080: 6e 75 6d 62 65 72 20 6f 66 20 69 6e 2d 6d 65 6d number of in-mem
4090: 6f 72 79 20 63 61 63 68 65 20 70 61 67 65 73 20 ory cache pages
40a0: 2a 2f 0a 20 20 69 6e 74 20 6e 45 78 74 72 61 20 */. int nExtra
40b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
40c0: 20 45 78 74 72 61 20 62 79 74 65 73 20 61 70 70 Extra bytes app
40d0: 65 6e 64 20 74 6f 20 65 61 63 68 20 69 6e 2d 6d end to each in-m
40e0: 65 6d 6f 72 79 20 70 61 67 65 20 2a 2f 0a 29 7b emory page */.){
40f0: 0a 20 20 50 61 67 65 72 20 2a 70 50 61 67 65 72 . Pager *pPager
4100: 3b 0a 20 20 69 6e 74 20 6e 61 6d 65 4c 65 6e 3b ;. int nameLen;
4110: 0a 20 20 69 6e 74 20 66 64 3b 0a 20 20 69 6e 74 . int fd;. int
4120: 20 74 65 6d 70 46 69 6c 65 3b 0a 20 20 69 6e 74 tempFile;. int
4130: 20 72 65 61 64 4f 6e 6c 79 20 3d 20 30 3b 0a 20 readOnly = 0;.
4140: 20 63 68 61 72 20 7a 54 65 6d 70 5b 33 30 30 5d char zTemp[300]
4150: 3b 0a 0a 20 20 2a 70 70 50 61 67 65 72 20 3d 20 ;.. *ppPager =
4160: 30 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 5f 0;. if( sqlite_
4170: 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 20 29 7b malloc_failed ){
4180: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 . return SQLI
4190: 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 TE_NOMEM;. }.
41a0: 69 66 28 20 7a 46 69 6c 65 6e 61 6d 65 20 29 7b if( zFilename ){
41b0: 0a 20 20 20 20 66 64 20 3d 20 6f 70 65 6e 28 7a . fd = open(z
41c0: 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 57 52 Filename, O_RDWR
41d0: 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 34 29 3b |O_CREAT, 0644);
41e0: 0a 20 20 20 20 69 66 28 20 66 64 3c 30 20 29 7b . if( fd<0 ){
41f0: 0a 20 20 20 20 20 20 66 64 20 3d 20 6f 70 65 6e . fd = open
4200: 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 (zFilename, O_RD
4210: 4f 4e 4c 59 2c 20 30 29 3b 0a 20 20 20 20 20 20 ONLY, 0);.
4220: 72 65 61 64 4f 6e 6c 79 20 3d 20 31 3b 0a 20 20 readOnly = 1;.
4230: 20 20 7d 0a 20 20 20 20 74 65 6d 70 46 69 6c 65 }. tempFile
4240: 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 = 0;. }else{.
4250: 20 20 20 69 6e 74 20 63 6e 74 20 3d 20 38 3b 0a int cnt = 8;.
4260: 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a const char *
4270: 7a 44 69 72 20 3d 20 66 69 6e 64 54 65 6d 70 44 zDir = findTempD
4280: 69 72 28 29 3b 0a 20 20 20 20 69 66 28 20 7a 44 ir();. if( zD
4290: 69 72 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 53 ir==0 ) return S
42a0: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a QLITE_CANTOPEN;.
42b0: 20 20 20 20 64 6f 7b 0a 20 20 20 20 20 20 63 6e do{. cn
42c0: 74 2d 2d 3b 0a 20 20 20 20 20 20 73 70 72 69 6e t--;. sprin
42d0: 74 66 28 7a 54 65 6d 70 2c 22 25 73 2f 5f 73 71 tf(zTemp,"%s/_sq
42e0: 6c 69 74 65 5f 25 75 22 2c 20 7a 44 69 72 2c 20 lite_%u", zDir,
42f0: 28 75 6e 73 69 67 6e 65 64 29 73 71 6c 69 74 65 (unsigned)sqlite
4300: 52 61 6e 64 6f 6d 49 6e 74 65 67 65 72 28 29 29 RandomInteger())
4310: 3b 0a 20 20 20 20 20 20 66 64 20 3d 20 6f 70 65 ;. fd = ope
4320: 6e 28 7a 54 65 6d 70 2c 20 4f 5f 52 44 57 52 7c n(zTemp, O_RDWR|
4330: 4f 5f 43 52 45 41 54 7c 4f 5f 45 58 43 4c 2c 20 O_CREAT|O_EXCL,
4340: 30 36 30 30 29 3b 0a 20 20 20 20 7d 77 68 69 6c 0600);. }whil
4350: 65 28 20 63 6e 74 3e 30 20 26 26 20 66 64 3c 30 e( cnt>0 && fd<0
4360: 20 29 3b 0a 20 20 20 20 7a 46 69 6c 65 6e 61 6d );. zFilenam
4370: 65 20 3d 20 7a 54 65 6d 70 3b 0a 20 20 20 20 74 e = zTemp;. t
4380: 65 6d 70 46 69 6c 65 20 3d 20 31 3b 0a 20 20 7d empFile = 1;. }
4390: 0a 20 20 69 66 28 20 66 64 3c 30 20 29 7b 0a 20 . if( fd<0 ){.
43a0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 return SQLITE
43b0: 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 _CANTOPEN;. }.
43c0: 20 6e 61 6d 65 4c 65 6e 20 3d 20 73 74 72 6c 65 nameLen = strle
43d0: 6e 28 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 n(zFilename);.
43e0: 70 50 61 67 65 72 20 3d 20 73 71 6c 69 74 65 4d pPager = sqliteM
43f0: 61 6c 6c 6f 63 28 20 73 69 7a 65 6f 66 28 2a 70 alloc( sizeof(*p
4400: 50 61 67 65 72 29 20 2b 20 6e 61 6d 65 4c 65 6e Pager) + nameLen
4410: 2a 32 20 2b 20 33 30 20 29 3b 0a 20 20 69 66 28 *2 + 30 );. if(
4420: 20 70 50 61 67 65 72 3d 3d 30 20 29 7b 0a 20 20 pPager==0 ){.
4430: 20 20 63 6c 6f 73 65 28 66 64 29 3b 0a 20 20 20 close(fd);.
4440: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e return SQLITE_N
4450: 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 70 50 61 67 OMEM;. }. pPag
4460: 65 72 2d 3e 7a 46 69 6c 65 6e 61 6d 65 20 3d 20 er->zFilename =
4470: 28 63 68 61 72 2a 29 26 70 50 61 67 65 72 5b 31 (char*)&pPager[1
4480: 5d 3b 0a 20 20 70 50 61 67 65 72 2d 3e 7a 4a 6f ];. pPager->zJo
4490: 75 72 6e 61 6c 20 3d 20 26 70 50 61 67 65 72 2d urnal = &pPager-
44a0: 3e 7a 46 69 6c 65 6e 61 6d 65 5b 6e 61 6d 65 4c >zFilename[nameL
44b0: 65 6e 2b 31 5d 3b 0a 20 20 73 74 72 63 70 79 28 en+1];. strcpy(
44c0: 70 50 61 67 65 72 2d 3e 7a 46 69 6c 65 6e 61 6d pPager->zFilenam
44d0: 65 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 e, zFilename);.
44e0: 20 73 74 72 63 70 79 28 70 50 61 67 65 72 2d 3e strcpy(pPager->
44f0: 7a 4a 6f 75 72 6e 61 6c 2c 20 7a 46 69 6c 65 6e zJournal, zFilen
4500: 61 6d 65 29 3b 0a 20 20 73 74 72 63 70 79 28 26 ame);. strcpy(&
4510: 70 50 61 67 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c pPager->zJournal
4520: 5b 6e 61 6d 65 4c 65 6e 5d 2c 20 22 2d 6a 6f 75 [nameLen], "-jou
4530: 72 6e 61 6c 22 29 3b 0a 20 20 70 50 61 67 65 72 rnal");. pPager
4540: 2d 3e 66 64 20 3d 20 66 64 3b 0a 20 20 70 50 61 ->fd = fd;. pPa
4550: 67 65 72 2d 3e 6a 66 64 20 3d 20 2d 31 3b 0a 20 ger->jfd = -1;.
4560: 20 70 50 61 67 65 72 2d 3e 6e 52 65 66 20 3d 20 pPager->nRef =
4570: 30 3b 0a 20 20 70 50 61 67 65 72 2d 3e 64 62 53 0;. pPager->dbS
4580: 69 7a 65 20 3d 20 2d 31 3b 0a 20 20 70 50 61 67 ize = -1;. pPag
4590: 65 72 2d 3e 6e 50 61 67 65 20 3d 20 30 3b 0a 20 er->nPage = 0;.
45a0: 20 70 50 61 67 65 72 2d 3e 6d 78 50 61 67 65 20 pPager->mxPage
45b0: 3d 20 6d 78 50 61 67 65 3e 35 20 3f 20 6d 78 50 = mxPage>5 ? mxP
45c0: 61 67 65 20 3a 20 31 30 3b 0a 20 20 70 50 61 67 age : 10;. pPag
45d0: 65 72 2d 3e 73 74 61 74 65 20 3d 20 53 51 4c 49 er->state = SQLI
45e0: 54 45 5f 55 4e 4c 4f 43 4b 3b 0a 20 20 70 50 61 TE_UNLOCK;. pPa
45f0: 67 65 72 2d 3e 65 72 72 4d 61 73 6b 20 3d 20 30 ger->errMask = 0
4600: 3b 0a 20 20 70 50 61 67 65 72 2d 3e 74 65 6d 70 ;. pPager->temp
4610: 46 69 6c 65 20 3d 20 74 65 6d 70 46 69 6c 65 3b File = tempFile;
4620: 0a 20 20 70 50 61 67 65 72 2d 3e 72 65 61 64 4f . pPager->readO
4630: 6e 6c 79 20 3d 20 72 65 61 64 4f 6e 6c 79 3b 0a nly = readOnly;.
4640: 20 20 70 50 61 67 65 72 2d 3e 6e 65 65 64 53 79 pPager->needSy
4650: 6e 63 20 3d 20 30 3b 0a 20 20 70 50 61 67 65 72 nc = 0;. pPager
4660: 2d 3e 70 46 69 72 73 74 20 3d 20 30 3b 0a 20 20 ->pFirst = 0;.
4670: 70 50 61 67 65 72 2d 3e 70 4c 61 73 74 20 3d 20 pPager->pLast =
4680: 30 3b 0a 20 20 70 50 61 67 65 72 2d 3e 6e 45 78 0;. pPager->nEx
4690: 74 72 61 20 3d 20 6e 45 78 74 72 61 3b 0a 20 20 tra = nExtra;.
46a0: 6d 65 6d 73 65 74 28 70 50 61 67 65 72 2d 3e 61 memset(pPager->a
46b0: 48 61 73 68 2c 20 30 2c 20 73 69 7a 65 6f 66 28 Hash, 0, sizeof(
46c0: 70 50 61 67 65 72 2d 3e 61 48 61 73 68 29 29 3b pPager->aHash));
46d0: 0a 20 20 2a 70 70 50 61 67 65 72 20 3d 20 70 50 . *ppPager = pP
46e0: 61 67 65 72 3b 0a 20 20 72 65 74 75 72 6e 20 53 ager;. return S
46f0: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a QLITE_OK;.}../*.
4700: 2a 2a 20 53 65 74 20 74 68 65 20 64 65 73 74 72 ** Set the destr
4710: 75 63 74 6f 72 20 66 6f 72 20 74 68 69 73 20 70 uctor for this p
4720: 61 67 65 72 2e 20 20 49 66 20 6e 6f 74 20 4e 55 ager. If not NU
4730: 4c 4c 2c 20 74 68 65 20 64 65 73 74 72 75 63 74 LL, the destruct
4740: 6f 72 20 69 73 20 63 61 6c 6c 65 64 0a 2a 2a 20 or is called.**
4750: 77 68 65 6e 20 74 68 65 20 72 65 66 65 72 65 6e when the referen
4760: 63 65 20 63 6f 75 6e 74 20 6f 6e 20 65 61 63 68 ce count on each
4770: 20 70 61 67 65 20 72 65 61 63 68 65 73 20 7a 65 page reaches ze
4780: 72 6f 2e 20 20 54 68 65 20 64 65 73 74 72 75 63 ro. The destruc
4790: 74 6f 72 20 63 61 6e 0a 2a 2a 20 62 65 20 75 73 tor can.** be us
47a0: 65 64 20 74 6f 20 63 6c 65 61 6e 20 75 70 20 69 ed to clean up i
47b0: 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 74 68 nformation in th
47c0: 65 20 65 78 74 72 61 20 73 65 67 6d 65 6e 74 20 e extra segment
47d0: 61 70 70 65 6e 64 65 64 20 74 6f 20 65 61 63 68 appended to each
47e0: 20 70 61 67 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 page..**.** The
47f0: 20 64 65 73 74 72 75 63 74 6f 72 20 69 73 20 6e destructor is n
4800: 6f 74 20 63 61 6c 6c 65 64 20 61 73 20 61 20 72 ot called as a r
4810: 65 73 75 6c 74 20 73 71 6c 69 74 65 70 61 67 65 esult sqlitepage
4820: 72 5f 63 6c 6f 73 65 28 29 2e 20 20 0a 2a 2a 20 r_close(). .**
4830: 44 65 73 74 72 75 63 74 6f 72 73 20 61 72 65 20 Destructors are
4840: 6f 6e 6c 79 20 63 61 6c 6c 65 64 20 62 79 20 73 only called by s
4850: 71 6c 69 74 65 70 61 67 65 72 5f 75 6e 72 65 66 qlitepager_unref
4860: 28 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 ()..*/.void sqli
4870: 74 65 70 61 67 65 72 5f 73 65 74 5f 64 65 73 74 tepager_set_dest
4880: 72 75 63 74 6f 72 28 50 61 67 65 72 20 2a 70 50 ructor(Pager *pP
4890: 61 67 65 72 2c 20 76 6f 69 64 20 28 2a 78 44 65 ager, void (*xDe
48a0: 73 63 29 28 76 6f 69 64 2a 29 29 7b 0a 20 20 70 sc)(void*)){. p
48b0: 50 61 67 65 72 2d 3e 78 44 65 73 74 72 75 63 74 Pager->xDestruct
48c0: 6f 72 20 3d 20 78 44 65 73 63 3b 0a 7d 0a 0a 2f or = xDesc;.}../
48d0: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 *.** Return the
48e0: 74 6f 74 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 total number of
48f0: 70 61 67 65 73 20 69 6e 20 74 68 65 20 64 69 73 pages in the dis
4900: 6b 20 66 69 6c 65 20 61 73 73 6f 63 69 61 74 65 k file associate
4910: 64 20 77 69 74 68 0a 2a 2a 20 70 50 61 67 65 72 d with.** pPager
4920: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 70 ..*/.int sqlitep
4930: 61 67 65 72 5f 70 61 67 65 63 6f 75 6e 74 28 50 ager_pagecount(P
4940: 61 67 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 ager *pPager){.
4950: 20 69 6e 74 20 6e 3b 0a 20 20 73 74 72 75 63 74 int n;. struct
4960: 20 73 74 61 74 20 73 74 61 74 62 75 66 3b 0a 20 stat statbuf;.
4970: 20 61 73 73 65 72 74 28 20 70 50 61 67 65 72 21 assert( pPager!
4980: 3d 30 20 29 3b 0a 20 20 69 66 28 20 70 50 61 67 =0 );. if( pPag
4990: 65 72 2d 3e 64 62 53 69 7a 65 3e 3d 30 20 29 7b er->dbSize>=0 ){
49a0: 0a 20 20 20 20 72 65 74 75 72 6e 20 70 50 61 67 . return pPag
49b0: 65 72 2d 3e 64 62 53 69 7a 65 3b 0a 20 20 7d 0a er->dbSize;. }.
49c0: 20 20 69 66 28 20 66 73 74 61 74 28 70 50 61 67 if( fstat(pPag
49d0: 65 72 2d 3e 66 64 2c 20 26 73 74 61 74 62 75 66 er->fd, &statbuf
49e0: 29 21 3d 30 20 29 7b 0a 20 20 20 20 6e 20 3d 20 )!=0 ){. n =
49f0: 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 0;. }else{.
4a00: 6e 20 3d 20 73 74 61 74 62 75 66 2e 73 74 5f 73 n = statbuf.st_s
4a10: 69 7a 65 2f 53 51 4c 49 54 45 5f 50 41 47 45 5f ize/SQLITE_PAGE_
4a20: 53 49 5a 45 3b 0a 20 20 7d 0a 20 20 69 66 28 20 SIZE;. }. if(
4a30: 70 50 61 67 65 72 2d 3e 73 74 61 74 65 21 3d 53 pPager->state!=S
4a40: 51 4c 49 54 45 5f 55 4e 4c 4f 43 4b 20 29 7b 0a QLITE_UNLOCK ){.
4a50: 20 20 20 20 70 50 61 67 65 72 2d 3e 64 62 53 69 pPager->dbSi
4a60: 7a 65 20 3d 20 6e 3b 0a 20 20 7d 0a 20 20 72 65 ze = n;. }. re
4a70: 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a turn n;.}../*.**
4a80: 20 53 68 75 74 64 6f 77 6e 20 74 68 65 20 70 61 Shutdown the pa
4a90: 67 65 20 63 61 63 68 65 2e 20 20 46 72 65 65 20 ge cache. Free
4aa0: 61 6c 6c 20 6d 65 6d 6f 72 79 20 61 6e 64 20 63 all memory and c
4ab0: 6c 6f 73 65 20 61 6c 6c 20 66 69 6c 65 73 2e 0a lose all files..
4ac0: 2a 2a 0a 2a 2a 20 49 66 20 61 20 74 72 61 6e 73 **.** If a trans
4ad0: 61 63 74 69 6f 6e 20 77 61 73 20 69 6e 20 70 72 action was in pr
4ae0: 6f 67 72 65 73 73 20 77 68 65 6e 20 74 68 69 73 ogress when this
4af0: 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 6c 6c routine is call
4b00: 65 64 2c 20 74 68 61 74 0a 2a 2a 20 74 72 61 6e ed, that.** tran
4b10: 73 61 63 74 69 6f 6e 20 69 73 20 72 6f 6c 6c 65 saction is rolle
4b20: 64 20 62 61 63 6b 2e 20 20 41 6c 6c 20 6f 75 74 d back. All out
4b30: 73 74 61 6e 64 69 6e 67 20 70 61 67 65 73 20 61 standing pages a
4b40: 72 65 20 69 6e 76 61 6c 69 64 61 74 65 64 0a 2a re invalidated.*
4b50: 2a 20 61 6e 64 20 74 68 65 69 72 20 6d 65 6d 6f * and their memo
4b60: 72 79 20 69 73 20 66 72 65 65 64 2e 20 20 41 6e ry is freed. An
4b70: 79 20 61 74 74 65 6d 70 74 20 74 6f 20 75 73 65 y attempt to use
4b80: 20 61 20 70 61 67 65 20 61 73 73 6f 63 69 61 74 a page associat
4b90: 65 64 0a 2a 2a 20 77 69 74 68 20 74 68 69 73 20 ed.** with this
4ba0: 70 61 67 65 20 63 61 63 68 65 20 61 66 74 65 72 page cache after
4bb0: 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 this function r
4bc0: 65 74 75 72 6e 73 20 77 69 6c 6c 20 6c 69 6b 65 eturns will like
4bd0: 6c 79 0a 2a 2a 20 72 65 73 75 6c 74 20 69 6e 20 ly.** result in
4be0: 61 20 63 6f 72 65 64 75 6d 70 2e 0a 2a 2f 0a 69 a coredump..*/.i
4bf0: 6e 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 63 nt sqlitepager_c
4c00: 6c 6f 73 65 28 50 61 67 65 72 20 2a 70 50 61 67 lose(Pager *pPag
4c10: 65 72 29 7b 0a 20 20 50 67 48 64 72 20 2a 70 50 er){. PgHdr *pP
4c20: 67 2c 20 2a 70 4e 65 78 74 3b 0a 20 20 73 77 69 g, *pNext;. swi
4c30: 74 63 68 28 20 70 50 61 67 65 72 2d 3e 73 74 61 tch( pPager->sta
4c40: 74 65 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 te ){. case S
4c50: 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 3a QLITE_WRITELOCK:
4c60: 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 70 {. sqlitep
4c70: 61 67 65 72 5f 72 6f 6c 6c 62 61 63 6b 28 70 50 ager_rollback(pP
4c80: 61 67 65 72 29 3b 0a 20 20 20 20 20 20 70 61 67 ager);. pag
4c90: 65 72 5f 75 6e 6c 6f 63 6b 28 70 50 61 67 65 72 er_unlock(pPager
4ca0: 2d 3e 66 64 29 3b 0a 20 20 20 20 20 20 62 72 65 ->fd);. bre
4cb0: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 ak;. }. ca
4cc0: 73 65 20 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f se SQLITE_READLO
4cd0: 43 4b 3a 20 7b 0a 20 20 20 20 20 20 70 61 67 65 CK: {. page
4ce0: 72 5f 75 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d r_unlock(pPager-
4cf0: 3e 66 64 29 3b 0a 20 20 20 20 20 20 62 72 65 61 >fd);. brea
4d00: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 k;. }. def
4d10: 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 2f 2a ault: {. /*
4d20: 20 44 6f 20 6e 6f 74 68 69 6e 67 20 2a 2f 0a 20 Do nothing */.
4d30: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 break;.
4d40: 7d 0a 20 20 7d 0a 20 20 66 6f 72 28 70 50 67 3d }. }. for(pPg=
4d50: 70 50 61 67 65 72 2d 3e 70 41 6c 6c 3b 20 70 50 pPager->pAll; pP
4d60: 67 3b 20 70 50 67 3d 70 4e 65 78 74 29 7b 0a 20 g; pPg=pNext){.
4d70: 20 20 20 70 4e 65 78 74 20 3d 20 70 50 67 2d 3e pNext = pPg->
4d80: 70 4e 65 78 74 41 6c 6c 3b 0a 20 20 20 20 73 71 pNextAll;. sq
4d90: 6c 69 74 65 46 72 65 65 28 70 50 67 29 3b 0a 20 liteFree(pPg);.
4da0: 20 7d 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d }. if( pPager-
4db0: 3e 66 64 3e 3d 30 20 29 20 63 6c 6f 73 65 28 70 >fd>=0 ) close(p
4dc0: 50 61 67 65 72 2d 3e 66 64 29 3b 0a 20 20 61 73 Pager->fd);. as
4dd0: 73 65 72 74 28 20 70 50 61 67 65 72 2d 3e 6a 66 sert( pPager->jf
4de0: 64 3c 30 20 29 3b 0a 20 20 69 66 28 20 70 50 61 d<0 );. if( pPa
4df0: 67 65 72 2d 3e 74 65 6d 70 46 69 6c 65 20 29 7b ger->tempFile ){
4e00: 0a 20 20 20 20 75 6e 6c 69 6e 6b 28 70 50 61 67 . unlink(pPag
4e10: 65 72 2d 3e 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a er->zFilename);.
4e20: 20 20 7d 0a 20 20 73 71 6c 69 74 65 46 72 65 65 }. sqliteFree
4e30: 28 70 50 61 67 65 72 29 3b 0a 20 20 72 65 74 75 (pPager);. retu
4e40: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a rn SQLITE_OK;.}.
4e50: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 ./*.** Return th
4e60: 65 20 70 61 67 65 20 6e 75 6d 62 65 72 20 66 6f e page number fo
4e70: 72 20 74 68 65 20 67 69 76 65 6e 20 70 61 67 65 r the given page
4e80: 20 64 61 74 61 2e 0a 2a 2f 0a 50 67 6e 6f 20 73 data..*/.Pgno s
4e90: 71 6c 69 74 65 70 61 67 65 72 5f 70 61 67 65 6e qlitepager_pagen
4ea0: 75 6d 62 65 72 28 76 6f 69 64 20 2a 70 44 61 74 umber(void *pDat
4eb0: 61 29 7b 0a 20 20 50 67 48 64 72 20 2a 70 20 3d a){. PgHdr *p =
4ec0: 20 44 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 DATA_TO_PGHDR(p
4ed0: 44 61 74 61 29 3b 0a 20 20 72 65 74 75 72 6e 20 Data);. return
4ee0: 70 2d 3e 70 67 6e 6f 3b 0a 7d 0a 0a 2f 2a 0a 2a p->pgno;.}../*.*
4ef0: 2a 20 49 6e 63 72 65 6d 65 6e 74 20 74 68 65 20 * Increment the
4f00: 72 65 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 reference count
4f10: 66 6f 72 20 61 20 70 61 67 65 2e 20 20 49 66 20 for a page. If
4f20: 74 68 65 20 70 61 67 65 20 69 73 0a 2a 2a 20 63 the page is.** c
4f30: 75 72 72 65 6e 74 6c 79 20 6f 6e 20 74 68 65 20 urrently on the
4f40: 66 72 65 65 6c 69 73 74 20 28 74 68 65 20 72 65 freelist (the re
4f50: 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 69 73 ference count is
4f60: 20 7a 65 72 6f 29 20 74 68 65 6e 0a 2a 2a 20 72 zero) then.** r
4f70: 65 6d 6f 76 65 20 69 74 20 66 72 6f 6d 20 74 68 emove it from th
4f80: 65 20 66 72 65 65 6c 69 73 74 2e 0a 2a 2f 0a 73 e freelist..*/.s
4f90: 74 61 74 69 63 20 76 6f 69 64 20 70 61 67 65 5f tatic void page_
4fa0: 72 65 66 28 50 67 48 64 72 20 2a 70 50 67 29 7b ref(PgHdr *pPg){
4fb0: 0a 20 20 69 66 28 20 70 50 67 2d 3e 6e 52 65 66 . if( pPg->nRef
4fc0: 3d 3d 30 20 29 7b 0a 20 20 20 20 2f 2a 20 54 68 ==0 ){. /* Th
4fd0: 65 20 70 61 67 65 20 69 73 20 63 75 72 72 65 6e e page is curren
4fe0: 74 6c 79 20 6f 6e 20 74 68 65 20 66 72 65 65 6c tly on the freel
4ff0: 69 73 74 2e 20 20 52 65 6d 6f 76 65 20 69 74 2e ist. Remove it.
5000: 20 2a 2f 0a 20 20 20 20 69 66 28 20 70 50 67 2d */. if( pPg-
5010: 3e 70 50 72 65 76 46 72 65 65 20 29 7b 0a 20 20 >pPrevFree ){.
5020: 20 20 20 20 70 50 67 2d 3e 70 50 72 65 76 46 72 pPg->pPrevFr
5030: 65 65 2d 3e 70 4e 65 78 74 46 72 65 65 20 3d 20 ee->pNextFree =
5040: 70 50 67 2d 3e 70 4e 65 78 74 46 72 65 65 3b 0a pPg->pNextFree;.
5050: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
5060: 20 70 50 67 2d 3e 70 50 61 67 65 72 2d 3e 70 46 pPg->pPager->pF
5070: 69 72 73 74 20 3d 20 70 50 67 2d 3e 70 4e 65 78 irst = pPg->pNex
5080: 74 46 72 65 65 3b 0a 20 20 20 20 7d 0a 20 20 20 tFree;. }.
5090: 20 69 66 28 20 70 50 67 2d 3e 70 4e 65 78 74 46 if( pPg->pNextF
50a0: 72 65 65 20 29 7b 0a 20 20 20 20 20 20 70 50 67 ree ){. pPg
50b0: 2d 3e 70 4e 65 78 74 46 72 65 65 2d 3e 70 50 72 ->pNextFree->pPr
50c0: 65 76 46 72 65 65 20 3d 20 70 50 67 2d 3e 70 50 evFree = pPg->pP
50d0: 72 65 76 46 72 65 65 3b 0a 20 20 20 20 7d 65 6c revFree;. }el
50e0: 73 65 7b 0a 20 20 20 20 20 20 70 50 67 2d 3e 70 se{. pPg->p
50f0: 50 61 67 65 72 2d 3e 70 4c 61 73 74 20 3d 20 70 Pager->pLast = p
5100: 50 67 2d 3e 70 50 72 65 76 46 72 65 65 3b 0a 20 Pg->pPrevFree;.
5110: 20 20 20 7d 0a 20 20 20 20 70 50 67 2d 3e 70 50 }. pPg->pP
5120: 61 67 65 72 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20 ager->nRef++;.
5130: 7d 0a 20 20 70 50 67 2d 3e 6e 52 65 66 2b 2b 3b }. pPg->nRef++;
5140: 0a 20 20 52 45 46 49 4e 46 4f 28 70 50 67 29 3b . REFINFO(pPg);
5150: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 63 72 65 6d .}../*.** Increm
5160: 65 6e 74 20 74 68 65 20 72 65 66 65 72 65 6e 63 ent the referenc
5170: 65 20 63 6f 75 6e 74 20 66 6f 72 20 61 20 70 61 e count for a pa
5180: 67 65 2e 20 20 54 68 65 20 69 6e 70 75 74 20 70 ge. The input p
5190: 6f 69 6e 74 65 72 20 69 73 0a 2a 2a 20 61 20 72 ointer is.** a r
51a0: 65 66 65 72 65 6e 63 65 20 74 6f 20 74 68 65 20 eference to the
51b0: 70 61 67 65 20 64 61 74 61 2e 0a 2a 2f 0a 69 6e page data..*/.in
51c0: 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 72 65 t sqlitepager_re
51d0: 66 28 76 6f 69 64 20 2a 70 44 61 74 61 29 7b 0a f(void *pData){.
51e0: 20 20 50 67 48 64 72 20 2a 70 50 67 20 3d 20 44 PgHdr *pPg = D
51f0: 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 44 61 ATA_TO_PGHDR(pDa
5200: 74 61 29 3b 0a 20 20 70 61 67 65 5f 72 65 66 28 ta);. page_ref(
5210: 70 50 67 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 pPg);. return S
5220: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a QLITE_OK;.}../*.
5230: 2a 2a 20 53 79 6e 63 20 74 68 65 20 6a 6f 75 72 ** Sync the jour
5240: 6e 61 6c 20 61 6e 64 20 74 68 65 6e 20 77 72 69 nal and then wri
5250: 74 65 20 61 6c 6c 20 66 72 65 65 20 64 69 72 74 te all free dirt
5260: 79 20 70 61 67 65 73 20 74 6f 20 74 68 65 20 64 y pages to the d
5270: 61 74 61 62 61 73 65 0a 2a 2a 20 66 69 6c 65 2e atabase.** file.
5280: 0a 2a 2a 0a 2a 2a 20 57 72 69 74 69 6e 67 20 61 .**.** Writing a
5290: 6c 6c 20 66 72 65 65 20 64 69 72 74 79 20 70 61 ll free dirty pa
52a0: 67 65 73 20 74 6f 20 74 68 65 20 64 61 74 61 62 ges to the datab
52b0: 61 73 65 20 61 66 74 65 72 20 74 68 65 20 73 79 ase after the sy
52c0: 6e 63 20 69 73 20 61 0a 2a 2a 20 6e 6f 6e 2d 6f nc is a.** non-o
52d0: 62 76 69 6f 75 73 20 6f 70 74 69 6d 69 7a 61 74 bvious optimizat
52e0: 69 6f 6e 2e 20 20 66 73 79 6e 63 28 29 20 69 73 ion. fsync() is
52f0: 20 61 6e 20 65 78 70 65 6e 73 69 76 65 20 6f 70 an expensive op
5300: 65 72 61 74 69 6f 6e 20 73 6f 20 77 65 0a 2a 2a eration so we.**
5310: 20 77 61 6e 74 20 74 6f 20 6d 69 6e 69 6d 69 7a want to minimiz
5320: 65 20 74 68 65 20 6e 75 6d 62 65 72 20 74 68 61 e the number tha
5330: 74 20 6f 63 63 75 72 2e 20 20 53 6f 20 61 66 74 t occur. So aft
5340: 65 72 20 61 6e 20 66 73 79 6e 63 28 29 20 69 73 er an fsync() is
5350: 20 66 6f 72 63 65 64 0a 2a 2a 20 61 6e 64 20 77 forced.** and w
5360: 65 20 61 72 65 20 66 72 65 65 20 74 6f 20 77 72 e are free to wr
5370: 69 74 65 20 64 69 72 74 79 20 70 61 67 65 73 20 ite dirty pages
5380: 62 61 63 6b 20 74 6f 20 74 68 65 20 64 61 74 61 back to the data
5390: 62 61 73 65 2c 20 69 74 20 69 73 20 62 65 73 74 base, it is best
53a0: 0a 2a 2a 20 74 6f 20 67 6f 20 61 68 65 61 64 20 .** to go ahead
53b0: 61 6e 64 20 64 6f 20 61 73 20 6d 75 63 68 20 6f and do as much o
53c0: 66 20 74 68 61 74 20 61 73 20 70 6f 73 73 69 62 f that as possib
53d0: 6c 65 20 74 6f 20 6d 69 6e 69 6d 69 7a 65 20 74 le to minimize t
53e0: 68 65 20 63 68 61 6e 63 65 0a 2a 2a 20 6f 66 20 he chance.** of
53f0: 68 61 76 69 6e 67 20 74 6f 20 64 6f 20 61 6e 6f having to do ano
5400: 74 68 65 72 20 66 73 79 6e 63 28 29 20 6c 61 74 ther fsync() lat
5410: 65 72 20 6f 6e 2e 20 20 57 72 69 74 69 6e 67 20 er on. Writing
5420: 64 69 72 74 79 20 66 72 65 65 20 70 61 67 65 73 dirty free pages
5430: 0a 2a 2a 20 69 6e 20 74 68 69 73 20 77 61 79 20 .** in this way
5440: 6d 61 6b 65 20 64 61 74 61 62 61 73 65 20 6f 70 make database op
5450: 65 72 61 74 69 6f 6e 73 20 67 6f 20 75 70 20 74 erations go up t
5460: 6f 20 31 30 20 74 69 6d 65 73 20 66 61 73 74 65 o 10 times faste
5470: 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 r..*/.static int
5480: 20 73 79 6e 63 41 6c 6c 50 61 67 65 73 28 50 61 syncAllPages(Pa
5490: 67 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 ger *pPager){.
54a0: 50 67 48 64 72 20 2a 70 50 67 3b 0a 20 20 69 6e PgHdr *pPg;. in
54b0: 74 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b t rc = SQLITE_OK
54c0: 3b 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e ;. if( pPager->
54d0: 6e 65 65 64 53 79 6e 63 20 29 7b 0a 20 20 20 20 needSync ){.
54e0: 72 63 20 3d 20 66 73 79 6e 63 28 70 50 61 67 65 rc = fsync(pPage
54f0: 72 2d 3e 6a 66 64 29 3b 0a 20 20 20 20 69 66 28 r->jfd);. if(
5500: 20 72 63 21 3d 30 20 29 20 72 65 74 75 72 6e 20 rc!=0 ) return
5510: 72 63 3b 0a 20 20 20 20 70 50 61 67 65 72 2d 3e rc;. pPager->
5520: 6e 65 65 64 53 79 6e 63 20 3d 20 30 3b 0a 20 20 needSync = 0;.
5530: 7d 0a 20 20 66 6f 72 28 70 50 67 3d 70 50 61 67 }. for(pPg=pPag
5540: 65 72 2d 3e 70 46 69 72 73 74 3b 20 70 50 67 3b er->pFirst; pPg;
5550: 20 70 50 67 3d 70 50 67 2d 3e 70 4e 65 78 74 46 pPg=pPg->pNextF
5560: 72 65 65 29 7b 0a 20 20 20 20 69 66 28 20 70 50 ree){. if( pP
5570: 67 2d 3e 64 69 72 74 79 20 29 7b 0a 20 20 20 20 g->dirty ){.
5580: 20 20 70 61 67 65 72 5f 73 65 65 6b 28 70 50 61 pager_seek(pPa
5590: 67 65 72 2d 3e 66 64 2c 20 28 70 50 67 2d 3e 70 ger->fd, (pPg->p
55a0: 67 6e 6f 2d 31 29 2a 53 51 4c 49 54 45 5f 50 41 gno-1)*SQLITE_PA
55b0: 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 20 20 20 GE_SIZE);.
55c0: 72 63 20 3d 20 70 61 67 65 72 5f 77 72 69 74 65 rc = pager_write
55d0: 28 70 50 61 67 65 72 2d 3e 66 64 2c 20 50 47 48 (pPager->fd, PGH
55e0: 44 52 5f 54 4f 5f 44 41 54 41 28 70 50 67 29 2c DR_TO_DATA(pPg),
55f0: 20 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a SQLITE_PAGE_SIZ
5600: 45 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 63 E);. if( rc
5610: 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 20 62 72 !=SQLITE_OK ) br
5620: 65 61 6b 3b 0a 20 20 20 20 20 20 70 50 67 2d 3e eak;. pPg->
5630: 64 69 72 74 79 20 3d 20 30 3b 0a 20 20 20 20 7d dirty = 0;. }
5640: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 53 51 . }. return SQ
5650: 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a LITE_OK;.}../*.*
5660: 2a 20 41 63 71 75 69 72 65 20 61 20 70 61 67 65 * Acquire a page
5670: 2e 0a 2a 2a 0a 2a 2a 20 41 20 72 65 61 64 20 6c ..**.** A read l
5680: 6f 63 6b 20 6f 6e 20 74 68 65 20 64 69 73 6b 20 ock on the disk
5690: 66 69 6c 65 20 69 73 20 6f 62 74 61 69 6e 65 64 file is obtained
56a0: 20 77 68 65 6e 20 74 68 65 20 66 69 72 73 74 20 when the first
56b0: 70 61 67 65 20 61 63 71 75 69 72 65 64 2e 20 0a page acquired. .
56c0: 2a 2a 20 54 68 69 73 20 72 65 61 64 20 6c 6f 63 ** This read loc
56d0: 6b 20 69 73 20 64 72 6f 70 70 65 64 20 77 68 65 k is dropped whe
56e0: 6e 20 74 68 65 20 6c 61 73 74 20 70 61 67 65 20 n the last page
56f0: 69 73 20 72 65 6c 65 61 73 65 64 2e 0a 2a 2a 0a is released..**.
5700: 2a 2a 20 41 20 5f 67 65 74 20 77 6f 72 6b 73 20 ** A _get works
5710: 66 6f 72 20 61 6e 79 20 70 61 67 65 20 6e 75 6d for any page num
5720: 62 65 72 20 67 72 65 61 74 65 72 20 74 68 61 6e ber greater than
5730: 20 30 2e 20 20 49 66 20 74 68 65 20 64 61 74 61 0. If the data
5740: 62 61 73 65 0a 2a 2a 20 66 69 6c 65 20 69 73 20 base.** file is
5750: 73 6d 61 6c 6c 65 72 20 74 68 61 6e 20 74 68 65 smaller than the
5760: 20 72 65 71 75 65 73 74 65 64 20 70 61 67 65 2c requested page,
5770: 20 74 68 65 6e 20 6e 6f 20 61 63 74 75 61 6c 20 then no actual
5780: 64 69 73 6b 0a 2a 2a 20 72 65 61 64 20 6f 63 63 disk.** read occ
5790: 75 72 73 20 61 6e 64 20 74 68 65 20 6d 65 6d 6f urs and the memo
57a0: 72 79 20 69 6d 61 67 65 20 6f 66 20 74 68 65 20 ry image of the
57b0: 70 61 67 65 20 69 73 20 69 6e 69 74 69 61 6c 69 page is initiali
57c0: 7a 65 64 20 74 6f 0a 2a 2a 20 61 6c 6c 20 7a 65 zed to.** all ze
57d0: 72 6f 73 2e 20 20 54 68 65 20 65 78 74 72 61 20 ros. The extra
57e0: 64 61 74 61 20 61 70 70 65 6e 64 65 64 20 74 6f data appended to
57f0: 20 61 20 70 61 67 65 20 69 73 20 61 6c 77 61 79 a page is alway
5800: 73 20 69 6e 69 74 69 61 6c 69 7a 65 64 0a 2a 2a s initialized.**
5810: 20 74 6f 20 7a 65 72 6f 73 20 74 68 65 20 66 69 to zeros the fi
5820: 72 73 74 20 74 69 6d 65 20 61 20 70 61 67 65 20 rst time a page
5830: 69 73 20 6c 6f 61 64 65 64 20 69 6e 74 6f 20 6d is loaded into m
5840: 65 6d 6f 72 79 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 emory..**.** The
5850: 20 61 63 71 75 69 73 69 74 69 6f 6e 20 6d 69 67 acquisition mig
5860: 68 74 20 66 61 69 6c 20 66 6f 72 20 73 65 76 65 ht fail for seve
5870: 72 61 6c 20 72 65 61 73 6f 6e 73 2e 20 20 49 6e ral reasons. In
5880: 20 61 6c 6c 20 63 61 73 65 73 2c 0a 2a 2a 20 61 all cases,.** a
5890: 6e 20 61 70 70 72 6f 70 72 69 61 74 65 20 65 72 n appropriate er
58a0: 72 6f 72 20 63 6f 64 65 20 69 73 20 72 65 74 75 ror code is retu
58b0: 72 6e 65 64 20 61 6e 64 20 2a 70 70 50 61 67 65 rned and *ppPage
58c0: 20 69 73 20 73 65 74 20 74 6f 20 4e 55 4c 4c 2e is set to NULL.
58d0: 0a 2a 2a 0a 2a 2a 20 53 65 65 20 61 6c 73 6f 20 .**.** See also
58e0: 73 71 6c 69 74 65 70 61 67 65 72 5f 6c 6f 6f 6b sqlitepager_look
58f0: 75 70 28 29 2e 20 20 42 6f 74 68 20 74 68 69 73 up(). Both this
5900: 20 72 6f 75 74 69 6e 65 20 61 6e 64 20 5f 6c 6f routine and _lo
5910: 6f 6b 75 70 28 29 20 61 74 74 65 6d 70 74 0a 2a okup() attempt.*
5920: 2a 20 74 6f 20 66 69 6e 64 20 61 20 70 61 67 65 * to find a page
5930: 20 69 6e 20 74 68 65 20 69 6e 2d 6d 65 6d 6f 72 in the in-memor
5940: 79 20 63 61 63 68 65 20 66 69 72 73 74 2e 20 20 y cache first.
5950: 49 66 20 74 68 65 20 70 61 67 65 20 69 73 20 6e If the page is n
5960: 6f 74 20 61 6c 72 65 61 64 79 0a 2a 2a 20 69 6e ot already.** in
5970: 20 6d 65 6d 6f 72 79 2c 20 74 68 69 73 20 72 6f memory, this ro
5980: 75 74 69 6e 65 20 67 6f 65 73 20 74 6f 20 64 69 utine goes to di
5990: 73 6b 20 74 6f 20 72 65 61 64 20 69 74 20 69 6e sk to read it in
59a0: 20 77 68 65 72 65 61 73 20 5f 6c 6f 6f 6b 75 70 whereas _lookup
59b0: 28 29 0a 2a 2a 20 6a 75 73 74 20 72 65 74 75 72 ().** just retur
59c0: 6e 73 20 30 2e 20 20 54 68 69 73 20 72 6f 75 74 ns 0. This rout
59d0: 69 6e 65 20 61 63 71 75 69 72 65 73 20 61 20 72 ine acquires a r
59e0: 65 61 64 2d 6c 6f 63 6b 20 74 68 65 20 66 69 72 ead-lock the fir
59f0: 73 74 20 74 69 6d 65 20 69 74 0a 2a 2a 20 68 61 st time it.** ha
5a00: 73 20 74 6f 20 67 6f 20 74 6f 20 64 69 73 6b 2c s to go to disk,
5a10: 20 61 6e 64 20 63 6f 75 6c 64 20 61 6c 73 6f 20 and could also
5a20: 70 6c 61 79 62 61 63 6b 20 61 6e 20 6f 6c 64 20 playback an old
5a30: 6a 6f 75 72 6e 61 6c 20 69 66 20 6e 65 63 65 73 journal if neces
5a40: 73 61 72 79 2e 0a 2a 2a 20 53 69 6e 63 65 20 5f sary..** Since _
5a50: 6c 6f 6f 6b 75 70 28 29 20 6e 65 76 65 72 20 67 lookup() never g
5a60: 6f 65 73 20 74 6f 20 64 69 73 6b 2c 20 69 74 20 oes to disk, it
5a70: 6e 65 76 65 72 20 68 61 73 20 74 6f 20 64 65 61 never has to dea
5a80: 6c 20 77 69 74 68 20 6c 6f 63 6b 73 0a 2a 2a 20 l with locks.**
5a90: 6f 72 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 73 or journal files
5aa0: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 70 ..*/.int sqlitep
5ab0: 61 67 65 72 5f 67 65 74 28 50 61 67 65 72 20 2a ager_get(Pager *
5ac0: 70 50 61 67 65 72 2c 20 50 67 6e 6f 20 70 67 6e pPager, Pgno pgn
5ad0: 6f 2c 20 76 6f 69 64 20 2a 2a 70 70 50 61 67 65 o, void **ppPage
5ae0: 29 7b 0a 20 20 50 67 48 64 72 20 2a 70 50 67 3b ){. PgHdr *pPg;
5af0: 0a 0a 20 20 2f 2a 20 4d 61 6b 65 20 73 75 72 65 .. /* Make sure
5b00: 20 77 65 20 68 61 76 65 20 6e 6f 74 20 68 69 74 we have not hit
5b10: 20 61 6e 79 20 63 72 69 74 69 63 61 6c 20 65 72 any critical er
5b20: 72 6f 72 73 2e 0a 20 20 2a 2f 20 0a 20 20 69 66 rors.. */ . if
5b30: 28 20 70 50 61 67 65 72 3d 3d 30 20 7c 7c 20 70 ( pPager==0 || p
5b40: 67 6e 6f 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 gno==0 ){. re
5b50: 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f turn SQLITE_ERRO
5b60: 52 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 50 61 R;. }. if( pPa
5b70: 67 65 72 2d 3e 65 72 72 4d 61 73 6b 20 26 20 7e ger->errMask & ~
5b80: 28 50 41 47 45 52 5f 45 52 52 5f 46 55 4c 4c 29 (PAGER_ERR_FULL)
5b90: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 70 ){. return p
5ba0: 61 67 65 72 5f 65 72 72 63 6f 64 65 28 70 50 61 ager_errcode(pPa
5bb0: 67 65 72 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 ger);. }.. /*
5bc0: 49 66 20 74 68 69 73 20 69 73 20 74 68 65 20 66 If this is the f
5bd0: 69 72 73 74 20 70 61 67 65 20 61 63 63 65 73 73 irst page access
5be0: 65 64 2c 20 74 68 65 6e 20 67 65 74 20 61 20 72 ed, then get a r
5bf0: 65 61 64 20 6c 6f 63 6b 0a 20 20 2a 2a 20 6f 6e ead lock. ** on
5c00: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 66 69 the database fi
5c10: 6c 65 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 70 le.. */. if( p
5c20: 50 61 67 65 72 2d 3e 6e 52 65 66 3d 3d 30 20 29 Pager->nRef==0 )
5c30: 7b 0a 20 20 20 20 69 66 28 20 70 61 67 65 72 5f {. if( pager_
5c40: 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 64 2c lock(pPager->fd,
5c50: 20 30 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 0)!=0 ){.
5c60: 2a 70 70 50 61 67 65 20 3d 20 30 3b 0a 20 20 20 *ppPage = 0;.
5c70: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 return SQLITE
5c80: 5f 42 55 53 59 3b 0a 20 20 20 20 7d 0a 20 20 20 _BUSY;. }.
5c90: 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 20 3d pPager->state =
5ca0: 20 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f 43 4b SQLITE_READLOCK
5cb0: 3b 0a 0a 20 20 20 20 2f 2a 20 49 66 20 61 20 6a ;.. /* If a j
5cc0: 6f 75 72 6e 61 6c 20 66 69 6c 65 20 65 78 69 73 ournal file exis
5cd0: 74 73 2c 20 74 72 79 20 74 6f 20 70 6c 61 79 20 ts, try to play
5ce0: 69 74 20 62 61 63 6b 2e 0a 20 20 20 20 2a 2f 0a it back.. */.
5cf0: 20 20 20 20 69 66 28 20 61 63 63 65 73 73 28 70 if( access(p
5d00: 50 61 67 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c 2c Pager->zJournal,
5d10: 30 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 0)==0 ){.
5d20: 69 6e 74 20 72 63 3b 0a 0a 20 20 20 20 20 20 20 int rc;..
5d30: 2f 2a 20 4f 70 65 6e 20 74 68 65 20 6a 6f 75 72 /* Open the jour
5d40: 6e 61 6c 20 66 6f 72 20 65 78 63 6c 75 73 69 76 nal for exclusiv
5d50: 65 20 61 63 63 65 73 73 2e 20 20 52 65 74 75 72 e access. Retur
5d60: 6e 20 53 51 4c 49 54 45 5f 42 55 53 59 20 69 66 n SQLITE_BUSY if
5d70: 0a 20 20 20 20 20 20 20 2a 2a 20 77 65 20 63 61 . ** we ca
5d80: 6e 6e 6f 74 20 67 65 74 20 65 78 63 6c 75 73 69 nnot get exclusi
5d90: 76 65 20 61 63 63 65 73 73 20 74 6f 20 74 68 65 ve access to the
5da0: 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 0a 20 20 journal file.
5db0: 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 20 70 */. p
5dc0: 50 61 67 65 72 2d 3e 6a 66 64 20 3d 20 6f 70 65 Pager->jfd = ope
5dd0: 6e 28 70 50 61 67 65 72 2d 3e 7a 4a 6f 75 72 6e n(pPager->zJourn
5de0: 61 6c 2c 20 4f 5f 52 44 4f 4e 4c 59 2c 20 30 29 al, O_RDONLY, 0)
5df0: 3b 0a 20 20 20 20 20 20 20 69 66 28 20 70 50 61 ;. if( pPa
5e00: 67 65 72 2d 3e 6a 66 64 3c 30 20 7c 7c 20 70 61 ger->jfd<0 || pa
5e10: 67 65 72 5f 6c 6f 63 6b 28 70 50 61 67 65 72 2d ger_lock(pPager-
5e20: 3e 6a 66 64 2c 20 31 29 21 3d 30 20 29 7b 0a 20 >jfd, 1)!=0 ){.
5e30: 20 20 20 20 20 20 20 20 69 66 28 20 70 50 61 67 if( pPag
5e40: 65 72 2d 3e 6a 66 64 3e 3d 30 20 29 7b 20 63 6c er->jfd>=0 ){ cl
5e50: 6f 73 65 28 70 50 61 67 65 72 2d 3e 6a 66 64 29 ose(pPager->jfd)
5e60: 3b 20 70 50 61 67 65 72 2d 3e 6a 66 64 20 3d 20 ; pPager->jfd =
5e70: 2d 31 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 70 -1; }. p
5e80: 61 67 65 72 5f 75 6e 6c 6f 63 6b 28 70 50 61 67 ager_unlock(pPag
5e90: 65 72 2d 3e 66 64 29 3b 0a 20 20 20 20 20 20 20 er->fd);.
5ea0: 20 20 2a 70 70 50 61 67 65 20 3d 20 30 3b 0a 20 *ppPage = 0;.
5eb0: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 53 return S
5ec0: 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 QLITE_BUSY;.
5ed0: 20 20 20 7d 0a 0a 20 20 20 20 20 20 20 2f 2a 20 }.. /*
5ee0: 47 65 74 20 61 20 77 72 69 74 65 20 6c 6f 63 6b Get a write lock
5ef0: 20 6f 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 on the database
5f00: 20 2a 2f 0a 20 20 20 20 20 20 20 70 61 67 65 72 */. pager
5f10: 5f 75 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e _unlock(pPager->
5f20: 66 64 29 3b 0a 20 20 20 20 20 20 20 69 66 28 20 fd);. if(
5f30: 70 61 67 65 72 5f 6c 6f 63 6b 28 70 50 61 67 65 pager_lock(pPage
5f40: 72 2d 3e 66 64 2c 20 31 29 21 3d 30 20 29 7b 0a r->fd, 1)!=0 ){.
5f50: 20 20 20 20 20 20 20 20 20 63 6c 6f 73 65 28 70 close(p
5f60: 50 61 67 65 72 2d 3e 6a 66 64 29 3b 0a 20 20 20 Pager->jfd);.
5f70: 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e 6a 66 pPager->jf
5f80: 64 20 3d 20 2d 31 3b 0a 20 20 20 20 20 20 20 20 d = -1;.
5f90: 20 2a 70 70 50 61 67 65 20 3d 20 30 3b 0a 20 20 *ppPage = 0;.
5fa0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 return SQ
5fb0: 4c 49 54 45 5f 50 52 4f 54 4f 43 4f 4c 3b 0a 20 LITE_PROTOCOL;.
5fc0: 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 20 }..
5fd0: 2f 2a 20 50 6c 61 79 62 61 63 6b 20 61 6e 64 20 /* Playback and
5fe0: 64 65 6c 65 74 65 20 74 68 65 20 6a 6f 75 72 6e delete the journ
5ff0: 61 6c 2e 20 20 44 72 6f 70 20 74 68 65 20 64 61 al. Drop the da
6000: 74 61 62 61 73 65 20 77 72 69 74 65 0a 20 20 20 tabase write.
6010: 20 20 20 20 2a 2a 20 6c 6f 63 6b 20 61 6e 64 20 ** lock and
6020: 72 65 61 63 71 75 69 72 65 20 74 68 65 20 72 65 reacquire the re
6030: 61 64 20 6c 6f 63 6b 2e 0a 20 20 20 20 20 20 20 ad lock..
6040: 2a 2f 0a 20 20 20 20 20 20 20 72 63 20 3d 20 70 */. rc = p
6050: 61 67 65 72 5f 70 6c 61 79 62 61 63 6b 28 70 50 ager_playback(pP
6060: 61 67 65 72 29 3b 0a 20 20 20 20 20 20 20 69 66 ager);. if
6070: 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 ( rc!=SQLITE_OK
6080: 29 7b 0a 20 20 20 20 20 20 20 20 20 72 65 74 75 ){. retu
6090: 72 6e 20 72 63 3b 0a 20 20 20 20 20 20 20 7d 0a rn rc;. }.
60a0: 20 20 20 20 7d 0a 20 20 20 20 70 50 67 20 3d 20 }. pPg =
60b0: 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 0;. }else{.
60c0: 2f 2a 20 53 65 61 72 63 68 20 66 6f 72 20 70 61 /* Search for pa
60d0: 67 65 20 69 6e 20 63 61 63 68 65 20 2a 2f 0a 20 ge in cache */.
60e0: 20 20 20 70 50 67 20 3d 20 70 61 67 65 72 5f 6c pPg = pager_l
60f0: 6f 6f 6b 75 70 28 70 50 61 67 65 72 2c 20 70 67 ookup(pPager, pg
6100: 6e 6f 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 no);. }. if( p
6110: 50 67 3d 3d 30 20 29 7b 0a 20 20 20 20 2f 2a 20 Pg==0 ){. /*
6120: 54 68 65 20 72 65 71 75 65 73 74 65 64 20 70 61 The requested pa
6130: 67 65 20 69 73 20 6e 6f 74 20 69 6e 20 74 68 65 ge is not in the
6140: 20 70 61 67 65 20 63 61 63 68 65 2e 20 2a 2f 0a page cache. */.
6150: 20 20 20 20 69 6e 74 20 68 3b 0a 20 20 20 20 70 int h;. p
6160: 50 61 67 65 72 2d 3e 6e 4d 69 73 73 2b 2b 3b 0a Pager->nMiss++;.
6170: 20 20 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e if( pPager->
6180: 6e 50 61 67 65 3c 70 50 61 67 65 72 2d 3e 6d 78 nPage<pPager->mx
6190: 50 61 67 65 20 7c 7c 20 70 50 61 67 65 72 2d 3e Page || pPager->
61a0: 70 46 69 72 73 74 3d 3d 30 20 29 7b 0a 20 20 20 pFirst==0 ){.
61b0: 20 20 20 2f 2a 20 43 72 65 61 74 65 20 61 20 6e /* Create a n
61c0: 65 77 20 70 61 67 65 20 2a 2f 0a 20 20 20 20 20 ew page */.
61d0: 20 70 50 67 20 3d 20 73 71 6c 69 74 65 4d 61 6c pPg = sqliteMal
61e0: 6c 6f 63 28 20 73 69 7a 65 6f 66 28 2a 70 50 67 loc( sizeof(*pPg
61f0: 29 20 2b 20 53 51 4c 49 54 45 5f 50 41 47 45 5f ) + SQLITE_PAGE_
6200: 53 49 5a 45 20 2b 20 70 50 61 67 65 72 2d 3e 6e SIZE + pPager->n
6210: 45 78 74 72 61 20 29 3b 0a 20 20 20 20 20 20 69 Extra );. i
6220: 66 28 20 70 50 67 3d 3d 30 20 29 7b 0a 20 20 20 f( pPg==0 ){.
6230: 20 20 20 20 20 2a 70 70 50 61 67 65 20 3d 20 30 *ppPage = 0
6240: 3b 0a 20 20 20 20 20 20 20 20 70 61 67 65 72 5f ;. pager_
6250: 75 6e 77 72 69 74 65 6c 6f 63 6b 28 70 50 61 67 unwritelock(pPag
6260: 65 72 29 3b 0a 20 20 20 20 20 20 20 20 70 50 61 er);. pPa
6270: 67 65 72 2d 3e 65 72 72 4d 61 73 6b 20 7c 3d 20 ger->errMask |=
6280: 50 41 47 45 52 5f 45 52 52 5f 4d 45 4d 3b 0a 20 PAGER_ERR_MEM;.
6290: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 return SQ
62a0: 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 20 20 LITE_NOMEM;.
62b0: 20 20 7d 0a 20 20 20 20 20 20 70 50 67 2d 3e 70 }. pPg->p
62c0: 50 61 67 65 72 20 3d 20 70 50 61 67 65 72 3b 0a Pager = pPager;.
62d0: 20 20 20 20 20 20 70 50 67 2d 3e 70 4e 65 78 74 pPg->pNext
62e0: 41 6c 6c 20 3d 20 70 50 61 67 65 72 2d 3e 70 41 All = pPager->pA
62f0: 6c 6c 3b 0a 20 20 20 20 20 20 69 66 28 20 70 50 ll;. if( pP
6300: 61 67 65 72 2d 3e 70 41 6c 6c 20 29 7b 0a 20 20 ager->pAll ){.
6310: 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e 70 41 pPager->pA
6320: 6c 6c 2d 3e 70 50 72 65 76 41 6c 6c 20 3d 20 70 ll->pPrevAll = p
6330: 50 67 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 Pg;. }.
6340: 20 20 70 50 67 2d 3e 70 50 72 65 76 41 6c 6c 20 pPg->pPrevAll
6350: 3d 20 30 3b 0a 20 20 20 20 20 20 70 50 61 67 65 = 0;. pPage
6360: 72 2d 3e 70 41 6c 6c 20 3d 20 70 50 67 3b 0a 20 r->pAll = pPg;.
6370: 20 20 20 20 20 70 50 61 67 65 72 2d 3e 6e 50 61 pPager->nPa
6380: 67 65 2b 2b 3b 0a 20 20 20 20 7d 65 6c 73 65 7b ge++;. }else{
6390: 0a 20 20 20 20 20 20 2f 2a 20 52 65 63 79 63 6c . /* Recycl
63a0: 65 20 61 6e 20 6f 6c 64 65 72 20 70 61 67 65 2e e an older page.
63b0: 20 20 46 69 72 73 74 20 6c 6f 63 61 74 65 20 74 First locate t
63c0: 68 65 20 70 61 67 65 20 74 6f 20 62 65 20 72 65 he page to be re
63d0: 63 79 63 6c 65 64 2e 0a 20 20 20 20 20 20 2a 2a cycled.. **
63e0: 20 54 72 79 20 74 6f 20 66 69 6e 64 20 6f 6e 65 Try to find one
63f0: 20 74 68 61 74 20 69 73 20 6e 6f 74 20 64 69 72 that is not dir
6400: 74 79 20 61 6e 64 20 69 73 20 6e 65 61 72 20 74 ty and is near t
6410: 68 65 20 68 65 61 64 20 6f 66 0a 20 20 20 20 20 he head of.
6420: 20 2a 2a 20 6f 66 20 74 68 65 20 66 72 65 65 20 ** of the free
6430: 6c 69 73 74 20 2a 2f 0a 20 20 20 20 20 20 69 6e list */. in
6440: 74 20 63 6e 74 20 3d 20 70 50 61 67 65 72 2d 3e t cnt = pPager->
6450: 6d 78 50 61 67 65 2f 32 3b 0a 20 20 20 20 20 20 mxPage/2;.
6460: 70 50 67 20 3d 20 70 50 61 67 65 72 2d 3e 70 46 pPg = pPager->pF
6470: 69 72 73 74 3b 0a 20 20 20 20 20 20 77 68 69 6c irst;. whil
6480: 65 28 20 70 50 67 2d 3e 64 69 72 74 79 20 26 26 e( pPg->dirty &&
6490: 20 30 3c 63 6e 74 2d 2d 20 26 26 20 70 50 67 2d 0<cnt-- && pPg-
64a0: 3e 70 4e 65 78 74 46 72 65 65 20 29 7b 0a 20 20 >pNextFree ){.
64b0: 20 20 20 20 20 20 70 50 67 20 3d 20 70 50 67 2d pPg = pPg-
64c0: 3e 70 4e 65 78 74 46 72 65 65 3b 0a 20 20 20 20 >pNextFree;.
64d0: 20 20 7d 0a 0a 20 20 20 20 20 20 2f 2a 20 49 66 }.. /* If
64e0: 20 77 65 20 63 6f 75 6c 64 20 6e 6f 74 20 66 69 we could not fi
64f0: 6e 64 20 61 20 70 61 67 65 20 74 68 61 74 20 68 nd a page that h
6500: 61 73 20 6e 6f 74 20 62 65 65 6e 20 75 73 65 64 as not been used
6510: 20 72 65 63 65 6e 74 6c 79 0a 20 20 20 20 20 20 recently.
6520: 2a 2a 20 61 6e 64 20 77 68 69 63 68 20 69 73 20 ** and which is
6530: 6e 6f 74 20 64 69 72 74 79 2c 20 74 68 65 6e 20 not dirty, then
6540: 73 79 6e 63 20 74 68 65 20 6a 6f 75 72 6e 61 6c sync the journal
6550: 20 61 6e 64 20 77 72 69 74 65 20 61 6c 6c 0a 20 and write all.
6560: 20 20 20 20 20 2a 2a 20 64 69 72 74 79 20 66 72 ** dirty fr
6570: 65 65 20 70 61 67 65 73 20 69 6e 74 6f 20 74 68 ee pages into th
6580: 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 2c e database file,
6590: 20 74 68 75 73 20 6d 61 6b 69 6e 67 20 74 68 65 thus making the
65a0: 6d 0a 20 20 20 20 20 20 2a 2a 20 63 6c 65 61 6e m. ** clean
65b0: 20 70 61 67 65 73 20 61 6e 64 20 61 76 61 69 6c pages and avail
65c0: 61 62 6c 65 20 66 6f 72 20 72 65 63 79 63 6c 69 able for recycli
65d0: 6e 67 2e 0a 20 20 20 20 20 20 2a 2a 0a 20 20 20 ng.. **.
65e0: 20 20 20 2a 2a 20 57 65 20 68 61 76 65 20 74 6f ** We have to
65f0: 20 73 79 6e 63 20 74 68 65 20 6a 6f 75 72 6e 61 sync the journa
6600: 6c 20 62 65 66 6f 72 65 20 77 72 69 74 69 6e 67 l before writing
6610: 20 61 20 70 61 67 65 20 74 6f 20 74 68 65 20 6d a page to the m
6620: 61 69 6e 0a 20 20 20 20 20 20 2a 2a 20 64 61 74 ain. ** dat
6630: 61 62 61 73 65 2e 20 20 42 75 74 20 73 79 6e 63 abase. But sync
6640: 69 6e 67 20 69 73 20 61 20 76 65 72 79 20 73 6c ing is a very sl
6650: 6f 77 20 6f 70 65 72 61 74 69 6f 6e 2e 20 20 53 ow operation. S
6660: 6f 20 61 66 74 65 72 20 61 0a 20 20 20 20 20 20 o after a.
6670: 2a 2a 20 73 79 6e 63 2c 20 69 74 20 69 73 20 62 ** sync, it is b
6680: 65 73 74 20 74 6f 20 77 72 69 74 65 20 65 76 65 est to write eve
6690: 72 79 74 68 69 6e 67 20 77 65 20 63 61 6e 20 62 rything we can b
66a0: 61 63 6b 20 74 6f 20 74 68 65 20 6d 61 69 6e 0a ack to the main.
66b0: 20 20 20 20 20 20 2a 2a 20 64 61 74 61 62 61 73 ** databas
66c0: 65 20 74 6f 20 6d 69 6e 69 6d 69 7a 65 20 74 68 e to minimize th
66d0: 65 20 72 69 73 6b 20 6f 66 20 68 61 76 69 6e 67 e risk of having
66e0: 20 74 6f 20 73 79 6e 63 20 61 67 61 69 6e 20 69 to sync again i
66f0: 6e 20 74 68 65 0a 20 20 20 20 20 20 2a 2a 20 6e n the. ** n
6700: 65 61 72 20 66 75 74 75 72 65 2e 20 20 54 68 61 ear future. Tha
6710: 74 20 69 73 20 77 61 79 20 77 65 20 77 72 69 74 t is way we writ
6720: 65 20 61 6c 6c 20 64 69 72 74 79 20 70 61 67 65 e all dirty page
6730: 73 20 61 66 74 65 72 20 61 0a 20 20 20 20 20 20 s after a.
6740: 2a 2a 20 73 79 6e 63 2e 0a 20 20 20 20 20 20 2a ** sync.. *
6750: 2f 0a 20 20 20 20 20 20 69 66 28 20 70 50 67 3d /. if( pPg=
6760: 3d 30 20 7c 7c 20 70 50 67 2d 3e 64 69 72 74 79 =0 || pPg->dirty
6770: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 ){. int
6780: 72 63 20 3d 20 73 79 6e 63 41 6c 6c 50 61 67 65 rc = syncAllPage
6790: 73 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 20 s(pPager);.
67a0: 20 20 20 69 66 28 20 72 63 21 3d 30 20 29 7b 0a if( rc!=0 ){.
67b0: 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 sqlite
67c0: 70 61 67 65 72 5f 72 6f 6c 6c 62 61 63 6b 28 70 pager_rollback(p
67d0: 50 61 67 65 72 29 3b 0a 20 20 20 20 20 20 20 20 Pager);.
67e0: 20 20 2a 70 70 50 61 67 65 20 3d 20 30 3b 0a 20 *ppPage = 0;.
67f0: 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 return
6800: 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 SQLITE_IOERR;.
6810: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
6820: 70 50 67 20 3d 20 70 50 61 67 65 72 2d 3e 70 46 pPg = pPager->pF
6830: 69 72 73 74 3b 0a 20 20 20 20 20 20 7d 0a 20 20 irst;. }.
6840: 20 20 20 20 61 73 73 65 72 74 28 20 70 50 67 2d assert( pPg-
6850: 3e 6e 52 65 66 3d 3d 30 20 29 3b 0a 20 20 20 20 >nRef==0 );.
6860: 20 20 61 73 73 65 72 74 28 20 70 50 67 2d 3e 64 assert( pPg->d
6870: 69 72 74 79 3d 3d 30 20 29 3b 0a 0a 20 20 20 20 irty==0 );..
6880: 20 20 2f 2a 20 55 6e 6c 69 6e 6b 20 74 68 65 20 /* Unlink the
6890: 6f 6c 64 20 70 61 67 65 20 66 72 6f 6d 20 74 68 old page from th
68a0: 65 20 66 72 65 65 20 6c 69 73 74 20 61 6e 64 20 e free list and
68b0: 74 68 65 20 68 61 73 68 20 74 61 62 6c 65 0a 20 the hash table.
68c0: 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 69 66 */. if
68d0: 28 20 70 50 67 2d 3e 70 50 72 65 76 46 72 65 65 ( pPg->pPrevFree
68e0: 20 29 7b 0a 20 20 20 20 20 20 20 20 70 50 67 2d ){. pPg-
68f0: 3e 70 50 72 65 76 46 72 65 65 2d 3e 70 4e 65 78 >pPrevFree->pNex
6900: 74 46 72 65 65 20 3d 20 70 50 67 2d 3e 70 4e 65 tFree = pPg->pNe
6910: 78 74 46 72 65 65 3b 0a 20 20 20 20 20 20 7d 65 xtFree;. }e
6920: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 61 73 73 lse{. ass
6930: 65 72 74 28 20 70 50 61 67 65 72 2d 3e 70 46 69 ert( pPager->pFi
6940: 72 73 74 3d 3d 70 50 67 20 29 3b 0a 20 20 20 20 rst==pPg );.
6950: 20 20 20 20 70 50 61 67 65 72 2d 3e 70 46 69 72 pPager->pFir
6960: 73 74 20 3d 20 70 50 67 2d 3e 70 4e 65 78 74 46 st = pPg->pNextF
6970: 72 65 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 ree;. }.
6980: 20 20 20 69 66 28 20 70 50 67 2d 3e 70 4e 65 78 if( pPg->pNex
6990: 74 46 72 65 65 20 29 7b 0a 20 20 20 20 20 20 20 tFree ){.
69a0: 20 70 50 67 2d 3e 70 4e 65 78 74 46 72 65 65 2d pPg->pNextFree-
69b0: 3e 70 50 72 65 76 46 72 65 65 20 3d 20 70 50 67 >pPrevFree = pPg
69c0: 2d 3e 70 50 72 65 76 46 72 65 65 3b 0a 20 20 20 ->pPrevFree;.
69d0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
69e0: 20 20 61 73 73 65 72 74 28 20 70 50 61 67 65 72 assert( pPager
69f0: 2d 3e 70 4c 61 73 74 3d 3d 70 50 67 20 29 3b 0a ->pLast==pPg );.
6a00: 20 20 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e pPager->
6a10: 70 4c 61 73 74 20 3d 20 70 50 67 2d 3e 70 50 72 pLast = pPg->pPr
6a20: 65 76 46 72 65 65 3b 0a 20 20 20 20 20 20 7d 0a evFree;. }.
6a30: 20 20 20 20 20 20 70 50 67 2d 3e 70 4e 65 78 74 pPg->pNext
6a40: 46 72 65 65 20 3d 20 70 50 67 2d 3e 70 50 72 65 Free = pPg->pPre
6a50: 76 46 72 65 65 20 3d 20 30 3b 0a 20 20 20 20 20 vFree = 0;.
6a60: 20 69 66 28 20 70 50 67 2d 3e 70 4e 65 78 74 48 if( pPg->pNextH
6a70: 61 73 68 20 29 7b 0a 20 20 20 20 20 20 20 20 70 ash ){. p
6a80: 50 67 2d 3e 70 4e 65 78 74 48 61 73 68 2d 3e 70 Pg->pNextHash->p
6a90: 50 72 65 76 48 61 73 68 20 3d 20 70 50 67 2d 3e PrevHash = pPg->
6aa0: 70 50 72 65 76 48 61 73 68 3b 0a 20 20 20 20 20 pPrevHash;.
6ab0: 20 7d 0a 20 20 20 20 20 20 69 66 28 20 70 50 67 }. if( pPg
6ac0: 2d 3e 70 50 72 65 76 48 61 73 68 20 29 7b 0a 20 ->pPrevHash ){.
6ad0: 20 20 20 20 20 20 20 70 50 67 2d 3e 70 50 72 65 pPg->pPre
6ae0: 76 48 61 73 68 2d 3e 70 4e 65 78 74 48 61 73 68 vHash->pNextHash
6af0: 20 3d 20 70 50 67 2d 3e 70 4e 65 78 74 48 61 73 = pPg->pNextHas
6b00: 68 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a h;. }else{.
6b10: 20 20 20 20 20 20 20 20 68 20 3d 20 70 61 67 65 h = page
6b20: 72 5f 68 61 73 68 28 70 50 67 2d 3e 70 67 6e 6f r_hash(pPg->pgno
6b30: 29 3b 0a 20 20 20 20 20 20 20 20 61 73 73 65 72 );. asser
6b40: 74 28 20 70 50 61 67 65 72 2d 3e 61 48 61 73 68 t( pPager->aHash
6b50: 5b 68 5d 3d 3d 70 50 67 20 29 3b 0a 20 20 20 20 [h]==pPg );.
6b60: 20 20 20 20 70 50 61 67 65 72 2d 3e 61 48 61 73 pPager->aHas
6b70: 68 5b 68 5d 20 3d 20 70 50 67 2d 3e 70 4e 65 78 h[h] = pPg->pNex
6b80: 74 48 61 73 68 3b 0a 20 20 20 20 20 20 7d 0a 20 tHash;. }.
6b90: 20 20 20 20 20 70 50 67 2d 3e 70 4e 65 78 74 48 pPg->pNextH
6ba0: 61 73 68 20 3d 20 70 50 67 2d 3e 70 50 72 65 76 ash = pPg->pPrev
6bb0: 48 61 73 68 20 3d 20 30 3b 0a 20 20 20 20 20 20 Hash = 0;.
6bc0: 70 50 61 67 65 72 2d 3e 6e 4f 76 66 6c 2b 2b 3b pPager->nOvfl++;
6bd0: 0a 20 20 20 20 7d 0a 20 20 20 20 70 50 67 2d 3e . }. pPg->
6be0: 70 67 6e 6f 20 3d 20 70 67 6e 6f 3b 0a 20 20 20 pgno = pgno;.
6bf0: 20 69 66 28 20 70 50 61 67 65 72 2d 3e 61 49 6e if( pPager->aIn
6c00: 4a 6f 75 72 6e 61 6c 20 26 26 20 70 67 6e 6f 3c Journal && pgno<
6c10: 3d 70 50 61 67 65 72 2d 3e 6f 72 69 67 44 62 53 =pPager->origDbS
6c20: 69 7a 65 20 29 7b 0a 20 20 20 20 20 20 70 50 67 ize ){. pPg
6c30: 2d 3e 69 6e 4a 6f 75 72 6e 61 6c 20 3d 20 28 70 ->inJournal = (p
6c40: 50 61 67 65 72 2d 3e 61 49 6e 4a 6f 75 72 6e 61 Pager->aInJourna
6c50: 6c 5b 70 67 6e 6f 2f 38 5d 20 26 20 28 31 3c 3c l[pgno/8] & (1<<
6c60: 28 70 67 6e 6f 26 37 29 29 29 21 3d 30 3b 0a 20 (pgno&7)))!=0;.
6c70: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
6c80: 70 50 67 2d 3e 69 6e 4a 6f 75 72 6e 61 6c 20 3d pPg->inJournal =
6c90: 20 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70 50 0;. }. pP
6ca0: 67 2d 3e 64 69 72 74 79 20 3d 20 30 3b 0a 20 20 g->dirty = 0;.
6cb0: 20 20 70 50 67 2d 3e 6e 52 65 66 20 3d 20 31 3b pPg->nRef = 1;
6cc0: 0a 20 20 20 20 52 45 46 49 4e 46 4f 28 70 50 67 . REFINFO(pPg
6cd0: 29 3b 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 6e );. pPager->n
6ce0: 52 65 66 2b 2b 3b 0a 20 20 20 20 68 20 3d 20 70 Ref++;. h = p
6cf0: 61 67 65 72 5f 68 61 73 68 28 70 67 6e 6f 29 3b ager_hash(pgno);
6d00: 0a 20 20 20 20 70 50 67 2d 3e 70 4e 65 78 74 48 . pPg->pNextH
6d10: 61 73 68 20 3d 20 70 50 61 67 65 72 2d 3e 61 48 ash = pPager->aH
6d20: 61 73 68 5b 68 5d 3b 0a 20 20 20 20 70 50 61 67 ash[h];. pPag
6d30: 65 72 2d 3e 61 48 61 73 68 5b 68 5d 20 3d 20 70 er->aHash[h] = p
6d40: 50 67 3b 0a 20 20 20 20 69 66 28 20 70 50 67 2d Pg;. if( pPg-
6d50: 3e 70 4e 65 78 74 48 61 73 68 20 29 7b 0a 20 20 >pNextHash ){.
6d60: 20 20 20 20 61 73 73 65 72 74 28 20 70 50 67 2d assert( pPg-
6d70: 3e 70 4e 65 78 74 48 61 73 68 2d 3e 70 50 72 65 >pNextHash->pPre
6d80: 76 48 61 73 68 3d 3d 30 20 29 3b 0a 20 20 20 20 vHash==0 );.
6d90: 20 20 70 50 67 2d 3e 70 4e 65 78 74 48 61 73 68 pPg->pNextHash
6da0: 2d 3e 70 50 72 65 76 48 61 73 68 20 3d 20 70 50 ->pPrevHash = pP
6db0: 67 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 g;. }. if(
6dc0: 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 3c pPager->dbSize<
6dd0: 30 20 29 20 73 71 6c 69 74 65 70 61 67 65 72 5f 0 ) sqlitepager_
6de0: 70 61 67 65 63 6f 75 6e 74 28 70 50 61 67 65 72 pagecount(pPager
6df0: 29 3b 0a 20 20 20 20 69 66 28 20 70 50 61 67 65 );. if( pPage
6e00: 72 2d 3e 64 62 53 69 7a 65 3c 70 67 6e 6f 20 29 r->dbSize<pgno )
6e10: 7b 0a 20 20 20 20 20 20 6d 65 6d 73 65 74 28 50 {. memset(P
6e20: 47 48 44 52 5f 54 4f 5f 44 41 54 41 28 70 50 67 GHDR_TO_DATA(pPg
6e30: 29 2c 20 30 2c 20 53 51 4c 49 54 45 5f 50 41 47 ), 0, SQLITE_PAG
6e40: 45 5f 53 49 5a 45 29 3b 0a 20 20 20 20 7d 65 6c E_SIZE);. }el
6e50: 73 65 7b 0a 20 20 20 20 20 20 70 61 67 65 72 5f se{. pager_
6e60: 73 65 65 6b 28 70 50 61 67 65 72 2d 3e 66 64 2c seek(pPager->fd,
6e70: 20 28 70 67 6e 6f 2d 31 29 2a 53 51 4c 49 54 45 (pgno-1)*SQLITE
6e80: 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 _PAGE_SIZE);.
6e90: 20 20 20 70 61 67 65 72 5f 72 65 61 64 28 70 50 pager_read(pP
6ea0: 61 67 65 72 2d 3e 66 64 2c 20 50 47 48 44 52 5f ager->fd, PGHDR_
6eb0: 54 4f 5f 44 41 54 41 28 70 50 67 29 2c 20 53 51 TO_DATA(pPg), SQ
6ec0: 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b LITE_PAGE_SIZE);
6ed0: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 70 . }. if( p
6ee0: 50 61 67 65 72 2d 3e 6e 45 78 74 72 61 3e 30 20 Pager->nExtra>0
6ef0: 29 7b 0a 20 20 20 20 20 20 6d 65 6d 73 65 74 28 ){. memset(
6f00: 50 47 48 44 52 5f 54 4f 5f 45 58 54 52 41 28 70 PGHDR_TO_EXTRA(p
6f10: 50 67 29 2c 20 30 2c 20 70 50 61 67 65 72 2d 3e Pg), 0, pPager->
6f20: 6e 45 78 74 72 61 29 3b 0a 20 20 20 20 7d 0a 20 nExtra);. }.
6f30: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 54 }else{. /* T
6f40: 68 65 20 72 65 71 75 65 73 74 65 64 20 70 61 67 he requested pag
6f50: 65 20 69 73 20 69 6e 20 74 68 65 20 70 61 67 65 e is in the page
6f60: 20 63 61 63 68 65 2e 20 2a 2f 0a 20 20 20 20 70 cache. */. p
6f70: 50 61 67 65 72 2d 3e 6e 48 69 74 2b 2b 3b 0a 20 Pager->nHit++;.
6f80: 20 20 20 70 61 67 65 5f 72 65 66 28 70 50 67 29 page_ref(pPg)
6f90: 3b 0a 20 20 7d 0a 20 20 2a 70 70 50 61 67 65 20 ;. }. *ppPage
6fa0: 3d 20 50 47 48 44 52 5f 54 4f 5f 44 41 54 41 28 = PGHDR_TO_DATA(
6fb0: 70 50 67 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 pPg);. return S
6fc0: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a QLITE_OK;.}../*.
6fd0: 2a 2a 20 41 63 71 75 69 72 65 20 61 20 70 61 67 ** Acquire a pag
6fe0: 65 20 69 66 20 69 74 20 69 73 20 61 6c 72 65 61 e if it is alrea
6ff0: 64 79 20 69 6e 20 74 68 65 20 69 6e 2d 6d 65 6d dy in the in-mem
7000: 6f 72 79 20 63 61 63 68 65 2e 20 20 44 6f 0a 2a ory cache. Do.*
7010: 2a 20 6e 6f 74 20 72 65 61 64 20 74 68 65 20 70 * not read the p
7020: 61 67 65 20 66 72 6f 6d 20 64 69 73 6b 2e 20 20 age from disk.
7030: 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 Return a pointer
7040: 20 74 6f 20 74 68 65 20 70 61 67 65 2c 0a 2a 2a to the page,.**
7050: 20 6f 72 20 30 20 69 66 20 74 68 65 20 70 61 67 or 0 if the pag
7060: 65 20 69 73 20 6e 6f 74 20 69 6e 20 63 61 63 68 e is not in cach
7070: 65 2e 0a 2a 2a 0a 2a 2a 20 53 65 65 20 61 6c 73 e..**.** See als
7080: 6f 20 73 71 6c 69 74 65 70 61 67 65 72 5f 67 65 o sqlitepager_ge
7090: 74 28 29 2e 20 20 54 68 65 20 64 69 66 66 65 72 t(). The differ
70a0: 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74 68 69 ence between thi
70b0: 73 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 61 6e 64 s routine.** and
70c0: 20 73 71 6c 69 74 65 70 61 67 65 72 5f 67 65 74 sqlitepager_get
70d0: 28 29 20 69 73 20 74 68 61 74 20 5f 67 65 74 28 () is that _get(
70e0: 29 20 77 69 6c 6c 20 67 6f 20 74 6f 20 74 68 65 ) will go to the
70f0: 20 64 69 73 6b 20 61 6e 64 20 72 65 61 64 0a 2a disk and read.*
7100: 2a 20 69 6e 20 74 68 65 20 70 61 67 65 20 69 66 * in the page if
7110: 20 74 68 65 20 70 61 67 65 20 69 73 20 6e 6f 74 the page is not
7120: 20 61 6c 72 65 61 64 79 20 69 6e 20 63 61 63 68 already in cach
7130: 65 2e 20 20 54 68 69 73 20 72 6f 75 74 69 6e 65 e. This routine
7140: 0a 2a 2a 20 72 65 74 75 72 6e 73 20 4e 55 4c 4c .** returns NULL
7150: 20 69 66 20 74 68 65 20 70 61 67 65 20 69 73 20 if the page is
7160: 6e 6f 74 20 69 6e 20 63 61 63 68 65 20 6f 72 20 not in cache or
7170: 69 66 20 61 20 64 69 73 6b 20 49 2f 4f 20 65 72 if a disk I/O er
7180: 72 6f 72 20 0a 2a 2a 20 68 61 73 20 65 76 65 72 ror .** has ever
7190: 20 68 61 70 70 65 6e 65 64 2e 0a 2a 2f 0a 76 6f happened..*/.vo
71a0: 69 64 20 2a 73 71 6c 69 74 65 70 61 67 65 72 5f id *sqlitepager_
71b0: 6c 6f 6f 6b 75 70 28 50 61 67 65 72 20 2a 70 50 lookup(Pager *pP
71c0: 61 67 65 72 2c 20 50 67 6e 6f 20 70 67 6e 6f 29 ager, Pgno pgno)
71d0: 7b 0a 20 20 50 67 48 64 72 20 2a 70 50 67 3b 0a {. PgHdr *pPg;.
71e0: 0a 20 20 2f 2a 20 4d 61 6b 65 20 73 75 72 65 20 . /* Make sure
71f0: 77 65 20 68 61 76 65 20 6e 6f 74 20 68 69 74 20 we have not hit
7200: 61 6e 79 20 63 72 69 74 69 63 61 6c 20 65 72 72 any critical err
7210: 6f 72 73 2e 0a 20 20 2a 2f 20 0a 20 20 69 66 28 ors.. */ . if(
7220: 20 70 50 61 67 65 72 3d 3d 30 20 7c 7c 20 70 67 pPager==0 || pg
7230: 6e 6f 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 no==0 ){. ret
7240: 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 urn 0;. }. if(
7250: 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b pPager->errMask
7260: 20 26 20 7e 28 50 41 47 45 52 5f 45 52 52 5f 46 & ~(PAGER_ERR_F
7270: 55 4c 4c 29 20 29 7b 0a 20 20 20 20 72 65 74 75 ULL) ){. retu
7280: 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 rn 0;. }. if(
7290: 70 50 61 67 65 72 2d 3e 6e 52 65 66 3d 3d 30 20 pPager->nRef==0
72a0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b ){. return 0;
72b0: 0a 20 20 7d 0a 20 20 70 50 67 20 3d 20 70 61 67 . }. pPg = pag
72c0: 65 72 5f 6c 6f 6f 6b 75 70 28 70 50 61 67 65 72 er_lookup(pPager
72d0: 2c 20 70 67 6e 6f 29 3b 0a 20 20 69 66 28 20 70 , pgno);. if( p
72e0: 50 67 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 Pg==0 ) return 0
72f0: 3b 0a 20 20 70 61 67 65 5f 72 65 66 28 70 50 67 ;. page_ref(pPg
7300: 29 3b 0a 20 20 72 65 74 75 72 6e 20 50 47 48 44 );. return PGHD
7310: 52 5f 54 4f 5f 44 41 54 41 28 70 50 67 29 3b 0a R_TO_DATA(pPg);.
7320: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61 73 65 }../*.** Release
7330: 20 61 20 70 61 67 65 2e 0a 2a 2a 0a 2a 2a 20 49 a page..**.** I
7340: 66 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 f the number of
7350: 72 65 66 65 72 65 6e 63 65 73 20 74 6f 20 74 68 references to th
7360: 65 20 70 61 67 65 20 64 72 6f 70 20 74 6f 20 7a e page drop to z
7370: 65 72 6f 2c 20 74 68 65 6e 20 74 68 65 0a 2a 2a ero, then the.**
7380: 20 70 61 67 65 20 69 73 20 61 64 64 65 64 20 74 page is added t
7390: 6f 20 74 68 65 20 4c 52 55 20 6c 69 73 74 2e 20 o the LRU list.
73a0: 20 57 68 65 6e 20 61 6c 6c 20 72 65 66 65 72 65 When all refere
73b0: 6e 63 65 73 20 74 6f 20 61 6c 6c 20 70 61 67 65 nces to all page
73c0: 73 0a 2a 2a 20 61 72 65 20 72 65 6c 65 61 73 65 s.** are release
73d0: 64 2c 20 61 20 72 6f 6c 6c 62 61 63 6b 20 6f 63 d, a rollback oc
73e0: 63 75 72 73 20 61 6e 64 20 74 68 65 20 6c 6f 63 curs and the loc
73f0: 6b 20 6f 6e 20 74 68 65 20 64 61 74 61 62 61 73 k on the databas
7400: 65 20 69 73 0a 2a 2a 20 72 65 6d 6f 76 65 64 2e e is.** removed.
7410: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 70 61 .*/.int sqlitepa
7420: 67 65 72 5f 75 6e 72 65 66 28 76 6f 69 64 20 2a ger_unref(void *
7430: 70 44 61 74 61 29 7b 0a 20 20 50 61 67 65 72 20 pData){. Pager
7440: 2a 70 50 61 67 65 72 3b 0a 20 20 50 67 48 64 72 *pPager;. PgHdr
7450: 20 2a 70 50 67 3b 0a 0a 20 20 2f 2a 20 44 65 63 *pPg;.. /* Dec
7460: 72 65 6d 65 6e 74 20 74 68 65 20 72 65 66 65 72 rement the refer
7470: 65 6e 63 65 20 63 6f 75 6e 74 20 66 6f 72 20 74 ence count for t
7480: 68 69 73 20 70 61 67 65 0a 20 20 2a 2f 0a 20 20 his page. */.
7490: 70 50 67 20 3d 20 44 41 54 41 5f 54 4f 5f 50 47 pPg = DATA_TO_PG
74a0: 48 44 52 28 70 44 61 74 61 29 3b 0a 20 20 61 73 HDR(pData);. as
74b0: 73 65 72 74 28 20 70 50 67 2d 3e 6e 52 65 66 3e sert( pPg->nRef>
74c0: 30 20 29 3b 0a 20 20 70 50 61 67 65 72 20 3d 20 0 );. pPager =
74d0: 70 50 67 2d 3e 70 50 61 67 65 72 3b 0a 20 20 70 pPg->pPager;. p
74e0: 50 67 2d 3e 6e 52 65 66 2d 2d 3b 0a 20 20 52 45 Pg->nRef--;. RE
74f0: 46 49 4e 46 4f 28 70 50 67 29 3b 0a 0a 20 20 2f FINFO(pPg);.. /
7500: 2a 20 57 68 65 6e 20 74 68 65 20 6e 75 6d 62 65 * When the numbe
7510: 72 20 6f 66 20 72 65 66 65 72 65 6e 63 65 73 20 r of references
7520: 74 6f 20 61 20 70 61 67 65 20 72 65 61 63 68 20 to a page reach
7530: 30 2c 20 63 61 6c 6c 20 74 68 65 0a 20 20 2a 2a 0, call the. **
7540: 20 64 65 73 74 72 75 63 74 6f 72 20 61 6e 64 20 destructor and
7550: 61 64 64 20 74 68 65 20 70 61 67 65 20 74 6f 20 add the page to
7560: 74 68 65 20 66 72 65 65 6c 69 73 74 2e 0a 20 20 the freelist..
7570: 2a 2f 0a 20 20 69 66 28 20 70 50 67 2d 3e 6e 52 */. if( pPg->nR
7580: 65 66 3d 3d 30 20 29 7b 0a 20 20 20 20 70 50 67 ef==0 ){. pPg
7590: 2d 3e 70 4e 65 78 74 46 72 65 65 20 3d 20 30 3b ->pNextFree = 0;
75a0: 0a 20 20 20 20 70 50 67 2d 3e 70 50 72 65 76 46 . pPg->pPrevF
75b0: 72 65 65 20 3d 20 70 50 61 67 65 72 2d 3e 70 4c ree = pPager->pL
75c0: 61 73 74 3b 0a 20 20 20 20 70 50 61 67 65 72 2d ast;. pPager-
75d0: 3e 70 4c 61 73 74 20 3d 20 70 50 67 3b 0a 20 20 >pLast = pPg;.
75e0: 20 20 69 66 28 20 70 50 67 2d 3e 70 50 72 65 76 if( pPg->pPrev
75f0: 46 72 65 65 20 29 7b 0a 20 20 20 20 20 20 70 50 Free ){. pP
7600: 67 2d 3e 70 50 72 65 76 46 72 65 65 2d 3e 70 4e g->pPrevFree->pN
7610: 65 78 74 46 72 65 65 20 3d 20 70 50 67 3b 0a 20 extFree = pPg;.
7620: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
7630: 70 50 61 67 65 72 2d 3e 70 46 69 72 73 74 20 3d pPager->pFirst =
7640: 20 70 50 67 3b 0a 20 20 20 20 7d 0a 20 20 20 20 pPg;. }.
7650: 69 66 28 20 70 50 61 67 65 72 2d 3e 78 44 65 73 if( pPager->xDes
7660: 74 72 75 63 74 6f 72 20 29 7b 0a 20 20 20 20 20 tructor ){.
7670: 20 70 50 61 67 65 72 2d 3e 78 44 65 73 74 72 75 pPager->xDestru
7680: 63 74 6f 72 28 70 44 61 74 61 29 3b 0a 20 20 20 ctor(pData);.
7690: 20 7d 0a 20 20 0a 20 20 20 20 2f 2a 20 57 68 65 }. . /* Whe
76a0: 6e 20 61 6c 6c 20 70 61 67 65 73 20 72 65 61 63 n all pages reac
76b0: 68 20 74 68 65 20 66 72 65 65 6c 69 73 74 2c 20 h the freelist,
76c0: 64 72 6f 70 20 74 68 65 20 72 65 61 64 20 6c 6f drop the read lo
76d0: 63 6b 20 66 72 6f 6d 0a 20 20 20 20 2a 2a 20 74 ck from. ** t
76e0: 68 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 he database file
76f0: 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 70 50 61 .. */. pPa
7700: 67 65 72 2d 3e 6e 52 65 66 2d 2d 3b 0a 20 20 20 ger->nRef--;.
7710: 20 61 73 73 65 72 74 28 20 70 50 61 67 65 72 2d assert( pPager-
7720: 3e 6e 52 65 66 3e 3d 30 20 29 3b 0a 20 20 20 20 >nRef>=0 );.
7730: 69 66 28 20 70 50 61 67 65 72 2d 3e 6e 52 65 66 if( pPager->nRef
7740: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 70 61 67 ==0 ){. pag
7750: 65 72 5f 72 65 73 65 74 28 70 50 61 67 65 72 29 er_reset(pPager)
7760: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 ;. }. }. re
7770: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a turn SQLITE_OK;.
7780: 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 72 6b 20 61 20 }../*.** Mark a
7790: 64 61 74 61 20 70 61 67 65 20 61 73 20 77 72 69 data page as wri
77a0: 74 65 61 62 6c 65 2e 20 20 54 68 65 20 70 61 67 teable. The pag
77b0: 65 20 69 73 20 77 72 69 74 74 65 6e 20 69 6e 74 e is written int
77c0: 6f 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 0a 2a o the journal .*
77d0: 2a 20 69 66 20 69 74 20 69 73 20 6e 6f 74 20 74 * if it is not t
77e0: 68 65 72 65 20 61 6c 72 65 61 64 79 2e 20 20 54 here already. T
77f0: 68 69 73 20 72 6f 75 74 69 6e 65 20 6d 75 73 74 his routine must
7800: 20 62 65 20 63 61 6c 6c 65 64 20 62 65 66 6f 72 be called befor
7810: 65 20 6d 61 6b 69 6e 67 0a 2a 2a 20 63 68 61 6e e making.** chan
7820: 67 65 73 20 74 6f 20 61 20 70 61 67 65 2e 0a 2a ges to a page..*
7830: 2a 0a 2a 2a 20 54 68 65 20 66 69 72 73 74 20 74 *.** The first t
7840: 69 6d 65 20 74 68 69 73 20 72 6f 75 74 69 6e 65 ime this routine
7850: 20 69 73 20 63 61 6c 6c 65 64 2c 20 74 68 65 20 is called, the
7860: 70 61 67 65 72 20 63 72 65 61 74 65 73 20 61 20 pager creates a
7870: 6e 65 77 0a 2a 2a 20 6a 6f 75 72 6e 61 6c 20 61 new.** journal a
7880: 6e 64 20 61 63 71 75 69 72 65 73 20 61 20 77 72 nd acquires a wr
7890: 69 74 65 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 ite lock on the
78a0: 64 61 74 61 62 61 73 65 2e 20 20 49 66 20 74 68 database. If th
78b0: 65 20 77 72 69 74 65 0a 2a 2a 20 6c 6f 63 6b 20 e write.** lock
78c0: 63 6f 75 6c 64 20 6e 6f 74 20 62 65 20 61 63 71 could not be acq
78d0: 75 69 72 65 64 2c 20 74 68 69 73 20 72 6f 75 74 uired, this rout
78e0: 69 6e 65 20 72 65 74 75 72 6e 73 20 53 51 4c 49 ine returns SQLI
78f0: 54 45 5f 42 55 53 59 2e 20 20 54 68 65 0a 2a 2a TE_BUSY. The.**
7900: 20 63 61 6c 6c 69 6e 67 20 72 6f 75 74 69 6e 65 calling routine
7910: 20 6d 75 73 74 20 63 68 65 63 6b 20 66 6f 72 20 must check for
7920: 74 68 61 74 20 72 65 74 75 72 6e 20 76 61 6c 75 that return valu
7930: 65 20 61 6e 64 20 62 65 20 63 61 72 65 66 75 6c e and be careful
7940: 20 6e 6f 74 20 74 6f 0a 2a 2a 20 63 68 61 6e 67 not to.** chang
7950: 65 20 61 6e 79 20 70 61 67 65 20 64 61 74 61 20 e any page data
7960: 75 6e 74 69 6c 20 74 68 69 73 20 72 6f 75 74 69 until this routi
7970: 6e 65 20 72 65 74 75 72 6e 73 20 53 51 4c 49 54 ne returns SQLIT
7980: 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 E_OK..**.** If t
7990: 68 65 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 20 he journal file
79a0: 63 6f 75 6c 64 20 6e 6f 74 20 62 65 20 77 72 69 could not be wri
79b0: 74 74 65 6e 20 62 65 63 61 75 73 65 20 74 68 65 tten because the
79c0: 20 64 69 73 6b 20 69 73 20 66 75 6c 6c 2c 0a 2a disk is full,.*
79d0: 2a 20 74 68 65 6e 20 74 68 69 73 20 72 6f 75 74 * then this rout
79e0: 69 6e 65 20 72 65 74 75 72 6e 73 20 53 51 4c 49 ine returns SQLI
79f0: 54 45 5f 46 55 4c 4c 20 61 6e 64 20 64 6f 65 73 TE_FULL and does
7a00: 20 61 6e 20 69 6d 6d 65 64 69 61 74 65 20 72 6f an immediate ro
7a10: 6c 6c 62 61 63 6b 2e 0a 2a 2a 20 41 6c 6c 20 73 llback..** All s
7a20: 75 62 73 65 71 75 65 6e 74 20 77 72 69 74 65 20 ubsequent write
7a30: 61 74 74 65 6d 70 74 73 20 61 6c 73 6f 20 72 65 attempts also re
7a40: 74 75 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c 4c turn SQLITE_FULL
7a50: 20 75 6e 74 69 6c 20 74 68 65 72 65 0a 2a 2a 20 until there.**
7a60: 69 73 20 61 20 63 61 6c 6c 20 74 6f 20 73 71 6c is a call to sql
7a70: 69 74 65 70 61 67 65 72 5f 63 6f 6d 6d 69 74 28 itepager_commit(
7a80: 29 20 6f 72 20 73 71 6c 69 74 65 70 61 67 65 72 ) or sqlitepager
7a90: 5f 72 6f 6c 6c 62 61 63 6b 28 29 20 74 6f 0a 2a _rollback() to.*
7aa0: 2a 20 72 65 73 65 74 2e 0a 2a 2f 0a 69 6e 74 20 * reset..*/.int
7ab0: 73 71 6c 69 74 65 70 61 67 65 72 5f 77 72 69 74 sqlitepager_writ
7ac0: 65 28 76 6f 69 64 20 2a 70 44 61 74 61 29 7b 0a e(void *pData){.
7ad0: 20 20 50 67 48 64 72 20 2a 70 50 67 20 3d 20 44 PgHdr *pPg = D
7ae0: 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 44 61 ATA_TO_PGHDR(pDa
7af0: 74 61 29 3b 0a 20 20 50 61 67 65 72 20 2a 70 50 ta);. Pager *pP
7b00: 61 67 65 72 20 3d 20 70 50 67 2d 3e 70 50 61 67 ager = pPg->pPag
7b10: 65 72 3b 0a 20 20 69 6e 74 20 72 63 20 3d 20 53 er;. int rc = S
7b20: 51 4c 49 54 45 5f 4f 4b 3b 0a 0a 20 20 69 66 28 QLITE_OK;.. if(
7b30: 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b pPager->errMask
7b40: 20 29 7b 20 0a 20 20 20 20 72 65 74 75 72 6e 20 ){ . return
7b50: 70 61 67 65 72 5f 65 72 72 63 6f 64 65 28 70 50 pager_errcode(pP
7b60: 61 67 65 72 29 3b 0a 20 20 7d 0a 20 20 69 66 28 ager);. }. if(
7b70: 20 70 50 61 67 65 72 2d 3e 72 65 61 64 4f 6e 6c pPager->readOnl
7b80: 79 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 y ){. return
7b90: 53 51 4c 49 54 45 5f 50 45 52 4d 3b 0a 20 20 7d SQLITE_PERM;. }
7ba0: 0a 20 20 70 50 67 2d 3e 64 69 72 74 79 20 3d 20 . pPg->dirty =
7bb0: 31 3b 0a 20 20 69 66 28 20 70 50 67 2d 3e 69 6e 1;. if( pPg->in
7bc0: 4a 6f 75 72 6e 61 6c 20 29 7b 20 72 65 74 75 72 Journal ){ retur
7bd0: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 20 7d 0a 20 n SQLITE_OK; }.
7be0: 20 61 73 73 65 72 74 28 20 70 50 61 67 65 72 2d assert( pPager-
7bf0: 3e 73 74 61 74 65 21 3d 53 51 4c 49 54 45 5f 55 >state!=SQLITE_U
7c00: 4e 4c 4f 43 4b 20 29 3b 0a 20 20 69 66 28 20 70 NLOCK );. if( p
7c10: 50 61 67 65 72 2d 3e 73 74 61 74 65 3d 3d 53 51 Pager->state==SQ
7c20: 4c 49 54 45 5f 52 45 41 44 4c 4f 43 4b 20 29 7b LITE_READLOCK ){
7c30: 0a 20 20 20 20 61 73 73 65 72 74 28 20 70 50 61 . assert( pPa
7c40: 67 65 72 2d 3e 61 49 6e 4a 6f 75 72 6e 61 6c 3d ger->aInJournal=
7c50: 3d 30 20 29 3b 0a 20 20 20 20 70 50 61 67 65 72 =0 );. pPager
7c60: 2d 3e 61 49 6e 4a 6f 75 72 6e 61 6c 20 3d 20 73 ->aInJournal = s
7c70: 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 70 50 61 qliteMalloc( pPa
7c80: 67 65 72 2d 3e 64 62 53 69 7a 65 2f 38 20 2b 20 ger->dbSize/8 +
7c90: 31 20 29 3b 0a 20 20 20 20 69 66 28 20 70 50 61 1 );. if( pPa
7ca0: 67 65 72 2d 3e 61 49 6e 4a 6f 75 72 6e 61 6c 3d ger->aInJournal=
7cb0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 72 65 74 75 =0 ){. retu
7cc0: 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b rn SQLITE_NOMEM;
7cd0: 0a 20 20 20 20 7d 0a 20 20 20 20 70 50 61 67 65 . }. pPage
7ce0: 72 2d 3e 6a 66 64 20 3d 20 6f 70 65 6e 28 70 50 r->jfd = open(pP
7cf0: 61 67 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c 2c 20 ager->zJournal,
7d00: 4f 5f 52 44 57 52 7c 4f 5f 43 52 45 41 54 2c 20 O_RDWR|O_CREAT,
7d10: 30 36 34 34 29 3b 0a 20 20 20 20 69 66 28 20 70 0644);. if( p
7d20: 50 61 67 65 72 2d 3e 6a 66 64 3c 30 20 29 7b 0a Pager->jfd<0 ){.
7d30: 20 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c return SQL
7d40: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 ITE_CANTOPEN;.
7d50: 20 20 7d 0a 20 20 20 20 70 50 61 67 65 72 2d 3e }. pPager->
7d60: 6e 65 65 64 53 79 6e 63 20 3d 20 30 3b 0a 20 20 needSync = 0;.
7d70: 20 20 69 66 28 20 70 61 67 65 72 5f 6c 6f 63 6b if( pager_lock
7d80: 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c 20 31 29 (pPager->jfd, 1)
7d90: 20 29 7b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 ){. close(
7da0: 70 50 61 67 65 72 2d 3e 6a 66 64 29 3b 0a 20 20 pPager->jfd);.
7db0: 20 20 20 20 70 50 61 67 65 72 2d 3e 6a 66 64 20 pPager->jfd
7dc0: 3d 20 2d 31 3b 0a 20 20 20 20 20 20 72 65 74 75 = -1;. retu
7dd0: 72 6e 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a rn SQLITE_BUSY;.
7de0: 20 20 20 20 7d 0a 20 20 20 20 70 61 67 65 72 5f }. pager_
7df0: 75 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 unlock(pPager->f
7e00: 64 29 3b 0a 20 20 20 20 69 66 28 20 70 61 67 65 d);. if( page
7e10: 72 5f 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 r_lock(pPager->f
7e20: 64 2c 20 31 29 20 29 7b 0a 20 20 20 20 20 20 63 d, 1) ){. c
7e30: 6c 6f 73 65 28 70 50 61 67 65 72 2d 3e 6a 66 64 lose(pPager->jfd
7e40: 29 3b 0a 20 20 20 20 20 20 70 50 61 67 65 72 2d );. pPager-
7e50: 3e 6a 66 64 20 3d 20 2d 31 3b 0a 20 20 20 20 20 >jfd = -1;.
7e60: 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 20 3d pPager->state =
7e70: 20 53 51 4c 49 54 45 5f 55 4e 4c 4f 43 4b 3b 0a SQLITE_UNLOCK;.
7e80: 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e 65 72 pPager->er
7e90: 72 4d 61 73 6b 20 7c 3d 20 50 41 47 45 52 5f 45 rMask |= PAGER_E
7ea0: 52 52 5f 4c 4f 43 4b 3b 0a 20 20 20 20 20 20 72 RR_LOCK;. r
7eb0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 50 52 4f eturn SQLITE_PRO
7ec0: 54 4f 43 4f 4c 3b 0a 20 20 20 20 7d 0a 20 20 20 TOCOL;. }.
7ed0: 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 20 3d pPager->state =
7ee0: 20 53 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 SQLITE_WRITELOC
7ef0: 4b 3b 0a 20 20 20 20 73 71 6c 69 74 65 70 61 67 K;. sqlitepag
7f00: 65 72 5f 70 61 67 65 63 6f 75 6e 74 28 70 50 61 er_pagecount(pPa
7f10: 67 65 72 29 3b 0a 20 20 20 20 70 50 61 67 65 72 ger);. pPager
7f20: 2d 3e 6f 72 69 67 44 62 53 69 7a 65 20 3d 20 70 ->origDbSize = p
7f30: 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 3b 0a 20 Pager->dbSize;.
7f40: 20 20 20 72 63 20 3d 20 70 61 67 65 72 5f 77 72 rc = pager_wr
7f50: 69 74 65 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c ite(pPager->jfd,
7f60: 20 61 4a 6f 75 72 6e 61 6c 4d 61 67 69 63 2c 20 aJournalMagic,
7f70: 73 69 7a 65 6f 66 28 61 4a 6f 75 72 6e 61 6c 4d sizeof(aJournalM
7f80: 61 67 69 63 29 29 3b 0a 20 20 20 20 69 66 28 20 agic));. if(
7f90: 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b rc==SQLITE_OK ){
7fa0: 0a 20 20 20 20 20 20 72 63 20 3d 20 70 61 67 65 . rc = page
7fb0: 72 5f 77 72 69 74 65 28 70 50 61 67 65 72 2d 3e r_write(pPager->
7fc0: 6a 66 64 2c 20 26 70 50 61 67 65 72 2d 3e 64 62 jfd, &pPager->db
7fd0: 53 69 7a 65 2c 20 73 69 7a 65 6f 66 28 50 67 6e Size, sizeof(Pgn
7fe0: 6f 29 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 o));. }. i
7ff0: 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b f( rc!=SQLITE_OK
8000: 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 70 ){. rc = p
8010: 61 67 65 72 5f 75 6e 77 72 69 74 65 6c 6f 63 6b ager_unwritelock
8020: 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 20 20 (pPager);.
8030: 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f if( rc==SQLITE_O
8040: 4b 20 29 20 72 63 20 3d 20 53 51 4c 49 54 45 5f K ) rc = SQLITE_
8050: 46 55 4c 4c 3b 0a 20 20 20 20 20 20 72 65 74 75 FULL;. retu
8060: 72 6e 20 72 63 3b 0a 20 20 20 20 7d 0a 20 20 7d rn rc;. }. }
8070: 0a 20 20 61 73 73 65 72 74 28 20 70 50 61 67 65 . assert( pPage
8080: 72 2d 3e 73 74 61 74 65 3d 3d 53 51 4c 49 54 45 r->state==SQLITE
8090: 5f 57 52 49 54 45 4c 4f 43 4b 20 29 3b 0a 20 20 _WRITELOCK );.
80a0: 61 73 73 65 72 74 28 20 70 50 61 67 65 72 2d 3e assert( pPager->
80b0: 6a 66 64 3e 3d 30 20 29 3b 0a 20 20 69 66 28 20 jfd>=0 );. if(
80c0: 70 50 67 2d 3e 70 67 6e 6f 20 3c 3d 20 70 50 61 pPg->pgno <= pPa
80d0: 67 65 72 2d 3e 6f 72 69 67 44 62 53 69 7a 65 20 ger->origDbSize
80e0: 29 7b 0a 20 20 20 20 72 63 20 3d 20 70 61 67 65 ){. rc = page
80f0: 72 5f 77 72 69 74 65 28 70 50 61 67 65 72 2d 3e r_write(pPager->
8100: 6a 66 64 2c 20 26 70 50 67 2d 3e 70 67 6e 6f 2c jfd, &pPg->pgno,
8110: 20 73 69 7a 65 6f 66 28 50 67 6e 6f 29 29 3b 0a sizeof(Pgno));.
8120: 20 20 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 if( rc==SQLI
8130: 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20 20 72 TE_OK ){. r
8140: 63 20 3d 20 70 61 67 65 72 5f 77 72 69 74 65 28 c = pager_write(
8150: 70 50 61 67 65 72 2d 3e 6a 66 64 2c 20 70 44 61 pPager->jfd, pDa
8160: 74 61 2c 20 53 51 4c 49 54 45 5f 50 41 47 45 5f ta, SQLITE_PAGE_
8170: 53 49 5a 45 29 3b 0a 20 20 20 20 7d 0a 20 20 20 SIZE);. }.
8180: 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f if( rc!=SQLITE_
8190: 4f 4b 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 OK ){. sqli
81a0: 74 65 70 61 67 65 72 5f 72 6f 6c 6c 62 61 63 6b tepager_rollback
81b0: 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 20 20 (pPager);.
81c0: 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b 20 pPager->errMask
81d0: 7c 3d 20 50 41 47 45 52 5f 45 52 52 5f 46 55 4c |= PAGER_ERR_FUL
81e0: 4c 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 L;. return
81f0: 72 63 3b 0a 20 20 20 20 7d 0a 20 20 20 20 61 73 rc;. }. as
8200: 73 65 72 74 28 20 70 50 61 67 65 72 2d 3e 61 49 sert( pPager->aI
8210: 6e 4a 6f 75 72 6e 61 6c 21 3d 30 20 29 3b 0a 20 nJournal!=0 );.
8220: 20 20 20 70 50 61 67 65 72 2d 3e 61 49 6e 4a 6f pPager->aInJo
8230: 75 72 6e 61 6c 5b 70 50 67 2d 3e 70 67 6e 6f 2f urnal[pPg->pgno/
8240: 38 5d 20 7c 3d 20 31 3c 3c 28 70 50 67 2d 3e 70 8] |= 1<<(pPg->p
8250: 67 6e 6f 26 37 29 3b 0a 20 20 20 20 70 50 61 67 gno&7);. pPag
8260: 65 72 2d 3e 6e 65 65 64 53 79 6e 63 20 3d 20 31 er->needSync = 1
8270: 3b 0a 20 20 7d 0a 20 20 70 50 67 2d 3e 69 6e 4a ;. }. pPg->inJ
8280: 6f 75 72 6e 61 6c 20 3d 20 31 3b 0a 20 20 69 66 ournal = 1;. if
8290: 28 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 ( pPager->dbSize
82a0: 3c 70 50 67 2d 3e 70 67 6e 6f 20 29 7b 0a 20 20 <pPg->pgno ){.
82b0: 20 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 pPager->dbSize
82c0: 20 3d 20 70 50 67 2d 3e 70 67 6e 6f 3b 0a 20 20 = pPg->pgno;.
82d0: 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d }. return rc;.}
82e0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 ../*.** Return T
82f0: 52 55 45 20 69 66 20 74 68 65 20 70 61 67 65 20 RUE if the page
8300: 67 69 76 65 6e 20 69 6e 20 74 68 65 20 61 72 67 given in the arg
8310: 75 6d 65 6e 74 20 77 61 73 20 70 72 65 76 69 6f ument was previo
8320: 75 73 20 70 61 73 73 65 64 0a 2a 2a 20 74 6f 20 us passed.** to
8330: 73 71 6c 69 74 65 70 61 67 65 72 5f 77 72 69 74 sqlitepager_writ
8340: 65 28 29 2e 20 20 49 6e 20 6f 74 68 65 72 20 77 e(). In other w
8350: 6f 72 64 73 2c 20 72 65 74 75 72 6e 20 54 52 55 ords, return TRU
8360: 45 20 69 66 20 69 74 20 69 73 20 6f 6b 0a 2a 2a E if it is ok.**
8370: 20 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20 63 to change the c
8380: 6f 6e 74 65 6e 74 20 6f 66 20 74 68 65 20 70 61 ontent of the pa
8390: 67 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 ge..*/.int sqlit
83a0: 65 70 61 67 65 72 5f 69 73 77 72 69 74 65 61 62 epager_iswriteab
83b0: 6c 65 28 76 6f 69 64 20 2a 70 44 61 74 61 29 7b le(void *pData){
83c0: 0a 20 20 50 67 48 64 72 20 2a 70 50 67 20 3d 20 . PgHdr *pPg =
83d0: 44 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 44 DATA_TO_PGHDR(pD
83e0: 61 74 61 29 3b 0a 20 20 72 65 74 75 72 6e 20 70 ata);. return p
83f0: 50 67 2d 3e 64 69 72 74 79 3b 0a 7d 0a 0a 2f 2a Pg->dirty;.}../*
8400: 0a 2a 2a 20 43 6f 6d 6d 69 74 20 61 6c 6c 20 63 .** Commit all c
8410: 68 61 6e 67 65 73 20 74 6f 20 74 68 65 20 64 61 hanges to the da
8420: 74 61 62 61 73 65 20 61 6e 64 20 72 65 6c 65 61 tabase and relea
8430: 73 65 20 74 68 65 20 77 72 69 74 65 20 6c 6f 63 se the write loc
8440: 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 k..**.** If the
8450: 63 6f 6d 6d 69 74 20 66 61 69 6c 73 20 66 6f 72 commit fails for
8460: 20 61 6e 79 20 72 65 61 73 6f 6e 2c 20 61 20 72 any reason, a r
8470: 6f 6c 6c 62 61 63 6b 20 61 74 74 65 6d 70 74 20 ollback attempt
8480: 69 73 20 6d 61 64 65 0a 2a 2a 20 61 6e 64 20 61 is made.** and a
8490: 6e 20 65 72 72 6f 72 20 63 6f 64 65 20 69 73 20 n error code is
84a0: 72 65 74 75 72 6e 65 64 2e 20 20 49 66 20 74 68 returned. If th
84b0: 65 20 63 6f 6d 6d 69 74 20 77 6f 72 6b 65 64 2c e commit worked,
84c0: 20 53 51 4c 49 54 45 5f 4f 4b 0a 2a 2a 20 69 73 SQLITE_OK.** is
84d0: 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2f 0a 69 6e returned..*/.in
84e0: 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 63 6f t sqlitepager_co
84f0: 6d 6d 69 74 28 50 61 67 65 72 20 2a 70 50 61 67 mmit(Pager *pPag
8500: 65 72 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 er){. int rc;.
8510: 20 50 67 48 64 72 20 2a 70 50 67 3b 0a 0a 20 20 PgHdr *pPg;..
8520: 69 66 28 20 70 50 61 67 65 72 2d 3e 65 72 72 4d if( pPager->errM
8530: 61 73 6b 3d 3d 50 41 47 45 52 5f 45 52 52 5f 46 ask==PAGER_ERR_F
8540: 55 4c 4c 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 ULL ){. rc =
8550: 73 71 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c sqlitepager_roll
8560: 62 61 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 back(pPager);.
8570: 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 if( rc==SQLITE
8580: 5f 4f 4b 20 29 20 72 63 20 3d 20 53 51 4c 49 54 _OK ) rc = SQLIT
8590: 45 5f 46 55 4c 4c 3b 0a 20 20 20 20 72 65 74 75 E_FULL;. retu
85a0: 72 6e 20 72 63 3b 0a 20 20 7d 0a 20 20 69 66 28 rn rc;. }. if(
85b0: 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b pPager->errMask
85c0: 21 3d 30 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 !=0 ){. rc =
85d0: 70 61 67 65 72 5f 65 72 72 63 6f 64 65 28 70 50 pager_errcode(pP
85e0: 61 67 65 72 29 3b 0a 20 20 20 20 72 65 74 75 72 ager);. retur
85f0: 6e 20 72 63 3b 0a 20 20 7d 0a 20 20 69 66 28 20 n rc;. }. if(
8600: 70 50 61 67 65 72 2d 3e 73 74 61 74 65 21 3d 53 pPager->state!=S
8610: 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 20 QLITE_WRITELOCK
8620: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 ){. return SQ
8630: 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a LITE_ERROR;. }.
8640: 20 20 61 73 73 65 72 74 28 20 70 50 61 67 65 72 assert( pPager
8650: 2d 3e 6a 66 64 3e 3d 30 20 29 3b 0a 20 20 69 66 ->jfd>=0 );. if
8660: 28 20 70 50 61 67 65 72 2d 3e 6e 65 65 64 53 79 ( pPager->needSy
8670: 6e 63 20 26 26 20 66 73 79 6e 63 28 70 50 61 67 nc && fsync(pPag
8680: 65 72 2d 3e 6a 66 64 29 20 29 7b 0a 20 20 20 20 er->jfd) ){.
8690: 67 6f 74 6f 20 63 6f 6d 6d 69 74 5f 61 62 6f 72 goto commit_abor
86a0: 74 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 70 50 67 t;. }. for(pPg
86b0: 3d 70 50 61 67 65 72 2d 3e 70 41 6c 6c 3b 20 70 =pPager->pAll; p
86c0: 50 67 3b 20 70 50 67 3d 70 50 67 2d 3e 70 4e 65 Pg; pPg=pPg->pNe
86d0: 78 74 41 6c 6c 29 7b 0a 20 20 20 20 69 66 28 20 xtAll){. if(
86e0: 70 50 67 2d 3e 64 69 72 74 79 3d 3d 30 20 29 20 pPg->dirty==0 )
86f0: 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 72 63 continue;. rc
8700: 20 3d 20 70 61 67 65 72 5f 73 65 65 6b 28 70 50 = pager_seek(pP
8710: 61 67 65 72 2d 3e 66 64 2c 20 28 70 50 67 2d 3e ager->fd, (pPg->
8720: 70 67 6e 6f 2d 31 29 2a 53 51 4c 49 54 45 5f 50 pgno-1)*SQLITE_P
8730: 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 20 69 AGE_SIZE);. i
8740: 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b f( rc!=SQLITE_OK
8750: 20 29 20 67 6f 74 6f 20 63 6f 6d 6d 69 74 5f 61 ) goto commit_a
8760: 62 6f 72 74 3b 0a 20 20 20 20 72 63 20 3d 20 70 bort;. rc = p
8770: 61 67 65 72 5f 77 72 69 74 65 28 70 50 61 67 65 ager_write(pPage
8780: 72 2d 3e 66 64 2c 20 50 47 48 44 52 5f 54 4f 5f r->fd, PGHDR_TO_
8790: 44 41 54 41 28 70 50 67 29 2c 20 53 51 4c 49 54 DATA(pPg), SQLIT
87a0: 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 E_PAGE_SIZE);.
87b0: 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 if( rc!=SQLITE
87c0: 5f 4f 4b 20 29 20 67 6f 74 6f 20 63 6f 6d 6d 69 _OK ) goto commi
87d0: 74 5f 61 62 6f 72 74 3b 0a 20 20 7d 0a 20 20 69 t_abort;. }. i
87e0: 66 28 20 66 73 79 6e 63 28 70 50 61 67 65 72 2d f( fsync(pPager-
87f0: 3e 66 64 29 20 29 20 67 6f 74 6f 20 63 6f 6d 6d >fd) ) goto comm
8800: 69 74 5f 61 62 6f 72 74 3b 0a 20 20 72 63 20 3d it_abort;. rc =
8810: 20 70 61 67 65 72 5f 75 6e 77 72 69 74 65 6c 6f pager_unwritelo
8820: 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 70 50 ck(pPager);. pP
8830: 61 67 65 72 2d 3e 64 62 53 69 7a 65 20 3d 20 2d ager->dbSize = -
8840: 31 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 1;. return rc;.
8850: 0a 20 20 2f 2a 20 4a 75 6d 70 20 68 65 72 65 20 . /* Jump here
8860: 69 66 20 61 6e 79 74 68 69 6e 67 20 67 6f 65 73 if anything goes
8870: 20 77 72 6f 6e 67 20 64 75 72 69 6e 67 20 74 68 wrong during th
8880: 65 20 63 6f 6d 6d 69 74 20 70 72 6f 63 65 73 73 e commit process
8890: 2e 0a 20 20 2a 2f 0a 63 6f 6d 6d 69 74 5f 61 62 .. */.commit_ab
88a0: 6f 72 74 3a 0a 20 20 72 63 20 3d 20 73 71 6c 69 ort:. rc = sqli
88b0: 74 65 70 61 67 65 72 5f 72 6f 6c 6c 62 61 63 6b tepager_rollback
88c0: 28 70 50 61 67 65 72 29 3b 0a 20 20 69 66 28 20 (pPager);. if(
88d0: 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b rc==SQLITE_OK ){
88e0: 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 . rc = SQLITE
88f0: 5f 46 55 4c 4c 3b 0a 20 20 7d 0a 20 20 72 65 74 _FULL;. }. ret
8900: 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a urn rc;.}../*.**
8910: 20 52 6f 6c 6c 62 61 63 6b 20 61 6c 6c 20 63 68 Rollback all ch
8920: 61 6e 67 65 73 2e 20 20 54 68 65 20 64 61 74 61 anges. The data
8930: 62 61 73 65 20 66 61 6c 6c 73 20 62 61 63 6b 20 base falls back
8940: 74 6f 20 72 65 61 64 2d 6f 6e 6c 79 20 6d 6f 64 to read-only mod
8950: 65 2e 0a 2a 2a 20 41 6c 6c 20 69 6e 2d 6d 65 6d e..** All in-mem
8960: 6f 72 79 20 63 61 63 68 65 20 70 61 67 65 73 20 ory cache pages
8970: 72 65 76 65 72 74 20 74 6f 20 74 68 65 69 72 20 revert to their
8980: 6f 72 69 67 69 6e 61 6c 20 64 61 74 61 20 63 6f original data co
8990: 6e 74 65 6e 74 73 2e 0a 2a 2a 20 54 68 65 20 6a ntents..** The j
89a0: 6f 75 72 6e 61 6c 20 69 73 20 64 65 6c 65 74 65 ournal is delete
89b0: 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f d..**.** This ro
89c0: 75 74 69 6e 65 20 63 61 6e 6e 6f 74 20 66 61 69 utine cannot fai
89d0: 6c 20 75 6e 6c 65 73 73 20 73 6f 6d 65 20 6f 74 l unless some ot
89e0: 68 65 72 20 70 72 6f 63 65 73 73 20 69 73 20 6e her process is n
89f0: 6f 74 20 66 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a 20 ot following.**
8a00: 74 68 65 20 63 6f 72 72 65 63 74 20 6c 6f 63 6b the correct lock
8a10: 69 6e 67 20 70 72 6f 74 6f 63 6f 6c 20 28 53 51 ing protocol (SQ
8a20: 4c 49 54 45 5f 50 52 4f 54 4f 43 4f 4c 29 20 6f LITE_PROTOCOL) o
8a30: 72 20 75 6e 6c 65 73 73 20 73 6f 6d 65 20 6f 74 r unless some ot
8a40: 68 65 72 0a 2a 2a 20 70 72 6f 63 65 73 73 20 69 her.** process i
8a50: 73 20 77 72 69 74 69 6e 67 20 74 72 61 73 68 20 s writing trash
8a60: 69 6e 74 6f 20 74 68 65 20 6a 6f 75 72 6e 61 6c into the journal
8a70: 20 66 69 6c 65 20 28 53 51 4c 49 54 45 5f 43 4f file (SQLITE_CO
8a80: 52 52 55 50 54 29 20 6f 72 0a 2a 2a 20 75 6e 6c RRUPT) or.** unl
8a90: 65 73 73 20 61 20 70 72 69 6f 72 20 6d 61 6c 6c ess a prior mall
8aa0: 6f 63 28 29 20 66 61 69 6c 65 64 20 28 53 51 4c oc() failed (SQL
8ab0: 49 54 45 5f 4e 4f 4d 45 4d 29 2e 20 20 41 70 70 ITE_NOMEM). App
8ac0: 72 6f 70 72 69 61 74 65 20 65 72 72 6f 72 0a 2a ropriate error.*
8ad0: 2a 20 63 6f 64 65 73 20 61 72 65 20 72 65 74 75 * codes are retu
8ae0: 72 6e 65 64 20 66 6f 72 20 61 6c 6c 20 74 68 65 rned for all the
8af0: 73 65 20 6f 63 63 61 73 69 6f 6e 73 2e 20 20 4f se occasions. O
8b00: 74 68 65 72 77 69 73 65 2c 0a 2a 2a 20 53 51 4c therwise,.** SQL
8b10: 49 54 45 5f 4f 4b 20 69 73 20 72 65 74 75 72 6e ITE_OK is return
8b20: 65 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 ed..*/.int sqlit
8b30: 65 70 61 67 65 72 5f 72 6f 6c 6c 62 61 63 6b 28 epager_rollback(
8b40: 50 61 67 65 72 20 2a 70 50 61 67 65 72 29 7b 0a Pager *pPager){.
8b50: 20 20 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 int rc;. if(
8b60: 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 6b 21 pPager->errMask!
8b70: 3d 30 20 26 26 20 70 50 61 67 65 72 2d 3e 65 72 =0 && pPager->er
8b80: 72 4d 61 73 6b 21 3d 50 41 47 45 52 5f 45 52 52 rMask!=PAGER_ERR
8b90: 5f 46 55 4c 4c 20 29 7b 0a 20 20 20 20 72 65 74 _FULL ){. ret
8ba0: 75 72 6e 20 70 61 67 65 72 5f 65 72 72 63 6f 64 urn pager_errcod
8bb0: 65 28 70 50 61 67 65 72 29 3b 0a 20 20 7d 0a 20 e(pPager);. }.
8bc0: 20 69 66 28 20 70 50 61 67 65 72 2d 3e 73 74 61 if( pPager->sta
8bd0: 74 65 21 3d 53 51 4c 49 54 45 5f 57 52 49 54 45 te!=SQLITE_WRITE
8be0: 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 72 65 74 75 LOCK ){. retu
8bf0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 rn SQLITE_OK;.
8c00: 7d 0a 20 20 72 63 20 3d 20 70 61 67 65 72 5f 70 }. rc = pager_p
8c10: 6c 61 79 62 61 63 6b 28 70 50 61 67 65 72 29 3b layback(pPager);
8c20: 0a 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 . if( rc!=SQLIT
8c30: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 72 63 20 3d E_OK ){. rc =
8c40: 20 53 51 4c 49 54 45 5f 43 4f 52 52 55 50 54 3b SQLITE_CORRUPT;
8c50: 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 65 72 72 . pPager->err
8c60: 4d 61 73 6b 20 7c 3d 20 50 41 47 45 52 5f 45 52 Mask |= PAGER_ER
8c70: 52 5f 43 4f 52 52 55 50 54 3b 0a 20 20 7d 0a 20 R_CORRUPT;. }.
8c80: 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 20 pPager->dbSize
8c90: 3d 20 2d 31 3b 0a 20 20 72 65 74 75 72 6e 20 72 = -1;. return r
8ca0: 63 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 c;.};../*.** Ret
8cb0: 75 72 6e 20 54 52 55 45 20 69 66 20 74 68 65 20 urn TRUE if the
8cc0: 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 69 73 database file is
8cd0: 20 6f 70 65 6e 65 64 20 72 65 61 64 2d 6f 6e 6c opened read-onl
8ce0: 79 2e 20 20 52 65 74 75 72 6e 20 46 41 4c 53 45 y. Return FALSE
8cf0: 0a 2a 2a 20 69 66 20 74 68 65 20 64 61 74 61 62 .** if the datab
8d00: 61 73 65 20 69 73 20 28 69 6e 20 74 68 65 6f 72 ase is (in theor
8d10: 79 29 20 77 72 69 74 61 62 6c 65 2e 0a 2a 2f 0a y) writable..*/.
8d20: 69 6e 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f int sqlitepager_
8d30: 69 73 72 65 61 64 6f 6e 6c 79 28 50 61 67 65 72 isreadonly(Pager
8d40: 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 72 65 74 *pPager){. ret
8d50: 75 72 6e 20 70 50 61 67 65 72 2d 3e 72 65 61 64 urn pPager->read
8d60: 4f 6e 6c 79 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 Only;.}../*.** T
8d70: 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 75 his routine is u
8d80: 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67 20 sed for testing
8d90: 61 6e 64 20 61 6e 61 6c 79 73 69 73 20 6f 6e 6c and analysis onl
8da0: 79 2e 0a 2a 2f 0a 69 6e 74 20 2a 73 71 6c 69 74 y..*/.int *sqlit
8db0: 65 70 61 67 65 72 5f 73 74 61 74 73 28 50 61 67 epager_stats(Pag
8dc0: 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 73 er *pPager){. s
8dd0: 74 61 74 69 63 20 69 6e 74 20 61 5b 39 5d 3b 0a tatic int a[9];.
8de0: 20 20 61 5b 30 5d 20 3d 20 70 50 61 67 65 72 2d a[0] = pPager-
8df0: 3e 6e 52 65 66 3b 0a 20 20 61 5b 31 5d 20 3d 20 >nRef;. a[1] =
8e00: 70 50 61 67 65 72 2d 3e 6e 50 61 67 65 3b 0a 20 pPager->nPage;.
8e10: 20 61 5b 32 5d 20 3d 20 70 50 61 67 65 72 2d 3e a[2] = pPager->
8e20: 6d 78 50 61 67 65 3b 0a 20 20 61 5b 33 5d 20 3d mxPage;. a[3] =
8e30: 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 3b pPager->dbSize;
8e40: 0a 20 20 61 5b 34 5d 20 3d 20 70 50 61 67 65 72 . a[4] = pPager
8e50: 2d 3e 73 74 61 74 65 3b 0a 20 20 61 5b 35 5d 20 ->state;. a[5]
8e60: 3d 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 73 = pPager->errMas
8e70: 6b 3b 0a 20 20 61 5b 36 5d 20 3d 20 70 50 61 67 k;. a[6] = pPag
8e80: 65 72 2d 3e 6e 48 69 74 3b 0a 20 20 61 5b 37 5d er->nHit;. a[7]
8e90: 20 3d 20 70 50 61 67 65 72 2d 3e 6e 4d 69 73 73 = pPager->nMiss
8ea0: 3b 0a 20 20 61 5b 38 5d 20 3d 20 70 50 61 67 65 ;. a[8] = pPage
8eb0: 72 2d 3e 6e 4f 76 66 6c 3b 0a 20 20 72 65 74 75 r->nOvfl;. retu
8ec0: 72 6e 20 61 3b 0a 7d 0a 0a 23 69 66 20 53 51 4c rn a;.}..#if SQL
8ed0: 49 54 45 5f 54 45 53 54 0a 2f 2a 0a 2a 2a 20 50 ITE_TEST./*.** P
8ee0: 72 69 6e 74 20 61 20 6c 69 73 74 69 6e 67 20 6f rint a listing o
8ef0: 66 20 61 6c 6c 20 72 65 66 65 72 65 6e 63 65 64 f all referenced
8f00: 20 70 61 67 65 73 20 61 6e 64 20 74 68 65 69 72 pages and their
8f10: 20 72 65 66 20 63 6f 75 6e 74 2e 0a 2a 2f 0a 76 ref count..*/.v
8f20: 6f 69 64 20 73 71 6c 69 74 65 70 61 67 65 72 5f oid sqlitepager_
8f30: 72 65 66 64 75 6d 70 28 50 61 67 65 72 20 2a 70 refdump(Pager *p
8f40: 50 61 67 65 72 29 7b 0a 20 20 50 67 48 64 72 20 Pager){. PgHdr
8f50: 2a 70 50 67 3b 0a 20 20 66 6f 72 28 70 50 67 3d *pPg;. for(pPg=
8f60: 70 50 61 67 65 72 2d 3e 70 41 6c 6c 3b 20 70 50 pPager->pAll; pP
8f70: 67 3b 20 70 50 67 3d 70 50 67 2d 3e 70 4e 65 78 g; pPg=pPg->pNex
8f80: 74 41 6c 6c 29 7b 0a 20 20 20 20 69 66 28 20 70 tAll){. if( p
8f90: 50 67 2d 3e 6e 52 65 66 3c 3d 30 20 29 20 63 6f Pg->nRef<=0 ) co
8fa0: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 70 72 69 6e ntinue;. prin
8fb0: 74 66 28 22 50 41 47 45 20 25 33 64 20 61 64 64 tf("PAGE %3d add
8fc0: 72 3d 30 78 25 30 38 78 20 6e 52 65 66 3d 25 64 r=0x%08x nRef=%d
8fd0: 5c 6e 22 2c 20 0a 20 20 20 20 20 20 20 70 50 67 \n", . pPg
8fe0: 2d 3e 70 67 6e 6f 2c 20 28 69 6e 74 29 50 47 48 ->pgno, (int)PGH
8ff0: 44 52 5f 54 4f 5f 44 41 54 41 28 70 50 67 29 2c DR_TO_DATA(pPg),
9000: 20 70 50 67 2d 3e 6e 52 65 66 29 3b 0a 20 20 7d pPg->nRef);. }
9010: 0a 7d 0a 23 65 6e 64 69 66 0a .}.#endif.