0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20 /*.** Copyright
0010: 28 63 29 20 32 30 30 31 20 44 2e 20 52 69 63 68 (c) 2001 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54 ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20 te it and/or.**
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 modify it under
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 the terms of the
0090: 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 lic.** License a
00b0: 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 20 74 s published by t
00c0: 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 he Free Software
00d0: 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 Foundation; eit
00e0: 68 65 72 0a 2a 2a 20 76 65 72 73 69 6f 6e 20 32 her.** version 2
00f0: 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c of the License,
0100: 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 or (at your opt
0110: 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 ion) any later v
0120: 65 72 73 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68 ersion..**.** Th
0130: 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 is program is di
0140: 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 stributed in the
0150: 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 hope that it wi
0160: 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a ll be useful,.**
0170: 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 but WITHOUT ANY
0180: 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f WARRANTY; witho
0190: 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c ut even the impl
01a0: 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a ied warranty of.
01b0: 2a 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 ** MERCHANTABILI
01c0: 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f TY or FITNESS FO
01d0: 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 R A PARTICULAR P
01e0: 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 URPOSE. See the
01f0: 20 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20 GNU.** General
0200: 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 Public License f
0210: 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e or more details.
0220: 0a 2a 2a 20 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 .** .** You shou
0230: 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 ld have received
0240: 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 a copy of the G
0250: 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 NU General Publi
0260: 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f c.** License alo
0270: 6e 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 ng with this lib
0280: 72 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 rary; if not, wr
0290: 69 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 ite to the.** Fr
02a0: 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e ee Software Foun
02b0: 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 dation, Inc., 59
02c0: 20 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 Temple Place -
02d0: 53 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f Suite 330,.** Bo
02e0: 73 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d ston, MA 02111-
02f0: 31 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 1307, USA..**.**
0300: 20 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 Author contact
0310: 69 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 information:.**
0320: 20 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a drh@hwaci.com.
0330: 2a 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e ** http://www.
0340: 68 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a hwaci.com/drh/.*
0350: 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a *.**************
0360: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0370: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0380: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0390: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 2a 2a 20 54 ***********.** T
03a0: 68 69 73 20 69 73 20 74 68 65 20 69 6d 70 6c 65 his is the imple
03b0: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 mentation of the
03c0: 20 70 61 67 65 20 63 61 63 68 65 20 73 75 62 73 page cache subs
03d0: 79 73 74 65 6d 2e 0a 2a 2a 20 0a 2a 2a 20 54 68 ystem..** .** Th
03e0: 65 20 70 61 67 65 20 63 61 63 68 65 20 69 73 20 e page cache is
03f0: 75 73 65 64 20 74 6f 20 61 63 63 65 73 73 20 61 used to access a
0400: 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 2e 20 database file.
0410: 20 54 68 65 20 70 61 67 65 72 20 6a 6f 75 72 6e The pager journ
0420: 61 6c 73 0a 2a 2a 20 61 6c 6c 20 77 72 69 74 65 als.** all write
0430: 73 20 69 6e 20 6f 72 64 65 72 20 74 6f 20 73 75 s in order to su
0440: 70 70 6f 72 74 20 72 6f 6c 6c 62 61 63 6b 2e 20 pport rollback.
0450: 20 4c 6f 63 6b 69 6e 67 20 69 73 20 75 73 65 64 Locking is used
0460: 20 74 6f 20 6c 69 6d 69 74 0a 2a 2a 20 61 63 63 to limit.** acc
0470: 65 73 73 20 74 6f 20 6f 6e 65 20 6f 72 20 6d 6f ess to one or mo
0480: 72 65 20 72 65 61 64 65 72 20 6f 72 20 6f 6e 65 re reader or one
0490: 20 77 72 69 74 65 72 2e 0a 2a 2a 0a 2a 2a 20 40 writer..**.** @
04a0: 28 23 29 20 24 49 64 3a 20 70 61 67 65 72 2e 63 (#) $Id: pager.c
04b0: 2c 76 20 31 2e 31 30 20 32 30 30 31 2f 30 36 2f ,v 1.10 2001/06/
04c0: 32 33 20 31 31 3a 33 36 3a 32 30 20 64 72 68 20 23 11:36:20 drh
04d0: 45 78 70 20 24 0a 2a 2f 0a 23 69 6e 63 6c 75 64 Exp $.*/.#includ
04e0: 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a e "sqliteInt.h".
04f0: 23 69 6e 63 6c 75 64 65 20 22 70 61 67 65 72 2e #include "pager.
0500: 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c 66 63 6e h".#include <fcn
0510: 74 6c 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c tl.h>.#include <
0520: 73 79 73 2f 73 74 61 74 2e 68 3e 0a 23 69 6e 63 sys/stat.h>.#inc
0530: 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68 3e 0a lude <unistd.h>.
0540: 23 69 6e 63 6c 75 64 65 20 3c 61 73 73 65 72 74 #include <assert
0550: 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 .h>.#include <st
0560: 72 69 6e 67 2e 68 3e 0a 0a 2f 2a 0a 2a 2a 20 54 ring.h>../*.** T
0570: 68 65 20 70 61 67 65 20 63 61 63 68 65 20 61 73 he page cache as
0580: 20 61 20 77 68 6f 6c 65 20 69 73 20 61 6c 77 61 a whole is alwa
0590: 79 73 20 69 6e 20 6f 6e 65 20 6f 66 20 74 68 65 ys in one of the
05a0: 20 66 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a 20 73 74 following.** st
05b0: 61 74 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 53 51 ates:.**.** SQ
05c0: 4c 49 54 45 5f 55 4e 4c 4f 43 4b 20 20 20 20 20 LITE_UNLOCK
05d0: 20 20 54 68 65 20 70 61 67 65 20 63 61 63 68 65 The page cache
05e0: 20 69 73 20 6e 6f 74 20 63 75 72 72 65 6e 74 6c is not currentl
05f0: 79 20 72 65 61 64 69 6e 67 20 6f 72 20 0a 2a 2a y reading or .**
0600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0610: 20 20 20 20 20 20 20 77 72 69 74 69 6e 67 20 74 writing t
0620: 68 65 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 he database file
0630: 2e 20 20 54 68 65 72 65 20 69 73 20 6e 6f 0a 2a . There is no.*
0640: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
0650: 20 20 20 20 20 20 20 20 64 61 74 61 20 68 65 6c data hel
0660: 64 20 69 6e 20 6d 65 6d 6f 72 79 2e 20 20 54 68 d in memory. Th
0670: 69 73 20 69 73 20 74 68 65 20 69 6e 69 74 69 61 is is the initia
0680: 6c 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 l.**
0690: 20 20 20 20 20 20 20 20 20 20 20 73 74 61 74 65 state
06a0: 2e 0a 2a 2a 0a 2a 2a 20 20 20 53 51 4c 49 54 45 ..**.** SQLITE
06b0: 5f 52 45 41 44 4c 4f 43 4b 20 20 20 20 20 54 68 _READLOCK Th
06c0: 65 20 70 61 67 65 20 63 61 63 68 65 20 69 73 20 e page cache is
06d0: 72 65 61 64 69 6e 67 20 74 68 65 20 64 61 74 61 reading the data
06e0: 62 61 73 65 2e 0a 2a 2a 20 20 20 20 20 20 20 20 base..**
06f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 W
0700: 72 69 74 69 6e 67 20 69 73 20 6e 6f 74 20 70 65 riting is not pe
0710: 72 6d 69 74 74 65 64 2e 20 20 54 68 65 72 65 20 rmitted. There
0720: 63 61 6e 20 62 65 0a 2a 2a 20 20 20 20 20 20 20 can be.**
0730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0740: 6d 75 6c 74 69 70 6c 65 20 72 65 61 64 65 72 73 multiple readers
0750: 20 61 63 63 65 73 73 69 6e 67 20 74 68 65 20 73 accessing the s
0760: 61 6d 65 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 ame database.**
0770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0780: 20 20 20 20 20 20 66 69 6c 65 20 61 74 20 74 68 file at th
0790: 65 20 73 61 6d 65 20 74 69 6d 65 2e 0a 2a 2a 0a e same time..**.
07a0: 2a 2a 20 20 20 53 51 4c 49 54 45 5f 57 52 49 54 ** SQLITE_WRIT
07b0: 45 4c 4f 43 4b 20 20 20 20 54 68 65 20 70 61 67 ELOCK The pag
07c0: 65 20 63 61 63 68 65 20 69 73 20 77 72 69 74 69 e cache is writi
07d0: 6e 67 20 74 68 65 20 64 61 74 61 62 61 73 65 2e ng the database.
07e0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 .**
07f0: 20 20 20 20 20 20 20 20 20 20 41 63 63 65 73 73 Access
0800: 20 69 73 20 65 78 63 6c 75 73 69 76 65 2e 20 20 is exclusive.
0810: 4e 6f 20 6f 74 68 65 72 20 70 72 6f 63 65 73 73 No other process
0820: 65 73 20 6f 72 0a 2a 2a 20 20 20 20 20 20 20 20 es or.**
0830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 t
0840: 68 72 65 61 64 73 20 63 61 6e 20 62 65 20 72 65 hreads can be re
0850: 61 64 69 6e 67 20 6f 72 20 77 72 69 74 69 6e 67 ading or writing
0860: 20 77 68 69 6c 65 20 6f 6e 65 0a 2a 2a 20 20 20 while one.**
0870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0880: 20 20 20 20 70 72 6f 63 65 73 73 20 69 73 20 77 process is w
0890: 72 69 74 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 54 68 riting..**.** Th
08a0: 65 20 70 61 67 65 20 63 61 63 68 65 20 63 6f 6d e page cache com
08b0: 65 73 20 75 70 20 69 6e 20 53 51 4c 49 54 45 5f es up in SQLITE_
08c0: 55 4e 4c 4f 43 4b 2e 20 20 54 68 65 20 66 69 72 UNLOCK. The fir
08d0: 73 74 20 74 69 6d 65 20 61 0a 2a 2a 20 73 71 6c st time a.** sql
08e0: 69 74 65 5f 70 61 67 65 5f 67 65 74 28 29 20 6f ite_page_get() o
08f0: 63 63 75 72 73 2c 20 74 68 65 20 73 74 61 74 65 ccurs, the state
0900: 20 74 72 61 6e 73 69 74 69 6f 6e 73 20 74 6f 20 transitions to
0910: 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f 43 4b 2e SQLITE_READLOCK.
0920: 0a 2a 2a 20 41 66 74 65 72 20 61 6c 6c 20 70 61 .** After all pa
0930: 67 65 73 20 68 61 76 65 20 62 65 65 6e 20 72 65 ges have been re
0940: 6c 65 61 73 65 64 20 75 73 69 6e 67 20 73 71 6c leased using sql
0950: 69 74 65 5f 70 61 67 65 5f 75 6e 72 65 66 28 29 ite_page_unref()
0960: 2c 0a 2a 2a 20 74 68 65 20 73 74 61 74 65 20 74 ,.** the state t
0970: 72 61 6e 73 69 74 69 6f 6e 73 20 62 61 63 6b 20 ransitions back
0980: 74 6f 20 53 51 4c 49 54 45 5f 55 4e 4c 4f 43 4b to SQLITE_UNLOCK
0990: 2e 20 20 54 68 65 20 66 69 72 73 74 20 74 69 6d . The first tim
09a0: 65 0a 2a 2a 20 74 68 61 74 20 73 71 6c 69 74 65 e.** that sqlite
09b0: 5f 70 61 67 65 5f 77 72 69 74 65 28 29 20 69 73 _page_write() is
09c0: 20 63 61 6c 6c 65 64 2c 20 74 68 65 20 73 74 61 called, the sta
09d0: 74 65 20 74 72 61 6e 73 69 74 69 6f 6e 73 20 74 te transitions t
09e0: 6f 0a 2a 2a 20 53 51 4c 49 54 45 5f 57 52 49 54 o.** SQLITE_WRIT
09f0: 45 4c 4f 43 4b 2e 20 20 28 4e 6f 74 65 20 74 68 ELOCK. (Note th
0a00: 61 74 20 73 71 6c 69 74 65 5f 70 61 67 65 5f 77 at sqlite_page_w
0a10: 72 69 74 65 28 29 20 63 61 6e 20 6f 6e 6c 79 20 rite() can only
0a20: 62 65 0a 2a 2a 20 63 61 6c 6c 65 64 20 6f 6e 20 be.** called on
0a30: 61 6e 20 6f 75 74 73 74 61 6e 64 69 6e 67 20 70 an outstanding p
0a40: 61 67 65 20 77 68 69 63 68 20 6d 65 61 6e 73 20 age which means
0a50: 74 68 61 74 20 74 68 65 20 70 61 67 65 72 20 6d that the pager m
0a60: 75 73 74 0a 2a 2a 20 62 65 20 69 6e 20 53 51 4c ust.** be in SQL
0a70: 49 54 45 5f 52 45 41 44 4c 4f 43 4b 20 62 65 66 ITE_READLOCK bef
0a80: 6f 72 65 20 69 74 20 74 72 61 6e 73 69 74 69 6f ore it transitio
0a90: 6e 73 20 74 6f 20 53 51 4c 49 54 45 5f 57 52 49 ns to SQLITE_WRI
0aa0: 54 45 4c 4f 43 4b 2e 29 0a 2a 2a 20 54 68 65 20 TELOCK.).** The
0ab0: 73 71 6c 69 74 65 5f 70 61 67 65 5f 72 6f 6c 6c sqlite_page_roll
0ac0: 62 61 63 6b 28 29 20 61 6e 64 20 73 71 6c 69 74 back() and sqlit
0ad0: 65 5f 70 61 67 65 5f 63 6f 6d 6d 69 74 28 29 20 e_page_commit()
0ae0: 66 75 6e 63 74 69 6f 6e 73 20 0a 2a 2a 20 74 72 functions .** tr
0af0: 61 6e 73 69 74 69 6f 6e 20 74 68 65 20 73 74 61 ansition the sta
0b00: 74 65 20 66 72 6f 6d 20 53 51 4c 49 54 45 5f 57 te from SQLITE_W
0b10: 52 49 54 45 4c 4f 43 4b 20 62 61 63 6b 20 74 6f RITELOCK back to
0b20: 20 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f 43 4b SQLITE_READLOCK
0b30: 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 53 51 4c ..*/.#define SQL
0b40: 49 54 45 5f 55 4e 4c 4f 43 4b 20 20 20 20 20 20 ITE_UNLOCK
0b50: 30 0a 23 64 65 66 69 6e 65 20 53 51 4c 49 54 45 0.#define SQLITE
0b60: 5f 52 45 41 44 4c 4f 43 4b 20 20 20 20 31 0a 23 _READLOCK 1.#
0b70: 64 65 66 69 6e 65 20 53 51 4c 49 54 45 5f 57 52 define SQLITE_WR
0b80: 49 54 45 4c 4f 43 4b 20 20 20 32 0a 0a 0a 2f 2a ITELOCK 2.../*
0b90: 0a 2a 2a 20 45 61 63 68 20 69 6e 2d 6d 65 6d 6f .** Each in-memo
0ba0: 72 79 20 69 6d 61 67 65 20 6f 66 20 61 20 70 61 ry image of a pa
0bb0: 67 65 20 62 65 67 69 6e 73 20 77 69 74 68 20 74 ge begins with t
0bc0: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 68 65 61 he following hea
0bd0: 64 65 72 2e 0a 2a 2a 20 54 68 69 73 20 68 65 61 der..** This hea
0be0: 64 65 72 20 69 73 20 6f 6e 6c 79 20 76 69 73 69 der is only visi
0bf0: 62 6c 65 20 74 6f 20 74 68 69 73 20 70 61 67 65 ble to this page
0c00: 72 20 6d 6f 64 75 6c 65 2e 20 20 54 68 65 20 63 r module. The c
0c10: 6c 69 65 6e 74 0a 2a 2a 20 63 6f 64 65 20 74 68 lient.** code th
0c20: 61 74 20 63 61 6c 6c 73 20 70 61 67 65 72 20 73 at calls pager s
0c30: 65 65 73 20 6f 6e 6c 79 20 74 68 65 20 64 61 74 ees only the dat
0c40: 61 20 74 68 61 74 20 66 6f 6c 6c 6f 77 73 20 74 a that follows t
0c50: 68 65 20 68 65 61 64 65 72 2e 0a 2a 2f 0a 74 79 he header..*/.ty
0c60: 70 65 64 65 66 20 73 74 72 75 63 74 20 50 67 48 pedef struct PgH
0c70: 64 72 20 50 67 48 64 72 3b 0a 73 74 72 75 63 74 dr PgHdr;.struct
0c80: 20 50 67 48 64 72 20 7b 0a 20 20 50 61 67 65 72 PgHdr {. Pager
0c90: 20 2a 70 50 61 67 65 72 3b 20 20 20 20 20 20 20 *pPager;
0ca0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 /* The
0cb0: 20 70 61 67 65 72 20 74 6f 20 77 68 69 63 68 20 pager to which
0cc0: 74 68 69 73 20 70 61 67 65 20 62 65 6c 6f 6e 67 this page belong
0cd0: 73 20 2a 2f 0a 20 20 50 67 6e 6f 20 70 67 6e 6f s */. Pgno pgno
0ce0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
0cf0: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 70 61 67 /* The pag
0d00: 65 20 6e 75 6d 62 65 72 20 66 6f 72 20 74 68 69 e number for thi
0d10: 73 20 70 61 67 65 20 2a 2f 0a 20 20 50 67 48 64 s page */. PgHd
0d20: 72 20 2a 70 4e 65 78 74 48 61 73 68 2c 20 2a 70 r *pNextHash, *p
0d30: 50 72 65 76 48 61 73 68 3b 20 20 2f 2a 20 48 61 PrevHash; /* Ha
0d40: 73 68 20 63 6f 6c 6c 69 73 69 6f 6e 20 63 68 61 sh collision cha
0d50: 69 6e 20 66 6f 72 20 50 67 48 64 72 2e 70 67 6e in for PgHdr.pgn
0d60: 6f 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 66 3b o */. int nRef;
0d70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0d80: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 /* Number
0d90: 6f 66 20 75 73 65 72 73 20 6f 66 20 74 68 69 73 of users of this
0da0: 20 70 61 67 65 20 2a 2f 0a 20 20 50 67 48 64 72 page */. PgHdr
0db0: 20 2a 70 4e 65 78 74 46 72 65 65 2c 20 2a 70 50 *pNextFree, *pP
0dc0: 72 65 76 46 72 65 65 3b 20 20 2f 2a 20 46 72 65 revFree; /* Fre
0dd0: 65 6c 69 73 74 20 6f 66 20 70 61 67 65 73 20 77 elist of pages w
0de0: 68 65 72 65 20 6e 52 65 66 3d 3d 30 20 2a 2f 0a here nRef==0 */.
0df0: 20 20 50 67 48 64 72 20 2a 70 4e 65 78 74 41 6c PgHdr *pNextAl
0e00: 6c 2c 20 2a 70 50 72 65 76 41 6c 6c 3b 20 20 20 l, *pPrevAll;
0e10: 20 2f 2a 20 41 20 6c 69 73 74 20 6f 66 20 61 6c /* A list of al
0e20: 6c 20 70 61 67 65 73 20 2a 2f 0a 20 20 63 68 61 l pages */. cha
0e30: 72 20 69 6e 4a 6f 75 72 6e 61 6c 3b 20 20 20 20 r inJournal;
0e40: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 /* T
0e50: 52 55 45 20 69 66 20 68 61 73 20 62 65 65 6e 20 RUE if has been
0e60: 77 72 69 74 74 65 6e 20 74 6f 20 6a 6f 75 72 6e written to journ
0e70: 61 6c 20 2a 2f 0a 20 20 63 68 61 72 20 64 69 72 al */. char dir
0e80: 74 79 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ty;
0e90: 20 20 20 20 20 20 20 2f 2a 20 54 52 55 45 20 69 /* TRUE i
0ea0: 66 20 77 65 20 6e 65 65 64 20 74 6f 20 77 72 69 f we need to wri
0eb0: 74 65 20 62 61 63 6b 20 63 68 61 6e 67 65 73 20 te back changes
0ec0: 2a 2f 0a 20 20 2f 2a 20 53 51 4c 49 54 45 5f 50 */. /* SQLITE_P
0ed0: 41 47 45 5f 53 49 5a 45 20 62 79 74 65 73 20 6f AGE_SIZE bytes o
0ee0: 66 20 70 61 67 65 20 64 61 74 61 20 66 6f 6c 6c f page data foll
0ef0: 6f 77 20 74 68 69 73 20 68 65 61 64 65 72 20 2a ow this header *
0f00: 2f 0a 20 20 2f 2a 20 50 61 67 65 72 2e 6e 45 78 /. /* Pager.nEx
0f10: 74 72 61 20 62 79 74 65 73 20 6f 66 20 6c 6f 63 tra bytes of loc
0f20: 61 6c 20 64 61 74 61 20 66 6f 6c 6c 6f 77 20 74 al data follow t
0f30: 68 65 20 70 61 67 65 20 64 61 74 61 20 2a 2f 0a he page data */.
0f40: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 };../*.** Conver
0f50: 74 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 t a pointer to a
0f60: 20 50 67 48 64 72 20 69 6e 74 6f 20 61 20 70 6f PgHdr into a po
0f70: 69 6e 74 65 72 20 74 6f 20 69 74 73 20 64 61 74 inter to its dat
0f80: 61 0a 2a 2a 20 61 6e 64 20 62 61 63 6b 20 61 67 a.** and back ag
0f90: 61 69 6e 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 ain..*/.#define
0fa0: 50 47 48 44 52 5f 54 4f 5f 44 41 54 41 28 50 29 PGHDR_TO_DATA(P)
0fb0: 20 20 28 28 76 6f 69 64 2a 29 28 26 28 50 29 5b ((void*)(&(P)[
0fc0: 31 5d 29 29 0a 23 64 65 66 69 6e 65 20 44 41 54 1])).#define DAT
0fd0: 41 5f 54 4f 5f 50 47 48 44 52 28 44 29 20 20 28 A_TO_PGHDR(D) (
0fe0: 26 28 28 50 67 48 64 72 2a 29 28 44 29 29 5b 2d &((PgHdr*)(D))[-
0ff0: 31 5d 29 0a 23 64 65 66 69 6e 65 20 50 47 48 44 1]).#define PGHD
1000: 52 5f 54 4f 5f 45 58 54 52 41 28 50 29 20 28 28 R_TO_EXTRA(P) ((
1010: 76 6f 69 64 2a 29 26 28 28 63 68 61 72 2a 29 28 void*)&((char*)(
1020: 26 28 50 29 5b 31 5d 29 29 5b 53 51 4c 49 54 45 &(P)[1]))[SQLITE
1030: 5f 50 41 47 45 5f 53 49 5a 45 5d 29 0a 0a 2f 2a _PAGE_SIZE])../*
1040: 0a 2a 2a 20 48 6f 77 20 62 69 67 20 74 6f 20 6d .** How big to m
1050: 61 6b 65 20 74 68 65 20 68 61 73 68 20 74 61 62 ake the hash tab
1060: 6c 65 20 75 73 65 64 20 66 6f 72 20 6c 6f 63 61 le used for loca
1070: 74 69 6e 67 20 69 6e 2d 6d 65 6d 6f 72 79 20 70 ting in-memory p
1080: 61 67 65 73 0a 2a 2a 20 62 79 20 70 61 67 65 20 ages.** by page
1090: 6e 75 6d 62 65 72 2e 20 20 4b 6e 75 74 68 20 73 number. Knuth s
10a0: 61 79 73 20 74 68 69 73 20 73 68 6f 75 6c 64 20 ays this should
10b0: 62 65 20 61 20 70 72 69 6d 65 20 6e 75 6d 62 65 be a prime numbe
10c0: 72 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 4e 5f r..*/.#define N_
10d0: 50 47 5f 48 41 53 48 20 31 30 31 0a 0a 2f 2a 0a PG_HASH 101../*.
10e0: 2a 2a 20 41 20 6f 70 65 6e 20 70 61 67 65 20 63 ** A open page c
10f0: 61 63 68 65 20 69 73 20 61 6e 20 69 6e 73 74 61 ache is an insta
1100: 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f nce of the follo
1110: 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 2e 0a wing structure..
1120: 2a 2f 0a 73 74 72 75 63 74 20 50 61 67 65 72 20 */.struct Pager
1130: 7b 0a 20 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e {. char *zFilen
1140: 61 6d 65 3b 20 20 20 20 20 20 20 20 20 20 20 20 ame;
1150: 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 64 /* Name of the d
1160: 61 74 61 62 61 73 65 20 66 69 6c 65 20 2a 2f 0a atabase file */.
1170: 20 20 63 68 61 72 20 2a 7a 4a 6f 75 72 6e 61 6c char *zJournal
1180: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a ; /*
1190: 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 6a 6f 75 Name of the jou
11a0: 72 6e 61 6c 20 66 69 6c 65 20 2a 2f 0a 20 20 69 rnal file */. i
11b0: 6e 74 20 66 64 2c 20 6a 66 64 3b 20 20 20 20 20 nt fd, jfd;
11c0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46 69 /* Fi
11d0: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 73 20 66 le descriptors f
11e0: 6f 72 20 64 61 74 61 62 61 73 65 20 61 6e 64 20 or database and
11f0: 6a 6f 75 72 6e 61 6c 20 2a 2f 0a 20 20 69 6e 74 journal */. int
1200: 20 64 62 53 69 7a 65 3b 20 20 20 20 20 20 20 20 dbSize;
1210: 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 /* Numb
1220: 65 72 20 6f 66 20 70 61 67 65 73 20 69 6e 20 74 er of pages in t
1230: 68 65 20 66 69 6c 65 20 2a 2f 0a 20 20 69 6e 74 he file */. int
1240: 20 6f 72 69 67 44 62 53 69 7a 65 3b 20 20 20 20 origDbSize;
1250: 20 20 20 20 20 20 20 20 20 2f 2a 20 64 62 53 69 /* dbSi
1260: 7a 65 20 62 65 66 6f 72 65 20 74 68 65 20 63 75 ze before the cu
1270: 72 72 65 6e 74 20 63 68 61 6e 67 65 20 2a 2f 0a rrent change */.
1280: 20 20 69 6e 74 20 6e 45 78 74 72 61 3b 20 20 20 int nExtra;
1290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
12a0: 20 41 64 64 20 74 68 69 73 20 6d 61 6e 79 20 62 Add this many b
12b0: 79 74 65 73 20 74 6f 20 65 61 63 68 20 69 6e 2d ytes to each in-
12c0: 6d 65 6d 6f 72 79 20 70 61 67 65 20 2a 2f 0a 20 memory page */.
12d0: 20 76 6f 69 64 20 28 2a 78 44 65 73 74 72 75 63 void (*xDestruc
12e0: 74 6f 72 29 28 76 6f 69 64 2a 29 3b 20 2f 2a 20 tor)(void*); /*
12f0: 43 61 6c 6c 20 74 68 69 73 20 72 6f 75 74 69 6e Call this routin
1300: 65 20 77 68 65 6e 20 66 72 65 65 69 6e 67 20 70 e when freeing p
1310: 61 67 65 73 20 2a 2f 0a 20 20 69 6e 74 20 6e 50 ages */. int nP
1320: 61 67 65 3b 20 20 20 20 20 20 20 20 20 20 20 20 age;
1330: 20 20 20 20 20 20 2f 2a 20 54 6f 74 61 6c 20 6e /* Total n
1340: 75 6d 62 65 72 20 6f 66 20 69 6e 2d 6d 65 6d 6f umber of in-memo
1350: 72 79 20 70 61 67 65 73 20 2a 2f 0a 20 20 69 6e ry pages */. in
1360: 74 20 6e 52 65 66 3b 20 20 20 20 20 20 20 20 20 t nRef;
1370: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d /* Num
1380: 62 65 72 20 6f 66 20 69 6e 2d 6d 65 6d 6f 72 79 ber of in-memory
1390: 20 70 61 67 65 73 20 77 69 74 68 20 50 67 48 64 pages with PgHd
13a0: 72 2e 6e 52 65 66 3e 30 20 2a 2f 0a 20 20 69 6e r.nRef>0 */. in
13b0: 74 20 6d 78 50 61 67 65 3b 20 20 20 20 20 20 20 t mxPage;
13c0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 61 78 /* Max
13d0: 69 6d 75 6d 20 6e 75 6d 62 65 72 20 6f 66 20 70 imum number of p
13e0: 61 67 65 73 20 74 6f 20 68 6f 6c 64 20 69 6e 20 ages to hold in
13f0: 63 61 63 68 65 20 2a 2f 0a 20 20 69 6e 74 20 6e cache */. int n
1400: 48 69 74 2c 20 6e 4d 69 73 73 2c 20 6e 4f 76 66 Hit, nMiss, nOvf
1410: 6c 3b 20 20 20 20 20 2f 2a 20 43 61 63 68 65 20 l; /* Cache
1420: 68 69 74 73 2c 20 6d 69 73 73 69 6e 67 2c 20 61 hits, missing, a
1430: 6e 64 20 4c 52 55 20 6f 76 65 72 66 6c 6f 77 73 nd LRU overflows
1440: 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 */. unsigned c
1450: 68 61 72 20 73 74 61 74 65 3b 20 20 20 20 20 20 har state;
1460: 20 20 2f 2a 20 53 51 4c 49 54 45 5f 55 4e 4c 4f /* SQLITE_UNLO
1470: 43 4b 2c 20 5f 52 45 41 44 4c 4f 43 4b 20 6f 72 CK, _READLOCK or
1480: 20 5f 57 52 49 54 45 4c 4f 43 4b 20 2a 2f 0a 20 _WRITELOCK */.
1490: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 65 unsigned char e
14a0: 72 72 4d 61 73 6b 3b 20 20 20 20 20 20 2f 2a 20 rrMask; /*
14b0: 4f 6e 65 20 6f 66 20 73 65 76 65 72 61 6c 20 6b One of several k
14c0: 69 6e 64 73 20 6f 66 20 65 72 72 6f 72 73 20 2a inds of errors *
14d0: 2f 0a 20 20 50 67 48 64 72 20 2a 70 46 69 72 73 /. PgHdr *pFirs
14e0: 74 2c 20 2a 70 4c 61 73 74 3b 20 20 20 20 20 20 t, *pLast;
14f0: 2f 2a 20 4c 69 73 74 20 6f 66 20 66 72 65 65 20 /* List of free
1500: 70 61 67 65 73 20 2a 2f 0a 20 20 50 67 48 64 72 pages */. PgHdr
1510: 20 2a 70 41 6c 6c 3b 20 20 20 20 20 20 20 20 20 *pAll;
1520: 20 20 20 20 20 20 20 2f 2a 20 4c 69 73 74 20 6f /* List o
1530: 66 20 61 6c 6c 20 70 61 67 65 73 20 2a 2f 0a 20 f all pages */.
1540: 20 50 67 48 64 72 20 2a 61 48 61 73 68 5b 4e 5f PgHdr *aHash[N_
1550: 50 47 5f 48 41 53 48 5d 3b 20 20 20 20 2f 2a 20 PG_HASH]; /*
1560: 48 61 73 68 20 74 61 62 6c 65 20 74 6f 20 6d 61 Hash table to ma
1570: 70 20 70 61 67 65 20 6e 75 6d 62 65 72 20 6f 66 p page number of
1580: 20 50 67 48 64 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a PgHdr */.};../*
1590: 0a 2a 2a 20 54 68 65 73 65 20 61 72 65 20 62 69 .** These are bi
15a0: 74 73 20 74 68 61 74 20 63 61 6e 20 62 65 20 73 ts that can be s
15b0: 65 74 20 69 6e 20 50 61 67 65 72 2e 65 72 72 4d et in Pager.errM
15c0: 61 73 6b 2e 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 ask..*/.#define
15d0: 50 41 47 45 52 5f 45 52 52 5f 46 55 4c 4c 20 20 PAGER_ERR_FULL
15e0: 20 20 20 30 78 30 31 20 20 2f 2a 20 61 20 77 72 0x01 /* a wr
15f0: 69 74 65 28 29 20 66 61 69 6c 65 64 20 2a 2f 0a ite() failed */.
1600: 23 64 65 66 69 6e 65 20 50 41 47 45 52 5f 45 52 #define PAGER_ER
1610: 52 5f 4d 45 4d 20 20 20 20 20 20 30 78 30 32 20 R_MEM 0x02
1620: 20 2f 2a 20 6d 61 6c 6c 6f 63 28 29 20 66 61 69 /* malloc() fai
1630: 6c 65 64 20 2a 2f 0a 23 64 65 66 69 6e 65 20 50 led */.#define P
1640: 41 47 45 52 5f 45 52 52 5f 4c 4f 43 4b 20 20 20 AGER_ERR_LOCK
1650: 20 20 30 78 30 34 20 20 2f 2a 20 65 72 72 6f 72 0x04 /* error
1660: 20 69 6e 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 in the locking
1670: 70 72 6f 74 6f 63 6f 6c 20 2a 2f 0a 23 64 65 66 protocol */.#def
1680: 69 6e 65 20 50 41 47 45 52 5f 45 52 52 5f 43 4f ine PAGER_ERR_CO
1690: 52 52 55 50 54 20 20 30 78 30 38 20 20 2f 2a 20 RRUPT 0x08 /*
16a0: 64 61 74 61 62 61 73 65 20 6f 72 20 6a 6f 75 72 database or jour
16b0: 6e 61 6c 20 63 6f 72 72 75 70 74 69 6f 6e 20 2a nal corruption *
16c0: 2f 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 6a 6f 75 /../*.** The jou
16d0: 72 6e 61 6c 20 66 69 6c 65 20 63 6f 6e 74 61 69 rnal file contai
16e0: 6e 73 20 70 61 67 65 20 72 65 63 6f 72 64 73 20 ns page records
16f0: 69 6e 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 in the following
1700: 0a 2a 2a 20 66 6f 72 6d 61 74 2e 0a 2a 2f 0a 74 .** format..*/.t
1710: 79 70 65 64 65 66 20 73 74 72 75 63 74 20 50 61 ypedef struct Pa
1720: 67 65 52 65 63 6f 72 64 20 50 61 67 65 52 65 63 geRecord PageRec
1730: 6f 72 64 3b 0a 73 74 72 75 63 74 20 50 61 67 65 ord;.struct Page
1740: 52 65 63 6f 72 64 20 7b 0a 20 20 50 67 6e 6f 20 Record {. Pgno
1750: 70 67 6e 6f 3b 20 20 20 20 20 20 20 20 20 20 20 pgno;
1760: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 /* The
1770: 20 70 61 67 65 20 6e 75 6d 62 65 72 20 2a 2f 0a page number */.
1780: 20 20 63 68 61 72 20 61 44 61 74 61 5b 53 51 4c char aData[SQL
1790: 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 5d 3b 20 ITE_PAGE_SIZE];
17a0: 20 2f 2a 20 4f 72 69 67 69 6e 61 6c 20 64 61 74 /* Original dat
17b0: 61 20 66 6f 72 20 70 61 67 65 20 70 67 6e 6f 20 a for page pgno
17c0: 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 4a 6f 75 */.};../*.** Jou
17d0: 72 6e 61 6c 20 66 69 6c 65 73 20 62 65 67 69 6e rnal files begin
17e0: 20 77 69 74 68 20 74 68 65 20 66 6f 6c 6c 6f 77 with the follow
17f0: 69 6e 67 20 6d 61 67 69 63 20 73 74 72 69 6e 67 ing magic string
1800: 2e 20 20 54 68 69 73 20 64 61 74 61 0a 2a 2a 20 . This data.**
1810: 69 73 20 63 6f 6d 70 6c 65 74 65 6c 79 20 72 61 is completely ra
1820: 6e 64 6f 6d 2e 20 20 49 74 20 69 73 20 75 73 65 ndom. It is use
1830: 64 20 6f 6e 6c 79 20 61 73 20 61 20 73 61 6e 69 d only as a sani
1840: 74 79 20 63 68 65 63 6b 2e 0a 2a 2f 0a 73 74 61 ty check..*/.sta
1850: 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e tic const unsign
1860: 65 64 20 63 68 61 72 20 61 4a 6f 75 72 6e 61 6c ed char aJournal
1870: 4d 61 67 69 63 5b 5d 20 3d 20 7b 0a 20 20 30 78 Magic[] = {. 0x
1880: 64 39 2c 20 30 78 64 35 2c 20 30 78 30 35 2c 20 d9, 0xd5, 0x05,
1890: 30 78 66 39 2c 20 30 78 32 30 2c 20 30 78 61 31 0xf9, 0x20, 0xa1
18a0: 2c 20 30 78 36 33 2c 20 30 78 64 34 2c 0a 7d 3b , 0x63, 0xd4,.};
18b0: 0a 0a 2f 2a 0a 2a 2a 20 48 61 73 68 20 61 20 70 ../*.** Hash a p
18c0: 61 67 65 20 6e 75 6d 62 65 72 0a 2a 2f 0a 23 64 age number.*/.#d
18d0: 65 66 69 6e 65 20 70 61 67 65 72 5f 68 61 73 68 efine pager_hash
18e0: 28 50 4e 29 20 20 28 28 50 4e 29 25 4e 5f 50 47 (PN) ((PN)%N_PG
18f0: 5f 48 41 53 48 29 0a 0a 2f 2a 0a 2a 2a 20 41 74 _HASH)../*.** At
1900: 74 65 6d 70 74 20 74 6f 20 61 63 71 75 69 72 65 tempt to acquire
1910: 20 61 20 72 65 61 64 20 6c 6f 63 6b 20 28 69 66 a read lock (if
1920: 20 77 72 6c 6f 63 6b 3d 3d 30 29 20 6f 72 20 61 wrlock==0) or a
1930: 20 77 72 69 74 65 20 6c 6f 63 6b 20 28 69 66 20 write lock (if
1940: 77 72 6c 6f 63 6b 3d 3d 31 29 0a 2a 2a 20 6f 6e wrlock==1).** on
1950: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 66 69 the database fi
1960: 6c 65 2e 20 20 52 65 74 75 72 6e 20 30 20 6f 6e le. Return 0 on
1970: 20 73 75 63 63 65 73 73 20 61 6e 64 20 6e 6f 6e success and non
1980: 2d 7a 65 72 6f 20 69 66 20 74 68 65 20 6c 6f 63 -zero if the loc
1990: 6b 20 0a 2a 2a 20 63 6f 75 6c 64 20 6e 6f 74 20 k .** could not
19a0: 62 65 20 61 63 71 75 69 72 65 64 2e 0a 2a 2f 0a be acquired..*/.
19b0: 73 74 61 74 69 63 20 69 6e 74 20 70 61 67 65 72 static int pager
19c0: 5f 6c 6f 63 6b 28 69 6e 74 20 66 64 2c 20 69 6e _lock(int fd, in
19d0: 74 20 77 72 6c 6f 63 6b 29 7b 0a 20 20 69 6e 74 t wrlock){. int
19e0: 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20 66 6c rc;. struct fl
19f0: 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 6c 6f 63 6b ock lock;. lock
1a00: 2e 6c 5f 74 79 70 65 20 3d 20 77 72 6c 6f 63 6b .l_type = wrlock
1a10: 20 3f 20 46 5f 57 52 4c 43 4b 20 3a 20 46 5f 52 ? F_WRLCK : F_R
1a20: 44 4c 43 4b 3b 0a 20 20 6c 6f 63 6b 2e 6c 5f 77 DLCK;. lock.l_w
1a30: 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 hence = SEEK_SET
1a40: 3b 0a 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 ;. lock.l_start
1a50: 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 = lock.l_len =
1a60: 30 4c 3b 0a 20 20 72 63 20 3d 20 66 63 6e 74 6c 0L;. rc = fcntl
1a70: 28 66 64 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c (fd, F_SETLK, &l
1a80: 6f 63 6b 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 ock);. return r
1a90: 63 21 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 55 c!=0;.}../*.** U
1aa0: 6e 6c 6f 63 6b 20 74 68 65 20 64 61 74 61 62 61 nlock the databa
1ab0: 73 65 20 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 se file..*/.stat
1ac0: 69 63 20 69 6e 74 20 70 61 67 65 72 5f 75 6e 6c ic int pager_unl
1ad0: 6f 63 6b 28 66 64 29 7b 0a 20 20 69 6e 74 20 72 ock(fd){. int r
1ae0: 63 3b 0a 20 20 73 74 72 75 63 74 20 66 6c 6f 63 c;. struct floc
1af0: 6b 20 6c 6f 63 6b 3b 0a 20 20 6c 6f 63 6b 2e 6c k lock;. lock.l
1b00: 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b _type = F_UNLCK;
1b10: 0a 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 . lock.l_whence
1b20: 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 6c = SEEK_SET;. l
1b30: 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 6c 6f ock.l_start = lo
1b40: 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20 ck.l_len = 0L;.
1b50: 20 72 63 20 3d 20 66 63 6e 74 6c 28 66 64 2c 20 rc = fcntl(fd,
1b60: 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b F_SETLK, &lock);
1b70: 0a 20 20 72 65 74 75 72 6e 20 72 63 21 3d 30 3b . return rc!=0;
1b80: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 6f 76 65 20 74 .}../*.** Move t
1b90: 68 65 20 63 75 72 73 6f 72 20 66 6f 72 20 66 69 he cursor for fi
1ba0: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 66 64 le descriptor fd
1bb0: 20 74 6f 20 74 68 65 20 70 6f 69 6e 74 20 77 68 to the point wh
1bc0: 65 72 65 74 6f 20 66 72 6f 6d 0a 2a 2a 20 74 68 ereto from.** th
1bd0: 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 e beginning of t
1be0: 68 65 20 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 he file..*/.stat
1bf0: 69 63 20 69 6e 74 20 70 61 67 65 72 5f 73 65 65 ic int pager_see
1c00: 6b 28 69 6e 74 20 66 64 2c 20 6f 66 66 5f 74 20 k(int fd, off_t
1c10: 77 68 65 72 65 74 6f 29 7b 0a 20 20 6c 73 65 65 whereto){. lsee
1c20: 6b 28 66 64 2c 20 77 68 65 72 65 74 6f 2c 20 53 k(fd, whereto, S
1c30: 45 45 4b 5f 53 45 54 29 3b 0a 20 20 72 65 74 75 EEK_SET);. retu
1c40: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a rn SQLITE_OK;.}.
1c50: 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63 61 74 65 20 ./*.** Truncate
1c60: 74 68 65 20 67 69 76 65 6e 20 66 69 6c 65 20 73 the given file s
1c70: 6f 20 74 68 61 74 20 69 74 20 63 6f 6e 74 61 69 o that it contai
1c80: 6e 73 20 65 78 61 63 74 6c 79 20 6d 78 50 67 20 ns exactly mxPg
1c90: 70 61 67 65 73 0a 2a 2a 20 6f 66 20 64 61 74 61 pages.** of data
1ca0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 ..*/.static int
1cb0: 70 61 67 65 72 5f 74 72 75 6e 63 61 74 65 28 69 pager_truncate(i
1cc0: 6e 74 20 66 64 2c 20 50 67 6e 6f 20 6d 78 50 67 nt fd, Pgno mxPg
1cd0: 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 72 ){. int rc;. r
1ce0: 63 20 3d 20 66 74 72 75 6e 63 61 74 65 28 66 64 c = ftruncate(fd
1cf0: 2c 20 6d 78 50 67 2a 53 51 4c 49 54 45 5f 50 41 , mxPg*SQLITE_PA
1d00: 47 45 5f 53 49 5a 45 29 3b 0a 20 20 72 65 74 75 GE_SIZE);. retu
1d10: 72 6e 20 72 63 21 3d 30 20 3f 20 53 51 4c 49 54 rn rc!=0 ? SQLIT
1d20: 45 5f 49 4f 45 52 52 20 3a 20 53 51 4c 49 54 45 E_IOERR : SQLITE
1d30: 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 _OK;.}../*.** Re
1d40: 61 64 20 6e 42 79 74 65 73 20 6f 66 20 64 61 74 ad nBytes of dat
1d50: 61 20 66 72 6f 6d 20 66 64 20 69 6e 74 6f 20 70 a from fd into p
1d60: 42 75 66 2e 20 20 49 66 20 74 68 65 20 64 61 74 Buf. If the dat
1d70: 61 20 63 61 6e 6e 6f 74 20 62 65 0a 2a 2a 20 72 a cannot be.** r
1d80: 65 61 64 20 6f 72 20 6f 6e 6c 79 20 61 20 70 61 ead or only a pa
1d90: 72 74 69 61 6c 20 72 65 61 64 20 6f 63 63 75 72 rtial read occur
1da0: 73 2c 20 74 68 65 6e 20 74 68 65 20 75 6e 72 65 s, then the unre
1db0: 61 64 20 70 61 72 74 73 20 6f 66 0a 2a 2a 20 70 ad parts of.** p
1dc0: 42 75 66 20 61 72 65 20 66 69 6c 6c 65 64 20 77 Buf are filled w
1dd0: 69 74 68 20 7a 65 72 6f 73 20 61 6e 64 20 74 68 ith zeros and th
1de0: 69 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 is routine retur
1df0: 6e 73 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 2e ns SQLITE_IOERR.
1e00: 0a 2a 2a 20 49 66 20 74 68 65 20 72 65 61 64 20 .** If the read
1e10: 69 73 20 63 6f 6d 70 6c 65 74 65 6c 79 20 73 75 is completely su
1e20: 63 63 65 73 73 66 75 6c 2c 20 72 65 74 75 72 6e ccessful, return
1e30: 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a 2f 0a 73 SQLITE_OK..*/.s
1e40: 74 61 74 69 63 20 69 6e 74 20 70 61 67 65 72 5f tatic int pager_
1e50: 72 65 61 64 28 69 6e 74 20 66 64 2c 20 76 6f 69 read(int fd, voi
1e60: 64 20 2a 70 42 75 66 2c 20 69 6e 74 20 6e 42 79 d *pBuf, int nBy
1e70: 74 65 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 te){. int rc;.
1e80: 20 72 63 20 3d 20 72 65 61 64 28 66 64 2c 20 70 rc = read(fd, p
1e90: 42 75 66 2c 20 6e 42 79 74 65 29 3b 0a 20 20 69 Buf, nByte);. i
1ea0: 66 28 20 72 63 3c 30 20 29 7b 0a 20 20 20 20 6d f( rc<0 ){. m
1eb0: 65 6d 73 65 74 28 70 42 75 66 2c 20 30 2c 20 6e emset(pBuf, 0, n
1ec0: 42 79 74 65 29 3b 0a 20 20 20 20 72 65 74 75 72 Byte);. retur
1ed0: 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a n SQLITE_IOERR;.
1ee0: 20 20 7d 0a 20 20 69 66 28 20 72 63 3c 6e 42 79 }. if( rc<nBy
1ef0: 74 65 20 29 7b 0a 20 20 20 20 6d 65 6d 73 65 74 te ){. memset
1f00: 28 26 28 28 63 68 61 72 2a 29 70 42 75 66 29 5b (&((char*)pBuf)[
1f10: 72 63 5d 2c 20 30 2c 20 6e 42 79 74 65 20 2d 20 rc], 0, nByte -
1f20: 72 63 29 3b 0a 20 20 20 20 72 63 20 3d 20 53 51 rc);. rc = SQ
1f30: 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 65 LITE_IOERR;. }e
1f40: 6c 73 65 7b 0a 20 20 20 20 72 63 20 3d 20 53 51 lse{. rc = SQ
1f50: 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 20 20 72 LITE_OK;. }. r
1f60: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a eturn rc;.}../*.
1f70: 2a 2a 20 57 72 69 74 65 20 6e 42 79 74 65 73 20 ** Write nBytes
1f80: 6f 66 20 64 61 74 61 20 69 6e 74 6f 20 66 64 2e of data into fd.
1f90: 20 20 49 66 20 61 6e 79 20 70 72 6f 62 6c 65 6d If any problem
1fa0: 20 6f 63 63 75 72 73 20 6f 72 20 69 66 20 74 68 occurs or if th
1fb0: 65 0a 2a 2a 20 77 72 69 74 65 20 69 73 20 69 6e e.** write is in
1fc0: 63 6f 6d 70 6c 65 74 65 2c 20 53 51 4c 49 54 45 complete, SQLITE
1fd0: 5f 49 4f 45 52 52 20 69 73 20 72 65 74 75 72 6e _IOERR is return
1fe0: 65 64 2e 20 20 53 51 4c 49 54 45 5f 4f 4b 20 69 ed. SQLITE_OK i
1ff0: 73 0a 2a 2a 20 72 65 74 75 72 6e 65 64 20 75 70 s.** returned up
2000: 6f 6e 20 63 6f 6d 70 6c 65 74 65 20 73 75 63 63 on complete succ
2010: 65 73 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 ess..*/.static i
2020: 6e 74 20 70 61 67 65 72 5f 77 72 69 74 65 28 69 nt pager_write(i
2030: 6e 74 20 66 64 2c 20 63 6f 6e 73 74 20 76 6f 69 nt fd, const voi
2040: 64 20 2a 70 42 75 66 2c 20 69 6e 74 20 6e 42 79 d *pBuf, int nBy
2050: 74 65 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 te){. int rc;.
2060: 20 72 63 20 3d 20 77 72 69 74 65 28 66 64 2c 20 rc = write(fd,
2070: 70 42 75 66 2c 20 6e 42 79 74 65 29 3b 0a 20 20 pBuf, nByte);.
2080: 69 66 28 20 72 63 3c 6e 42 79 74 65 20 29 7b 0a if( rc<nByte ){.
2090: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 return SQLIT
20a0: 45 5f 46 55 4c 4c 3b 0a 20 20 7d 65 6c 73 65 7b E_FULL;. }else{
20b0: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 . return SQLI
20c0: 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a TE_OK;. }.}../*
20d0: 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 74 68 65 20 .** Convert the
20e0: 62 69 74 73 20 69 6e 20 74 68 65 20 70 50 61 67 bits in the pPag
20f0: 65 72 2d 3e 65 72 72 4d 61 73 6b 20 69 6e 74 6f er->errMask into
2100: 20 61 6e 20 61 70 70 72 6f 70 72 61 74 65 0a 2a an approprate.*
2110: 2a 20 72 65 74 75 72 6e 20 63 6f 64 65 2e 0a 2a * return code..*
2120: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70 61 67 /.static int pag
2130: 65 72 5f 65 72 72 63 6f 64 65 28 50 61 67 65 72 er_errcode(Pager
2140: 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 69 6e 74 *pPager){. int
2150: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b rc = SQLITE_OK;
2160: 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 65 . if( pPager->e
2170: 72 72 4d 61 73 6b 20 26 20 50 41 47 45 52 5f 45 rrMask & PAGER_E
2180: 52 52 5f 4c 4f 43 4b 20 29 20 20 20 20 72 63 20 RR_LOCK ) rc
2190: 3d 20 53 51 4c 49 54 45 5f 50 52 4f 54 4f 43 4f = SQLITE_PROTOCO
21a0: 4c 3b 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d L;. if( pPager-
21b0: 3e 65 72 72 4d 61 73 6b 20 26 20 50 41 47 45 52 >errMask & PAGER
21c0: 5f 45 52 52 5f 46 55 4c 4c 20 29 20 20 20 20 72 _ERR_FULL ) r
21d0: 63 20 3d 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b c = SQLITE_FULL;
21e0: 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 65 . if( pPager->e
21f0: 72 72 4d 61 73 6b 20 26 20 50 41 47 45 52 5f 45 rrMask & PAGER_E
2200: 52 52 5f 4d 45 4d 20 29 20 20 20 20 20 72 63 20 RR_MEM ) rc
2210: 3d 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a = SQLITE_NOMEM;.
2220: 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 65 72 if( pPager->er
2230: 72 4d 61 73 6b 20 26 20 50 41 47 45 52 5f 45 52 rMask & PAGER_ER
2240: 52 5f 43 4f 52 52 55 50 54 20 29 20 72 63 20 3d R_CORRUPT ) rc =
2250: 20 53 51 4c 49 54 45 5f 43 4f 52 52 55 50 54 3b SQLITE_CORRUPT;
2260: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a . return rc;.}.
2270: 0a 2f 2a 0a 2a 2a 20 46 69 6e 64 20 61 20 70 61 ./*.** Find a pa
2280: 67 65 20 69 6e 20 74 68 65 20 68 61 73 68 20 74 ge in the hash t
2290: 61 62 6c 65 20 67 69 76 65 6e 20 69 74 73 20 70 able given its p
22a0: 61 67 65 20 6e 75 6d 62 65 72 2e 20 20 52 65 74 age number. Ret
22b0: 75 72 6e 0a 2a 2a 20 61 20 70 6f 69 6e 74 65 72 urn.** a pointer
22c0: 20 74 6f 20 74 68 65 20 70 61 67 65 20 6f 72 20 to the page or
22d0: 4e 55 4c 4c 20 69 66 20 6e 6f 74 20 66 6f 75 6e NULL if not foun
22e0: 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 50 67 48 d..*/.static PgH
22f0: 64 72 20 2a 70 61 67 65 72 5f 6c 6f 6f 6b 75 70 dr *pager_lookup
2300: 28 50 61 67 65 72 20 2a 70 50 61 67 65 72 2c 20 (Pager *pPager,
2310: 50 67 6e 6f 20 70 67 6e 6f 29 7b 0a 20 20 50 67 Pgno pgno){. Pg
2320: 48 64 72 20 2a 70 20 3d 20 70 50 61 67 65 72 2d Hdr *p = pPager-
2330: 3e 61 48 61 73 68 5b 70 67 6e 6f 20 25 20 4e 5f >aHash[pgno % N_
2340: 50 47 5f 48 41 53 48 5d 3b 0a 20 20 77 68 69 6c PG_HASH];. whil
2350: 65 28 20 70 20 26 26 20 70 2d 3e 70 67 6e 6f 21 e( p && p->pgno!
2360: 3d 70 67 6e 6f 20 29 7b 0a 20 20 20 20 70 20 3d =pgno ){. p =
2370: 20 70 2d 3e 70 4e 65 78 74 48 61 73 68 3b 0a 20 p->pNextHash;.
2380: 20 7d 0a 20 20 72 65 74 75 72 6e 20 70 3b 0a 7d }. return p;.}
2390: 0a 0a 2f 2a 0a 2a 2a 20 55 6e 6c 6f 63 6b 20 74 ../*.** Unlock t
23a0: 68 65 20 64 61 74 61 62 61 73 65 20 61 6e 64 20 he database and
23b0: 63 6c 65 61 72 20 74 68 65 20 69 6e 2d 6d 65 6d clear the in-mem
23c0: 6f 72 79 20 63 61 63 68 65 2e 20 20 54 68 69 73 ory cache. This
23d0: 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 73 65 74 73 routine.** sets
23e0: 20 74 68 65 20 73 74 61 74 65 20 6f 66 20 74 68 the state of th
23f0: 65 20 70 61 67 65 72 20 62 61 63 6b 20 74 6f 20 e pager back to
2400: 77 68 61 74 20 69 74 20 77 61 73 20 77 68 65 6e what it was when
2410: 20 69 74 20 77 61 73 20 66 69 72 73 74 0a 2a 2a it was first.**
2420: 20 6f 70 65 6e 65 64 2e 20 20 41 6e 79 20 6f 75 opened. Any ou
2430: 74 73 74 61 6e 64 69 6e 67 20 70 61 67 65 73 20 tstanding pages
2440: 61 72 65 20 69 6e 76 61 6c 69 64 61 74 65 64 20 are invalidated
2450: 61 6e 64 20 73 75 62 73 65 71 75 65 6e 74 20 61 and subsequent a
2460: 74 74 65 6d 70 74 73 0a 2a 2a 20 74 6f 20 61 63 ttempts.** to ac
2470: 63 65 73 73 20 74 68 6f 73 65 20 70 61 67 65 73 cess those pages
2480: 20 77 69 6c 6c 20 6c 69 6b 65 6c 79 20 72 65 73 will likely res
2490: 75 6c 74 20 69 6e 20 61 20 63 6f 72 65 64 75 6d ult in a coredum
24a0: 70 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 p..*/.static voi
24b0: 64 20 70 61 67 65 72 5f 72 65 73 65 74 28 50 61 d pager_reset(Pa
24c0: 67 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 ger *pPager){.
24d0: 50 67 48 64 72 20 2a 70 50 67 2c 20 2a 70 4e 65 PgHdr *pPg, *pNe
24e0: 78 74 3b 0a 20 20 66 6f 72 28 70 50 67 3d 70 50 xt;. for(pPg=pP
24f0: 61 67 65 72 2d 3e 70 41 6c 6c 3b 20 70 50 67 3b ager->pAll; pPg;
2500: 20 70 50 67 3d 70 4e 65 78 74 29 7b 0a 20 20 20 pPg=pNext){.
2510: 20 70 4e 65 78 74 20 3d 20 70 50 67 2d 3e 70 4e pNext = pPg->pN
2520: 65 78 74 41 6c 6c 3b 0a 20 20 20 20 73 71 6c 69 extAll;. sqli
2530: 74 65 46 72 65 65 28 70 50 67 29 3b 0a 20 20 7d teFree(pPg);. }
2540: 0a 20 20 70 50 61 67 65 72 2d 3e 70 46 69 72 73 . pPager->pFirs
2550: 74 20 3d 20 30 3b 0a 20 20 70 50 61 67 65 72 2d t = 0;. pPager-
2560: 3e 70 4c 61 73 74 20 3d 20 30 3b 0a 20 20 70 50 >pLast = 0;. pP
2570: 61 67 65 72 2d 3e 70 41 6c 6c 20 3d 20 30 3b 0a ager->pAll = 0;.
2580: 20 20 6d 65 6d 73 65 74 28 70 50 61 67 65 72 2d memset(pPager-
2590: 3e 61 48 61 73 68 2c 20 30 2c 20 73 69 7a 65 6f >aHash, 0, sizeo
25a0: 66 28 70 50 61 67 65 72 2d 3e 61 48 61 73 68 29 f(pPager->aHash)
25b0: 29 3b 0a 20 20 70 50 61 67 65 72 2d 3e 6e 50 61 );. pPager->nPa
25c0: 67 65 20 3d 20 30 3b 0a 20 20 69 66 28 20 70 50 ge = 0;. if( pP
25d0: 61 67 65 72 2d 3e 73 74 61 74 65 3d 3d 53 51 4c ager->state==SQL
25e0: 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 20 29 7b ITE_WRITELOCK ){
25f0: 0a 20 20 20 20 73 71 6c 69 74 65 70 61 67 65 72 . sqlitepager
2600: 5f 72 6f 6c 6c 62 61 63 6b 28 70 50 61 67 65 72 _rollback(pPager
2610: 29 3b 0a 20 20 7d 0a 20 20 70 61 67 65 72 5f 75 );. }. pager_u
2620: 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 64 nlock(pPager->fd
2630: 29 3b 0a 20 20 70 50 61 67 65 72 2d 3e 73 74 61 );. pPager->sta
2640: 74 65 20 3d 20 53 51 4c 49 54 45 5f 55 4e 4c 4f te = SQLITE_UNLO
2650: 43 4b 3b 0a 20 20 70 50 61 67 65 72 2d 3e 64 62 CK;. pPager->db
2660: 53 69 7a 65 20 3d 20 2d 31 3b 0a 20 20 70 50 61 Size = -1;. pPa
2670: 67 65 72 2d 3e 6e 52 65 66 20 3d 20 30 3b 0a 7d ger->nRef = 0;.}
2680: 0a 0a 2f 2a 0a 2a 2a 20 57 68 65 6e 20 74 68 69 ../*.** When thi
2690: 73 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 6c s routine is cal
26a0: 6c 65 64 2c 20 74 68 65 20 70 61 67 65 72 20 68 led, the pager h
26b0: 61 73 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 66 as the journal f
26c0: 69 6c 65 20 6f 70 65 6e 20 61 6e 64 0a 2a 2a 20 ile open and.**
26d0: 61 20 77 72 69 74 65 20 6c 6f 63 6b 20 6f 6e 20 a write lock on
26e0: 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 20 54 the database. T
26f0: 68 69 73 20 72 6f 75 74 69 6e 65 20 72 65 6c 65 his routine rele
2700: 61 73 65 73 20 74 68 65 20 64 61 74 61 62 61 73 ases the databas
2710: 65 0a 2a 2a 20 77 72 69 74 65 20 6c 6f 63 6b 20 e.** write lock
2720: 61 6e 64 20 61 63 71 75 69 72 65 73 20 61 20 72 and acquires a r
2730: 65 61 64 20 6c 6f 63 6b 20 69 6e 20 69 74 73 20 ead lock in its
2740: 70 6c 61 63 65 2e 20 20 54 68 65 20 6a 6f 75 72 place. The jour
2750: 6e 61 6c 20 66 69 6c 65 0a 2a 2a 20 69 73 20 64 nal file.** is d
2760: 65 6c 65 74 65 64 20 61 6e 64 20 63 6c 6f 73 65 eleted and close
2770: 64 2e 0a 2a 2a 0a 2a 2a 20 57 65 20 68 61 76 65 d..**.** We have
2780: 20 74 6f 20 72 65 6c 65 61 73 65 20 74 68 65 20 to release the
2790: 77 72 69 74 65 20 6c 6f 63 6b 20 62 65 66 6f 72 write lock befor
27a0: 65 20 61 63 71 75 69 72 69 6e 67 20 74 68 65 20 e acquiring the
27b0: 72 65 61 64 20 6c 6f 63 6b 2c 0a 2a 2a 20 73 6f read lock,.** so
27c0: 20 74 68 65 72 65 20 69 73 20 61 20 72 61 63 65 there is a race
27d0: 20 63 6f 6e 64 69 74 69 6f 6e 20 77 68 65 72 65 condition where
27e0: 20 61 6e 6f 74 68 65 72 20 70 72 6f 63 65 73 73 another process
27f0: 20 63 61 6e 20 67 65 74 20 74 68 65 20 6c 6f 63 can get the loc
2800: 6b 0a 2a 2a 20 77 68 69 6c 65 20 77 65 20 61 72 k.** while we ar
2810: 65 20 6e 6f 74 20 68 6f 6c 64 69 6e 67 20 69 74 e not holding it
2820: 2e 20 20 42 75 74 2c 20 6e 6f 20 6f 74 68 65 72 . But, no other
2830: 20 70 72 6f 63 65 73 73 20 73 68 6f 75 6c 64 20 process should
2840: 64 6f 20 74 68 69 73 0a 2a 2a 20 62 65 63 61 75 do this.** becau
2850: 73 65 20 77 65 20 61 72 65 20 61 6c 73 6f 20 68 se we are also h
2860: 6f 6c 64 69 6e 67 20 61 20 6c 6f 63 6b 20 6f 6e olding a lock on
2870: 20 74 68 65 20 6a 6f 75 72 6e 61 6c 2c 20 61 6e the journal, an
2880: 64 20 6e 6f 20 70 72 6f 63 65 73 73 0a 2a 2a 20 d no process.**
2890: 73 68 6f 75 6c 64 20 67 65 74 20 61 20 77 72 69 should get a wri
28a0: 74 65 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 64 te lock on the d
28b0: 61 74 61 62 61 73 65 20 77 69 74 68 6f 75 74 20 atabase without
28c0: 66 69 72 73 74 20 67 65 74 74 69 6e 67 20 61 20 first getting a
28d0: 6c 6f 63 6b 0a 2a 2a 20 6f 6e 20 74 68 65 20 6a lock.** on the j
28e0: 6f 75 72 6e 61 6c 2e 20 20 53 6f 20 74 68 69 73 ournal. So this
28f0: 20 72 6f 75 74 69 6e 65 20 73 68 6f 75 6c 64 20 routine should
2900: 6e 65 76 65 72 20 66 61 69 6c 2e 20 20 42 75 74 never fail. But
2910: 20 69 74 20 63 61 6e 20 66 61 69 6c 0a 2a 2a 20 it can fail.**
2920: 69 66 20 61 6e 6f 74 68 65 72 20 70 72 6f 63 65 if another proce
2930: 73 73 20 69 73 20 6e 6f 74 20 70 6c 61 79 69 6e ss is not playin
2940: 67 20 62 79 20 74 68 65 20 72 75 6c 65 73 2e 20 g by the rules.
2950: 20 49 66 20 69 74 20 64 6f 65 73 20 66 61 69 6c If it does fail
2960: 2c 0a 2a 2a 20 61 6c 6c 20 69 6e 2d 6d 65 6d 6f ,.** all in-memo
2970: 72 79 20 63 61 63 68 65 20 70 61 67 65 73 20 61 ry cache pages a
2980: 72 65 20 69 6e 76 61 6c 69 64 61 74 65 64 2c 20 re invalidated,
2990: 74 68 65 20 50 41 47 45 52 5f 45 52 52 5f 4c 4f the PAGER_ERR_LO
29a0: 43 4b 20 62 69 74 0a 2a 2a 20 69 73 20 73 65 74 CK bit.** is set
29b0: 20 69 6e 20 70 50 61 67 65 72 2d 3e 65 72 72 4d in pPager->errM
29c0: 61 73 6b 2c 20 61 6e 64 20 74 68 69 73 20 72 6f ask, and this ro
29d0: 75 74 69 6e 65 20 72 65 74 75 72 6e 73 20 53 51 utine returns SQ
29e0: 4c 49 54 45 5f 50 52 4f 54 4f 43 4f 4c 2e 0a 2a LITE_PROTOCOL..*
29f0: 2a 20 53 51 4c 49 54 45 5f 4f 4b 20 69 73 20 72 * SQLITE_OK is r
2a00: 65 74 75 72 6e 65 64 20 6f 6e 20 73 75 63 63 65 eturned on succe
2a10: 73 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e ss..*/.static in
2a20: 74 20 70 61 67 65 72 5f 75 6e 77 72 69 74 65 6c t pager_unwritel
2a30: 6f 63 6b 28 50 61 67 65 72 20 2a 70 50 61 67 65 ock(Pager *pPage
2a40: 72 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 r){. int rc;.
2a50: 50 67 48 64 72 20 2a 70 50 67 3b 0a 20 20 69 66 PgHdr *pPg;. if
2a60: 28 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 21 ( pPager->state!
2a70: 3d 53 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 =SQLITE_WRITELOC
2a80: 4b 20 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 K ) return SQLIT
2a90: 45 5f 4f 4b 3b 0a 20 20 70 61 67 65 72 5f 75 6e E_OK;. pager_un
2aa0: 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 64 29 lock(pPager->fd)
2ab0: 3b 0a 20 20 72 63 20 3d 20 70 61 67 65 72 5f 6c ;. rc = pager_l
2ac0: 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 64 2c 20 ock(pPager->fd,
2ad0: 30 29 3b 0a 20 20 75 6e 6c 69 6e 6b 28 70 50 61 0);. unlink(pPa
2ae0: 67 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c 29 3b 0a ger->zJournal);.
2af0: 20 20 63 6c 6f 73 65 28 70 50 61 67 65 72 2d 3e close(pPager->
2b00: 6a 66 64 29 3b 0a 20 20 70 50 61 67 65 72 2d 3e jfd);. pPager->
2b10: 6a 66 64 20 3d 20 2d 31 3b 0a 20 20 66 6f 72 28 jfd = -1;. for(
2b20: 70 50 67 3d 70 50 61 67 65 72 2d 3e 70 41 6c 6c pPg=pPager->pAll
2b30: 3b 20 70 50 67 3b 20 70 50 67 3d 70 50 67 2d 3e ; pPg; pPg=pPg->
2b40: 70 4e 65 78 74 41 6c 6c 29 7b 0a 20 20 20 20 70 pNextAll){. p
2b50: 50 67 2d 3e 69 6e 4a 6f 75 72 6e 61 6c 20 3d 20 Pg->inJournal =
2b60: 30 3b 0a 20 20 20 20 70 50 67 2d 3e 64 69 72 74 0;. pPg->dirt
2b70: 79 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 y = 0;. }. if(
2b80: 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 rc!=SQLITE_OK )
2b90: 7b 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 73 74 {. pPager->st
2ba0: 61 74 65 20 3d 20 53 51 4c 49 54 45 5f 55 4e 4c ate = SQLITE_UNL
2bb0: 4f 43 4b 3b 0a 20 20 20 20 72 63 20 3d 20 53 51 OCK;. rc = SQ
2bc0: 4c 49 54 45 5f 50 52 4f 54 4f 43 4f 4c 3b 0a 20 LITE_PROTOCOL;.
2bd0: 20 20 20 70 50 61 67 65 72 2d 3e 65 72 72 4d 61 pPager->errMa
2be0: 73 6b 20 7c 3d 20 50 41 47 45 52 5f 45 52 52 5f sk |= PAGER_ERR_
2bf0: 4c 4f 43 4b 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 LOCK;. }else{.
2c00: 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f rc = SQLITE_O
2c10: 4b 3b 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 73 K;. pPager->s
2c20: 74 61 74 65 20 3d 20 53 51 4c 49 54 45 5f 52 45 tate = SQLITE_RE
2c30: 41 44 4c 4f 43 4b 3b 0a 20 20 7d 0a 20 20 72 65 ADLOCK;. }. re
2c40: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a turn rc;.}../*.*
2c50: 2a 20 50 6c 61 79 62 61 63 6b 20 74 68 65 20 6a * Playback the j
2c60: 6f 75 72 6e 61 6c 20 61 6e 64 20 74 68 75 73 20 ournal and thus
2c70: 72 65 73 74 6f 72 65 20 74 68 65 20 64 61 74 61 restore the data
2c80: 62 61 73 65 20 66 69 6c 65 20 74 6f 0a 2a 2a 20 base file to.**
2c90: 74 68 65 20 73 74 61 74 65 20 69 74 20 77 61 73 the state it was
2ca0: 20 69 6e 20 62 65 66 6f 72 65 20 77 65 20 73 74 in before we st
2cb0: 61 72 74 65 64 20 6d 61 6b 69 6e 67 20 63 68 61 arted making cha
2cc0: 6e 67 65 73 2e 20 20 0a 2a 2a 0a 2a 2a 20 54 68 nges. .**.** Th
2cd0: 65 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 20 66 e journal file f
2ce0: 6f 72 6d 61 74 20 69 73 20 61 73 20 66 6f 6c 6c ormat is as foll
2cf0: 6f 77 73 3a 20 20 54 68 65 72 65 20 69 73 20 61 ows: There is a
2d00: 6e 20 69 6e 69 74 69 61 6c 0a 2a 2a 20 66 69 6c n initial.** fil
2d10: 65 2d 74 79 70 65 20 73 74 72 69 6e 67 20 66 6f e-type string fo
2d20: 72 20 73 61 6e 69 74 79 20 63 68 65 63 6b 69 6e r sanity checkin
2d30: 67 2e 20 20 54 68 65 6e 20 74 68 65 72 65 20 69 g. Then there i
2d40: 73 20 61 20 73 69 6e 67 6c 65 0a 2a 2a 20 50 67 s a single.** Pg
2d50: 6e 6f 20 6e 75 6d 62 65 72 20 77 68 69 63 68 20 no number which
2d60: 69 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 is the number of
2d70: 20 70 61 67 65 73 20 69 6e 20 74 68 65 20 64 61 pages in the da
2d80: 74 61 62 61 73 65 20 62 65 66 6f 72 65 0a 2a 2a tabase before.**
2d90: 20 63 68 61 6e 67 65 73 20 77 65 72 65 20 6d 61 changes were ma
2da0: 64 65 2e 20 20 54 68 65 20 64 61 74 61 62 61 73 de. The databas
2db0: 65 20 69 73 20 74 72 75 6e 63 61 74 65 64 20 74 e is truncated t
2dc0: 6f 20 74 68 69 73 20 73 69 7a 65 2e 0a 2a 2a 20 o this size..**
2dd0: 4e 65 78 74 20 63 6f 6d 65 20 7a 65 72 6f 20 6f Next come zero o
2de0: 72 20 6d 6f 72 65 20 70 61 67 65 20 72 65 63 6f r more page reco
2df0: 72 64 73 20 77 68 65 72 65 20 65 61 63 68 20 70 rds where each p
2e00: 61 67 65 20 72 65 63 6f 72 64 0a 2a 2a 20 63 6f age record.** co
2e10: 6e 73 69 73 74 73 20 6f 66 20 61 20 50 67 6e 6f nsists of a Pgno
2e20: 20 61 6e 64 20 53 51 4c 49 54 45 5f 50 41 47 45 and SQLITE_PAGE
2e30: 5f 53 49 5a 45 20 62 79 74 65 73 20 6f 66 20 64 _SIZE bytes of d
2e40: 61 74 61 2e 20 20 53 65 65 0a 2a 2a 20 74 68 65 ata. See.** the
2e50: 20 50 61 67 65 52 65 63 6f 72 64 20 73 74 72 75 PageRecord stru
2e60: 63 74 75 72 65 20 66 6f 72 20 64 65 74 61 69 6c cture for detail
2e70: 73 2e 0a 2a 2a 0a 2a 2a 20 46 6f 72 20 70 6c 61 s..**.** For pla
2e80: 79 62 61 63 6b 2c 20 74 68 65 20 70 61 67 65 73 yback, the pages
2e90: 20 68 61 76 65 20 74 6f 20 62 65 20 72 65 61 64 have to be read
2ea0: 20 66 72 6f 6d 20 74 68 65 20 6a 6f 75 72 6e 61 from the journa
2eb0: 6c 20 69 6e 0a 2a 2a 20 72 65 76 65 72 73 65 20 l in.** reverse
2ec0: 6f 72 64 65 72 20 61 6e 64 20 70 75 74 20 62 61 order and put ba
2ed0: 63 6b 20 69 6e 74 6f 20 74 68 65 20 6f 72 69 67 ck into the orig
2ee0: 69 6e 61 6c 20 64 61 74 61 62 61 73 65 20 66 69 inal database fi
2ef0: 6c 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 le..**.** If the
2f00: 20 66 69 6c 65 20 6f 70 65 6e 65 64 20 61 73 20 file opened as
2f10: 74 68 65 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 the journal file
2f20: 20 69 73 20 6e 6f 74 20 61 20 77 65 6c 6c 2d 66 is not a well-f
2f30: 6f 72 6d 65 64 0a 2a 2a 20 6a 6f 75 72 6e 61 6c ormed.** journal
2f40: 20 66 69 6c 65 20 28 61 73 20 64 65 74 65 72 6d file (as determ
2f50: 69 6e 65 64 20 62 79 20 6c 6f 6f 6b 69 6e 67 20 ined by looking
2f60: 61 74 20 74 68 65 20 6d 61 67 69 63 20 6e 75 6d at the magic num
2f70: 62 65 72 0a 2a 2a 20 61 74 20 74 68 65 20 62 65 ber.** at the be
2f80: 67 69 6e 6e 69 6e 67 29 20 74 68 65 6e 20 74 68 ginning) then th
2f90: 69 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 is routine retur
2fa0: 6e 73 20 53 51 4c 49 54 45 5f 50 52 4f 54 4f 43 ns SQLITE_PROTOC
2fb0: 4f 4c 2e 0a 2a 2a 20 49 66 20 61 6e 79 20 6f 74 OL..** If any ot
2fc0: 68 65 72 20 65 72 72 6f 72 73 20 6f 63 63 75 72 her errors occur
2fd0: 20 64 75 72 69 6e 67 20 70 6c 61 79 62 61 63 6b during playback
2fe0: 2c 20 74 68 65 20 64 61 74 61 62 61 73 65 20 77 , the database w
2ff0: 69 6c 6c 0a 2a 2a 20 6c 69 6b 65 6c 79 20 62 65 ill.** likely be
3000: 20 63 6f 72 72 75 70 74 65 64 2c 20 73 6f 20 74 corrupted, so t
3010: 68 65 20 50 41 47 45 52 5f 45 52 52 5f 43 4f 52 he PAGER_ERR_COR
3020: 52 55 50 54 20 62 69 74 20 69 73 20 73 65 74 20 RUPT bit is set
3030: 69 6e 0a 2a 2a 20 70 50 61 67 65 72 2d 3e 65 72 in.** pPager->er
3040: 72 4d 61 73 6b 20 61 6e 64 20 53 51 4c 49 54 45 rMask and SQLITE
3050: 5f 43 4f 52 52 55 50 54 20 69 73 20 72 65 74 75 _CORRUPT is retu
3060: 72 6e 65 64 2e 20 20 49 66 20 69 74 20 61 6c 6c rned. If it all
3070: 0a 2a 2a 20 77 6f 72 6b 73 2c 20 74 68 65 6e 20 .** works, then
3080: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 65 74 this routine ret
3090: 75 72 6e 73 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a urns SQLITE_OK..
30a0: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 70 61 */.static int pa
30b0: 67 65 72 5f 70 6c 61 79 62 61 63 6b 28 50 61 67 ger_playback(Pag
30c0: 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 69 er *pPager){. i
30d0: 6e 74 20 6e 52 65 63 3b 20 20 20 20 20 20 20 20 nt nRec;
30e0: 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 /* Numbe
30f0: 72 20 6f 66 20 52 65 63 6f 72 64 73 20 2a 2f 0a r of Records */.
3100: 20 20 69 6e 74 20 69 3b 20 20 20 20 20 20 20 20 int i;
3110: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f /* Lo
3120: 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a 20 20 op counter */.
3130: 50 67 6e 6f 20 6d 78 50 67 20 3d 20 30 3b 20 20 Pgno mxPg = 0;
3140: 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69 7a 65 /* Size
3150: 20 6f 66 20 74 68 65 20 6f 72 69 67 69 6e 61 6c of the original
3160: 20 66 69 6c 65 20 69 6e 20 70 61 67 65 73 20 2a file in pages *
3170: 2f 0a 20 20 73 74 72 75 63 74 20 73 74 61 74 20 /. struct stat
3180: 73 74 61 74 62 75 66 3b 20 20 20 20 20 2f 2a 20 statbuf; /*
3190: 55 73 65 64 20 74 6f 20 73 69 7a 65 20 74 68 65 Used to size the
31a0: 20 6a 6f 75 72 6e 61 6c 20 2a 2f 0a 20 20 50 67 journal */. Pg
31b0: 48 64 72 20 2a 70 50 67 3b 20 20 20 20 20 20 20 Hdr *pPg;
31c0: 20 20 20 20 20 20 20 2f 2a 20 41 6e 20 65 78 69 /* An exi
31d0: 73 74 69 6e 67 20 70 61 67 65 20 69 6e 20 74 68 sting page in th
31e0: 65 20 63 61 63 68 65 20 2a 2f 0a 20 20 50 61 67 e cache */. Pag
31f0: 65 52 65 63 6f 72 64 20 70 67 52 65 63 3b 0a 20 eRecord pgRec;.
3200: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 61 unsigned char a
3210: 4d 61 67 69 63 5b 73 69 7a 65 6f 66 28 61 4a 6f Magic[sizeof(aJo
3220: 75 72 6e 61 6c 4d 61 67 69 63 29 5d 3b 0a 20 20 urnalMagic)];.
3230: 69 6e 74 20 72 63 3b 0a 0a 20 20 2f 2a 20 52 65 int rc;.. /* Re
3240: 61 64 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 ad the beginning
3250: 20 6f 66 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 of the journal
3260: 61 6e 64 20 74 72 75 6e 63 61 74 65 20 74 68 65 and truncate the
3270: 0a 20 20 2a 2a 20 64 61 74 61 62 61 73 65 20 66 . ** database f
3280: 69 6c 65 20 62 61 63 6b 20 74 6f 20 69 74 73 20 ile back to its
3290: 6f 72 69 67 69 6e 61 6c 20 73 69 7a 65 2e 0a 20 original size..
32a0: 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 70 50 */. assert( pP
32b0: 61 67 65 72 2d 3e 6a 66 64 3e 3d 30 20 29 3b 0a ager->jfd>=0 );.
32c0: 20 20 70 61 67 65 72 5f 73 65 65 6b 28 70 50 61 pager_seek(pPa
32d0: 67 65 72 2d 3e 6a 66 64 2c 20 30 29 3b 0a 20 20 ger->jfd, 0);.
32e0: 72 63 20 3d 20 70 61 67 65 72 5f 72 65 61 64 28 rc = pager_read(
32f0: 70 50 61 67 65 72 2d 3e 6a 66 64 2c 20 61 4d 61 pPager->jfd, aMa
3300: 67 69 63 2c 20 73 69 7a 65 6f 66 28 61 4d 61 67 gic, sizeof(aMag
3310: 69 63 29 29 3b 0a 20 20 69 66 28 20 72 63 21 3d ic));. if( rc!=
3320: 53 51 4c 49 54 45 5f 4f 4b 20 7c 7c 20 6d 65 6d SQLITE_OK || mem
3330: 63 6d 70 28 61 4d 61 67 69 63 2c 61 4a 6f 75 72 cmp(aMagic,aJour
3340: 6e 61 6c 4d 61 67 69 63 2c 73 69 7a 65 6f 66 28 nalMagic,sizeof(
3350: 61 4d 61 67 69 63 29 29 21 3d 30 20 29 7b 0a 20 aMagic))!=0 ){.
3360: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 return SQLITE
3370: 5f 50 52 4f 54 4f 43 4f 4c 3b 0a 20 20 7d 0a 20 _PROTOCOL;. }.
3380: 20 72 63 20 3d 20 70 61 67 65 72 5f 72 65 61 64 rc = pager_read
3390: 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c 20 26 6d (pPager->jfd, &m
33a0: 78 50 67 2c 20 73 69 7a 65 6f 66 28 6d 78 50 67 xPg, sizeof(mxPg
33b0: 29 29 3b 0a 20 20 69 66 28 20 72 63 21 3d 53 51 ));. if( rc!=SQ
33c0: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 72 LITE_OK ){. r
33d0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 50 52 4f eturn SQLITE_PRO
33e0: 54 4f 43 4f 4c 3b 0a 20 20 7d 0a 20 20 70 61 67 TOCOL;. }. pag
33f0: 65 72 5f 74 72 75 6e 63 61 74 65 28 70 50 61 67 er_truncate(pPag
3400: 65 72 2d 3e 66 64 2c 20 6d 78 50 67 29 3b 0a 20 er->fd, mxPg);.
3410: 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 20 pPager->dbSize
3420: 3d 20 6d 78 50 67 3b 0a 20 20 0a 20 20 2f 2a 20 = mxPg;. . /*
3430: 42 65 67 69 6e 20 72 65 61 64 69 6e 67 20 74 68 Begin reading th
3440: 65 20 6a 6f 75 72 6e 61 6c 20 62 65 67 69 6e 6e e journal beginn
3450: 69 6e 67 20 61 74 20 74 68 65 20 65 6e 64 20 61 ing at the end a
3460: 6e 64 20 6d 6f 76 69 6e 67 0a 20 20 2a 2a 20 74 nd moving. ** t
3470: 6f 77 61 72 64 20 74 68 65 20 62 65 67 69 6e 6e oward the beginn
3480: 69 6e 67 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 ing.. */. if(
3490: 66 73 74 61 74 28 70 50 61 67 65 72 2d 3e 6a 66 fstat(pPager->jf
34a0: 64 2c 20 26 73 74 61 74 62 75 66 29 21 3d 30 20 d, &statbuf)!=0
34b0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 ){. return SQ
34c0: 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 20 20 6e LITE_OK;. }. n
34d0: 52 65 63 20 3d 20 28 73 74 61 74 62 75 66 2e 73 Rec = (statbuf.s
34e0: 74 5f 73 69 7a 65 20 2d 20 28 73 69 7a 65 6f 66 t_size - (sizeof
34f0: 28 61 4d 61 67 69 63 29 2b 73 69 7a 65 6f 66 28 (aMagic)+sizeof(
3500: 50 67 6e 6f 29 29 29 20 2f 20 73 69 7a 65 6f 66 Pgno))) / sizeof
3510: 28 50 61 67 65 52 65 63 6f 72 64 29 3b 0a 0a 20 (PageRecord);..
3520: 20 2f 2a 20 50 72 6f 63 65 73 73 20 73 65 67 6d /* Process segm
3530: 65 6e 74 73 20 62 65 67 69 6e 6e 69 6e 67 20 77 ents beginning w
3540: 69 74 68 20 74 68 65 20 6c 61 73 74 20 61 6e 64 ith the last and
3550: 20 77 6f 72 6b 69 6e 67 20 62 61 63 6b 77 61 72 working backwar
3560: 64 73 0a 20 20 2a 2a 20 74 6f 20 74 68 65 20 66 ds. ** to the f
3570: 69 72 73 74 2e 0a 20 20 2a 2f 0a 20 20 66 6f 72 irst.. */. for
3580: 28 69 3d 6e 52 65 63 2d 31 3b 20 69 3e 3d 30 3b (i=nRec-1; i>=0;
3590: 20 69 2d 2d 29 7b 0a 20 20 20 20 2f 2a 20 53 65 i--){. /* Se
35a0: 65 6b 20 74 6f 20 74 68 65 20 62 65 67 69 6e 6e ek to the beginn
35b0: 69 6e 67 20 6f 66 20 74 68 65 20 73 65 67 6d 65 ing of the segme
35c0: 6e 74 20 2a 2f 0a 20 20 20 20 6f 66 66 5f 74 20 nt */. off_t
35d0: 6f 66 73 74 3b 0a 20 20 20 20 6f 66 73 74 20 3d ofst;. ofst =
35e0: 20 69 2a 73 69 7a 65 6f 66 28 50 61 67 65 52 65 i*sizeof(PageRe
35f0: 63 6f 72 64 29 20 2b 20 73 69 7a 65 6f 66 28 61 cord) + sizeof(a
3600: 4d 61 67 69 63 29 20 2b 20 73 69 7a 65 6f 66 28 Magic) + sizeof(
3610: 50 67 6e 6f 29 3b 0a 20 20 20 20 72 63 20 3d 20 Pgno);. rc =
3620: 70 61 67 65 72 5f 73 65 65 6b 28 70 50 61 67 65 pager_seek(pPage
3630: 72 2d 3e 6a 66 64 2c 20 6f 66 73 74 29 3b 0a 20 r->jfd, ofst);.
3640: 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 if( rc!=SQLIT
3650: 45 5f 4f 4b 20 29 20 62 72 65 61 6b 3b 0a 20 20 E_OK ) break;.
3660: 20 20 72 63 20 3d 20 70 61 67 65 72 5f 72 65 61 rc = pager_rea
3670: 64 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c 20 26 d(pPager->jfd, &
3680: 70 67 52 65 63 2c 20 73 69 7a 65 6f 66 28 70 67 pgRec, sizeof(pg
3690: 52 65 63 29 29 3b 0a 20 20 20 20 69 66 28 20 72 Rec));. if( r
36a0: 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 20 62 c!=SQLITE_OK ) b
36b0: 72 65 61 6b 3b 0a 0a 20 20 20 20 2f 2a 20 53 61 reak;.. /* Sa
36c0: 6e 69 74 79 20 63 68 65 63 6b 69 6e 67 20 6f 6e nity checking on
36d0: 20 74 68 65 20 70 61 67 65 20 2a 2f 0a 20 20 20 the page */.
36e0: 20 69 66 28 20 70 67 52 65 63 2e 70 67 6e 6f 3e if( pgRec.pgno>
36f0: 6d 78 50 67 20 7c 7c 20 70 67 52 65 63 2e 70 67 mxPg || pgRec.pg
3700: 6e 6f 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 72 no==0 ){. r
3710: 63 20 3d 20 53 51 4c 49 54 45 5f 43 4f 52 52 55 c = SQLITE_CORRU
3720: 50 54 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b PT;. break;
3730: 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20 50 . }.. /* P
3740: 6c 61 79 62 61 63 6b 20 74 68 65 20 70 61 67 65 layback the page
3750: 2e 20 20 55 70 64 61 74 65 20 74 68 65 20 69 6e . Update the in
3760: 2d 6d 65 6d 6f 72 79 20 63 6f 70 79 20 6f 66 20 -memory copy of
3770: 74 68 65 20 70 61 67 65 0a 20 20 20 20 2a 2a 20 the page. **
3780: 61 74 20 74 68 65 20 73 61 6d 65 20 74 69 6d 65 at the same time
3790: 2c 20 69 66 20 74 68 65 72 65 20 69 73 20 6f 6e , if there is on
37a0: 65 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 70 50 e.. */. pP
37b0: 67 20 3d 20 70 61 67 65 72 5f 6c 6f 6f 6b 75 70 g = pager_lookup
37c0: 28 70 50 61 67 65 72 2c 20 70 67 52 65 63 2e 70 (pPager, pgRec.p
37d0: 67 6e 6f 29 3b 0a 20 20 20 20 69 66 28 20 70 50 gno);. if( pP
37e0: 67 20 29 7b 0a 20 20 20 20 20 20 6d 65 6d 63 70 g ){. memcp
37f0: 79 28 50 47 48 44 52 5f 54 4f 5f 44 41 54 41 28 y(PGHDR_TO_DATA(
3800: 70 50 67 29 2c 20 70 67 52 65 63 2e 61 44 61 74 pPg), pgRec.aDat
3810: 61 2c 20 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 a, SQLITE_PAGE_S
3820: 49 5a 45 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 IZE);. }.
3830: 72 63 20 3d 20 70 61 67 65 72 5f 73 65 65 6b 28 rc = pager_seek(
3840: 70 50 61 67 65 72 2d 3e 66 64 2c 20 28 70 67 52 pPager->fd, (pgR
3850: 65 63 2e 70 67 6e 6f 2d 31 29 2a 53 51 4c 49 54 ec.pgno-1)*SQLIT
3860: 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 E_PAGE_SIZE);.
3870: 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 if( rc!=SQLITE
3880: 5f 4f 4b 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 _OK ) break;.
3890: 20 72 63 20 3d 20 70 61 67 65 72 5f 77 72 69 74 rc = pager_writ
38a0: 65 28 70 50 61 67 65 72 2d 3e 66 64 2c 20 70 67 e(pPager->fd, pg
38b0: 52 65 63 2e 61 44 61 74 61 2c 20 53 51 4c 49 54 Rec.aData, SQLIT
38c0: 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 E_PAGE_SIZE);.
38d0: 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 if( rc!=SQLITE
38e0: 5f 4f 4b 20 29 20 62 72 65 61 6b 3b 0a 20 20 7d _OK ) break;. }
38f0: 0a 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 . if( rc!=SQLIT
3900: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 70 61 67 65 E_OK ){. page
3910: 72 5f 75 6e 77 72 69 74 65 6c 6f 63 6b 28 70 50 r_unwritelock(pP
3920: 61 67 65 72 29 3b 0a 20 20 20 20 70 50 61 67 65 ager);. pPage
3930: 72 2d 3e 65 72 72 4d 61 73 6b 20 7c 3d 20 50 41 r->errMask |= PA
3940: 47 45 52 5f 45 52 52 5f 43 4f 52 52 55 50 54 3b GER_ERR_CORRUPT;
3950: 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 . rc = SQLITE
3960: 5f 43 4f 52 52 55 50 54 3b 0a 20 20 7d 65 6c 73 _CORRUPT;. }els
3970: 65 7b 0a 20 20 20 20 72 63 20 3d 20 70 61 67 65 e{. rc = page
3980: 72 5f 75 6e 77 72 69 74 65 6c 6f 63 6b 28 70 50 r_unwritelock(pP
3990: 61 67 65 72 29 3b 0a 20 20 7d 0a 20 20 72 65 74 ager);. }. ret
39a0: 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a urn rc;.}../*.**
39b0: 20 43 72 65 61 74 65 20 61 20 6e 65 77 20 70 61 Create a new pa
39c0: 67 65 20 63 61 63 68 65 20 61 6e 64 20 70 75 74 ge cache and put
39d0: 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 a pointer to th
39e0: 65 20 70 61 67 65 20 63 61 63 68 65 20 69 6e 20 e page cache in
39f0: 2a 70 70 50 61 67 65 72 2e 0a 2a 2a 20 54 68 65 *ppPager..** The
3a00: 20 66 69 6c 65 20 74 6f 20 62 65 20 63 61 63 68 file to be cach
3a10: 65 64 20 6e 65 65 64 20 6e 6f 74 20 65 78 69 73 ed need not exis
3a20: 74 2e 20 20 54 68 65 20 66 69 6c 65 20 69 73 20 t. The file is
3a30: 6e 6f 74 20 6f 70 65 6e 65 64 20 75 6e 74 69 6c not opened until
3a40: 0a 2a 2a 20 74 68 65 20 66 69 72 73 74 20 63 61 .** the first ca
3a50: 6c 6c 20 74 6f 20 73 71 6c 69 74 65 70 61 67 65 ll to sqlitepage
3a60: 72 5f 67 65 74 28 29 20 61 6e 64 20 69 73 20 6f r_get() and is o
3a70: 6e 6c 79 20 68 65 6c 64 20 6f 70 65 6e 20 75 6e nly held open un
3a80: 74 69 6c 20 74 68 65 0a 2a 2a 20 6c 61 73 74 20 til the.** last
3a90: 70 61 67 65 20 69 73 20 72 65 6c 65 61 73 65 64 page is released
3aa0: 20 75 73 69 6e 67 20 73 71 6c 69 74 65 70 61 67 using sqlitepag
3ab0: 65 72 5f 75 6e 72 65 66 28 29 2e 0a 2a 2f 0a 69 er_unref()..*/.i
3ac0: 6e 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 6f nt sqlitepager_o
3ad0: 70 65 6e 28 0a 20 20 50 61 67 65 72 20 2a 2a 70 pen(. Pager **p
3ae0: 70 50 61 67 65 72 2c 20 20 20 20 20 20 20 20 20 pPager,
3af0: 2f 2a 20 52 65 74 75 72 6e 20 74 68 65 20 50 61 /* Return the Pa
3b00: 67 65 72 20 73 74 72 75 63 74 75 72 65 20 68 65 ger structure he
3b10: 72 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 re */. const ch
3b20: 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 20 ar *zFilename,
3b30: 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 /* Name of the
3b40: 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 74 6f database file to
3b50: 20 6f 70 65 6e 20 2a 2f 0a 20 20 69 6e 74 20 6d open */. int m
3b60: 78 50 61 67 65 2c 20 20 20 20 20 20 20 20 20 20 xPage,
3b70: 20 20 20 20 2f 2a 20 4d 61 78 20 6e 75 6d 62 65 /* Max numbe
3b80: 72 20 6f 66 20 69 6e 2d 6d 65 6d 6f 72 79 20 63 r of in-memory c
3b90: 61 63 68 65 20 70 61 67 65 73 20 2a 2f 0a 20 20 ache pages */.
3ba0: 69 6e 74 20 6e 45 78 74 72 61 20 20 20 20 20 20 int nExtra
3bb0: 20 20 20 20 20 20 20 20 20 2f 2a 20 45 78 74 72 /* Extr
3bc0: 61 20 62 79 74 65 73 20 61 70 70 65 6e 64 20 74 a bytes append t
3bd0: 6f 20 65 61 63 68 20 69 6e 2d 6d 65 6d 6f 72 79 o each in-memory
3be0: 20 70 61 67 65 20 2a 2f 0a 29 7b 0a 20 20 50 61 page */.){. Pa
3bf0: 67 65 72 20 2a 70 50 61 67 65 72 3b 0a 20 20 69 ger *pPager;. i
3c00: 6e 74 20 6e 61 6d 65 4c 65 6e 3b 0a 20 20 69 6e nt nameLen;. in
3c10: 74 20 66 64 3b 0a 0a 20 20 2a 70 70 50 61 67 65 t fd;.. *ppPage
3c20: 72 20 3d 20 30 3b 0a 20 20 69 66 28 20 73 71 6c r = 0;. if( sql
3c30: 69 74 65 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 ite_malloc_faile
3c40: 64 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 d ){. return
3c50: 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 SQLITE_NOMEM;.
3c60: 7d 0a 20 20 66 64 20 3d 20 6f 70 65 6e 28 7a 46 }. fd = open(zF
3c70: 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 57 52 7c ilename, O_RDWR|
3c80: 4f 5f 43 52 45 41 54 2c 20 30 36 34 34 29 3b 0a O_CREAT, 0644);.
3c90: 20 20 69 66 28 20 66 64 3c 30 20 29 7b 0a 20 20 if( fd<0 ){.
3ca0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
3cb0: 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 CANTOPEN;. }.
3cc0: 6e 61 6d 65 4c 65 6e 20 3d 20 73 74 72 6c 65 6e nameLen = strlen
3cd0: 28 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 70 (zFilename);. p
3ce0: 50 61 67 65 72 20 3d 20 73 71 6c 69 74 65 4d 61 Pager = sqliteMa
3cf0: 6c 6c 6f 63 28 20 73 69 7a 65 6f 66 28 2a 70 50 lloc( sizeof(*pP
3d00: 61 67 65 72 29 20 2b 20 6e 61 6d 65 4c 65 6e 2a ager) + nameLen*
3d10: 32 20 2b 20 33 30 20 29 3b 0a 20 20 69 66 28 20 2 + 30 );. if(
3d20: 70 50 61 67 65 72 3d 3d 30 20 29 7b 0a 20 20 20 pPager==0 ){.
3d30: 20 63 6c 6f 73 65 28 66 64 29 3b 0a 20 20 20 20 close(fd);.
3d40: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f return SQLITE_NO
3d50: 4d 45 4d 3b 0a 20 20 7d 0a 20 20 70 50 61 67 65 MEM;. }. pPage
3d60: 72 2d 3e 7a 46 69 6c 65 6e 61 6d 65 20 3d 20 28 r->zFilename = (
3d70: 63 68 61 72 2a 29 26 70 50 61 67 65 72 5b 31 5d char*)&pPager[1]
3d80: 3b 0a 20 20 70 50 61 67 65 72 2d 3e 7a 4a 6f 75 ;. pPager->zJou
3d90: 72 6e 61 6c 20 3d 20 26 70 50 61 67 65 72 2d 3e rnal = &pPager->
3da0: 7a 46 69 6c 65 6e 61 6d 65 5b 6e 61 6d 65 4c 65 zFilename[nameLe
3db0: 6e 2b 31 5d 3b 0a 20 20 73 74 72 63 70 79 28 70 n+1];. strcpy(p
3dc0: 50 61 67 65 72 2d 3e 7a 46 69 6c 65 6e 61 6d 65 Pager->zFilename
3dd0: 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 , zFilename);.
3de0: 73 74 72 63 70 79 28 70 50 61 67 65 72 2d 3e 7a strcpy(pPager->z
3df0: 4a 6f 75 72 6e 61 6c 2c 20 7a 46 69 6c 65 6e 61 Journal, zFilena
3e00: 6d 65 29 3b 0a 20 20 73 74 72 63 70 79 28 26 70 me);. strcpy(&p
3e10: 50 61 67 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c 5b Pager->zJournal[
3e20: 6e 61 6d 65 4c 65 6e 5d 2c 20 22 2d 6a 6f 75 72 nameLen], "-jour
3e30: 6e 61 6c 22 29 3b 0a 20 20 70 50 61 67 65 72 2d nal");. pPager-
3e40: 3e 66 64 20 3d 20 66 64 3b 0a 20 20 70 50 61 67 >fd = fd;. pPag
3e50: 65 72 2d 3e 6a 66 64 20 3d 20 2d 31 3b 0a 20 20 er->jfd = -1;.
3e60: 70 50 61 67 65 72 2d 3e 6e 52 65 66 20 3d 20 30 pPager->nRef = 0
3e70: 3b 0a 20 20 70 50 61 67 65 72 2d 3e 64 62 53 69 ;. pPager->dbSi
3e80: 7a 65 20 3d 20 2d 31 3b 0a 20 20 70 50 61 67 65 ze = -1;. pPage
3e90: 72 2d 3e 6e 50 61 67 65 20 3d 20 30 3b 0a 20 20 r->nPage = 0;.
3ea0: 70 50 61 67 65 72 2d 3e 6d 78 50 61 67 65 20 3d pPager->mxPage =
3eb0: 20 6d 78 50 61 67 65 3e 35 20 3f 20 6d 78 50 61 mxPage>5 ? mxPa
3ec0: 67 65 20 3a 20 31 30 3b 0a 20 20 70 50 61 67 65 ge : 10;. pPage
3ed0: 72 2d 3e 73 74 61 74 65 20 3d 20 53 51 4c 49 54 r->state = SQLIT
3ee0: 45 5f 55 4e 4c 4f 43 4b 3b 0a 20 20 70 50 61 67 E_UNLOCK;. pPag
3ef0: 65 72 2d 3e 65 72 72 4d 61 73 6b 20 3d 20 30 3b er->errMask = 0;
3f00: 0a 20 20 70 50 61 67 65 72 2d 3e 70 46 69 72 73 . pPager->pFirs
3f10: 74 20 3d 20 30 3b 0a 20 20 70 50 61 67 65 72 2d t = 0;. pPager-
3f20: 3e 70 4c 61 73 74 20 3d 20 30 3b 0a 20 20 6d 65 >pLast = 0;. me
3f30: 6d 73 65 74 28 70 50 61 67 65 72 2d 3e 61 48 61 mset(pPager->aHa
3f40: 73 68 2c 20 30 2c 20 73 69 7a 65 6f 66 28 70 50 sh, 0, sizeof(pP
3f50: 61 67 65 72 2d 3e 61 48 61 73 68 29 29 3b 0a 20 ager->aHash));.
3f60: 20 2a 70 70 50 61 67 65 72 20 3d 20 70 50 61 67 *ppPager = pPag
3f70: 65 72 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c er;. return SQL
3f80: 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a ITE_OK;.}../*.**
3f90: 20 53 65 74 20 74 68 65 20 64 65 73 74 72 75 63 Set the destruc
3fa0: 74 6f 72 20 66 6f 72 20 74 68 69 73 20 70 61 67 tor for this pag
3fb0: 65 72 2e 20 20 49 66 20 6e 6f 74 20 4e 55 4c 4c er. If not NULL
3fc0: 2c 20 74 68 65 20 64 65 73 74 72 75 63 74 6f 72 , the destructor
3fd0: 20 69 73 20 63 61 6c 6c 65 64 0a 2a 2a 20 77 68 is called.** wh
3fe0: 65 6e 20 74 68 65 20 72 65 66 65 72 65 6e 63 65 en the reference
3ff0: 20 63 6f 75 6e 74 20 6f 6e 20 74 68 65 20 70 61 count on the pa
4000: 67 65 20 72 65 61 63 68 65 73 20 7a 65 72 6f 2e ge reaches zero.
4010: 20 20 0a 2a 2a 0a 2a 2a 20 54 68 65 20 64 65 73 .**.** The des
4020: 74 72 75 63 74 6f 72 20 69 73 20 6e 6f 74 20 63 tructor is not c
4030: 61 6c 6c 65 64 20 61 73 20 61 20 72 65 73 75 6c alled as a resul
4040: 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 63 6c t sqlitepager_cl
4050: 6f 73 65 28 29 2e 20 20 0a 2a 2a 20 44 65 73 74 ose(). .** Dest
4060: 72 75 63 74 6f 72 73 20 61 72 65 20 6f 6e 6c 79 ructors are only
4070: 20 63 61 6c 6c 65 64 20 62 79 20 73 71 6c 69 74 called by sqlit
4080: 65 70 61 67 65 72 5f 75 6e 72 65 66 28 29 2e 0a epager_unref()..
4090: 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 70 61 */.void sqlitepa
40a0: 67 65 72 5f 73 65 74 5f 64 65 73 74 72 75 63 74 ger_set_destruct
40b0: 6f 72 28 50 61 67 65 72 20 2a 70 50 61 67 65 72 or(Pager *pPager
40c0: 2c 20 76 6f 69 64 20 28 2a 78 44 65 73 63 29 28 , void (*xDesc)(
40d0: 76 6f 69 64 2a 29 29 7b 0a 20 20 70 50 61 67 65 void*)){. pPage
40e0: 72 2d 3e 78 44 65 73 74 72 75 63 74 6f 72 20 3d r->xDestructor =
40f0: 20 78 44 65 73 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a xDesc;.}../*.**
4100: 20 52 65 74 75 72 6e 20 74 68 65 20 74 6f 74 61 Return the tota
4110: 6c 20 6e 75 6d 62 65 72 20 6f 66 20 70 61 67 65 l number of page
4120: 73 20 69 6e 20 74 68 65 20 66 69 6c 65 20 6f 70 s in the file op
4130: 65 6e 65 64 20 62 79 20 70 50 61 67 65 72 2e 0a ened by pPager..
4140: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 70 61 67 */.int sqlitepag
4150: 65 72 5f 70 61 67 65 63 6f 75 6e 74 28 50 61 67 er_pagecount(Pag
4160: 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 20 69 er *pPager){. i
4170: 6e 74 20 6e 3b 0a 20 20 73 74 72 75 63 74 20 73 nt n;. struct s
4180: 74 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20 61 tat statbuf;. a
4190: 73 73 65 72 74 28 20 70 50 61 67 65 72 21 3d 30 ssert( pPager!=0
41a0: 20 29 3b 0a 20 20 69 66 28 20 70 50 61 67 65 72 );. if( pPager
41b0: 2d 3e 64 62 53 69 7a 65 3e 3d 30 20 29 7b 0a 20 ->dbSize>=0 ){.
41c0: 20 20 20 72 65 74 75 72 6e 20 70 50 61 67 65 72 return pPager
41d0: 2d 3e 64 62 53 69 7a 65 3b 0a 20 20 7d 0a 20 20 ->dbSize;. }.
41e0: 69 66 28 20 66 73 74 61 74 28 70 50 61 67 65 72 if( fstat(pPager
41f0: 2d 3e 66 64 2c 20 26 73 74 61 74 62 75 66 29 21 ->fd, &statbuf)!
4200: 3d 30 20 29 7b 0a 20 20 20 20 6e 20 3d 20 30 3b =0 ){. n = 0;
4210: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 6e 20 . }else{. n
4220: 3d 20 73 74 61 74 62 75 66 2e 73 74 5f 73 69 7a = statbuf.st_siz
4230: 65 2f 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 e/SQLITE_PAGE_SI
4240: 5a 45 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 50 ZE;. }. if( pP
4250: 61 67 65 72 2d 3e 73 74 61 74 65 21 3d 53 51 4c ager->state!=SQL
4260: 49 54 45 5f 55 4e 4c 4f 43 4b 20 29 7b 0a 20 20 ITE_UNLOCK ){.
4270: 20 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 pPager->dbSize
4280: 20 3d 20 6e 3b 0a 20 20 7d 0a 20 20 72 65 74 75 = n;. }. retu
4290: 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 rn n;.}../*.** S
42a0: 68 75 74 64 6f 77 6e 20 74 68 65 20 70 61 67 65 hutdown the page
42b0: 20 63 61 63 68 65 2e 20 20 46 72 65 65 20 61 6c cache. Free al
42c0: 6c 20 6d 65 6d 6f 72 79 20 61 6e 64 20 63 6c 6f l memory and clo
42d0: 73 65 20 61 6c 6c 20 66 69 6c 65 73 2e 0a 2a 2a se all files..**
42e0: 0a 2a 2a 20 49 66 20 61 20 74 72 61 6e 73 61 63 .** If a transac
42f0: 74 69 6f 6e 20 77 61 73 20 69 6e 20 70 72 6f 67 tion was in prog
4300: 72 65 73 73 20 77 68 65 6e 20 74 68 69 73 20 72 ress when this r
4310: 6f 75 74 69 6e 65 20 69 73 20 63 61 6c 6c 65 64 outine is called
4320: 2c 20 74 68 61 74 0a 2a 2a 20 74 72 61 6e 73 61 , that.** transa
4330: 63 74 69 6f 6e 20 69 73 20 72 6f 6c 6c 65 64 20 ction is rolled
4340: 62 61 63 6b 2e 20 20 41 6c 6c 20 6f 75 74 73 74 back. All outst
4350: 61 6e 64 69 6e 67 20 70 61 67 65 73 20 61 72 65 anding pages are
4360: 20 69 6e 76 61 6c 69 64 61 74 65 64 0a 2a 2a 20 invalidated.**
4370: 61 6e 64 20 74 68 65 69 72 20 6d 65 6d 6f 72 79 and their memory
4380: 20 69 73 20 66 72 65 65 64 2e 20 20 41 6e 79 20 is freed. Any
4390: 61 74 74 65 6d 70 74 20 74 6f 20 75 73 65 20 61 attempt to use a
43a0: 20 70 61 67 65 20 61 73 73 6f 63 69 61 74 65 64 page associated
43b0: 0a 2a 2a 20 77 69 74 68 20 74 68 69 73 20 70 61 .** with this pa
43c0: 67 65 20 63 61 63 68 65 20 61 66 74 65 72 20 74 ge cache after t
43d0: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 his function ret
43e0: 75 72 6e 73 20 77 69 6c 6c 20 6c 69 6b 65 6c 79 urns will likely
43f0: 0a 2a 2a 20 72 65 73 75 6c 74 20 69 6e 20 61 20 .** result in a
4400: 63 6f 72 65 64 75 6d 70 2e 0a 2a 2f 0a 69 6e 74 coredump..*/.int
4410: 20 73 71 6c 69 74 65 70 61 67 65 72 5f 63 6c 6f sqlitepager_clo
4420: 73 65 28 50 61 67 65 72 20 2a 70 50 61 67 65 72 se(Pager *pPager
4430: 29 7b 0a 20 20 50 67 48 64 72 20 2a 70 50 67 2c ){. PgHdr *pPg,
4440: 20 2a 70 4e 65 78 74 3b 0a 20 20 73 77 69 74 63 *pNext;. switc
4450: 68 28 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 h( pPager->state
4460: 20 29 7b 0a 20 20 20 20 63 61 73 65 20 53 51 4c ){. case SQL
4470: 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 3a 20 7b ITE_WRITELOCK: {
4480: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 70 61 67 . sqlitepag
4490: 65 72 5f 72 6f 6c 6c 62 61 63 6b 28 70 50 61 67 er_rollback(pPag
44a0: 65 72 29 3b 0a 20 20 20 20 20 20 70 61 67 65 72 er);. pager
44b0: 5f 75 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e _unlock(pPager->
44c0: 66 64 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b fd);. break
44d0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61 73 65 ;. }. case
44e0: 20 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f 43 4b SQLITE_READLOCK
44f0: 3a 20 7b 0a 20 20 20 20 20 20 70 61 67 65 72 5f : {. pager_
4500: 75 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 unlock(pPager->f
4510: 64 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b d);. break;
4520: 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 66 61 75 . }. defau
4530: 6c 74 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20 44 lt: {. /* D
4540: 6f 20 6e 6f 74 68 69 6e 67 20 2a 2f 0a 20 20 20 o nothing */.
4550: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a break;. }.
4560: 20 20 7d 0a 20 20 66 6f 72 28 70 50 67 3d 70 50 }. for(pPg=pP
4570: 61 67 65 72 2d 3e 70 41 6c 6c 3b 20 70 50 67 3b ager->pAll; pPg;
4580: 20 70 50 67 3d 70 4e 65 78 74 29 7b 0a 20 20 20 pPg=pNext){.
4590: 20 70 4e 65 78 74 20 3d 20 70 50 67 2d 3e 70 4e pNext = pPg->pN
45a0: 65 78 74 41 6c 6c 3b 0a 20 20 20 20 73 71 6c 69 extAll;. sqli
45b0: 74 65 46 72 65 65 28 70 50 67 29 3b 0a 20 20 7d teFree(pPg);. }
45c0: 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 66 . if( pPager->f
45d0: 64 3e 3d 30 20 29 20 63 6c 6f 73 65 28 70 50 61 d>=0 ) close(pPa
45e0: 67 65 72 2d 3e 66 64 29 3b 0a 20 20 61 73 73 65 ger->fd);. asse
45f0: 72 74 28 20 70 50 61 67 65 72 2d 3e 6a 66 64 3c rt( pPager->jfd<
4600: 30 20 29 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 0 );. sqliteFre
4610: 65 28 70 50 61 67 65 72 29 3b 0a 20 20 72 65 74 e(pPager);. ret
4620: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d urn SQLITE_OK;.}
4630: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 ../*.** Return t
4640: 68 65 20 70 61 67 65 20 6e 75 6d 62 65 72 20 66 he page number f
4650: 6f 72 20 74 68 65 20 67 69 76 65 6e 20 70 61 67 or the given pag
4660: 65 20 64 61 74 61 0a 2a 2f 0a 50 67 6e 6f 20 73 e data.*/.Pgno s
4670: 71 6c 69 74 65 70 61 67 65 72 5f 70 61 67 65 6e qlitepager_pagen
4680: 75 6d 62 65 72 28 76 6f 69 64 20 2a 70 44 61 74 umber(void *pDat
4690: 61 29 7b 0a 20 20 50 67 48 64 72 20 2a 70 20 3d a){. PgHdr *p =
46a0: 20 44 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 DATA_TO_PGHDR(p
46b0: 44 61 74 61 29 3b 0a 20 20 72 65 74 75 72 6e 20 Data);. return
46c0: 70 2d 3e 70 67 6e 6f 3b 0a 7d 0a 0a 2f 2a 0a 2a p->pgno;.}../*.*
46d0: 2a 20 49 6e 63 72 65 6d 65 6e 74 20 74 68 65 20 * Increment the
46e0: 72 65 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 reference count
46f0: 66 6f 72 20 61 20 70 61 67 65 2e 20 20 49 66 20 for a page. If
4700: 74 68 65 20 70 61 67 65 20 69 73 0a 2a 2a 20 63 the page is.** c
4710: 75 72 72 65 6e 74 6c 79 20 6f 6e 20 74 68 65 20 urrently on the
4720: 66 72 65 65 6c 69 73 74 20 28 74 68 65 20 72 65 freelist (the re
4730: 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 69 73 ference count is
4740: 20 7a 65 72 6f 29 20 74 68 65 6e 0a 2a 2a 20 72 zero) then.** r
4750: 65 6d 6f 76 65 20 69 74 20 66 72 6f 6d 20 74 68 emove it from th
4760: 65 20 66 72 65 65 6c 69 73 74 2e 0a 2a 2f 0a 73 e freelist..*/.s
4770: 74 61 74 69 63 20 76 6f 69 64 20 70 61 67 65 5f tatic void page_
4780: 72 65 66 28 50 67 48 64 72 20 2a 70 50 67 29 7b ref(PgHdr *pPg){
4790: 0a 20 20 69 66 28 20 70 50 67 2d 3e 6e 52 65 66 . if( pPg->nRef
47a0: 3d 3d 30 20 29 7b 0a 20 20 20 20 2f 2a 20 54 68 ==0 ){. /* Th
47b0: 65 20 70 61 67 65 20 69 73 20 63 75 72 72 65 6e e page is curren
47c0: 74 6c 79 20 6f 6e 20 74 68 65 20 66 72 65 65 6c tly on the freel
47d0: 69 73 74 2e 20 20 52 65 6d 6f 76 65 20 69 74 2e ist. Remove it.
47e0: 20 2a 2f 0a 20 20 20 20 69 66 28 20 70 50 67 2d */. if( pPg-
47f0: 3e 70 50 72 65 76 46 72 65 65 20 29 7b 0a 20 20 >pPrevFree ){.
4800: 20 20 20 20 70 50 67 2d 3e 70 50 72 65 76 46 72 pPg->pPrevFr
4810: 65 65 2d 3e 70 4e 65 78 74 46 72 65 65 20 3d 20 ee->pNextFree =
4820: 70 50 67 2d 3e 70 4e 65 78 74 46 72 65 65 3b 0a pPg->pNextFree;.
4830: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
4840: 20 70 50 67 2d 3e 70 50 61 67 65 72 2d 3e 70 46 pPg->pPager->pF
4850: 69 72 73 74 20 3d 20 70 50 67 2d 3e 70 4e 65 78 irst = pPg->pNex
4860: 74 46 72 65 65 3b 0a 20 20 20 20 7d 0a 20 20 20 tFree;. }.
4870: 20 69 66 28 20 70 50 67 2d 3e 70 4e 65 78 74 46 if( pPg->pNextF
4880: 72 65 65 20 29 7b 0a 20 20 20 20 20 20 70 50 67 ree ){. pPg
4890: 2d 3e 70 4e 65 78 74 46 72 65 65 2d 3e 70 50 72 ->pNextFree->pPr
48a0: 65 76 46 72 65 65 20 3d 20 70 50 67 2d 3e 70 50 evFree = pPg->pP
48b0: 72 65 76 46 72 65 65 3b 0a 20 20 20 20 7d 65 6c revFree;. }el
48c0: 73 65 7b 0a 20 20 20 20 20 20 70 50 67 2d 3e 70 se{. pPg->p
48d0: 50 61 67 65 72 2d 3e 70 4c 61 73 74 20 3d 20 70 Pager->pLast = p
48e0: 50 67 2d 3e 70 50 72 65 76 46 72 65 65 3b 0a 20 Pg->pPrevFree;.
48f0: 20 20 20 7d 0a 20 20 20 20 70 50 67 2d 3e 70 50 }. pPg->pP
4900: 61 67 65 72 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20 ager->nRef++;.
4910: 7d 0a 20 20 70 50 67 2d 3e 6e 52 65 66 2b 2b 3b }. pPg->nRef++;
4920: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 63 72 65 6d .}../*.** Increm
4930: 65 6e 74 20 74 68 65 20 72 65 66 65 72 65 6e 63 ent the referenc
4940: 65 20 63 6f 75 6e 74 20 66 6f 72 20 61 20 70 61 e count for a pa
4950: 67 65 2e 20 20 54 68 65 20 69 6e 70 75 74 20 70 ge. The input p
4960: 6f 69 6e 74 65 72 20 69 73 0a 2a 2a 20 61 20 72 ointer is.** a r
4970: 65 66 65 72 65 6e 63 65 20 74 6f 20 74 68 65 20 eference to the
4980: 70 61 67 65 20 64 61 74 61 2e 0a 2a 2f 0a 69 6e page data..*/.in
4990: 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 72 65 t sqlitepager_re
49a0: 66 28 76 6f 69 64 20 2a 70 44 61 74 61 29 7b 0a f(void *pData){.
49b0: 20 20 50 67 48 64 72 20 2a 70 50 67 20 3d 20 44 PgHdr *pPg = D
49c0: 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 44 61 ATA_TO_PGHDR(pDa
49d0: 74 61 29 3b 0a 20 20 70 61 67 65 5f 72 65 66 28 ta);. page_ref(
49e0: 70 50 67 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 pPg);. return S
49f0: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a QLITE_OK;.}../*.
4a00: 2a 2a 20 41 63 71 75 69 72 65 20 61 20 70 61 67 ** Acquire a pag
4a10: 65 2e 0a 2a 2a 0a 2a 2a 20 41 20 72 65 61 64 20 e..**.** A read
4a20: 6c 6f 63 6b 20 69 73 20 6f 62 74 61 69 6e 65 64 lock is obtained
4a30: 20 66 6f 72 20 74 68 65 20 66 69 72 73 74 20 70 for the first p
4a40: 61 67 65 20 61 63 71 75 69 72 65 64 2e 20 20 54 age acquired. T
4a50: 68 65 20 6c 6f 63 6b 0a 2a 2a 20 69 73 20 64 72 he lock.** is dr
4a60: 6f 70 70 65 64 20 77 68 65 6e 20 74 68 65 20 6c opped when the l
4a70: 61 73 74 20 70 61 67 65 20 69 73 20 72 65 6c 65 ast page is rele
4a80: 61 73 65 64 2e 20 20 0a 2a 2a 0a 2a 2a 20 41 20 ased. .**.** A
4a90: 5f 67 65 74 20 77 6f 72 6b 73 20 66 6f 72 20 61 _get works for a
4aa0: 6e 79 20 70 61 67 65 20 6e 75 6d 62 65 72 20 67 ny page number g
4ab0: 72 65 61 74 65 72 20 74 68 61 6e 20 30 2e 20 20 reater than 0.
4ac0: 49 66 20 74 68 65 20 64 61 74 61 62 61 73 65 0a If the database.
4ad0: 2a 2a 20 66 69 6c 65 20 69 73 20 73 6d 61 6c 6c ** file is small
4ae0: 65 72 20 74 68 61 6e 20 74 68 65 20 72 65 71 75 er than the requ
4af0: 65 73 74 65 64 20 70 61 67 65 2c 20 74 68 65 6e ested page, then
4b00: 20 6e 6f 20 61 63 74 75 61 6c 20 64 69 73 6b 0a no actual disk.
4b10: 2a 2a 20 72 65 61 64 20 6f 63 63 75 72 73 20 61 ** read occurs a
4b20: 6e 64 20 74 68 65 20 6d 65 6d 6f 72 79 20 69 6d nd the memory im
4b30: 61 67 65 20 6f 66 20 74 68 65 20 70 61 67 65 20 age of the page
4b40: 69 73 20 69 6e 69 74 69 61 6c 69 7a 65 64 20 74 is initialized t
4b50: 6f 0a 2a 2a 20 61 6c 6c 20 7a 65 72 6f 73 2e 20 o.** all zeros.
4b60: 20 54 68 65 20 65 78 74 72 61 20 64 61 74 61 20 The extra data
4b70: 61 70 70 65 6e 64 65 64 20 74 6f 20 61 20 70 61 appended to a pa
4b80: 67 65 20 69 73 20 61 6c 77 61 79 73 20 69 6e 69 ge is always ini
4b90: 74 69 61 6c 69 7a 65 64 0a 2a 2a 20 74 6f 20 7a tialized.** to z
4ba0: 65 72 6f 73 20 74 68 65 20 66 69 72 73 74 20 74 eros the first t
4bb0: 69 6d 65 20 61 20 70 61 67 65 20 69 73 20 6c 6f ime a page is lo
4bc0: 61 64 65 64 20 69 6e 74 6f 20 6d 65 6d 6f 72 79 aded into memory
4bd0: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 63 71 75 ..**.** The acqu
4be0: 69 73 69 74 69 6f 6e 20 6d 69 67 68 74 20 66 61 isition might fa
4bf0: 69 6c 20 66 6f 72 20 73 65 76 65 72 61 6c 20 72 il for several r
4c00: 65 61 73 6f 6e 73 2e 20 20 49 6e 20 61 6c 6c 20 easons. In all
4c10: 63 61 73 65 73 2c 0a 2a 2a 20 61 6e 20 61 70 70 cases,.** an app
4c20: 72 6f 70 72 69 61 74 65 20 65 72 72 6f 72 20 63 ropriate error c
4c30: 6f 64 65 20 69 73 20 72 65 74 75 72 6e 65 64 20 ode is returned
4c40: 61 6e 64 20 2a 70 70 50 61 67 65 20 69 73 20 73 and *ppPage is s
4c50: 65 74 20 74 6f 20 4e 55 4c 4c 2e 0a 2a 2a 0a 2a et to NULL..**.*
4c60: 2a 20 53 65 65 20 61 6c 73 6f 20 73 71 6c 69 74 * See also sqlit
4c70: 65 70 61 67 65 72 5f 6c 6f 6f 6b 75 70 28 29 2e epager_lookup().
4c80: 20 20 42 6f 74 68 20 74 68 69 73 20 72 6f 75 74 Both this rout
4c90: 69 6e 65 20 61 6e 64 20 5f 6c 6f 6f 6b 75 70 28 ine and _lookup(
4ca0: 29 20 61 74 74 65 6d 70 74 0a 2a 2a 20 74 6f 20 ) attempt.** to
4cb0: 66 69 6e 64 20 61 20 70 61 67 65 20 69 6e 20 74 find a page in t
4cc0: 68 65 20 69 6e 2d 6d 65 6d 6f 72 79 20 63 61 63 he in-memory cac
4cd0: 68 65 20 66 69 72 73 74 2e 20 20 49 66 20 74 68 he first. If th
4ce0: 65 20 70 61 67 65 20 69 73 20 6e 6f 74 20 61 6c e page is not al
4cf0: 72 65 61 64 79 0a 2a 2a 20 69 6e 20 63 61 63 68 ready.** in cach
4d00: 65 2c 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 e, this routine
4d10: 67 6f 65 73 20 74 6f 20 64 69 73 6b 20 74 6f 20 goes to disk to
4d20: 72 65 61 64 20 69 74 20 69 6e 20 77 68 65 72 65 read it in where
4d30: 61 73 20 5f 6c 6f 6f 6b 75 70 28 29 0a 2a 2a 20 as _lookup().**
4d40: 6a 75 73 74 20 72 65 74 75 72 6e 73 20 30 2e 20 just returns 0.
4d50: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 61 63 This routine ac
4d60: 71 75 69 72 65 73 20 61 20 72 65 61 64 2d 6c 6f quires a read-lo
4d70: 63 6b 20 74 68 65 20 66 69 72 73 74 20 74 69 6d ck the first tim
4d80: 65 20 69 74 0a 2a 2a 20 68 61 73 20 74 6f 20 67 e it.** has to g
4d90: 6f 20 74 6f 20 64 69 73 6b 2c 20 61 6e 64 20 63 o to disk, and c
4da0: 6f 75 6c 64 20 61 6c 73 6f 20 70 6c 61 79 62 61 ould also playba
4db0: 63 6b 20 61 6e 20 6f 6c 64 20 6a 6f 75 72 6e 61 ck an old journa
4dc0: 6c 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e 0a l if necessary..
4dd0: 2a 2a 20 53 69 6e 63 65 20 5f 6c 6f 6f 6b 75 70 ** Since _lookup
4de0: 28 29 20 6e 65 76 65 72 20 67 6f 65 73 20 74 6f () never goes to
4df0: 20 64 69 73 6b 2c 20 69 74 20 6e 65 76 65 72 20 disk, it never
4e00: 68 61 73 20 74 6f 20 64 65 61 6c 20 77 69 74 68 has to deal with
4e10: 20 6c 6f 63 6b 73 0a 2a 2a 20 6f 72 20 6a 6f 75 locks.** or jou
4e20: 72 6e 61 6c 20 66 69 6c 65 73 2e 0a 2a 2f 0a 69 rnal files..*/.i
4e30: 6e 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 67 nt sqlitepager_g
4e40: 65 74 28 50 61 67 65 72 20 2a 70 50 61 67 65 72 et(Pager *pPager
4e50: 2c 20 50 67 6e 6f 20 70 67 6e 6f 2c 20 76 6f 69 , Pgno pgno, voi
4e60: 64 20 2a 2a 70 70 50 61 67 65 29 7b 0a 20 20 50 d **ppPage){. P
4e70: 67 48 64 72 20 2a 70 50 67 3b 0a 0a 20 20 2f 2a gHdr *pPg;.. /*
4e80: 20 4d 61 6b 65 20 73 75 72 65 20 77 65 20 68 61 Make sure we ha
4e90: 76 65 20 6e 6f 74 20 68 69 74 20 61 6e 79 20 63 ve not hit any c
4ea0: 72 69 74 69 63 61 6c 20 65 72 72 6f 72 73 2e 0a ritical errors..
4eb0: 20 20 2a 2f 20 0a 20 20 69 66 28 20 70 50 61 67 */ . if( pPag
4ec0: 65 72 3d 3d 30 20 7c 7c 20 70 67 6e 6f 3d 3d 30 er==0 || pgno==0
4ed0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 ){. return S
4ee0: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d QLITE_ERROR;. }
4ef0: 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 65 . if( pPager->e
4f00: 72 72 4d 61 73 6b 20 26 20 7e 28 50 41 47 45 52 rrMask & ~(PAGER
4f10: 5f 45 52 52 5f 46 55 4c 4c 29 20 29 7b 0a 20 20 _ERR_FULL) ){.
4f20: 20 20 72 65 74 75 72 6e 20 70 61 67 65 72 5f 65 return pager_e
4f30: 72 72 63 6f 64 65 28 70 50 61 67 65 72 29 3b 0a rrcode(pPager);.
4f40: 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 74 68 69 }.. /* If thi
4f50: 73 20 69 73 20 74 68 65 20 66 69 72 73 74 20 70 s is the first p
4f60: 61 67 65 20 61 63 63 65 73 73 65 64 2c 20 74 68 age accessed, th
4f70: 65 6e 20 67 65 74 20 61 20 72 65 61 64 20 6c 6f en get a read lo
4f80: 63 6b 0a 20 20 2a 2a 20 6f 6e 20 74 68 65 20 64 ck. ** on the d
4f90: 61 74 61 62 61 73 65 20 66 69 6c 65 2e 0a 20 20 atabase file..
4fa0: 2a 2f 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d */. if( pPager-
4fb0: 3e 6e 52 65 66 3d 3d 30 20 29 7b 0a 20 20 20 20 >nRef==0 ){.
4fc0: 69 66 28 20 70 61 67 65 72 5f 6c 6f 63 6b 28 70 if( pager_lock(p
4fd0: 50 61 67 65 72 2d 3e 66 64 2c 20 30 29 21 3d 30 Pager->fd, 0)!=0
4fe0: 20 29 7b 0a 20 20 20 20 20 20 2a 70 70 50 61 67 ){. *ppPag
4ff0: 65 20 3d 20 30 3b 0a 20 20 20 20 20 20 72 65 74 e = 0;. ret
5000: 75 72 6e 20 53 51 4c 49 54 45 5f 42 55 53 59 3b urn SQLITE_BUSY;
5010: 0a 20 20 20 20 7d 0a 20 20 20 20 70 50 61 67 65 . }. pPage
5020: 72 2d 3e 73 74 61 74 65 20 3d 20 53 51 4c 49 54 r->state = SQLIT
5030: 45 5f 52 45 41 44 4c 4f 43 4b 3b 0a 0a 20 20 20 E_READLOCK;..
5040: 20 2f 2a 20 49 66 20 61 20 6a 6f 75 72 6e 61 6c /* If a journal
5050: 20 66 69 6c 65 20 65 78 69 73 74 73 2c 20 74 72 file exists, tr
5060: 79 20 74 6f 20 70 6c 61 79 20 69 74 20 62 61 63 y to play it bac
5070: 6b 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69 66 k.. */. if
5080: 28 20 61 63 63 65 73 73 28 70 50 61 67 65 72 2d ( access(pPager-
5090: 3e 7a 4a 6f 75 72 6e 61 6c 2c 30 29 3d 3d 30 20 >zJournal,0)==0
50a0: 29 7b 0a 20 20 20 20 20 20 20 69 6e 74 20 72 63 ){. int rc
50b0: 3b 0a 0a 20 20 20 20 20 20 20 2f 2a 20 4f 70 65 ;.. /* Ope
50c0: 6e 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 66 6f n the journal fo
50d0: 72 20 65 78 63 6c 75 73 69 76 65 20 61 63 63 65 r exclusive acce
50e0: 73 73 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 ss. Return SQLI
50f0: 54 45 5f 42 55 53 59 20 69 66 0a 20 20 20 20 20 TE_BUSY if.
5100: 20 20 2a 2a 20 77 65 20 63 61 6e 6e 6f 74 20 67 ** we cannot g
5110: 65 74 20 65 78 63 6c 75 73 69 76 65 20 61 63 63 et exclusive acc
5120: 65 73 73 20 74 6f 20 74 68 65 20 6a 6f 75 72 6e ess to the journ
5130: 61 6c 20 66 69 6c 65 0a 20 20 20 20 20 20 20 2a al file. *
5140: 2f 0a 20 20 20 20 20 20 20 70 50 61 67 65 72 2d /. pPager-
5150: 3e 6a 66 64 20 3d 20 6f 70 65 6e 28 70 50 61 67 >jfd = open(pPag
5160: 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c 2c 20 4f 5f er->zJournal, O_
5170: 52 44 4f 4e 4c 59 2c 20 30 29 3b 0a 20 20 20 20 RDONLY, 0);.
5180: 20 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 6a if( pPager->j
5190: 66 64 3c 30 20 7c 7c 20 70 61 67 65 72 5f 6c 6f fd<0 || pager_lo
51a0: 63 6b 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c 20 ck(pPager->jfd,
51b0: 31 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 1)!=0 ){.
51c0: 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 6a 66 if( pPager->jf
51d0: 64 3e 3d 30 20 29 7b 20 63 6c 6f 73 65 28 70 50 d>=0 ){ close(pP
51e0: 61 67 65 72 2d 3e 6a 66 64 29 3b 20 70 50 61 67 ager->jfd); pPag
51f0: 65 72 2d 3e 6a 66 64 20 3d 20 2d 31 3b 20 7d 0a er->jfd = -1; }.
5200: 20 20 20 20 20 20 20 20 20 70 61 67 65 72 5f 75 pager_u
5210: 6e 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 64 nlock(pPager->fd
5220: 29 3b 0a 20 20 20 20 20 20 20 20 20 2a 70 70 50 );. *ppP
5230: 61 67 65 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 age = 0;.
5240: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
5250: 42 55 53 59 3b 0a 20 20 20 20 20 20 20 7d 0a 0a BUSY;. }..
5260: 20 20 20 20 20 20 20 2f 2a 20 47 65 74 20 61 20 /* Get a
5270: 77 72 69 74 65 20 6c 6f 63 6b 20 6f 6e 20 74 68 write lock on th
5280: 65 20 64 61 74 61 62 61 73 65 20 2a 2f 0a 20 20 e database */.
5290: 20 20 20 20 20 70 61 67 65 72 5f 75 6e 6c 6f 63 pager_unloc
52a0: 6b 28 70 50 61 67 65 72 2d 3e 66 64 29 3b 0a 20 k(pPager->fd);.
52b0: 20 20 20 20 20 20 69 66 28 20 70 61 67 65 72 5f if( pager_
52c0: 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 66 64 2c lock(pPager->fd,
52d0: 20 31 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 1)!=0 ){.
52e0: 20 20 20 63 6c 6f 73 65 28 70 50 61 67 65 72 2d close(pPager-
52f0: 3e 6a 66 64 29 3b 0a 20 20 20 20 20 20 20 20 20 >jfd);.
5300: 70 50 61 67 65 72 2d 3e 6a 66 64 20 3d 20 2d 31 pPager->jfd = -1
5310: 3b 0a 20 20 20 20 20 20 20 20 20 2a 70 70 50 61 ;. *ppPa
5320: 67 65 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 ge = 0;.
5330: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 50 return SQLITE_P
5340: 52 4f 54 4f 43 4f 4c 3b 0a 20 20 20 20 20 20 20 ROTOCOL;.
5350: 7d 0a 0a 20 20 20 20 20 20 20 2f 2a 20 50 6c 61 }.. /* Pla
5360: 79 62 61 63 6b 20 61 6e 64 20 64 65 6c 65 74 65 yback and delete
5370: 20 74 68 65 20 6a 6f 75 72 6e 61 6c 2e 20 20 44 the journal. D
5380: 72 6f 70 20 74 68 65 20 64 61 74 61 62 61 73 65 rop the database
5390: 20 77 72 69 74 65 0a 20 20 20 20 20 20 20 2a 2a write. **
53a0: 20 6c 6f 63 6b 20 61 6e 64 20 72 65 61 63 71 75 lock and reacqu
53b0: 69 72 65 20 74 68 65 20 72 65 61 64 20 6c 6f 63 ire the read loc
53c0: 6b 2e 0a 20 20 20 20 20 20 20 2a 2f 0a 20 20 20 k.. */.
53d0: 20 20 20 20 72 63 20 3d 20 70 61 67 65 72 5f 70 rc = pager_p
53e0: 6c 61 79 62 61 63 6b 28 70 50 61 67 65 72 29 3b layback(pPager);
53f0: 0a 20 20 20 20 20 20 20 69 66 28 20 72 63 21 3d . if( rc!=
5400: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 SQLITE_OK ){.
5410: 20 20 20 20 20 20 72 65 74 75 72 6e 20 72 63 3b return rc;
5420: 0a 20 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a . }. }.
5430: 20 20 20 20 70 50 67 20 3d 20 30 3b 0a 20 20 7d pPg = 0;. }
5440: 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 53 65 61 else{. /* Sea
5450: 72 63 68 20 66 6f 72 20 70 61 67 65 20 69 6e 20 rch for page in
5460: 63 61 63 68 65 20 2a 2f 0a 20 20 20 20 70 50 67 cache */. pPg
5470: 20 3d 20 70 61 67 65 72 5f 6c 6f 6f 6b 75 70 28 = pager_lookup(
5480: 70 50 61 67 65 72 2c 20 70 67 6e 6f 29 3b 0a 20 pPager, pgno);.
5490: 20 7d 0a 20 20 69 66 28 20 70 50 67 3d 3d 30 20 }. if( pPg==0
54a0: 29 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 72 65 ){. /* The re
54b0: 71 75 65 73 74 65 64 20 70 61 67 65 20 69 73 20 quested page is
54c0: 6e 6f 74 20 69 6e 20 74 68 65 20 70 61 67 65 20 not in the page
54d0: 63 61 63 68 65 2e 20 2a 2f 0a 20 20 20 20 69 6e cache. */. in
54e0: 74 20 68 3b 0a 20 20 20 20 70 50 61 67 65 72 2d t h;. pPager-
54f0: 3e 6e 4d 69 73 73 2b 2b 3b 0a 20 20 20 20 69 66 >nMiss++;. if
5500: 28 20 70 50 61 67 65 72 2d 3e 6e 50 61 67 65 3c ( pPager->nPage<
5510: 70 50 61 67 65 72 2d 3e 6d 78 50 61 67 65 20 7c pPager->mxPage |
5520: 7c 20 70 50 61 67 65 72 2d 3e 70 46 69 72 73 74 | pPager->pFirst
5530: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 2f 2a 20 ==0 ){. /*
5540: 43 72 65 61 74 65 20 61 20 6e 65 77 20 70 61 67 Create a new pag
5550: 65 20 2a 2f 0a 20 20 20 20 20 20 70 50 67 20 3d e */. pPg =
5560: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 73 sqliteMalloc( s
5570: 69 7a 65 6f 66 28 2a 70 50 67 29 20 2b 20 53 51 izeof(*pPg) + SQ
5580: 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 20 2b LITE_PAGE_SIZE +
5590: 20 70 50 61 67 65 72 2d 3e 6e 45 78 74 72 61 20 pPager->nExtra
55a0: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 70 50 67 );. if( pPg
55b0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 2a ==0 ){. *
55c0: 70 70 50 61 67 65 20 3d 20 30 3b 0a 20 20 20 20 ppPage = 0;.
55d0: 20 20 20 20 70 61 67 65 72 5f 75 6e 77 72 69 74 pager_unwrit
55e0: 65 6c 6f 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 elock(pPager);.
55f0: 20 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e 65 pPager->e
5600: 72 72 4d 61 73 6b 20 7c 3d 20 50 41 47 45 52 5f rrMask |= PAGER_
5610: 45 52 52 5f 4d 45 4d 3b 0a 20 20 20 20 20 20 20 ERR_MEM;.
5620: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e return SQLITE_N
5630: 4f 4d 45 4d 3b 0a 20 20 20 20 20 20 7d 0a 20 20 OMEM;. }.
5640: 20 20 20 20 70 50 67 2d 3e 70 50 61 67 65 72 20 pPg->pPager
5650: 3d 20 70 50 61 67 65 72 3b 0a 20 20 20 20 20 20 = pPager;.
5660: 70 50 67 2d 3e 70 4e 65 78 74 41 6c 6c 20 3d 20 pPg->pNextAll =
5670: 70 50 61 67 65 72 2d 3e 70 41 6c 6c 3b 0a 20 20 pPager->pAll;.
5680: 20 20 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e if( pPager->
5690: 70 41 6c 6c 20 29 7b 0a 20 20 20 20 20 20 20 20 pAll ){.
56a0: 70 50 61 67 65 72 2d 3e 70 41 6c 6c 2d 3e 70 50 pPager->pAll->pP
56b0: 72 65 76 41 6c 6c 20 3d 20 70 50 67 3b 0a 20 20 revAll = pPg;.
56c0: 20 20 20 20 7d 0a 20 20 20 20 20 20 70 50 67 2d }. pPg-
56d0: 3e 70 50 72 65 76 41 6c 6c 20 3d 20 30 3b 0a 20 >pPrevAll = 0;.
56e0: 20 20 20 20 20 70 50 61 67 65 72 2d 3e 70 41 6c pPager->pAl
56f0: 6c 20 3d 20 70 50 67 3b 0a 20 20 20 20 20 20 70 l = pPg;. p
5700: 50 61 67 65 72 2d 3e 6e 50 61 67 65 2b 2b 3b 0a Pager->nPage++;.
5710: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
5720: 20 2f 2a 20 52 65 63 79 63 6c 65 20 61 6e 20 6f /* Recycle an o
5730: 6c 64 65 72 20 70 61 67 65 2e 20 20 46 69 72 73 lder page. Firs
5740: 74 20 6c 6f 63 61 74 65 20 74 68 65 20 70 61 67 t locate the pag
5750: 65 20 74 6f 20 62 65 20 72 65 63 79 63 6c 65 64 e to be recycled
5760: 2e 0a 20 20 20 20 20 20 2a 2a 20 54 72 79 20 74 .. ** Try t
5770: 6f 20 66 69 6e 64 20 6f 6e 65 20 74 68 61 74 20 o find one that
5780: 69 73 20 6e 6f 74 20 64 69 72 74 79 20 61 6e 64 is not dirty and
5790: 20 69 73 20 6e 65 61 72 20 74 68 65 20 68 65 61 is near the hea
57a0: 64 20 6f 66 0a 20 20 20 20 20 20 2a 2a 20 6f 66 d of. ** of
57b0: 20 74 68 65 20 66 72 65 65 20 6c 69 73 74 20 2a the free list *
57c0: 2f 0a 20 20 20 20 20 20 69 6e 74 20 63 6e 74 20 /. int cnt
57d0: 3d 20 34 3b 0a 20 20 20 20 20 20 70 50 67 20 3d = 4;. pPg =
57e0: 20 70 50 61 67 65 72 2d 3e 70 46 69 72 73 74 3b pPager->pFirst;
57f0: 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 70 50 . while( pP
5800: 67 2d 3e 64 69 72 74 79 20 26 26 20 30 3c 63 6e g->dirty && 0<cn
5810: 74 2d 2d 20 29 7b 0a 20 20 20 20 20 20 20 20 70 t-- ){. p
5820: 50 67 20 3d 20 70 50 67 2d 3e 70 4e 65 78 74 46 Pg = pPg->pNextF
5830: 72 65 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 ree;. }.
5840: 20 20 20 69 66 28 20 70 50 67 3d 3d 30 20 7c 7c if( pPg==0 ||
5850: 20 70 50 67 2d 3e 64 69 72 74 79 20 29 20 70 50 pPg->dirty ) pP
5860: 67 20 3d 20 70 50 61 67 65 72 2d 3e 70 46 69 72 g = pPager->pFir
5870: 73 74 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74 st;. assert
5880: 28 20 70 50 67 2d 3e 6e 52 65 66 3d 3d 30 20 29 ( pPg->nRef==0 )
5890: 3b 0a 0a 20 20 20 20 20 20 2f 2a 20 49 66 20 74 ;.. /* If t
58a0: 68 65 20 70 61 67 65 20 74 6f 20 62 65 20 72 65 he page to be re
58b0: 63 79 63 6c 65 64 20 69 73 20 64 69 72 74 79 2c cycled is dirty,
58c0: 20 73 79 6e 63 20 74 68 65 20 6a 6f 75 72 6e 61 sync the journa
58d0: 6c 20 61 6e 64 20 77 72 69 74 65 20 0a 20 20 20 l and write .
58e0: 20 20 20 2a 2a 20 74 68 65 20 6f 6c 64 20 70 61 ** the old pa
58f0: 67 65 20 69 6e 74 6f 20 74 68 65 20 64 61 74 61 ge into the data
5900: 62 61 73 65 2e 20 2a 2f 0a 20 20 20 20 20 20 69 base. */. i
5910: 66 28 20 70 50 67 2d 3e 64 69 72 74 79 20 29 7b f( pPg->dirty ){
5920: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 72 63 3b . int rc;
5930: 0a 20 20 20 20 20 20 20 20 61 73 73 65 72 74 28 . assert(
5940: 20 70 50 67 2d 3e 69 6e 4a 6f 75 72 6e 61 6c 3d pPg->inJournal=
5950: 3d 31 20 29 3b 0a 20 20 20 20 20 20 20 20 61 73 =1 );. as
5960: 73 65 72 74 28 20 70 50 61 67 65 72 2d 3e 73 74 sert( pPager->st
5970: 61 74 65 3d 3d 53 51 4c 49 54 45 5f 57 52 49 54 ate==SQLITE_WRIT
5980: 45 4c 4f 43 4b 20 29 3b 0a 20 20 20 20 20 20 20 ELOCK );.
5990: 20 72 63 20 3d 20 66 73 79 6e 63 28 70 50 61 67 rc = fsync(pPag
59a0: 65 72 2d 3e 6a 66 64 29 3b 0a 20 20 20 20 20 20 er->jfd);.
59b0: 20 20 69 66 28 20 72 63 21 3d 30 20 29 7b 0a 20 if( rc!=0 ){.
59c0: 20 20 20 20 20 20 20 20 20 72 63 20 3d 20 73 71 rc = sq
59d0: 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c 62 61 litepager_rollba
59e0: 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 ck(pPager);.
59f0: 20 20 20 20 20 20 2a 70 70 50 61 67 65 20 3d 20 *ppPage =
5a00: 30 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 0;. if(
5a10: 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 rc==SQLITE_OK )
5a20: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 49 4f 45 rc = SQLITE_IOE
5a30: 52 52 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65 RR;. re
5a40: 74 75 72 6e 20 72 63 3b 0a 20 20 20 20 20 20 20 turn rc;.
5a50: 20 7d 0a 20 20 20 20 20 20 20 20 70 61 67 65 72 }. pager
5a60: 5f 73 65 65 6b 28 70 50 61 67 65 72 2d 3e 66 64 _seek(pPager->fd
5a70: 2c 20 28 70 50 67 2d 3e 70 67 6e 6f 2d 31 29 2a , (pPg->pgno-1)*
5a80: 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 SQLITE_PAGE_SIZE
5a90: 29 3b 0a 20 20 20 20 20 20 20 20 72 63 20 3d 20 );. rc =
5aa0: 70 61 67 65 72 5f 77 72 69 74 65 28 70 50 61 67 pager_write(pPag
5ab0: 65 72 2d 3e 66 64 2c 20 50 47 48 44 52 5f 54 4f er->fd, PGHDR_TO
5ac0: 5f 44 41 54 41 28 70 50 67 29 2c 20 53 51 4c 49 _DATA(pPg), SQLI
5ad0: 54 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 TE_PAGE_SIZE);.
5ae0: 20 20 20 20 20 20 20 69 66 28 20 72 63 21 3d 53 if( rc!=S
5af0: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 QLITE_OK ){.
5b00: 20 20 20 20 20 20 72 63 20 3d 20 73 71 6c 69 74 rc = sqlit
5b10: 65 70 61 67 65 72 5f 72 6f 6c 6c 62 61 63 6b 28 epager_rollback(
5b20: 70 50 61 67 65 72 29 3b 0a 20 20 20 20 20 20 20 pPager);.
5b30: 20 20 20 2a 70 70 50 61 67 65 20 3d 20 30 3b 0a *ppPage = 0;.
5b40: 20 20 20 20 20 20 20 20 20 20 69 66 28 20 72 63 if( rc
5b50: 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 20 72 63 ==SQLITE_OK ) rc
5b60: 20 3d 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a = SQLITE_FULL;.
5b70: 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e return
5b80: 20 72 63 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 rc;. }.
5b90: 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 2f 2a }.. /*
5ba0: 20 55 6e 6c 69 6e 6b 20 74 68 65 20 6f 6c 64 20 Unlink the old
5bb0: 70 61 67 65 20 66 72 6f 6d 20 74 68 65 20 66 72 page from the fr
5bc0: 65 65 20 6c 69 73 74 20 61 6e 64 20 74 68 65 20 ee list and the
5bd0: 68 61 73 68 20 74 61 62 6c 65 0a 20 20 20 20 20 hash table.
5be0: 20 2a 2f 0a 20 20 20 20 20 20 70 50 61 67 65 72 */. pPager
5bf0: 2d 3e 70 46 69 72 73 74 20 3d 20 70 50 67 2d 3e ->pFirst = pPg->
5c00: 70 4e 65 78 74 46 72 65 65 3b 0a 20 20 20 20 20 pNextFree;.
5c10: 20 69 66 28 20 70 50 61 67 65 72 2d 3e 70 46 69 if( pPager->pFi
5c20: 72 73 74 20 29 7b 0a 20 20 20 20 20 20 20 20 70 rst ){. p
5c30: 50 61 67 65 72 2d 3e 70 46 69 72 73 74 2d 3e 70 Pager->pFirst->p
5c40: 50 72 65 76 46 72 65 65 20 3d 20 30 3b 0a 20 20 PrevFree = 0;.
5c50: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
5c60: 20 20 20 70 50 61 67 65 72 2d 3e 70 4c 61 73 74 pPager->pLast
5c70: 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 = 0;. }.
5c80: 20 20 20 20 69 66 28 20 70 50 67 2d 3e 70 4e 65 if( pPg->pNe
5c90: 78 74 48 61 73 68 20 29 7b 0a 20 20 20 20 20 20 xtHash ){.
5ca0: 20 20 70 50 67 2d 3e 70 4e 65 78 74 48 61 73 68 pPg->pNextHash
5cb0: 2d 3e 70 50 72 65 76 48 61 73 68 20 3d 20 70 50 ->pPrevHash = pP
5cc0: 67 2d 3e 70 50 72 65 76 48 61 73 68 3b 0a 20 20 g->pPrevHash;.
5cd0: 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 20 }. if(
5ce0: 70 50 67 2d 3e 70 50 72 65 76 48 61 73 68 20 29 pPg->pPrevHash )
5cf0: 7b 0a 20 20 20 20 20 20 20 20 70 50 67 2d 3e 70 {. pPg->p
5d00: 50 72 65 76 48 61 73 68 2d 3e 70 4e 65 78 74 48 PrevHash->pNextH
5d10: 61 73 68 20 3d 20 70 50 67 2d 3e 70 4e 65 78 74 ash = pPg->pNext
5d20: 48 61 73 68 3b 0a 20 20 20 20 20 20 7d 65 6c 73 Hash;. }els
5d30: 65 7b 0a 20 20 20 20 20 20 20 20 68 20 3d 20 70 e{. h = p
5d40: 61 67 65 72 5f 68 61 73 68 28 70 50 67 2d 3e 70 ager_hash(pPg->p
5d50: 67 6e 6f 29 3b 0a 20 20 20 20 20 20 20 20 61 73 gno);. as
5d60: 73 65 72 74 28 20 70 50 61 67 65 72 2d 3e 61 48 sert( pPager->aH
5d70: 61 73 68 5b 68 5d 3d 3d 70 50 67 20 29 3b 0a 20 ash[h]==pPg );.
5d80: 20 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e 61 pPager->a
5d90: 48 61 73 68 5b 68 5d 20 3d 20 70 50 67 2d 3e 70 Hash[h] = pPg->p
5da0: 4e 65 78 74 48 61 73 68 3b 0a 20 20 20 20 20 20 NextHash;.
5db0: 7d 0a 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e }. pPager->
5dc0: 6e 4f 76 66 6c 2b 2b 3b 0a 20 20 20 20 7d 0a 20 nOvfl++;. }.
5dd0: 20 20 20 70 50 67 2d 3e 70 67 6e 6f 20 3d 20 70 pPg->pgno = p
5de0: 67 6e 6f 3b 0a 20 20 20 20 70 50 67 2d 3e 69 6e gno;. pPg->in
5df0: 4a 6f 75 72 6e 61 6c 20 3d 20 30 3b 0a 20 20 20 Journal = 0;.
5e00: 20 70 50 67 2d 3e 64 69 72 74 79 20 3d 20 30 3b pPg->dirty = 0;
5e10: 0a 20 20 20 20 70 50 67 2d 3e 6e 52 65 66 20 3d . pPg->nRef =
5e20: 20 31 3b 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 1;. pPager->
5e30: 6e 52 65 66 2b 2b 3b 0a 20 20 20 20 68 20 3d 20 nRef++;. h =
5e40: 70 61 67 65 72 5f 68 61 73 68 28 70 67 6e 6f 29 pager_hash(pgno)
5e50: 3b 0a 20 20 20 20 70 50 67 2d 3e 70 4e 65 78 74 ;. pPg->pNext
5e60: 48 61 73 68 20 3d 20 70 50 61 67 65 72 2d 3e 61 Hash = pPager->a
5e70: 48 61 73 68 5b 68 5d 3b 0a 20 20 20 20 70 50 61 Hash[h];. pPa
5e80: 67 65 72 2d 3e 61 48 61 73 68 5b 68 5d 20 3d 20 ger->aHash[h] =
5e90: 70 50 67 3b 0a 20 20 20 20 69 66 28 20 70 50 67 pPg;. if( pPg
5ea0: 2d 3e 70 4e 65 78 74 48 61 73 68 20 29 7b 0a 20 ->pNextHash ){.
5eb0: 20 20 20 20 20 61 73 73 65 72 74 28 20 70 50 67 assert( pPg
5ec0: 2d 3e 70 4e 65 78 74 48 61 73 68 2d 3e 70 50 72 ->pNextHash->pPr
5ed0: 65 76 48 61 73 68 3d 3d 30 20 29 3b 0a 20 20 20 evHash==0 );.
5ee0: 20 20 20 70 50 67 2d 3e 70 4e 65 78 74 48 61 73 pPg->pNextHas
5ef0: 68 2d 3e 70 50 72 65 76 48 61 73 68 20 3d 20 70 h->pPrevHash = p
5f00: 50 67 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 Pg;. }. if
5f10: 28 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 ( pPager->dbSize
5f20: 3c 30 20 29 20 73 71 6c 69 74 65 70 61 67 65 72 <0 ) sqlitepager
5f30: 5f 70 61 67 65 63 6f 75 6e 74 28 70 50 61 67 65 _pagecount(pPage
5f40: 72 29 3b 0a 20 20 20 20 69 66 28 20 70 50 61 67 r);. if( pPag
5f50: 65 72 2d 3e 64 62 53 69 7a 65 3c 70 67 6e 6f 20 er->dbSize<pgno
5f60: 29 7b 0a 20 20 20 20 20 20 6d 65 6d 73 65 74 28 ){. memset(
5f70: 50 47 48 44 52 5f 54 4f 5f 44 41 54 41 28 70 50 PGHDR_TO_DATA(pP
5f80: 67 29 2c 20 30 2c 20 53 51 4c 49 54 45 5f 50 41 g), 0, SQLITE_PA
5f90: 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 20 7d 65 GE_SIZE);. }e
5fa0: 6c 73 65 7b 0a 20 20 20 20 20 20 70 61 67 65 72 lse{. pager
5fb0: 5f 73 65 65 6b 28 70 50 61 67 65 72 2d 3e 66 64 _seek(pPager->fd
5fc0: 2c 20 28 70 67 6e 6f 2d 31 29 2a 53 51 4c 49 54 , (pgno-1)*SQLIT
5fd0: 45 5f 50 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 E_PAGE_SIZE);.
5fe0: 20 20 20 20 70 61 67 65 72 5f 72 65 61 64 28 70 pager_read(p
5ff0: 50 61 67 65 72 2d 3e 66 64 2c 20 50 47 48 44 52 Pager->fd, PGHDR
6000: 5f 54 4f 5f 44 41 54 41 28 70 50 67 29 2c 20 53 _TO_DATA(pPg), S
6010: 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 29 QLITE_PAGE_SIZE)
6020: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 ;. }. if(
6030: 70 50 61 67 65 72 2d 3e 6e 45 78 74 72 61 3e 30 pPager->nExtra>0
6040: 20 29 7b 0a 20 20 20 20 20 20 6d 65 6d 73 65 74 ){. memset
6050: 28 50 47 48 44 52 5f 54 4f 5f 45 58 54 52 41 28 (PGHDR_TO_EXTRA(
6060: 70 50 67 29 2c 20 30 2c 20 70 50 61 67 65 72 2d pPg), 0, pPager-
6070: 3e 6e 45 78 74 72 61 29 3b 0a 20 20 20 20 7d 0a >nExtra);. }.
6080: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 }else{. /*
6090: 54 68 65 20 72 65 71 75 65 73 74 65 64 20 70 61 The requested pa
60a0: 67 65 20 69 73 20 69 6e 20 74 68 65 20 70 61 67 ge is in the pag
60b0: 65 20 63 61 63 68 65 2e 20 2a 2f 0a 20 20 20 20 e cache. */.
60c0: 70 50 61 67 65 72 2d 3e 6e 48 69 74 2b 2b 3b 0a pPager->nHit++;.
60d0: 20 20 20 20 70 61 67 65 5f 72 65 66 28 70 50 67 page_ref(pPg
60e0: 29 3b 0a 20 20 7d 0a 20 20 2a 70 70 50 61 67 65 );. }. *ppPage
60f0: 20 3d 20 50 47 48 44 52 5f 54 4f 5f 44 41 54 41 = PGHDR_TO_DATA
6100: 28 70 50 67 29 3b 0a 20 20 72 65 74 75 72 6e 20 (pPg);. return
6110: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a SQLITE_OK;.}../*
6120: 0a 2a 2a 20 41 63 71 75 69 72 65 20 61 20 70 61 .** Acquire a pa
6130: 67 65 20 69 66 20 69 74 20 69 73 20 61 6c 72 65 ge if it is alre
6140: 61 64 79 20 69 6e 20 74 68 65 20 69 6e 2d 6d 65 ady in the in-me
6150: 6d 6f 72 79 20 63 61 63 68 65 2e 20 20 44 6f 0a mory cache. Do.
6160: 2a 2a 20 6e 6f 74 20 72 65 61 64 20 74 68 65 20 ** not read the
6170: 70 61 67 65 20 66 72 6f 6d 20 64 69 73 6b 2e 20 page from disk.
6180: 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 Return a pointe
6190: 72 20 74 6f 20 74 68 65 20 70 61 67 65 2c 0a 2a r to the page,.*
61a0: 2a 20 6f 72 20 30 20 69 66 20 74 68 65 20 70 61 * or 0 if the pa
61b0: 67 65 20 69 73 20 6e 6f 74 20 69 6e 20 63 61 63 ge is not in cac
61c0: 68 65 2e 0a 2a 2a 0a 2a 2a 20 53 65 65 20 61 6c he..**.** See al
61d0: 73 6f 20 73 71 6c 69 74 65 70 61 67 65 72 5f 67 so sqlitepager_g
61e0: 65 74 28 29 2e 20 20 54 68 65 20 64 69 66 66 65 et(). The diffe
61f0: 72 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74 68 rence between th
6200: 69 73 20 72 6f 75 74 69 6e 65 0a 2a 2a 20 61 6e is routine.** an
6210: 64 20 73 71 6c 69 74 65 70 61 67 65 72 5f 67 65 d sqlitepager_ge
6220: 74 28 29 20 69 73 20 74 68 61 74 20 5f 67 65 74 t() is that _get
6230: 28 29 20 77 69 6c 6c 20 67 6f 20 74 6f 20 74 68 () will go to th
6240: 65 20 64 69 73 6b 20 61 6e 64 20 72 65 61 64 0a e disk and read.
6250: 2a 2a 20 69 6e 20 74 68 65 20 70 61 67 65 20 69 ** in the page i
6260: 66 20 74 68 65 20 70 61 67 65 20 69 73 20 6e 6f f the page is no
6270: 74 20 61 6c 72 65 61 64 79 20 69 6e 20 63 61 63 t already in cac
6280: 68 65 2e 20 20 54 68 69 73 20 72 6f 75 74 69 6e he. This routin
6290: 65 0a 2a 2a 20 72 65 74 75 72 6e 73 20 4e 55 4c e.** returns NUL
62a0: 4c 20 69 66 20 74 68 65 20 70 61 67 65 20 69 73 L if the page is
62b0: 20 6e 6f 74 20 69 6e 20 63 61 63 68 65 20 6f 66 not in cache of
62c0: 20 69 66 20 61 20 64 69 73 6b 20 49 2f 4f 20 68 if a disk I/O h
62d0: 61 73 20 65 76 65 72 0a 2a 2a 20 68 61 70 70 65 as ever.** happe
62e0: 6e 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 ned..*/.void *sq
62f0: 6c 69 74 65 70 61 67 65 72 5f 6c 6f 6f 6b 75 70 litepager_lookup
6300: 28 50 61 67 65 72 20 2a 70 50 61 67 65 72 2c 20 (Pager *pPager,
6310: 50 67 6e 6f 20 70 67 6e 6f 29 7b 0a 20 20 50 67 Pgno pgno){. Pg
6320: 48 64 72 20 2a 70 50 67 3b 0a 0a 20 20 2f 2a 20 Hdr *pPg;.. /*
6330: 4d 61 6b 65 20 73 75 72 65 20 77 65 20 68 61 76 Make sure we hav
6340: 65 20 6e 6f 74 20 68 69 74 20 61 6e 79 20 63 72 e not hit any cr
6350: 69 74 69 63 61 6c 20 65 72 72 6f 72 73 2e 0a 20 itical errors..
6360: 20 2a 2f 20 0a 20 20 69 66 28 20 70 50 61 67 65 */ . if( pPage
6370: 72 3d 3d 30 20 7c 7c 20 70 67 6e 6f 3d 3d 30 20 r==0 || pgno==0
6380: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b ){. return 0;
6390: 0a 20 20 7d 0a 20 20 69 66 28 20 70 50 61 67 65 . }. if( pPage
63a0: 72 2d 3e 65 72 72 4d 61 73 6b 20 26 20 7e 28 50 r->errMask & ~(P
63b0: 41 47 45 52 5f 45 52 52 5f 46 55 4c 4c 29 20 29 AGER_ERR_FULL) )
63c0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a {. return 0;.
63d0: 20 20 7d 0a 20 20 69 66 28 20 70 50 61 67 65 72 }. if( pPager
63e0: 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b 0a 20 20 20 ->nRef==0 ){.
63f0: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 return 0;. }.
6400: 20 70 50 67 20 3d 20 70 61 67 65 72 5f 6c 6f 6f pPg = pager_loo
6410: 6b 75 70 28 70 50 61 67 65 72 2c 20 70 67 6e 6f kup(pPager, pgno
6420: 29 3b 0a 20 20 69 66 28 20 70 50 67 3d 3d 30 20 );. if( pPg==0
6430: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 70 61 ) return 0;. pa
6440: 67 65 5f 72 65 66 28 70 50 67 29 3b 0a 20 20 72 ge_ref(pPg);. r
6450: 65 74 75 72 6e 20 50 47 48 44 52 5f 54 4f 5f 44 eturn PGHDR_TO_D
6460: 41 54 41 28 70 50 67 29 3b 0a 7d 0a 0a 2f 2a 0a ATA(pPg);.}../*.
6470: 2a 2a 20 52 65 6c 65 61 73 65 20 61 20 70 61 67 ** Release a pag
6480: 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 e..**.** If the
6490: 6e 75 6d 62 65 72 20 6f 66 20 72 65 66 65 72 65 number of refere
64a0: 6e 63 65 73 20 74 6f 20 74 68 65 20 70 61 67 65 nces to the page
64b0: 20 64 72 6f 70 20 74 6f 20 7a 65 72 6f 2c 20 74 drop to zero, t
64c0: 68 65 6e 20 74 68 65 0a 2a 2a 20 70 61 67 65 20 hen the.** page
64d0: 69 73 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 is added to the
64e0: 4c 52 55 20 6c 69 73 74 2e 20 20 57 68 65 6e 20 LRU list. When
64f0: 61 6c 6c 20 72 65 66 65 72 65 6e 63 65 73 20 74 all references t
6500: 6f 20 61 6c 6c 20 70 61 67 65 73 0a 2a 2a 20 61 o all pages.** a
6510: 72 65 20 72 65 6c 65 61 73 65 64 2c 20 61 20 72 re released, a r
6520: 6f 6c 6c 62 61 63 6b 20 6f 63 63 75 72 73 20 61 ollback occurs a
6530: 6e 64 20 74 68 65 20 6c 6f 63 6b 20 6f 6e 20 74 nd the lock on t
6540: 68 65 20 64 61 74 61 62 61 73 65 20 69 73 0a 2a he database is.*
6550: 2a 20 72 65 6d 6f 76 65 64 2e 0a 2a 2f 0a 69 6e * removed..*/.in
6560: 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 75 6e t sqlitepager_un
6570: 72 65 66 28 76 6f 69 64 20 2a 70 44 61 74 61 29 ref(void *pData)
6580: 7b 0a 20 20 50 61 67 65 72 20 2a 70 50 61 67 65 {. Pager *pPage
6590: 72 3b 0a 20 20 50 67 48 64 72 20 2a 70 50 67 3b r;. PgHdr *pPg;
65a0: 0a 0a 20 20 2f 2a 20 44 65 63 72 65 6d 65 6e 74 .. /* Decrement
65b0: 20 74 68 65 20 72 65 66 65 72 65 6e 63 65 20 63 the reference c
65c0: 6f 75 6e 74 20 66 6f 72 20 74 68 69 73 20 70 61 ount for this pa
65d0: 67 65 0a 20 20 2a 2f 0a 20 20 70 50 67 20 3d 20 ge. */. pPg =
65e0: 44 41 54 41 5f 54 4f 5f 50 47 48 44 52 28 70 44 DATA_TO_PGHDR(pD
65f0: 61 74 61 29 3b 0a 20 20 61 73 73 65 72 74 28 20 ata);. assert(
6600: 70 50 67 2d 3e 6e 52 65 66 3e 30 20 29 3b 0a 20 pPg->nRef>0 );.
6610: 20 70 50 61 67 65 72 20 3d 20 70 50 67 2d 3e 70 pPager = pPg->p
6620: 50 61 67 65 72 3b 0a 20 20 70 50 67 2d 3e 6e 52 Pager;. pPg->nR
6630: 65 66 2d 2d 3b 0a 0a 20 20 2f 2a 20 57 68 65 6e ef--;.. /* When
6640: 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 72 the number of r
6650: 65 66 65 72 65 6e 63 65 73 20 74 6f 20 61 20 70 eferences to a p
6660: 61 67 65 20 72 65 61 63 68 20 30 2c 20 63 61 6c age reach 0, cal
6670: 6c 20 74 68 65 0a 20 20 2a 2a 20 64 65 73 74 72 l the. ** destr
6680: 75 63 74 6f 72 20 61 6e 64 20 61 64 64 20 74 68 uctor and add th
6690: 65 20 70 61 67 65 20 74 6f 20 74 68 65 20 66 72 e page to the fr
66a0: 65 65 6c 69 73 74 2e 0a 20 20 2a 2f 0a 20 20 69 eelist.. */. i
66b0: 66 28 20 70 50 67 2d 3e 6e 52 65 66 3d 3d 30 20 f( pPg->nRef==0
66c0: 29 7b 0a 20 20 20 20 70 50 67 2d 3e 70 4e 65 78 ){. pPg->pNex
66d0: 74 46 72 65 65 20 3d 20 30 3b 0a 20 20 20 20 70 tFree = 0;. p
66e0: 50 67 2d 3e 70 50 72 65 76 46 72 65 65 20 3d 20 Pg->pPrevFree =
66f0: 70 50 61 67 65 72 2d 3e 70 4c 61 73 74 3b 0a 20 pPager->pLast;.
6700: 20 20 20 70 50 61 67 65 72 2d 3e 70 4c 61 73 74 pPager->pLast
6710: 20 3d 20 70 50 67 3b 0a 20 20 20 20 69 66 28 20 = pPg;. if(
6720: 70 50 67 2d 3e 70 50 72 65 76 46 72 65 65 20 29 pPg->pPrevFree )
6730: 7b 0a 20 20 20 20 20 20 70 50 67 2d 3e 70 50 72 {. pPg->pPr
6740: 65 76 46 72 65 65 2d 3e 70 4e 65 78 74 46 72 65 evFree->pNextFre
6750: 65 20 3d 20 70 50 67 3b 0a 20 20 20 20 7d 65 6c e = pPg;. }el
6760: 73 65 7b 0a 20 20 20 20 20 20 70 50 61 67 65 72 se{. pPager
6770: 2d 3e 70 46 69 72 73 74 20 3d 20 70 50 67 3b 0a ->pFirst = pPg;.
6780: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 70 50 }. if( pP
6790: 61 67 65 72 2d 3e 78 44 65 73 74 72 75 63 74 6f ager->xDestructo
67a0: 72 20 29 7b 0a 20 20 20 20 20 20 70 50 61 67 65 r ){. pPage
67b0: 72 2d 3e 78 44 65 73 74 72 75 63 74 6f 72 28 70 r->xDestructor(p
67c0: 44 61 74 61 29 3b 0a 20 20 20 20 7d 0a 20 20 0a Data);. }. .
67d0: 20 20 20 20 2f 2a 20 57 68 65 6e 20 61 6c 6c 20 /* When all
67e0: 70 61 67 65 73 20 72 65 61 63 68 20 74 68 65 20 pages reach the
67f0: 66 72 65 65 6c 69 73 74 2c 20 64 72 6f 70 20 74 freelist, drop t
6800: 68 65 20 72 65 61 64 20 6c 6f 63 6b 20 66 72 6f he read lock fro
6810: 6d 0a 20 20 20 20 2a 2a 20 74 68 65 20 64 61 74 m. ** the dat
6820: 61 62 61 73 65 20 66 69 6c 65 2e 0a 20 20 20 20 abase file..
6830: 2a 2f 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 6e */. pPager->n
6840: 52 65 66 2d 2d 3b 0a 20 20 20 20 61 73 73 65 72 Ref--;. asser
6850: 74 28 20 70 50 61 67 65 72 2d 3e 6e 52 65 66 3e t( pPager->nRef>
6860: 3d 30 20 29 3b 0a 20 20 20 20 69 66 28 20 70 50 =0 );. if( pP
6870: 61 67 65 72 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b ager->nRef==0 ){
6880: 0a 20 20 20 20 20 20 70 61 67 65 72 5f 72 65 73 . pager_res
6890: 65 74 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 et(pPager);.
68a0: 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 53 }. }. return S
68b0: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a QLITE_OK;.}../*.
68c0: 2a 2a 20 4d 61 72 6b 20 61 20 64 61 74 61 20 70 ** Mark a data p
68d0: 61 67 65 20 61 73 20 77 72 69 74 65 61 62 6c 65 age as writeable
68e0: 2e 20 20 54 68 65 20 70 61 67 65 20 69 73 20 77 . The page is w
68f0: 72 69 74 74 65 6e 20 69 6e 74 6f 20 74 68 65 20 ritten into the
6900: 6a 6f 75 72 6e 61 6c 20 0a 2a 2a 20 69 66 20 69 journal .** if i
6910: 74 20 69 73 20 6e 6f 74 20 74 68 65 72 65 20 61 t is not there a
6920: 6c 72 65 61 64 79 2e 20 20 54 68 69 73 20 72 6f lready. This ro
6930: 75 74 69 6e 65 20 6d 75 73 74 20 62 65 20 63 61 utine must be ca
6940: 6c 6c 65 64 20 62 65 66 6f 72 65 20 6d 61 6b 69 lled before maki
6950: 6e 67 0a 2a 2a 20 63 68 61 6e 67 65 73 20 74 6f ng.** changes to
6960: 20 61 20 70 61 67 65 2e 0a 2a 2a 0a 2a 2a 20 54 a page..**.** T
6970: 68 65 20 66 69 72 73 74 20 74 69 6d 65 20 74 68 he first time th
6980: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 is routine is ca
6990: 6c 6c 65 64 2c 20 74 68 65 20 70 61 67 65 72 20 lled, the pager
69a0: 63 72 65 61 74 65 73 20 61 20 6e 65 77 0a 2a 2a creates a new.**
69b0: 20 6a 6f 75 72 6e 61 6c 20 61 6e 64 20 61 63 71 journal and acq
69c0: 75 69 72 65 73 20 61 20 77 72 69 74 65 20 6c 6f uires a write lo
69d0: 63 6b 20 6f 6e 20 74 68 65 20 64 61 74 61 62 61 ck on the databa
69e0: 73 65 2e 20 20 49 66 20 74 68 65 20 77 72 69 74 se. If the writ
69f0: 65 0a 2a 2a 20 6c 6f 63 6b 20 63 6f 75 6c 64 20 e.** lock could
6a00: 6e 6f 74 20 62 65 20 61 63 71 75 69 72 65 64 2c not be acquired,
6a10: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 65 this routine re
6a20: 74 75 72 6e 73 20 53 51 4c 49 54 45 5f 42 55 53 turns SQLITE_BUS
6a30: 59 2e 20 20 54 68 65 0a 2a 2a 20 63 61 6c 6c 69 Y. The.** calli
6a40: 6e 67 20 72 6f 75 74 69 6e 65 20 6d 75 73 74 20 ng routine must
6a50: 63 68 65 63 6b 20 66 6f 72 20 74 68 61 74 20 72 check for that r
6a60: 65 74 75 72 6e 20 76 61 6c 75 65 20 61 6e 64 20 eturn value and
6a70: 62 65 20 63 61 72 65 66 75 6c 20 6e 6f 74 20 74 be careful not t
6a80: 6f 0a 2a 2a 20 63 68 61 6e 67 65 20 61 6e 79 20 o.** change any
6a90: 70 61 67 65 20 64 61 74 61 20 75 6e 74 69 6c 20 page data until
6aa0: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 65 74 this routine ret
6ab0: 75 72 6e 73 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a urns SQLITE_OK..
6ac0: 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 6a 6f 75 **.** If the jou
6ad0: 72 6e 61 6c 20 66 69 6c 65 20 63 6f 75 6c 64 20 rnal file could
6ae0: 6e 6f 74 20 62 65 20 77 72 69 74 74 65 6e 20 62 not be written b
6af0: 65 63 61 75 73 65 20 74 68 65 20 64 69 73 6b 20 ecause the disk
6b00: 69 73 20 66 75 6c 6c 2c 0a 2a 2a 20 74 68 65 6e is full,.** then
6b10: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 72 65 this routine re
6b20: 74 75 72 6e 73 20 53 51 4c 49 54 45 5f 46 55 4c turns SQLITE_FUL
6b30: 4c 20 61 6e 64 20 64 6f 65 73 20 61 6e 20 69 6d L and does an im
6b40: 6d 65 64 69 61 74 65 20 72 6f 6c 6c 62 61 63 6b mediate rollback
6b50: 2e 0a 2a 2a 20 41 6c 6c 20 73 75 62 73 65 71 75 ..** All subsequ
6b60: 65 6e 74 20 77 72 69 74 65 20 61 74 74 65 6d 70 ent write attemp
6b70: 74 73 20 61 6c 73 6f 20 72 65 74 75 72 6e 20 53 ts also return S
6b80: 51 4c 49 54 45 5f 46 55 4c 4c 20 75 6e 74 69 6c QLITE_FULL until
6b90: 20 74 68 65 72 65 0a 2a 2a 20 69 73 20 61 20 63 there.** is a c
6ba0: 61 6c 6c 20 74 6f 20 73 71 6c 69 74 65 70 61 67 all to sqlitepag
6bb0: 65 72 5f 63 6f 6d 6d 69 74 28 29 20 6f 72 20 73 er_commit() or s
6bc0: 71 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c 62 qlitepager_rollb
6bd0: 61 63 6b 28 29 20 74 6f 0a 2a 2a 20 72 65 73 65 ack() to.** rese
6be0: 74 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 t..*/.int sqlite
6bf0: 70 61 67 65 72 5f 77 72 69 74 65 28 76 6f 69 64 pager_write(void
6c00: 20 2a 70 44 61 74 61 29 7b 0a 20 20 50 67 48 64 *pData){. PgHd
6c10: 72 20 2a 70 50 67 20 3d 20 44 41 54 41 5f 54 4f r *pPg = DATA_TO
6c20: 5f 50 47 48 44 52 28 70 44 61 74 61 29 3b 0a 20 _PGHDR(pData);.
6c30: 20 50 61 67 65 72 20 2a 70 50 61 67 65 72 20 3d Pager *pPager =
6c40: 20 70 50 67 2d 3e 70 50 61 67 65 72 3b 0a 20 20 pPg->pPager;.
6c50: 69 6e 74 20 72 63 20 3d 20 53 51 4c 49 54 45 5f int rc = SQLITE_
6c60: 4f 4b 3b 0a 0a 20 20 69 66 28 20 70 50 61 67 65 OK;.. if( pPage
6c70: 72 2d 3e 65 72 72 4d 61 73 6b 20 29 7b 20 0a 20 r->errMask ){ .
6c80: 20 20 20 72 65 74 75 72 6e 20 70 61 67 65 72 5f return pager_
6c90: 65 72 72 63 6f 64 65 28 70 50 61 67 65 72 29 3b errcode(pPager);
6ca0: 0a 20 20 7d 0a 20 20 70 50 67 2d 3e 64 69 72 74 . }. pPg->dirt
6cb0: 79 20 3d 20 31 3b 0a 20 20 69 66 28 20 70 50 67 y = 1;. if( pPg
6cc0: 2d 3e 69 6e 4a 6f 75 72 6e 61 6c 20 29 7b 20 72 ->inJournal ){ r
6cd0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b eturn SQLITE_OK;
6ce0: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 50 61 }. assert( pPa
6cf0: 67 65 72 2d 3e 73 74 61 74 65 21 3d 53 51 4c 49 ger->state!=SQLI
6d00: 54 45 5f 55 4e 4c 4f 43 4b 20 29 3b 0a 20 20 69 TE_UNLOCK );. i
6d10: 66 28 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 f( pPager->state
6d20: 3d 3d 53 51 4c 49 54 45 5f 52 45 41 44 4c 4f 43 ==SQLITE_READLOC
6d30: 4b 20 29 7b 0a 20 20 20 20 70 50 61 67 65 72 2d K ){. pPager-
6d40: 3e 6a 66 64 20 3d 20 6f 70 65 6e 28 70 50 61 67 >jfd = open(pPag
6d50: 65 72 2d 3e 7a 4a 6f 75 72 6e 61 6c 2c 20 4f 5f er->zJournal, O_
6d60: 52 44 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36 RDWR|O_CREAT, 06
6d70: 34 34 29 3b 0a 20 20 20 20 69 66 28 20 70 50 61 44);. if( pPa
6d80: 67 65 72 2d 3e 6a 66 64 3c 30 20 29 7b 0a 20 20 ger->jfd<0 ){.
6d90: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 return SQLIT
6da0: 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 20 20 E_CANTOPEN;.
6db0: 7d 0a 20 20 20 20 69 66 28 20 70 61 67 65 72 5f }. if( pager_
6dc0: 6c 6f 63 6b 28 70 50 61 67 65 72 2d 3e 6a 66 64 lock(pPager->jfd
6dd0: 2c 20 31 29 20 29 7b 0a 20 20 20 20 20 20 63 6c , 1) ){. cl
6de0: 6f 73 65 28 70 50 61 67 65 72 2d 3e 6a 66 64 29 ose(pPager->jfd)
6df0: 3b 0a 20 20 20 20 20 20 70 50 61 67 65 72 2d 3e ;. pPager->
6e00: 6a 66 64 20 3d 20 2d 31 3b 0a 20 20 20 20 20 20 jfd = -1;.
6e10: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 42 55 return SQLITE_BU
6e20: 53 59 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70 61 SY;. }. pa
6e30: 67 65 72 5f 75 6e 6c 6f 63 6b 28 70 50 61 67 65 ger_unlock(pPage
6e40: 72 2d 3e 66 64 29 3b 0a 20 20 20 20 69 66 28 20 r->fd);. if(
6e50: 70 61 67 65 72 5f 6c 6f 63 6b 28 70 50 61 67 65 pager_lock(pPage
6e60: 72 2d 3e 66 64 2c 20 31 29 20 29 7b 0a 20 20 20 r->fd, 1) ){.
6e70: 20 20 20 63 6c 6f 73 65 28 70 50 61 67 65 72 2d close(pPager-
6e80: 3e 6a 66 64 29 3b 0a 20 20 20 20 20 20 70 50 61 >jfd);. pPa
6e90: 67 65 72 2d 3e 6a 66 64 20 3d 20 2d 31 3b 0a 20 ger->jfd = -1;.
6ea0: 20 20 20 20 20 70 50 61 67 65 72 2d 3e 73 74 61 pPager->sta
6eb0: 74 65 20 3d 20 53 51 4c 49 54 45 5f 55 4e 4c 4f te = SQLITE_UNLO
6ec0: 43 4b 3b 0a 20 20 20 20 20 20 70 50 61 67 65 72 CK;. pPager
6ed0: 2d 3e 65 72 72 4d 61 73 6b 20 7c 3d 20 50 41 47 ->errMask |= PAG
6ee0: 45 52 5f 45 52 52 5f 4c 4f 43 4b 3b 0a 20 20 20 ER_ERR_LOCK;.
6ef0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 return SQLITE
6f00: 5f 50 52 4f 54 4f 43 4f 4c 3b 0a 20 20 20 20 7d _PROTOCOL;. }
6f10: 0a 20 20 20 20 70 50 61 67 65 72 2d 3e 73 74 61 . pPager->sta
6f20: 74 65 20 3d 20 53 51 4c 49 54 45 5f 57 52 49 54 te = SQLITE_WRIT
6f30: 45 4c 4f 43 4b 3b 0a 20 20 20 20 73 71 6c 69 74 ELOCK;. sqlit
6f40: 65 70 61 67 65 72 5f 70 61 67 65 63 6f 75 6e 74 epager_pagecount
6f50: 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 70 50 (pPager);. pP
6f60: 61 67 65 72 2d 3e 6f 72 69 67 44 62 53 69 7a 65 ager->origDbSize
6f70: 20 3d 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a = pPager->dbSiz
6f80: 65 3b 0a 20 20 20 20 72 63 20 3d 20 70 61 67 65 e;. rc = page
6f90: 72 5f 77 72 69 74 65 28 70 50 61 67 65 72 2d 3e r_write(pPager->
6fa0: 6a 66 64 2c 20 61 4a 6f 75 72 6e 61 6c 4d 61 67 jfd, aJournalMag
6fb0: 69 63 2c 20 73 69 7a 65 6f 66 28 61 4a 6f 75 72 ic, sizeof(aJour
6fc0: 6e 61 6c 4d 61 67 69 63 29 29 3b 0a 20 20 20 20 nalMagic));.
6fd0: 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f if( rc==SQLITE_O
6fe0: 4b 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 K ){. rc =
6ff0: 70 61 67 65 72 5f 77 72 69 74 65 28 70 50 61 67 pager_write(pPag
7000: 65 72 2d 3e 6a 66 64 2c 20 26 70 50 61 67 65 72 er->jfd, &pPager
7010: 2d 3e 64 62 53 69 7a 65 2c 20 73 69 7a 65 6f 66 ->dbSize, sizeof
7020: 28 50 67 6e 6f 29 29 3b 0a 20 20 20 20 7d 0a 20 (Pgno));. }.
7030: 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 if( rc!=SQLIT
7040: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20 20 72 63 E_OK ){. rc
7050: 20 3d 20 70 61 67 65 72 5f 75 6e 77 72 69 74 65 = pager_unwrite
7060: 6c 6f 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 lock(pPager);.
7070: 20 20 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 if( rc==SQLI
7080: 54 45 5f 4f 4b 20 29 20 72 63 20 3d 20 53 51 4c TE_OK ) rc = SQL
7090: 49 54 45 5f 46 55 4c 4c 3b 0a 20 20 20 20 20 20 ITE_FULL;.
70a0: 72 65 74 75 72 6e 20 72 63 3b 0a 20 20 20 20 7d return rc;. }
70b0: 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 . }. assert( p
70c0: 50 61 67 65 72 2d 3e 73 74 61 74 65 3d 3d 53 51 Pager->state==SQ
70d0: 4c 49 54 45 5f 57 52 49 54 45 4c 4f 43 4b 20 29 LITE_WRITELOCK )
70e0: 3b 0a 20 20 61 73 73 65 72 74 28 20 70 50 61 67 ;. assert( pPag
70f0: 65 72 2d 3e 6a 66 64 3e 3d 30 20 29 3b 0a 20 20 er->jfd>=0 );.
7100: 69 66 28 20 70 50 67 2d 3e 70 67 6e 6f 20 3c 3d if( pPg->pgno <=
7110: 20 70 50 61 67 65 72 2d 3e 6f 72 69 67 44 62 53 pPager->origDbS
7120: 69 7a 65 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 ize ){. rc =
7130: 70 61 67 65 72 5f 77 72 69 74 65 28 70 50 61 67 pager_write(pPag
7140: 65 72 2d 3e 6a 66 64 2c 20 26 70 50 67 2d 3e 70 er->jfd, &pPg->p
7150: 67 6e 6f 2c 20 73 69 7a 65 6f 66 28 50 67 6e 6f gno, sizeof(Pgno
7160: 29 29 3b 0a 20 20 20 20 69 66 28 20 72 63 3d 3d ));. if( rc==
7170: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 SQLITE_OK ){.
7180: 20 20 20 72 63 20 3d 20 70 61 67 65 72 5f 77 72 rc = pager_wr
7190: 69 74 65 28 70 50 61 67 65 72 2d 3e 6a 66 64 2c ite(pPager->jfd,
71a0: 20 70 44 61 74 61 2c 20 53 51 4c 49 54 45 5f 50 pData, SQLITE_P
71b0: 41 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 20 7d AGE_SIZE);. }
71c0: 0a 20 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c . if( rc!=SQL
71d0: 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20 20 ITE_OK ){.
71e0: 73 71 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c sqlitepager_roll
71f0: 62 61 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 back(pPager);.
7200: 20 20 20 20 70 50 61 67 65 72 2d 3e 65 72 72 4d pPager->errM
7210: 61 73 6b 20 7c 3d 20 50 41 47 45 52 5f 45 52 52 ask |= PAGER_ERR
7220: 5f 46 55 4c 4c 3b 0a 20 20 20 20 20 20 72 65 74 _FULL;. ret
7230: 75 72 6e 20 72 63 3b 0a 20 20 20 20 7d 0a 20 20 urn rc;. }.
7240: 7d 0a 20 20 70 50 67 2d 3e 69 6e 4a 6f 75 72 6e }. pPg->inJourn
7250: 61 6c 20 3d 20 31 3b 0a 20 20 69 66 28 20 70 50 al = 1;. if( pP
7260: 61 67 65 72 2d 3e 64 62 53 69 7a 65 3c 70 50 67 ager->dbSize<pPg
7270: 2d 3e 70 67 6e 6f 20 29 7b 0a 20 20 20 20 70 50 ->pgno ){. pP
7280: 61 67 65 72 2d 3e 64 62 53 69 7a 65 20 3d 20 70 ager->dbSize = p
7290: 50 67 2d 3e 70 67 6e 6f 3b 0a 20 20 7d 0a 20 20 Pg->pgno;. }.
72a0: 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a return rc;.}../*
72b0: 0a 2a 2a 20 43 6f 6d 6d 69 74 20 61 6c 6c 20 63 .** Commit all c
72c0: 68 61 6e 67 65 73 20 74 6f 20 74 68 65 20 64 61 hanges to the da
72d0: 74 61 62 61 73 65 20 61 6e 64 20 72 65 6c 65 61 tabase and relea
72e0: 73 65 20 74 68 65 20 77 72 69 74 65 20 6c 6f 63 se the write loc
72f0: 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 k..**.** If the
7300: 63 6f 6d 6d 69 74 20 66 61 69 6c 73 20 66 6f 72 commit fails for
7310: 20 61 6e 79 20 72 65 61 73 6f 6e 2c 20 61 20 72 any reason, a r
7320: 6f 6c 6c 62 61 63 6b 20 61 74 74 65 6d 70 74 20 ollback attempt
7330: 69 73 20 6d 61 64 65 0a 2a 2a 20 61 6e 64 20 61 is made.** and a
7340: 6e 20 65 72 72 6f 72 20 63 6f 64 65 20 69 73 20 n error code is
7350: 72 65 74 75 72 6e 65 64 2e 20 20 49 66 20 74 68 returned. If th
7360: 65 20 63 6f 6d 6d 69 74 20 77 6f 72 6b 65 64 2c e commit worked,
7370: 20 53 51 4c 49 54 45 5f 4f 4b 0a 2a 2a 20 69 73 SQLITE_OK.** is
7380: 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2f 0a 69 6e returned..*/.in
7390: 74 20 73 71 6c 69 74 65 70 61 67 65 72 5f 63 6f t sqlitepager_co
73a0: 6d 6d 69 74 28 50 61 67 65 72 20 2a 70 50 61 67 mmit(Pager *pPag
73b0: 65 72 29 7b 0a 20 20 69 6e 74 20 69 2c 20 72 63 er){. int i, rc
73c0: 3b 0a 20 20 50 67 48 64 72 20 2a 70 50 67 3b 0a ;. PgHdr *pPg;.
73d0: 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d 3e 65 . if( pPager->e
73e0: 72 72 4d 61 73 6b 3d 3d 50 41 47 45 52 5f 45 52 rrMask==PAGER_ER
73f0: 52 5f 46 55 4c 4c 20 29 7b 0a 20 20 20 20 72 63 R_FULL ){. rc
7400: 20 3d 20 73 71 6c 69 74 65 70 61 67 65 72 5f 72 = sqlitepager_r
7410: 6f 6c 6c 62 61 63 6b 28 70 50 61 67 65 72 29 3b ollback(pPager);
7420: 0a 20 20 20 20 69 66 28 20 72 63 3d 3d 53 51 4c . if( rc==SQL
7430: 49 54 45 5f 4f 4b 20 29 20 72 63 20 3d 20 53 51 ITE_OK ) rc = SQ
7440: 4c 49 54 45 5f 46 55 4c 4c 3b 0a 20 20 20 20 72 LITE_FULL;. r
7450: 65 74 75 72 6e 20 72 63 3b 0a 20 20 7d 0a 20 20 eturn rc;. }.
7460: 69 66 28 20 70 50 61 67 65 72 2d 3e 65 72 72 4d if( pPager->errM
7470: 61 73 6b 21 3d 30 20 29 7b 0a 20 20 20 20 72 63 ask!=0 ){. rc
7480: 20 3d 20 70 61 67 65 72 5f 65 72 72 63 6f 64 65 = pager_errcode
7490: 28 70 50 61 67 65 72 29 3b 0a 20 20 20 20 72 65 (pPager);. re
74a0: 74 75 72 6e 20 72 63 3b 0a 20 20 7d 0a 20 20 69 turn rc;. }. i
74b0: 66 28 20 70 50 61 67 65 72 2d 3e 73 74 61 74 65 f( pPager->state
74c0: 21 3d 53 51 4c 49 54 45 5f 57 52 49 54 45 4c 4f !=SQLITE_WRITELO
74d0: 43 4b 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e CK ){. return
74e0: 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20 SQLITE_ERROR;.
74f0: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 50 61 }. assert( pPa
7500: 67 65 72 2d 3e 6a 66 64 3e 3d 30 20 29 3b 0a 20 ger->jfd>=0 );.
7510: 20 69 66 28 20 66 73 79 6e 63 28 70 50 61 67 65 if( fsync(pPage
7520: 72 2d 3e 6a 66 64 29 20 29 7b 0a 20 20 20 20 67 r->jfd) ){. g
7530: 6f 74 6f 20 63 6f 6d 6d 69 74 5f 61 62 6f 72 74 oto commit_abort
7540: 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 69 3d 30 3b ;. }. for(i=0;
7550: 20 69 3c 4e 5f 50 47 5f 48 41 53 48 3b 20 69 2b i<N_PG_HASH; i+
7560: 2b 29 7b 0a 20 20 20 20 66 6f 72 28 70 50 67 3d +){. for(pPg=
7570: 70 50 61 67 65 72 2d 3e 61 48 61 73 68 5b 69 5d pPager->aHash[i]
7580: 3b 20 70 50 67 3b 20 70 50 67 3d 70 50 67 2d 3e ; pPg; pPg=pPg->
7590: 70 4e 65 78 74 48 61 73 68 29 7b 0a 20 20 20 20 pNextHash){.
75a0: 20 20 69 66 28 20 70 50 67 2d 3e 64 69 72 74 79 if( pPg->dirty
75b0: 3d 3d 30 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a ==0 ) continue;.
75c0: 20 20 20 20 20 20 72 63 20 3d 20 70 61 67 65 72 rc = pager
75d0: 5f 73 65 65 6b 28 70 50 61 67 65 72 2d 3e 66 64 _seek(pPager->fd
75e0: 2c 20 28 70 50 67 2d 3e 70 67 6e 6f 2d 31 29 2a , (pPg->pgno-1)*
75f0: 53 51 4c 49 54 45 5f 50 41 47 45 5f 53 49 5a 45 SQLITE_PAGE_SIZE
7600: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 63 21 );. if( rc!
7610: 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 20 67 6f 74 =SQLITE_OK ) got
7620: 6f 20 63 6f 6d 6d 69 74 5f 61 62 6f 72 74 3b 0a o commit_abort;.
7630: 20 20 20 20 20 20 72 63 20 3d 20 70 61 67 65 72 rc = pager
7640: 5f 77 72 69 74 65 28 70 50 61 67 65 72 2d 3e 66 _write(pPager->f
7650: 64 2c 20 50 47 48 44 52 5f 54 4f 5f 44 41 54 41 d, PGHDR_TO_DATA
7660: 28 70 50 67 29 2c 20 53 51 4c 49 54 45 5f 50 41 (pPg), SQLITE_PA
7670: 47 45 5f 53 49 5a 45 29 3b 0a 20 20 20 20 20 20 GE_SIZE);.
7680: 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f if( rc!=SQLITE_O
7690: 4b 20 29 20 67 6f 74 6f 20 63 6f 6d 6d 69 74 5f K ) goto commit_
76a0: 61 62 6f 72 74 3b 0a 20 20 20 20 7d 0a 20 20 7d abort;. }. }
76b0: 0a 20 20 69 66 28 20 66 73 79 6e 63 28 70 50 61 . if( fsync(pPa
76c0: 67 65 72 2d 3e 66 64 29 20 29 20 67 6f 74 6f 20 ger->fd) ) goto
76d0: 63 6f 6d 6d 69 74 5f 61 62 6f 72 74 3b 0a 20 20 commit_abort;.
76e0: 72 63 20 3d 20 70 61 67 65 72 5f 75 6e 77 72 69 rc = pager_unwri
76f0: 74 65 6c 6f 63 6b 28 70 50 61 67 65 72 29 3b 0a telock(pPager);.
7700: 20 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a 65 pPager->dbSize
7710: 20 3d 20 2d 31 3b 0a 20 20 72 65 74 75 72 6e 20 = -1;. return
7720: 72 63 3b 0a 0a 20 20 2f 2a 20 4a 75 6d 70 20 68 rc;.. /* Jump h
7730: 65 72 65 20 69 66 20 61 6e 79 74 68 69 6e 67 20 ere if anything
7740: 67 6f 65 73 20 77 72 6f 6e 67 20 64 75 72 69 6e goes wrong durin
7750: 67 20 74 68 65 20 63 6f 6d 6d 69 74 20 70 72 6f g the commit pro
7760: 63 65 73 73 2e 0a 20 20 2a 2f 0a 63 6f 6d 6d 69 cess.. */.commi
7770: 74 5f 61 62 6f 72 74 3a 0a 20 20 72 63 20 3d 20 t_abort:. rc =
7780: 73 71 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c sqlitepager_roll
7790: 62 61 63 6b 28 70 50 61 67 65 72 29 3b 0a 20 20 back(pPager);.
77a0: 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f if( rc==SQLITE_O
77b0: 4b 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 53 51 K ){. rc = SQ
77c0: 4c 49 54 45 5f 46 55 4c 4c 3b 0a 20 20 7d 0a 20 LITE_FULL;. }.
77d0: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f return rc;.}../
77e0: 2a 0a 2a 2a 20 52 6f 6c 6c 62 61 63 6b 20 61 6c *.** Rollback al
77f0: 6c 20 63 68 61 6e 67 65 73 2e 20 20 54 68 65 20 l changes. The
7800: 64 61 74 61 62 61 73 65 20 66 61 6c 6c 73 20 62 database falls b
7810: 61 63 6b 20 74 6f 20 72 65 61 64 2d 6f 6e 6c 79 ack to read-only
7820: 20 6d 6f 64 65 2e 0a 2a 2a 20 41 6c 6c 20 69 6e mode..** All in
7830: 2d 6d 65 6d 6f 72 79 20 63 61 63 68 65 20 70 61 -memory cache pa
7840: 67 65 73 20 72 65 76 65 72 74 20 74 6f 20 74 68 ges revert to th
7850: 65 69 72 20 6f 72 69 67 69 6e 61 6c 20 64 61 74 eir original dat
7860: 61 20 63 6f 6e 74 65 6e 74 73 2e 0a 2a 2a 20 54 a contents..** T
7870: 68 65 20 6a 6f 75 72 6e 61 6c 20 69 73 20 64 65 he journal is de
7880: 6c 65 74 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 leted..**.** Thi
7890: 73 20 72 6f 75 74 69 6e 65 20 63 61 6e 6e 6f 74 s routine cannot
78a0: 20 66 61 69 6c 20 75 6e 6c 65 73 73 20 73 6f 6d fail unless som
78b0: 65 20 6f 74 68 65 72 20 70 72 6f 63 65 73 73 20 e other process
78c0: 69 73 20 6e 6f 74 20 66 6f 6c 6c 6f 77 69 6e 67 is not following
78d0: 0a 2a 2a 20 74 68 65 20 63 6f 72 72 65 63 74 20 .** the correct
78e0: 6c 6f 63 6b 69 6e 67 20 70 72 6f 74 6f 63 6f 6c locking protocol
78f0: 20 28 53 51 4c 49 54 45 5f 50 52 4f 54 4f 43 4f (SQLITE_PROTOCO
7900: 4c 29 20 6f 72 20 75 6e 6c 65 73 73 20 73 6f 6d L) or unless som
7910: 65 20 6f 74 68 65 72 0a 2a 2a 20 70 72 6f 63 65 e other.** proce
7920: 73 73 20 69 73 20 77 72 69 74 69 6e 67 20 74 72 ss is writing tr
7930: 61 73 68 20 69 6e 74 6f 20 74 68 65 20 6a 6f 75 ash into the jou
7940: 72 6e 61 6c 20 66 69 6c 65 20 28 53 51 4c 49 54 rnal file (SQLIT
7950: 45 5f 43 4f 52 52 55 50 54 29 20 6f 72 0a 2a 2a E_CORRUPT) or.**
7960: 20 75 6e 6c 65 73 73 20 61 20 70 72 69 6f 72 20 unless a prior
7970: 6d 61 6c 6c 6f 63 28 29 20 66 61 69 6c 65 64 20 malloc() failed
7980: 28 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 29 2e 20 (SQLITE_NOMEM).
7990: 20 41 70 70 72 6f 70 72 69 61 74 65 20 65 72 72 Appropriate err
79a0: 6f 72 0a 2a 2a 20 63 6f 64 65 73 20 61 72 65 20 or.** codes are
79b0: 72 65 74 75 72 6e 65 64 20 66 6f 72 20 61 6c 6c returned for all
79c0: 20 74 68 65 73 65 20 6f 63 63 61 73 69 6f 6e 73 these occasions
79d0: 2e 20 20 4f 74 68 65 72 77 69 73 65 2c 0a 2a 2a . Otherwise,.**
79e0: 20 53 51 4c 49 54 45 5f 4f 4b 20 69 73 20 72 65 SQLITE_OK is re
79f0: 74 75 72 6e 65 64 2e 0a 2a 2f 0a 69 6e 74 20 73 turned..*/.int s
7a00: 71 6c 69 74 65 70 61 67 65 72 5f 72 6f 6c 6c 62 qlitepager_rollb
7a10: 61 63 6b 28 50 61 67 65 72 20 2a 70 50 61 67 65 ack(Pager *pPage
7a20: 72 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 r){. int rc;.
7a30: 69 66 28 20 70 50 61 67 65 72 2d 3e 65 72 72 4d if( pPager->errM
7a40: 61 73 6b 21 3d 30 20 26 26 20 70 50 61 67 65 72 ask!=0 && pPager
7a50: 2d 3e 65 72 72 4d 61 73 6b 21 3d 50 41 47 45 52 ->errMask!=PAGER
7a60: 5f 45 52 52 5f 46 55 4c 4c 20 29 7b 0a 20 20 20 _ERR_FULL ){.
7a70: 20 72 65 74 75 72 6e 20 70 61 67 65 72 5f 65 72 return pager_er
7a80: 72 63 6f 64 65 28 70 50 61 67 65 72 29 3b 0a 20 rcode(pPager);.
7a90: 20 7d 0a 20 20 69 66 28 20 70 50 61 67 65 72 2d }. if( pPager-
7aa0: 3e 73 74 61 74 65 21 3d 53 51 4c 49 54 45 5f 57 >state!=SQLITE_W
7ab0: 52 49 54 45 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 RITELOCK ){.
7ac0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b return SQLITE_OK
7ad0: 3b 0a 20 20 7d 0a 20 20 72 63 20 3d 20 70 61 67 ;. }. rc = pag
7ae0: 65 72 5f 70 6c 61 79 62 61 63 6b 28 70 50 61 67 er_playback(pPag
7af0: 65 72 29 3b 0a 20 20 69 66 28 20 72 63 21 3d 53 er);. if( rc!=S
7b00: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 QLITE_OK ){.
7b10: 72 63 20 3d 20 53 51 4c 49 54 45 5f 43 4f 52 52 rc = SQLITE_CORR
7b20: 55 50 54 3b 0a 20 20 20 20 70 50 61 67 65 72 2d UPT;. pPager-
7b30: 3e 65 72 72 4d 61 73 6b 20 7c 3d 20 50 41 47 45 >errMask |= PAGE
7b40: 52 5f 45 52 52 5f 43 4f 52 52 55 50 54 3b 0a 20 R_ERR_CORRUPT;.
7b50: 20 7d 0a 20 20 70 50 61 67 65 72 2d 3e 64 62 53 }. pPager->dbS
7b60: 69 7a 65 20 3d 20 2d 31 3b 0a 20 20 72 65 74 75 ize = -1;. retu
7b70: 72 6e 20 72 63 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a rn rc;.};../*.**
7b80: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 This routine is
7b90: 20 75 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e used for testin
7ba0: 67 20 61 6e 64 20 61 6e 61 6c 79 73 69 73 20 6f g and analysis o
7bb0: 6e 6c 79 2e 0a 2a 2f 0a 69 6e 74 20 2a 73 71 6c nly..*/.int *sql
7bc0: 69 74 65 70 61 67 65 72 5f 73 74 61 74 73 28 50 itepager_stats(P
7bd0: 61 67 65 72 20 2a 70 50 61 67 65 72 29 7b 0a 20 ager *pPager){.
7be0: 20 73 74 61 74 69 63 20 69 6e 74 20 61 5b 39 5d static int a[9]
7bf0: 3b 0a 20 20 61 5b 30 5d 20 3d 20 70 50 61 67 65 ;. a[0] = pPage
7c00: 72 2d 3e 6e 52 65 66 3b 0a 20 20 61 5b 31 5d 20 r->nRef;. a[1]
7c10: 3d 20 70 50 61 67 65 72 2d 3e 6e 50 61 67 65 3b = pPager->nPage;
7c20: 0a 20 20 61 5b 32 5d 20 3d 20 70 50 61 67 65 72 . a[2] = pPager
7c30: 2d 3e 6d 78 50 61 67 65 3b 0a 20 20 61 5b 33 5d ->mxPage;. a[3]
7c40: 20 3d 20 70 50 61 67 65 72 2d 3e 64 62 53 69 7a = pPager->dbSiz
7c50: 65 3b 0a 20 20 61 5b 34 5d 20 3d 20 70 50 61 67 e;. a[4] = pPag
7c60: 65 72 2d 3e 73 74 61 74 65 3b 0a 20 20 61 5b 35 er->state;. a[5
7c70: 5d 20 3d 20 70 50 61 67 65 72 2d 3e 65 72 72 4d ] = pPager->errM
7c80: 61 73 6b 3b 0a 20 20 61 5b 36 5d 20 3d 20 70 50 ask;. a[6] = pP
7c90: 61 67 65 72 2d 3e 6e 48 69 74 3b 0a 20 20 61 5b ager->nHit;. a[
7ca0: 37 5d 20 3d 20 70 50 61 67 65 72 2d 3e 6e 4d 69 7] = pPager->nMi
7cb0: 73 73 3b 0a 20 20 61 5b 38 5d 20 3d 20 70 50 61 ss;. a[8] = pPa
7cc0: 67 65 72 2d 3e 6e 4f 76 66 6c 3b 0a 20 20 72 65 ger->nOvfl;. re
7cd0: 74 75 72 6e 20 61 3b 0a 7d 0a turn a;.}.