0000: 2f 2a 0a 2a 2a 20 32 30 30 34 20 4d 61 79 20 32 /*.** 2004 May 2
0010: 32 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68 2.**.** The auth
0020: 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 or disclaims cop
0030: 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 yright to this s
0040: 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 ource code. In
0050: 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65 place of.** a le
0060: 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 gal notice, here
0070: 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a is a blessing:.
0080: 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75 **.** May you
0090: 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 do good and not
00a0: 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79 evil..** May
00b0: 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76 you find forgiv
00c0: 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65 eness for yourse
00d0: 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f lf and forgive o
00e0: 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79 thers..** May
00f0: 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c you share freel
0100: 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20 y, never taking
0110: 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69 more than you gi
0120: 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a ve..**.*********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 0a 2a 2a 20 54 68 69 73 *****.**.** This
0180: 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 63 file contains c
0190: 6f 64 65 20 74 68 61 74 20 69 73 20 73 70 65 63 ode that is spec
01a0: 69 66 69 63 20 74 6f 20 55 6e 69 78 20 73 79 73 ific to Unix sys
01b0: 74 65 6d 73 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64 tems..*/.#includ
01c0: 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a e "sqliteInt.h".
01d0: 23 69 6e 63 6c 75 64 65 20 22 6f 73 2e 68 22 0a #include "os.h".
01e0: 23 69 66 20 4f 53 5f 55 4e 49 58 20 20 20 20 20 #if OS_UNIX
01f0: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 69 73 /* This
0200: 20 66 69 6c 65 20 69 73 20 75 73 65 64 20 6f 6e file is used on
0210: 20 75 6e 69 78 20 6f 6e 6c 79 20 2a 2f 0a 0a 2f unix only */../
0220: 2a 0a 2a 2a 20 54 68 65 73 65 20 23 64 65 66 69 *.** These #defi
0230: 6e 65 73 20 73 68 6f 75 6c 64 20 65 6e 61 62 6c nes should enabl
0240: 65 20 3e 32 47 42 20 66 69 6c 65 20 73 75 70 70 e >2GB file supp
0250: 6f 72 74 20 6f 6e 20 50 6f 73 69 78 20 69 66 20 ort on Posix if
0260: 74 68 65 0a 2a 2a 20 75 6e 64 65 72 6c 79 69 6e the.** underlyin
0270: 67 20 6f 70 65 72 61 74 69 6e 67 20 73 79 73 74 g operating syst
0280: 65 6d 20 73 75 70 70 6f 72 74 73 20 69 74 2e 20 em supports it.
0290: 20 49 66 20 74 68 65 20 4f 53 20 6c 61 63 6b 73 If the OS lacks
02a0: 0a 2a 2a 20 6c 61 72 67 65 20 66 69 6c 65 20 73 .** large file s
02b0: 75 70 70 6f 72 74 2c 20 74 68 65 73 65 20 73 68 upport, these sh
02c0: 6f 75 6c 64 20 62 65 20 6e 6f 2d 6f 70 73 2e 0a ould be no-ops..
02d0: 2a 2a 0a 2a 2a 20 4c 61 72 67 65 20 66 69 6c 65 **.** Large file
02e0: 20 73 75 70 70 6f 72 74 20 63 61 6e 20 62 65 20 support can be
02f0: 64 69 73 61 62 6c 65 64 20 75 73 69 6e 67 20 74 disabled using t
0300: 68 65 20 2d 44 53 51 4c 49 54 45 5f 44 49 53 41 he -DSQLITE_DISA
0310: 42 4c 45 5f 4c 46 53 20 73 77 69 74 63 68 0a 2a BLE_LFS switch.*
0320: 2a 20 6f 6e 20 74 68 65 20 63 6f 6d 70 69 6c 65 * on the compile
0330: 72 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 2e 20 r command line.
0340: 20 54 68 69 73 20 69 73 20 6e 65 63 65 73 73 61 This is necessa
0350: 72 79 20 69 66 20 79 6f 75 20 61 72 65 20 63 6f ry if you are co
0360: 6d 70 69 6c 69 6e 67 0a 2a 2a 20 6f 6e 20 61 20 mpiling.** on a
0370: 72 65 63 65 6e 74 20 6d 61 63 68 69 6e 65 20 28 recent machine (
0380: 65 78 3a 20 52 65 64 48 61 74 20 37 2e 32 29 20 ex: RedHat 7.2)
0390: 62 75 74 20 79 6f 75 20 77 61 6e 74 20 79 6f 75 but you want you
03a0: 72 20 63 6f 64 65 20 74 6f 20 77 6f 72 6b 0a 2a r code to work.*
03b0: 2a 20 6f 6e 20 61 6e 20 6f 6c 64 65 72 20 6d 61 * on an older ma
03c0: 63 68 69 6e 65 20 28 65 78 3a 20 52 65 64 48 61 chine (ex: RedHa
03d0: 74 20 36 2e 30 29 2e 20 20 49 66 20 79 6f 75 20 t 6.0). If you
03e0: 63 6f 6d 70 69 6c 65 20 6f 6e 20 52 65 64 48 61 compile on RedHa
03f0: 74 20 37 2e 32 0a 2a 2a 20 77 69 74 68 6f 75 74 t 7.2.** without
0400: 20 74 68 69 73 20 6f 70 74 69 6f 6e 2c 20 4c 46 this option, LF
0410: 53 20 69 73 20 65 6e 61 62 6c 65 2e 20 20 42 75 S is enable. Bu
0420: 74 20 4c 46 53 20 64 6f 65 73 20 6e 6f 74 20 65 t LFS does not e
0430: 78 69 73 74 20 69 6e 20 74 68 65 20 6b 65 72 6e xist in the kern
0440: 65 6c 0a 2a 2a 20 69 6e 20 52 65 64 48 61 74 20 el.** in RedHat
0450: 36 2e 30 2c 20 73 6f 20 74 68 65 20 63 6f 64 65 6.0, so the code
0460: 20 77 6f 6e 27 74 20 77 6f 72 6b 2e 20 20 48 65 won't work. He
0470: 6e 63 65 2c 20 66 6f 72 20 6d 61 78 69 6d 75 6d nce, for maximum
0480: 20 62 69 6e 61 72 79 0a 2a 2a 20 70 6f 72 74 61 binary.** porta
0490: 62 69 6c 69 74 79 20 79 6f 75 20 73 68 6f 75 6c bility you shoul
04a0: 64 20 6f 6d 69 74 20 4c 46 53 2e 0a 2a 2f 0a 23 d omit LFS..*/.#
04b0: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 44 49 ifndef SQLITE_DI
04c0: 53 41 42 4c 45 5f 4c 46 53 0a 23 20 64 65 66 69 SABLE_LFS.# defi
04d0: 6e 65 20 5f 4c 41 52 47 45 5f 46 49 4c 45 20 20 ne _LARGE_FILE
04e0: 20 20 20 20 20 31 0a 23 20 69 66 6e 64 65 66 20 1.# ifndef
04f0: 5f 46 49 4c 45 5f 4f 46 46 53 45 54 5f 42 49 54 _FILE_OFFSET_BIT
0500: 53 0a 23 20 20 20 64 65 66 69 6e 65 20 5f 46 49 S.# define _FI
0510: 4c 45 5f 4f 46 46 53 45 54 5f 42 49 54 53 20 36 LE_OFFSET_BITS 6
0520: 34 0a 23 20 65 6e 64 69 66 0a 23 20 64 65 66 69 4.# endif.# defi
0530: 6e 65 20 5f 4c 41 52 47 45 46 49 4c 45 5f 53 4f ne _LARGEFILE_SO
0540: 55 52 43 45 20 31 0a 23 65 6e 64 69 66 0a 0a 2f URCE 1.#endif../
0550: 2a 0a 2a 2a 20 73 74 61 6e 64 61 72 64 20 69 6e *.** standard in
0560: 63 6c 75 64 65 20 66 69 6c 65 73 2e 0a 2a 2f 0a clude files..*/.
0570: 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 74 79 #include <sys/ty
0580: 70 65 73 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 pes.h>.#include
0590: 3c 73 79 73 2f 73 74 61 74 2e 68 3e 0a 23 69 6e <sys/stat.h>.#in
05a0: 63 6c 75 64 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a clude <fcntl.h>.
05b0: 23 69 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 #include <unistd
05c0: 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 74 69 .h>.#include <ti
05d0: 6d 65 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c me.h>.#include <
05e0: 73 79 73 2f 74 69 6d 65 2e 68 3e 0a 23 69 6e 63 sys/time.h>.#inc
05f0: 6c 75 64 65 20 3c 65 72 72 6e 6f 2e 68 3e 0a 0a lude <errno.h>..
0600: 2f 2a 0a 2a 2a 20 49 66 20 77 65 20 61 72 65 20 /*.** If we are
0610: 74 6f 20 62 65 20 74 68 72 65 61 64 2d 73 61 66 to be thread-saf
0620: 65 2c 20 69 6e 63 6c 75 64 65 20 74 68 65 20 70 e, include the p
0630: 74 68 72 65 61 64 73 20 68 65 61 64 65 72 20 61 threads header a
0640: 6e 64 20 64 65 66 69 6e 65 0a 2a 2a 20 74 68 65 nd define.** the
0650: 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 SQLITE_UNIX_THR
0660: 45 41 44 53 20 6d 61 63 72 6f 2e 0a 2a 2f 0a 23 EADS macro..*/.#
0670: 69 66 20 64 65 66 69 6e 65 64 28 54 48 52 45 41 if defined(THREA
0680: 44 53 41 46 45 29 20 26 26 20 54 48 52 45 41 44 DSAFE) && THREAD
0690: 53 41 46 45 0a 23 20 69 6e 63 6c 75 64 65 20 3c SAFE.# include <
06a0: 70 74 68 72 65 61 64 2e 68 3e 0a 23 20 64 65 66 pthread.h>.# def
06b0: 69 6e 65 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f ine SQLITE_UNIX_
06c0: 54 48 52 45 41 44 53 20 31 0a 23 65 6e 64 69 66 THREADS 1.#endif
06d0: 0a 0a 2f 2a 0a 2a 2a 20 44 65 66 61 75 6c 74 20 ../*.** Default
06e0: 70 65 72 6d 69 73 73 69 6f 6e 73 20 77 68 65 6e permissions when
06f0: 20 63 72 65 61 74 69 6e 67 20 61 20 6e 65 77 20 creating a new
0700: 66 69 6c 65 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 file.*/.#ifndef
0710: 53 51 4c 49 54 45 5f 44 45 46 41 55 4c 54 5f 46 SQLITE_DEFAULT_F
0720: 49 4c 45 5f 50 45 52 4d 49 53 53 49 4f 4e 53 0a ILE_PERMISSIONS.
0730: 23 20 64 65 66 69 6e 65 20 53 51 4c 49 54 45 5f # define SQLITE_
0740: 44 45 46 41 55 4c 54 5f 46 49 4c 45 5f 50 45 52 DEFAULT_FILE_PER
0750: 4d 49 53 53 49 4f 4e 53 20 30 36 34 34 0a 23 65 MISSIONS 0644.#e
0760: 6e 64 69 66 0a 0a 0a 0a 2f 2a 0a 2a 2a 20 54 68 ndif..../*.** Th
0770: 65 20 75 6e 69 78 46 69 6c 65 20 73 74 72 75 63 e unixFile struc
0780: 74 75 72 65 20 69 73 20 73 75 62 63 6c 61 73 73 ture is subclass
0790: 20 6f 66 20 4f 73 46 69 6c 65 20 73 70 65 63 69 of OsFile speci
07a0: 66 69 63 20 66 6f 72 20 74 68 65 20 75 6e 69 78 fic for the unix
07b0: 0a 2a 2a 20 70 72 6f 74 61 62 69 6c 69 74 79 20 .** protability
07c0: 6c 61 79 65 72 2e 0a 2a 2f 0a 74 79 70 65 64 65 layer..*/.typede
07d0: 66 20 73 74 72 75 63 74 20 75 6e 69 78 46 69 6c f struct unixFil
07e0: 65 20 75 6e 69 78 46 69 6c 65 3b 0a 73 74 72 75 e unixFile;.stru
07f0: 63 74 20 75 6e 69 78 46 69 6c 65 20 7b 0a 20 20 ct unixFile {.
0800: 49 6f 4d 65 74 68 6f 64 20 63 6f 6e 73 74 20 2a IoMethod const *
0810: 70 4d 65 74 68 6f 64 3b 20 20 2f 2a 20 41 6c 77 pMethod; /* Alw
0820: 61 79 73 20 74 68 65 20 66 69 72 73 74 20 65 6e ays the first en
0830: 74 72 79 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 try */. struct
0840: 6f 70 65 6e 43 6e 74 20 2a 70 4f 70 65 6e 3b 20 openCnt *pOpen;
0850: 20 20 20 2f 2a 20 49 6e 66 6f 20 61 62 6f 75 74 /* Info about
0860: 20 61 6c 6c 20 6f 70 65 6e 20 66 64 27 73 20 6f all open fd's o
0870: 6e 20 74 68 69 73 20 69 6e 6f 64 65 20 2a 2f 0a n this inode */.
0880: 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 struct lockInf
0890: 6f 20 2a 70 4c 6f 63 6b 3b 20 20 20 2f 2a 20 49 o *pLock; /* I
08a0: 6e 66 6f 20 61 62 6f 75 74 20 6c 6f 63 6b 73 20 nfo about locks
08b0: 6f 6e 20 74 68 69 73 20 69 6e 6f 64 65 20 2a 2f on this inode */
08c0: 0a 20 20 69 6e 74 20 68 3b 20 20 20 20 20 20 20 . int h;
08d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
08e0: 54 68 65 20 66 69 6c 65 20 64 65 73 63 72 69 70 The file descrip
08f0: 74 6f 72 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 tor */. unsigne
0900: 64 20 63 68 61 72 20 6c 6f 63 6b 74 79 70 65 3b d char locktype;
0910: 20 20 20 2f 2a 20 54 68 65 20 74 79 70 65 20 6f /* The type o
0920: 66 20 6c 6f 63 6b 20 68 65 6c 64 20 6f 6e 20 74 f lock held on t
0930: 68 69 73 20 66 64 20 2a 2f 0a 20 20 75 6e 73 69 his fd */. unsi
0940: 67 6e 65 64 20 63 68 61 72 20 69 73 4f 70 65 6e gned char isOpen
0950: 3b 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 ; /* True if
0960: 20 6e 65 65 64 73 20 74 6f 20 62 65 20 63 6c 6f needs to be clo
0970: 73 65 64 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 sed */. unsigne
0980: 64 20 63 68 61 72 20 66 75 6c 6c 53 79 6e 63 3b d char fullSync;
0990: 20 20 20 2f 2a 20 55 73 65 20 46 5f 46 55 4c 4c /* Use F_FULL
09a0: 53 59 4e 43 20 69 66 20 61 76 61 69 6c 61 62 6c SYNC if availabl
09b0: 65 20 2a 2f 0a 20 20 69 6e 74 20 64 69 72 66 64 e */. int dirfd
09c0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
09d0: 20 2f 2a 20 46 69 6c 65 20 64 65 73 63 72 69 70 /* File descrip
09e0: 74 6f 72 20 66 6f 72 20 74 68 65 20 64 69 72 65 tor for the dire
09f0: 63 74 6f 72 79 20 2a 2f 0a 20 20 69 36 34 20 6f ctory */. i64 o
0a00: 66 66 73 65 74 3b 20 20 20 20 20 20 20 20 20 20 ffset;
0a10: 20 20 20 20 20 2f 2a 20 53 65 65 6b 20 6f 66 66 /* Seek off
0a20: 73 65 74 20 2a 2f 0a 23 69 66 64 65 66 20 53 51 set */.#ifdef SQ
0a30: 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 LITE_UNIX_THREAD
0a40: 53 0a 20 20 70 74 68 72 65 61 64 5f 74 20 74 69 S. pthread_t ti
0a50: 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a d; /*
0a60: 20 54 68 65 20 74 68 72 65 61 64 20 74 68 61 74 The thread that
0a70: 20 22 6f 77 6e 73 22 20 74 68 69 73 20 4f 73 46 "owns" this OsF
0a80: 69 6c 65 20 2a 2f 0a 23 65 6e 64 69 66 0a 7d 3b ile */.#endif.};
0a90: 0a 0a 2f 2a 0a 2a 2a 20 50 72 6f 76 69 64 65 20 ../*.** Provide
0aa0: 74 68 65 20 61 62 69 6c 69 74 79 20 74 6f 20 6f the ability to o
0ab0: 76 65 72 72 69 64 65 20 73 6f 6d 65 20 4f 53 2d verride some OS-
0ac0: 6c 61 79 65 72 20 66 75 6e 63 74 69 6f 6e 73 20 layer functions
0ad0: 64 75 72 69 6e 67 0a 2a 2a 20 74 65 73 74 69 6e during.** testin
0ae0: 67 2e 20 20 54 68 69 73 20 69 73 20 75 73 65 64 g. This is used
0af0: 20 74 6f 20 73 69 6d 75 6c 61 74 65 20 4f 53 20 to simulate OS
0b00: 63 72 61 73 68 65 73 20 74 6f 20 76 65 72 69 66 crashes to verif
0b10: 79 20 74 68 61 74 20 0a 2a 2a 20 63 6f 6d 6d 69 y that .** commi
0b20: 74 73 20 61 72 65 20 61 74 6f 6d 69 63 20 65 76 ts are atomic ev
0b30: 65 6e 20 69 6e 20 74 68 65 20 65 76 65 6e 74 20 en in the event
0b40: 6f 66 20 61 6e 20 4f 53 20 63 72 61 73 68 2e 0a of an OS crash..
0b50: 2a 2f 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 */.#ifdef SQLITE
0b60: 5f 43 52 41 53 48 5f 54 45 53 54 0a 20 20 65 78 _CRASH_TEST. ex
0b70: 74 65 72 6e 20 69 6e 74 20 73 71 6c 69 74 65 33 tern int sqlite3
0b80: 43 72 61 73 68 54 65 73 74 45 6e 61 62 6c 65 3b CrashTestEnable;
0b90: 0a 20 20 65 78 74 65 72 6e 20 69 6e 74 20 73 71 . extern int sq
0ba0: 6c 69 74 65 33 43 72 61 73 68 4f 70 65 6e 52 65 lite3CrashOpenRe
0bb0: 61 64 57 72 69 74 65 28 63 6f 6e 73 74 20 63 68 adWrite(const ch
0bc0: 61 72 2a 2c 20 4f 73 46 69 6c 65 2a 2a 2c 20 69 ar*, OsFile**, i
0bd0: 6e 74 2a 29 3b 0a 20 20 65 78 74 65 72 6e 20 69 nt*);. extern i
0be0: 6e 74 20 73 71 6c 69 74 65 33 43 72 61 73 68 4f nt sqlite3CrashO
0bf0: 70 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e penExclusive(con
0c00: 73 74 20 63 68 61 72 2a 2c 20 4f 73 46 69 6c 65 st char*, OsFile
0c10: 2a 2a 2c 20 69 6e 74 29 3b 0a 20 20 65 78 74 65 **, int);. exte
0c20: 72 6e 20 69 6e 74 20 73 71 6c 69 74 65 33 43 72 rn int sqlite3Cr
0c30: 61 73 68 4f 70 65 6e 52 65 61 64 4f 6e 6c 79 28 ashOpenReadOnly(
0c40: 63 6f 6e 73 74 20 63 68 61 72 2a 2c 20 4f 73 46 const char*, OsF
0c50: 69 6c 65 2a 2a 2c 20 69 6e 74 29 3b 0a 23 20 64 ile**, int);.# d
0c60: 65 66 69 6e 65 20 43 52 41 53 48 5f 54 45 53 54 efine CRASH_TEST
0c70: 5f 4f 56 45 52 52 49 44 45 28 58 2c 41 2c 42 2c _OVERRIDE(X,A,B,
0c80: 43 29 20 5c 0a 20 20 20 20 69 66 28 73 71 6c 69 C) \. if(sqli
0c90: 74 65 33 43 72 61 73 68 54 65 73 74 45 6e 61 62 te3CrashTestEnab
0ca0: 6c 65 29 7b 20 72 65 74 75 72 6e 20 58 28 41 2c le){ return X(A,
0cb0: 42 2c 43 29 3b 20 7d 0a 23 65 6c 73 65 0a 23 20 B,C); }.#else.#
0cc0: 64 65 66 69 6e 65 20 43 52 41 53 48 5f 54 45 53 define CRASH_TES
0cd0: 54 5f 4f 56 45 52 52 49 44 45 28 58 2c 41 2c 42 T_OVERRIDE(X,A,B
0ce0: 2c 43 29 20 20 2f 2a 20 6e 6f 2d 6f 70 20 2a 2f ,C) /* no-op */
0cf0: 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 .#endif.../*.**
0d00: 49 6e 63 6c 75 64 65 20 63 6f 64 65 20 74 68 61 Include code tha
0d10: 74 20 69 73 20 63 6f 6d 6d 6f 6e 20 74 6f 20 61 t is common to a
0d20: 6c 6c 20 6f 73 5f 2a 2e 63 20 66 69 6c 65 73 0a ll os_*.c files.
0d30: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 6f 73 5f */.#include "os_
0d40: 63 6f 6d 6d 6f 6e 2e 68 22 0a 0a 2f 2a 0a 2a 2a common.h"../*.**
0d50: 20 44 6f 20 6e 6f 74 20 69 6e 63 6c 75 64 65 20 Do not include
0d60: 61 6e 79 20 6f 66 20 74 68 65 20 46 69 6c 65 20 any of the File
0d70: 49 2f 4f 20 69 6e 74 65 72 66 61 63 65 20 70 72 I/O interface pr
0d80: 6f 63 65 64 75 72 65 73 20 69 66 20 74 68 65 0a ocedures if the.
0d90: 2a 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 44 ** SQLITE_OMIT_D
0da0: 49 53 4b 49 4f 20 6d 61 63 72 6f 20 69 73 20 64 ISKIO macro is d
0db0: 65 66 69 6e 65 64 20 28 69 6e 64 69 63 61 74 69 efined (indicati
0dc0: 6e 67 20 74 68 61 74 20 74 68 65 20 64 61 74 61 ng that the data
0dd0: 62 61 73 65 0a 2a 2a 20 77 69 6c 6c 20 62 65 20 base.** will be
0de0: 69 6e 2d 6d 65 6d 6f 72 79 20 6f 6e 6c 79 29 0a in-memory only).
0df0: 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 */.#ifndef SQLIT
0e00: 45 5f 4f 4d 49 54 5f 44 49 53 4b 49 4f 0a 0a 0a E_OMIT_DISKIO...
0e10: 2f 2a 0a 2a 2a 20 44 65 66 69 6e 65 20 76 61 72 /*.** Define var
0e20: 69 6f 75 73 20 6d 61 63 72 6f 73 20 74 68 61 74 ious macros that
0e30: 20 61 72 65 20 6d 69 73 73 69 6e 67 20 66 72 6f are missing fro
0e40: 6d 20 73 6f 6d 65 20 73 79 73 74 65 6d 73 2e 0a m some systems..
0e50: 2a 2f 0a 23 69 66 6e 64 65 66 20 4f 5f 4c 41 52 */.#ifndef O_LAR
0e60: 47 45 46 49 4c 45 0a 23 20 64 65 66 69 6e 65 20 GEFILE.# define
0e70: 4f 5f 4c 41 52 47 45 46 49 4c 45 20 30 0a 23 65 O_LARGEFILE 0.#e
0e80: 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49 ndif.#ifdef SQLI
0e90: 54 45 5f 44 49 53 41 42 4c 45 5f 4c 46 53 0a 23 TE_DISABLE_LFS.#
0ea0: 20 75 6e 64 65 66 20 4f 5f 4c 41 52 47 45 46 49 undef O_LARGEFI
0eb0: 4c 45 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4c 41 LE.# define O_LA
0ec0: 52 47 45 46 49 4c 45 20 30 0a 23 65 6e 64 69 66 RGEFILE 0.#endif
0ed0: 0a 23 69 66 6e 64 65 66 20 4f 5f 4e 4f 46 4f 4c .#ifndef O_NOFOL
0ee0: 4c 4f 57 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4e LOW.# define O_N
0ef0: 4f 46 4f 4c 4c 4f 57 20 30 0a 23 65 6e 64 69 66 OFOLLOW 0.#endif
0f00: 0a 23 69 66 6e 64 65 66 20 4f 5f 42 49 4e 41 52 .#ifndef O_BINAR
0f10: 59 0a 23 20 64 65 66 69 6e 65 20 4f 5f 42 49 4e Y.# define O_BIN
0f20: 41 52 59 20 30 0a 23 65 6e 64 69 66 0a 0a 2f 2a ARY 0.#endif../*
0f30: 0a 2a 2a 20 54 68 65 20 44 4a 47 50 50 20 63 6f .** The DJGPP co
0f40: 6d 70 69 6c 65 72 20 65 6e 76 69 72 6f 6e 6d 65 mpiler environme
0f50: 6e 74 20 6c 6f 6f 6b 73 20 6d 6f 73 74 6c 79 20 nt looks mostly
0f60: 6c 69 6b 65 20 55 6e 69 78 2c 20 62 75 74 20 69 like Unix, but i
0f70: 74 0a 2a 2a 20 6c 61 63 6b 73 20 74 68 65 20 66 t.** lacks the f
0f80: 63 6e 74 6c 28 29 20 73 79 73 74 65 6d 20 63 61 cntl() system ca
0f90: 6c 6c 2e 20 20 53 6f 20 72 65 64 65 66 69 6e 65 ll. So redefine
0fa0: 20 66 63 6e 74 6c 28 29 20 74 6f 20 62 65 20 73 fcntl() to be s
0fb0: 6f 6d 65 74 68 69 6e 67 0a 2a 2a 20 74 68 61 74 omething.** that
0fc0: 20 61 6c 77 61 79 73 20 73 75 63 63 65 65 64 73 always succeeds
0fd0: 2e 20 20 54 68 69 73 20 6d 65 61 6e 73 20 74 68 . This means th
0fe0: 61 74 20 6c 6f 63 6b 69 6e 67 20 64 6f 65 73 20 at locking does
0ff0: 6e 6f 74 20 6f 63 63 75 72 20 75 6e 64 65 72 0a not occur under.
1000: 2a 2a 20 44 4a 47 50 50 2e 20 20 42 75 74 20 69 ** DJGPP. But i
1010: 74 27 73 20 44 4f 53 20 2d 20 77 68 61 74 20 64 t's DOS - what d
1020: 69 64 20 79 6f 75 20 65 78 70 65 63 74 3f 0a 2a id you expect?.*
1030: 2f 0a 23 69 66 64 65 66 20 5f 5f 44 4a 47 50 50 /.#ifdef __DJGPP
1040: 5f 5f 0a 23 20 64 65 66 69 6e 65 20 66 63 6e 74 __.# define fcnt
1050: 6c 28 41 2c 42 2c 43 29 20 30 0a 23 65 6e 64 69 l(A,B,C) 0.#endi
1060: 66 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 74 68 72 f../*.** The thr
1070: 65 61 64 69 64 20 6d 61 63 72 6f 20 72 65 73 6f eadid macro reso
1080: 6c 76 65 73 20 74 6f 20 74 68 65 20 74 68 72 65 lves to the thre
1090: 61 64 2d 69 64 20 6f 72 20 74 6f 20 30 2e 20 20 ad-id or to 0.
10a0: 55 73 65 64 20 66 6f 72 0a 2a 2a 20 74 65 73 74 Used for.** test
10b0: 69 6e 67 20 61 6e 64 20 64 65 62 75 67 67 69 6e ing and debuggin
10c0: 67 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23 69 66 64 65 g only..*/.#ifde
10d0: 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 f SQLITE_UNIX_TH
10e0: 52 45 41 44 53 0a 23 64 65 66 69 6e 65 20 74 68 READS.#define th
10f0: 72 65 61 64 69 64 20 70 74 68 72 65 61 64 5f 73 readid pthread_s
1100: 65 6c 66 28 29 0a 23 65 6c 73 65 0a 23 64 65 66 elf().#else.#def
1110: 69 6e 65 20 74 68 72 65 61 64 69 64 20 30 0a 23 ine threadid 0.#
1120: 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 endif../*.** Set
1130: 20 6f 72 20 63 68 65 63 6b 20 74 68 65 20 4f 73 or check the Os
1140: 46 69 6c 65 2e 74 69 64 20 66 69 65 6c 64 2e 20 File.tid field.
1150: 20 54 68 69 73 20 66 69 65 6c 64 20 69 73 20 73 This field is s
1160: 65 74 20 77 68 65 6e 20 61 6e 20 4f 73 46 69 6c et when an OsFil
1170: 65 0a 2a 2a 20 69 73 20 66 69 72 73 74 20 6f 70 e.** is first op
1180: 65 6e 65 64 2e 20 20 41 6c 6c 20 73 75 62 73 65 ened. All subse
1190: 71 75 65 6e 74 20 75 73 65 73 20 6f 66 20 74 68 quent uses of th
11a0: 65 20 4f 73 46 69 6c 65 20 76 65 72 69 66 79 20 e OsFile verify
11b0: 74 68 61 74 20 74 68 65 0a 2a 2a 20 73 61 6d 65 that the.** same
11c0: 20 74 68 72 65 61 64 20 69 73 20 6f 70 65 72 61 thread is opera
11d0: 74 69 6e 67 20 6f 6e 20 74 68 65 20 4f 73 46 69 ting on the OsFi
11e0: 6c 65 2e 20 20 53 6f 6d 65 20 6f 70 65 72 61 74 le. Some operat
11f0: 69 6e 67 20 73 79 73 74 65 6d 73 20 64 6f 0a 2a ing systems do.*
1200: 2a 20 6e 6f 74 20 61 6c 6c 6f 77 20 6c 6f 63 6b * not allow lock
1210: 73 20 74 6f 20 62 65 20 6f 76 65 72 72 69 64 64 s to be overridd
1220: 65 6e 20 62 79 20 6f 74 68 65 72 20 74 68 72 65 en by other thre
1230: 61 64 73 20 61 6e 64 20 74 68 61 74 20 72 65 73 ads and that res
1240: 74 72 69 63 74 69 6f 6e 0a 2a 2a 20 6d 65 61 6e triction.** mean
1250: 73 20 74 68 61 74 20 73 71 6c 69 74 65 33 2a 20 s that sqlite3*
1260: 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 73 database handles
1270: 20 63 61 6e 6e 6f 74 20 62 65 20 6d 6f 76 65 64 cannot be moved
1280: 20 66 72 6f 6d 20 6f 6e 65 20 74 68 72 65 61 64 from one thread
1290: 0a 2a 2a 20 74 6f 20 61 6e 6f 74 68 65 72 2e 20 .** to another.
12a0: 20 54 68 69 73 20 6c 6f 67 69 63 20 6d 61 6b 65 This logic make
12b0: 73 20 73 75 72 65 20 61 20 75 73 65 72 20 64 6f s sure a user do
12c0: 65 73 20 6e 6f 74 20 74 72 79 20 74 6f 20 64 6f es not try to do
12d0: 20 74 68 61 74 0a 2a 2a 20 62 79 20 6d 69 73 74 that.** by mist
12e0: 61 6b 65 2e 0a 2a 2a 0a 2a 2a 20 56 65 72 73 69 ake..**.** Versi
12f0: 6f 6e 20 33 2e 33 2e 31 20 28 32 30 30 36 2d 30 on 3.3.1 (2006-0
1300: 31 2d 31 35 29 3a 20 20 4f 73 46 69 6c 65 73 20 1-15): OsFiles
1310: 63 61 6e 20 62 65 20 6d 6f 76 65 64 20 66 72 6f can be moved fro
1320: 6d 20 6f 6e 65 20 74 68 72 65 61 64 20 74 6f 0a m one thread to.
1330: 2a 2a 20 61 6e 6f 74 68 65 72 20 61 73 20 6c 6f ** another as lo
1340: 6e 67 20 61 73 20 77 65 20 61 72 65 20 72 75 6e ng as we are run
1350: 6e 69 6e 67 20 6f 6e 20 61 20 73 79 73 74 65 6d ning on a system
1360: 20 74 68 61 74 20 73 75 70 70 6f 72 74 73 20 74 that supports t
1370: 68 72 65 61 64 73 0a 2a 2a 20 6f 76 65 72 72 69 hreads.** overri
1380: 64 69 6e 67 20 65 61 63 68 20 6f 74 68 65 72 73 ding each others
1390: 20 6c 6f 63 6b 73 20 28 77 68 69 63 68 20 6e 6f locks (which no
13a0: 77 20 74 68 65 20 6d 6f 73 74 20 63 6f 6d 6d 6f w the most commo
13b0: 6e 20 62 65 68 61 76 69 6f 72 29 0a 2a 2a 20 6f n behavior).** o
13c0: 72 20 69 66 20 6e 6f 20 6c 6f 63 6b 73 20 61 72 r if no locks ar
13d0: 65 20 68 65 6c 64 2e 20 20 42 75 74 20 74 68 65 e held. But the
13e0: 20 4f 73 46 69 6c 65 2e 70 4c 6f 63 6b 20 66 69 OsFile.pLock fi
13f0: 65 6c 64 20 6e 65 65 64 73 20 74 6f 20 62 65 0a eld needs to be.
1400: 2a 2a 20 72 65 63 6f 6d 70 75 74 65 64 20 62 65 ** recomputed be
1410: 63 61 75 73 65 20 69 74 73 20 6b 65 79 20 69 6e cause its key in
1420: 63 6c 75 64 65 73 20 74 68 65 20 74 68 72 65 61 cludes the threa
1430: 64 2d 69 64 2e 20 20 53 65 65 20 74 68 65 20 0a d-id. See the .
1440: 2a 2a 20 74 72 61 6e 73 66 65 72 4f 77 6e 65 72 ** transferOwner
1450: 73 68 69 70 28 29 20 66 75 6e 63 74 69 6f 6e 20 ship() function
1460: 62 65 6c 6f 77 20 66 6f 72 20 61 64 64 69 74 69 below for additi
1470: 6f 6e 61 6c 20 69 6e 66 6f 72 6d 61 74 69 6f 6e onal information
1480: 0a 2a 2f 0a 23 69 66 20 64 65 66 69 6e 65 64 28 .*/.#if defined(
1490: 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 SQLITE_UNIX_THRE
14a0: 41 44 53 29 0a 23 20 64 65 66 69 6e 65 20 53 45 ADS).# define SE
14b0: 54 5f 54 48 52 45 41 44 49 44 28 58 29 20 20 20 T_THREADID(X)
14c0: 28 58 29 2d 3e 74 69 64 20 3d 20 70 74 68 72 65 (X)->tid = pthre
14d0: 61 64 5f 73 65 6c 66 28 29 0a 23 20 64 65 66 69 ad_self().# defi
14e0: 6e 65 20 43 48 45 43 4b 5f 54 48 52 45 41 44 49 ne CHECK_THREADI
14f0: 44 28 58 29 20 28 74 68 72 65 61 64 73 4f 76 65 D(X) (threadsOve
1500: 72 72 69 64 65 45 61 63 68 4f 74 68 65 72 73 4c rrideEachOthersL
1510: 6f 63 6b 73 3d 3d 30 20 26 26 20 5c 0a 20 20 20 ocks==0 && \.
1520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1530: 20 20 20 20 20 20 20 20 20 21 70 74 68 72 65 61 !pthrea
1540: 64 5f 65 71 75 61 6c 28 28 58 29 2d 3e 74 69 64 d_equal((X)->tid
1550: 2c 20 70 74 68 72 65 61 64 5f 73 65 6c 66 28 29 , pthread_self()
1560: 29 29 0a 23 65 6c 73 65 0a 23 20 64 65 66 69 6e )).#else.# defin
1570: 65 20 53 45 54 5f 54 48 52 45 41 44 49 44 28 58 e SET_THREADID(X
1580: 29 0a 23 20 64 65 66 69 6e 65 20 43 48 45 43 4b ).# define CHECK
1590: 5f 54 48 52 45 41 44 49 44 28 58 29 20 30 0a 23 _THREADID(X) 0.#
15a0: 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 48 65 72 endif../*.** Her
15b0: 65 20 69 73 20 74 68 65 20 64 69 72 74 20 6f 6e e is the dirt on
15c0: 20 50 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20 POSIX advisory
15d0: 6c 6f 63 6b 73 3a 20 20 41 4e 53 49 20 53 54 44 locks: ANSI STD
15e0: 20 31 30 30 33 2e 31 20 28 31 39 39 36 29 0a 2a 1003.1 (1996).*
15f0: 2a 20 73 65 63 74 69 6f 6e 20 36 2e 35 2e 32 2e * section 6.5.2.
1600: 32 20 6c 69 6e 65 73 20 34 38 33 20 74 68 72 6f 2 lines 483 thro
1610: 75 67 68 20 34 39 30 20 73 70 65 63 69 66 79 20 ugh 490 specify
1620: 74 68 61 74 20 77 68 65 6e 20 61 20 70 72 6f 63 that when a proc
1630: 65 73 73 0a 2a 2a 20 73 65 74 73 20 6f 72 20 63 ess.** sets or c
1640: 6c 65 61 72 73 20 61 20 6c 6f 63 6b 2c 20 74 68 lears a lock, th
1650: 61 74 20 6f 70 65 72 61 74 69 6f 6e 20 6f 76 65 at operation ove
1660: 72 72 69 64 65 73 20 61 6e 79 20 70 72 69 6f 72 rrides any prior
1670: 20 6c 6f 63 6b 73 20 73 65 74 0a 2a 2a 20 62 79 locks set.** by
1680: 20 74 68 65 20 73 61 6d 65 20 70 72 6f 63 65 73 the same proces
1690: 73 2e 20 20 49 74 20 64 6f 65 73 20 6e 6f 74 20 s. It does not
16a0: 65 78 70 6c 69 63 69 74 6c 79 20 73 61 79 20 73 explicitly say s
16b0: 6f 2c 20 62 75 74 20 74 68 69 73 20 69 6d 70 6c o, but this impl
16c0: 69 65 73 0a 2a 2a 20 74 68 61 74 20 69 74 20 6f ies.** that it o
16d0: 76 65 72 72 69 64 65 73 20 6c 6f 63 6b 73 20 73 verrides locks s
16e0: 65 74 20 62 79 20 74 68 65 20 73 61 6d 65 20 70 et by the same p
16f0: 72 6f 63 65 73 73 20 75 73 69 6e 67 20 61 20 64 rocess using a d
1700: 69 66 66 65 72 65 6e 74 0a 2a 2a 20 66 69 6c 65 ifferent.** file
1710: 20 64 65 73 63 72 69 70 74 6f 72 2e 20 20 43 6f descriptor. Co
1720: 6e 73 69 64 65 72 20 74 68 69 73 20 74 65 73 74 nsider this test
1730: 20 63 61 73 65 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 case:.**.**
1740: 20 20 20 69 6e 74 20 66 64 31 20 3d 20 6f 70 65 int fd1 = ope
1750: 6e 28 22 2e 2f 66 69 6c 65 31 22 2c 20 4f 5f 52 n("./file1", O_R
1760: 44 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 DWR|O_CREAT, 064
1770: 34 29 3b 0a 2a 2a 20 20 20 20 20 20 20 69 6e 74 4);.** int
1780: 20 66 64 32 20 3d 20 6f 70 65 6e 28 22 2e 2f 66 fd2 = open("./f
1790: 69 6c 65 32 22 2c 20 4f 5f 52 44 57 52 7c 4f 5f ile2", O_RDWR|O_
17a0: 43 52 45 41 54 2c 20 30 36 34 34 29 3b 0a 2a 2a CREAT, 0644);.**
17b0: 0a 2a 2a 20 53 75 70 70 6f 73 65 20 2e 2f 66 69 .** Suppose ./fi
17c0: 6c 65 31 20 61 6e 64 20 2e 2f 66 69 6c 65 32 20 le1 and ./file2
17d0: 61 72 65 20 72 65 61 6c 6c 79 20 74 68 65 20 73 are really the s
17e0: 61 6d 65 20 66 69 6c 65 20 28 62 65 63 61 75 73 ame file (becaus
17f0: 65 0a 2a 2a 20 6f 6e 65 20 69 73 20 61 20 68 61 e.** one is a ha
1800: 72 64 20 6f 72 20 73 79 6d 62 6f 6c 69 63 20 6c rd or symbolic l
1810: 69 6e 6b 20 74 6f 20 74 68 65 20 6f 74 68 65 72 ink to the other
1820: 29 20 74 68 65 6e 20 69 66 20 79 6f 75 20 73 65 ) then if you se
1830: 74 0a 2a 2a 20 61 6e 20 65 78 63 6c 75 73 69 76 t.** an exclusiv
1840: 65 20 6c 6f 63 6b 20 6f 6e 20 66 64 31 2c 20 74 e lock on fd1, t
1850: 68 65 6e 20 74 72 79 20 74 6f 20 67 65 74 20 61 hen try to get a
1860: 6e 20 65 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b n exclusive lock
1870: 0a 2a 2a 20 6f 6e 20 66 64 32 2c 20 69 74 20 77 .** on fd2, it w
1880: 6f 72 6b 73 2e 20 20 49 20 77 6f 75 6c 64 20 68 orks. I would h
1890: 61 76 65 20 65 78 70 65 63 74 65 64 20 74 68 65 ave expected the
18a0: 20 73 65 63 6f 6e 64 20 6c 6f 63 6b 20 74 6f 0a second lock to.
18b0: 2a 2a 20 66 61 69 6c 20 73 69 6e 63 65 20 74 68 ** fail since th
18c0: 65 72 65 20 77 61 73 20 61 6c 72 65 61 64 79 20 ere was already
18d0: 61 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69 a lock on the fi
18e0: 6c 65 20 64 75 65 20 74 6f 20 66 64 31 2e 0a 2a le due to fd1..*
18f0: 2a 20 42 75 74 20 6e 6f 74 20 73 6f 2e 20 20 53 * But not so. S
1900: 69 6e 63 65 20 62 6f 74 68 20 6c 6f 63 6b 73 20 ince both locks
1910: 63 61 6d 65 20 66 72 6f 6d 20 74 68 65 20 73 61 came from the sa
1920: 6d 65 20 70 72 6f 63 65 73 73 2c 20 74 68 65 0a me process, the.
1930: 2a 2a 20 73 65 63 6f 6e 64 20 6f 76 65 72 72 69 ** second overri
1940: 64 65 73 20 74 68 65 20 66 69 72 73 74 2c 20 65 des the first, e
1950: 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65 79 20 ven though they
1960: 77 65 72 65 20 6f 6e 20 64 69 66 66 65 72 65 6e were on differen
1970: 74 0a 2a 2a 20 66 69 6c 65 20 64 65 73 63 72 69 t.** file descri
1980: 70 74 6f 72 73 20 6f 70 65 6e 65 64 20 6f 6e 20 ptors opened on
1990: 64 69 66 66 65 72 65 6e 74 20 66 69 6c 65 20 6e different file n
19a0: 61 6d 65 73 2e 0a 2a 2a 0a 2a 2a 20 42 75 6d 6d ames..**.** Bumm
19b0: 65 72 2e 20 20 49 66 20 79 6f 75 20 61 73 6b 20 er. If you ask
19c0: 6d 65 2c 20 74 68 69 73 20 69 73 20 62 72 6f 6b me, this is brok
19d0: 65 6e 2e 20 20 42 61 64 6c 79 20 62 72 6f 6b 65 en. Badly broke
19e0: 6e 2e 20 20 49 74 20 6d 65 61 6e 73 0a 2a 2a 20 n. It means.**
19f0: 74 68 61 74 20 77 65 20 63 61 6e 6e 6f 74 20 75 that we cannot u
1a00: 73 65 20 50 4f 53 49 58 20 6c 6f 63 6b 73 20 74 se POSIX locks t
1a10: 6f 20 73 79 6e 63 68 72 6f 6e 69 7a 65 20 66 69 o synchronize fi
1a20: 6c 65 20 61 63 63 65 73 73 20 61 6d 6f 6e 67 0a le access among.
1a30: 2a 2a 20 63 6f 6d 70 65 74 69 6e 67 20 74 68 72 ** competing thr
1a40: 65 61 64 73 20 6f 66 20 74 68 65 20 73 61 6d 65 eads of the same
1a50: 20 70 72 6f 63 65 73 73 2e 20 20 50 4f 53 49 58 process. POSIX
1a60: 20 6c 6f 63 6b 73 20 77 69 6c 6c 20 77 6f 72 6b locks will work
1a70: 20 66 69 6e 65 0a 2a 2a 20 74 6f 20 73 79 6e 63 fine.** to sync
1a80: 68 72 6f 6e 69 7a 65 20 61 63 63 65 73 73 20 66 hronize access f
1a90: 6f 72 20 74 68 72 65 61 64 73 20 69 6e 20 73 65 or threads in se
1aa0: 70 61 72 61 74 65 20 70 72 6f 63 65 73 73 65 73 parate processes
1ab0: 2c 20 62 75 74 20 6e 6f 74 0a 2a 2a 20 74 68 72 , but not.** thr
1ac0: 65 61 64 73 20 77 69 74 68 69 6e 20 74 68 65 20 eads within the
1ad0: 73 61 6d 65 20 70 72 6f 63 65 73 73 2e 0a 2a 2a same process..**
1ae0: 0a 2a 2a 20 54 6f 20 77 6f 72 6b 20 61 72 6f 75 .** To work arou
1af0: 6e 64 20 74 68 65 20 70 72 6f 62 6c 65 6d 2c 20 nd the problem,
1b00: 53 51 4c 69 74 65 20 68 61 73 20 74 6f 20 6d 61 SQLite has to ma
1b10: 6e 61 67 65 20 66 69 6c 65 20 6c 6f 63 6b 73 20 nage file locks
1b20: 69 6e 74 65 72 6e 61 6c 6c 79 0a 2a 2a 20 6f 6e internally.** on
1b30: 20 69 74 73 20 6f 77 6e 2e 20 20 57 68 65 6e 65 its own. Whene
1b40: 76 65 72 20 61 20 6e 65 77 20 64 61 74 61 62 61 ver a new databa
1b50: 73 65 20 69 73 20 6f 70 65 6e 65 64 2c 20 77 65 se is opened, we
1b60: 20 68 61 76 65 20 74 6f 20 66 69 6e 64 20 74 68 have to find th
1b70: 65 0a 2a 2a 20 73 70 65 63 69 66 69 63 20 69 6e e.** specific in
1b80: 6f 64 65 20 6f 66 20 74 68 65 20 64 61 74 61 62 ode of the datab
1b90: 61 73 65 20 66 69 6c 65 20 28 74 68 65 20 69 6e ase file (the in
1ba0: 6f 64 65 20 69 73 20 64 65 74 65 72 6d 69 6e 65 ode is determine
1bb0: 64 20 62 79 20 74 68 65 0a 2a 2a 20 73 74 5f 64 d by the.** st_d
1bc0: 65 76 20 61 6e 64 20 73 74 5f 69 6e 6f 20 66 69 ev and st_ino fi
1bd0: 65 6c 64 73 20 6f 66 20 74 68 65 20 73 74 61 74 elds of the stat
1be0: 20 73 74 72 75 63 74 75 72 65 20 74 68 61 74 20 structure that
1bf0: 66 73 74 61 74 28 29 20 66 69 6c 6c 73 20 69 6e fstat() fills in
1c00: 29 0a 2a 2a 20 61 6e 64 20 63 68 65 63 6b 20 66 ).** and check f
1c10: 6f 72 20 6c 6f 63 6b 73 20 61 6c 72 65 61 64 79 or locks already
1c20: 20 65 78 69 73 74 69 6e 67 20 6f 6e 20 74 68 61 existing on tha
1c30: 74 20 69 6e 6f 64 65 2e 20 20 57 68 65 6e 20 6c t inode. When l
1c40: 6f 63 6b 73 20 61 72 65 0a 2a 2a 20 63 72 65 61 ocks are.** crea
1c50: 74 65 64 20 6f 72 20 72 65 6d 6f 76 65 64 2c 20 ted or removed,
1c60: 77 65 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 we have to look
1c70: 61 74 20 6f 75 72 20 6f 77 6e 20 69 6e 74 65 72 at our own inter
1c80: 6e 61 6c 20 72 65 63 6f 72 64 20 6f 66 20 74 68 nal record of th
1c90: 65 0a 2a 2a 20 6c 6f 63 6b 73 20 74 6f 20 73 65 e.** locks to se
1ca0: 65 20 69 66 20 61 6e 6f 74 68 65 72 20 74 68 72 e if another thr
1cb0: 65 61 64 20 68 61 73 20 70 72 65 76 69 6f 75 73 ead has previous
1cc0: 6c 79 20 73 65 74 20 61 20 6c 6f 63 6b 20 6f 6e ly set a lock on
1cd0: 20 74 68 61 74 20 73 61 6d 65 0a 2a 2a 20 69 6e that same.** in
1ce0: 6f 64 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 4f ode..**.** The O
1cf0: 73 46 69 6c 65 20 73 74 72 75 63 74 75 72 65 20 sFile structure
1d00: 66 6f 72 20 50 4f 53 49 58 20 69 73 20 6e 6f 20 for POSIX is no
1d10: 6c 6f 6e 67 65 72 20 6a 75 73 74 20 61 6e 20 69 longer just an i
1d20: 6e 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a 20 64 nteger file.** d
1d30: 65 73 63 72 69 70 74 6f 72 2e 20 20 49 74 20 69 escriptor. It i
1d40: 73 20 6e 6f 77 20 61 20 73 74 72 75 63 74 75 72 s now a structur
1d50: 65 20 74 68 61 74 20 68 6f 6c 64 73 20 74 68 65 e that holds the
1d60: 20 69 6e 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a integer file.**
1d70: 20 64 65 73 63 72 69 70 74 6f 72 20 61 6e 64 20 descriptor and
1d80: 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 20 73 a pointer to a s
1d90: 74 72 75 63 74 75 72 65 20 74 68 61 74 20 64 65 tructure that de
1da0: 73 63 72 69 62 65 73 20 74 68 65 20 69 6e 74 65 scribes the inte
1db0: 72 6e 61 6c 0a 2a 2a 20 6c 6f 63 6b 73 20 6f 6e rnal.** locks on
1dc0: 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 the correspondi
1dd0: 6e 67 20 69 6e 6f 64 65 2e 20 20 54 68 65 72 65 ng inode. There
1de0: 20 69 73 20 6f 6e 65 20 6c 6f 63 6b 69 6e 67 20 is one locking
1df0: 73 74 72 75 63 74 75 72 65 0a 2a 2a 20 70 65 72 structure.** per
1e00: 20 69 6e 6f 64 65 2c 20 73 6f 20 69 66 20 74 68 inode, so if th
1e10: 65 20 73 61 6d 65 20 69 6e 6f 64 65 20 69 73 20 e same inode is
1e20: 6f 70 65 6e 65 64 20 74 77 69 63 65 2c 20 62 6f opened twice, bo
1e30: 74 68 20 4f 73 46 69 6c 65 20 73 74 72 75 63 74 th OsFile struct
1e40: 75 72 65 73 0a 2a 2a 20 70 6f 69 6e 74 20 74 6f ures.** point to
1e50: 20 74 68 65 20 73 61 6d 65 20 6c 6f 63 6b 69 6e the same lockin
1e60: 67 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 g structure. Th
1e70: 65 20 6c 6f 63 6b 69 6e 67 20 73 74 72 75 63 74 e locking struct
1e80: 75 72 65 20 6b 65 65 70 73 0a 2a 2a 20 61 20 72 ure keeps.** a r
1e90: 65 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 28 eference count (
1ea0: 73 6f 20 77 65 20 77 69 6c 6c 20 6b 6e 6f 77 20 so we will know
1eb0: 77 68 65 6e 20 74 6f 20 64 65 6c 65 74 65 20 69 when to delete i
1ec0: 74 29 20 61 6e 64 20 61 20 22 63 6e 74 22 0a 2a t) and a "cnt".*
1ed0: 2a 20 66 69 65 6c 64 20 74 68 61 74 20 74 65 6c * field that tel
1ee0: 6c 73 20 75 73 20 69 74 73 20 69 6e 74 65 72 6e ls us its intern
1ef0: 61 6c 20 6c 6f 63 6b 20 73 74 61 74 75 73 2e 20 al lock status.
1f00: 20 63 6e 74 3d 3d 30 20 6d 65 61 6e 73 20 74 68 cnt==0 means th
1f10: 65 0a 2a 2a 20 66 69 6c 65 20 69 73 20 75 6e 6c e.** file is unl
1f20: 6f 63 6b 65 64 2e 20 20 63 6e 74 3d 3d 2d 31 20 ocked. cnt==-1
1f30: 6d 65 61 6e 73 20 74 68 65 20 66 69 6c 65 20 68 means the file h
1f40: 61 73 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20 as an exclusive
1f50: 6c 6f 63 6b 2e 0a 2a 2a 20 63 6e 74 3e 30 20 6d lock..** cnt>0 m
1f60: 65 61 6e 73 20 74 68 65 72 65 20 61 72 65 20 63 eans there are c
1f70: 6e 74 20 73 68 61 72 65 64 20 6c 6f 63 6b 73 20 nt shared locks
1f80: 6f 6e 20 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 0a on the file..**.
1f90: 2a 2a 20 41 6e 79 20 61 74 74 65 6d 70 74 20 74 ** Any attempt t
1fa0: 6f 20 6c 6f 63 6b 20 6f 72 20 75 6e 6c 6f 63 6b o lock or unlock
1fb0: 20 61 20 66 69 6c 65 20 66 69 72 73 74 20 63 68 a file first ch
1fc0: 65 63 6b 73 20 74 68 65 20 6c 6f 63 6b 69 6e 67 ecks the locking
1fd0: 0a 2a 2a 20 73 74 72 75 63 74 75 72 65 2e 20 20 .** structure.
1fe0: 54 68 65 20 66 63 6e 74 6c 28 29 20 73 79 73 74 The fcntl() syst
1ff0: 65 6d 20 63 61 6c 6c 20 69 73 20 6f 6e 6c 79 20 em call is only
2000: 69 6e 76 6f 6b 65 64 20 74 6f 20 73 65 74 20 61 invoked to set a
2010: 20 0a 2a 2a 20 50 4f 53 49 58 20 6c 6f 63 6b 20 .** POSIX lock
2020: 69 66 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 20 if the internal
2030: 6c 6f 63 6b 20 73 74 72 75 63 74 75 72 65 20 74 lock structure t
2040: 72 61 6e 73 69 74 69 6f 6e 73 20 62 65 74 77 65 ransitions betwe
2050: 65 6e 0a 2a 2a 20 61 20 6c 6f 63 6b 65 64 20 61 en.** a locked a
2060: 6e 64 20 61 6e 20 75 6e 6c 6f 63 6b 65 64 20 73 nd an unlocked s
2070: 74 61 74 65 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 34 tate..**.** 2004
2080: 2d 4a 61 6e 2d 31 31 3a 0a 2a 2a 20 4d 6f 72 65 -Jan-11:.** More
2090: 20 72 65 63 65 6e 74 20 64 69 73 63 6f 76 65 72 recent discover
20a0: 69 65 73 20 61 62 6f 75 74 20 50 4f 53 49 58 20 ies about POSIX
20b0: 61 64 76 69 73 6f 72 79 20 6c 6f 63 6b 73 2e 20 advisory locks.
20c0: 20 28 54 68 65 20 6d 6f 72 65 0a 2a 2a 20 49 20 (The more.** I
20d0: 64 69 73 63 6f 76 65 72 2c 20 74 68 65 20 6d 6f discover, the mo
20e0: 72 65 20 49 20 72 65 61 6c 69 7a 65 20 74 68 65 re I realize the
20f0: 20 61 20 50 4f 53 49 58 20 61 64 76 69 73 6f 72 a POSIX advisor
2100: 79 20 6c 6f 63 6b 73 20 61 72 65 0a 2a 2a 20 61 y locks are.** a
2110: 6e 20 61 62 6f 6d 69 6e 61 74 69 6f 6e 2e 29 0a n abomination.).
2120: 2a 2a 0a 2a 2a 20 49 66 20 79 6f 75 20 63 6c 6f **.** If you clo
2130: 73 65 20 61 20 66 69 6c 65 20 64 65 73 63 72 69 se a file descri
2140: 70 74 6f 72 20 74 68 61 74 20 70 6f 69 6e 74 73 ptor that points
2150: 20 74 6f 20 61 20 66 69 6c 65 20 74 68 61 74 20 to a file that
2160: 68 61 73 20 6c 6f 63 6b 73 2c 0a 2a 2a 20 61 6c has locks,.** al
2170: 6c 20 6c 6f 63 6b 73 20 6f 6e 20 74 68 61 74 20 l locks on that
2180: 66 69 6c 65 20 74 68 61 74 20 61 72 65 20 6f 77 file that are ow
2190: 6e 65 64 20 62 79 20 74 68 65 20 63 75 72 72 65 ned by the curre
21a0: 6e 74 20 70 72 6f 63 65 73 73 20 61 72 65 0a 2a nt process are.*
21b0: 2a 20 72 65 6c 65 61 73 65 64 2e 20 20 54 6f 20 * released. To
21c0: 77 6f 72 6b 20 61 72 6f 75 6e 64 20 74 68 69 73 work around this
21d0: 20 70 72 6f 62 6c 65 6d 2c 20 65 61 63 68 20 4f problem, each O
21e0: 73 46 69 6c 65 20 73 74 72 75 63 74 75 72 65 20 sFile structure
21f0: 63 6f 6e 74 61 69 6e 73 0a 2a 2a 20 61 20 70 6f contains.** a po
2200: 69 6e 74 65 72 20 74 6f 20 61 6e 20 6f 70 65 6e inter to an open
2210: 43 6e 74 20 73 74 72 75 63 74 75 72 65 2e 20 20 Cnt structure.
2220: 54 68 65 72 65 20 69 73 20 6f 6e 65 20 6f 70 65 There is one ope
2230: 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65 0a 2a nCnt structure.*
2240: 2a 20 70 65 72 20 6f 70 65 6e 20 69 6e 6f 64 65 * per open inode
2250: 2c 20 77 68 69 63 68 20 6d 65 61 6e 73 20 74 68 , which means th
2260: 61 74 20 6d 75 6c 74 69 70 6c 65 20 4f 73 46 69 at multiple OsFi
2270: 6c 65 73 20 63 61 6e 20 70 6f 69 6e 74 20 74 6f les can point to
2280: 20 61 20 73 69 6e 67 6c 65 0a 2a 2a 20 6f 70 65 a single.** ope
2290: 6e 43 6e 74 2e 20 20 57 68 65 6e 20 61 6e 20 61 nCnt. When an a
22a0: 74 74 65 6d 70 74 20 69 73 20 6d 61 64 65 20 74 ttempt is made t
22b0: 6f 20 63 6c 6f 73 65 20 61 6e 20 4f 73 46 69 6c o close an OsFil
22c0: 65 2c 20 69 66 20 74 68 65 72 65 20 61 72 65 0a e, if there are.
22d0: 2a 2a 20 6f 74 68 65 72 20 4f 73 46 69 6c 65 73 ** other OsFiles
22e0: 20 6f 70 65 6e 20 6f 6e 20 74 68 65 20 73 61 6d open on the sam
22f0: 65 20 69 6e 6f 64 65 20 74 68 61 74 20 61 72 65 e inode that are
2300: 20 68 6f 6c 64 69 6e 67 20 6c 6f 63 6b 73 2c 20 holding locks,
2310: 74 68 65 20 63 61 6c 6c 0a 2a 2a 20 74 6f 20 63 the call.** to c
2320: 6c 6f 73 65 28 29 20 74 68 65 20 66 69 6c 65 20 lose() the file
2330: 64 65 73 63 72 69 70 74 6f 72 20 69 73 20 64 65 descriptor is de
2340: 66 65 72 72 65 64 20 75 6e 74 69 6c 20 61 6c 6c ferred until all
2350: 20 6f 66 20 74 68 65 20 6c 6f 63 6b 73 20 63 6c of the locks cl
2360: 65 61 72 2e 0a 2a 2a 20 54 68 65 20 6f 70 65 6e ear..** The open
2370: 43 6e 74 20 73 74 72 75 63 74 75 72 65 20 6b 65 Cnt structure ke
2380: 65 70 73 20 61 20 6c 69 73 74 20 6f 66 20 66 69 eps a list of fi
2390: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 73 20 74 le descriptors t
23a0: 68 61 74 20 6e 65 65 64 20 74 6f 0a 2a 2a 20 62 hat need to.** b
23b0: 65 20 63 6c 6f 73 65 64 20 61 6e 64 20 74 68 61 e closed and tha
23c0: 74 20 6c 69 73 74 20 69 73 20 77 61 6c 6b 65 64 t list is walked
23d0: 20 28 61 6e 64 20 63 6c 65 61 72 65 64 29 20 77 (and cleared) w
23e0: 68 65 6e 20 74 68 65 20 6c 61 73 74 20 6c 6f 63 hen the last loc
23f0: 6b 0a 2a 2a 20 63 6c 65 61 72 73 2e 0a 2a 2a 0a k.** clears..**.
2400: 2a 2a 20 46 69 72 73 74 2c 20 75 6e 64 65 72 20 ** First, under
2410: 4c 69 6e 75 78 20 74 68 72 65 61 64 73 2c 20 62 Linux threads, b
2420: 65 63 61 75 73 65 20 65 61 63 68 20 74 68 72 65 ecause each thre
2430: 61 64 20 68 61 73 20 61 20 73 65 70 61 72 61 74 ad has a separat
2440: 65 0a 2a 2a 20 70 72 6f 63 65 73 73 20 49 44 2c e.** process ID,
2450: 20 6c 6f 63 6b 20 6f 70 65 72 61 74 69 6f 6e 73 lock operations
2460: 20 69 6e 20 6f 6e 65 20 74 68 72 65 61 64 20 64 in one thread d
2470: 6f 20 6e 6f 74 20 6f 76 65 72 72 69 64 65 20 6c o not override l
2480: 6f 63 6b 73 0a 2a 2a 20 74 6f 20 74 68 65 20 73 ocks.** to the s
2490: 61 6d 65 20 66 69 6c 65 20 69 6e 20 6f 74 68 65 ame file in othe
24a0: 72 20 74 68 72 65 61 64 73 2e 20 20 4c 69 6e 75 r threads. Linu
24b0: 78 20 74 68 72 65 61 64 73 20 62 65 68 61 76 65 x threads behave
24c0: 20 6c 69 6b 65 0a 2a 2a 20 73 65 70 61 72 61 74 like.** separat
24d0: 65 20 70 72 6f 63 65 73 73 65 73 20 69 6e 20 74 e processes in t
24e0: 68 69 73 20 72 65 73 70 65 63 74 2e 20 20 42 75 his respect. Bu
24f0: 74 2c 20 69 66 20 79 6f 75 20 63 6c 6f 73 65 20 t, if you close
2500: 61 20 66 69 6c 65 0a 2a 2a 20 64 65 73 63 72 69 a file.** descri
2510: 70 74 6f 72 20 69 6e 20 6c 69 6e 75 78 20 74 68 ptor in linux th
2520: 72 65 61 64 73 2c 20 61 6c 6c 20 6c 6f 63 6b 73 reads, all locks
2530: 20 61 72 65 20 63 6c 65 61 72 65 64 2c 20 65 76 are cleared, ev
2540: 65 6e 20 6c 6f 63 6b 73 0a 2a 2a 20 6f 6e 20 6f en locks.** on o
2550: 74 68 65 72 20 74 68 72 65 61 64 73 20 61 6e 64 ther threads and
2560: 20 65 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65 even though the
2570: 20 6f 74 68 65 72 20 74 68 72 65 61 64 73 20 68 other threads h
2580: 61 76 65 20 64 69 66 66 65 72 65 6e 74 0a 2a 2a ave different.**
2590: 20 70 72 6f 63 65 73 73 20 49 44 73 2e 20 20 4c process IDs. L
25a0: 69 6e 75 78 20 74 68 72 65 61 64 73 20 69 73 20 inux threads is
25b0: 69 6e 63 6f 6e 73 69 73 74 65 6e 74 20 69 6e 20 inconsistent in
25c0: 74 68 69 73 20 72 65 73 70 65 63 74 2e 0a 2a 2a this respect..**
25d0: 20 28 49 27 6d 20 62 65 67 69 6e 6e 69 6e 67 20 (I'm beginning
25e0: 74 6f 20 74 68 69 6e 6b 20 74 68 61 74 20 6c 69 to think that li
25f0: 6e 75 78 20 74 68 72 65 61 64 73 20 69 73 20 61 nux threads is a
2600: 6e 20 61 62 6f 6d 69 6e 61 74 69 6f 6e 20 74 6f n abomination to
2610: 6f 2e 29 0a 2a 2a 20 54 68 65 20 63 6f 6e 73 65 o.).** The conse
2620: 71 75 65 6e 63 65 20 6f 66 20 74 68 69 73 20 61 quence of this a
2630: 6c 6c 20 69 73 20 74 68 61 74 20 74 68 65 20 68 ll is that the h
2640: 61 73 68 20 74 61 62 6c 65 20 66 6f 72 20 74 68 ash table for th
2650: 65 20 6c 6f 63 6b 49 6e 66 6f 0a 2a 2a 20 73 74 e lockInfo.** st
2660: 72 75 63 74 75 72 65 20 68 61 73 20 74 6f 20 69 ructure has to i
2670: 6e 63 6c 75 64 65 20 74 68 65 20 70 72 6f 63 65 nclude the proce
2680: 73 73 20 69 64 20 61 73 20 70 61 72 74 20 6f 66 ss id as part of
2690: 20 69 74 73 20 6b 65 79 20 62 65 63 61 75 73 65 its key because
26a0: 0a 2a 2a 20 6c 6f 63 6b 73 20 69 6e 20 64 69 66 .** locks in dif
26b0: 66 65 72 65 6e 74 20 74 68 72 65 61 64 73 20 61 ferent threads a
26c0: 72 65 20 74 72 65 61 74 65 64 20 61 73 20 64 69 re treated as di
26d0: 73 74 69 6e 63 74 2e 20 20 42 75 74 20 74 68 65 stinct. But the
26e0: 20 0a 2a 2a 20 6f 70 65 6e 43 6e 74 20 73 74 72 .** openCnt str
26f0: 75 63 74 75 72 65 20 73 68 6f 75 6c 64 20 6e 6f ucture should no
2700: 74 20 69 6e 63 6c 75 64 65 20 74 68 65 20 70 72 t include the pr
2710: 6f 63 65 73 73 20 69 64 20 69 6e 20 69 74 73 0a ocess id in its.
2720: 2a 2a 20 6b 65 79 20 62 65 63 61 75 73 65 20 63 ** key because c
2730: 6c 6f 73 65 28 29 20 63 6c 65 61 72 73 20 6c 6f lose() clears lo
2740: 63 6b 20 6f 6e 20 61 6c 6c 20 74 68 72 65 61 64 ck on all thread
2750: 73 2c 20 6e 6f 74 20 6a 75 73 74 20 74 68 65 20 s, not just the
2760: 63 75 72 72 65 6e 74 0a 2a 2a 20 74 68 72 65 61 current.** threa
2770: 64 2e 20 20 57 65 72 65 20 69 74 20 6e 6f 74 20 d. Were it not
2780: 66 6f 72 20 74 68 69 73 20 67 6f 6f 66 69 6e 65 for this goofine
2790: 73 73 20 69 6e 20 6c 69 6e 75 78 20 74 68 72 65 ss in linux thre
27a0: 61 64 73 2c 20 77 65 20 63 6f 75 6c 64 0a 2a 2a ads, we could.**
27b0: 20 63 6f 6d 62 69 6e 65 20 74 68 65 20 6c 6f 63 combine the loc
27c0: 6b 49 6e 66 6f 20 61 6e 64 20 6f 70 65 6e 43 6e kInfo and openCn
27d0: 74 20 73 74 72 75 63 74 75 72 65 73 20 69 6e 74 t structures int
27e0: 6f 20 61 20 73 69 6e 67 6c 65 20 73 74 72 75 63 o a single struc
27f0: 74 75 72 65 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 34 ture..**.** 2004
2800: 2d 4a 75 6e 2d 32 38 3a 0a 2a 2a 20 4f 6e 20 73 -Jun-28:.** On s
2810: 6f 6d 65 20 76 65 72 73 69 6f 6e 73 20 6f 66 20 ome versions of
2820: 6c 69 6e 75 78 2c 20 74 68 72 65 61 64 73 20 63 linux, threads c
2830: 61 6e 20 6f 76 65 72 72 69 64 65 20 65 61 63 68 an override each
2840: 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a others locks..*
2850: 2a 20 4f 6e 20 6f 74 68 65 72 73 20 6e 6f 74 2e * On others not.
2860: 20 20 53 6f 6d 65 74 69 6d 65 73 20 79 6f 75 20 Sometimes you
2870: 63 61 6e 20 63 68 61 6e 67 65 20 74 68 65 20 62 can change the b
2880: 65 68 61 76 69 6f 72 20 6f 6e 20 74 68 65 20 73 ehavior on the s
2890: 61 6d 65 0a 2a 2a 20 73 79 73 74 65 6d 20 62 79 ame.** system by
28a0: 20 73 65 74 74 69 6e 67 20 74 68 65 20 4c 44 5f setting the LD_
28b0: 41 53 53 55 4d 45 5f 4b 45 52 4e 45 4c 20 65 6e ASSUME_KERNEL en
28c0: 76 69 72 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 vironment variab
28d0: 6c 65 2e 20 20 54 68 65 0a 2a 2a 20 50 4f 53 49 le. The.** POSI
28e0: 58 20 73 74 61 6e 64 61 72 64 20 69 73 20 73 69 X standard is si
28f0: 6c 65 6e 74 20 61 73 20 74 6f 20 77 68 69 63 68 lent as to which
2900: 20 62 65 68 61 76 69 6f 72 20 69 73 20 63 6f 72 behavior is cor
2910: 72 65 63 74 2c 20 61 73 20 66 61 72 0a 2a 2a 20 rect, as far.**
2920: 61 73 20 49 20 63 61 6e 20 74 65 6c 6c 2c 20 73 as I can tell, s
2930: 6f 20 6f 74 68 65 72 20 76 65 72 73 69 6f 6e 73 o other versions
2940: 20 6f 66 20 75 6e 69 78 20 6d 69 67 68 74 20 73 of unix might s
2950: 68 6f 77 20 74 68 65 20 73 61 6d 65 0a 2a 2a 20 how the same.**
2960: 69 6e 63 6f 6e 73 69 73 74 65 6e 63 79 2e 20 20 inconsistency.
2970: 54 68 65 72 65 20 69 73 20 6e 6f 20 6c 69 74 74 There is no litt
2980: 6c 65 20 64 6f 75 62 74 20 69 6e 20 6d 79 20 6d le doubt in my m
2990: 69 6e 64 20 74 68 61 74 20 70 6f 73 69 78 0a 2a ind that posix.*
29a0: 2a 20 61 64 76 69 73 6f 72 79 20 6c 6f 63 6b 73 * advisory locks
29b0: 20 61 6e 64 20 6c 69 6e 75 78 20 74 68 72 65 61 and linux threa
29c0: 64 73 20 61 72 65 20 70 72 6f 66 6f 75 6e 64 6c ds are profoundl
29d0: 79 20 62 72 6f 6b 65 6e 2e 0a 2a 2a 0a 2a 2a 20 y broken..**.**
29e0: 54 6f 20 77 6f 72 6b 20 61 72 6f 75 6e 64 20 74 To work around t
29f0: 68 65 20 69 6e 63 6f 6e 73 69 73 74 65 6e 63 69 he inconsistenci
2a00: 65 73 2c 20 77 65 20 68 61 76 65 20 74 6f 20 74 es, we have to t
2a10: 65 73 74 20 61 74 20 72 75 6e 74 69 6d 65 20 0a est at runtime .
2a20: 2a 2a 20 77 68 65 74 68 65 72 20 6f 72 20 6e 6f ** whether or no
2a30: 74 20 74 68 72 65 61 64 73 20 63 61 6e 20 6f 76 t threads can ov
2a40: 65 72 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 erride each othe
2a50: 72 73 20 6c 6f 63 6b 73 2e 20 20 54 68 69 73 20 rs locks. This
2a60: 74 65 73 74 0a 2a 2a 20 69 73 20 72 75 6e 20 6f test.** is run o
2a70: 6e 63 65 2c 20 74 68 65 20 66 69 72 73 74 20 74 nce, the first t
2a80: 69 6d 65 20 61 6e 79 20 6c 6f 63 6b 20 69 73 20 ime any lock is
2a90: 61 74 74 65 6d 70 74 65 64 2e 20 20 41 20 73 74 attempted. A st
2aa0: 61 74 69 63 20 0a 2a 2a 20 76 61 72 69 61 62 6c atic .** variabl
2ab0: 65 20 69 73 20 73 65 74 20 74 6f 20 72 65 63 6f e is set to reco
2ac0: 72 64 20 74 68 65 20 72 65 73 75 6c 74 73 20 6f rd the results o
2ad0: 66 20 74 68 69 73 20 74 65 73 74 20 66 6f 72 20 f this test for
2ae0: 66 75 74 75 72 65 0a 2a 2a 20 75 73 65 2e 0a 2a future.** use..*
2af0: 2f 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 /../*.** An inst
2b00: 61 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c ance of the foll
2b10: 6f 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 owing structure
2b20: 73 65 72 76 65 73 20 61 73 20 74 68 65 20 6b 65 serves as the ke
2b30: 79 20 75 73 65 64 0a 2a 2a 20 74 6f 20 6c 6f 63 y used.** to loc
2b40: 61 74 65 20 61 20 70 61 72 74 69 63 75 6c 61 72 ate a particular
2b50: 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72 75 63 74 lockInfo struct
2b60: 75 72 65 20 67 69 76 65 6e 20 69 74 73 20 69 6e ure given its in
2b70: 6f 64 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 ode..**.** If th
2b80: 72 65 61 64 73 20 63 61 6e 6e 6f 74 20 6f 76 65 reads cannot ove
2b90: 72 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 rride each other
2ba0: 73 20 6c 6f 63 6b 73 2c 20 74 68 65 6e 20 77 65 s locks, then we
2bb0: 20 73 65 74 20 74 68 65 0a 2a 2a 20 6c 6f 63 6b set the.** lock
2bc0: 4b 65 79 2e 74 69 64 20 66 69 65 6c 64 20 74 6f Key.tid field to
2bd0: 20 74 68 65 20 74 68 72 65 61 64 20 49 44 2e 20 the thread ID.
2be0: 20 49 66 20 74 68 72 65 61 64 73 20 63 61 6e 20 If threads can
2bf0: 6f 76 65 72 72 69 64 65 0a 2a 2a 20 65 61 63 68 override.** each
2c00: 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 20 74 68 others locks th
2c10: 65 6e 20 74 69 64 20 69 73 20 61 6c 77 61 79 73 en tid is always
2c20: 20 73 65 74 20 74 6f 20 7a 65 72 6f 2e 20 20 74 set to zero. t
2c30: 69 64 20 69 73 20 6f 6d 69 74 74 65 64 0a 2a 2a id is omitted.**
2c40: 20 69 66 20 77 65 20 63 6f 6d 70 69 6c 65 20 77 if we compile w
2c50: 69 74 68 6f 75 74 20 74 68 72 65 61 64 69 6e 67 ithout threading
2c60: 20 73 75 70 70 6f 72 74 2e 0a 2a 2f 0a 73 74 72 support..*/.str
2c70: 75 63 74 20 6c 6f 63 6b 4b 65 79 20 7b 0a 20 20 uct lockKey {.
2c80: 64 65 76 5f 74 20 64 65 76 3b 20 20 20 20 20 20 dev_t dev;
2c90: 20 2f 2a 20 44 65 76 69 63 65 20 6e 75 6d 62 65 /* Device numbe
2ca0: 72 20 2a 2f 0a 20 20 69 6e 6f 5f 74 20 69 6e 6f r */. ino_t ino
2cb0: 3b 20 20 20 20 20 20 20 2f 2a 20 49 6e 6f 64 65 ; /* Inode
2cc0: 20 6e 75 6d 62 65 72 20 2a 2f 0a 23 69 66 64 65 number */.#ifde
2cd0: 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 f SQLITE_UNIX_TH
2ce0: 52 45 41 44 53 0a 20 20 70 74 68 72 65 61 64 5f READS. pthread_
2cf0: 74 20 74 69 64 3b 20 20 20 2f 2a 20 54 68 72 65 t tid; /* Thre
2d00: 61 64 20 49 44 20 6f 72 20 7a 65 72 6f 20 69 66 ad ID or zero if
2d10: 20 74 68 72 65 61 64 73 20 63 61 6e 20 6f 76 65 threads can ove
2d20: 72 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 rride each other
2d30: 20 2a 2f 0a 23 65 6e 64 69 66 0a 7d 3b 0a 0a 2f */.#endif.};../
2d40: 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 *.** An instance
2d50: 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e of the followin
2d60: 67 20 73 74 72 75 63 74 75 72 65 20 69 73 20 61 g structure is a
2d70: 6c 6c 6f 63 61 74 65 64 20 66 6f 72 20 65 61 63 llocated for eac
2d80: 68 20 6f 70 65 6e 0a 2a 2a 20 69 6e 6f 64 65 20 h open.** inode
2d90: 6f 6e 20 65 61 63 68 20 74 68 72 65 61 64 20 77 on each thread w
2da0: 69 74 68 20 61 20 64 69 66 66 65 72 65 6e 74 20 ith a different
2db0: 70 72 6f 63 65 73 73 20 49 44 2e 20 20 28 54 68 process ID. (Th
2dc0: 72 65 61 64 73 20 68 61 76 65 0a 2a 2a 20 64 69 reads have.** di
2dd0: 66 66 65 72 65 6e 74 20 70 72 6f 63 65 73 73 20 fferent process
2de0: 49 44 73 20 6f 6e 20 6c 69 6e 75 78 2c 20 62 75 IDs on linux, bu
2df0: 74 20 6e 6f 74 20 6f 6e 20 6d 6f 73 74 20 6f 74 t not on most ot
2e00: 68 65 72 20 75 6e 69 78 65 73 2e 29 0a 2a 2a 0a her unixes.).**.
2e10: 2a 2a 20 41 20 73 69 6e 67 6c 65 20 69 6e 6f 64 ** A single inod
2e20: 65 20 63 61 6e 20 68 61 76 65 20 6d 75 6c 74 69 e can have multi
2e30: 70 6c 65 20 66 69 6c 65 20 64 65 73 63 72 69 70 ple file descrip
2e40: 74 6f 72 73 2c 20 73 6f 20 65 61 63 68 20 4f 73 tors, so each Os
2e50: 46 69 6c 65 0a 2a 2a 20 73 74 72 75 63 74 75 72 File.** structur
2e60: 65 20 63 6f 6e 74 61 69 6e 73 20 61 20 70 6f 69 e contains a poi
2e70: 6e 74 65 72 20 74 6f 20 61 6e 20 69 6e 73 74 61 nter to an insta
2e80: 6e 63 65 20 6f 66 20 74 68 69 73 20 6f 62 6a 65 nce of this obje
2e90: 63 74 20 61 6e 64 20 74 68 69 73 0a 2a 2a 20 6f ct and this.** o
2ea0: 62 6a 65 63 74 20 6b 65 65 70 73 20 61 20 63 6f bject keeps a co
2eb0: 75 6e 74 20 6f 66 20 74 68 65 20 6e 75 6d 62 65 unt of the numbe
2ec0: 72 20 6f 66 20 4f 73 46 69 6c 65 73 20 70 6f 69 r of OsFiles poi
2ed0: 6e 74 69 6e 67 20 74 6f 20 69 74 2e 0a 2a 2f 0a nting to it..*/.
2ee0: 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 struct lockInfo
2ef0: 7b 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 4b {. struct lockK
2f00: 65 79 20 6b 65 79 3b 20 20 2f 2a 20 54 68 65 20 ey key; /* The
2f10: 6c 6f 6f 6b 75 70 20 6b 65 79 20 2a 2f 0a 20 20 lookup key */.
2f20: 69 6e 74 20 63 6e 74 3b 20 20 20 20 20 20 20 20 int cnt;
2f30: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f /* Number o
2f40: 66 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 20 68 f SHARED locks h
2f50: 65 6c 64 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f 63 eld */. int loc
2f60: 6b 74 79 70 65 3b 20 20 20 20 20 20 20 20 2f 2a ktype; /*
2f70: 20 4f 6e 65 20 6f 66 20 53 48 41 52 45 44 5f 4c One of SHARED_L
2f80: 4f 43 4b 2c 20 52 45 53 45 52 56 45 44 5f 4c 4f OCK, RESERVED_LO
2f90: 43 4b 20 65 74 63 2e 20 2a 2f 0a 20 20 69 6e 74 CK etc. */. int
2fa0: 20 6e 52 65 66 3b 20 20 20 20 20 20 20 20 20 20 nRef;
2fb0: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 70 /* Number of p
2fc0: 6f 69 6e 74 65 72 73 20 74 6f 20 74 68 69 73 20 ointers to this
2fd0: 73 74 72 75 63 74 75 72 65 20 2a 2f 0a 7d 3b 0a structure */.};.
2fe0: 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e ./*.** An instan
2ff0: 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 ce of the follow
3000: 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 73 65 ing structure se
3010: 72 76 65 73 20 61 73 20 74 68 65 20 6b 65 79 20 rves as the key
3020: 75 73 65 64 0a 2a 2a 20 74 6f 20 6c 6f 63 61 74 used.** to locat
3030: 65 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 6f e a particular o
3040: 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65 penCnt structure
3050: 20 67 69 76 65 6e 20 69 74 73 20 69 6e 6f 64 65 given its inode
3060: 2e 20 20 54 68 69 73 0a 2a 2a 20 69 73 20 74 68 . This.** is th
3070: 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 6c 6f e same as the lo
3080: 63 6b 4b 65 79 20 65 78 63 65 70 74 20 74 68 61 ckKey except tha
3090: 74 20 74 68 65 20 74 68 72 65 61 64 20 49 44 20 t the thread ID
30a0: 69 73 20 6f 6d 69 74 74 65 64 2e 0a 2a 2f 0a 73 is omitted..*/.s
30b0: 74 72 75 63 74 20 6f 70 65 6e 4b 65 79 20 7b 0a truct openKey {.
30c0: 20 20 64 65 76 5f 74 20 64 65 76 3b 20 20 20 2f dev_t dev; /
30d0: 2a 20 44 65 76 69 63 65 20 6e 75 6d 62 65 72 20 * Device number
30e0: 2a 2f 0a 20 20 69 6e 6f 5f 74 20 69 6e 6f 3b 20 */. ino_t ino;
30f0: 20 20 2f 2a 20 49 6e 6f 64 65 20 6e 75 6d 62 65 /* Inode numbe
3100: 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41 r */.};../*.** A
3110: 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 n instance of th
3120: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 e following stru
3130: 63 74 75 72 65 20 69 73 20 61 6c 6c 6f 63 61 74 cture is allocat
3140: 65 64 20 66 6f 72 20 65 61 63 68 20 6f 70 65 6e ed for each open
3150: 0a 2a 2a 20 69 6e 6f 64 65 2e 20 20 54 68 69 73 .** inode. This
3160: 20 73 74 72 75 63 74 75 72 65 20 6b 65 65 70 73 structure keeps
3170: 20 74 72 61 63 6b 20 6f 66 20 74 68 65 20 6e 75 track of the nu
3180: 6d 62 65 72 20 6f 66 20 6c 6f 63 6b 73 20 6f 6e mber of locks on
3190: 20 74 68 61 74 0a 2a 2a 20 69 6e 6f 64 65 2e 20 that.** inode.
31a0: 20 49 66 20 61 20 63 6c 6f 73 65 20 69 73 20 61 If a close is a
31b0: 74 74 65 6d 70 74 65 64 20 61 67 61 69 6e 73 74 ttempted against
31c0: 20 61 6e 20 69 6e 6f 64 65 20 74 68 61 74 20 69 an inode that i
31d0: 73 20 68 6f 6c 64 69 6e 67 0a 2a 2a 20 6c 6f 63 s holding.** loc
31e0: 6b 73 2c 20 74 68 65 20 63 6c 6f 73 65 20 69 73 ks, the close is
31f0: 20 64 65 66 65 72 72 65 64 20 75 6e 74 69 6c 20 deferred until
3200: 61 6c 6c 20 6c 6f 63 6b 73 20 63 6c 65 61 72 20 all locks clear
3210: 62 79 20 61 64 64 69 6e 67 20 74 68 65 0a 2a 2a by adding the.**
3220: 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 file descriptor
3230: 20 74 6f 20 62 65 20 63 6c 6f 73 65 64 20 74 6f to be closed to
3240: 20 74 68 65 20 70 65 6e 64 69 6e 67 20 6c 69 73 the pending lis
3250: 74 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 6f 70 65 t..*/.struct ope
3260: 6e 43 6e 74 20 7b 0a 20 20 73 74 72 75 63 74 20 nCnt {. struct
3270: 6f 70 65 6e 4b 65 79 20 6b 65 79 3b 20 20 20 2f openKey key; /
3280: 2a 20 54 68 65 20 6c 6f 6f 6b 75 70 20 6b 65 79 * The lookup key
3290: 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 66 3b 20 */. int nRef;
32a0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e /* N
32b0: 75 6d 62 65 72 20 6f 66 20 70 6f 69 6e 74 65 72 umber of pointer
32c0: 73 20 74 6f 20 74 68 69 73 20 73 74 72 75 63 74 s to this struct
32d0: 75 72 65 20 2a 2f 0a 20 20 69 6e 74 20 6e 4c 6f ure */. int nLo
32e0: 63 6b 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f ck; /
32f0: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 6f 75 74 73 * Number of outs
3300: 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 20 2a 2f tanding locks */
3310: 0a 20 20 69 6e 74 20 6e 50 65 6e 64 69 6e 67 3b . int nPending;
3320: 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 /* Numb
3330: 65 72 20 6f 66 20 70 65 6e 64 69 6e 67 20 63 6c er of pending cl
3340: 6f 73 65 28 29 20 6f 70 65 72 61 74 69 6f 6e 73 ose() operations
3350: 20 2a 2f 0a 20 20 69 6e 74 20 2a 61 50 65 6e 64 */. int *aPend
3360: 69 6e 67 3b 20 20 20 20 20 20 20 20 2f 2a 20 4d ing; /* M
3370: 61 6c 6c 6f 63 65 64 20 73 70 61 63 65 20 68 6f alloced space ho
3380: 6c 64 69 6e 67 20 66 64 27 73 20 61 77 61 69 74 lding fd's await
3390: 69 6e 67 20 61 20 63 6c 6f 73 65 28 29 20 2a 2f ing a close() */
33a0: 0a 7d 3b 0a 0a 2f 2a 20 0a 2a 2a 20 54 68 65 73 .};../* .** Thes
33b0: 65 20 68 61 73 68 20 74 61 62 6c 65 73 20 6d 61 e hash tables ma
33c0: 70 20 69 6e 6f 64 65 73 20 61 6e 64 20 66 69 6c p inodes and fil
33d0: 65 20 64 65 73 63 72 69 70 74 6f 72 73 20 28 72 e descriptors (r
33e0: 65 61 6c 6c 79 2c 20 6c 6f 63 6b 4b 65 79 20 61 eally, lockKey a
33f0: 6e 64 0a 2a 2a 20 6f 70 65 6e 4b 65 79 20 73 74 nd.** openKey st
3400: 72 75 63 74 75 72 65 73 29 20 69 6e 74 6f 20 6c ructures) into l
3410: 6f 63 6b 49 6e 66 6f 20 61 6e 64 20 6f 70 65 6e ockInfo and open
3420: 43 6e 74 20 73 74 72 75 63 74 75 72 65 73 2e 20 Cnt structures.
3430: 20 41 63 63 65 73 73 20 74 6f 20 0a 2a 2a 20 74 Access to .** t
3440: 68 65 73 65 20 68 61 73 68 20 74 61 62 6c 65 73 hese hash tables
3450: 20 6d 75 73 74 20 62 65 20 70 72 6f 74 65 63 74 must be protect
3460: 65 64 20 62 79 20 61 20 6d 75 74 65 78 2e 0a 2a ed by a mutex..*
3470: 2f 0a 73 74 61 74 69 63 20 48 61 73 68 20 6c 6f /.static Hash lo
3480: 63 6b 48 61 73 68 20 3d 20 7b 53 51 4c 49 54 45 ckHash = {SQLITE
3490: 5f 48 41 53 48 5f 42 49 4e 41 52 59 2c 20 30 2c _HASH_BINARY, 0,
34a0: 20 30 2c 20 30 2c 20 0a 20 20 20 20 73 71 6c 69 0, 0, . sqli
34b0: 74 65 33 54 68 72 65 61 64 53 61 66 65 4d 61 6c te3ThreadSafeMal
34c0: 6c 6f 63 2c 20 73 71 6c 69 74 65 33 54 68 72 65 loc, sqlite3Thre
34d0: 61 64 53 61 66 65 46 72 65 65 2c 20 30 2c 20 30 adSafeFree, 0, 0
34e0: 7d 3b 0a 73 74 61 74 69 63 20 48 61 73 68 20 6f };.static Hash o
34f0: 70 65 6e 48 61 73 68 20 3d 20 7b 53 51 4c 49 54 penHash = {SQLIT
3500: 45 5f 48 41 53 48 5f 42 49 4e 41 52 59 2c 20 30 E_HASH_BINARY, 0
3510: 2c 20 30 2c 20 30 2c 20 0a 20 20 20 20 73 71 6c , 0, 0, . sql
3520: 69 74 65 33 54 68 72 65 61 64 53 61 66 65 4d 61 ite3ThreadSafeMa
3530: 6c 6c 6f 63 2c 20 73 71 6c 69 74 65 33 54 68 72 lloc, sqlite3Thr
3540: 65 61 64 53 61 66 65 46 72 65 65 2c 20 30 2c 20 eadSafeFree, 0,
3550: 30 7d 3b 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 0};..#ifdef SQLI
3560: 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a TE_UNIX_THREADS.
3570: 2f 2a 0a 2a 2a 20 54 68 69 73 20 76 61 72 69 61 /*.** This varia
3580: 62 6c 65 20 72 65 63 6f 72 64 73 20 77 68 65 74 ble records whet
3590: 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 72 65 61 her or not threa
35a0: 64 73 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20 ds can override
35b0: 65 61 63 68 20 6f 74 68 65 72 73 0a 2a 2a 20 6c each others.** l
35c0: 6f 63 6b 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 30 ocks..**.** 0
35d0: 3a 20 20 4e 6f 2e 20 20 54 68 72 65 61 64 73 20 : No. Threads
35e0: 63 61 6e 6e 6f 74 20 6f 76 65 72 72 69 64 65 20 cannot override
35f0: 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b each others lock
3600: 73 2e 0a 2a 2a 20 20 20 20 31 3a 20 20 59 65 73 s..** 1: Yes
3610: 2e 20 20 54 68 72 65 61 64 73 20 63 61 6e 20 6f . Threads can o
3620: 76 65 72 72 69 64 65 20 65 61 63 68 20 6f 74 68 verride each oth
3630: 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a 2a 20 20 20 ers locks..**
3640: 2d 31 3a 20 20 57 65 20 64 6f 6e 27 74 20 6b 6e -1: We don't kn
3650: 6f 77 20 79 65 74 2e 0a 2a 2a 0a 2a 2a 20 4f 6e ow yet..**.** On
3660: 20 73 6f 6d 65 20 73 79 73 74 65 6d 73 2c 20 77 some systems, w
3670: 65 20 6b 6e 6f 77 20 61 74 20 63 6f 6d 70 69 6c e know at compil
3680: 65 2d 74 69 6d 65 20 69 66 20 74 68 72 65 61 64 e-time if thread
3690: 73 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20 65 s can override e
36a0: 61 63 68 0a 2a 2a 20 6f 74 68 65 72 73 20 6c 6f ach.** others lo
36b0: 63 6b 73 2e 20 20 4f 6e 20 74 68 6f 73 65 20 73 cks. On those s
36c0: 79 73 74 65 6d 73 2c 20 74 68 65 20 53 51 4c 49 ystems, the SQLI
36d0: 54 45 5f 54 48 52 45 41 44 5f 4f 56 45 52 52 49 TE_THREAD_OVERRI
36e0: 44 45 5f 4c 4f 43 4b 20 6d 61 63 72 6f 0a 2a 2a DE_LOCK macro.**
36f0: 20 77 69 6c 6c 20 62 65 20 73 65 74 20 61 70 70 will be set app
3700: 72 6f 70 72 69 61 74 65 6c 79 2e 20 20 4f 6e 20 ropriately. On
3710: 6f 74 68 65 72 20 73 79 73 74 65 6d 73 2c 20 77 other systems, w
3720: 65 20 68 61 76 65 20 74 6f 20 63 68 65 63 6b 20 e have to check
3730: 61 74 0a 2a 2a 20 72 75 6e 74 69 6d 65 2e 20 20 at.** runtime.
3740: 4f 6e 20 74 68 65 73 65 20 6c 61 74 74 65 72 20 On these latter
3750: 73 79 73 74 65 6d 73 2c 20 53 51 4c 54 49 45 5f systems, SQLTIE_
3760: 54 48 52 45 41 44 5f 4f 56 45 52 52 49 44 45 5f THREAD_OVERRIDE_
3770: 4c 4f 43 4b 20 69 73 0a 2a 2a 20 75 6e 64 65 66 LOCK is.** undef
3780: 69 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 ined..**.** This
3790: 20 76 61 72 69 61 62 6c 65 20 6e 6f 72 6d 61 6c variable normal
37a0: 6c 79 20 68 61 73 20 66 69 6c 65 20 73 63 6f 70 ly has file scop
37b0: 65 20 6f 6e 6c 79 2e 20 20 42 75 74 20 64 75 72 e only. But dur
37c0: 69 6e 67 20 74 65 73 74 69 6e 67 2c 20 77 65 20 ing testing, we
37d0: 6d 61 6b 65 0a 2a 2a 20 69 74 20 61 20 67 6c 6f make.** it a glo
37e0: 62 61 6c 20 73 6f 20 74 68 61 74 20 74 68 65 20 bal so that the
37f0: 74 65 73 74 20 63 6f 64 65 20 63 61 6e 20 63 68 test code can ch
3800: 61 6e 67 65 20 69 74 73 20 76 61 6c 75 65 20 69 ange its value i
3810: 6e 20 6f 72 64 65 72 20 74 6f 20 76 65 72 69 66 n order to verif
3820: 79 0a 2a 2a 20 74 68 61 74 20 74 68 65 20 72 69 y.** that the ri
3830: 67 68 74 20 73 74 75 66 66 20 68 61 70 70 65 6e ght stuff happen
3840: 73 20 69 6e 20 65 69 74 68 65 72 20 63 61 73 65 s in either case
3850: 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c ..*/.#ifndef SQL
3860: 49 54 45 5f 54 48 52 45 41 44 5f 4f 56 45 52 52 ITE_THREAD_OVERR
3870: 49 44 45 5f 4c 4f 43 4b 0a 23 20 64 65 66 69 6e IDE_LOCK.# defin
3880: 65 20 53 51 4c 49 54 45 5f 54 48 52 45 41 44 5f e SQLITE_THREAD_
3890: 4f 56 45 52 52 49 44 45 5f 4c 4f 43 4b 20 2d 31 OVERRIDE_LOCK -1
38a0: 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 53 .#endif.#ifdef S
38b0: 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e 74 20 74 QLITE_TEST.int t
38c0: 68 72 65 61 64 73 4f 76 65 72 72 69 64 65 45 61 hreadsOverrideEa
38d0: 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73 20 3d 20 chOthersLocks =
38e0: 53 51 4c 49 54 45 5f 54 48 52 45 41 44 5f 4f 56 SQLITE_THREAD_OV
38f0: 45 52 52 49 44 45 5f 4c 4f 43 4b 3b 0a 23 65 6c ERRIDE_LOCK;.#el
3900: 73 65 0a 73 74 61 74 69 63 20 69 6e 74 20 74 68 se.static int th
3910: 72 65 61 64 73 4f 76 65 72 72 69 64 65 45 61 63 readsOverrideEac
3920: 68 4f 74 68 65 72 73 4c 6f 63 6b 73 20 3d 20 53 hOthersLocks = S
3930: 51 4c 49 54 45 5f 54 48 52 45 41 44 5f 4f 56 45 QLITE_THREAD_OVE
3940: 52 52 49 44 45 5f 4c 4f 43 4b 3b 0a 23 65 6e 64 RRIDE_LOCK;.#end
3950: 69 66 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 73 if../*.** This s
3960: 74 72 75 63 74 75 72 65 20 68 6f 6c 64 73 20 69 tructure holds i
3970: 6e 66 6f 72 6d 61 74 69 6f 6e 20 70 61 73 73 65 nformation passe
3980: 64 20 69 6e 74 6f 20 69 6e 64 69 76 69 64 75 61 d into individua
3990: 6c 20 74 65 73 74 0a 2a 2a 20 74 68 72 65 61 64 l test.** thread
39a0: 73 20 62 79 20 74 68 65 20 74 65 73 74 54 68 72 s by the testThr
39b0: 65 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 eadLockingBehavi
39c0: 6f 72 28 29 20 72 6f 75 74 69 6e 65 2e 0a 2a 2f or() routine..*/
39d0: 0a 73 74 72 75 63 74 20 74 68 72 65 61 64 54 65 .struct threadTe
39e0: 73 74 44 61 74 61 20 7b 0a 20 20 69 6e 74 20 66 stData {. int f
39f0: 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d;
3a00: 20 20 2f 2a 20 46 69 6c 65 20 74 6f 20 62 65 20 /* File to be
3a10: 6c 6f 63 6b 65 64 20 2a 2f 0a 20 20 73 74 72 75 locked */. stru
3a20: 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 20 20 ct flock lock;
3a30: 20 20 20 2f 2a 20 54 68 65 20 6c 6f 63 6b 69 6e /* The lockin
3a40: 67 20 6f 70 65 72 61 74 69 6f 6e 20 2a 2f 0a 20 g operation */.
3a50: 20 69 6e 74 20 72 65 73 75 6c 74 3b 20 20 20 20 int result;
3a60: 20 20 20 20 20 20 20 20 2f 2a 20 52 65 73 75 6c /* Resul
3a70: 74 20 6f 66 20 74 68 65 20 6c 6f 63 6b 69 6e 67 t of the locking
3a80: 20 6f 70 65 72 61 74 69 6f 6e 20 2a 2f 0a 7d 3b operation */.};
3a90: 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f ..#ifdef SQLITE_
3aa0: 4c 4f 43 4b 5f 54 52 41 43 45 0a 2f 2a 0a 2a 2a LOCK_TRACE./*.**
3ab0: 20 50 72 69 6e 74 20 6f 75 74 20 69 6e 66 6f 72 Print out infor
3ac0: 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 61 6c 6c mation about all
3ad0: 20 6c 6f 63 6b 69 6e 67 20 6f 70 65 72 61 74 69 locking operati
3ae0: 6f 6e 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 ons..**.** This
3af0: 72 6f 75 74 69 6e 65 20 69 73 20 75 73 65 64 20 routine is used
3b00: 66 6f 72 20 74 72 6f 75 62 6c 65 73 68 6f 6f 74 for troubleshoot
3b10: 69 6e 67 20 6c 6f 63 6b 73 20 6f 6e 20 6d 75 6c ing locks on mul
3b20: 74 69 74 68 72 65 61 64 65 64 0a 2a 2a 20 70 6c tithreaded.** pl
3b30: 61 74 66 6f 72 6d 73 2e 20 20 45 6e 61 62 6c 65 atforms. Enable
3b40: 20 62 79 20 63 6f 6d 70 69 6c 69 6e 67 20 77 69 by compiling wi
3b50: 74 68 20 74 68 65 20 2d 44 53 51 4c 49 54 45 5f th the -DSQLITE_
3b60: 4c 4f 43 4b 5f 54 52 41 43 45 0a 2a 2a 20 63 6f LOCK_TRACE.** co
3b70: 6d 6d 61 6e 64 2d 6c 69 6e 65 20 6f 70 74 69 6f mmand-line optio
3b80: 6e 20 6f 6e 20 74 68 65 20 63 6f 6d 70 69 6c 65 n on the compile
3b90: 72 2e 20 20 54 68 69 73 20 63 6f 64 65 20 69 73 r. This code is
3ba0: 20 6e 6f 72 6d 61 6c 6c 79 0a 2a 2a 20 74 75 72 normally.** tur
3bb0: 6e 65 64 20 6f 66 66 2e 0a 2a 2f 0a 73 74 61 74 ned off..*/.stat
3bc0: 69 63 20 69 6e 74 20 6c 6f 63 6b 54 72 61 63 65 ic int lockTrace
3bd0: 28 69 6e 74 20 66 64 2c 20 69 6e 74 20 6f 70 2c (int fd, int op,
3be0: 20 73 74 72 75 63 74 20 66 6c 6f 63 6b 20 2a 70 struct flock *p
3bf0: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 4f 70 4e 61 ){. char *zOpNa
3c00: 6d 65 2c 20 2a 7a 54 79 70 65 3b 0a 20 20 69 6e me, *zType;. in
3c10: 74 20 73 3b 0a 20 20 69 6e 74 20 73 61 76 65 64 t s;. int saved
3c20: 45 72 72 6e 6f 3b 0a 20 20 69 66 28 20 6f 70 3d Errno;. if( op=
3c30: 3d 46 5f 47 45 54 4c 4b 20 29 7b 0a 20 20 20 20 =F_GETLK ){.
3c40: 7a 4f 70 4e 61 6d 65 20 3d 20 22 47 45 54 4c 4b zOpName = "GETLK
3c50: 22 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 6f ";. }else if( o
3c60: 70 3d 3d 46 5f 53 45 54 4c 4b 20 29 7b 0a 20 20 p==F_SETLK ){.
3c70: 20 20 7a 4f 70 4e 61 6d 65 20 3d 20 22 53 45 54 zOpName = "SET
3c80: 4c 4b 22 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 LK";. }else{.
3c90: 20 20 73 20 3d 20 66 63 6e 74 6c 28 66 64 2c 20 s = fcntl(fd,
3ca0: 6f 70 2c 20 70 29 3b 0a 20 20 20 20 73 71 6c 69 op, p);. sqli
3cb0: 74 65 33 44 65 62 75 67 50 72 69 6e 74 66 28 22 te3DebugPrintf("
3cc0: 66 63 6e 74 6c 20 75 6e 6b 6e 6f 77 6e 20 25 64 fcntl unknown %d
3cd0: 20 25 64 20 25 64 5c 6e 22 2c 20 66 64 2c 20 6f %d %d\n", fd, o
3ce0: 70 2c 20 73 29 3b 0a 20 20 20 20 72 65 74 75 72 p, s);. retur
3cf0: 6e 20 73 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 n s;. }. if( p
3d00: 2d 3e 6c 5f 74 79 70 65 3d 3d 46 5f 52 44 4c 43 ->l_type==F_RDLC
3d10: 4b 20 29 7b 0a 20 20 20 20 7a 54 79 70 65 20 3d K ){. zType =
3d20: 20 22 52 44 4c 43 4b 22 3b 0a 20 20 7d 65 6c 73 "RDLCK";. }els
3d30: 65 20 69 66 28 20 70 2d 3e 6c 5f 74 79 70 65 3d e if( p->l_type=
3d40: 3d 46 5f 57 52 4c 43 4b 20 29 7b 0a 20 20 20 20 =F_WRLCK ){.
3d50: 7a 54 79 70 65 20 3d 20 22 57 52 4c 43 4b 22 3b zType = "WRLCK";
3d60: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 70 2d 3e . }else if( p->
3d70: 6c 5f 74 79 70 65 3d 3d 46 5f 55 4e 4c 43 4b 20 l_type==F_UNLCK
3d80: 29 7b 0a 20 20 20 20 7a 54 79 70 65 20 3d 20 22 ){. zType = "
3d90: 55 4e 4c 43 4b 22 3b 0a 20 20 7d 65 6c 73 65 7b UNLCK";. }else{
3da0: 0a 20 20 20 20 61 73 73 65 72 74 28 20 30 20 29 . assert( 0 )
3db0: 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 ;. }. assert(
3dc0: 70 2d 3e 6c 5f 77 68 65 6e 63 65 3d 3d 53 45 45 p->l_whence==SEE
3dd0: 4b 5f 53 45 54 20 29 3b 0a 20 20 73 20 3d 20 66 K_SET );. s = f
3de0: 63 6e 74 6c 28 66 64 2c 20 6f 70 2c 20 70 29 3b cntl(fd, op, p);
3df0: 0a 20 20 73 61 76 65 64 45 72 72 6e 6f 20 3d 20 . savedErrno =
3e00: 65 72 72 6e 6f 3b 0a 20 20 73 71 6c 69 74 65 33 errno;. sqlite3
3e10: 44 65 62 75 67 50 72 69 6e 74 66 28 22 66 63 6e DebugPrintf("fcn
3e20: 74 6c 20 25 64 20 25 64 20 25 73 20 25 73 20 25 tl %d %d %s %s %
3e30: 64 20 25 64 20 25 64 20 25 64 5c 6e 22 2c 0a 20 d %d %d %d\n",.
3e40: 20 20 20 20 74 68 72 65 61 64 69 64 2c 20 66 64 threadid, fd
3e50: 2c 20 7a 4f 70 4e 61 6d 65 2c 20 7a 54 79 70 65 , zOpName, zType
3e60: 2c 20 28 69 6e 74 29 70 2d 3e 6c 5f 73 74 61 72 , (int)p->l_star
3e70: 74 2c 20 28 69 6e 74 29 70 2d 3e 6c 5f 6c 65 6e t, (int)p->l_len
3e80: 2c 0a 20 20 20 20 20 28 69 6e 74 29 70 2d 3e 6c ,. (int)p->l
3e90: 5f 70 69 64 2c 20 73 29 3b 0a 20 20 69 66 28 20 _pid, s);. if(
3ea0: 73 20 26 26 20 6f 70 3d 3d 46 5f 53 45 54 4c 4b s && op==F_SETLK
3eb0: 20 26 26 20 28 70 2d 3e 6c 5f 74 79 70 65 3d 3d && (p->l_type==
3ec0: 46 5f 52 44 4c 43 4b 20 7c 7c 20 70 2d 3e 6c 5f F_RDLCK || p->l_
3ed0: 74 79 70 65 3d 3d 46 5f 57 52 4c 43 4b 29 20 29 type==F_WRLCK) )
3ee0: 7b 0a 20 20 20 20 73 74 72 75 63 74 20 66 6c 6f {. struct flo
3ef0: 63 6b 20 6c 32 3b 0a 20 20 20 20 6c 32 20 3d 20 ck l2;. l2 =
3f00: 2a 70 3b 0a 20 20 20 20 66 63 6e 74 6c 28 66 64 *p;. fcntl(fd
3f10: 2c 20 46 5f 47 45 54 4c 4b 2c 20 26 6c 32 29 3b , F_GETLK, &l2);
3f20: 0a 20 20 20 20 69 66 28 20 6c 32 2e 6c 5f 74 79 . if( l2.l_ty
3f30: 70 65 3d 3d 46 5f 52 44 4c 43 4b 20 29 7b 0a 20 pe==F_RDLCK ){.
3f40: 20 20 20 20 20 7a 54 79 70 65 20 3d 20 22 52 44 zType = "RD
3f50: 4c 43 4b 22 3b 0a 20 20 20 20 7d 65 6c 73 65 20 LCK";. }else
3f60: 69 66 28 20 6c 32 2e 6c 5f 74 79 70 65 3d 3d 46 if( l2.l_type==F
3f70: 5f 57 52 4c 43 4b 20 29 7b 0a 20 20 20 20 20 20 _WRLCK ){.
3f80: 7a 54 79 70 65 20 3d 20 22 57 52 4c 43 4b 22 3b zType = "WRLCK";
3f90: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 6c . }else if( l
3fa0: 32 2e 6c 5f 74 79 70 65 3d 3d 46 5f 55 4e 4c 43 2.l_type==F_UNLC
3fb0: 4b 20 29 7b 0a 20 20 20 20 20 20 7a 54 79 70 65 K ){. zType
3fc0: 20 3d 20 22 55 4e 4c 43 4b 22 3b 0a 20 20 20 20 = "UNLCK";.
3fd0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 61 73 73 }else{. ass
3fe0: 65 72 74 28 20 30 20 29 3b 0a 20 20 20 20 7d 0a ert( 0 );. }.
3ff0: 20 20 20 20 73 71 6c 69 74 65 33 44 65 62 75 67 sqlite3Debug
4000: 50 72 69 6e 74 66 28 22 66 63 6e 74 6c 2d 66 61 Printf("fcntl-fa
4010: 69 6c 75 72 65 2d 72 65 61 73 6f 6e 3a 20 25 73 ilure-reason: %s
4020: 20 25 64 20 25 64 20 25 64 5c 6e 22 2c 0a 20 20 %d %d %d\n",.
4030: 20 20 20 20 20 7a 54 79 70 65 2c 20 28 69 6e 74 zType, (int
4040: 29 6c 32 2e 6c 5f 73 74 61 72 74 2c 20 28 69 6e )l2.l_start, (in
4050: 74 29 6c 32 2e 6c 5f 6c 65 6e 2c 20 28 69 6e 74 t)l2.l_len, (int
4060: 29 6c 32 2e 6c 5f 70 69 64 29 3b 0a 20 20 7d 0a )l2.l_pid);. }.
4070: 20 20 65 72 72 6e 6f 20 3d 20 73 61 76 65 64 45 errno = savedE
4080: 72 72 6e 6f 3b 0a 20 20 72 65 74 75 72 6e 20 73 rrno;. return s
4090: 3b 0a 7d 0a 23 64 65 66 69 6e 65 20 66 63 6e 74 ;.}.#define fcnt
40a0: 6c 20 6c 6f 63 6b 54 72 61 63 65 0a 23 65 6e 64 l lockTrace.#end
40b0: 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4c 4f 43 if /* SQLITE_LOC
40c0: 4b 5f 54 52 41 43 45 20 2a 2f 0a 0a 2f 2a 0a 2a K_TRACE */../*.*
40d0: 2a 20 54 68 65 20 74 65 73 74 54 68 72 65 61 64 * The testThread
40e0: 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28 LockingBehavior(
40f0: 29 20 72 6f 75 74 69 6e 65 20 6c 61 75 6e 63 68 ) routine launch
4100: 65 73 20 74 77 6f 20 73 65 70 61 72 61 74 65 0a es two separate.
4110: 2a 2a 20 74 68 72 65 61 64 73 20 6f 6e 20 74 68 ** threads on th
4120: 69 73 20 72 6f 75 74 69 6e 65 2e 20 20 54 68 69 is routine. Thi
4130: 73 20 72 6f 75 74 69 6e 65 20 61 74 74 65 6d 70 s routine attemp
4140: 74 73 20 74 6f 20 6c 6f 63 6b 20 61 20 66 69 6c ts to lock a fil
4150: 65 0a 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 20 e.** descriptor
4160: 74 68 65 6e 20 72 65 74 75 72 6e 73 2e 20 20 54 then returns. T
4170: 68 65 20 73 75 63 63 65 73 73 20 6f 72 20 66 61 he success or fa
4180: 69 6c 75 72 65 20 6f 66 20 74 68 61 74 20 61 74 ilure of that at
4190: 74 65 6d 70 74 0a 2a 2a 20 61 6c 6c 6f 77 73 20 tempt.** allows
41a0: 74 68 65 20 74 65 73 74 54 68 72 65 61 64 4c 6f the testThreadLo
41b0: 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28 29 20 ckingBehavior()
41c0: 70 72 6f 63 65 64 75 72 65 20 74 6f 20 64 65 74 procedure to det
41d0: 65 72 6d 69 6e 65 0a 2a 2a 20 77 68 65 74 68 65 ermine.** whethe
41e0: 72 20 6f 72 20 6e 6f 74 20 74 68 72 65 61 64 73 r or not threads
41f0: 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20 65 61 can override ea
4200: 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 2e ch others locks.
4210: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 .*/.static void
4220: 2a 74 68 72 65 61 64 4c 6f 63 6b 69 6e 67 54 65 *threadLockingTe
4230: 73 74 28 76 6f 69 64 20 2a 70 41 72 67 29 7b 0a st(void *pArg){.
4240: 20 20 73 74 72 75 63 74 20 74 68 72 65 61 64 54 struct threadT
4250: 65 73 74 44 61 74 61 20 2a 70 44 61 74 61 20 3d estData *pData =
4260: 20 28 73 74 72 75 63 74 20 74 68 72 65 61 64 54 (struct threadT
4270: 65 73 74 44 61 74 61 2a 29 70 41 72 67 3b 0a 20 estData*)pArg;.
4280: 20 70 44 61 74 61 2d 3e 72 65 73 75 6c 74 20 3d pData->result =
4290: 20 66 63 6e 74 6c 28 70 44 61 74 61 2d 3e 66 64 fcntl(pData->fd
42a0: 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 70 44 61 74 , F_SETLK, &pDat
42b0: 61 2d 3e 6c 6f 63 6b 29 3b 0a 20 20 72 65 74 75 a->lock);. retu
42c0: 72 6e 20 70 41 72 67 3b 0a 7d 0a 0a 2f 2a 0a 2a rn pArg;.}../*.*
42d0: 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 * This procedure
42e0: 20 61 74 74 65 6d 70 74 73 20 74 6f 20 64 65 74 attempts to det
42f0: 65 72 6d 69 6e 65 20 77 68 65 74 68 65 72 20 6f ermine whether o
4300: 72 20 6e 6f 74 20 74 68 72 65 61 64 73 0a 2a 2a r not threads.**
4310: 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20 65 61 can override ea
4320: 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 20 ch others locks
4330: 74 68 65 6e 20 73 65 74 73 20 74 68 65 20 0a 2a then sets the .*
4340: 2a 20 74 68 72 65 61 64 73 4f 76 65 72 72 69 64 * threadsOverrid
4350: 65 45 61 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73 eEachOthersLocks
4360: 20 76 61 72 69 61 62 6c 65 20 61 70 70 72 6f 70 variable approp
4370: 72 69 61 74 65 6c 79 2e 0a 2a 2f 0a 73 74 61 74 riately..*/.stat
4380: 69 63 20 76 6f 69 64 20 74 65 73 74 54 68 72 65 ic void testThre
4390: 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f adLockingBehavio
43a0: 72 28 69 6e 74 20 66 64 5f 6f 72 69 67 29 7b 0a r(int fd_orig){.
43b0: 20 20 69 6e 74 20 66 64 3b 0a 20 20 73 74 72 75 int fd;. stru
43c0: 63 74 20 74 68 72 65 61 64 54 65 73 74 44 61 74 ct threadTestDat
43d0: 61 20 64 5b 32 5d 3b 0a 20 20 70 74 68 72 65 61 a d[2];. pthrea
43e0: 64 5f 74 20 74 5b 32 5d 3b 0a 0a 20 20 66 64 20 d_t t[2];.. fd
43f0: 3d 20 64 75 70 28 66 64 5f 6f 72 69 67 29 3b 0a = dup(fd_orig);.
4400: 20 20 69 66 28 20 66 64 3c 30 20 29 20 72 65 74 if( fd<0 ) ret
4410: 75 72 6e 3b 0a 20 20 6d 65 6d 73 65 74 28 64 2c urn;. memset(d,
4420: 20 30 2c 20 73 69 7a 65 6f 66 28 64 29 29 3b 0a 0, sizeof(d));.
4430: 20 20 64 5b 30 5d 2e 66 64 20 3d 20 66 64 3b 0a d[0].fd = fd;.
4440: 20 20 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 74 79 d[0].lock.l_ty
4450: 70 65 20 3d 20 46 5f 52 44 4c 43 4b 3b 0a 20 20 pe = F_RDLCK;.
4460: 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 d[0].lock.l_len
4470: 3d 20 31 3b 0a 20 20 64 5b 30 5d 2e 6c 6f 63 6b = 1;. d[0].lock
4480: 2e 6c 5f 73 74 61 72 74 20 3d 20 30 3b 0a 20 20 .l_start = 0;.
4490: 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 77 68 65 6e d[0].lock.l_when
44a0: 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 ce = SEEK_SET;.
44b0: 20 64 5b 31 5d 20 3d 20 64 5b 30 5d 3b 0a 20 20 d[1] = d[0];.
44c0: 64 5b 31 5d 2e 6c 6f 63 6b 2e 6c 5f 74 79 70 65 d[1].lock.l_type
44d0: 20 3d 20 46 5f 57 52 4c 43 4b 3b 0a 20 20 70 74 = F_WRLCK;. pt
44e0: 68 72 65 61 64 5f 63 72 65 61 74 65 28 26 74 5b hread_create(&t[
44f0: 30 5d 2c 20 30 2c 20 74 68 72 65 61 64 4c 6f 63 0], 0, threadLoc
4500: 6b 69 6e 67 54 65 73 74 2c 20 26 64 5b 30 5d 29 kingTest, &d[0])
4510: 3b 0a 20 20 70 74 68 72 65 61 64 5f 63 72 65 61 ;. pthread_crea
4520: 74 65 28 26 74 5b 31 5d 2c 20 30 2c 20 74 68 72 te(&t[1], 0, thr
4530: 65 61 64 4c 6f 63 6b 69 6e 67 54 65 73 74 2c 20 eadLockingTest,
4540: 26 64 5b 31 5d 29 3b 0a 20 20 70 74 68 72 65 61 &d[1]);. pthrea
4550: 64 5f 6a 6f 69 6e 28 74 5b 30 5d 2c 20 30 29 3b d_join(t[0], 0);
4560: 0a 20 20 70 74 68 72 65 61 64 5f 6a 6f 69 6e 28 . pthread_join(
4570: 74 5b 31 5d 2c 20 30 29 3b 0a 20 20 63 6c 6f 73 t[1], 0);. clos
4580: 65 28 66 64 29 3b 0a 20 20 74 68 72 65 61 64 73 e(fd);. threads
4590: 4f 76 65 72 72 69 64 65 45 61 63 68 4f 74 68 65 OverrideEachOthe
45a0: 72 73 4c 6f 63 6b 73 20 3d 20 20 64 5b 30 5d 2e rsLocks = d[0].
45b0: 72 65 73 75 6c 74 3d 3d 30 20 26 26 20 64 5b 31 result==0 && d[1
45c0: 5d 2e 72 65 73 75 6c 74 3d 3d 30 3b 0a 7d 0a 23 ].result==0;.}.#
45d0: 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f endif /* SQLITE_
45e0: 55 4e 49 58 5f 54 48 52 45 41 44 53 20 2a 2f 0a UNIX_THREADS */.
45f0: 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61 73 65 20 61 ./*.** Release a
4600: 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72 75 63 74 lockInfo struct
4610: 75 72 65 20 70 72 65 76 69 6f 75 73 6c 79 20 61 ure previously a
4620: 6c 6c 6f 63 61 74 65 64 20 62 79 20 66 69 6e 64 llocated by find
4630: 4c 6f 63 6b 49 6e 66 6f 28 29 2e 0a 2a 2f 0a 73 LockInfo()..*/.s
4640: 74 61 74 69 63 20 76 6f 69 64 20 72 65 6c 65 61 tatic void relea
4650: 73 65 4c 6f 63 6b 49 6e 66 6f 28 73 74 72 75 63 seLockInfo(struc
4660: 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4c 6f 63 t lockInfo *pLoc
4670: 6b 29 7b 0a 20 20 61 73 73 65 72 74 28 20 73 71 k){. assert( sq
4680: 6c 69 74 65 33 4f 73 49 6e 4d 75 74 65 78 28 31 lite3OsInMutex(1
4690: 29 20 29 3b 0a 20 20 70 4c 6f 63 6b 2d 3e 6e 52 ) );. pLock->nR
46a0: 65 66 2d 2d 3b 0a 20 20 69 66 28 20 70 4c 6f 63 ef--;. if( pLoc
46b0: 6b 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b 0a 20 20 k->nRef==0 ){.
46c0: 20 20 73 71 6c 69 74 65 33 48 61 73 68 49 6e 73 sqlite3HashIns
46d0: 65 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c 20 26 ert(&lockHash, &
46e0: 70 4c 6f 63 6b 2d 3e 6b 65 79 2c 20 73 69 7a 65 pLock->key, size
46f0: 6f 66 28 70 4c 6f 63 6b 2d 3e 6b 65 79 29 2c 20 of(pLock->key),
4700: 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 54 0);. sqlite3T
4710: 68 72 65 61 64 53 61 66 65 46 72 65 65 28 70 4c hreadSafeFree(pL
4720: 6f 63 6b 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a ock);. }.}../*.
4730: 2a 2a 20 52 65 6c 65 61 73 65 20 61 20 6f 70 65 ** Release a ope
4740: 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65 20 70 nCnt structure p
4750: 72 65 76 69 6f 75 73 6c 79 20 61 6c 6c 6f 63 61 reviously alloca
4760: 74 65 64 20 62 79 20 66 69 6e 64 4c 6f 63 6b 49 ted by findLockI
4770: 6e 66 6f 28 29 2e 0a 2a 2f 0a 73 74 61 74 69 63 nfo()..*/.static
4780: 20 76 6f 69 64 20 72 65 6c 65 61 73 65 4f 70 65 void releaseOpe
4790: 6e 43 6e 74 28 73 74 72 75 63 74 20 6f 70 65 6e nCnt(struct open
47a0: 43 6e 74 20 2a 70 4f 70 65 6e 29 7b 0a 20 20 61 Cnt *pOpen){. a
47b0: 73 73 65 72 74 28 20 73 71 6c 69 74 65 33 4f 73 ssert( sqlite3Os
47c0: 49 6e 4d 75 74 65 78 28 31 29 20 29 3b 0a 20 20 InMutex(1) );.
47d0: 70 4f 70 65 6e 2d 3e 6e 52 65 66 2d 2d 3b 0a 20 pOpen->nRef--;.
47e0: 20 69 66 28 20 70 4f 70 65 6e 2d 3e 6e 52 65 66 if( pOpen->nRef
47f0: 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 ==0 ){. sqlit
4800: 65 33 48 61 73 68 49 6e 73 65 72 74 28 26 6f 70 e3HashInsert(&op
4810: 65 6e 48 61 73 68 2c 20 26 70 4f 70 65 6e 2d 3e enHash, &pOpen->
4820: 6b 65 79 2c 20 73 69 7a 65 6f 66 28 70 4f 70 65 key, sizeof(pOpe
4830: 6e 2d 3e 6b 65 79 29 2c 20 30 29 3b 0a 20 20 20 n->key), 0);.
4840: 20 66 72 65 65 28 70 4f 70 65 6e 2d 3e 61 50 65 free(pOpen->aPe
4850: 6e 64 69 6e 67 29 3b 0a 20 20 20 20 73 71 6c 69 nding);. sqli
4860: 74 65 33 54 68 72 65 61 64 53 61 66 65 46 72 65 te3ThreadSafeFre
4870: 65 28 70 4f 70 65 6e 29 3b 0a 20 20 7d 0a 7d 0a e(pOpen);. }.}.
4880: 0a 2f 2a 0a 2a 2a 20 47 69 76 65 6e 20 61 20 66 ./*.** Given a f
4890: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 2c 20 ile descriptor,
48a0: 6c 6f 63 61 74 65 20 6c 6f 63 6b 49 6e 66 6f 20 locate lockInfo
48b0: 61 6e 64 20 6f 70 65 6e 43 6e 74 20 73 74 72 75 and openCnt stru
48c0: 63 74 75 72 65 73 20 74 68 61 74 0a 2a 2a 20 64 ctures that.** d
48d0: 65 73 63 72 69 62 65 73 20 74 68 61 74 20 66 69 escribes that fi
48e0: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 2e 20 20 le descriptor.
48f0: 43 72 65 61 74 65 20 6e 65 77 20 6f 6e 65 73 20 Create new ones
4900: 69 66 20 6e 65 63 65 73 73 61 72 79 2e 20 20 54 if necessary. T
4910: 68 65 0a 2a 2a 20 72 65 74 75 72 6e 20 76 61 6c he.** return val
4920: 75 65 73 20 6d 69 67 68 74 20 62 65 20 75 6e 69 ues might be uni
4930: 6e 69 74 69 61 6c 69 7a 65 64 20 69 66 20 61 6e nitialized if an
4940: 20 65 72 72 6f 72 20 6f 63 63 75 72 73 2e 0a 2a error occurs..*
4950: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 *.** Return the
4960: 6e 75 6d 62 65 72 20 6f 66 20 65 72 72 6f 72 73 number of errors
4970: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 ..*/.static int
4980: 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 0a 20 20 findLockInfo(.
4990: 69 6e 74 20 66 64 2c 20 20 20 20 20 20 20 20 20 int fd,
49a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
49b0: 54 68 65 20 66 69 6c 65 20 64 65 73 63 72 69 70 The file descrip
49c0: 74 6f 72 20 75 73 65 64 20 69 6e 20 74 68 65 20 tor used in the
49d0: 6b 65 79 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 key */. struct
49e0: 6c 6f 63 6b 49 6e 66 6f 20 2a 2a 70 70 4c 6f 63 lockInfo **ppLoc
49f0: 6b 2c 20 20 20 20 2f 2a 20 52 65 74 75 72 6e 20 k, /* Return
4a00: 74 68 65 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72 the lockInfo str
4a10: 75 63 74 75 72 65 20 68 65 72 65 20 2a 2f 0a 20 ucture here */.
4a20: 20 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 struct openCnt
4a30: 2a 2a 70 70 4f 70 65 6e 20 20 20 20 20 20 2f 2a **ppOpen /*
4a40: 20 52 65 74 75 72 6e 20 74 68 65 20 6f 70 65 6e Return the open
4a50: 43 6e 74 20 73 74 72 75 63 74 75 72 65 20 68 65 Cnt structure he
4a60: 72 65 20 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 72 re */.){. int r
4a70: 63 3b 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b c;. struct lock
4a80: 4b 65 79 20 6b 65 79 31 3b 0a 20 20 73 74 72 75 Key key1;. stru
4a90: 63 74 20 6f 70 65 6e 4b 65 79 20 6b 65 79 32 3b ct openKey key2;
4aa0: 0a 20 20 73 74 72 75 63 74 20 73 74 61 74 20 73 . struct stat s
4ab0: 74 61 74 62 75 66 3b 0a 20 20 73 74 72 75 63 74 tatbuf;. struct
4ac0: 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4c 6f 63 6b lockInfo *pLock
4ad0: 3b 0a 20 20 73 74 72 75 63 74 20 6f 70 65 6e 43 ;. struct openC
4ae0: 6e 74 20 2a 70 4f 70 65 6e 3b 0a 20 20 72 63 20 nt *pOpen;. rc
4af0: 3d 20 66 73 74 61 74 28 66 64 2c 20 26 73 74 61 = fstat(fd, &sta
4b00: 74 62 75 66 29 3b 0a 20 20 69 66 28 20 72 63 21 tbuf);. if( rc!
4b10: 3d 30 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 0a =0 ) return 1;..
4b20: 20 20 61 73 73 65 72 74 28 20 73 71 6c 69 74 65 assert( sqlite
4b30: 33 4f 73 49 6e 4d 75 74 65 78 28 31 29 20 29 3b 3OsInMutex(1) );
4b40: 0a 20 20 6d 65 6d 73 65 74 28 26 6b 65 79 31 2c . memset(&key1,
4b50: 20 30 2c 20 73 69 7a 65 6f 66 28 6b 65 79 31 29 0, sizeof(key1)
4b60: 29 3b 0a 20 20 6b 65 79 31 2e 64 65 76 20 3d 20 );. key1.dev =
4b70: 73 74 61 74 62 75 66 2e 73 74 5f 64 65 76 3b 0a statbuf.st_dev;.
4b80: 20 20 6b 65 79 31 2e 69 6e 6f 20 3d 20 73 74 61 key1.ino = sta
4b90: 74 62 75 66 2e 73 74 5f 69 6e 6f 3b 0a 23 69 66 tbuf.st_ino;.#if
4ba0: 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f def SQLITE_UNIX_
4bb0: 54 48 52 45 41 44 53 0a 20 20 69 66 28 20 74 68 THREADS. if( th
4bc0: 72 65 61 64 73 4f 76 65 72 72 69 64 65 45 61 63 readsOverrideEac
4bd0: 68 4f 74 68 65 72 73 4c 6f 63 6b 73 3c 30 20 29 hOthersLocks<0 )
4be0: 7b 0a 20 20 20 20 74 65 73 74 54 68 72 65 61 64 {. testThread
4bf0: 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28 LockingBehavior(
4c00: 66 64 29 3b 0a 20 20 7d 0a 20 20 6b 65 79 31 2e fd);. }. key1.
4c10: 74 69 64 20 3d 20 74 68 72 65 61 64 73 4f 76 65 tid = threadsOve
4c20: 72 72 69 64 65 45 61 63 68 4f 74 68 65 72 73 4c rrideEachOthersL
4c30: 6f 63 6b 73 20 3f 20 30 20 3a 20 70 74 68 72 65 ocks ? 0 : pthre
4c40: 61 64 5f 73 65 6c 66 28 29 3b 0a 23 65 6e 64 69 ad_self();.#endi
4c50: 66 0a 20 20 6d 65 6d 73 65 74 28 26 6b 65 79 32 f. memset(&key2
4c60: 2c 20 30 2c 20 73 69 7a 65 6f 66 28 6b 65 79 32 , 0, sizeof(key2
4c70: 29 29 3b 0a 20 20 6b 65 79 32 2e 64 65 76 20 3d ));. key2.dev =
4c80: 20 73 74 61 74 62 75 66 2e 73 74 5f 64 65 76 3b statbuf.st_dev;
4c90: 0a 20 20 6b 65 79 32 2e 69 6e 6f 20 3d 20 73 74 . key2.ino = st
4ca0: 61 74 62 75 66 2e 73 74 5f 69 6e 6f 3b 0a 20 20 atbuf.st_ino;.
4cb0: 70 4c 6f 63 6b 20 3d 20 28 73 74 72 75 63 74 20 pLock = (struct
4cc0: 6c 6f 63 6b 49 6e 66 6f 2a 29 73 71 6c 69 74 65 lockInfo*)sqlite
4cd0: 33 48 61 73 68 46 69 6e 64 28 26 6c 6f 63 6b 48 3HashFind(&lockH
4ce0: 61 73 68 2c 20 26 6b 65 79 31 2c 20 73 69 7a 65 ash, &key1, size
4cf0: 6f 66 28 6b 65 79 31 29 29 3b 0a 20 20 69 66 28 of(key1));. if(
4d00: 20 70 4c 6f 63 6b 3d 3d 30 20 29 7b 0a 20 20 20 pLock==0 ){.
4d10: 20 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f struct lockInfo
4d20: 20 2a 70 4f 6c 64 3b 0a 20 20 20 20 70 4c 6f 63 *pOld;. pLoc
4d30: 6b 20 3d 20 73 71 6c 69 74 65 33 54 68 72 65 61 k = sqlite3Threa
4d40: 64 53 61 66 65 4d 61 6c 6c 6f 63 28 20 73 69 7a dSafeMalloc( siz
4d50: 65 6f 66 28 2a 70 4c 6f 63 6b 29 20 29 3b 0a 20 eof(*pLock) );.
4d60: 20 20 20 69 66 28 20 70 4c 6f 63 6b 3d 3d 30 20 if( pLock==0
4d70: 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 31 3b ){. rc = 1;
4d80: 0a 20 20 20 20 20 20 67 6f 74 6f 20 65 78 69 74 . goto exit
4d90: 5f 66 69 6e 64 6c 6f 63 6b 69 6e 66 6f 3b 0a 20 _findlockinfo;.
4da0: 20 20 20 7d 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e }. pLock->
4db0: 6b 65 79 20 3d 20 6b 65 79 31 3b 0a 20 20 20 20 key = key1;.
4dc0: 70 4c 6f 63 6b 2d 3e 6e 52 65 66 20 3d 20 31 3b pLock->nRef = 1;
4dd0: 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74 20 . pLock->cnt
4de0: 3d 20 30 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e = 0;. pLock->
4df0: 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b 0a 20 20 locktype = 0;.
4e00: 20 20 70 4f 6c 64 20 3d 20 73 71 6c 69 74 65 33 pOld = sqlite3
4e10: 48 61 73 68 49 6e 73 65 72 74 28 26 6c 6f 63 6b HashInsert(&lock
4e20: 48 61 73 68 2c 20 26 70 4c 6f 63 6b 2d 3e 6b 65 Hash, &pLock->ke
4e30: 79 2c 20 73 69 7a 65 6f 66 28 6b 65 79 31 29 2c y, sizeof(key1),
4e40: 20 70 4c 6f 63 6b 29 3b 0a 20 20 20 20 69 66 28 pLock);. if(
4e50: 20 70 4f 6c 64 21 3d 30 20 29 7b 0a 20 20 20 20 pOld!=0 ){.
4e60: 20 20 61 73 73 65 72 74 28 20 70 4f 6c 64 3d 3d assert( pOld==
4e70: 70 4c 6f 63 6b 20 29 3b 0a 20 20 20 20 20 20 73 pLock );. s
4e80: 71 6c 69 74 65 33 54 68 72 65 61 64 53 61 66 65 qlite3ThreadSafe
4e90: 46 72 65 65 28 70 4c 6f 63 6b 29 3b 0a 20 20 20 Free(pLock);.
4ea0: 20 20 20 72 63 20 3d 20 31 3b 0a 20 20 20 20 20 rc = 1;.
4eb0: 20 67 6f 74 6f 20 65 78 69 74 5f 66 69 6e 64 6c goto exit_findl
4ec0: 6f 63 6b 69 6e 66 6f 3b 0a 20 20 20 20 7d 0a 20 ockinfo;. }.
4ed0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 4c 6f 63 }else{. pLoc
4ee0: 6b 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20 7d 0a 20 k->nRef++;. }.
4ef0: 20 2a 70 70 4c 6f 63 6b 20 3d 20 70 4c 6f 63 6b *ppLock = pLock
4f00: 3b 0a 20 20 69 66 28 20 70 70 4f 70 65 6e 21 3d ;. if( ppOpen!=
4f10: 30 20 29 7b 0a 20 20 20 20 70 4f 70 65 6e 20 3d 0 ){. pOpen =
4f20: 20 28 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 (struct openCnt
4f30: 2a 29 73 71 6c 69 74 65 33 48 61 73 68 46 69 6e *)sqlite3HashFin
4f40: 64 28 26 6f 70 65 6e 48 61 73 68 2c 20 26 6b 65 d(&openHash, &ke
4f50: 79 32 2c 20 73 69 7a 65 6f 66 28 6b 65 79 32 29 y2, sizeof(key2)
4f60: 29 3b 0a 20 20 20 20 69 66 28 20 70 4f 70 65 6e );. if( pOpen
4f70: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 73 74 72 ==0 ){. str
4f80: 75 63 74 20 6f 70 65 6e 43 6e 74 20 2a 70 4f 6c uct openCnt *pOl
4f90: 64 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e 20 3d d;. pOpen =
4fa0: 20 73 71 6c 69 74 65 33 54 68 72 65 61 64 53 61 sqlite3ThreadSa
4fb0: 66 65 4d 61 6c 6c 6f 63 28 20 73 69 7a 65 6f 66 feMalloc( sizeof
4fc0: 28 2a 70 4f 70 65 6e 29 20 29 3b 0a 20 20 20 20 (*pOpen) );.
4fd0: 20 20 69 66 28 20 70 4f 70 65 6e 3d 3d 30 20 29 if( pOpen==0 )
4fe0: 7b 0a 20 20 20 20 20 20 20 20 72 65 6c 65 61 73 {. releas
4ff0: 65 4c 6f 63 6b 49 6e 66 6f 28 70 4c 6f 63 6b 29 eLockInfo(pLock)
5000: 3b 0a 20 20 20 20 20 20 20 20 72 63 20 3d 20 31 ;. rc = 1
5010: 3b 0a 20 20 20 20 20 20 20 20 67 6f 74 6f 20 65 ;. goto e
5020: 78 69 74 5f 66 69 6e 64 6c 6f 63 6b 69 6e 66 6f xit_findlockinfo
5030: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 ;. }.
5040: 70 4f 70 65 6e 2d 3e 6b 65 79 20 3d 20 6b 65 79 pOpen->key = key
5050: 32 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 2;. pOpen->
5060: 6e 52 65 66 20 3d 20 31 3b 0a 20 20 20 20 20 20 nRef = 1;.
5070: 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 20 3d 20 30 pOpen->nLock = 0
5080: 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 6e ;. pOpen->n
5090: 50 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 20 Pending = 0;.
50a0: 20 20 20 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 pOpen->aPendi
50b0: 6e 67 20 3d 20 30 3b 0a 20 20 20 20 20 20 70 4f ng = 0;. pO
50c0: 6c 64 20 3d 20 73 71 6c 69 74 65 33 48 61 73 68 ld = sqlite3Hash
50d0: 49 6e 73 65 72 74 28 26 6f 70 65 6e 48 61 73 68 Insert(&openHash
50e0: 2c 20 26 70 4f 70 65 6e 2d 3e 6b 65 79 2c 20 73 , &pOpen->key, s
50f0: 69 7a 65 6f 66 28 6b 65 79 32 29 2c 20 70 4f 70 izeof(key2), pOp
5100: 65 6e 29 3b 0a 20 20 20 20 20 20 69 66 28 20 70 en);. if( p
5110: 4f 6c 64 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 Old!=0 ){.
5120: 20 20 61 73 73 65 72 74 28 20 70 4f 6c 64 3d 3d assert( pOld==
5130: 70 4f 70 65 6e 20 29 3b 0a 20 20 20 20 20 20 20 pOpen );.
5140: 20 73 71 6c 69 74 65 33 54 68 72 65 61 64 53 61 sqlite3ThreadSa
5150: 66 65 46 72 65 65 28 70 4f 70 65 6e 29 3b 0a 20 feFree(pOpen);.
5160: 20 20 20 20 20 20 20 72 65 6c 65 61 73 65 4c 6f releaseLo
5170: 63 6b 49 6e 66 6f 28 70 4c 6f 63 6b 29 3b 0a 20 ckInfo(pLock);.
5180: 20 20 20 20 20 20 20 72 63 20 3d 20 31 3b 0a 20 rc = 1;.
5190: 20 20 20 20 20 20 20 67 6f 74 6f 20 65 78 69 74 goto exit
51a0: 5f 66 69 6e 64 6c 6f 63 6b 69 6e 66 6f 3b 0a 20 _findlockinfo;.
51b0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 }. }else
51c0: 7b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 6e {. pOpen->n
51d0: 52 65 66 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 Ref++;. }.
51e0: 20 2a 70 70 4f 70 65 6e 20 3d 20 70 4f 70 65 6e *ppOpen = pOpen
51f0: 3b 0a 20 20 7d 0a 0a 65 78 69 74 5f 66 69 6e 64 ;. }..exit_find
5200: 6c 6f 63 6b 69 6e 66 6f 3a 0a 20 20 72 65 74 75 lockinfo:. retu
5210: 72 6e 20 72 63 3b 0a 7d 0a 0a 23 69 66 64 65 66 rn rc;.}..#ifdef
5220: 20 53 51 4c 49 54 45 5f 44 45 42 55 47 0a 2f 2a SQLITE_DEBUG./*
5230: 0a 2a 2a 20 48 65 6c 70 65 72 20 66 75 6e 63 74 .** Helper funct
5240: 69 6f 6e 20 66 6f 72 20 70 72 69 6e 74 69 6e 67 ion for printing
5250: 20 6f 75 74 20 74 72 61 63 65 20 69 6e 66 6f 72 out trace infor
5260: 6d 61 74 69 6f 6e 20 66 72 6f 6d 20 64 65 62 75 mation from debu
5270: 67 67 69 6e 67 0a 2a 2a 20 62 69 6e 61 72 69 65 gging.** binarie
5280: 73 2e 20 54 68 69 73 20 72 65 74 75 72 6e 73 20 s. This returns
5290: 74 68 65 20 73 74 72 69 6e 67 20 72 65 70 72 65 the string repre
52a0: 73 65 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 setation of the
52b0: 73 75 70 70 6c 69 65 64 0a 2a 2a 20 69 6e 74 65 supplied.** inte
52c0: 67 65 72 20 6c 6f 63 6b 2d 74 79 70 65 2e 0a 2a ger lock-type..*
52d0: 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 /.static const c
52e0: 68 61 72 20 2a 6c 6f 63 6b 74 79 70 65 4e 61 6d har *locktypeNam
52f0: 65 28 69 6e 74 20 6c 6f 63 6b 74 79 70 65 29 7b e(int locktype){
5300: 0a 20 20 73 77 69 74 63 68 28 20 6c 6f 63 6b 74 . switch( lockt
5310: 79 70 65 20 29 7b 0a 20 20 63 61 73 65 20 4e 4f ype ){. case NO
5320: 5f 4c 4f 43 4b 3a 20 72 65 74 75 72 6e 20 22 4e _LOCK: return "N
5330: 4f 4e 45 22 3b 0a 20 20 63 61 73 65 20 53 48 41 ONE";. case SHA
5340: 52 45 44 5f 4c 4f 43 4b 3a 20 72 65 74 75 72 6e RED_LOCK: return
5350: 20 22 53 48 41 52 45 44 22 3b 0a 20 20 63 61 73 "SHARED";. cas
5360: 65 20 52 45 53 45 52 56 45 44 5f 4c 4f 43 4b 3a e RESERVED_LOCK:
5370: 20 72 65 74 75 72 6e 20 22 52 45 53 45 52 56 45 return "RESERVE
5380: 44 22 3b 0a 20 20 63 61 73 65 20 50 45 4e 44 49 D";. case PENDI
5390: 4e 47 5f 4c 4f 43 4b 3a 20 72 65 74 75 72 6e 20 NG_LOCK: return
53a0: 22 50 45 4e 44 49 4e 47 22 3b 0a 20 20 63 61 73 "PENDING";. cas
53b0: 65 20 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43 4b e EXCLUSIVE_LOCK
53c0: 3a 20 72 65 74 75 72 6e 20 22 45 58 43 4c 55 53 : return "EXCLUS
53d0: 49 56 45 22 3b 0a 20 20 7d 0a 20 20 72 65 74 75 IVE";. }. retu
53e0: 72 6e 20 22 45 52 52 4f 52 22 3b 0a 7d 0a 23 65 rn "ERROR";.}.#e
53f0: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 77 ndif../*.** If w
5400: 65 20 61 72 65 20 63 75 72 72 65 6e 74 6c 79 20 e are currently
5410: 69 6e 20 61 20 64 69 66 66 65 72 65 6e 74 20 74 in a different t
5420: 68 72 65 61 64 20 74 68 61 6e 20 74 68 65 20 74 hread than the t
5430: 68 72 65 61 64 20 74 68 61 74 20 74 68 65 0a 2a hread that the.*
5440: 2a 20 75 6e 69 78 46 69 6c 65 20 61 72 67 75 6d * unixFile argum
5450: 65 6e 74 20 62 65 6c 6f 6e 67 73 20 74 6f 2c 20 ent belongs to,
5460: 74 68 65 6e 20 74 72 61 6e 73 66 65 72 20 6f 77 then transfer ow
5470: 6e 65 72 73 68 69 70 20 6f 66 20 74 68 65 20 75 nership of the u
5480: 6e 69 78 46 69 6c 65 0a 2a 2a 20 6f 76 65 72 20 nixFile.** over
5490: 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 to the current t
54a0: 68 72 65 61 64 2e 0a 2a 2a 0a 2a 2a 20 41 20 75 hread..**.** A u
54b0: 6e 69 78 46 69 6c 65 20 69 73 20 6f 6e 6c 79 20 nixFile is only
54c0: 6f 77 6e 65 64 20 62 79 20 61 20 74 68 72 65 61 owned by a threa
54d0: 64 20 6f 6e 20 73 79 73 74 65 6d 73 20 77 68 65 d on systems whe
54e0: 72 65 20 6f 6e 65 20 74 68 72 65 61 64 20 69 73 re one thread is
54f0: 0a 2a 2a 20 75 6e 61 62 6c 65 20 74 6f 20 6f 76 .** unable to ov
5500: 65 72 72 69 64 65 20 6c 6f 63 6b 73 20 63 72 65 erride locks cre
5510: 61 74 65 64 20 62 79 20 61 20 64 69 66 66 65 72 ated by a differ
5520: 65 6e 74 20 74 68 72 65 61 64 2e 20 20 52 65 64 ent thread. Red
5530: 48 61 74 39 20 69 73 0a 2a 2a 20 61 6e 20 65 78 Hat9 is.** an ex
5540: 61 6d 70 6c 65 20 6f 66 20 73 75 63 68 20 61 20 ample of such a
5550: 73 79 73 74 65 6d 2e 0a 2a 2a 0a 2a 2a 20 4f 77 system..**.** Ow
5560: 6e 65 72 73 68 69 70 20 74 72 61 6e 73 66 65 72 nership transfer
5570: 20 69 73 20 6f 6e 6c 79 20 61 6c 6c 6f 77 65 64 is only allowed
5580: 20 69 66 20 74 68 65 20 75 6e 69 78 46 69 6c 65 if the unixFile
5590: 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 75 6e is currently un
55a0: 6c 6f 63 6b 65 64 2e 0a 2a 2a 20 49 66 20 74 68 locked..** If th
55b0: 65 20 75 6e 69 78 46 69 6c 65 20 69 73 20 6c 6f e unixFile is lo
55c0: 63 6b 65 64 20 61 6e 64 20 61 6e 20 6f 77 6e 65 cked and an owne
55d0: 72 73 68 69 70 20 69 73 20 77 72 6f 6e 67 2c 20 rship is wrong,
55e0: 74 68 65 6e 20 72 65 74 75 72 6e 0a 2a 2a 20 53 then return.** S
55f0: 51 4c 49 54 45 5f 4d 49 53 55 53 45 2e 20 20 53 QLITE_MISUSE. S
5600: 51 4c 49 54 45 5f 4f 4b 20 69 73 20 72 65 74 75 QLITE_OK is retu
5610: 72 6e 65 64 20 69 66 20 65 76 65 72 79 74 68 69 rned if everythi
5620: 6e 67 20 77 6f 72 6b 73 2e 0a 2a 2f 0a 23 69 66 ng works..*/.#if
5630: 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f def SQLITE_UNIX_
5640: 54 48 52 45 41 44 53 0a 73 74 61 74 69 63 20 69 THREADS.static i
5650: 6e 74 20 74 72 61 6e 73 66 65 72 4f 77 6e 65 72 nt transferOwner
5660: 73 68 69 70 28 75 6e 69 78 46 69 6c 65 20 2a 70 ship(unixFile *p
5670: 46 69 6c 65 29 7b 0a 20 20 69 6e 74 20 72 63 3b File){. int rc;
5680: 0a 20 20 70 74 68 72 65 61 64 5f 74 20 68 53 65 . pthread_t hSe
5690: 6c 66 3b 0a 20 20 69 66 28 20 74 68 72 65 61 64 lf;. if( thread
56a0: 73 4f 76 65 72 72 69 64 65 45 61 63 68 4f 74 68 sOverrideEachOth
56b0: 65 72 73 4c 6f 63 6b 73 20 29 7b 0a 20 20 20 20 ersLocks ){.
56c0: 2f 2a 20 4f 77 6e 65 72 73 68 69 70 20 74 72 61 /* Ownership tra
56d0: 6e 73 66 65 72 73 20 6e 6f 74 20 6e 65 65 64 65 nsfers not neede
56e0: 64 20 6f 6e 20 74 68 69 73 20 73 79 73 74 65 6d d on this system
56f0: 20 2a 2f 0a 20 20 20 20 72 65 74 75 72 6e 20 53 */. return S
5700: 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 20 20 QLITE_OK;. }.
5710: 68 53 65 6c 66 20 3d 20 70 74 68 72 65 61 64 5f hSelf = pthread_
5720: 73 65 6c 66 28 29 3b 0a 20 20 69 66 28 20 70 74 self();. if( pt
5730: 68 72 65 61 64 5f 65 71 75 61 6c 28 70 46 69 6c hread_equal(pFil
5740: 65 2d 3e 74 69 64 2c 20 68 53 65 6c 66 29 20 29 e->tid, hSelf) )
5750: 7b 0a 20 20 20 20 2f 2a 20 57 65 20 61 72 65 20 {. /* We are
5760: 73 74 69 6c 6c 20 69 6e 20 74 68 65 20 73 61 6d still in the sam
5770: 65 20 74 68 72 65 61 64 20 2a 2f 0a 20 20 20 20 e thread */.
5780: 54 52 41 43 45 31 28 22 4e 6f 2d 74 72 61 6e 73 TRACE1("No-trans
5790: 66 65 72 2c 20 73 61 6d 65 20 74 68 72 65 61 64 fer, same thread
57a0: 5c 6e 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e \n");. return
57b0: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a SQLITE_OK;. }.
57c0: 20 20 69 66 28 20 70 46 69 6c 65 2d 3e 6c 6f 63 if( pFile->loc
57d0: 6b 74 79 70 65 21 3d 4e 4f 5f 4c 4f 43 4b 20 29 ktype!=NO_LOCK )
57e0: 7b 0a 20 20 20 20 2f 2a 20 57 65 20 63 61 6e 6e {. /* We cann
57f0: 6f 74 20 63 68 61 6e 67 65 20 6f 77 6e 65 72 73 ot change owners
5800: 68 69 70 20 77 68 69 6c 65 20 77 65 20 61 72 65 hip while we are
5810: 20 68 6f 6c 64 69 6e 67 20 61 20 6c 6f 63 6b 21 holding a lock!
5820: 20 2a 2f 0a 20 20 20 20 72 65 74 75 72 6e 20 53 */. return S
5830: 51 4c 49 54 45 5f 4d 49 53 55 53 45 3b 0a 20 20 QLITE_MISUSE;.
5840: 7d 0a 20 20 54 52 41 43 45 34 28 22 54 72 61 6e }. TRACE4("Tran
5850: 73 66 65 72 20 6f 77 6e 65 72 73 68 69 70 20 6f sfer ownership o
5860: 66 20 25 64 20 66 72 6f 6d 20 25 64 20 74 6f 20 f %d from %d to
5870: 25 64 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 68 2c %d\n", pFile->h,
5880: 70 46 69 6c 65 2d 3e 74 69 64 2c 68 53 65 6c 66 pFile->tid,hSelf
5890: 29 3b 0a 20 20 70 46 69 6c 65 2d 3e 74 69 64 20 );. pFile->tid
58a0: 3d 20 68 53 65 6c 66 3b 0a 20 20 72 65 6c 65 61 = hSelf;. relea
58b0: 73 65 4c 6f 63 6b 49 6e 66 6f 28 70 46 69 6c 65 seLockInfo(pFile
58c0: 2d 3e 70 4c 6f 63 6b 29 3b 0a 20 20 72 63 20 3d ->pLock);. rc =
58d0: 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 70 46 findLockInfo(pF
58e0: 69 6c 65 2d 3e 68 2c 20 26 70 46 69 6c 65 2d 3e ile->h, &pFile->
58f0: 70 4c 6f 63 6b 2c 20 30 29 3b 0a 20 20 54 52 41 pLock, 0);. TRA
5900: 43 45 35 28 22 4c 4f 43 4b 20 20 20 20 25 64 20 CE5("LOCK %d
5910: 69 73 20 6e 6f 77 20 25 73 28 25 73 2c 25 64 29 is now %s(%s,%d)
5920: 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 68 2c 0a 20 \n", pFile->h,.
5930: 20 20 20 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 locktypeName
5940: 28 70 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 70 65 (pFile->locktype
5950: 29 2c 0a 20 20 20 20 20 6c 6f 63 6b 74 79 70 65 ),. locktype
5960: 4e 61 6d 65 28 70 46 69 6c 65 2d 3e 70 4c 6f 63 Name(pFile->pLoc
5970: 6b 2d 3e 6c 6f 63 6b 74 79 70 65 29 2c 20 70 46 k->locktype), pF
5980: 69 6c 65 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 29 ile->pLock->cnt)
5990: 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d ;. return rc;.}
59a0: 0a 23 65 6c 73 65 0a 20 20 2f 2a 20 4f 6e 20 73 .#else. /* On s
59b0: 69 6e 67 6c 65 2d 74 68 72 65 61 64 65 64 20 62 ingle-threaded b
59c0: 75 69 6c 64 73 2c 20 6f 77 6e 65 72 73 68 69 70 uilds, ownership
59d0: 20 74 72 61 6e 73 66 65 72 20 69 73 20 61 20 6e transfer is a n
59e0: 6f 2d 6f 70 20 2a 2f 0a 23 20 64 65 66 69 6e 65 o-op */.# define
59f0: 20 74 72 61 6e 73 66 65 72 4f 77 6e 65 72 73 68 transferOwnersh
5a00: 69 70 28 58 29 20 53 51 4c 49 54 45 5f 4f 4b 0a ip(X) SQLITE_OK.
5a10: 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 44 65 #endif../*.** De
5a20: 6c 65 74 65 20 74 68 65 20 6e 61 6d 65 64 20 66 lete the named f
5a30: 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 ile.*/.int sqlit
5a40: 65 33 55 6e 69 78 44 65 6c 65 74 65 28 63 6f 6e e3UnixDelete(con
5a50: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 st char *zFilena
5a60: 6d 65 29 7b 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 me){. unlink(zF
5a70: 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 72 65 74 75 ilename);. retu
5a80: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a rn SQLITE_OK;.}.
5a90: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 ./*.** Return TR
5aa0: 55 45 20 69 66 20 74 68 65 20 6e 61 6d 65 64 20 UE if the named
5ab0: 66 69 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f 0a file exists..*/.
5ac0: 69 6e 74 20 73 71 6c 69 74 65 33 55 6e 69 78 46 int sqlite3UnixF
5ad0: 69 6c 65 45 78 69 73 74 73 28 63 6f 6e 73 74 20 ileExists(const
5ae0: 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 char *zFilename)
5af0: 7b 0a 20 20 72 65 74 75 72 6e 20 61 63 63 65 73 {. return acces
5b00: 73 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 30 29 3d s(zFilename, 0)=
5b10: 3d 30 3b 0a 7d 0a 0a 2f 2a 20 46 6f 72 77 61 72 =0;.}../* Forwar
5b20: 64 20 64 65 63 6c 61 72 61 74 69 6f 6e 20 2a 2f d declaration */
5b30: 0a 73 74 61 74 69 63 20 69 6e 74 20 61 6c 6c 6f .static int allo
5b40: 63 61 74 65 55 6e 69 78 46 69 6c 65 28 75 6e 69 cateUnixFile(uni
5b50: 78 46 69 6c 65 20 2a 70 49 6e 69 74 2c 20 4f 73 xFile *pInit, Os
5b60: 46 69 6c 65 20 2a 2a 70 49 64 29 3b 0a 0a 2f 2a File **pId);../*
5b70: 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f .** Attempt to o
5b80: 70 65 6e 20 61 20 66 69 6c 65 20 66 6f 72 20 62 pen a file for b
5b90: 6f 74 68 20 72 65 61 64 69 6e 67 20 61 6e 64 20 oth reading and
5ba0: 77 72 69 74 69 6e 67 2e 20 20 49 66 20 74 68 61 writing. If tha
5bb0: 74 0a 2a 2a 20 66 61 69 6c 73 2c 20 74 72 79 20 t.** fails, try
5bc0: 6f 70 65 6e 69 6e 67 20 69 74 20 72 65 61 64 2d opening it read-
5bd0: 6f 6e 6c 79 2e 20 20 49 66 20 74 68 65 20 66 69 only. If the fi
5be0: 6c 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 le does not exis
5bf0: 74 2c 0a 2a 2a 20 74 72 79 20 74 6f 20 63 72 65 t,.** try to cre
5c00: 61 74 65 20 69 74 2e 0a 2a 2a 0a 2a 2a 20 4f 6e ate it..**.** On
5c10: 20 73 75 63 63 65 73 73 2c 20 61 20 68 61 6e 64 success, a hand
5c20: 6c 65 20 66 6f 72 20 74 68 65 20 6f 70 65 6e 20 le for the open
5c30: 66 69 6c 65 20 69 73 20 77 72 69 74 74 65 6e 20 file is written
5c40: 74 6f 20 2a 69 64 0a 2a 2a 20 61 6e 64 20 2a 70 to *id.** and *p
5c50: 52 65 61 64 6f 6e 6c 79 20 69 73 20 73 65 74 20 Readonly is set
5c60: 74 6f 20 30 20 69 66 20 74 68 65 20 66 69 6c 65 to 0 if the file
5c70: 20 77 61 73 20 6f 70 65 6e 65 64 20 66 6f 72 20 was opened for
5c80: 72 65 61 64 69 6e 67 20 61 6e 64 0a 2a 2a 20 77 reading and.** w
5c90: 72 69 74 69 6e 67 20 6f 72 20 31 20 69 66 20 74 riting or 1 if t
5ca0: 68 65 20 66 69 6c 65 20 77 61 73 20 6f 70 65 6e he file was open
5cb0: 65 64 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 54 ed read-only. T
5cc0: 68 65 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 he function retu
5cd0: 72 6e 73 0a 2a 2a 20 53 51 4c 49 54 45 5f 4f 4b rns.** SQLITE_OK
5ce0: 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 ..**.** On failu
5cf0: 72 65 2c 20 74 68 65 20 66 75 6e 63 74 69 6f 6e re, the function
5d00: 20 72 65 74 75 72 6e 73 20 53 51 4c 49 54 45 5f returns SQLITE_
5d10: 43 41 4e 54 4f 50 45 4e 20 61 6e 64 20 6c 65 61 CANTOPEN and lea
5d20: 76 65 73 0a 2a 2a 20 2a 69 64 20 61 6e 64 20 2a ves.** *id and *
5d30: 70 52 65 61 64 6f 6e 6c 79 20 75 6e 63 68 61 6e pReadonly unchan
5d40: 67 65 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 ged..*/.int sqli
5d50: 74 65 33 55 6e 69 78 4f 70 65 6e 52 65 61 64 57 te3UnixOpenReadW
5d60: 72 69 74 65 28 0a 20 20 63 6f 6e 73 74 20 63 68 rite(. const ch
5d70: 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 ar *zFilename,.
5d80: 20 4f 73 46 69 6c 65 20 2a 2a 70 49 64 2c 0a 20 OsFile **pId,.
5d90: 20 69 6e 74 20 2a 70 52 65 61 64 6f 6e 6c 79 0a int *pReadonly.
5da0: 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 75 ){. int rc;. u
5db0: 6e 69 78 46 69 6c 65 20 66 3b 0a 0a 20 20 43 52 nixFile f;.. CR
5dc0: 41 53 48 5f 54 45 53 54 5f 4f 56 45 52 52 49 44 ASH_TEST_OVERRID
5dd0: 45 28 73 71 6c 69 74 65 33 43 72 61 73 68 4f 70 E(sqlite3CrashOp
5de0: 65 6e 52 65 61 64 57 72 69 74 65 2c 20 7a 46 69 enReadWrite, zFi
5df0: 6c 65 6e 61 6d 65 2c 20 70 49 64 2c 20 70 52 65 lename, pId, pRe
5e00: 61 64 6f 6e 6c 79 29 3b 0a 20 20 61 73 73 65 72 adonly);. asser
5e10: 74 28 20 30 3d 3d 2a 70 49 64 20 29 3b 0a 20 20 t( 0==*pId );.
5e20: 66 2e 68 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 f.h = open(zFile
5e30: 6e 61 6d 65 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43 name, O_RDWR|O_C
5e40: 52 45 41 54 7c 4f 5f 4c 41 52 47 45 46 49 4c 45 REAT|O_LARGEFILE
5e50: 7c 4f 5f 42 49 4e 41 52 59 2c 0a 20 20 20 20 20 |O_BINARY,.
5e60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
5e70: 20 20 20 20 20 53 51 4c 49 54 45 5f 44 45 46 41 SQLITE_DEFA
5e80: 55 4c 54 5f 46 49 4c 45 5f 50 45 52 4d 49 53 53 ULT_FILE_PERMISS
5e90: 49 4f 4e 53 29 3b 0a 20 20 69 66 28 20 66 2e 68 IONS);. if( f.h
5ea0: 3c 30 20 29 7b 0a 23 69 66 64 65 66 20 45 49 53 <0 ){.#ifdef EIS
5eb0: 44 49 52 0a 20 20 20 20 69 66 28 20 65 72 72 6e DIR. if( errn
5ec0: 6f 3d 3d 45 49 53 44 49 52 20 29 7b 0a 20 20 20 o==EISDIR ){.
5ed0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 return SQLITE
5ee0: 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 20 20 7d _CANTOPEN;. }
5ef0: 0a 23 65 6e 64 69 66 0a 20 20 20 20 66 2e 68 20 .#endif. f.h
5f00: 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 = open(zFilename
5f10: 2c 20 4f 5f 52 44 4f 4e 4c 59 7c 4f 5f 4c 41 52 , O_RDONLY|O_LAR
5f20: 47 45 46 49 4c 45 7c 4f 5f 42 49 4e 41 52 59 29 GEFILE|O_BINARY)
5f30: 3b 0a 20 20 20 20 69 66 28 20 66 2e 68 3c 30 20 ;. if( f.h<0
5f40: 29 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 ){. return
5f50: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b SQLITE_CANTOPEN;
5f60: 20 0a 20 20 20 20 7d 0a 20 20 20 20 2a 70 52 65 . }. *pRe
5f70: 61 64 6f 6e 6c 79 20 3d 20 31 3b 0a 20 20 7d 65 adonly = 1;. }e
5f80: 6c 73 65 7b 0a 20 20 20 20 2a 70 52 65 61 64 6f lse{. *pReado
5f90: 6e 6c 79 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 73 nly = 0;. }. s
5fa0: 71 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 qlite3OsEnterMut
5fb0: 65 78 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e ex();. rc = fin
5fc0: 64 4c 6f 63 6b 49 6e 66 6f 28 66 2e 68 2c 20 26 dLockInfo(f.h, &
5fd0: 66 2e 70 4c 6f 63 6b 2c 20 26 66 2e 70 4f 70 65 f.pLock, &f.pOpe
5fe0: 6e 29 3b 0a 20 20 73 71 6c 69 74 65 33 4f 73 4c n);. sqlite3OsL
5ff0: 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20 20 69 eaveMutex();. i
6000: 66 28 20 72 63 20 29 7b 0a 20 20 20 20 63 6c 6f f( rc ){. clo
6010: 73 65 28 66 2e 68 29 3b 0a 20 20 20 20 72 65 74 se(f.h);. ret
6020: 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d urn SQLITE_NOMEM
6030: 3b 0a 20 20 7d 0a 20 20 54 52 41 43 45 33 28 22 ;. }. TRACE3("
6040: 4f 50 45 4e 20 20 20 20 25 2d 33 64 20 25 73 5c OPEN %-3d %s\
6050: 6e 22 2c 20 66 2e 68 2c 20 7a 46 69 6c 65 6e 61 n", f.h, zFilena
6060: 6d 65 29 3b 0a 20 20 72 65 74 75 72 6e 20 61 6c me);. return al
6070: 6c 6f 63 61 74 65 55 6e 69 78 46 69 6c 65 28 26 locateUnixFile(&
6080: 66 2c 20 70 49 64 29 3b 0a 7d 0a 0a 0a 2f 2a 0a f, pId);.}.../*.
6090: 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70 ** Attempt to op
60a0: 65 6e 20 61 20 6e 65 77 20 66 69 6c 65 20 66 6f en a new file fo
60b0: 72 20 65 78 63 6c 75 73 69 76 65 20 61 63 63 65 r exclusive acce
60c0: 73 73 20 62 79 20 74 68 69 73 20 70 72 6f 63 65 ss by this proce
60d0: 73 73 2e 0a 2a 2a 20 54 68 65 20 66 69 6c 65 20 ss..** The file
60e0: 77 69 6c 6c 20 62 65 20 6f 70 65 6e 65 64 20 66 will be opened f
60f0: 6f 72 20 62 6f 74 68 20 72 65 61 64 69 6e 67 20 or both reading
6100: 61 6e 64 20 77 72 69 74 69 6e 67 2e 20 20 54 6f and writing. To
6110: 20 61 76 6f 69 64 0a 2a 2a 20 61 20 70 6f 74 65 avoid.** a pote
6120: 6e 74 69 61 6c 20 73 65 63 75 72 69 74 79 20 70 ntial security p
6130: 72 6f 62 6c 65 6d 2c 20 77 65 20 64 6f 20 6e 6f roblem, we do no
6140: 74 20 61 6c 6c 6f 77 20 74 68 65 20 66 69 6c 65 t allow the file
6150: 20 74 6f 20 68 61 76 65 0a 2a 2a 20 70 72 65 76 to have.** prev
6160: 69 6f 75 73 6c 79 20 65 78 69 73 74 65 64 2e 20 iously existed.
6170: 20 4e 6f 72 20 64 6f 20 77 65 20 61 6c 6c 6f 77 Nor do we allow
6180: 20 74 68 65 20 66 69 6c 65 20 74 6f 20 62 65 20 the file to be
6190: 61 20 73 79 6d 62 6f 6c 69 63 0a 2a 2a 20 6c 69 a symbolic.** li
61a0: 6e 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 64 65 6c nk..**.** If del
61b0: 46 6c 61 67 20 69 73 20 74 72 75 65 2c 20 74 68 Flag is true, th
61c0: 65 6e 20 6d 61 6b 65 20 61 72 72 61 6e 67 65 6d en make arrangem
61d0: 65 6e 74 73 20 74 6f 20 61 75 74 6f 6d 61 74 69 ents to automati
61e0: 63 61 6c 6c 79 20 64 65 6c 65 74 65 0a 2a 2a 20 cally delete.**
61f0: 74 68 65 20 66 69 6c 65 20 77 68 65 6e 20 69 74 the file when it
6200: 20 69 73 20 63 6c 6f 73 65 64 2e 0a 2a 2a 0a 2a is closed..**.*
6210: 2a 20 4f 6e 20 73 75 63 63 65 73 73 2c 20 77 72 * On success, wr
6220: 69 74 65 20 74 68 65 20 66 69 6c 65 20 68 61 6e ite the file han
6230: 64 6c 65 20 69 6e 74 6f 20 2a 69 64 20 61 6e 64 dle into *id and
6240: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f return SQLITE_O
6250: 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c K..**.** On fail
6260: 75 72 65 2c 20 72 65 74 75 72 6e 20 53 51 4c 49 ure, return SQLI
6270: 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a TE_CANTOPEN..*/.
6280: 69 6e 74 20 73 71 6c 69 74 65 33 55 6e 69 78 4f int sqlite3UnixO
6290: 70 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e penExclusive(con
62a0: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 st char *zFilena
62b0: 6d 65 2c 20 4f 73 46 69 6c 65 20 2a 2a 70 49 64 me, OsFile **pId
62c0: 2c 20 69 6e 74 20 64 65 6c 46 6c 61 67 29 7b 0a , int delFlag){.
62d0: 20 20 69 6e 74 20 72 63 3b 0a 20 20 75 6e 69 78 int rc;. unix
62e0: 46 69 6c 65 20 66 3b 0a 0a 20 20 43 52 41 53 48 File f;.. CRASH
62f0: 5f 54 45 53 54 5f 4f 56 45 52 52 49 44 45 28 73 _TEST_OVERRIDE(s
6300: 71 6c 69 74 65 33 43 72 61 73 68 4f 70 65 6e 45 qlite3CrashOpenE
6310: 78 63 6c 75 73 69 76 65 2c 20 7a 46 69 6c 65 6e xclusive, zFilen
6320: 61 6d 65 2c 20 70 49 64 2c 20 64 65 6c 46 6c 61 ame, pId, delFla
6330: 67 29 3b 0a 20 20 61 73 73 65 72 74 28 20 30 3d g);. assert( 0=
6340: 3d 2a 70 49 64 20 29 3b 0a 20 20 66 2e 68 20 3d =*pId );. f.h =
6350: 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c open(zFilename,
6360: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
6370: 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45 41 54 7c O_RDWR|O_CREAT|
6380: 4f 5f 45 58 43 4c 7c 4f 5f 4e 4f 46 4f 4c 4c 4f O_EXCL|O_NOFOLLO
6390: 57 7c 4f 5f 4c 41 52 47 45 46 49 4c 45 7c 4f 5f W|O_LARGEFILE|O_
63a0: 42 49 4e 41 52 59 2c 0a 20 20 20 20 20 20 20 20 BINARY,.
63b0: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 44 SQLITE_D
63c0: 45 46 41 55 4c 54 5f 46 49 4c 45 5f 50 45 52 4d EFAULT_FILE_PERM
63d0: 49 53 53 49 4f 4e 53 29 3b 0a 20 20 69 66 28 20 ISSIONS);. if(
63e0: 66 2e 68 3c 30 20 29 7b 0a 20 20 20 20 72 65 74 f.h<0 ){. ret
63f0: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f urn SQLITE_CANTO
6400: 50 45 4e 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 PEN;. }. sqlit
6410: 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 e3OsEnterMutex()
6420: 3b 0a 20 20 72 63 20 3d 20 66 69 6e 64 4c 6f 63 ;. rc = findLoc
6430: 6b 49 6e 66 6f 28 66 2e 68 2c 20 26 66 2e 70 4c kInfo(f.h, &f.pL
6440: 6f 63 6b 2c 20 26 66 2e 70 4f 70 65 6e 29 3b 0a ock, &f.pOpen);.
6450: 20 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 sqlite3OsLeave
6460: 4d 75 74 65 78 28 29 3b 0a 20 20 69 66 28 20 72 Mutex();. if( r
6470: 63 20 29 7b 0a 20 20 20 20 63 6c 6f 73 65 28 66 c ){. close(f
6480: 2e 68 29 3b 0a 20 20 20 20 75 6e 6c 69 6e 6b 28 .h);. unlink(
6490: 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 20 20 zFilename);.
64a0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f return SQLITE_NO
64b0: 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69 66 28 20 64 MEM;. }. if( d
64c0: 65 6c 46 6c 61 67 20 29 7b 0a 20 20 20 20 75 6e elFlag ){. un
64d0: 6c 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65 29 3b link(zFilename);
64e0: 0a 20 20 7d 0a 20 20 54 52 41 43 45 33 28 22 4f . }. TRACE3("O
64f0: 50 45 4e 2d 45 58 20 25 2d 33 64 20 25 73 5c 6e PEN-EX %-3d %s\n
6500: 22 2c 20 66 2e 68 2c 20 7a 46 69 6c 65 6e 61 6d ", f.h, zFilenam
6510: 65 29 3b 0a 20 20 72 65 74 75 72 6e 20 61 6c 6c e);. return all
6520: 6f 63 61 74 65 55 6e 69 78 46 69 6c 65 28 26 66 ocateUnixFile(&f
6530: 2c 20 70 49 64 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a , pId);.}../*.**
6540: 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70 65 6e Attempt to open
6550: 20 61 20 6e 65 77 20 66 69 6c 65 20 66 6f 72 20 a new file for
6560: 72 65 61 64 2d 6f 6e 6c 79 20 61 63 63 65 73 73 read-only access
6570: 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 ..**.** On succe
6580: 73 73 2c 20 77 72 69 74 65 20 74 68 65 20 66 69 ss, write the fi
6590: 6c 65 20 68 61 6e 64 6c 65 20 69 6e 74 6f 20 2a le handle into *
65a0: 69 64 20 61 6e 64 20 72 65 74 75 72 6e 20 53 51 id and return SQ
65b0: 4c 49 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f LITE_OK..**.** O
65c0: 6e 20 66 61 69 6c 75 72 65 2c 20 72 65 74 75 72 n failure, retur
65d0: 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 n SQLITE_CANTOPE
65e0: 4e 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 N..*/.int sqlite
65f0: 33 55 6e 69 78 4f 70 65 6e 52 65 61 64 4f 6e 6c 3UnixOpenReadOnl
6600: 79 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 y(const char *zF
6610: 69 6c 65 6e 61 6d 65 2c 20 4f 73 46 69 6c 65 20 ilename, OsFile
6620: 2a 2a 70 49 64 29 7b 0a 20 20 69 6e 74 20 72 63 **pId){. int rc
6630: 3b 0a 20 20 75 6e 69 78 46 69 6c 65 20 66 3b 0a ;. unixFile f;.
6640: 0a 20 20 43 52 41 53 48 5f 54 45 53 54 5f 4f 56 . CRASH_TEST_OV
6650: 45 52 52 49 44 45 28 73 71 6c 69 74 65 33 43 72 ERRIDE(sqlite3Cr
6660: 61 73 68 4f 70 65 6e 52 65 61 64 4f 6e 6c 79 2c ashOpenReadOnly,
6670: 20 7a 46 69 6c 65 6e 61 6d 65 2c 20 70 49 64 2c zFilename, pId,
6680: 20 30 29 3b 0a 20 20 61 73 73 65 72 74 28 20 30 0);. assert( 0
6690: 3d 3d 2a 70 49 64 20 29 3b 0a 20 20 66 2e 68 20 ==*pId );. f.h
66a0: 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 = open(zFilename
66b0: 2c 20 4f 5f 52 44 4f 4e 4c 59 7c 4f 5f 4c 41 52 , O_RDONLY|O_LAR
66c0: 47 45 46 49 4c 45 7c 4f 5f 42 49 4e 41 52 59 29 GEFILE|O_BINARY)
66d0: 3b 0a 20 20 69 66 28 20 66 2e 68 3c 30 20 29 7b ;. if( f.h<0 ){
66e0: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 . return SQLI
66f0: 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d TE_CANTOPEN;. }
6700: 0a 20 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 65 . sqlite3OsEnte
6710: 72 4d 75 74 65 78 28 29 3b 0a 20 20 72 63 20 3d rMutex();. rc =
6720: 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 66 2e findLockInfo(f.
6730: 68 2c 20 26 66 2e 70 4c 6f 63 6b 2c 20 26 66 2e h, &f.pLock, &f.
6740: 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69 74 65 pOpen);. sqlite
6750: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 3OsLeaveMutex();
6760: 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20 . if( rc ){.
6770: 20 63 6c 6f 73 65 28 66 2e 68 29 3b 0a 20 20 20 close(f.h);.
6780: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e return SQLITE_N
6790: 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 54 52 41 43 OMEM;. }. TRAC
67a0: 45 33 28 22 4f 50 45 4e 2d 52 4f 20 25 2d 33 64 E3("OPEN-RO %-3d
67b0: 20 25 73 5c 6e 22 2c 20 66 2e 68 2c 20 7a 46 69 %s\n", f.h, zFi
67c0: 6c 65 6e 61 6d 65 29 3b 0a 20 20 72 65 74 75 72 lename);. retur
67d0: 6e 20 61 6c 6c 6f 63 61 74 65 55 6e 69 78 46 69 n allocateUnixFi
67e0: 6c 65 28 26 66 2c 20 70 49 64 29 3b 0a 7d 0a 0a le(&f, pId);.}..
67f0: 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f /*.** Attempt to
6800: 20 6f 70 65 6e 20 61 20 66 69 6c 65 20 64 65 73 open a file des
6810: 63 72 69 70 74 6f 72 20 66 6f 72 20 74 68 65 20 criptor for the
6820: 64 69 72 65 63 74 6f 72 79 20 74 68 61 74 20 63 directory that c
6830: 6f 6e 74 61 69 6e 73 20 61 0a 2a 2a 20 66 69 6c ontains a.** fil
6840: 65 2e 20 20 54 68 69 73 20 66 69 6c 65 20 64 65 e. This file de
6850: 73 63 72 69 70 74 6f 72 20 63 61 6e 20 62 65 20 scriptor can be
6860: 75 73 65 64 20 74 6f 20 66 73 79 6e 63 28 29 20 used to fsync()
6870: 74 68 65 20 64 69 72 65 63 74 6f 72 79 0a 2a 2a the directory.**
6880: 20 69 6e 20 6f 72 64 65 72 20 74 6f 20 6d 61 6b in order to mak
6890: 65 20 73 75 72 65 20 74 68 65 20 63 72 65 61 74 e sure the creat
68a0: 69 6f 6e 20 6f 66 20 61 20 6e 65 77 20 66 69 6c ion of a new fil
68b0: 65 20 69 73 20 61 63 74 75 61 6c 6c 79 20 77 72 e is actually wr
68c0: 69 74 74 65 6e 0a 2a 2a 20 74 6f 20 64 69 73 6b itten.** to disk
68d0: 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 ..**.** This rou
68e0: 74 69 6e 65 20 69 73 20 6f 6e 6c 79 20 6d 65 61 tine is only mea
68f0: 6e 69 6e 67 66 75 6c 20 66 6f 72 20 55 6e 69 78 ningful for Unix
6900: 2e 20 20 49 74 20 69 73 20 61 20 6e 6f 2d 6f 70 . It is a no-op
6910: 20 75 6e 64 65 72 0a 2a 2a 20 77 69 6e 64 6f 77 under.** window
6920: 73 20 73 69 6e 63 65 20 77 69 6e 64 6f 77 73 20 s since windows
6930: 64 6f 65 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 does not support
6940: 20 68 61 72 64 20 6c 69 6e 6b 73 2e 0a 2a 2a 0a hard links..**.
6950: 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73 2c 20 61 ** On success, a
6960: 20 68 61 6e 64 6c 65 20 66 6f 72 20 61 20 70 72 handle for a pr
6970: 65 76 69 6f 75 73 6c 79 20 6f 70 65 6e 20 66 69 eviously open fi
6980: 6c 65 20 61 74 20 2a 69 64 20 69 73 0a 2a 2a 20 le at *id is.**
6990: 75 70 64 61 74 65 64 20 77 69 74 68 20 74 68 65 updated with the
69a0: 20 6e 65 77 20 64 69 72 65 63 74 6f 72 79 20 66 new directory f
69b0: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 61 ile descriptor a
69c0: 6e 64 20 53 51 4c 49 54 45 5f 4f 4b 20 69 73 0a nd SQLITE_OK is.
69d0: 2a 2a 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a ** returned..**.
69e0: 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c 20 74 ** On failure, t
69f0: 68 65 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 he function retu
6a00: 72 6e 73 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f rns SQLITE_CANTO
6a10: 50 45 4e 20 61 6e 64 20 6c 65 61 76 65 73 0a 2a PEN and leaves.*
6a20: 2a 20 2a 69 64 20 75 6e 63 68 61 6e 67 65 64 2e * *id unchanged.
6a30: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 75 .*/.static int u
6a40: 6e 69 78 4f 70 65 6e 44 69 72 65 63 74 6f 72 79 nixOpenDirectory
6a50: 28 0a 20 20 4f 73 46 69 6c 65 20 2a 69 64 2c 0a (. OsFile *id,.
6a60: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44 const char *zD
6a70: 69 72 6e 61 6d 65 0a 29 7b 0a 20 20 75 6e 69 78 irname.){. unix
6a80: 46 69 6c 65 20 2a 70 46 69 6c 65 20 3d 20 28 75 File *pFile = (u
6a90: 6e 69 78 46 69 6c 65 2a 29 69 64 3b 0a 20 20 69 nixFile*)id;. i
6aa0: 66 28 20 70 46 69 6c 65 3d 3d 30 20 29 7b 0a 20 f( pFile==0 ){.
6ab0: 20 20 20 2f 2a 20 44 6f 20 6e 6f 74 20 6f 70 65 /* Do not ope
6ac0: 6e 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 n the directory
6ad0: 69 66 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e if the correspon
6ae0: 64 69 6e 67 20 66 69 6c 65 20 69 73 20 6e 6f 74 ding file is not
6af0: 20 61 6c 72 65 61 64 79 0a 20 20 20 20 2a 2a 20 already. **
6b00: 6f 70 65 6e 2e 20 2a 2f 0a 20 20 20 20 72 65 74 open. */. ret
6b10: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f urn SQLITE_CANTO
6b20: 50 45 4e 3b 0a 20 20 7d 0a 20 20 53 45 54 5f 54 PEN;. }. SET_T
6b30: 48 52 45 41 44 49 44 28 70 46 69 6c 65 29 3b 0a HREADID(pFile);.
6b40: 20 20 61 73 73 65 72 74 28 20 70 46 69 6c 65 2d assert( pFile-
6b50: 3e 64 69 72 66 64 3c 30 20 29 3b 0a 20 20 70 46 >dirfd<0 );. pF
6b60: 69 6c 65 2d 3e 64 69 72 66 64 20 3d 20 6f 70 65 ile->dirfd = ope
6b70: 6e 28 7a 44 69 72 6e 61 6d 65 2c 20 4f 5f 52 44 n(zDirname, O_RD
6b80: 4f 4e 4c 59 7c 4f 5f 42 49 4e 41 52 59 2c 20 30 ONLY|O_BINARY, 0
6b90: 29 3b 0a 20 20 69 66 28 20 70 46 69 6c 65 2d 3e );. if( pFile->
6ba0: 64 69 72 66 64 3c 30 20 29 7b 0a 20 20 20 20 72 dirfd<0 ){. r
6bb0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e eturn SQLITE_CAN
6bc0: 54 4f 50 45 4e 3b 20 0a 20 20 7d 0a 20 20 54 52 TOPEN; . }. TR
6bd0: 41 43 45 33 28 22 4f 50 45 4e 44 49 52 20 25 2d ACE3("OPENDIR %-
6be0: 33 64 20 25 73 5c 6e 22 2c 20 70 46 69 6c 65 2d 3d %s\n", pFile-
6bf0: 3e 64 69 72 66 64 2c 20 7a 44 69 72 6e 61 6d 65 >dirfd, zDirname
6c00: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 );. return SQLI
6c10: 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 TE_OK;.}../*.**
6c20: 49 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 If the following
6c30: 20 67 6c 6f 62 61 6c 20 76 61 72 69 61 62 6c 65 global variable
6c40: 20 70 6f 69 6e 74 73 20 74 6f 20 61 20 73 74 72 points to a str
6c50: 69 6e 67 20 77 68 69 63 68 20 69 73 20 74 68 65 ing which is the
6c60: 0a 2a 2a 20 6e 61 6d 65 20 6f 66 20 61 20 64 69 .** name of a di
6c70: 72 65 63 74 6f 72 79 2c 20 74 68 65 6e 20 74 68 rectory, then th
6c80: 61 74 20 64 69 72 65 63 74 6f 72 79 20 77 69 6c at directory wil
6c90: 6c 20 62 65 20 75 73 65 64 20 74 6f 20 73 74 6f l be used to sto
6ca0: 72 65 0a 2a 2a 20 74 65 6d 70 6f 72 61 72 79 20 re.** temporary
6cb0: 66 69 6c 65 73 2e 0a 2a 2a 0a 2a 2a 20 53 65 65 files..**.** See
6cc0: 20 61 6c 73 6f 20 74 68 65 20 22 50 52 41 47 4d also the "PRAGM
6cd0: 41 20 74 65 6d 70 5f 73 74 6f 72 65 5f 64 69 72 A temp_store_dir
6ce0: 65 63 74 6f 72 79 22 20 53 51 4c 20 63 6f 6d 6d ectory" SQL comm
6cf0: 61 6e 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 and..*/.char *sq
6d00: 6c 69 74 65 33 5f 74 65 6d 70 5f 64 69 72 65 63 lite3_temp_direc
6d10: 74 6f 72 79 20 3d 20 30 3b 0a 0a 2f 2a 0a 2a 2a tory = 0;../*.**
6d20: 20 43 72 65 61 74 65 20 61 20 74 65 6d 70 6f 72 Create a tempor
6d30: 61 72 79 20 66 69 6c 65 20 6e 61 6d 65 20 69 6e ary file name in
6d40: 20 7a 42 75 66 2e 20 20 7a 42 75 66 20 6d 75 73 zBuf. zBuf mus
6d50: 74 20 62 65 20 62 69 67 20 65 6e 6f 75 67 68 20 t be big enough
6d60: 74 6f 0a 2a 2a 20 68 6f 6c 64 20 61 74 20 6c 65 to.** hold at le
6d70: 61 73 74 20 53 51 4c 49 54 45 5f 54 45 4d 50 4e ast SQLITE_TEMPN
6d80: 41 4d 45 5f 53 49 5a 45 20 63 68 61 72 61 63 74 AME_SIZE charact
6d90: 65 72 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 ers..*/.int sqli
6da0: 74 65 33 55 6e 69 78 54 65 6d 70 46 69 6c 65 4e te3UnixTempFileN
6db0: 61 6d 65 28 63 68 61 72 20 2a 7a 42 75 66 29 7b ame(char *zBuf){
6dc0: 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 . static const
6dd0: 63 68 61 72 20 2a 61 7a 44 69 72 73 5b 5d 20 3d char *azDirs[] =
6de0: 20 7b 0a 20 20 20 20 20 30 2c 0a 20 20 20 20 20 {. 0,.
6df0: 22 2f 76 61 72 2f 74 6d 70 22 2c 0a 20 20 20 20 "/var/tmp",.
6e00: 20 22 2f 75 73 72 2f 74 6d 70 22 2c 0a 20 20 20 "/usr/tmp",.
6e10: 20 20 22 2f 74 6d 70 22 2c 0a 20 20 20 20 20 22 "/tmp",. "
6e20: 2e 22 2c 0a 20 20 7d 3b 0a 20 20 73 74 61 74 69 .",. };. stati
6e30: 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 c const unsigned
6e40: 20 63 68 61 72 20 7a 43 68 61 72 73 5b 5d 20 3d char zChars[] =
6e50: 0a 20 20 20 20 22 61 62 63 64 65 66 67 68 69 6a . "abcdefghij
6e60: 6b 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a klmnopqrstuvwxyz
6e70: 22 0a 20 20 20 20 22 41 42 43 44 45 46 47 48 49 ". "ABCDEFGHI
6e80: 4a 4b 4c 4d 4e 4f 50 51 52 53 54 55 56 57 58 59 JKLMNOPQRSTUVWXY
6e90: 5a 22 0a 20 20 20 20 22 30 31 32 33 34 35 36 37 Z". "01234567
6ea0: 38 39 22 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 89";. int i, j;
6eb0: 0a 20 20 73 74 72 75 63 74 20 73 74 61 74 20 62 . struct stat b
6ec0: 75 66 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 uf;. const char
6ed0: 20 2a 7a 44 69 72 20 3d 20 22 2e 22 3b 0a 20 20 *zDir = ".";.
6ee0: 61 7a 44 69 72 73 5b 30 5d 20 3d 20 73 71 6c 69 azDirs[0] = sqli
6ef0: 74 65 33 5f 74 65 6d 70 5f 64 69 72 65 63 74 6f te3_temp_directo
6f00: 72 79 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 ry;. for(i=0; i
6f10: 3c 73 69 7a 65 6f 66 28 61 7a 44 69 72 73 29 2f <sizeof(azDirs)/
6f20: 73 69 7a 65 6f 66 28 61 7a 44 69 72 73 5b 30 5d sizeof(azDirs[0]
6f30: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 ); i++){. if(
6f40: 20 61 7a 44 69 72 73 5b 69 5d 3d 3d 30 20 29 20 azDirs[i]==0 )
6f50: 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69 66 continue;. if
6f60: 28 20 73 74 61 74 28 61 7a 44 69 72 73 5b 69 5d ( stat(azDirs[i]
6f70: 2c 20 26 62 75 66 29 20 29 20 63 6f 6e 74 69 6e , &buf) ) contin
6f80: 75 65 3b 0a 20 20 20 20 69 66 28 20 21 53 5f 49 ue;. if( !S_I
6f90: 53 44 49 52 28 62 75 66 2e 73 74 5f 6d 6f 64 65 SDIR(buf.st_mode
6fa0: 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 ) ) continue;.
6fb0: 20 20 69 66 28 20 61 63 63 65 73 73 28 61 7a 44 if( access(azD
6fc0: 69 72 73 5b 69 5d 2c 20 30 37 29 20 29 20 63 6f irs[i], 07) ) co
6fd0: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 7a 44 69 72 ntinue;. zDir
6fe0: 20 3d 20 61 7a 44 69 72 73 5b 69 5d 3b 0a 20 20 = azDirs[i];.
6ff0: 20 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 20 20 64 break;. }. d
7000: 6f 7b 0a 20 20 20 20 73 70 72 69 6e 74 66 28 7a o{. sprintf(z
7010: 42 75 66 2c 20 22 25 73 2f 22 54 45 4d 50 5f 46 Buf, "%s/"TEMP_F
7020: 49 4c 45 5f 50 52 45 46 49 58 2c 20 7a 44 69 72 ILE_PREFIX, zDir
7030: 29 3b 0a 20 20 20 20 6a 20 3d 20 73 74 72 6c 65 );. j = strle
7040: 6e 28 7a 42 75 66 29 3b 0a 20 20 20 20 73 71 6c n(zBuf);. sql
7050: 69 74 65 33 52 61 6e 64 6f 6d 6e 65 73 73 28 31 ite3Randomness(1
7060: 35 2c 20 26 7a 42 75 66 5b 6a 5d 29 3b 0a 20 20 5, &zBuf[j]);.
7070: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 35 3b for(i=0; i<15;
7080: 20 69 2b 2b 2c 20 6a 2b 2b 29 7b 0a 20 20 20 20 i++, j++){.
7090: 20 20 7a 42 75 66 5b 6a 5d 20 3d 20 28 63 68 61 zBuf[j] = (cha
70a0: 72 29 7a 43 68 61 72 73 5b 20 28 28 75 6e 73 69 r)zChars[ ((unsi
70b0: 67 6e 65 64 20 63 68 61 72 29 7a 42 75 66 5b 6a gned char)zBuf[j
70c0: 5d 29 25 28 73 69 7a 65 6f 66 28 7a 43 68 61 72 ])%(sizeof(zChar
70d0: 73 29 2d 31 29 20 5d 3b 0a 20 20 20 20 7d 0a 20 s)-1) ];. }.
70e0: 20 20 20 7a 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a zBuf[j] = 0;.
70f0: 20 20 7d 77 68 69 6c 65 28 20 61 63 63 65 73 73 }while( access
7100: 28 7a 42 75 66 2c 30 29 3d 3d 30 20 29 3b 0a 20 (zBuf,0)==0 );.
7110: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f return SQLITE_O
7120: 4b 3b 20 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68 65 K; .}../*.** Che
7130: 63 6b 20 74 68 61 74 20 61 20 67 69 76 65 6e 20 ck that a given
7140: 70 61 74 68 6e 61 6d 65 20 69 73 20 61 20 64 69 pathname is a di
7150: 72 65 63 74 6f 72 79 20 61 6e 64 20 69 73 20 77 rectory and is w
7160: 72 69 74 61 62 6c 65 20 0a 2a 2a 0a 2a 2f 0a 69 ritable .**.*/.i
7170: 6e 74 20 73 71 6c 69 74 65 33 55 6e 69 78 49 73 nt sqlite3UnixIs
7180: 44 69 72 57 72 69 74 61 62 6c 65 28 63 68 61 72 DirWritable(char
7190: 20 2a 7a 42 75 66 29 7b 0a 23 69 66 6e 64 65 66 *zBuf){.#ifndef
71a0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 50 41 47 SQLITE_OMIT_PAG
71b0: 45 52 5f 50 52 41 47 4d 41 53 0a 20 20 73 74 72 ER_PRAGMAS. str
71c0: 75 63 74 20 73 74 61 74 20 62 75 66 3b 0a 20 20 uct stat buf;.
71d0: 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 20 72 65 if( zBuf==0 ) re
71e0: 74 75 72 6e 20 30 3b 0a 20 20 69 66 28 20 7a 42 turn 0;. if( zB
71f0: 75 66 5b 30 5d 3d 3d 30 20 29 20 72 65 74 75 72 uf[0]==0 ) retur
7200: 6e 20 30 3b 0a 20 20 69 66 28 20 73 74 61 74 28 n 0;. if( stat(
7210: 7a 42 75 66 2c 20 26 62 75 66 29 20 29 20 72 65 zBuf, &buf) ) re
7220: 74 75 72 6e 20 30 3b 0a 20 20 69 66 28 20 21 53 turn 0;. if( !S
7230: 5f 49 53 44 49 52 28 62 75 66 2e 73 74 5f 6d 6f _ISDIR(buf.st_mo
7240: 64 65 29 20 29 20 72 65 74 75 72 6e 20 30 3b 0a de) ) return 0;.
7250: 20 20 69 66 28 20 61 63 63 65 73 73 28 7a 42 75 if( access(zBu
7260: 66 2c 20 30 37 29 20 29 20 72 65 74 75 72 6e 20 f, 07) ) return
7270: 30 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 0;.#endif /* SQL
7280: 49 54 45 5f 4f 4d 49 54 5f 50 41 47 45 52 5f 50 ITE_OMIT_PAGER_P
7290: 52 41 47 4d 41 53 20 2a 2f 0a 20 20 72 65 74 75 RAGMAS */. retu
72a0: 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 rn 1;.}../*.** S
72b0: 65 65 6b 20 74 6f 20 74 68 65 20 6f 66 66 73 65 eek to the offse
72c0: 74 20 69 6e 20 69 64 2d 3e 6f 66 66 73 65 74 20 t in id->offset
72d0: 74 68 65 6e 20 72 65 61 64 20 63 6e 74 20 62 79 then read cnt by
72e0: 74 65 73 20 69 6e 74 6f 20 70 42 75 66 2e 0a 2a tes into pBuf..*
72f0: 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d * Return the num
7300: 62 65 72 20 6f 66 20 62 79 74 65 73 20 61 63 74 ber of bytes act
7310: 75 61 6c 6c 79 20 72 65 61 64 2e 20 20 55 70 64 ually read. Upd
7320: 61 74 65 20 74 68 65 20 6f 66 66 73 65 74 2e 0a ate the offset..
7330: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 73 65 */.static int se
7340: 65 6b 41 6e 64 52 65 61 64 28 75 6e 69 78 46 69 ekAndRead(unixFi
7350: 6c 65 20 2a 69 64 2c 20 76 6f 69 64 20 2a 70 42 le *id, void *pB
7360: 75 66 2c 20 69 6e 74 20 63 6e 74 29 7b 0a 20 20 uf, int cnt){.
7370: 69 6e 74 20 67 6f 74 3b 0a 23 69 66 64 65 66 20 int got;.#ifdef
7380: 55 53 45 5f 50 52 45 41 44 0a 20 20 67 6f 74 20 USE_PREAD. got
7390: 3d 20 70 72 65 61 64 28 69 64 2d 3e 68 2c 20 70 = pread(id->h, p
73a0: 42 75 66 2c 20 63 6e 74 2c 20 69 64 2d 3e 6f 66 Buf, cnt, id->of
73b0: 66 73 65 74 29 3b 0a 23 65 6c 73 65 0a 20 20 6c fset);.#else. l
73c0: 73 65 65 6b 28 69 64 2d 3e 68 2c 20 69 64 2d 3e seek(id->h, id->
73d0: 6f 66 66 73 65 74 2c 20 53 45 45 4b 5f 53 45 54 offset, SEEK_SET
73e0: 29 3b 0a 20 20 67 6f 74 20 3d 20 72 65 61 64 28 );. got = read(
73f0: 69 64 2d 3e 68 2c 20 70 42 75 66 2c 20 63 6e 74 id->h, pBuf, cnt
7400: 29 3b 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20 );.#endif. if(
7410: 67 6f 74 3e 30 20 29 7b 0a 20 20 20 20 69 64 2d got>0 ){. id-
7420: 3e 6f 66 66 73 65 74 20 2b 3d 20 67 6f 74 3b 0a >offset += got;.
7430: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 67 6f 74 }. return got
7440: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 ;.}../*.** Read
7450: 64 61 74 61 20 66 72 6f 6d 20 61 20 66 69 6c 65 data from a file
7460: 20 69 6e 74 6f 20 61 20 62 75 66 66 65 72 2e 20 into a buffer.
7470: 20 52 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f Return SQLITE_O
7480: 4b 20 69 66 20 61 6c 6c 0a 2a 2a 20 62 79 74 65 K if all.** byte
7490: 73 20 77 65 72 65 20 72 65 61 64 20 73 75 63 63 s were read succ
74a0: 65 73 73 66 75 6c 6c 79 20 61 6e 64 20 53 51 4c essfully and SQL
74b0: 49 54 45 5f 49 4f 45 52 52 20 69 66 20 61 6e 79 ITE_IOERR if any
74c0: 74 68 69 6e 67 20 67 6f 65 73 0a 2a 2a 20 77 72 thing goes.** wr
74d0: 6f 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 ong..*/.static i
74e0: 6e 74 20 75 6e 69 78 52 65 61 64 28 4f 73 46 69 nt unixRead(OsFi
74f0: 6c 65 20 2a 69 64 2c 20 76 6f 69 64 20 2a 70 42 le *id, void *pB
7500: 75 66 2c 20 69 6e 74 20 61 6d 74 29 7b 0a 20 20 uf, int amt){.
7510: 69 6e 74 20 67 6f 74 3b 0a 20 20 61 73 73 65 72 int got;. asser
7520: 74 28 20 69 64 20 29 3b 0a 20 20 54 49 4d 45 52 t( id );. TIMER
7530: 5f 53 54 41 52 54 3b 0a 20 20 67 6f 74 20 3d 20 _START;. got =
7540: 73 65 65 6b 41 6e 64 52 65 61 64 28 28 75 6e 69 seekAndRead((uni
7550: 78 46 69 6c 65 2a 29 69 64 2c 20 70 42 75 66 2c xFile*)id, pBuf,
7560: 20 61 6d 74 29 3b 0a 20 20 54 49 4d 45 52 5f 45 amt);. TIMER_E
7570: 4e 44 3b 0a 20 20 54 52 41 43 45 35 28 22 52 45 ND;. TRACE5("RE
7580: 41 44 20 20 20 20 25 2d 33 64 20 25 35 64 20 25 AD %-3d %5d %
7590: 37 64 20 25 64 5c 6e 22 2c 20 28 28 75 6e 69 78 7d %d\n", ((unix
75a0: 46 69 6c 65 2a 29 69 64 29 2d 3e 68 2c 20 67 6f File*)id)->h, go
75b0: 74 2c 0a 20 20 20 20 20 20 20 20 20 20 6c 61 73 t,. las
75c0: 74 5f 70 61 67 65 2c 20 54 49 4d 45 52 5f 45 4c t_page, TIMER_EL
75d0: 41 50 53 45 44 29 3b 0a 20 20 53 45 45 4b 28 30 APSED);. SEEK(0
75e0: 29 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 );. SimulateIOE
75f0: 72 72 6f 72 28 20 67 6f 74 3d 30 20 29 3b 0a 20 rror( got=0 );.
7600: 20 69 66 28 20 67 6f 74 3d 3d 61 6d 74 20 29 7b if( got==amt ){
7610: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 . return SQLI
7620: 54 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 7b 0a TE_OK;. }else{.
7630: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 return SQLIT
7640: 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 0a 7d 0a 0a E_IOERR;. }.}..
7650: 2f 2a 0a 2a 2a 20 53 65 65 6b 20 74 6f 20 74 68 /*.** Seek to th
7660: 65 20 6f 66 66 73 65 74 20 69 6e 20 69 64 2d 3e e offset in id->
7670: 6f 66 66 73 65 74 20 74 68 65 6e 20 72 65 61 64 offset then read
7680: 20 63 6e 74 20 62 79 74 65 73 20 69 6e 74 6f 20 cnt bytes into
7690: 70 42 75 66 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 pBuf..** Return
76a0: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 the number of by
76b0: 74 65 73 20 61 63 74 75 61 6c 6c 79 20 72 65 61 tes actually rea
76c0: 64 2e 20 20 55 70 64 61 74 65 20 74 68 65 20 6f d. Update the o
76d0: 66 66 73 65 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 ffset..*/.static
76e0: 20 69 6e 74 20 73 65 65 6b 41 6e 64 57 72 69 74 int seekAndWrit
76f0: 65 28 75 6e 69 78 46 69 6c 65 20 2a 69 64 2c 20 e(unixFile *id,
7700: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 42 75 66 const void *pBuf
7710: 2c 20 69 6e 74 20 63 6e 74 29 7b 0a 20 20 69 6e , int cnt){. in
7720: 74 20 67 6f 74 3b 0a 23 69 66 64 65 66 20 55 53 t got;.#ifdef US
7730: 45 5f 50 52 45 41 44 0a 20 20 67 6f 74 20 3d 20 E_PREAD. got =
7740: 70 77 72 69 74 65 28 69 64 2d 3e 68 2c 20 70 42 pwrite(id->h, pB
7750: 75 66 2c 20 63 6e 74 2c 20 69 64 2d 3e 6f 66 66 uf, cnt, id->off
7760: 73 65 74 29 3b 0a 23 65 6c 73 65 0a 20 20 6c 73 set);.#else. ls
7770: 65 65 6b 28 69 64 2d 3e 68 2c 20 69 64 2d 3e 6f eek(id->h, id->o
7780: 66 66 73 65 74 2c 20 53 45 45 4b 5f 53 45 54 29 ffset, SEEK_SET)
7790: 3b 0a 20 20 67 6f 74 20 3d 20 77 72 69 74 65 28 ;. got = write(
77a0: 69 64 2d 3e 68 2c 20 70 42 75 66 2c 20 63 6e 74 id->h, pBuf, cnt
77b0: 29 3b 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20 );.#endif. if(
77c0: 67 6f 74 3e 30 20 29 7b 0a 20 20 20 20 69 64 2d got>0 ){. id-
77d0: 3e 6f 66 66 73 65 74 20 2b 3d 20 67 6f 74 3b 0a >offset += got;.
77e0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 67 6f 74 }. return got
77f0: 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 57 72 69 74 ;.}.../*.** Writ
7800: 65 20 64 61 74 61 20 66 72 6f 6d 20 61 20 62 75 e data from a bu
7810: 66 66 65 72 20 69 6e 74 6f 20 61 20 66 69 6c 65 ffer into a file
7820: 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54 45 . Return SQLITE
7830: 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 73 73 0a 2a _OK on success.*
7840: 2a 20 6f 72 20 73 6f 6d 65 20 6f 74 68 65 72 20 * or some other
7850: 65 72 72 6f 72 20 63 6f 64 65 20 6f 6e 20 66 61 error code on fa
7860: 69 6c 75 72 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 ilure..*/.static
7870: 20 69 6e 74 20 75 6e 69 78 57 72 69 74 65 28 4f int unixWrite(O
7880: 73 46 69 6c 65 20 2a 69 64 2c 20 63 6f 6e 73 74 sFile *id, const
7890: 20 76 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 void *pBuf, int
78a0: 20 61 6d 74 29 7b 0a 20 20 69 6e 74 20 77 72 6f amt){. int wro
78b0: 74 65 20 3d 20 30 3b 0a 20 20 61 73 73 65 72 74 te = 0;. assert
78c0: 28 20 69 64 20 29 3b 0a 20 20 61 73 73 65 72 74 ( id );. assert
78d0: 28 20 61 6d 74 3e 30 20 29 3b 0a 20 20 54 49 4d ( amt>0 );. TIM
78e0: 45 52 5f 53 54 41 52 54 3b 0a 20 20 77 68 69 6c ER_START;. whil
78f0: 65 28 20 61 6d 74 3e 30 20 26 26 20 28 77 72 6f e( amt>0 && (wro
7900: 74 65 20 3d 20 73 65 65 6b 41 6e 64 57 72 69 74 te = seekAndWrit
7910: 65 28 28 75 6e 69 78 46 69 6c 65 2a 29 69 64 2c e((unixFile*)id,
7920: 20 70 42 75 66 2c 20 61 6d 74 29 29 3e 30 20 29 pBuf, amt))>0 )
7930: 7b 0a 20 20 20 20 61 6d 74 20 2d 3d 20 77 72 6f {. amt -= wro
7940: 74 65 3b 0a 20 20 20 20 70 42 75 66 20 3d 20 26 te;. pBuf = &
7950: 28 28 63 68 61 72 2a 29 70 42 75 66 29 5b 77 72 ((char*)pBuf)[wr
7960: 6f 74 65 5d 3b 0a 20 20 7d 0a 20 20 54 49 4d 45 ote];. }. TIME
7970: 52 5f 45 4e 44 3b 0a 20 20 54 52 41 43 45 35 28 R_END;. TRACE5(
7980: 22 57 52 49 54 45 20 20 20 25 2d 33 64 20 25 35 "WRITE %-3d %5
7990: 64 20 25 37 64 20 25 64 5c 6e 22 2c 20 28 28 75 d %7d %d\n", ((u
79a0: 6e 69 78 46 69 6c 65 2a 29 69 64 29 2d 3e 68 2c nixFile*)id)->h,
79b0: 20 77 72 6f 74 65 2c 0a 20 20 20 20 20 20 20 20 wrote,.
79c0: 20 20 6c 61 73 74 5f 70 61 67 65 2c 20 54 49 4d last_page, TIM
79d0: 45 52 5f 45 4c 41 50 53 45 44 29 3b 0a 20 20 53 ER_ELAPSED);. S
79e0: 45 45 4b 28 30 29 3b 0a 20 20 53 69 6d 75 6c 61 EEK(0);. Simula
79f0: 74 65 49 4f 45 72 72 6f 72 28 28 20 77 72 6f 74 teIOError(( wrot
7a00: 65 3d 28 2d 31 29 2c 20 61 6d 74 3d 31 20 29 29 e=(-1), amt=1 ))
7a10: 3b 0a 20 20 53 69 6d 75 6c 61 74 65 44 69 73 6b ;. SimulateDisk
7a20: 66 75 6c 6c 45 72 72 6f 72 28 28 20 77 72 6f 74 fullError(( wrot
7a30: 65 3d 30 2c 20 61 6d 74 3d 31 20 29 29 3b 0a 20 e=0, amt=1 ));.
7a40: 20 69 66 28 20 61 6d 74 3e 30 20 29 7b 0a 20 20 if( amt>0 ){.
7a50: 20 20 69 66 28 20 77 72 6f 74 65 3c 30 20 29 7b if( wrote<0 ){
7a60: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 . return SQ
7a70: 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 20 20 LITE_IOERR;.
7a80: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 72 65 74 }else{. ret
7a90: 75 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b urn SQLITE_FULL;
7aa0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74 . }. }. ret
7ab0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d urn SQLITE_OK;.}
7ac0: 0a 0a 2f 2a 0a 2a 2a 20 4d 6f 76 65 20 74 68 65 ../*.** Move the
7ad0: 20 72 65 61 64 2f 77 72 69 74 65 20 70 6f 69 6e read/write poin
7ae0: 74 65 72 20 69 6e 20 61 20 66 69 6c 65 2e 0a 2a ter in a file..*
7af0: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 75 6e 69 /.static int uni
7b00: 78 53 65 65 6b 28 4f 73 46 69 6c 65 20 2a 69 64 xSeek(OsFile *id
7b10: 2c 20 69 36 34 20 6f 66 66 73 65 74 29 7b 0a 20 , i64 offset){.
7b20: 20 61 73 73 65 72 74 28 20 69 64 20 29 3b 0a 20 assert( id );.
7b30: 20 53 45 45 4b 28 6f 66 66 73 65 74 2f 31 30 32 SEEK(offset/102
7b40: 34 20 2b 20 31 29 3b 0a 23 69 66 64 65 66 20 53 4 + 1);.#ifdef S
7b50: 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 69 66 28 QLITE_TEST. if(
7b60: 20 6f 66 66 73 65 74 20 29 20 53 69 6d 75 6c 61 offset ) Simula
7b70: 74 65 44 69 73 6b 66 75 6c 6c 45 72 72 6f 72 28 teDiskfullError(
7b80: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 46 55 return SQLITE_FU
7b90: 4c 4c 29 3b 0a 23 65 6e 64 69 66 0a 20 20 28 28 LL);.#endif. ((
7ba0: 75 6e 69 78 46 69 6c 65 2a 29 69 64 29 2d 3e 6f unixFile*)id)->o
7bb0: 66 66 73 65 74 20 3d 20 6f 66 66 73 65 74 3b 0a ffset = offset;.
7bc0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
7bd0: 4f 4b 3b 0a 7d 0a 0a 23 69 66 64 65 66 20 53 51 OK;.}..#ifdef SQ
7be0: 4c 49 54 45 5f 54 45 53 54 0a 2f 2a 0a 2a 2a 20 LITE_TEST./*.**
7bf0: 43 6f 75 6e 74 20 74 68 65 20 6e 75 6d 62 65 72 Count the number
7c00: 20 6f 66 20 66 75 6c 6c 73 79 6e 63 73 20 61 6e of fullsyncs an
7c10: 64 20 6e 6f 72 6d 61 6c 20 73 79 6e 63 73 2e 20 d normal syncs.
7c20: 20 54 68 69 73 20 69 73 20 75 73 65 64 20 74 6f This is used to
7c30: 20 74 65 73 74 0a 2a 2a 20 74 68 61 74 20 73 79 test.** that sy
7c40: 6e 63 73 20 61 6e 64 20 66 75 6c 6c 73 79 6e 63 ncs and fullsync
7c50: 73 20 61 72 65 20 6f 63 63 75 72 69 6e 67 20 61 s are occuring a
7c60: 74 20 74 68 65 20 72 69 67 68 74 20 74 69 6d 65 t the right time
7c70: 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 s..*/.int sqlite
7c80: 33 5f 73 79 6e 63 5f 63 6f 75 6e 74 20 3d 20 30 3_sync_count = 0
7c90: 3b 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 66 75 ;.int sqlite3_fu
7ca0: 6c 6c 73 79 6e 63 5f 63 6f 75 6e 74 20 3d 20 30 llsync_count = 0
7cb0: 3b 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 ;.#endif../*.**
7cc0: 55 73 65 20 74 68 65 20 66 64 61 74 61 73 79 6e Use the fdatasyn
7cd0: 63 28 29 20 41 50 49 20 6f 6e 6c 79 20 69 66 20 c() API only if
7ce0: 74 68 65 20 48 41 56 45 5f 46 44 41 54 41 53 59 the HAVE_FDATASY
7cf0: 4e 43 20 6d 61 63 72 6f 20 69 73 20 64 65 66 69 NC macro is defi
7d00: 6e 65 64 2e 0a 2a 2a 20 4f 74 68 65 72 77 69 73 ned..** Otherwis
7d10: 65 20 75 73 65 20 66 73 79 6e 63 28 29 20 69 6e e use fsync() in
7d20: 20 69 74 73 20 70 6c 61 63 65 2e 0a 2a 2f 0a 23 its place..*/.#
7d30: 69 66 6e 64 65 66 20 48 41 56 45 5f 46 44 41 54 ifndef HAVE_FDAT
7d40: 41 53 59 4e 43 0a 23 20 64 65 66 69 6e 65 20 66 ASYNC.# define f
7d50: 64 61 74 61 73 79 6e 63 20 66 73 79 6e 63 0a 23 datasync fsync.#
7d60: 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 44 65 66 endif../*.** Def
7d70: 69 6e 65 20 48 41 56 45 5f 46 55 4c 4c 46 53 59 ine HAVE_FULLFSY
7d80: 4e 43 20 74 6f 20 30 20 6f 72 20 31 20 64 65 70 NC to 0 or 1 dep
7d90: 65 6e 64 69 6e 67 20 6f 6e 20 77 68 65 74 68 65 ending on whethe
7da0: 72 20 6f 72 20 6e 6f 74 0a 2a 2a 20 74 68 65 20 r or not.** the
7db0: 46 5f 46 55 4c 4c 46 53 59 4e 43 20 6d 61 63 72 F_FULLFSYNC macr
7dc0: 6f 20 69 73 20 64 65 66 69 6e 65 64 2e 20 20 46 o is defined. F
7dd0: 5f 46 55 4c 4c 46 53 59 4e 43 20 69 73 20 63 75 _FULLFSYNC is cu
7de0: 72 72 65 6e 74 6c 79 0a 2a 2a 20 6f 6e 6c 79 20 rrently.** only
7df0: 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20 4d 61 63 available on Mac
7e00: 20 4f 53 20 58 2e 20 20 42 75 74 20 74 68 61 74 OS X. But that
7e10: 20 63 6f 75 6c 64 20 63 68 61 6e 67 65 2e 0a 2a could change..*
7e20: 2f 0a 23 69 66 64 65 66 20 46 5f 46 55 4c 4c 46 /.#ifdef F_FULLF
7e30: 53 59 4e 43 0a 23 20 64 65 66 69 6e 65 20 48 41 SYNC.# define HA
7e40: 56 45 5f 46 55 4c 4c 46 53 59 4e 43 20 31 0a 23 VE_FULLFSYNC 1.#
7e50: 65 6c 73 65 0a 23 20 64 65 66 69 6e 65 20 48 41 else.# define HA
7e60: 56 45 5f 46 55 4c 4c 46 53 59 4e 43 20 30 0a 23 VE_FULLFSYNC 0.#
7e70: 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 54 68 endif.../*.** Th
7e80: 65 20 66 73 79 6e 63 28 29 20 73 79 73 74 65 6d e fsync() system
7e90: 20 63 61 6c 6c 20 64 6f 65 73 20 6e 6f 74 20 77 call does not w
7ea0: 6f 72 6b 20 61 73 20 61 64 76 65 72 74 69 73 65 ork as advertise
7eb0: 64 20 6f 6e 20 6d 61 6e 79 0a 2a 2a 20 75 6e 69 d on many.** uni
7ec0: 78 20 73 79 73 74 65 6d 73 2e 20 20 54 68 65 20 x systems. The
7ed0: 66 6f 6c 6c 6f 77 69 6e 67 20 70 72 6f 63 65 64 following proced
7ee0: 75 72 65 20 69 73 20 61 6e 20 61 74 74 65 6d 70 ure is an attemp
7ef0: 74 20 74 6f 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 t to make.** it
7f00: 77 6f 72 6b 20 62 65 74 74 65 72 2e 0a 2a 2a 0a work better..**.
7f10: 2a 2a 20 54 68 65 20 53 51 4c 49 54 45 5f 4e 4f ** The SQLITE_NO
7f20: 5f 53 59 4e 43 20 6d 61 63 72 6f 20 64 69 73 61 _SYNC macro disa
7f30: 62 6c 65 73 20 61 6c 6c 20 66 73 79 6e 63 28 29 bles all fsync()
7f40: 73 2e 20 20 54 68 69 73 20 69 73 20 75 73 65 66 s. This is usef
7f50: 75 6c 0a 2a 2a 20 66 6f 72 20 74 65 73 74 69 6e ul.** for testin
7f60: 67 20 77 68 65 6e 20 77 65 20 77 61 6e 74 20 74 g when we want t
7f70: 6f 20 72 75 6e 20 74 68 72 6f 75 67 68 20 74 68 o run through th
7f80: 65 20 74 65 73 74 20 73 75 69 74 65 20 71 75 69 e test suite qui
7f90: 63 6b 6c 79 2e 0a 2a 2a 20 59 6f 75 20 61 72 65 ckly..** You are
7fa0: 20 73 74 72 6f 6e 67 6c 79 20 61 64 76 69 73 65 strongly advise
7fb0: 64 20 2a 6e 6f 74 2a 20 74 6f 20 64 65 70 6c 6f d *not* to deplo
7fc0: 79 20 77 69 74 68 20 53 51 4c 49 54 45 5f 4e 4f y with SQLITE_NO
7fd0: 5f 53 59 4e 43 0a 2a 2a 20 65 6e 61 62 6c 65 64 _SYNC.** enabled
7fe0: 2c 20 68 6f 77 65 76 65 72 2c 20 73 69 6e 63 65 , however, since
7ff0: 20 77 69 74 68 20 53 51 4c 49 54 45 5f 4e 4f 5f with SQLITE_NO_
8000: 53 59 4e 43 20 65 6e 61 62 6c 65 64 2c 20 61 6e SYNC enabled, an
8010: 20 4f 53 20 63 72 61 73 68 0a 2a 2a 20 6f 72 20 OS crash.** or
8020: 70 6f 77 65 72 20 66 61 69 6c 75 72 65 20 77 69 power failure wi
8030: 6c 6c 20 6c 69 6b 65 6c 79 20 63 6f 72 72 75 70 ll likely corrup
8040: 74 20 74 68 65 20 64 61 74 61 62 61 73 65 20 66 t the database f
8050: 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 ile..*/.static i
8060: 6e 74 20 66 75 6c 6c 5f 66 73 79 6e 63 28 69 6e nt full_fsync(in
8070: 74 20 66 64 2c 20 69 6e 74 20 66 75 6c 6c 53 79 t fd, int fullSy
8080: 6e 63 2c 20 69 6e 74 20 64 61 74 61 4f 6e 6c 79 nc, int dataOnly
8090: 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 0a 20 20 ){. int rc;..
80a0: 2f 2a 20 52 65 63 6f 72 64 20 74 68 65 20 6e 75 /* Record the nu
80b0: 6d 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74 68 mber of times th
80c0: 61 74 20 77 65 20 64 6f 20 61 20 6e 6f 72 6d 61 at we do a norma
80d0: 6c 20 66 73 79 6e 63 28 29 20 61 6e 64 20 0a 20 l fsync() and .
80e0: 20 2a 2a 20 46 55 4c 4c 53 59 4e 43 2e 20 20 54 ** FULLSYNC. T
80f0: 68 69 73 20 69 73 20 75 73 65 64 20 64 75 72 69 his is used duri
8100: 6e 67 20 74 65 73 74 69 6e 67 20 74 6f 20 76 65 ng testing to ve
8110: 72 69 66 79 20 74 68 61 74 20 74 68 69 73 20 70 rify that this p
8120: 72 6f 63 65 64 75 72 65 0a 20 20 2a 2a 20 67 65 rocedure. ** ge
8130: 74 73 20 63 61 6c 6c 65 64 20 77 69 74 68 20 74 ts called with t
8140: 68 65 20 63 6f 72 72 65 63 74 20 61 72 67 75 6d he correct argum
8150: 65 6e 74 73 2e 0a 20 20 2a 2f 0a 23 69 66 64 65 ents.. */.#ifde
8160: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 f SQLITE_TEST.
8170: 69 66 28 20 66 75 6c 6c 53 79 6e 63 20 29 20 73 if( fullSync ) s
8180: 71 6c 69 74 65 33 5f 66 75 6c 6c 73 79 6e 63 5f qlite3_fullsync_
8190: 63 6f 75 6e 74 2b 2b 3b 0a 20 20 73 71 6c 69 74 count++;. sqlit
81a0: 65 33 5f 73 79 6e 63 5f 63 6f 75 6e 74 2b 2b 3b e3_sync_count++;
81b0: 0a 23 65 6e 64 69 66 0a 0a 20 20 2f 2a 20 49 66 .#endif.. /* If
81c0: 20 77 65 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 we compiled wit
81d0: 68 20 74 68 65 20 53 51 4c 49 54 45 5f 4e 4f 5f h the SQLITE_NO_
81e0: 53 59 4e 43 20 66 6c 61 67 2c 20 74 68 65 6e 20 SYNC flag, then
81f0: 73 79 6e 63 69 6e 67 20 69 73 20 61 0a 20 20 2a syncing is a. *
8200: 2a 20 6e 6f 2d 6f 70 0a 20 20 2a 2f 0a 23 69 66 * no-op. */.#if
8210: 64 65 66 20 53 51 4c 49 54 45 5f 4e 4f 5f 53 59 def SQLITE_NO_SY
8220: 4e 43 0a 20 20 72 63 20 3d 20 53 51 4c 49 54 45 NC. rc = SQLITE
8230: 5f 4f 4b 3b 0a 23 65 6c 73 65 0a 0a 23 69 66 20 _OK;.#else..#if
8240: 48 41 56 45 5f 46 55 4c 4c 46 53 59 4e 43 0a 20 HAVE_FULLFSYNC.
8250: 20 69 66 28 20 66 75 6c 6c 53 79 6e 63 20 29 7b if( fullSync ){
8260: 0a 20 20 20 20 72 63 20 3d 20 66 63 6e 74 6c 28 . rc = fcntl(
8270: 66 64 2c 20 46 5f 46 55 4c 4c 46 53 59 4e 43 2c fd, F_FULLFSYNC,
8280: 20 30 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 0);. }else{.
8290: 20 20 72 63 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 rc = 1;. }.
82a0: 2f 2a 20 49 66 20 74 68 65 20 46 55 4c 4c 53 59 /* If the FULLSY
82b0: 4e 43 20 66 61 69 6c 65 64 2c 20 74 72 79 20 74 NC failed, try t
82c0: 6f 20 64 6f 20 61 20 6e 6f 72 6d 61 6c 20 66 73 o do a normal fs
82d0: 79 6e 63 28 29 20 2a 2f 0a 20 20 69 66 28 20 72 ync() */. if( r
82e0: 63 20 29 20 72 63 20 3d 20 66 73 79 6e 63 28 66 c ) rc = fsync(f
82f0: 64 29 3b 0a 0a 23 65 6c 73 65 20 2f 2a 20 69 66 d);..#else /* if
8300: 20 21 64 65 66 69 6e 65 64 28 46 5f 46 55 4c 4c !defined(F_FULL
8310: 53 59 4e 43 29 20 2a 2f 0a 20 20 69 66 28 20 64 SYNC) */. if( d
8320: 61 74 61 4f 6e 6c 79 20 29 7b 0a 20 20 20 20 72 ataOnly ){. r
8330: 63 20 3d 20 66 64 61 74 61 73 79 6e 63 28 66 64 c = fdatasync(fd
8340: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 );. }else{.
8350: 72 63 20 3d 20 66 73 79 6e 63 28 66 64 29 3b 0a rc = fsync(fd);.
8360: 20 20 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 64 65 }.#endif /* de
8370: 66 69 6e 65 64 28 46 5f 46 55 4c 4c 46 53 59 4e fined(F_FULLFSYN
8380: 43 29 20 2a 2f 0a 23 65 6e 64 69 66 20 2f 2a 20 C) */.#endif /*
8390: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 4e defined(SQLITE_N
83a0: 4f 5f 53 59 4e 43 29 20 2a 2f 0a 0a 20 20 72 65 O_SYNC) */.. re
83b0: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a turn rc;.}../*.*
83c0: 2a 20 4d 61 6b 65 20 73 75 72 65 20 61 6c 6c 20 * Make sure all
83d0: 77 72 69 74 65 73 20 74 6f 20 61 20 70 61 72 74 writes to a part
83e0: 69 63 75 6c 61 72 20 66 69 6c 65 20 61 72 65 20 icular file are
83f0: 63 6f 6d 6d 69 74 74 65 64 20 74 6f 20 64 69 73 committed to dis
8400: 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 64 61 74 61 k..**.** If data
8410: 4f 6e 6c 79 3d 3d 30 20 74 68 65 6e 20 62 6f 74 Only==0 then bot
8420: 68 20 74 68 65 20 66 69 6c 65 20 69 74 73 65 6c h the file itsel
8430: 66 20 61 6e 64 20 69 74 73 20 6d 65 74 61 64 61 f and its metada
8440: 74 61 20 28 66 69 6c 65 0a 2a 2a 20 73 69 7a 65 ta (file.** size
8450: 2c 20 61 63 63 65 73 73 20 74 69 6d 65 2c 20 65 , access time, e
8460: 74 63 29 20 61 72 65 20 73 79 6e 63 65 64 2e 20 tc) are synced.
8470: 20 49 66 20 64 61 74 61 4f 6e 6c 79 21 3d 30 20 If dataOnly!=0
8480: 74 68 65 6e 20 6f 6e 6c 79 20 74 68 65 0a 2a 2a then only the.**
8490: 20 66 69 6c 65 20 64 61 74 61 20 69 73 20 73 79 file data is sy
84a0: 6e 63 65 64 2e 0a 2a 2a 0a 2a 2a 20 55 6e 64 65 nced..**.** Unde
84b0: 72 20 55 6e 69 78 2c 20 61 6c 73 6f 20 6d 61 6b r Unix, also mak
84c0: 65 20 73 75 72 65 20 74 68 61 74 20 74 68 65 20 e sure that the
84d0: 64 69 72 65 63 74 6f 72 79 20 65 6e 74 72 79 20 directory entry
84e0: 66 6f 72 20 74 68 65 20 66 69 6c 65 0a 2a 2a 20 for the file.**
84f0: 68 61 73 20 62 65 65 6e 20 63 72 65 61 74 65 64 has been created
8500: 20 62 79 20 66 73 79 6e 63 2d 69 6e 67 20 74 68 by fsync-ing th
8510: 65 20 64 69 72 65 63 74 6f 72 79 20 74 68 61 74 e directory that
8520: 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20 66 69 contains the fi
8530: 6c 65 2e 0a 2a 2a 20 49 66 20 77 65 20 64 6f 20 le..** If we do
8540: 6e 6f 74 20 64 6f 20 74 68 69 73 20 61 6e 64 20 not do this and
8550: 77 65 20 65 6e 63 6f 75 6e 74 65 72 20 61 20 70 we encounter a p
8560: 6f 77 65 72 20 66 61 69 6c 75 72 65 2c 20 74 68 ower failure, th
8570: 65 20 64 69 72 65 63 74 6f 72 79 0a 2a 2a 20 65 e directory.** e
8580: 6e 74 72 79 20 66 6f 72 20 74 68 65 20 6a 6f 75 ntry for the jou
8590: 72 6e 61 6c 20 6d 69 67 68 74 20 6e 6f 74 20 65 rnal might not e
85a0: 78 69 73 74 20 61 66 74 65 72 20 77 65 20 72 65 xist after we re
85b0: 62 6f 6f 74 2e 20 20 54 68 65 20 6e 65 78 74 0a boot. The next.
85c0: 2a 2a 20 53 51 4c 69 74 65 20 74 6f 20 61 63 63 ** SQLite to acc
85d0: 65 73 73 20 74 68 65 20 66 69 6c 65 20 77 69 6c ess the file wil
85e0: 6c 20 6e 6f 74 20 6b 6e 6f 77 20 74 68 61 74 20 l not know that
85f0: 74 68 65 20 6a 6f 75 72 6e 61 6c 20 65 78 69 73 the journal exis
8600: 74 73 20 28 62 65 63 61 75 73 65 0a 2a 2a 20 74 ts (because.** t
8610: 68 65 20 64 69 72 65 63 74 6f 72 79 20 65 6e 74 he directory ent
8620: 72 79 20 66 6f 72 20 74 68 65 20 6a 6f 75 72 6e ry for the journ
8630: 61 6c 20 77 61 73 20 6e 65 76 65 72 20 63 72 65 al was never cre
8640: 61 74 65 64 29 20 61 6e 64 20 74 68 65 20 74 72 ated) and the tr
8650: 61 6e 73 61 63 74 69 6f 6e 0a 2a 2a 20 77 69 6c ansaction.** wil
8660: 6c 20 6e 6f 74 20 72 6f 6c 6c 20 62 61 63 6b 20 l not roll back
8670: 2d 20 70 6f 73 73 69 62 6c 79 20 6c 65 61 64 69 - possibly leadi
8680: 6e 67 20 74 6f 20 64 61 74 61 62 61 73 65 20 63 ng to database c
8690: 6f 72 72 75 70 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 orruption..*/.st
86a0: 61 74 69 63 20 69 6e 74 20 75 6e 69 78 53 79 6e atic int unixSyn
86b0: 63 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 69 6e c(OsFile *id, in
86c0: 74 20 64 61 74 61 4f 6e 6c 79 29 7b 0a 20 20 69 t dataOnly){. i
86d0: 6e 74 20 72 63 3b 0a 20 20 75 6e 69 78 46 69 6c nt rc;. unixFil
86e0: 65 20 2a 70 46 69 6c 65 20 3d 20 28 75 6e 69 78 e *pFile = (unix
86f0: 46 69 6c 65 2a 29 69 64 3b 0a 20 20 61 73 73 65 File*)id;. asse
8700: 72 74 28 20 70 46 69 6c 65 20 29 3b 0a 20 20 54 rt( pFile );. T
8710: 52 41 43 45 32 28 22 53 59 4e 43 20 20 20 20 25 RACE2("SYNC %
8720: 2d 33 64 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 68 -3d\n", pFile->h
8730: 29 3b 0a 20 20 72 63 20 3d 20 66 75 6c 6c 5f 66 );. rc = full_f
8740: 73 79 6e 63 28 70 46 69 6c 65 2d 3e 68 2c 20 70 sync(pFile->h, p
8750: 46 69 6c 65 2d 3e 66 75 6c 6c 53 79 6e 63 2c 20 File->fullSync,
8760: 64 61 74 61 4f 6e 6c 79 29 3b 0a 20 20 53 69 6d dataOnly);. Sim
8770: 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 20 72 63 ulateIOError( rc
8780: 3d 31 20 29 3b 0a 20 20 69 66 28 20 72 63 20 29 =1 );. if( rc )
8790: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c {. return SQL
87a0: 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 0a 20 ITE_IOERR;. }.
87b0: 20 69 66 28 20 70 46 69 6c 65 2d 3e 64 69 72 66 if( pFile->dirf
87c0: 64 3e 3d 30 20 29 7b 0a 20 20 20 20 54 52 41 43 d>=0 ){. TRAC
87d0: 45 34 28 22 44 49 52 53 59 4e 43 20 25 2d 33 64 E4("DIRSYNC %-3d
87e0: 20 28 68 61 76 65 5f 66 75 6c 6c 66 73 79 6e 63 (have_fullfsync
87f0: 3d 25 64 20 66 75 6c 6c 73 79 6e 63 3d 25 64 29 =%d fullsync=%d)
8800: 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 64 69 72 66 \n", pFile->dirf
8810: 64 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 48 d,. H
8820: 41 56 45 5f 46 55 4c 4c 46 53 59 4e 43 2c 20 70 AVE_FULLFSYNC, p
8830: 46 69 6c 65 2d 3e 66 75 6c 6c 53 79 6e 63 29 3b File->fullSync);
8840: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f .#ifndef SQLITE_
8850: 44 49 53 41 42 4c 45 5f 44 49 52 53 59 4e 43 0a DISABLE_DIRSYNC.
8860: 20 20 20 20 2f 2a 20 54 68 65 20 64 69 72 65 63 /* The direc
8870: 74 6f 72 79 20 73 79 6e 63 20 69 73 20 6f 6e 6c tory sync is onl
8880: 79 20 61 74 74 65 6d 70 74 65 64 20 69 66 20 66 y attempted if f
8890: 75 6c 6c 5f 66 73 79 6e 63 20 69 73 0a 20 20 20 ull_fsync is.
88a0: 20 2a 2a 20 74 75 72 6e 65 64 20 6f 66 66 20 6f ** turned off o
88b0: 72 20 75 6e 61 76 61 69 6c 61 62 6c 65 2e 20 20 r unavailable.
88c0: 49 66 20 61 20 66 75 6c 6c 5f 66 73 79 6e 63 20 If a full_fsync
88d0: 6f 63 63 75 72 72 65 64 20 61 62 6f 76 65 2c 0a occurred above,.
88e0: 20 20 20 20 2a 2a 20 74 68 65 6e 20 74 68 65 20 ** then the
88f0: 64 69 72 65 63 74 6f 72 79 20 73 79 6e 63 20 69 directory sync i
8900: 73 20 73 75 70 65 72 66 6c 75 6f 75 73 2e 0a 20 s superfluous..
8910: 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20 28 21 */. if( (!
8920: 48 41 56 45 5f 46 55 4c 4c 46 53 59 4e 43 20 7c HAVE_FULLFSYNC |
8930: 7c 20 21 70 46 69 6c 65 2d 3e 66 75 6c 6c 53 79 | !pFile->fullSy
8940: 6e 63 29 20 26 26 20 66 75 6c 6c 5f 66 73 79 6e nc) && full_fsyn
8950: 63 28 70 46 69 6c 65 2d 3e 64 69 72 66 64 2c 30 c(pFile->dirfd,0
8960: 2c 30 29 20 29 7b 0a 20 20 20 20 20 20 20 2f 2a ,0) ){. /*
8970: 0a 20 20 20 20 20 20 20 2a 2a 20 57 65 20 68 61 . ** We ha
8980: 76 65 20 72 65 63 65 69 76 65 64 20 6d 75 6c 74 ve received mult
8990: 69 70 6c 65 20 72 65 70 6f 72 74 73 20 6f 66 20 iple reports of
89a0: 66 73 79 6e 63 28 29 20 72 65 74 75 72 6e 69 6e fsync() returnin
89b0: 67 0a 20 20 20 20 20 20 20 2a 2a 20 65 72 72 6f g. ** erro
89c0: 72 73 20 77 68 65 6e 20 61 70 70 6c 69 65 64 20 rs when applied
89d0: 74 6f 20 64 69 72 65 63 74 6f 72 69 65 73 20 6f to directories o
89e0: 6e 20 63 65 72 74 61 69 6e 20 66 69 6c 65 20 73 n certain file s
89f0: 79 73 74 65 6d 73 2e 0a 20 20 20 20 20 20 20 2a ystems.. *
8a00: 2a 20 41 20 66 61 69 6c 65 64 20 64 69 72 65 63 * A failed direc
8a10: 74 6f 72 79 20 73 79 6e 63 20 69 73 20 6e 6f 74 tory sync is not
8a20: 20 61 20 62 69 67 20 64 65 61 6c 2e 20 20 53 6f a big deal. So
8a30: 20 69 74 20 73 65 65 6d 73 0a 20 20 20 20 20 20 it seems.
8a40: 20 2a 2a 20 62 65 74 74 65 72 20 74 6f 20 69 67 ** better to ig
8a50: 6e 6f 72 65 20 74 68 65 20 65 72 72 6f 72 2e 20 nore the error.
8a60: 20 54 69 63 6b 65 74 20 23 31 36 35 37 0a 20 20 Ticket #1657.
8a70: 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 20 2f */. /
8a80: 2a 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f * return SQLITE_
8a90: 49 4f 45 52 52 3b 20 2a 2f 0a 20 20 20 20 7d 0a IOERR; */. }.
8aa0: 23 65 6e 64 69 66 0a 20 20 20 20 63 6c 6f 73 65 #endif. close
8ab0: 28 70 46 69 6c 65 2d 3e 64 69 72 66 64 29 3b 20 (pFile->dirfd);
8ac0: 20 2f 2a 20 4f 6e 6c 79 20 6e 65 65 64 20 74 6f /* Only need to
8ad0: 20 73 79 6e 63 20 6f 6e 63 65 2c 20 73 6f 20 63 sync once, so c
8ae0: 6c 6f 73 65 20 74 68 65 20 64 69 72 65 63 74 6f lose the directo
8af0: 72 79 20 2a 2f 0a 20 20 20 20 70 46 69 6c 65 2d ry */. pFile-
8b00: 3e 64 69 72 66 64 20 3d 20 2d 31 3b 20 20 20 20 >dirfd = -1;
8b10: 2f 2a 20 77 68 65 6e 20 77 65 20 61 72 65 20 64 /* when we are d
8b20: 6f 6e 65 2e 20 2a 2f 0a 20 20 7d 0a 20 20 72 65 one. */. }. re
8b30: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a turn SQLITE_OK;.
8b40: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 79 6e 63 20 74 68 }../*.** Sync th
8b50: 65 20 64 69 72 65 63 74 6f 72 79 20 7a 44 69 72 e directory zDir
8b60: 6e 61 6d 65 2e 20 54 68 69 73 20 69 73 20 61 20 name. This is a
8b70: 6e 6f 2d 6f 70 20 6f 6e 20 6f 70 65 72 61 74 69 no-op on operati
8b80: 6e 67 20 73 79 73 74 65 6d 73 20 6f 74 68 65 72 ng systems other
8b90: 0a 2a 2a 20 74 68 61 6e 20 55 4e 49 58 2e 0a 2a .** than UNIX..*
8ba0: 2a 0a 2a 2a 20 54 68 69 73 20 69 73 20 75 73 65 *.** This is use
8bb0: 64 20 74 6f 20 6d 61 6b 65 20 73 75 72 65 20 74 d to make sure t
8bc0: 68 65 20 6d 61 73 74 65 72 20 6a 6f 75 72 6e 61 he master journa
8bd0: 6c 20 66 69 6c 65 20 68 61 73 20 74 72 75 65 6c l file has truel
8be0: 79 20 62 65 65 6e 20 64 65 6c 65 74 65 64 0a 2a y been deleted.*
8bf0: 2a 20 62 65 66 6f 72 65 20 6d 61 6b 69 6e 67 20 * before making
8c00: 63 68 61 6e 67 65 73 20 74 6f 20 69 6e 64 69 76 changes to indiv
8c10: 69 64 75 61 6c 20 6a 6f 75 72 6e 61 6c 73 20 6f idual journals o
8c20: 6e 20 61 20 6d 75 6c 74 69 2d 64 61 74 61 62 61 n a multi-databa
8c30: 73 65 20 63 6f 6d 6d 69 74 2e 0a 2a 2a 20 54 68 se commit..** Th
8c40: 65 20 46 5f 46 55 4c 4c 46 53 59 4e 43 20 6f 70 e F_FULLFSYNC op
8c50: 74 69 6f 6e 20 69 73 20 6e 6f 74 20 6e 65 65 64 tion is not need
8c60: 65 64 20 68 65 72 65 2e 0a 2a 2f 0a 69 6e 74 20 ed here..*/.int
8c70: 73 71 6c 69 74 65 33 55 6e 69 78 53 79 6e 63 44 sqlite3UnixSyncD
8c80: 69 72 65 63 74 6f 72 79 28 63 6f 6e 73 74 20 63 irectory(const c
8c90: 68 61 72 20 2a 7a 44 69 72 6e 61 6d 65 29 7b 0a har *zDirname){.
8ca0: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 44 49 #ifdef SQLITE_DI
8cb0: 53 41 42 4c 45 5f 44 49 52 53 59 4e 43 0a 20 20 SABLE_DIRSYNC.
8cc0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b return SQLITE_OK
8cd0: 3b 0a 23 65 6c 73 65 0a 20 20 69 6e 74 20 66 64 ;.#else. int fd
8ce0: 3b 0a 20 20 69 6e 74 20 72 3b 0a 20 20 66 64 20 ;. int r;. fd
8cf0: 3d 20 6f 70 65 6e 28 7a 44 69 72 6e 61 6d 65 2c = open(zDirname,
8d00: 20 4f 5f 52 44 4f 4e 4c 59 7c 4f 5f 42 49 4e 41 O_RDONLY|O_BINA
8d10: 52 59 2c 20 30 29 3b 0a 20 20 54 52 41 43 45 33 RY, 0);. TRACE3
8d20: 28 22 44 49 52 53 59 4e 43 20 25 2d 33 64 20 28 ("DIRSYNC %-3d (
8d30: 25 73 29 5c 6e 22 2c 20 66 64 2c 20 7a 44 69 72 %s)\n", fd, zDir
8d40: 6e 61 6d 65 29 3b 0a 20 20 69 66 28 20 66 64 3c name);. if( fd<
8d50: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 0 ){. return
8d60: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b SQLITE_CANTOPEN;
8d70: 20 0a 20 20 7d 0a 20 20 72 20 3d 20 66 73 79 6e . }. r = fsyn
8d80: 63 28 66 64 29 3b 0a 20 20 63 6c 6f 73 65 28 66 c(fd);. close(f
8d90: 64 29 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f d);. SimulateIO
8da0: 45 72 72 6f 72 28 20 72 3d 31 20 29 3b 0a 20 20 Error( r=1 );.
8db0: 69 66 28 20 72 20 29 7b 0a 20 20 20 20 72 65 74 if( r ){. ret
8dc0: 75 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 urn SQLITE_IOERR
8dd0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 ;. }else{. r
8de0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b eturn SQLITE_OK;
8df0: 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f . }.#endif.}../
8e00: 2a 0a 2a 2a 20 54 72 75 6e 63 61 74 65 20 61 6e *.** Truncate an
8e10: 20 6f 70 65 6e 20 66 69 6c 65 20 74 6f 20 61 20 open file to a
8e20: 73 70 65 63 69 66 69 65 64 20 73 69 7a 65 0a 2a specified size.*
8e30: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 75 6e 69 /.static int uni
8e40: 78 54 72 75 6e 63 61 74 65 28 4f 73 46 69 6c 65 xTruncate(OsFile
8e50: 20 2a 69 64 2c 20 69 36 34 20 6e 42 79 74 65 29 *id, i64 nByte)
8e60: 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 61 73 {. int rc;. as
8e70: 73 65 72 74 28 20 69 64 20 29 3b 0a 20 20 72 63 sert( id );. rc
8e80: 20 3d 20 66 74 72 75 6e 63 61 74 65 28 28 28 75 = ftruncate(((u
8e90: 6e 69 78 46 69 6c 65 2a 29 69 64 29 2d 3e 68 2c nixFile*)id)->h,
8ea0: 20 6e 42 79 74 65 29 3b 0a 20 20 53 69 6d 75 6c nByte);. Simul
8eb0: 61 74 65 49 4f 45 72 72 6f 72 28 20 72 63 3d 31 ateIOError( rc=1
8ec0: 20 29 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a );. if( rc ){.
8ed0: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 return SQLIT
8ee0: 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 65 6c 73 65 E_IOERR;. }else
8ef0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c {. return SQL
8f00: 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 7d 0a 0a 2f ITE_OK;. }.}../
8f10: 2a 0a 2a 2a 20 44 65 74 65 72 6d 69 6e 65 20 74 *.** Determine t
8f20: 68 65 20 63 75 72 72 65 6e 74 20 73 69 7a 65 20 he current size
8f30: 6f 66 20 61 20 66 69 6c 65 20 69 6e 20 62 79 74 of a file in byt
8f40: 65 73 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 es.*/.static int
8f50: 20 75 6e 69 78 46 69 6c 65 53 69 7a 65 28 4f 73 unixFileSize(Os
8f60: 46 69 6c 65 20 2a 69 64 2c 20 69 36 34 20 2a 70 File *id, i64 *p
8f70: 53 69 7a 65 29 7b 0a 20 20 69 6e 74 20 72 63 3b Size){. int rc;
8f80: 0a 20 20 73 74 72 75 63 74 20 73 74 61 74 20 62 . struct stat b
8f90: 75 66 3b 0a 20 20 61 73 73 65 72 74 28 20 69 64 uf;. assert( id
8fa0: 20 29 3b 0a 20 20 72 63 20 3d 20 66 73 74 61 74 );. rc = fstat
8fb0: 28 28 28 75 6e 69 78 46 69 6c 65 2a 29 69 64 29 (((unixFile*)id)
8fc0: 2d 3e 68 2c 20 26 62 75 66 29 3b 0a 20 20 53 69 ->h, &buf);. Si
8fd0: 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 20 72 mulateIOError( r
8fe0: 63 3d 31 20 29 3b 0a 20 20 69 66 28 20 72 63 21 c=1 );. if( rc!
8ff0: 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e =0 ){. return
9000: 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 SQLITE_IOERR;.
9010: 20 7d 0a 20 20 2a 70 53 69 7a 65 20 3d 20 62 75 }. *pSize = bu
9020: 66 2e 73 74 5f 73 69 7a 65 3b 0a 20 20 72 65 74 f.st_size;. ret
9030: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d urn SQLITE_OK;.}
9040: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 ../*.** This rou
9050: 74 69 6e 65 20 63 68 65 63 6b 73 20 69 66 20 74 tine checks if t
9060: 68 65 72 65 20 69 73 20 61 20 52 45 53 45 52 56 here is a RESERV
9070: 45 44 20 6c 6f 63 6b 20 68 65 6c 64 20 6f 6e 20 ED lock held on
9080: 74 68 65 20 73 70 65 63 69 66 69 65 64 0a 2a 2a the specified.**
9090: 20 66 69 6c 65 20 62 79 20 74 68 69 73 20 6f 72 file by this or
90a0: 20 61 6e 79 20 6f 74 68 65 72 20 70 72 6f 63 65 any other proce
90b0: 73 73 2e 20 49 66 20 73 75 63 68 20 61 20 6c 6f ss. If such a lo
90c0: 63 6b 20 69 73 20 68 65 6c 64 2c 20 72 65 74 75 ck is held, retu
90d0: 72 6e 0a 2a 2a 20 6e 6f 6e 2d 7a 65 72 6f 2e 20 rn.** non-zero.
90e0: 20 49 66 20 74 68 65 20 66 69 6c 65 20 69 73 20 If the file is
90f0: 75 6e 6c 6f 63 6b 65 64 20 6f 72 20 68 6f 6c 64 unlocked or hold
9100: 73 20 6f 6e 6c 79 20 53 48 41 52 45 44 20 6c 6f s only SHARED lo
9110: 63 6b 73 2c 20 74 68 65 6e 0a 2a 2a 20 72 65 74 cks, then.** ret
9120: 75 72 6e 20 7a 65 72 6f 2e 0a 2a 2f 0a 73 74 61 urn zero..*/.sta
9130: 74 69 63 20 69 6e 74 20 75 6e 69 78 43 68 65 63 tic int unixChec
9140: 6b 52 65 73 65 72 76 65 64 4c 6f 63 6b 28 4f 73 kReservedLock(Os
9150: 46 69 6c 65 20 2a 69 64 29 7b 0a 20 20 69 6e 74 File *id){. int
9160: 20 72 20 3d 20 30 3b 0a 20 20 75 6e 69 78 46 69 r = 0;. unixFi
9170: 6c 65 20 2a 70 46 69 6c 65 20 3d 20 28 75 6e 69 le *pFile = (uni
9180: 78 46 69 6c 65 2a 29 69 64 3b 0a 0a 20 20 61 73 xFile*)id;.. as
9190: 73 65 72 74 28 20 70 46 69 6c 65 20 29 3b 0a 20 sert( pFile );.
91a0: 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d sqlite3OsEnterM
91b0: 75 74 65 78 28 29 3b 20 2f 2a 20 42 65 63 61 75 utex(); /* Becau
91c0: 73 65 20 70 46 69 6c 65 2d 3e 70 4c 6f 63 6b 20 se pFile->pLock
91d0: 69 73 20 73 68 61 72 65 64 20 61 63 72 6f 73 73 is shared across
91e0: 20 74 68 72 65 61 64 73 20 2a 2f 0a 0a 20 20 2f threads */.. /
91f0: 2a 20 43 68 65 63 6b 20 69 66 20 61 20 74 68 72 * Check if a thr
9200: 65 61 64 20 69 6e 20 74 68 69 73 20 70 72 6f 63 ead in this proc
9210: 65 73 73 20 68 6f 6c 64 73 20 73 75 63 68 20 61 ess holds such a
9220: 20 6c 6f 63 6b 20 2a 2f 0a 20 20 69 66 28 20 70 lock */. if( p
9230: 46 69 6c 65 2d 3e 70 4c 6f 63 6b 2d 3e 6c 6f 63 File->pLock->loc
9240: 6b 74 79 70 65 3e 53 48 41 52 45 44 5f 4c 4f 43 ktype>SHARED_LOC
9250: 4b 20 29 7b 0a 20 20 20 20 72 20 3d 20 31 3b 0a K ){. r = 1;.
9260: 20 20 7d 0a 0a 20 20 2f 2a 20 4f 74 68 65 72 77 }.. /* Otherw
9270: 69 73 65 20 73 65 65 20 69 66 20 73 6f 6d 65 20 ise see if some
9280: 6f 74 68 65 72 20 70 72 6f 63 65 73 73 20 68 6f other process ho
9290: 6c 64 73 20 69 74 2e 0a 20 20 2a 2f 0a 20 20 69 lds it.. */. i
92a0: 66 28 20 21 72 20 29 7b 0a 20 20 20 20 73 74 72 f( !r ){. str
92b0: 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a uct flock lock;.
92c0: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 lock.l_whenc
92d0: 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 e = SEEK_SET;.
92e0: 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d lock.l_start =
92f0: 20 52 45 53 45 52 56 45 44 5f 42 59 54 45 3b 0a RESERVED_BYTE;.
9300: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d lock.l_len =
9310: 20 31 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 1;. lock.l_t
9320: 79 70 65 20 3d 20 46 5f 57 52 4c 43 4b 3b 0a 20 ype = F_WRLCK;.
9330: 20 20 20 66 63 6e 74 6c 28 70 46 69 6c 65 2d 3e fcntl(pFile->
9340: 68 2c 20 46 5f 47 45 54 4c 4b 2c 20 26 6c 6f 63 h, F_GETLK, &loc
9350: 6b 29 3b 0a 20 20 20 20 69 66 28 20 6c 6f 63 6b k);. if( lock
9360: 2e 6c 5f 74 79 70 65 21 3d 46 5f 55 4e 4c 43 4b .l_type!=F_UNLCK
9370: 20 29 7b 0a 20 20 20 20 20 20 72 20 3d 20 31 3b ){. r = 1;
9380: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 0a 20 20 . }. }. .
9390: 73 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 sqlite3OsLeaveMu
93a0: 74 65 78 28 29 3b 0a 20 20 54 52 41 43 45 33 28 tex();. TRACE3(
93b0: 22 54 45 53 54 20 57 52 2d 4c 4f 43 4b 20 25 64 "TEST WR-LOCK %d
93c0: 20 25 64 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 68 %d\n", pFile->h
93d0: 2c 20 72 29 3b 0a 0a 20 20 72 65 74 75 72 6e 20 , r);.. return
93e0: 72 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c 6f 63 6b r;.}../*.** Lock
93f0: 20 74 68 65 20 66 69 6c 65 20 77 69 74 68 20 74 the file with t
9400: 68 65 20 6c 6f 63 6b 20 73 70 65 63 69 66 69 65 he lock specifie
9410: 64 20 62 79 20 70 61 72 61 6d 65 74 65 72 20 6c d by parameter l
9420: 6f 63 6b 74 79 70 65 20 2d 20 6f 6e 65 0a 2a 2a ocktype - one.**
9430: 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e of the followin
9440: 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 28 31 29 g:.**.** (1)
9450: 20 53 48 41 52 45 44 5f 4c 4f 43 4b 0a 2a 2a 20 SHARED_LOCK.**
9460: 20 20 20 20 28 32 29 20 52 45 53 45 52 56 45 44 (2) RESERVED
9470: 5f 4c 4f 43 4b 0a 2a 2a 20 20 20 20 20 28 33 29 _LOCK.** (3)
9480: 20 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b 0a 2a 2a PENDING_LOCK.**
9490: 20 20 20 20 20 28 34 29 20 45 58 43 4c 55 53 49 (4) EXCLUSI
94a0: 56 45 5f 4c 4f 43 4b 0a 2a 2a 0a 2a 2a 20 53 6f VE_LOCK.**.** So
94b0: 6d 65 74 69 6d 65 73 20 77 68 65 6e 20 72 65 71 metimes when req
94c0: 75 65 73 74 69 6e 67 20 6f 6e 65 20 6c 6f 63 6b uesting one lock
94d0: 20 73 74 61 74 65 2c 20 61 64 64 69 74 69 6f 6e state, addition
94e0: 61 6c 20 6c 6f 63 6b 20 73 74 61 74 65 73 0a 2a al lock states.*
94f0: 2a 20 61 72 65 20 69 6e 73 65 72 74 65 64 20 69 * are inserted i
9500: 6e 20 62 65 74 77 65 65 6e 2e 20 20 54 68 65 20 n between. The
9510: 6c 6f 63 6b 69 6e 67 20 6d 69 67 68 74 20 66 61 locking might fa
9520: 69 6c 20 6f 6e 20 6f 6e 65 20 6f 66 20 74 68 65 il on one of the
9530: 20 6c 61 74 65 72 0a 2a 2a 20 74 72 61 6e 73 69 later.** transi
9540: 74 69 6f 6e 73 20 6c 65 61 76 69 6e 67 20 74 68 tions leaving th
9550: 65 20 6c 6f 63 6b 20 73 74 61 74 65 20 64 69 66 e lock state dif
9560: 66 65 72 65 6e 74 20 66 72 6f 6d 20 77 68 61 74 ferent from what
9570: 20 69 74 20 73 74 61 72 74 65 64 20 62 75 74 0a it started but.
9580: 2a 2a 20 73 74 69 6c 6c 20 73 68 6f 72 74 20 6f ** still short o
9590: 66 20 69 74 73 20 67 6f 61 6c 2e 20 20 54 68 65 f its goal. The
95a0: 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 68 61 72 74 following chart
95b0: 20 73 68 6f 77 73 20 74 68 65 20 61 6c 6c 6f 77 shows the allow
95c0: 65 64 0a 2a 2a 20 74 72 61 6e 73 69 74 69 6f 6e ed.** transition
95d0: 73 20 61 6e 64 20 74 68 65 20 69 6e 73 65 72 74 s and the insert
95e0: 65 64 20 69 6e 74 65 72 6d 65 64 69 61 74 65 20 ed intermediate
95f0: 73 74 61 74 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 states:.**.**
9600: 20 55 4e 4c 4f 43 4b 45 44 20 2d 3e 20 53 48 41 UNLOCKED -> SHA
9610: 52 45 44 0a 2a 2a 20 20 20 20 53 48 41 52 45 44 RED.** SHARED
9620: 20 2d 3e 20 52 45 53 45 52 56 45 44 0a 2a 2a 20 -> RESERVED.**
9630: 20 20 20 53 48 41 52 45 44 20 2d 3e 20 28 50 45 SHARED -> (PE
9640: 4e 44 49 4e 47 29 20 2d 3e 20 45 58 43 4c 55 53 NDING) -> EXCLUS
9650: 49 56 45 0a 2a 2a 20 20 20 20 52 45 53 45 52 56 IVE.** RESERV
9660: 45 44 20 2d 3e 20 28 50 45 4e 44 49 4e 47 29 20 ED -> (PENDING)
9670: 2d 3e 20 45 58 43 4c 55 53 49 56 45 0a 2a 2a 20 -> EXCLUSIVE.**
9680: 20 20 20 50 45 4e 44 49 4e 47 20 2d 3e 20 45 58 PENDING -> EX
9690: 43 4c 55 53 49 56 45 0a 2a 2a 0a 2a 2a 20 54 68 CLUSIVE.**.** Th
96a0: 69 73 20 72 6f 75 74 69 6e 65 20 77 69 6c 6c 20 is routine will
96b0: 6f 6e 6c 79 20 69 6e 63 72 65 61 73 65 20 61 20 only increase a
96c0: 6c 6f 63 6b 2e 20 20 55 73 65 20 74 68 65 20 73 lock. Use the s
96d0: 71 6c 69 74 65 33 4f 73 55 6e 6c 6f 63 6b 28 29 qlite3OsUnlock()
96e0: 0a 2a 2a 20 72 6f 75 74 69 6e 65 20 74 6f 20 6c .** routine to l
96f0: 6f 77 65 72 20 61 20 6c 6f 63 6b 69 6e 67 20 6c ower a locking l
9700: 65 76 65 6c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 evel..*/.static
9710: 69 6e 74 20 75 6e 69 78 4c 6f 63 6b 28 4f 73 46 int unixLock(OsF
9720: 69 6c 65 20 2a 69 64 2c 20 69 6e 74 20 6c 6f 63 ile *id, int loc
9730: 6b 74 79 70 65 29 7b 0a 20 20 2f 2a 20 54 68 65 ktype){. /* The
9740: 20 66 6f 6c 6c 6f 77 69 6e 67 20 64 65 73 63 72 following descr
9750: 69 62 65 73 20 74 68 65 20 69 6d 70 6c 65 6d 65 ibes the impleme
9760: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 76 ntation of the v
9770: 61 72 69 6f 75 73 20 6c 6f 63 6b 73 20 61 6e 64 arious locks and
9780: 0a 20 20 2a 2a 20 6c 6f 63 6b 20 74 72 61 6e 73 . ** lock trans
9790: 69 74 69 6f 6e 73 20 69 6e 20 74 65 72 6d 73 20 itions in terms
97a0: 6f 66 20 74 68 65 20 50 4f 53 49 58 20 61 64 76 of the POSIX adv
97b0: 69 73 6f 72 79 20 73 68 61 72 65 64 20 61 6e 64 isory shared and
97c0: 20 65 78 63 6c 75 73 69 76 65 0a 20 20 2a 2a 20 exclusive. **
97d0: 6c 6f 63 6b 20 70 72 69 6d 69 74 69 76 65 73 20 lock primitives
97e0: 28 63 61 6c 6c 65 64 20 72 65 61 64 2d 6c 6f 63 (called read-loc
97f0: 6b 73 20 61 6e 64 20 77 72 69 74 65 2d 6c 6f 63 ks and write-loc
9800: 6b 73 20 62 65 6c 6f 77 2c 20 74 6f 20 61 76 6f ks below, to avo
9810: 69 64 0a 20 20 2a 2a 20 63 6f 6e 66 75 73 69 6f id. ** confusio
9820: 6e 20 77 69 74 68 20 53 51 4c 69 74 65 20 6c 6f n with SQLite lo
9830: 63 6b 20 6e 61 6d 65 73 29 2e 20 54 68 65 20 61 ck names). The a
9840: 6c 67 6f 72 69 74 68 6d 73 20 61 72 65 20 63 6f lgorithms are co
9850: 6d 70 6c 69 63 61 74 65 64 0a 20 20 2a 2a 20 73 mplicated. ** s
9860: 6c 69 67 68 74 6c 79 20 69 6e 20 6f 72 64 65 72 lightly in order
9870: 20 74 6f 20 62 65 20 63 6f 6d 70 61 74 69 62 6c to be compatibl
9880: 65 20 77 69 74 68 20 77 69 6e 64 6f 77 73 20 73 e with windows s
9890: 79 73 74 65 6d 73 20 73 69 6d 75 6c 74 61 6e 65 ystems simultane
98a0: 6f 75 73 6c 79 0a 20 20 2a 2a 20 61 63 63 65 73 ously. ** acces
98b0: 73 69 6e 67 20 74 68 65 20 73 61 6d 65 20 64 61 sing the same da
98c0: 74 61 62 61 73 65 20 66 69 6c 65 2c 20 69 6e 20 tabase file, in
98d0: 63 61 73 65 20 74 68 61 74 20 69 73 20 65 76 65 case that is eve
98e0: 72 20 72 65 71 75 69 72 65 64 2e 0a 20 20 2a 2a r required.. **
98f0: 0a 20 20 2a 2a 20 53 79 6d 62 6f 6c 73 20 64 65 . ** Symbols de
9900: 66 69 6e 65 64 20 69 6e 20 6f 73 2e 68 20 69 6e fined in os.h in
9910: 64 65 6e 74 69 66 79 20 74 68 65 20 27 70 65 6e dentify the 'pen
9920: 64 69 6e 67 20 62 79 74 65 27 20 61 6e 64 20 74 ding byte' and t
9930: 68 65 20 27 72 65 73 65 72 76 65 64 0a 20 20 2a he 'reserved. *
9940: 2a 20 62 79 74 65 27 2c 20 65 61 63 68 20 73 69 * byte', each si
9950: 6e 67 6c 65 20 62 79 74 65 73 20 61 74 20 77 65 ngle bytes at we
9960: 6c 6c 20 6b 6e 6f 77 6e 20 6f 66 66 73 65 74 73 ll known offsets
9970: 2c 20 61 6e 64 20 74 68 65 20 27 73 68 61 72 65 , and the 'share
9980: 64 20 62 79 74 65 0a 20 20 2a 2a 20 72 61 6e 67 d byte. ** rang
9990: 65 27 2c 20 61 20 72 61 6e 67 65 20 6f 66 20 35 e', a range of 5
99a0: 31 30 20 62 79 74 65 73 20 61 74 20 61 20 77 65 10 bytes at a we
99b0: 6c 6c 20 6b 6e 6f 77 6e 20 6f 66 66 73 65 74 2e ll known offset.
99c0: 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 6f 20 6f 62 . **. ** To ob
99d0: 74 61 69 6e 20 61 20 53 48 41 52 45 44 20 6c 6f tain a SHARED lo
99e0: 63 6b 2c 20 61 20 72 65 61 64 2d 6c 6f 63 6b 20 ck, a read-lock
99f0: 69 73 20 6f 62 74 61 69 6e 65 64 20 6f 6e 20 74 is obtained on t
9a00: 68 65 20 27 70 65 6e 64 69 6e 67 0a 20 20 2a 2a he 'pending. **
9a10: 20 62 79 74 65 27 2e 20 20 49 66 20 74 68 69 73 byte'. If this
9a20: 20 69 73 20 73 75 63 63 65 73 73 66 75 6c 2c 20 is successful,
9a30: 61 20 72 61 6e 64 6f 6d 20 62 79 74 65 20 66 72 a random byte fr
9a40: 6f 6d 20 74 68 65 20 27 73 68 61 72 65 64 20 62 om the 'shared b
9a50: 79 74 65 0a 20 20 2a 2a 20 72 61 6e 67 65 27 20 yte. ** range'
9a60: 69 73 20 72 65 61 64 2d 6c 6f 63 6b 65 64 20 61 is read-locked a
9a70: 6e 64 20 74 68 65 20 6c 6f 63 6b 20 6f 6e 20 74 nd the lock on t
9a80: 68 65 20 27 70 65 6e 64 69 6e 67 20 62 79 74 65 he 'pending byte
9a90: 27 20 72 65 6c 65 61 73 65 64 2e 0a 20 20 2a 2a ' released.. **
9aa0: 0a 20 20 2a 2a 20 41 20 70 72 6f 63 65 73 73 20 . ** A process
9ab0: 6d 61 79 20 6f 6e 6c 79 20 6f 62 74 61 69 6e 20 may only obtain
9ac0: 61 20 52 45 53 45 52 56 45 44 20 6c 6f 63 6b 20 a RESERVED lock
9ad0: 61 66 74 65 72 20 69 74 20 68 61 73 20 61 20 53 after it has a S
9ae0: 48 41 52 45 44 20 6c 6f 63 6b 2e 0a 20 20 2a 2a HARED lock.. **
9af0: 20 41 20 52 45 53 45 52 56 45 44 20 6c 6f 63 6b A RESERVED lock
9b00: 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 is implemented
9b10: 62 79 20 67 72 61 62 62 69 6e 67 20 61 20 77 72 by grabbing a wr
9b20: 69 74 65 2d 6c 6f 63 6b 20 6f 6e 20 74 68 65 0a ite-lock on the.
9b30: 20 20 2a 2a 20 27 72 65 73 65 72 76 65 64 20 62 ** 'reserved b
9b40: 79 74 65 27 2e 20 0a 20 20 2a 2a 0a 20 20 2a 2a yte'. . **. **
9b50: 20 41 20 70 72 6f 63 65 73 73 20 6d 61 79 20 6f A process may o
9b60: 6e 6c 79 20 6f 62 74 61 69 6e 20 61 20 50 45 4e nly obtain a PEN
9b70: 44 49 4e 47 20 6c 6f 63 6b 20 61 66 74 65 72 20 DING lock after
9b80: 69 74 20 68 61 73 20 6f 62 74 61 69 6e 65 64 20 it has obtained
9b90: 61 0a 20 20 2a 2a 20 53 48 41 52 45 44 20 6c 6f a. ** SHARED lo
9ba0: 63 6b 2e 20 41 20 50 45 4e 44 49 4e 47 20 6c 6f ck. A PENDING lo
9bb0: 63 6b 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 ck is implemente
9bc0: 64 20 62 79 20 6f 62 74 61 69 6e 69 6e 67 20 61 d by obtaining a
9bd0: 20 77 72 69 74 65 2d 6c 6f 63 6b 0a 20 20 2a 2a write-lock. **
9be0: 20 6f 6e 20 74 68 65 20 27 70 65 6e 64 69 6e 67 on the 'pending
9bf0: 20 62 79 74 65 27 2e 20 54 68 69 73 20 65 6e 73 byte'. This ens
9c00: 75 72 65 73 20 74 68 61 74 20 6e 6f 20 6e 65 77 ures that no new
9c10: 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 20 63 61 SHARED locks ca
9c20: 6e 20 62 65 0a 20 20 2a 2a 20 6f 62 74 61 69 6e n be. ** obtain
9c30: 65 64 2c 20 62 75 74 20 65 78 69 73 74 69 6e 67 ed, but existing
9c40: 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 20 61 72 SHARED locks ar
9c50: 65 20 61 6c 6c 6f 77 65 64 20 74 6f 20 70 65 72 e allowed to per
9c60: 73 69 73 74 2e 20 41 20 70 72 6f 63 65 73 73 0a sist. A process.
9c70: 20 20 2a 2a 20 64 6f 65 73 20 6e 6f 74 20 68 61 ** does not ha
9c80: 76 65 20 74 6f 20 6f 62 74 61 69 6e 20 61 20 52 ve to obtain a R
9c90: 45 53 45 52 56 45 44 20 6c 6f 63 6b 20 6f 6e 20 ESERVED lock on
9ca0: 74 68 65 20 77 61 79 20 74 6f 20 61 20 50 45 4e the way to a PEN
9cb0: 44 49 4e 47 20 6c 6f 63 6b 2e 0a 20 20 2a 2a 20 DING lock.. **
9cc0: 54 68 69 73 20 70 72 6f 70 65 72 74 79 20 69 73 This property is
9cd0: 20 75 73 65 64 20 62 79 20 74 68 65 20 61 6c 67 used by the alg
9ce0: 6f 72 69 74 68 6d 20 66 6f 72 20 72 6f 6c 6c 69 orithm for rolli
9cf0: 6e 67 20 62 61 63 6b 20 61 20 6a 6f 75 72 6e 61 ng back a journa
9d00: 6c 20 66 69 6c 65 0a 20 20 2a 2a 20 61 66 74 65 l file. ** afte
9d10: 72 20 61 20 63 72 61 73 68 2e 0a 20 20 2a 2a 0a r a crash.. **.
9d20: 20 20 2a 2a 20 41 6e 20 45 58 43 4c 55 53 49 56 ** An EXCLUSIV
9d30: 45 20 6c 6f 63 6b 2c 20 6f 62 74 61 69 6e 65 64 E lock, obtained
9d40: 20 61 66 74 65 72 20 61 20 50 45 4e 44 49 4e 47 after a PENDING
9d50: 20 6c 6f 63 6b 20 69 73 20 68 65 6c 64 2c 20 69 lock is held, i
9d60: 73 0a 20 20 2a 2a 20 69 6d 70 6c 65 6d 65 6e 74 s. ** implement
9d70: 65 64 20 62 79 20 6f 62 74 61 69 6e 69 6e 67 20 ed by obtaining
9d80: 61 20 77 72 69 74 65 2d 6c 6f 63 6b 20 6f 6e 20 a write-lock on
9d90: 74 68 65 20 65 6e 74 69 72 65 20 27 73 68 61 72 the entire 'shar
9da0: 65 64 20 62 79 74 65 0a 20 20 2a 2a 20 72 61 6e ed byte. ** ran
9db0: 67 65 27 2e 20 53 69 6e 63 65 20 61 6c 6c 20 6f ge'. Since all o
9dc0: 74 68 65 72 20 6c 6f 63 6b 73 20 72 65 71 75 69 ther locks requi
9dd0: 72 65 20 61 20 72 65 61 64 2d 6c 6f 63 6b 20 6f re a read-lock o
9de0: 6e 20 6f 6e 65 20 6f 66 20 74 68 65 20 62 79 74 n one of the byt
9df0: 65 73 0a 20 20 2a 2a 20 77 69 74 68 69 6e 20 74 es. ** within t
9e00: 68 69 73 20 72 61 6e 67 65 2c 20 74 68 69 73 20 his range, this
9e10: 65 6e 73 75 72 65 73 20 74 68 61 74 20 6e 6f 20 ensures that no
9e20: 6f 74 68 65 72 20 6c 6f 63 6b 73 20 61 72 65 20 other locks are
9e30: 68 65 6c 64 20 6f 6e 20 74 68 65 0a 20 20 2a 2a held on the. **
9e40: 20 64 61 74 61 62 61 73 65 2e 20 0a 20 20 2a 2a database. . **
9e50: 0a 20 20 2a 2a 20 54 68 65 20 72 65 61 73 6f 6e . ** The reason
9e60: 20 61 20 73 69 6e 67 6c 65 20 62 79 74 65 20 63 a single byte c
9e70: 61 6e 6e 6f 74 20 62 65 20 75 73 65 64 20 69 6e annot be used in
9e80: 73 74 65 61 64 20 6f 66 20 74 68 65 20 27 73 68 stead of the 'sh
9e90: 61 72 65 64 20 62 79 74 65 0a 20 20 2a 2a 20 72 ared byte. ** r
9ea0: 61 6e 67 65 27 20 69 73 20 74 68 61 74 20 73 6f ange' is that so
9eb0: 6d 65 20 76 65 72 73 69 6f 6e 73 20 6f 66 20 77 me versions of w
9ec0: 69 6e 64 6f 77 73 20 64 6f 20 6e 6f 74 20 73 75 indows do not su
9ed0: 70 70 6f 72 74 20 72 65 61 64 2d 6c 6f 63 6b 73 pport read-locks
9ee0: 2e 20 42 79 0a 20 20 2a 2a 20 6c 6f 63 6b 69 6e . By. ** lockin
9ef0: 67 20 61 20 72 61 6e 64 6f 6d 20 62 79 74 65 20 g a random byte
9f00: 66 72 6f 6d 20 61 20 72 61 6e 67 65 2c 20 63 6f from a range, co
9f10: 6e 63 75 72 72 65 6e 74 20 53 48 41 52 45 44 20 ncurrent SHARED
9f20: 6c 6f 63 6b 73 20 6d 61 79 20 65 78 69 73 74 0a locks may exist.
9f30: 20 20 2a 2a 20 65 76 65 6e 20 69 66 20 74 68 65 ** even if the
9f40: 20 6c 6f 63 6b 69 6e 67 20 70 72 69 6d 69 74 69 locking primiti
9f50: 76 65 20 75 73 65 64 20 69 73 20 61 6c 77 61 79 ve used is alway
9f60: 73 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b 2e 0a s a write-lock..
9f70: 20 20 2a 2f 0a 20 20 69 6e 74 20 72 63 20 3d 20 */. int rc =
9f80: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 75 6e 69 SQLITE_OK;. uni
9f90: 78 46 69 6c 65 20 2a 70 46 69 6c 65 20 3d 20 28 xFile *pFile = (
9fa0: 75 6e 69 78 46 69 6c 65 2a 29 69 64 3b 0a 20 20 unixFile*)id;.
9fb0: 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 struct lockInfo
9fc0: 2a 70 4c 6f 63 6b 20 3d 20 70 46 69 6c 65 2d 3e *pLock = pFile->
9fd0: 70 4c 6f 63 6b 3b 0a 20 20 73 74 72 75 63 74 20 pLock;. struct
9fe0: 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 69 6e flock lock;. in
9ff0: 74 20 73 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 t s;.. assert(
a000: 70 46 69 6c 65 20 29 3b 0a 20 20 54 52 41 43 45 pFile );. TRACE
a010: 37 28 22 4c 4f 43 4b 20 20 20 20 25 64 20 25 73 7("LOCK %d %s
a020: 20 77 61 73 20 25 73 28 25 73 2c 25 64 29 20 70 was %s(%s,%d) p
a030: 69 64 3d 25 64 5c 6e 22 2c 20 70 46 69 6c 65 2d id=%d\n", pFile-
a040: 3e 68 2c 0a 20 20 20 20 20 20 6c 6f 63 6b 74 79 >h,. lockty
a050: 70 65 4e 61 6d 65 28 6c 6f 63 6b 74 79 70 65 29 peName(locktype)
a060: 2c 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28 70 , locktypeName(p
a070: 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 70 65 29 2c File->locktype),
a080: 0a 20 20 20 20 20 20 6c 6f 63 6b 74 79 70 65 4e . locktypeN
a090: 61 6d 65 28 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 ame(pLock->lockt
a0a0: 79 70 65 29 2c 20 70 4c 6f 63 6b 2d 3e 63 6e 74 ype), pLock->cnt
a0b0: 20 2c 20 67 65 74 70 69 64 28 29 29 3b 0a 0a 20 , getpid());..
a0c0: 20 2f 2a 20 49 66 20 74 68 65 72 65 20 69 73 20 /* If there is
a0d0: 61 6c 72 65 61 64 79 20 61 20 6c 6f 63 6b 20 6f already a lock o
a0e0: 66 20 74 68 69 73 20 74 79 70 65 20 6f 72 20 6d f this type or m
a0f0: 6f 72 65 20 72 65 73 74 72 69 63 74 69 76 65 20 ore restrictive
a100: 6f 6e 20 74 68 65 0a 20 20 2a 2a 20 4f 73 46 69 on the. ** OsFi
a110: 6c 65 2c 20 64 6f 20 6e 6f 74 68 69 6e 67 2e 20 le, do nothing.
a120: 44 6f 6e 27 74 20 75 73 65 20 74 68 65 20 65 6e Don't use the en
a130: 64 5f 6c 6f 63 6b 3a 20 65 78 69 74 20 70 61 74 d_lock: exit pat
a140: 68 2c 20 61 73 0a 20 20 2a 2a 20 73 71 6c 69 74 h, as. ** sqlit
a150: 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 e3OsEnterMutex()
a160: 20 68 61 73 6e 27 74 20 62 65 65 6e 20 63 61 6c hasn't been cal
a170: 6c 65 64 20 79 65 74 2e 0a 20 20 2a 2f 0a 20 20 led yet.. */.
a180: 69 66 28 20 70 46 69 6c 65 2d 3e 6c 6f 63 6b 74 if( pFile->lockt
a190: 79 70 65 3e 3d 6c 6f 63 6b 74 79 70 65 20 29 7b ype>=locktype ){
a1a0: 0a 20 20 20 20 54 52 41 43 45 33 28 22 4c 4f 43 . TRACE3("LOC
a1b0: 4b 20 20 20 20 25 64 20 25 73 20 6f 6b 20 28 61 K %d %s ok (a
a1c0: 6c 72 65 61 64 79 20 68 65 6c 64 29 5c 6e 22 2c lready held)\n",
a1d0: 20 70 46 69 6c 65 2d 3e 68 2c 0a 20 20 20 20 20 pFile->h,.
a1e0: 20 20 20 20 20 20 20 6c 6f 63 6b 74 79 70 65 4e locktypeN
a1f0: 61 6d 65 28 6c 6f 63 6b 74 79 70 65 29 29 3b 0a ame(locktype));.
a200: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 return SQLIT
a210: 45 5f 4f 4b 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 E_OK;. }.. /*
a220: 4d 61 6b 65 20 73 75 72 65 20 74 68 65 20 6c 6f Make sure the lo
a230: 63 6b 69 6e 67 20 73 65 71 75 65 6e 63 65 20 69 cking sequence i
a240: 73 20 63 6f 72 72 65 63 74 0a 20 20 2a 2f 0a 20 s correct. */.
a250: 20 61 73 73 65 72 74 28 20 70 46 69 6c 65 2d 3e assert( pFile->
a260: 6c 6f 63 6b 74 79 70 65 21 3d 4e 4f 5f 4c 4f 43 locktype!=NO_LOC
a270: 4b 20 7c 7c 20 6c 6f 63 6b 74 79 70 65 3d 3d 53 K || locktype==S
a280: 48 41 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a 20 20 HARED_LOCK );.
a290: 61 73 73 65 72 74 28 20 6c 6f 63 6b 74 79 70 65 assert( locktype
a2a0: 21 3d 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b 20 29 !=PENDING_LOCK )
a2b0: 3b 0a 20 20 61 73 73 65 72 74 28 20 6c 6f 63 6b ;. assert( lock
a2c0: 74 79 70 65 21 3d 52 45 53 45 52 56 45 44 5f 4c type!=RESERVED_L
a2d0: 4f 43 4b 20 7c 7c 20 70 46 69 6c 65 2d 3e 6c 6f OCK || pFile->lo
a2e0: 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c cktype==SHARED_L
a2f0: 4f 43 4b 20 29 3b 0a 0a 20 20 2f 2a 20 54 68 69 OCK );.. /* Thi
a300: 73 20 6d 75 74 65 78 20 69 73 20 6e 65 65 64 65 s mutex is neede
a310: 64 20 62 65 63 61 75 73 65 20 70 46 69 6c 65 2d d because pFile-
a320: 3e 70 4c 6f 63 6b 20 69 73 20 73 68 61 72 65 64 >pLock is shared
a330: 20 61 63 72 6f 73 73 20 74 68 72 65 61 64 73 0a across threads.
a340: 20 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 4f 73 */. sqlite3Os
a350: 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 0a 20 EnterMutex();..
a360: 20 2f 2a 20 4d 61 6b 65 20 73 75 72 65 20 74 68 /* Make sure th
a370: 65 20 63 75 72 72 65 6e 74 20 74 68 72 65 61 64 e current thread
a380: 20 6f 77 6e 73 20 74 68 65 20 70 46 69 6c 65 2e owns the pFile.
a390: 0a 20 20 2a 2f 0a 20 20 72 63 20 3d 20 74 72 61 . */. rc = tra
a3a0: 6e 73 66 65 72 4f 77 6e 65 72 73 68 69 70 28 70 nsferOwnership(p
a3b0: 46 69 6c 65 29 3b 0a 20 20 69 66 28 20 72 63 21 File);. if( rc!
a3c0: 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 =SQLITE_OK ){.
a3d0: 20 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 sqlite3OsLeave
a3e0: 4d 75 74 65 78 28 29 3b 0a 20 20 20 20 72 65 74 Mutex();. ret
a3f0: 75 72 6e 20 72 63 3b 0a 20 20 7d 0a 20 20 70 4c urn rc;. }. pL
a400: 6f 63 6b 20 3d 20 70 46 69 6c 65 2d 3e 70 4c 6f ock = pFile->pLo
a410: 63 6b 3b 0a 0a 20 20 2f 2a 20 49 66 20 73 6f 6d ck;.. /* If som
a420: 65 20 74 68 72 65 61 64 20 75 73 69 6e 67 20 74 e thread using t
a430: 68 69 73 20 50 49 44 20 68 61 73 20 61 20 6c 6f his PID has a lo
a440: 63 6b 20 76 69 61 20 61 20 64 69 66 66 65 72 65 ck via a differe
a450: 6e 74 20 4f 73 46 69 6c 65 2a 0a 20 20 2a 2a 20 nt OsFile*. **
a460: 68 61 6e 64 6c 65 20 74 68 61 74 20 70 72 65 63 handle that prec
a470: 6c 75 64 65 73 20 74 68 65 20 72 65 71 75 65 73 ludes the reques
a480: 74 65 64 20 6c 6f 63 6b 2c 20 72 65 74 75 72 6e ted lock, return
a490: 20 42 55 53 59 2e 0a 20 20 2a 2f 0a 20 20 69 66 BUSY.. */. if
a4a0: 28 20 28 70 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 ( (pFile->lockty
a4b0: 70 65 21 3d 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 pe!=pLock->lockt
a4c0: 79 70 65 20 26 26 20 0a 20 20 20 20 20 20 20 20 ype && .
a4d0: 20 20 28 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 (pLock->lockty
a4e0: 70 65 3e 3d 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b pe>=PENDING_LOCK
a4f0: 20 7c 7c 20 6c 6f 63 6b 74 79 70 65 3e 53 48 41 || locktype>SHA
a500: 52 45 44 5f 4c 4f 43 4b 29 29 0a 20 20 29 7b 0a RED_LOCK)). ){.
a510: 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f rc = SQLITE_
a520: 42 55 53 59 3b 0a 20 20 20 20 67 6f 74 6f 20 65 BUSY;. goto e
a530: 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 7d 0a 0a 20 20 nd_lock;. }..
a540: 2f 2a 20 49 66 20 61 20 53 48 41 52 45 44 20 6c /* If a SHARED l
a550: 6f 63 6b 20 69 73 20 72 65 71 75 65 73 74 65 64 ock is requested
a560: 2c 20 61 6e 64 20 73 6f 6d 65 20 74 68 72 65 61 , and some threa
a570: 64 20 75 73 69 6e 67 20 74 68 69 73 20 50 49 44 d using this PID
a580: 20 61 6c 72 65 61 64 79 0a 20 20 2a 2a 20 68 61 already. ** ha
a590: 73 20 61 20 53 48 41 52 45 44 20 6f 72 20 52 45 s a SHARED or RE
a5a0: 53 45 52 56 45 44 20 6c 6f 63 6b 2c 20 74 68 65 SERVED lock, the
a5b0: 6e 20 69 6e 63 72 65 6d 65 6e 74 20 72 65 66 65 n increment refe
a5c0: 72 65 6e 63 65 20 63 6f 75 6e 74 73 20 61 6e 64 rence counts and
a5d0: 0a 20 20 2a 2a 20 72 65 74 75 72 6e 20 53 51 4c . ** return SQL
a5e0: 49 54 45 5f 4f 4b 2e 0a 20 20 2a 2f 0a 20 20 69 ITE_OK.. */. i
a5f0: 66 28 20 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 f( locktype==SHA
a600: 52 45 44 5f 4c 4f 43 4b 20 26 26 20 0a 20 20 20 RED_LOCK && .
a610: 20 20 20 28 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 (pLock->lockt
a620: 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b ype==SHARED_LOCK
a630: 20 7c 7c 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 || pLock->lockt
a640: 79 70 65 3d 3d 52 45 53 45 52 56 45 44 5f 4c 4f ype==RESERVED_LO
a650: 43 4b 29 20 29 7b 0a 20 20 20 20 61 73 73 65 72 CK) ){. asser
a660: 74 28 20 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 t( locktype==SHA
a670: 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a 20 20 20 20 RED_LOCK );.
a680: 61 73 73 65 72 74 28 20 70 46 69 6c 65 2d 3e 6c assert( pFile->l
a690: 6f 63 6b 74 79 70 65 3d 3d 30 20 29 3b 0a 20 20 ocktype==0 );.
a6a0: 20 20 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d assert( pLock-
a6b0: 3e 63 6e 74 3e 30 20 29 3b 0a 20 20 20 20 70 46 >cnt>0 );. pF
a6c0: 69 6c 65 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 ile->locktype =
a6d0: 53 48 41 52 45 44 5f 4c 4f 43 4b 3b 0a 20 20 20 SHARED_LOCK;.
a6e0: 20 70 4c 6f 63 6b 2d 3e 63 6e 74 2b 2b 3b 0a 20 pLock->cnt++;.
a6f0: 20 20 20 70 46 69 6c 65 2d 3e 70 4f 70 65 6e 2d pFile->pOpen-
a700: 3e 6e 4c 6f 63 6b 2b 2b 3b 0a 20 20 20 20 67 6f >nLock++;. go
a710: 74 6f 20 65 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 7d to end_lock;. }
a720: 0a 0a 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d .. lock.l_len =
a730: 20 31 4c 3b 0a 0a 20 20 6c 6f 63 6b 2e 6c 5f 77 1L;.. lock.l_w
a740: 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 hence = SEEK_SET
a750: 3b 0a 0a 20 20 2f 2a 20 41 20 50 45 4e 44 49 4e ;.. /* A PENDIN
a760: 47 20 6c 6f 63 6b 20 69 73 20 6e 65 65 64 65 64 G lock is needed
a770: 20 62 65 66 6f 72 65 20 61 63 71 75 69 72 69 6e before acquirin
a780: 67 20 61 20 53 48 41 52 45 44 20 6c 6f 63 6b 20 g a SHARED lock
a790: 61 6e 64 20 62 65 66 6f 72 65 0a 20 20 2a 2a 20 and before. **
a7a0: 61 63 71 75 69 72 69 6e 67 20 61 6e 20 45 58 43 acquiring an EXC
a7b0: 4c 55 53 49 56 45 20 6c 6f 63 6b 2e 20 20 46 6f LUSIVE lock. Fo
a7c0: 72 20 74 68 65 20 53 48 41 52 45 44 20 6c 6f 63 r the SHARED loc
a7d0: 6b 2c 20 74 68 65 20 50 45 4e 44 49 4e 47 20 77 k, the PENDING w
a7e0: 69 6c 6c 0a 20 20 2a 2a 20 62 65 20 72 65 6c 65 ill. ** be rele
a7f0: 61 73 65 64 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 ased.. */. if(
a800: 20 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 locktype==SHARE
a810: 44 5f 4c 4f 43 4b 20 0a 20 20 20 20 20 20 7c 7c D_LOCK . ||
a820: 20 28 6c 6f 63 6b 74 79 70 65 3d 3d 45 58 43 4c (locktype==EXCL
a830: 55 53 49 56 45 5f 4c 4f 43 4b 20 26 26 20 70 46 USIVE_LOCK && pF
a840: 69 6c 65 2d 3e 6c 6f 63 6b 74 79 70 65 3c 50 45 ile->locktype<PE
a850: 4e 44 49 4e 47 5f 4c 4f 43 4b 29 0a 20 20 29 7b NDING_LOCK). ){
a860: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 . lock.l_type
a870: 20 3d 20 28 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 = (locktype==SH
a880: 41 52 45 44 5f 4c 4f 43 4b 3f 46 5f 52 44 4c 43 ARED_LOCK?F_RDLC
a890: 4b 3a 46 5f 57 52 4c 43 4b 29 3b 0a 20 20 20 20 K:F_WRLCK);.
a8a0: 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 50 lock.l_start = P
a8b0: 45 4e 44 49 4e 47 5f 42 59 54 45 3b 0a 20 20 20 ENDING_BYTE;.
a8c0: 20 73 20 3d 20 66 63 6e 74 6c 28 70 46 69 6c 65 s = fcntl(pFile
a8d0: 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c ->h, F_SETLK, &l
a8e0: 6f 63 6b 29 3b 0a 20 20 20 20 69 66 28 20 73 20 ock);. if( s
a8f0: 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 28 65 ){. rc = (e
a900: 72 72 6e 6f 3d 3d 45 49 4e 56 41 4c 29 20 3f 20 rrno==EINVAL) ?
a910: 53 51 4c 49 54 45 5f 4e 4f 4c 46 53 20 3a 20 53 SQLITE_NOLFS : S
a920: 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 QLITE_BUSY;.
a930: 20 20 67 6f 74 6f 20 65 6e 64 5f 6c 6f 63 6b 3b goto end_lock;
a940: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 0a 20 20 2f . }. }... /
a950: 2a 20 49 66 20 63 6f 6e 74 72 6f 6c 20 67 65 74 * If control get
a960: 73 20 74 6f 20 74 68 69 73 20 70 6f 69 6e 74 2c s to this point,
a970: 20 74 68 65 6e 20 61 63 74 75 61 6c 6c 79 20 67 then actually g
a980: 6f 20 61 68 65 61 64 20 61 6e 64 20 6d 61 6b 65 o ahead and make
a990: 0a 20 20 2a 2a 20 6f 70 65 72 61 74 69 6e 67 20 . ** operating
a9a0: 73 79 73 74 65 6d 20 63 61 6c 6c 73 20 66 6f 72 system calls for
a9b0: 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 6c the specified l
a9c0: 6f 63 6b 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 ock.. */. if(
a9d0: 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 locktype==SHARED
a9e0: 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 61 73 73 _LOCK ){. ass
a9f0: 65 72 74 28 20 70 4c 6f 63 6b 2d 3e 63 6e 74 3d ert( pLock->cnt=
aa00: 3d 30 20 29 3b 0a 20 20 20 20 61 73 73 65 72 74 =0 );. assert
aa10: 28 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 ( pLock->locktyp
aa20: 65 3d 3d 30 20 29 3b 0a 0a 20 20 20 20 2f 2a 20 e==0 );.. /*
aa30: 4e 6f 77 20 67 65 74 20 74 68 65 20 72 65 61 64 Now get the read
aa40: 2d 6c 6f 63 6b 20 2a 2f 0a 20 20 20 20 6c 6f 63 -lock */. loc
aa50: 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 53 48 41 52 k.l_start = SHAR
aa60: 45 44 5f 46 49 52 53 54 3b 0a 20 20 20 20 6c 6f ED_FIRST;. lo
aa70: 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 53 48 41 52 45 ck.l_len = SHARE
aa80: 44 5f 53 49 5a 45 3b 0a 20 20 20 20 73 20 3d 20 D_SIZE;. s =
aa90: 66 63 6e 74 6c 28 70 46 69 6c 65 2d 3e 68 2c 20 fcntl(pFile->h,
aaa0: 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b F_SETLK, &lock);
aab0: 0a 0a 20 20 20 20 2f 2a 20 44 72 6f 70 20 74 68 .. /* Drop th
aac0: 65 20 74 65 6d 70 6f 72 61 72 79 20 50 45 4e 44 e temporary PEND
aad0: 49 4e 47 20 6c 6f 63 6b 20 2a 2f 0a 20 20 20 20 ING lock */.
aae0: 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 50 lock.l_start = P
aaf0: 45 4e 44 49 4e 47 5f 42 59 54 45 3b 0a 20 20 20 ENDING_BYTE;.
ab00: 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31 4c lock.l_len = 1L
ab10: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 ;. lock.l_typ
ab20: 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b 0a 20 20 20 e = F_UNLCK;.
ab30: 20 69 66 28 20 66 63 6e 74 6c 28 70 46 69 6c 65 if( fcntl(pFile
ab40: 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c ->h, F_SETLK, &l
ab50: 6f 63 6b 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 ock)!=0 ){.
ab60: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 49 4f 45 rc = SQLITE_IOE
ab70: 52 52 3b 20 20 2f 2a 20 54 68 69 73 20 73 68 6f RR; /* This sho
ab80: 75 6c 64 20 6e 65 76 65 72 20 68 61 70 70 65 6e uld never happen
ab90: 20 2a 2f 0a 20 20 20 20 20 20 67 6f 74 6f 20 65 */. goto e
aba0: 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 20 20 7d 0a 20 nd_lock;. }.
abb0: 20 20 20 69 66 28 20 73 20 29 7b 0a 20 20 20 20 if( s ){.
abc0: 20 20 72 63 20 3d 20 28 65 72 72 6e 6f 3d 3d 45 rc = (errno==E
abd0: 49 4e 56 41 4c 29 20 3f 20 53 51 4c 49 54 45 5f INVAL) ? SQLITE_
abe0: 4e 4f 4c 46 53 20 3a 20 53 51 4c 49 54 45 5f 42 NOLFS : SQLITE_B
abf0: 55 53 59 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a USY;. }else{.
ac00: 20 20 20 20 20 20 70 46 69 6c 65 2d 3e 6c 6f 63 pFile->loc
ac10: 6b 74 79 70 65 20 3d 20 53 48 41 52 45 44 5f 4c ktype = SHARED_L
ac20: 4f 43 4b 3b 0a 20 20 20 20 20 20 70 46 69 6c 65 OCK;. pFile
ac30: 2d 3e 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 2b 2b ->pOpen->nLock++
ac40: 3b 0a 20 20 20 20 20 20 70 4c 6f 63 6b 2d 3e 63 ;. pLock->c
ac50: 6e 74 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 nt = 1;. }.
ac60: 7d 65 6c 73 65 20 69 66 28 20 6c 6f 63 6b 74 79 }else if( lockty
ac70: 70 65 3d 3d 45 58 43 4c 55 53 49 56 45 5f 4c 4f pe==EXCLUSIVE_LO
ac80: 43 4b 20 26 26 20 70 4c 6f 63 6b 2d 3e 63 6e 74 CK && pLock->cnt
ac90: 3e 31 20 29 7b 0a 20 20 20 20 2f 2a 20 57 65 20 >1 ){. /* We
aca0: 61 72 65 20 74 72 79 69 6e 67 20 66 6f 72 20 61 are trying for a
acb0: 6e 20 65 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b n exclusive lock
acc0: 20 62 75 74 20 61 6e 6f 74 68 65 72 20 74 68 72 but another thr
acd0: 65 61 64 20 69 6e 20 74 68 69 73 0a 20 20 20 20 ead in this.
ace0: 2a 2a 20 73 61 6d 65 20 70 72 6f 63 65 73 73 20 ** same process
acf0: 69 73 20 73 74 69 6c 6c 20 68 6f 6c 64 69 6e 67 is still holding
ad00: 20 61 20 73 68 61 72 65 64 20 6c 6f 63 6b 2e 20 a shared lock.
ad10: 2a 2f 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 */. rc = SQLI
ad20: 54 45 5f 42 55 53 59 3b 0a 20 20 7d 65 6c 73 65 TE_BUSY;. }else
ad30: 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 72 65 71 {. /* The req
ad40: 75 65 73 74 20 77 61 73 20 66 6f 72 20 61 20 52 uest was for a R
ad50: 45 53 45 52 56 45 44 20 6f 72 20 45 58 43 4c 55 ESERVED or EXCLU
ad60: 53 49 56 45 20 6c 6f 63 6b 2e 20 20 49 74 20 69 SIVE lock. It i
ad70: 73 0a 20 20 20 20 2a 2a 20 61 73 73 75 6d 65 64 s. ** assumed
ad80: 20 74 68 61 74 20 74 68 65 72 65 20 69 73 20 61 that there is a
ad90: 20 53 48 41 52 45 44 20 6f 72 20 67 72 65 61 74 SHARED or great
ada0: 65 72 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 er lock on the f
adb0: 69 6c 65 0a 20 20 20 20 2a 2a 20 61 6c 72 65 61 ile. ** alrea
adc0: 64 79 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 61 dy.. */. a
add0: 73 73 65 72 74 28 20 30 21 3d 70 46 69 6c 65 2d ssert( 0!=pFile-
ade0: 3e 6c 6f 63 6b 74 79 70 65 20 29 3b 0a 20 20 20 >locktype );.
adf0: 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 lock.l_type = F
ae00: 5f 57 52 4c 43 4b 3b 0a 20 20 20 20 73 77 69 74 _WRLCK;. swit
ae10: 63 68 28 20 6c 6f 63 6b 74 79 70 65 20 29 7b 0a ch( locktype ){.
ae20: 20 20 20 20 20 20 63 61 73 65 20 52 45 53 45 52 case RESER
ae30: 56 45 44 5f 4c 4f 43 4b 3a 0a 20 20 20 20 20 20 VED_LOCK:.
ae40: 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d lock.l_start =
ae50: 20 52 45 53 45 52 56 45 44 5f 42 59 54 45 3b 0a RESERVED_BYTE;.
ae60: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 break;.
ae70: 20 20 20 20 20 63 61 73 65 20 45 58 43 4c 55 53 case EXCLUS
ae80: 49 56 45 5f 4c 4f 43 4b 3a 0a 20 20 20 20 20 20 IVE_LOCK:.
ae90: 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d lock.l_start =
aea0: 20 53 48 41 52 45 44 5f 46 49 52 53 54 3b 0a 20 SHARED_FIRST;.
aeb0: 20 20 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 lock.l_le
aec0: 6e 20 3d 20 53 48 41 52 45 44 5f 53 49 5a 45 3b n = SHARED_SIZE;
aed0: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a . break;.
aee0: 20 20 20 20 20 20 64 65 66 61 75 6c 74 3a 0a 20 default:.
aef0: 20 20 20 20 20 20 20 61 73 73 65 72 74 28 30 29 assert(0)
af00: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 20 3d 20 ;. }. s =
af10: 66 63 6e 74 6c 28 70 46 69 6c 65 2d 3e 68 2c 20 fcntl(pFile->h,
af20: 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b F_SETLK, &lock);
af30: 0a 20 20 20 20 69 66 28 20 73 20 29 7b 0a 20 20 . if( s ){.
af40: 20 20 20 20 72 63 20 3d 20 28 65 72 72 6e 6f 3d rc = (errno=
af50: 3d 45 49 4e 56 41 4c 29 20 3f 20 53 51 4c 49 54 =EINVAL) ? SQLIT
af60: 45 5f 4e 4f 4c 46 53 20 3a 20 53 51 4c 49 54 45 E_NOLFS : SQLITE
af70: 5f 42 55 53 59 3b 0a 20 20 20 20 7d 0a 20 20 7d _BUSY;. }. }
af80: 0a 20 20 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 . . if( rc==SQ
af90: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 70 LITE_OK ){. p
afa0: 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d File->locktype =
afb0: 20 6c 6f 63 6b 74 79 70 65 3b 0a 20 20 20 20 70 locktype;. p
afc0: 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d Lock->locktype =
afd0: 20 6c 6f 63 6b 74 79 70 65 3b 0a 20 20 7d 65 6c locktype;. }el
afe0: 73 65 20 69 66 28 20 6c 6f 63 6b 74 79 70 65 3d se if( locktype=
aff0: 3d 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43 4b 20 =EXCLUSIVE_LOCK
b000: 29 7b 0a 20 20 20 20 70 46 69 6c 65 2d 3e 6c 6f ){. pFile->lo
b010: 63 6b 74 79 70 65 20 3d 20 50 45 4e 44 49 4e 47 cktype = PENDING
b020: 5f 4c 4f 43 4b 3b 0a 20 20 20 20 70 4c 6f 63 6b _LOCK;. pLock
b030: 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 50 45 4e ->locktype = PEN
b040: 44 49 4e 47 5f 4c 4f 43 4b 3b 0a 20 20 7d 0a 0a DING_LOCK;. }..
b050: 65 6e 64 5f 6c 6f 63 6b 3a 0a 20 20 73 71 6c 69 end_lock:. sqli
b060: 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 te3OsLeaveMutex(
b070: 29 3b 0a 20 20 54 52 41 43 45 34 28 22 4c 4f 43 );. TRACE4("LOC
b080: 4b 20 20 20 20 25 64 20 25 73 20 25 73 5c 6e 22 K %d %s %s\n"
b090: 2c 20 70 46 69 6c 65 2d 3e 68 2c 20 6c 6f 63 6b , pFile->h, lock
b0a0: 74 79 70 65 4e 61 6d 65 28 6c 6f 63 6b 74 79 70 typeName(locktyp
b0b0: 65 29 2c 20 0a 20 20 20 20 20 20 72 63 3d 3d 53 e), . rc==S
b0c0: 51 4c 49 54 45 5f 4f 4b 20 3f 20 22 6f 6b 22 20 QLITE_OK ? "ok"
b0d0: 3a 20 22 66 61 69 6c 65 64 22 29 3b 0a 20 20 72 : "failed");. r
b0e0: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a eturn rc;.}../*.
b0f0: 2a 2a 20 4c 6f 77 65 72 20 74 68 65 20 6c 6f 63 ** Lower the loc
b100: 6b 69 6e 67 20 6c 65 76 65 6c 20 6f 6e 20 66 69 king level on fi
b110: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 70 46 le descriptor pF
b120: 69 6c 65 20 74 6f 20 6c 6f 63 6b 74 79 70 65 2e ile to locktype.
b130: 20 20 6c 6f 63 6b 74 79 70 65 0a 2a 2a 20 6d 75 locktype.** mu
b140: 73 74 20 62 65 20 65 69 74 68 65 72 20 4e 4f 5f st be either NO_
b150: 4c 4f 43 4b 20 6f 72 20 53 48 41 52 45 44 5f 4c LOCK or SHARED_L
b160: 4f 43 4b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 OCK..**.** If th
b170: 65 20 6c 6f 63 6b 69 6e 67 20 6c 65 76 65 6c 20 e locking level
b180: 6f 66 20 74 68 65 20 66 69 6c 65 20 64 65 73 63 of the file desc
b190: 72 69 70 74 6f 72 20 69 73 20 61 6c 72 65 61 64 riptor is alread
b1a0: 79 20 61 74 20 6f 72 20 62 65 6c 6f 77 0a 2a 2a y at or below.**
b1b0: 20 74 68 65 20 72 65 71 75 65 73 74 65 64 20 6c the requested l
b1c0: 6f 63 6b 69 6e 67 20 6c 65 76 65 6c 2c 20 74 68 ocking level, th
b1d0: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 61 20 is routine is a
b1e0: 6e 6f 2d 6f 70 2e 0a 2a 2f 0a 73 74 61 74 69 63 no-op..*/.static
b1f0: 20 69 6e 74 20 75 6e 69 78 55 6e 6c 6f 63 6b 28 int unixUnlock(
b200: 4f 73 46 69 6c 65 20 2a 69 64 2c 20 69 6e 74 20 OsFile *id, int
b210: 6c 6f 63 6b 74 79 70 65 29 7b 0a 20 20 73 74 72 locktype){. str
b220: 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4c uct lockInfo *pL
b230: 6f 63 6b 3b 0a 20 20 73 74 72 75 63 74 20 66 6c ock;. struct fl
b240: 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 69 6e 74 20 ock lock;. int
b250: 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a rc = SQLITE_OK;.
b260: 20 20 75 6e 69 78 46 69 6c 65 20 2a 70 46 69 6c unixFile *pFil
b270: 65 20 3d 20 28 75 6e 69 78 46 69 6c 65 2a 29 69 e = (unixFile*)i
b280: 64 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 70 46 d;.. assert( pF
b290: 69 6c 65 20 29 3b 0a 20 20 54 52 41 43 45 37 28 ile );. TRACE7(
b2a0: 22 55 4e 4c 4f 43 4b 20 20 25 64 20 25 64 20 77 "UNLOCK %d %d w
b2b0: 61 73 20 25 64 28 25 64 2c 25 64 29 20 70 69 64 as %d(%d,%d) pid
b2c0: 3d 25 64 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 68 =%d\n", pFile->h
b2d0: 2c 20 6c 6f 63 6b 74 79 70 65 2c 0a 20 20 20 20 , locktype,.
b2e0: 20 20 70 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 70 pFile->locktyp
b2f0: 65 2c 20 70 46 69 6c 65 2d 3e 70 4c 6f 63 6b 2d e, pFile->pLock-
b300: 3e 6c 6f 63 6b 74 79 70 65 2c 20 70 46 69 6c 65 >locktype, pFile
b310: 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 2c 20 67 65 ->pLock->cnt, ge
b320: 74 70 69 64 28 29 29 3b 0a 0a 20 20 61 73 73 65 tpid());.. asse
b330: 72 74 28 20 6c 6f 63 6b 74 79 70 65 3c 3d 53 48 rt( locktype<=SH
b340: 41 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a 20 20 69 ARED_LOCK );. i
b350: 66 28 20 70 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 f( pFile->lockty
b360: 70 65 3c 3d 6c 6f 63 6b 74 79 70 65 20 29 7b 0a pe<=locktype ){.
b370: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 return SQLIT
b380: 45 5f 4f 4b 3b 0a 20 20 7d 0a 20 20 69 66 28 20 E_OK;. }. if(
b390: 43 48 45 43 4b 5f 54 48 52 45 41 44 49 44 28 70 CHECK_THREADID(p
b3a0: 46 69 6c 65 29 20 29 7b 0a 20 20 20 20 72 65 74 File) ){. ret
b3b0: 75 72 6e 20 53 51 4c 49 54 45 5f 4d 49 53 55 53 urn SQLITE_MISUS
b3c0: 45 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 E;. }. sqlite3
b3d0: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a OsEnterMutex();.
b3e0: 20 20 70 4c 6f 63 6b 20 3d 20 70 46 69 6c 65 2d pLock = pFile-
b3f0: 3e 70 4c 6f 63 6b 3b 0a 20 20 61 73 73 65 72 74 >pLock;. assert
b400: 28 20 70 4c 6f 63 6b 2d 3e 63 6e 74 21 3d 30 20 ( pLock->cnt!=0
b410: 29 3b 0a 20 20 69 66 28 20 70 46 69 6c 65 2d 3e );. if( pFile->
b420: 6c 6f 63 6b 74 79 70 65 3e 53 48 41 52 45 44 5f locktype>SHARED_
b430: 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 61 73 73 65 LOCK ){. asse
b440: 72 74 28 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 rt( pLock->lockt
b450: 79 70 65 3d 3d 70 46 69 6c 65 2d 3e 6c 6f 63 6b ype==pFile->lock
b460: 74 79 70 65 20 29 3b 0a 20 20 20 20 69 66 28 20 type );. if(
b470: 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 locktype==SHARED
b480: 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 20 20 6c _LOCK ){. l
b490: 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 52 ock.l_type = F_R
b4a0: 44 4c 43 4b 3b 0a 20 20 20 20 20 20 6c 6f 63 6b DLCK;. lock
b4b0: 2e 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 4b .l_whence = SEEK
b4c0: 5f 53 45 54 3b 0a 20 20 20 20 20 20 6c 6f 63 6b _SET;. lock
b4d0: 2e 6c 5f 73 74 61 72 74 20 3d 20 53 48 41 52 45 .l_start = SHARE
b4e0: 44 5f 46 49 52 53 54 3b 0a 20 20 20 20 20 20 6c D_FIRST;. l
b4f0: 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 53 48 41 52 ock.l_len = SHAR
b500: 45 44 5f 53 49 5a 45 3b 0a 20 20 20 20 20 20 69 ED_SIZE;. i
b510: 66 28 20 66 63 6e 74 6c 28 70 46 69 6c 65 2d 3e f( fcntl(pFile->
b520: 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 h, F_SETLK, &loc
b530: 6b 29 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 k)!=0 ){.
b540: 20 2f 2a 20 54 68 69 73 20 73 68 6f 75 6c 64 20 /* This should
b550: 6e 65 76 65 72 20 68 61 70 70 65 6e 20 2a 2f 0a never happen */.
b560: 20 20 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c rc = SQL
b570: 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 20 20 20 ITE_IOERR;.
b580: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 6c 6f 63 }. }. loc
b590: 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c k.l_type = F_UNL
b5a0: 43 4b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 CK;. lock.l_w
b5b0: 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 hence = SEEK_SET
b5c0: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 ;. lock.l_sta
b5d0: 72 74 20 3d 20 50 45 4e 44 49 4e 47 5f 42 59 54 rt = PENDING_BYT
b5e0: 45 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 E;. lock.l_le
b5f0: 6e 20 3d 20 32 4c 3b 20 20 61 73 73 65 72 74 28 n = 2L; assert(
b600: 20 50 45 4e 44 49 4e 47 5f 42 59 54 45 2b 31 3d PENDING_BYTE+1=
b610: 3d 52 45 53 45 52 56 45 44 5f 42 59 54 45 20 29 =RESERVED_BYTE )
b620: 3b 0a 20 20 20 20 69 66 28 20 66 63 6e 74 6c 28 ;. if( fcntl(
b630: 70 46 69 6c 65 2d 3e 68 2c 20 46 5f 53 45 54 4c pFile->h, F_SETL
b640: 4b 2c 20 26 6c 6f 63 6b 29 3d 3d 30 20 29 7b 0a K, &lock)==0 ){.
b650: 20 20 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 pLock->loc
b660: 6b 74 79 70 65 20 3d 20 53 48 41 52 45 44 5f 4c ktype = SHARED_L
b670: 4f 43 4b 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a OCK;. }else{.
b680: 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 rc = SQLIT
b690: 45 5f 49 4f 45 52 52 3b 20 20 2f 2a 20 54 68 69 E_IOERR; /* Thi
b6a0: 73 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 68 s should never h
b6b0: 61 70 70 65 6e 20 2a 2f 0a 20 20 20 20 7d 0a 20 appen */. }.
b6c0: 20 7d 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79 70 }. if( locktyp
b6d0: 65 3d 3d 4e 4f 5f 4c 4f 43 4b 20 29 7b 0a 20 20 e==NO_LOCK ){.
b6e0: 20 20 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 struct openCnt
b6f0: 20 2a 70 4f 70 65 6e 3b 0a 0a 20 20 20 20 2f 2a *pOpen;.. /*
b700: 20 44 65 63 72 65 6d 65 6e 74 20 74 68 65 20 73 Decrement the s
b710: 68 61 72 65 64 20 6c 6f 63 6b 20 63 6f 75 6e 74 hared lock count
b720: 65 72 2e 20 20 52 65 6c 65 61 73 65 20 74 68 65 er. Release the
b730: 20 6c 6f 63 6b 20 75 73 69 6e 67 20 61 6e 0a 20 lock using an.
b740: 20 20 20 2a 2a 20 4f 53 20 63 61 6c 6c 20 6f 6e ** OS call on
b750: 6c 79 20 77 68 65 6e 20 61 6c 6c 20 74 68 72 65 ly when all thre
b760: 61 64 73 20 69 6e 20 74 68 69 73 20 73 61 6d 65 ads in this same
b770: 20 70 72 6f 63 65 73 73 20 68 61 76 65 20 72 65 process have re
b780: 6c 65 61 73 65 64 0a 20 20 20 20 2a 2a 20 74 68 leased. ** th
b790: 65 20 6c 6f 63 6b 2e 0a 20 20 20 20 2a 2f 0a 20 e lock.. */.
b7a0: 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74 2d 2d 3b pLock->cnt--;
b7b0: 0a 20 20 20 20 69 66 28 20 70 4c 6f 63 6b 2d 3e . if( pLock->
b7c0: 63 6e 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 cnt==0 ){.
b7d0: 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f lock.l_type = F_
b7e0: 55 4e 4c 43 4b 3b 0a 20 20 20 20 20 20 6c 6f 63 UNLCK;. loc
b7f0: 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 k.l_whence = SEE
b800: 4b 5f 53 45 54 3b 0a 20 20 20 20 20 20 6c 6f 63 K_SET;. loc
b810: 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 6c 6f 63 6b k.l_start = lock
b820: 2e 6c 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20 20 20 .l_len = 0L;.
b830: 20 20 20 69 66 28 20 66 63 6e 74 6c 28 70 46 69 if( fcntl(pFi
b840: 6c 65 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 le->h, F_SETLK,
b850: 26 6c 6f 63 6b 29 3d 3d 30 20 29 7b 0a 20 20 20 &lock)==0 ){.
b860: 20 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b pLock->lock
b870: 74 79 70 65 20 3d 20 4e 4f 5f 4c 4f 43 4b 3b 0a type = NO_LOCK;.
b880: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 }else{.
b890: 20 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 rc = SQLITE
b8a0: 5f 49 4f 45 52 52 3b 20 20 2f 2a 20 54 68 69 73 _IOERR; /* This
b8b0: 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 68 61 should never ha
b8c0: 70 70 65 6e 20 2a 2f 0a 20 20 20 20 20 20 7d 0a ppen */. }.
b8d0: 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20 44 65 }.. /* De
b8e0: 63 72 65 6d 65 6e 74 20 74 68 65 20 63 6f 75 6e crement the coun
b8f0: 74 20 6f 66 20 6c 6f 63 6b 73 20 61 67 61 69 6e t of locks again
b900: 73 74 20 74 68 69 73 20 73 61 6d 65 20 66 69 6c st this same fil
b910: 65 2e 20 20 57 68 65 6e 20 74 68 65 0a 20 20 20 e. When the.
b920: 20 2a 2a 20 63 6f 75 6e 74 20 72 65 61 63 68 65 ** count reache
b930: 73 20 7a 65 72 6f 2c 20 63 6c 6f 73 65 20 61 6e s zero, close an
b940: 79 20 6f 74 68 65 72 20 66 69 6c 65 20 64 65 73 y other file des
b950: 63 72 69 70 74 6f 72 73 20 77 68 6f 73 65 20 63 criptors whose c
b960: 6c 6f 73 65 0a 20 20 20 20 2a 2a 20 77 61 73 20 lose. ** was
b970: 64 65 66 65 72 72 65 64 20 62 65 63 61 75 73 65 deferred because
b980: 20 6f 66 20 6f 75 74 73 74 61 6e 64 69 6e 67 20 of outstanding
b990: 6c 6f 63 6b 73 2e 0a 20 20 20 20 2a 2f 0a 20 20 locks.. */.
b9a0: 20 20 70 4f 70 65 6e 20 3d 20 70 46 69 6c 65 2d pOpen = pFile-
b9b0: 3e 70 4f 70 65 6e 3b 0a 20 20 20 20 70 4f 70 65 >pOpen;. pOpe
b9c0: 6e 2d 3e 6e 4c 6f 63 6b 2d 2d 3b 0a 20 20 20 20 n->nLock--;.
b9d0: 61 73 73 65 72 74 28 20 70 4f 70 65 6e 2d 3e 6e assert( pOpen->n
b9e0: 4c 6f 63 6b 3e 3d 30 20 29 3b 0a 20 20 20 20 69 Lock>=0 );. i
b9f0: 66 28 20 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 3d f( pOpen->nLock=
ba00: 3d 30 20 26 26 20 70 4f 70 65 6e 2d 3e 6e 50 65 =0 && pOpen->nPe
ba10: 6e 64 69 6e 67 3e 30 20 29 7b 0a 20 20 20 20 20 nding>0 ){.
ba20: 20 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 66 6f int i;. fo
ba30: 72 28 69 3d 30 3b 20 69 3c 70 4f 70 65 6e 2d 3e r(i=0; i<pOpen->
ba40: 6e 50 65 6e 64 69 6e 67 3b 20 69 2b 2b 29 7b 0a nPending; i++){.
ba50: 20 20 20 20 20 20 20 20 63 6c 6f 73 65 28 70 4f close(pO
ba60: 70 65 6e 2d 3e 61 50 65 6e 64 69 6e 67 5b 69 5d pen->aPending[i]
ba70: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 );. }.
ba80: 20 66 72 65 65 28 70 4f 70 65 6e 2d 3e 61 50 65 free(pOpen->aPe
ba90: 6e 64 69 6e 67 29 3b 0a 20 20 20 20 20 20 70 4f nding);. pO
baa0: 70 65 6e 2d 3e 6e 50 65 6e 64 69 6e 67 20 3d 20 pen->nPending =
bab0: 30 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 0;. pOpen->
bac0: 61 50 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 aPending = 0;.
bad0: 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 }. }. sqlite
bae0: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 3OsLeaveMutex();
baf0: 0a 20 20 70 46 69 6c 65 2d 3e 6c 6f 63 6b 74 79 . pFile->lockty
bb00: 70 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a 20 pe = locktype;.
bb10: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f return rc;.}../
bb20: 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 66 69 6c *.** Close a fil
bb30: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 e..*/.static int
bb40: 20 75 6e 69 78 43 6c 6f 73 65 28 4f 73 46 69 6c unixClose(OsFil
bb50: 65 20 2a 2a 70 49 64 29 7b 0a 20 20 75 6e 69 78 e **pId){. unix
bb60: 46 69 6c 65 20 2a 69 64 20 3d 20 28 75 6e 69 78 File *id = (unix
bb70: 46 69 6c 65 2a 29 2a 70 49 64 3b 0a 0a 20 20 69 File*)*pId;.. i
bb80: 66 28 20 21 69 64 20 29 20 72 65 74 75 72 6e 20 f( !id ) return
bb90: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 75 6e 69 SQLITE_OK;. uni
bba0: 78 55 6e 6c 6f 63 6b 28 2a 70 49 64 2c 20 4e 4f xUnlock(*pId, NO
bbb0: 5f 4c 4f 43 4b 29 3b 0a 20 20 69 66 28 20 69 64 _LOCK);. if( id
bbc0: 2d 3e 64 69 72 66 64 3e 3d 30 20 29 20 63 6c 6f ->dirfd>=0 ) clo
bbd0: 73 65 28 69 64 2d 3e 64 69 72 66 64 29 3b 0a 20 se(id->dirfd);.
bbe0: 20 69 64 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b id->dirfd = -1;
bbf0: 0a 20 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 65 . sqlite3OsEnte
bc00: 72 4d 75 74 65 78 28 29 3b 0a 0a 20 20 69 66 28 rMutex();.. if(
bc10: 20 69 64 2d 3e 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 id->pOpen->nLoc
bc20: 6b 20 29 7b 0a 20 20 20 20 2f 2a 20 49 66 20 74 k ){. /* If t
bc30: 68 65 72 65 20 61 72 65 20 6f 75 74 73 74 61 6e here are outstan
bc40: 64 69 6e 67 20 6c 6f 63 6b 73 2c 20 64 6f 20 6e ding locks, do n
bc50: 6f 74 20 61 63 74 75 61 6c 6c 79 20 63 6c 6f 73 ot actually clos
bc60: 65 20 74 68 65 20 66 69 6c 65 20 6a 75 73 74 0a e the file just.
bc70: 20 20 20 20 2a 2a 20 79 65 74 20 62 65 63 61 75 ** yet becau
bc80: 73 65 20 74 68 61 74 20 77 6f 75 6c 64 20 63 6c se that would cl
bc90: 65 61 72 20 74 68 6f 73 65 20 6c 6f 63 6b 73 2e ear those locks.
bca0: 20 20 49 6e 73 74 65 61 64 2c 20 61 64 64 20 74 Instead, add t
bcb0: 68 65 20 66 69 6c 65 0a 20 20 20 20 2a 2a 20 64 he file. ** d
bcc0: 65 73 63 72 69 70 74 6f 72 20 74 6f 20 70 4f 70 escriptor to pOp
bcd0: 65 6e 2d 3e 61 50 65 6e 64 69 6e 67 2e 20 20 49 en->aPending. I
bce0: 74 20 77 69 6c 6c 20 62 65 20 61 75 74 6f 6d 61 t will be automa
bcf0: 74 69 63 61 6c 6c 79 20 63 6c 6f 73 65 64 20 77 tically closed w
bd00: 68 65 6e 0a 20 20 20 20 2a 2a 20 74 68 65 20 6c hen. ** the l
bd10: 61 73 74 20 6c 6f 63 6b 20 69 73 20 63 6c 65 61 ast lock is clea
bd20: 72 65 64 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 red.. */.
bd30: 69 6e 74 20 2a 61 4e 65 77 3b 0a 20 20 20 20 73 int *aNew;. s
bd40: 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 2a 70 truct openCnt *p
bd50: 4f 70 65 6e 20 3d 20 69 64 2d 3e 70 4f 70 65 6e Open = id->pOpen
bd60: 3b 0a 20 20 20 20 61 4e 65 77 20 3d 20 72 65 61 ;. aNew = rea
bd70: 6c 6c 6f 63 28 20 70 4f 70 65 6e 2d 3e 61 50 65 lloc( pOpen->aPe
bd80: 6e 64 69 6e 67 2c 20 28 70 4f 70 65 6e 2d 3e 6e nding, (pOpen->n
bd90: 50 65 6e 64 69 6e 67 2b 31 29 2a 73 69 7a 65 6f Pending+1)*sizeo
bda0: 66 28 69 6e 74 29 20 29 3b 0a 20 20 20 20 69 66 f(int) );. if
bdb0: 28 20 61 4e 65 77 3d 3d 30 20 29 7b 0a 20 20 20 ( aNew==0 ){.
bdc0: 20 20 20 2f 2a 20 49 66 20 61 20 6d 61 6c 6c 6f /* If a mallo
bdd0: 63 20 66 61 69 6c 73 2c 20 6a 75 73 74 20 6c 65 c fails, just le
bde0: 61 6b 20 74 68 65 20 66 69 6c 65 20 64 65 73 63 ak the file desc
bdf0: 72 69 70 74 6f 72 20 2a 2f 0a 20 20 20 20 7d 65 riptor */. }e
be00: 6c 73 65 7b 0a 20 20 20 20 20 20 70 4f 70 65 6e lse{. pOpen
be10: 2d 3e 61 50 65 6e 64 69 6e 67 20 3d 20 61 4e 65 ->aPending = aNe
be20: 77 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e w;. pOpen->
be30: 61 50 65 6e 64 69 6e 67 5b 70 4f 70 65 6e 2d 3e aPending[pOpen->
be40: 6e 50 65 6e 64 69 6e 67 5d 20 3d 20 69 64 2d 3e nPending] = id->
be50: 68 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e h;. pOpen->
be60: 6e 50 65 6e 64 69 6e 67 2b 2b 3b 0a 20 20 20 20 nPending++;.
be70: 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2f }. }else{. /
be80: 2a 20 54 68 65 72 65 20 61 72 65 20 6e 6f 20 6f * There are no o
be90: 75 74 73 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 utstanding locks
bea0: 20 73 6f 20 77 65 20 63 61 6e 20 63 6c 6f 73 65 so we can close
beb0: 20 74 68 65 20 66 69 6c 65 20 69 6d 6d 65 64 69 the file immedi
bec0: 61 74 65 6c 79 20 2a 2f 0a 20 20 20 20 63 6c 6f ately */. clo
bed0: 73 65 28 69 64 2d 3e 68 29 3b 0a 20 20 7d 0a 20 se(id->h);. }.
bee0: 20 72 65 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f releaseLockInfo
bef0: 28 69 64 2d 3e 70 4c 6f 63 6b 29 3b 0a 20 20 72 (id->pLock);. r
bf00: 65 6c 65 61 73 65 4f 70 65 6e 43 6e 74 28 69 64 eleaseOpenCnt(id
bf10: 2d 3e 70 4f 70 65 6e 29 3b 0a 0a 20 20 73 71 6c ->pOpen);.. sql
bf20: 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 ite3OsLeaveMutex
bf30: 28 29 3b 0a 20 20 69 64 2d 3e 69 73 4f 70 65 6e ();. id->isOpen
bf40: 20 3d 20 30 3b 0a 20 20 54 52 41 43 45 32 28 22 = 0;. TRACE2("
bf50: 43 4c 4f 53 45 20 20 20 25 2d 33 64 5c 6e 22 2c CLOSE %-3d\n",
bf60: 20 69 64 2d 3e 68 29 3b 0a 20 20 4f 70 65 6e 43 id->h);. OpenC
bf70: 6f 75 6e 74 65 72 28 2d 31 29 3b 0a 20 20 73 71 ounter(-1);. sq
bf80: 6c 69 74 65 33 54 68 72 65 61 64 53 61 66 65 46 lite3ThreadSafeF
bf90: 72 65 65 28 69 64 29 3b 0a 20 20 2a 70 49 64 20 ree(id);. *pId
bfa0: 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 = 0;. return SQ
bfb0: 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a LITE_OK;.}../*.*
bfc0: 2a 20 54 75 72 6e 20 61 20 72 65 6c 61 74 69 76 * Turn a relativ
bfd0: 65 20 70 61 74 68 6e 61 6d 65 20 69 6e 74 6f 20 e pathname into
bfe0: 61 20 66 75 6c 6c 20 70 61 74 68 6e 61 6d 65 2e a full pathname.
bff0: 20 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 Return a point
c000: 65 72 0a 2a 2a 20 74 6f 20 74 68 65 20 66 75 6c er.** to the ful
c010: 6c 20 70 61 74 68 6e 61 6d 65 20 73 74 6f 72 65 l pathname store
c020: 64 20 69 6e 20 73 70 61 63 65 20 6f 62 74 61 69 d in space obtai
c030: 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d ned from sqliteM
c040: 61 6c 6c 6f 63 28 29 2e 0a 2a 2a 20 54 68 65 20 alloc()..** The
c050: 63 61 6c 6c 69 6e 67 20 66 75 6e 63 74 69 6f 6e calling function
c060: 20 69 73 20 72 65 73 70 6f 6e 73 69 62 6c 65 20 is responsible
c070: 66 6f 72 20 66 72 65 65 69 6e 67 20 74 68 69 73 for freeing this
c080: 20 73 70 61 63 65 20 6f 6e 63 65 20 69 74 0a 2a space once it.*
c090: 2a 20 69 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 6e * is no longer n
c0a0: 65 65 64 65 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a eeded..*/.char *
c0b0: 73 71 6c 69 74 65 33 55 6e 69 78 46 75 6c 6c 50 sqlite3UnixFullP
c0c0: 61 74 68 6e 61 6d 65 28 63 6f 6e 73 74 20 63 68 athname(const ch
c0d0: 61 72 20 2a 7a 52 65 6c 61 74 69 76 65 29 7b 0a ar *zRelative){.
c0e0: 20 20 63 68 61 72 20 2a 7a 46 75 6c 6c 20 3d 20 char *zFull =
c0f0: 30 3b 0a 20 20 69 66 28 20 7a 52 65 6c 61 74 69 0;. if( zRelati
c100: 76 65 5b 30 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 ve[0]=='/' ){.
c110: 20 20 73 71 6c 69 74 65 33 53 65 74 53 74 72 69 sqlite3SetStri
c120: 6e 67 28 26 7a 46 75 6c 6c 2c 20 7a 52 65 6c 61 ng(&zFull, zRela
c130: 74 69 76 65 2c 20 28 63 68 61 72 2a 29 30 29 3b tive, (char*)0);
c140: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 63 68 . }else{. ch
c150: 61 72 20 2a 7a 42 75 66 20 3d 20 73 71 6c 69 74 ar *zBuf = sqlit
c160: 65 4d 61 6c 6c 6f 63 28 35 30 30 30 29 3b 0a 20 eMalloc(5000);.
c170: 20 20 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 if( zBuf==0 )
c180: 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 30 {. return 0
c190: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 42 75 66 ;. }. zBuf
c1a0: 5b 30 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c [0] = 0;. sql
c1b0: 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 26 7a ite3SetString(&z
c1c0: 46 75 6c 6c 2c 20 67 65 74 63 77 64 28 7a 42 75 Full, getcwd(zBu
c1d0: 66 2c 20 35 30 30 30 29 2c 20 22 2f 22 2c 20 7a f, 5000), "/", z
c1e0: 52 65 6c 61 74 69 76 65 2c 0a 20 20 20 20 20 20 Relative,.
c1f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 (c
c200: 68 61 72 2a 29 30 29 3b 0a 20 20 20 20 73 71 6c har*)0);. sql
c210: 69 74 65 46 72 65 65 28 7a 42 75 66 29 3b 0a 20 iteFree(zBuf);.
c220: 20 7d 0a 0a 23 69 66 20 30 0a 20 20 2f 2a 0a 20 }..#if 0. /*.
c230: 20 2a 2a 20 52 65 6d 6f 76 65 20 22 2f 2e 2f 22 ** Remove "/./"
c240: 20 70 61 74 68 20 65 6c 65 6d 65 6e 74 73 20 61 path elements a
c250: 6e 64 20 63 6f 6e 76 65 72 74 20 22 2f 41 2f 2e nd convert "/A/.
c260: 2f 22 20 70 61 74 68 20 65 6c 65 6d 65 6e 74 73 /" path elements
c270: 0a 20 20 2a 2a 20 74 6f 20 6a 75 73 74 20 22 2f . ** to just "/
c280: 22 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 7a 46 ".. */. if( zF
c290: 75 6c 6c 20 29 7b 0a 20 20 20 20 69 6e 74 20 69 ull ){. int i
c2a0: 2c 20 6a 3b 0a 20 20 20 20 66 6f 72 28 69 3d 6a , j;. for(i=j
c2b0: 3d 30 3b 20 7a 46 75 6c 6c 5b 69 5d 3b 20 69 2b =0; zFull[i]; i+
c2c0: 2b 29 7b 0a 20 20 20 20 20 20 69 66 28 20 7a 46 +){. if( zF
c2d0: 75 6c 6c 5b 69 5d 3d 3d 27 2f 27 20 29 7b 0a 20 ull[i]=='/' ){.
c2e0: 20 20 20 20 20 20 20 69 66 28 20 7a 46 75 6c 6c if( zFull
c2f0: 5b 69 2b 31 5d 3d 3d 27 2f 27 20 29 20 63 6f 6e [i+1]=='/' ) con
c300: 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 20 20 69 tinue;. i
c310: 66 28 20 7a 46 75 6c 6c 5b 69 2b 31 5d 3d 3d 27 f( zFull[i+1]=='
c320: 2e 27 20 26 26 20 7a 46 75 6c 6c 5b 69 2b 32 5d .' && zFull[i+2]
c330: 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20 20 20 20 =='/' ){.
c340: 20 20 20 69 20 2b 3d 20 31 3b 0a 20 20 20 20 20 i += 1;.
c350: 20 20 20 20 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 continue;.
c360: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
c370: 20 69 66 28 20 7a 46 75 6c 6c 5b 69 2b 31 5d 3d if( zFull[i+1]=
c380: 3d 27 2e 27 20 26 26 20 7a 46 75 6c 6c 5b 69 2b ='.' && zFull[i+
c390: 32 5d 3d 3d 27 2e 27 20 26 26 20 7a 46 75 6c 6c 2]=='.' && zFull
c3a0: 5b 69 2b 33 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 [i+3]=='/' ){.
c3b0: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 6a while( j
c3c0: 3e 30 20 26 26 20 7a 46 75 6c 6c 5b 6a 2d 31 5d >0 && zFull[j-1]
c3d0: 21 3d 27 2f 27 20 29 7b 20 6a 2d 2d 3b 20 7d 0a !='/' ){ j--; }.
c3e0: 20 20 20 20 20 20 20 20 20 20 69 20 2b 3d 20 33 i += 3
c3f0: 3b 0a 20 20 20 20 20 20 20 20 20 20 63 6f 6e 74 ;. cont
c400: 69 6e 75 65 3b 0a 20 20 20 20 20 20 20 20 7d 0a inue;. }.
c410: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7a 46 }. zF
c420: 75 6c 6c 5b 6a 2b 2b 5d 20 3d 20 7a 46 75 6c 6c ull[j++] = zFull
c430: 5b 69 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a [i];. }. z
c440: 46 75 6c 6c 5b 6a 5d 20 3d 20 30 3b 0a 20 20 7d Full[j] = 0;. }
c450: 0a 23 65 6e 64 69 66 0a 0a 20 20 72 65 74 75 72 .#endif.. retur
c460: 6e 20 7a 46 75 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a n zFull;.}../*.*
c470: 2a 20 43 68 61 6e 67 65 20 74 68 65 20 76 61 6c * Change the val
c480: 75 65 20 6f 66 20 74 68 65 20 66 75 6c 6c 73 79 ue of the fullsy
c490: 6e 63 20 66 6c 61 67 20 69 6e 20 74 68 65 20 67 nc flag in the g
c4a0: 69 76 65 6e 20 66 69 6c 65 20 64 65 73 63 72 69 iven file descri
c4b0: 70 74 6f 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 ptor..*/.static
c4c0: 76 6f 69 64 20 75 6e 69 78 53 65 74 46 75 6c 6c void unixSetFull
c4d0: 53 79 6e 63 28 4f 73 46 69 6c 65 20 2a 69 64 2c Sync(OsFile *id,
c4e0: 20 69 6e 74 20 76 29 7b 0a 20 20 28 28 75 6e 69 int v){. ((uni
c4f0: 78 46 69 6c 65 2a 29 69 64 29 2d 3e 66 75 6c 6c xFile*)id)->full
c500: 53 79 6e 63 20 3d 20 76 3b 0a 7d 0a 0a 2f 2a 0a Sync = v;.}../*.
c510: 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 75 6e ** Return the un
c520: 64 65 72 6c 79 69 6e 67 20 66 69 6c 65 20 68 61 derlying file ha
c530: 6e 64 6c 65 20 66 6f 72 20 61 6e 20 4f 73 46 69 ndle for an OsFi
c540: 6c 65 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 le.*/.static int
c550: 20 75 6e 69 78 46 69 6c 65 48 61 6e 64 6c 65 28 unixFileHandle(
c560: 4f 73 46 69 6c 65 20 2a 69 64 29 7b 0a 20 20 72 OsFile *id){. r
c570: 65 74 75 72 6e 20 28 28 75 6e 69 78 46 69 6c 65 eturn ((unixFile
c580: 2a 29 69 64 29 2d 3e 68 3b 0a 7d 0a 0a 2f 2a 0a *)id)->h;.}../*.
c590: 2a 2a 20 52 65 74 75 72 6e 20 61 6e 20 69 6e 74 ** Return an int
c5a0: 65 67 65 72 20 74 68 61 74 20 69 6e 64 69 63 65 eger that indice
c5b0: 73 20 74 68 65 20 74 79 70 65 20 6f 66 20 6c 6f s the type of lo
c5c0: 63 6b 20 63 75 72 72 65 6e 74 6c 79 20 68 65 6c ck currently hel
c5d0: 64 0a 2a 2a 20 62 79 20 74 68 69 73 20 68 61 6e d.** by this han
c5e0: 64 6c 65 2e 20 20 28 55 73 65 64 20 66 6f 72 20 dle. (Used for
c5f0: 74 65 73 74 69 6e 67 20 61 6e 64 20 61 6e 61 6c testing and anal
c600: 79 73 69 73 20 6f 6e 6c 79 2e 29 0a 2a 2f 0a 73 ysis only.).*/.s
c610: 74 61 74 69 63 20 69 6e 74 20 75 6e 69 78 4c 6f tatic int unixLo
c620: 63 6b 53 74 61 74 65 28 4f 73 46 69 6c 65 20 2a ckState(OsFile *
c630: 69 64 29 7b 0a 20 20 72 65 74 75 72 6e 20 28 28 id){. return ((
c640: 75 6e 69 78 46 69 6c 65 2a 29 69 64 29 2d 3e 6c unixFile*)id)->l
c650: 6f 63 6b 74 79 70 65 3b 0a 7d 0a 0a 2f 2a 0a 2a ocktype;.}../*.*
c660: 2a 20 54 68 69 73 20 76 65 63 74 6f 72 20 64 65 * This vector de
c670: 66 69 6e 65 73 20 61 6c 6c 20 74 68 65 20 6d 65 fines all the me
c680: 74 68 6f 64 73 20 74 68 61 74 20 63 61 6e 20 6f thods that can o
c690: 70 65 72 61 74 65 20 6f 6e 20 61 6e 20 4f 73 46 perate on an OsF
c6a0: 69 6c 65 0a 2a 2a 20 66 6f 72 20 75 6e 69 78 2e ile.** for unix.
c6b0: 0a 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 .*/.static const
c6c0: 20 49 6f 4d 65 74 68 6f 64 20 73 71 6c 69 74 65 IoMethod sqlite
c6d0: 33 55 6e 69 78 49 6f 4d 65 74 68 6f 64 20 3d 20 3UnixIoMethod =
c6e0: 7b 0a 20 20 75 6e 69 78 43 6c 6f 73 65 2c 0a 20 {. unixClose,.
c6f0: 20 75 6e 69 78 4f 70 65 6e 44 69 72 65 63 74 6f unixOpenDirecto
c700: 72 79 2c 0a 20 20 75 6e 69 78 52 65 61 64 2c 0a ry,. unixRead,.
c710: 20 20 75 6e 69 78 57 72 69 74 65 2c 0a 20 20 75 unixWrite,. u
c720: 6e 69 78 53 65 65 6b 2c 0a 20 20 75 6e 69 78 54 nixSeek,. unixT
c730: 72 75 6e 63 61 74 65 2c 0a 20 20 75 6e 69 78 53 runcate,. unixS
c740: 79 6e 63 2c 0a 20 20 75 6e 69 78 53 65 74 46 75 ync,. unixSetFu
c750: 6c 6c 53 79 6e 63 2c 0a 20 20 75 6e 69 78 46 69 llSync,. unixFi
c760: 6c 65 48 61 6e 64 6c 65 2c 0a 20 20 75 6e 69 78 leHandle,. unix
c770: 46 69 6c 65 53 69 7a 65 2c 0a 20 20 75 6e 69 78 FileSize,. unix
c780: 4c 6f 63 6b 2c 0a 20 20 75 6e 69 78 55 6e 6c 6f Lock,. unixUnlo
c790: 63 6b 2c 0a 20 20 75 6e 69 78 4c 6f 63 6b 53 74 ck,. unixLockSt
c7a0: 61 74 65 2c 0a 20 20 75 6e 69 78 43 68 65 63 6b ate,. unixCheck
c7b0: 52 65 73 65 72 76 65 64 4c 6f 63 6b 2c 0a 7d 3b ReservedLock,.};
c7c0: 0a 0a 2f 2a 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 ../*.** Allocate
c7d0: 20 6d 65 6d 6f 72 79 20 66 6f 72 20 61 20 75 6e memory for a un
c7e0: 69 78 46 69 6c 65 2e 20 20 49 6e 69 74 69 61 6c ixFile. Initial
c7f0: 69 7a 65 20 74 68 65 20 6e 65 77 20 75 6e 69 78 ize the new unix
c800: 46 69 6c 65 0a 2a 2a 20 74 6f 20 74 68 65 20 76 File.** to the v
c810: 61 6c 75 65 20 67 69 76 65 6e 20 69 6e 20 70 49 alue given in pI
c820: 6e 69 74 20 61 6e 64 20 72 65 74 75 72 6e 20 61 nit and return a
c830: 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 20 pointer to the
c840: 6e 65 77 0a 2a 2a 20 4f 73 46 69 6c 65 2e 20 20 new.** OsFile.
c850: 49 66 20 77 65 20 72 75 6e 20 6f 75 74 20 6f 66 If we run out of
c860: 20 6d 65 6d 6f 72 79 2c 20 63 6c 6f 73 65 20 74 memory, close t
c870: 68 65 20 66 69 6c 65 20 61 6e 64 20 72 65 74 75 he file and retu
c880: 72 6e 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 rn NULL..*/.stat
c890: 69 63 20 69 6e 74 20 61 6c 6c 6f 63 61 74 65 55 ic int allocateU
c8a0: 6e 69 78 46 69 6c 65 28 75 6e 69 78 46 69 6c 65 nixFile(unixFile
c8b0: 20 2a 70 49 6e 69 74 2c 20 4f 73 46 69 6c 65 20 *pInit, OsFile
c8c0: 2a 2a 70 49 64 29 7b 0a 20 20 75 6e 69 78 46 69 **pId){. unixFi
c8d0: 6c 65 20 2a 70 4e 65 77 3b 0a 20 20 70 49 6e 69 le *pNew;. pIni
c8e0: 74 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b 0a 20 t->dirfd = -1;.
c8f0: 20 70 49 6e 69 74 2d 3e 66 75 6c 6c 53 79 6e 63 pInit->fullSync
c900: 20 3d 20 30 3b 0a 20 20 70 49 6e 69 74 2d 3e 6c = 0;. pInit->l
c910: 6f 63 6b 74 79 70 65 20 3d 20 30 3b 0a 20 20 70 ocktype = 0;. p
c920: 49 6e 69 74 2d 3e 6f 66 66 73 65 74 20 3d 20 30 Init->offset = 0
c930: 3b 0a 20 20 53 45 54 5f 54 48 52 45 41 44 49 44 ;. SET_THREADID
c940: 28 70 49 6e 69 74 29 3b 0a 20 20 70 4e 65 77 20 (pInit);. pNew
c950: 3d 20 73 71 6c 69 74 65 33 54 68 72 65 61 64 53 = sqlite3ThreadS
c960: 61 66 65 4d 61 6c 6c 6f 63 28 20 73 69 7a 65 6f afeMalloc( sizeo
c970: 66 28 75 6e 69 78 46 69 6c 65 29 20 29 3b 0a 20 f(unixFile) );.
c980: 20 69 66 28 20 70 4e 65 77 3d 3d 30 20 29 7b 0a if( pNew==0 ){.
c990: 20 20 20 20 63 6c 6f 73 65 28 70 49 6e 69 74 2d close(pInit-
c9a0: 3e 68 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 >h);. sqlite3
c9b0: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a OsEnterMutex();.
c9c0: 20 20 20 20 72 65 6c 65 61 73 65 4c 6f 63 6b 49 releaseLockI
c9d0: 6e 66 6f 28 70 49 6e 69 74 2d 3e 70 4c 6f 63 6b nfo(pInit->pLock
c9e0: 29 3b 0a 20 20 20 20 72 65 6c 65 61 73 65 4f 70 );. releaseOp
c9f0: 65 6e 43 6e 74 28 70 49 6e 69 74 2d 3e 70 4f 70 enCnt(pInit->pOp
ca00: 65 6e 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 en);. sqlite3
ca10: 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a OsLeaveMutex();.
ca20: 20 20 20 20 2a 70 49 64 20 3d 20 30 3b 0a 20 20 *pId = 0;.
ca30: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
ca40: 4e 4f 4d 45 4d 3b 0a 20 20 7d 65 6c 73 65 7b 0a NOMEM;. }else{.
ca50: 20 20 20 20 2a 70 4e 65 77 20 3d 20 2a 70 49 6e *pNew = *pIn
ca60: 69 74 3b 0a 20 20 20 20 70 4e 65 77 2d 3e 70 4d it;. pNew->pM
ca70: 65 74 68 6f 64 20 3d 20 26 73 71 6c 69 74 65 33 ethod = &sqlite3
ca80: 55 6e 69 78 49 6f 4d 65 74 68 6f 64 3b 0a 20 20 UnixIoMethod;.
ca90: 20 20 2a 70 49 64 20 3d 20 28 4f 73 46 69 6c 65 *pId = (OsFile
caa0: 2a 29 70 4e 65 77 3b 0a 20 20 20 20 4f 70 65 6e *)pNew;. Open
cab0: 43 6f 75 6e 74 65 72 28 2b 31 29 3b 0a 20 20 20 Counter(+1);.
cac0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f return SQLITE_O
cad0: 4b 3b 0a 20 20 7d 0a 7d 0a 0a 0a 23 65 6e 64 69 K;. }.}...#endi
cae0: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 f /* SQLITE_OMIT
caf0: 5f 44 49 53 4b 49 4f 20 2a 2f 0a 2f 2a 2a 2a 2a _DISKIO */./****
cb00: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cb10: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cb20: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cb30: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cb40: 2a 2a 2a 2a 2a 2a 2a 0a 2a 2a 20 45 76 65 72 79 *******.** Every
cb50: 74 68 69 6e 67 20 61 62 6f 76 65 20 64 65 61 6c thing above deal
cb60: 73 20 77 69 74 68 20 66 69 6c 65 20 49 2f 4f 2e s with file I/O.
cb70: 20 20 45 76 65 72 79 74 68 69 6e 67 20 74 68 61 Everything tha
cb80: 74 20 66 6f 6c 6c 6f 77 73 20 64 65 61 6c 73 0a t follows deals.
cb90: 2a 2a 20 77 69 74 68 20 6f 74 68 65 72 20 6d 69 ** with other mi
cba0: 73 63 65 6c 6c 61 6e 6f 75 73 20 61 73 70 65 63 scellanous aspec
cbb0: 74 73 20 6f 66 20 74 68 65 20 6f 70 65 72 61 74 ts of the operat
cbc0: 69 6e 67 20 73 79 73 74 65 6d 20 69 6e 74 65 72 ing system inter
cbd0: 66 61 63 65 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a face.***********
cbe0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cbf0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cc00: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cc10: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
cc20: 2a 2f 0a 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20 69 */.../*.** Get i
cc30: 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 6f 20 73 65 nformation to se
cc40: 65 64 20 74 68 65 20 72 61 6e 64 6f 6d 20 6e 75 ed the random nu
cc50: 6d 62 65 72 20 67 65 6e 65 72 61 74 6f 72 2e 20 mber generator.
cc60: 20 54 68 65 20 73 65 65 64 0a 2a 2a 20 69 73 20 The seed.** is
cc70: 77 72 69 74 74 65 6e 20 69 6e 74 6f 20 74 68 65 written into the
cc80: 20 62 75 66 66 65 72 20 7a 42 75 66 5b 32 35 36 buffer zBuf[256
cc90: 5d 2e 20 20 54 68 65 20 63 61 6c 6c 69 6e 67 20 ]. The calling
cca0: 66 75 6e 63 74 69 6f 6e 20 6d 75 73 74 0a 2a 2a function must.**
ccb0: 20 73 75 70 70 6c 79 20 61 20 73 75 66 66 69 63 supply a suffic
ccc0: 69 65 6e 74 6c 79 20 6c 61 72 67 65 20 62 75 66 iently large buf
ccd0: 66 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 fer..*/.int sqli
cce0: 74 65 33 55 6e 69 78 52 61 6e 64 6f 6d 53 65 65 te3UnixRandomSee
ccf0: 64 28 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a 20 d(char *zBuf){.
cd00: 20 2f 2a 20 57 65 20 68 61 76 65 20 74 6f 20 69 /* We have to i
cd10: 6e 69 74 69 61 6c 69 7a 65 20 7a 42 75 66 20 74 nitialize zBuf t
cd20: 6f 20 70 72 65 76 65 6e 74 20 76 61 6c 67 72 69 o prevent valgri
cd30: 6e 64 20 66 72 6f 6d 20 72 65 70 6f 72 74 69 6e nd from reportin
cd40: 67 0a 20 20 2a 2a 20 65 72 72 6f 72 73 2e 20 20 g. ** errors.
cd50: 54 68 65 20 72 65 70 6f 72 74 73 20 69 73 73 75 The reports issu
cd60: 65 64 20 62 79 20 76 61 6c 67 72 69 6e 64 20 61 ed by valgrind a
cd70: 72 65 20 69 6e 63 6f 72 72 65 63 74 20 2d 20 77 re incorrect - w
cd80: 65 20 77 6f 75 6c 64 0a 20 20 2a 2a 20 70 72 65 e would. ** pre
cd90: 66 65 72 20 74 68 61 74 20 74 68 65 20 72 61 6e fer that the ran
cda0: 64 6f 6d 6e 65 73 73 20 62 65 20 69 6e 63 72 65 domness be incre
cdb0: 61 73 65 64 20 62 79 20 6d 61 6b 69 6e 67 20 75 ased by making u
cdc0: 73 65 20 6f 66 20 74 68 65 0a 20 20 2a 2a 20 75 se of the. ** u
cdd0: 6e 69 6e 69 74 69 61 6c 69 7a 65 64 20 73 70 61 ninitialized spa
cde0: 63 65 20 69 6e 20 7a 42 75 66 20 2d 20 62 75 74 ce in zBuf - but
cdf0: 20 76 61 6c 67 72 69 6e 64 20 65 72 72 6f 72 73 valgrind errors
ce00: 20 74 65 6e 64 20 74 6f 20 77 6f 72 72 79 0a 20 tend to worry.
ce10: 20 2a 2a 20 73 6f 6d 65 20 75 73 65 72 73 2e 20 ** some users.
ce20: 20 52 61 74 68 65 72 20 74 68 61 6e 20 61 72 67 Rather than arg
ce30: 75 65 2c 20 69 74 20 73 65 65 6d 73 20 65 61 73 ue, it seems eas
ce40: 69 65 72 20 6a 75 73 74 20 74 6f 20 69 6e 69 74 ier just to init
ce50: 69 61 6c 69 7a 65 0a 20 20 2a 2a 20 74 68 65 20 ialize. ** the
ce60: 77 68 6f 6c 65 20 61 72 72 61 79 20 61 6e 64 20 whole array and
ce70: 73 69 6c 65 6e 63 65 20 76 61 6c 67 72 69 6e 64 silence valgrind
ce80: 2c 20 65 76 65 6e 20 69 66 20 74 68 61 74 20 6d , even if that m
ce90: 65 61 6e 73 20 6c 65 73 73 20 72 61 6e 64 6f 6d eans less random
cea0: 6e 65 73 73 0a 20 20 2a 2a 20 69 6e 20 74 68 65 ness. ** in the
ceb0: 20 72 61 6e 64 6f 6d 20 73 65 65 64 2e 0a 20 20 random seed..
cec0: 2a 2a 0a 20 20 2a 2a 20 57 68 65 6e 20 74 65 73 **. ** When tes
ced0: 74 69 6e 67 2c 20 69 6e 69 74 69 61 6c 69 7a 69 ting, initializi
cee0: 6e 67 20 7a 42 75 66 5b 5d 20 74 6f 20 7a 65 72 ng zBuf[] to zer
cef0: 6f 20 69 73 20 61 6c 6c 20 77 65 20 64 6f 2e 20 o is all we do.
cf00: 20 54 68 61 74 20 6d 65 61 6e 73 0a 20 20 2a 2a That means. **
cf10: 20 74 68 61 74 20 77 65 20 61 6c 77 61 79 73 20 that we always
cf20: 75 73 65 20 74 68 65 20 73 61 6d 65 20 72 61 6e use the same ran
cf30: 64 6f 6d 20 6e 75 6d 62 65 72 20 73 65 71 75 65 dom number seque
cf40: 6e 63 65 2e 20 20 54 68 69 73 20 6d 61 6b 65 73 nce. This makes
cf50: 20 74 68 65 0a 20 20 2a 2a 20 74 65 73 74 73 20 the. ** tests
cf60: 72 65 70 65 61 74 61 62 6c 65 2e 0a 20 20 2a 2f repeatable.. */
cf70: 0a 20 20 6d 65 6d 73 65 74 28 7a 42 75 66 2c 20 . memset(zBuf,
cf80: 30 2c 20 32 35 36 29 3b 0a 23 69 66 20 21 64 65 0, 256);.#if !de
cf90: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 54 45 53 fined(SQLITE_TES
cfa0: 54 29 0a 20 20 7b 0a 20 20 20 20 69 6e 74 20 70 T). {. int p
cfb0: 69 64 2c 20 66 64 3b 0a 20 20 20 20 66 64 20 3d id, fd;. fd =
cfc0: 20 6f 70 65 6e 28 22 2f 64 65 76 2f 75 72 61 6e open("/dev/uran
cfd0: 64 6f 6d 22 2c 20 4f 5f 52 44 4f 4e 4c 59 29 3b dom", O_RDONLY);
cfe0: 0a 20 20 20 20 69 66 28 20 66 64 3c 30 20 29 7b . if( fd<0 ){
cff0: 0a 20 20 20 20 20 20 74 69 6d 65 5f 74 20 74 3b . time_t t;
d000: 0a 20 20 20 20 20 20 74 69 6d 65 28 26 74 29 3b . time(&t);
d010: 0a 20 20 20 20 20 20 6d 65 6d 63 70 79 28 7a 42 . memcpy(zB
d020: 75 66 2c 20 26 74 2c 20 73 69 7a 65 6f 66 28 74 uf, &t, sizeof(t
d030: 29 29 3b 0a 20 20 20 20 20 20 70 69 64 20 3d 20 ));. pid =
d040: 67 65 74 70 69 64 28 29 3b 0a 20 20 20 20 20 20 getpid();.
d050: 6d 65 6d 63 70 79 28 26 7a 42 75 66 5b 73 69 7a memcpy(&zBuf[siz
d060: 65 6f 66 28 74 69 6d 65 5f 74 29 5d 2c 20 26 70 eof(time_t)], &p
d070: 69 64 2c 20 73 69 7a 65 6f 66 28 70 69 64 29 29 id, sizeof(pid))
d080: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 ;. }else{.
d090: 20 20 20 72 65 61 64 28 66 64 2c 20 7a 42 75 66 read(fd, zBuf
d0a0: 2c 20 32 35 36 29 3b 0a 20 20 20 20 20 20 63 6c , 256);. cl
d0b0: 6f 73 65 28 66 64 29 3b 0a 20 20 20 20 7d 0a 20 ose(fd);. }.
d0c0: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75 }.#endif. retu
d0d0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a rn SQLITE_OK;.}.
d0e0: 0a 2f 2a 0a 2a 2a 20 53 6c 65 65 70 20 66 6f 72 ./*.** Sleep for
d0f0: 20 61 20 6c 69 74 74 6c 65 20 77 68 69 6c 65 2e a little while.
d100: 20 20 52 65 74 75 72 6e 20 74 68 65 20 61 6d 6f Return the amo
d110: 75 6e 74 20 6f 66 20 74 69 6d 65 20 73 6c 65 70 unt of time slep
d120: 74 2e 0a 2a 2a 20 54 68 65 20 61 72 67 75 6d 65 t..** The argume
d130: 6e 74 20 69 73 20 74 68 65 20 6e 75 6d 62 65 72 nt is the number
d140: 20 6f 66 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 of milliseconds
d150: 20 77 65 20 77 61 6e 74 20 74 6f 20 73 6c 65 65 we want to slee
d160: 70 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 p..*/.int sqlite
d170: 33 55 6e 69 78 53 6c 65 65 70 28 69 6e 74 20 6d 3UnixSleep(int m
d180: 73 29 7b 0a 23 69 66 20 64 65 66 69 6e 65 64 28 s){.#if defined(
d190: 48 41 56 45 5f 55 53 4c 45 45 50 29 20 26 26 20 HAVE_USLEEP) &&
d1a0: 48 41 56 45 5f 55 53 4c 45 45 50 0a 20 20 75 73 HAVE_USLEEP. us
d1b0: 6c 65 65 70 28 6d 73 2a 31 30 30 30 29 3b 0a 20 leep(ms*1000);.
d1c0: 20 72 65 74 75 72 6e 20 6d 73 3b 0a 23 65 6c 73 return ms;.#els
d1d0: 65 0a 20 20 73 6c 65 65 70 28 28 6d 73 2b 39 39 e. sleep((ms+99
d1e0: 39 29 2f 31 30 30 30 29 3b 0a 20 20 72 65 74 75 9)/1000);. retu
d1f0: 72 6e 20 31 30 30 30 2a 28 28 6d 73 2b 39 39 39 rn 1000*((ms+999
d200: 29 2f 31 30 30 30 29 3b 0a 23 65 6e 64 69 66 0a )/1000);.#endif.
d210: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 74 61 74 69 63 20 }../*.** Static
d220: 76 61 72 69 61 62 6c 65 73 20 75 73 65 64 20 66 variables used f
d230: 6f 72 20 74 68 72 65 61 64 20 73 79 6e 63 68 72 or thread synchr
d240: 6f 6e 69 7a 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a onization..**.**
d250: 20 69 6e 4d 75 74 65 78 20 20 20 20 20 20 74 68 inMutex th
d260: 65 20 6e 65 73 74 69 6e 67 20 64 65 70 74 68 20 e nesting depth
d270: 6f 66 20 74 68 65 20 72 65 63 75 72 73 69 76 65 of the recursive
d280: 20 6d 75 74 65 78 2e 20 20 54 68 65 20 74 68 72 mutex. The thr
d290: 65 61 64 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 ead.**
d2a0: 20 20 20 20 68 6f 6c 64 69 6e 67 20 6d 75 74 65 holding mute
d2b0: 78 4d 61 69 6e 20 63 61 6e 20 72 65 61 64 20 74 xMain can read t
d2c0: 68 69 73 20 76 61 72 69 61 62 6c 65 20 61 74 20 his variable at
d2d0: 61 6e 79 20 74 69 6d 65 2e 0a 2a 2a 20 20 20 20 any time..**
d2e0: 20 20 20 20 20 20 20 20 20 20 42 75 74 20 69 73 But is
d2f0: 20 6d 75 73 74 20 68 6f 6c 64 20 6d 75 74 65 78 must hold mutex
d300: 41 75 78 20 74 6f 20 63 68 61 6e 67 65 20 74 68 Aux to change th
d310: 69 73 20 76 61 72 69 61 62 6c 65 2e 20 20 4f 74 is variable. Ot
d320: 68 65 72 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 her.**
d330: 20 20 20 20 74 68 72 65 61 64 73 20 6d 75 73 74 threads must
d340: 20 68 6f 6c 64 20 6d 75 74 65 78 41 75 78 20 74 hold mutexAux t
d350: 6f 20 72 65 61 64 20 74 68 65 20 76 61 72 69 61 o read the varia
d360: 62 6c 65 20 61 6e 64 20 63 61 6e 0a 2a 2a 20 20 ble and can.**
d370: 20 20 20 20 20 20 20 20 20 20 20 20 6e 65 76 65 neve
d380: 72 20 77 72 69 74 65 2e 0a 2a 2a 0a 2a 2a 20 6d r write..**.** m
d390: 75 74 65 78 4f 77 6e 65 72 20 20 20 54 68 65 20 utexOwner The
d3a0: 74 68 72 65 61 64 20 69 64 20 6f 66 20 74 68 65 thread id of the
d3b0: 20 74 68 72 65 61 64 20 68 6f 6c 64 69 6e 67 20 thread holding
d3c0: 6d 75 74 65 78 4d 61 69 6e 2e 20 20 53 61 6d 65 mutexMain. Same
d3d0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 .**
d3e0: 20 61 63 63 65 73 73 20 72 75 6c 65 73 20 61 73 access rules as
d3f0: 20 66 6f 72 20 69 6e 4d 75 74 65 78 2e 0a 2a 2a for inMutex..**
d400: 0a 2a 2a 20 6d 75 74 65 78 4f 77 6e 65 72 56 61 .** mutexOwnerVa
d410: 6c 69 64 20 20 20 54 72 75 65 20 69 66 20 74 68 lid True if th
d420: 65 20 76 61 6c 75 65 20 69 6e 20 6d 75 74 65 78 e value in mutex
d430: 4f 77 6e 65 72 20 69 73 20 76 61 6c 69 64 2e 20 Owner is valid.
d440: 20 54 68 65 20 73 61 6d 65 0a 2a 2a 20 20 20 20 The same.**
d450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 a
d460: 63 63 65 73 73 20 72 75 6c 65 73 20 61 70 70 6c ccess rules appl
d470: 79 20 61 73 20 66 6f 72 20 69 6e 4d 75 74 65 78 y as for inMutex
d480: 2e 0a 2a 2a 0a 2a 2a 20 6d 75 74 65 78 4d 61 69 ..**.** mutexMai
d490: 6e 20 20 20 20 54 68 65 20 6d 61 69 6e 20 6d 75 n The main mu
d4a0: 74 65 78 2e 20 20 48 6f 6c 64 20 74 68 69 73 20 tex. Hold this
d4b0: 6d 75 74 65 78 20 69 6e 20 6f 72 64 65 72 20 74 mutex in order t
d4c0: 6f 20 67 65 74 20 65 78 63 6c 75 73 69 76 65 0a o get exclusive.
d4d0: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
d4e0: 61 63 63 65 73 73 20 74 6f 20 53 51 4c 69 74 65 access to SQLite
d4f0: 20 64 61 74 61 20 73 74 72 75 63 74 75 72 65 73 data structures
d500: 2e 0a 2a 2a 0a 2a 2a 20 6d 75 74 65 78 41 75 78 ..**.** mutexAux
d510: 20 20 20 20 20 41 6e 20 61 75 78 69 6c 69 61 72 An auxiliar
d520: 79 20 6d 75 74 65 78 20 6e 65 65 64 65 64 20 74 y mutex needed t
d530: 6f 20 61 63 63 65 73 73 20 76 61 72 69 61 62 6c o access variabl
d540: 65 73 20 64 65 66 69 6e 65 64 20 61 62 6f 76 65 es defined above
d550: 2e 0a 2a 2a 0a 2a 2a 20 4d 75 74 65 78 65 73 20 ..**.** Mutexes
d560: 61 72 65 20 61 6c 77 61 79 73 20 61 63 71 75 69 are always acqui
d570: 72 65 64 20 69 6e 20 74 68 69 73 20 6f 72 64 65 red in this orde
d580: 72 3a 20 6d 75 74 65 78 4d 61 69 6e 20 6d 75 74 r: mutexMain mut
d590: 65 78 41 75 78 2e 20 20 20 49 74 0a 2a 2a 20 69 exAux. It.** i
d5a0: 73 20 6e 6f 74 20 6e 65 63 65 73 73 61 72 79 20 s not necessary
d5b0: 74 6f 20 61 63 71 75 69 72 65 20 6d 75 74 65 78 to acquire mutex
d5c0: 4d 61 69 6e 20 69 6e 20 6f 72 64 65 72 20 74 6f Main in order to
d5d0: 20 67 65 74 20 6d 75 74 65 78 41 75 78 20 2d 20 get mutexAux -
d5e0: 6a 75 73 74 0a 2a 2a 20 64 6f 20 6e 6f 74 20 61 just.** do not a
d5f0: 74 74 65 6d 70 74 20 74 6f 20 61 63 71 75 69 72 ttempt to acquir
d600: 65 20 74 68 65 6d 20 69 6e 20 74 68 65 20 72 65 e them in the re
d610: 76 65 72 73 65 20 6f 72 64 65 72 3a 20 6d 75 74 verse order: mut
d620: 65 78 41 75 78 20 6d 75 74 65 78 4d 61 69 6e 2e exAux mutexMain.
d630: 0a 2a 2a 20 45 69 74 68 65 72 20 67 65 74 20 74 .** Either get t
d640: 68 65 20 6d 75 74 65 78 65 73 20 77 69 74 68 20 he mutexes with
d650: 6d 75 74 65 78 4d 61 69 6e 20 66 69 72 73 74 20 mutexMain first
d660: 6f 72 20 67 65 74 20 6d 75 74 65 78 41 75 78 20 or get mutexAux
d670: 6f 6e 6c 79 2e 0a 2a 2a 0a 2a 2a 20 57 68 65 6e only..**.** When
d680: 20 72 75 6e 6e 69 6e 67 20 6f 6e 20 61 20 70 6c running on a pl
d690: 61 74 66 6f 72 6d 20 77 68 65 72 65 20 74 68 65 atform where the
d6a0: 20 74 68 72 65 65 20 76 61 72 69 61 62 6c 65 73 three variables
d6b0: 20 69 6e 4d 75 74 65 78 2c 20 6d 75 74 65 78 4f inMutex, mutexO
d6c0: 77 6e 65 72 2c 0a 2a 2a 20 61 6e 64 20 6d 75 74 wner,.** and mut
d6d0: 65 78 4f 77 6e 65 72 56 61 6c 69 64 20 63 61 6e exOwnerValid can
d6e0: 20 62 65 20 73 65 74 20 61 74 6f 6d 69 63 61 6c be set atomical
d6f0: 6c 79 2c 20 74 68 65 20 6d 75 74 65 78 41 75 78 ly, the mutexAux
d700: 20 69 73 20 6e 6f 74 20 72 65 71 75 69 72 65 64 is not required
d710: 2e 0a 2a 2a 20 4f 6e 20 6d 61 6e 79 20 73 79 73 ..** On many sys
d720: 74 65 6d 73 2c 20 61 6c 6c 20 74 68 72 65 65 20 tems, all three
d730: 61 72 65 20 33 32 2d 62 69 74 20 69 6e 74 65 67 are 32-bit integ
d740: 65 72 73 20 61 6e 64 20 77 72 69 74 69 6e 67 20 ers and writing
d750: 74 6f 20 61 20 33 32 2d 62 69 74 0a 2a 2a 20 69 to a 32-bit.** i
d760: 6e 74 65 67 65 72 20 69 73 20 61 74 6f 6d 69 63 nteger is atomic
d770: 2e 20 20 49 20 74 68 69 6e 6b 2e 20 20 42 75 74 . I think. But
d780: 20 74 68 65 72 65 20 61 72 65 20 6e 6f 20 67 75 there are no gu
d790: 61 72 61 6e 74 65 65 73 2e 20 20 53 6f 20 69 74 arantees. So it
d7a0: 20 73 65 65 6d 73 0a 2a 2a 20 73 61 66 65 72 20 seems.** safer
d7b0: 74 6f 20 70 72 6f 74 65 63 74 20 74 68 65 6d 20 to protect them
d7c0: 75 73 69 6e 67 20 6d 75 74 65 78 41 75 78 2e 0a using mutexAux..
d7d0: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 69 6e */.static int in
d7e0: 4d 75 74 65 78 20 3d 20 30 3b 0a 23 69 66 64 65 Mutex = 0;.#ifde
d7f0: 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 f SQLITE_UNIX_TH
d800: 52 45 41 44 53 0a 73 74 61 74 69 63 20 70 74 68 READS.static pth
d810: 72 65 61 64 5f 74 20 6d 75 74 65 78 4f 77 6e 65 read_t mutexOwne
d820: 72 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 r; /* T
d830: 68 72 65 61 64 20 68 6f 6c 64 69 6e 67 20 6d 75 hread holding mu
d840: 74 65 78 4d 61 69 6e 20 2a 2f 0a 73 74 61 74 69 texMain */.stati
d850: 63 20 69 6e 74 20 6d 75 74 65 78 4f 77 6e 65 72 c int mutexOwner
d860: 56 61 6c 69 64 20 3d 20 30 3b 20 20 20 20 20 20 Valid = 0;
d870: 20 2f 2a 20 54 72 75 65 20 69 66 20 6d 75 74 65 /* True if mute
d880: 78 4f 77 6e 65 72 20 69 73 20 76 61 6c 69 64 20 xOwner is valid
d890: 2a 2f 0a 73 74 61 74 69 63 20 70 74 68 72 65 61 */.static pthrea
d8a0: 64 5f 6d 75 74 65 78 5f 74 20 6d 75 74 65 78 4d d_mutex_t mutexM
d8b0: 61 69 6e 20 3d 20 50 54 48 52 45 41 44 5f 4d 55 ain = PTHREAD_MU
d8c0: 54 45 58 5f 49 4e 49 54 49 41 4c 49 5a 45 52 3b TEX_INITIALIZER;
d8d0: 20 2f 2a 20 54 68 65 20 6d 75 74 65 78 20 2a 2f /* The mutex */
d8e0: 0a 73 74 61 74 69 63 20 70 74 68 72 65 61 64 5f .static pthread_
d8f0: 6d 75 74 65 78 5f 74 20 6d 75 74 65 78 41 75 78 mutex_t mutexAux
d900: 20 3d 20 50 54 48 52 45 41 44 5f 4d 55 54 45 58 = PTHREAD_MUTEX
d910: 5f 49 4e 49 54 49 41 4c 49 5a 45 52 3b 20 20 2f _INITIALIZER; /
d920: 2a 20 41 75 78 20 6d 75 74 65 78 20 2a 2f 0a 23 * Aux mutex */.#
d930: 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 endif../*.** The
d940: 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 61 69 72 20 following pair
d950: 6f 66 20 72 6f 75 74 69 6e 65 20 69 6d 70 6c 65 of routine imple
d960: 6d 65 6e 74 20 6d 75 74 75 61 6c 20 65 78 63 6c ment mutual excl
d970: 75 73 69 6f 6e 20 66 6f 72 0a 2a 2a 20 6d 75 6c usion for.** mul
d980: 74 69 2d 74 68 72 65 61 64 65 64 20 70 72 6f 63 ti-threaded proc
d990: 65 73 73 65 73 2e 20 20 4f 6e 6c 79 20 61 20 73 esses. Only a s
d9a0: 69 6e 67 6c 65 20 74 68 72 65 61 64 20 69 73 20 ingle thread is
d9b0: 61 6c 6c 6f 77 65 64 20 74 6f 0a 2a 2a 20 65 78 allowed to.** ex
d9c0: 65 63 75 74 65 64 20 63 6f 64 65 20 74 68 61 74 ecuted code that
d9d0: 20 69 73 20 73 75 72 72 6f 75 6e 64 65 64 20 62 is surrounded b
d9e0: 79 20 45 6e 74 65 72 4d 75 74 65 78 28 29 20 61 y EnterMutex() a
d9f0: 6e 64 20 4c 65 61 76 65 4d 75 74 65 78 28 29 2e nd LeaveMutex().
da00: 0a 2a 2a 0a 2a 2a 20 53 51 4c 69 74 65 20 75 73 .**.** SQLite us
da10: 65 73 20 6f 6e 6c 79 20 61 20 73 69 6e 67 6c 65 es only a single
da20: 20 4d 75 74 65 78 2e 20 20 54 68 65 72 65 20 69 Mutex. There i
da30: 73 20 6e 6f 74 20 6d 75 63 68 20 63 72 69 74 69 s not much criti
da40: 63 61 6c 0a 2a 2a 20 63 6f 64 65 20 61 6e 64 20 cal.** code and
da50: 77 68 61 74 20 6c 69 74 74 6c 65 20 74 68 65 72 what little ther
da60: 65 20 69 73 20 65 78 65 63 75 74 65 73 20 71 75 e is executes qu
da70: 69 63 6b 6c 79 20 61 6e 64 20 77 69 74 68 6f 75 ickly and withou
da80: 74 20 62 6c 6f 63 6b 69 6e 67 2e 0a 2a 2a 0a 2a t blocking..**.*
da90: 2a 20 41 73 20 6f 66 20 76 65 72 73 69 6f 6e 20 * As of version
daa0: 33 2e 33 2e 32 2c 20 74 68 69 73 20 6d 75 74 65 3.3.2, this mute
dab0: 78 20 6d 75 73 74 20 62 65 20 72 65 63 75 72 73 x must be recurs
dac0: 69 76 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c ive..*/.void sql
dad0: 69 74 65 33 55 6e 69 78 45 6e 74 65 72 4d 75 74 ite3UnixEnterMut
dae0: 65 78 28 29 7b 0a 23 69 66 64 65 66 20 53 51 4c ex(){.#ifdef SQL
daf0: 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 ITE_UNIX_THREADS
db00: 0a 20 20 70 74 68 72 65 61 64 5f 6d 75 74 65 78 . pthread_mutex
db10: 5f 6c 6f 63 6b 28 26 6d 75 74 65 78 41 75 78 29 _lock(&mutexAux)
db20: 3b 0a 20 20 69 66 28 20 21 6d 75 74 65 78 4f 77 ;. if( !mutexOw
db30: 6e 65 72 56 61 6c 69 64 20 7c 7c 20 21 70 74 68 nerValid || !pth
db40: 72 65 61 64 5f 65 71 75 61 6c 28 6d 75 74 65 78 read_equal(mutex
db50: 4f 77 6e 65 72 2c 20 70 74 68 72 65 61 64 5f 73 Owner, pthread_s
db60: 65 6c 66 28 29 29 20 29 7b 0a 20 20 20 20 70 74 elf()) ){. pt
db70: 68 72 65 61 64 5f 6d 75 74 65 78 5f 75 6e 6c 6f hread_mutex_unlo
db80: 63 6b 28 26 6d 75 74 65 78 41 75 78 29 3b 0a 20 ck(&mutexAux);.
db90: 20 20 20 70 74 68 72 65 61 64 5f 6d 75 74 65 78 pthread_mutex
dba0: 5f 6c 6f 63 6b 28 26 6d 75 74 65 78 4d 61 69 6e _lock(&mutexMain
dbb0: 29 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 69 );. assert( i
dbc0: 6e 4d 75 74 65 78 3d 3d 30 20 29 3b 0a 20 20 20 nMutex==0 );.
dbd0: 20 61 73 73 65 72 74 28 20 21 6d 75 74 65 78 4f assert( !mutexO
dbe0: 77 6e 65 72 56 61 6c 69 64 20 29 3b 0a 20 20 20 wnerValid );.
dbf0: 20 70 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 6c pthread_mutex_l
dc00: 6f 63 6b 28 26 6d 75 74 65 78 41 75 78 29 3b 0a ock(&mutexAux);.
dc10: 20 20 20 20 6d 75 74 65 78 4f 77 6e 65 72 20 3d mutexOwner =
dc20: 20 70 74 68 72 65 61 64 5f 73 65 6c 66 28 29 3b pthread_self();
dc30: 0a 20 20 20 20 6d 75 74 65 78 4f 77 6e 65 72 56 . mutexOwnerV
dc40: 61 6c 69 64 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 alid = 1;. }.
dc50: 69 6e 4d 75 74 65 78 2b 2b 3b 0a 20 20 70 74 68 inMutex++;. pth
dc60: 72 65 61 64 5f 6d 75 74 65 78 5f 75 6e 6c 6f 63 read_mutex_unloc
dc70: 6b 28 26 6d 75 74 65 78 41 75 78 29 3b 0a 23 65 k(&mutexAux);.#e
dc80: 6c 73 65 0a 20 20 69 6e 4d 75 74 65 78 2b 2b 3b lse. inMutex++;
dc90: 0a 23 65 6e 64 69 66 0a 7d 0a 76 6f 69 64 20 73 .#endif.}.void s
dca0: 71 6c 69 74 65 33 55 6e 69 78 4c 65 61 76 65 4d qlite3UnixLeaveM
dcb0: 75 74 65 78 28 29 7b 0a 20 20 61 73 73 65 72 74 utex(){. assert
dcc0: 28 20 69 6e 4d 75 74 65 78 3e 30 20 29 3b 0a 23 ( inMutex>0 );.#
dcd0: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 ifdef SQLITE_UNI
dce0: 58 5f 54 48 52 45 41 44 53 0a 20 20 70 74 68 72 X_THREADS. pthr
dcf0: 65 61 64 5f 6d 75 74 65 78 5f 6c 6f 63 6b 28 26 ead_mutex_lock(&
dd00: 6d 75 74 65 78 41 75 78 29 3b 0a 20 20 69 6e 4d mutexAux);. inM
dd10: 75 74 65 78 2d 2d 3b 0a 20 20 61 73 73 65 72 74 utex--;. assert
dd20: 28 20 70 74 68 72 65 61 64 5f 65 71 75 61 6c 28 ( pthread_equal(
dd30: 6d 75 74 65 78 4f 77 6e 65 72 2c 20 70 74 68 72 mutexOwner, pthr
dd40: 65 61 64 5f 73 65 6c 66 28 29 29 20 29 3b 0a 20 ead_self()) );.
dd50: 20 69 66 28 20 69 6e 4d 75 74 65 78 3d 3d 30 20 if( inMutex==0
dd60: 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28 20 6d ){. assert( m
dd70: 75 74 65 78 4f 77 6e 65 72 56 61 6c 69 64 20 29 utexOwnerValid )
dd80: 3b 0a 20 20 20 20 6d 75 74 65 78 4f 77 6e 65 72 ;. mutexOwner
dd90: 56 61 6c 69 64 20 3d 20 30 3b 0a 20 20 20 20 70 Valid = 0;. p
dda0: 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 75 6e 6c thread_mutex_unl
ddb0: 6f 63 6b 28 26 6d 75 74 65 78 4d 61 69 6e 29 3b ock(&mutexMain);
ddc0: 0a 20 20 7d 0a 20 20 70 74 68 72 65 61 64 5f 6d . }. pthread_m
ddd0: 75 74 65 78 5f 75 6e 6c 6f 63 6b 28 26 6d 75 74 utex_unlock(&mut
dde0: 65 78 41 75 78 29 3b 0a 23 65 6c 73 65 0a 20 20 exAux);.#else.
ddf0: 69 6e 4d 75 74 65 78 2d 2d 3b 0a 23 65 6e 64 69 inMutex--;.#endi
de00: 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 f.}../*.** Retur
de10: 6e 20 54 52 55 45 20 69 66 20 74 68 65 20 6d 75 n TRUE if the mu
de20: 74 65 78 20 69 73 20 63 75 72 72 65 6e 74 6c 79 tex is currently
de30: 20 68 65 6c 64 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 held..**.** If
de40: 74 68 65 20 74 68 69 73 54 68 72 64 20 70 61 72 the thisThrd par
de50: 61 6d 65 74 65 72 20 69 73 20 74 72 75 65 2c 20 ameter is true,
de60: 72 65 74 75 72 6e 20 74 72 75 65 20 6f 6e 6c 79 return true only
de70: 20 69 66 20 74 68 65 0a 2a 2a 20 63 61 6c 6c 69 if the.** calli
de80: 6e 67 20 74 68 72 65 61 64 20 68 6f 6c 64 73 20 ng thread holds
de90: 74 68 65 20 6d 75 74 65 78 2e 20 20 49 66 20 74 the mutex. If t
dea0: 68 65 20 70 61 72 61 6d 65 74 65 72 20 69 73 20 he parameter is
deb0: 66 61 6c 73 65 2c 20 72 65 74 75 72 6e 0a 2a 2a false, return.**
dec0: 20 74 72 75 65 20 69 66 20 61 6e 79 20 74 68 72 true if any thr
ded0: 65 61 64 20 68 6f 6c 64 73 20 74 68 65 20 6d 75 ead holds the mu
dee0: 74 65 78 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 tex..*/.int sqli
def0: 74 65 33 55 6e 69 78 49 6e 4d 75 74 65 78 28 69 te3UnixInMutex(i
df00: 6e 74 20 74 68 69 73 54 68 72 64 29 7b 0a 23 69 nt thisThrd){.#i
df10: 66 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 fdef SQLITE_UNIX
df20: 5f 54 48 52 45 41 44 53 0a 20 20 69 6e 74 20 72 _THREADS. int r
df30: 63 3b 0a 20 20 70 74 68 72 65 61 64 5f 6d 75 74 c;. pthread_mut
df40: 65 78 5f 6c 6f 63 6b 28 26 6d 75 74 65 78 41 75 ex_lock(&mutexAu
df50: 78 29 3b 0a 20 20 72 63 20 3d 20 69 6e 4d 75 74 x);. rc = inMut
df60: 65 78 3e 30 20 26 26 20 28 74 68 69 73 54 68 72 ex>0 && (thisThr
df70: 64 3d 3d 30 20 7c 7c 20 70 74 68 72 65 61 64 5f d==0 || pthread_
df80: 65 71 75 61 6c 28 6d 75 74 65 78 4f 77 6e 65 72 equal(mutexOwner
df90: 2c 70 74 68 72 65 61 64 5f 73 65 6c 66 28 29 29 ,pthread_self())
dfa0: 29 3b 0a 20 20 70 74 68 72 65 61 64 5f 6d 75 74 );. pthread_mut
dfb0: 65 78 5f 75 6e 6c 6f 63 6b 28 26 6d 75 74 65 78 ex_unlock(&mutex
dfc0: 41 75 78 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 Aux);. return r
dfd0: 63 3b 0a 23 65 6c 73 65 0a 20 20 72 65 74 75 72 c;.#else. retur
dfe0: 6e 20 69 6e 4d 75 74 65 78 3e 30 3b 0a 23 65 6e n inMutex>0;.#en
dff0: 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6d dif.}../*.** Rem
e000: 65 6d 62 65 72 20 74 68 65 20 6e 75 6d 62 65 72 ember the number
e010: 20 6f 66 20 74 68 72 65 61 64 2d 73 70 65 63 69 of thread-speci
e020: 66 69 63 2d 64 61 74 61 20 62 6c 6f 63 6b 73 20 fic-data blocks
e030: 61 6c 6c 6f 63 61 74 65 64 2e 0a 2a 2a 20 55 73 allocated..** Us
e040: 65 20 74 68 69 73 20 74 6f 20 76 65 72 69 66 79 e this to verify
e050: 20 74 68 61 74 20 77 65 20 61 72 65 20 6e 6f 74 that we are not
e060: 20 6c 65 61 6b 69 6e 67 20 74 68 72 65 61 64 2d leaking thread-
e070: 73 70 65 63 69 66 69 63 2d 64 61 74 61 2e 0a 2a specific-data..*
e080: 2a 20 54 69 63 6b 65 74 20 23 31 36 30 31 0a 2a * Ticket #1601.*
e090: 2f 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f /.#ifdef SQLITE_
e0a0: 54 45 53 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 TEST.int sqlite3
e0b0: 5f 74 73 64 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a _tsd_count = 0;.
e0c0: 23 20 69 66 64 65 66 20 53 51 4c 49 54 45 5f 55 # ifdef SQLITE_U
e0d0: 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20 20 20 NIX_THREADS.
e0e0: 73 74 61 74 69 63 20 70 74 68 72 65 61 64 5f 6d static pthread_m
e0f0: 75 74 65 78 5f 74 20 74 73 64 5f 63 6f 75 6e 74 utex_t tsd_count
e100: 65 72 5f 6d 75 74 65 78 20 3d 20 50 54 48 52 45 er_mutex = PTHRE
e110: 41 44 5f 4d 55 54 45 58 5f 49 4e 49 54 49 41 4c AD_MUTEX_INITIAL
e120: 49 5a 45 52 3b 0a 23 20 20 20 64 65 66 69 6e 65 IZER;.# define
e130: 20 54 53 44 5f 43 4f 55 4e 54 45 52 28 4e 29 20 TSD_COUNTER(N)
e140: 5c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 70 \. p
e150: 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 6c 6f 63 thread_mutex_loc
e160: 6b 28 26 74 73 64 5f 63 6f 75 6e 74 65 72 5f 6d k(&tsd_counter_m
e170: 75 74 65 78 29 3b 20 5c 0a 20 20 20 20 20 20 20 utex); \.
e180: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 74 73 sqlite3_ts
e190: 64 5f 63 6f 75 6e 74 20 2b 3d 20 4e 3b 20 5c 0a d_count += N; \.
e1a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 70 74 68 pth
e1b0: 72 65 61 64 5f 6d 75 74 65 78 5f 75 6e 6c 6f 63 read_mutex_unloc
e1c0: 6b 28 26 74 73 64 5f 63 6f 75 6e 74 65 72 5f 6d k(&tsd_counter_m
e1d0: 75 74 65 78 29 3b 0a 23 20 65 6c 73 65 0a 23 20 utex);.# else.#
e1e0: 20 20 64 65 66 69 6e 65 20 54 53 44 5f 43 4f 55 define TSD_COU
e1f0: 4e 54 45 52 28 4e 29 20 20 73 71 6c 69 74 65 33 NTER(N) sqlite3
e200: 5f 74 73 64 5f 63 6f 75 6e 74 20 2b 3d 20 4e 0a _tsd_count += N.
e210: 23 20 65 6e 64 69 66 0a 23 65 6c 73 65 0a 23 20 # endif.#else.#
e220: 64 65 66 69 6e 65 20 54 53 44 5f 43 4f 55 4e 54 define TSD_COUNT
e230: 45 52 28 4e 29 20 20 2f 2a 20 6e 6f 2d 6f 70 20 ER(N) /* no-op
e240: 2a 2f 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a */.#endif../*.**
e250: 20 49 66 20 63 61 6c 6c 65 64 20 77 69 74 68 20 If called with
e260: 61 6c 6c 6f 63 61 74 65 46 6c 61 67 3e 30 2c 20 allocateFlag>0,
e270: 74 68 65 6e 20 72 65 74 75 72 6e 20 61 20 70 6f then return a po
e280: 69 6e 74 65 72 20 74 6f 20 74 68 72 65 61 64 0a inter to thread.
e290: 2a 2a 20 73 70 65 63 69 66 69 63 20 64 61 74 61 ** specific data
e2a0: 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 for the current
e2b0: 20 74 68 72 65 61 64 2e 20 20 41 6c 6c 6f 63 61 thread. Alloca
e2c0: 74 65 20 61 6e 64 20 7a 65 72 6f 20 74 68 65 0a te and zero the.
e2d0: 2a 2a 20 74 68 72 65 61 64 2d 73 70 65 63 69 66 ** thread-specif
e2e0: 69 63 20 64 61 74 61 20 69 66 20 69 74 20 64 6f ic data if it do
e2f0: 65 73 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 65 es not already e
e300: 78 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 63 xist..**.** If c
e310: 61 6c 6c 65 64 20 77 69 74 68 20 61 6c 6c 6f 63 alled with alloc
e320: 61 74 65 46 6c 61 67 3d 3d 30 2c 20 74 68 65 6e ateFlag==0, then
e330: 20 63 68 65 63 6b 20 74 68 65 20 63 75 72 72 65 check the curre
e340: 6e 74 20 74 68 72 65 61 64 0a 2a 2a 20 73 70 65 nt thread.** spe
e350: 63 69 66 69 63 20 64 61 74 61 2e 20 20 52 65 74 cific data. Ret
e360: 75 72 6e 20 69 74 20 69 66 20 69 74 20 65 78 69 urn it if it exi
e370: 73 74 73 2e 20 20 49 66 20 69 74 20 64 6f 65 73 sts. If it does
e380: 20 6e 6f 74 20 65 78 69 73 74 2c 0a 2a 2a 20 74 not exist,.** t
e390: 68 65 6e 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e hen return NULL.
e3a0: 0a 2a 2a 0a 2a 2a 20 49 66 20 63 61 6c 6c 65 64 .**.** If called
e3b0: 20 77 69 74 68 20 61 6c 6c 6f 63 61 74 65 46 6c with allocateFl
e3c0: 61 67 3c 30 2c 20 63 68 65 63 6b 20 74 6f 20 73 ag<0, check to s
e3d0: 65 65 20 69 66 20 74 68 65 20 74 68 72 65 61 64 ee if the thread
e3e0: 20 73 70 65 63 69 66 69 63 0a 2a 2a 20 64 61 74 specific.** dat
e3f0: 61 20 69 73 20 61 6c 6c 6f 63 61 74 65 64 20 61 a is allocated a
e400: 6e 64 20 69 73 20 61 6c 6c 20 7a 65 72 6f 2e 20 nd is all zero.
e410: 20 49 66 20 69 74 20 69 73 20 74 68 65 6e 20 64 If it is then d
e420: 65 61 6c 6c 6f 63 61 74 65 20 69 74 2e 0a 2a 2a eallocate it..**
e430: 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 Return a pointe
e440: 72 20 74 6f 20 74 68 65 20 74 68 72 65 61 64 20 r to the thread
e450: 73 70 65 63 69 66 69 63 20 64 61 74 61 20 6f 72 specific data or
e460: 20 4e 55 4c 4c 20 69 66 20 69 74 20 69 73 0a 2a NULL if it is.*
e470: 2a 20 75 6e 61 6c 6c 6f 63 61 74 65 64 20 6f 72 * unallocated or
e480: 20 67 65 74 73 20 64 65 61 6c 6c 6f 63 61 74 65 gets deallocate
e490: 64 2e 0a 2a 2f 0a 54 68 72 65 61 64 44 61 74 61 d..*/.ThreadData
e4a0: 20 2a 73 71 6c 69 74 65 33 55 6e 69 78 54 68 72 *sqlite3UnixThr
e4b0: 65 61 64 53 70 65 63 69 66 69 63 44 61 74 61 28 eadSpecificData(
e4c0: 69 6e 74 20 61 6c 6c 6f 63 61 74 65 46 6c 61 67 int allocateFlag
e4d0: 29 7b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 ){. static cons
e4e0: 74 20 54 68 72 65 61 64 44 61 74 61 20 7a 65 72 t ThreadData zer
e4f0: 6f 44 61 74 61 20 3d 20 7b 30 7d 3b 20 20 2f 2a oData = {0}; /*
e500: 20 49 6e 69 74 69 61 6c 69 7a 65 72 20 74 6f 20 Initializer to
e510: 73 69 6c 65 6e 63 65 20 77 61 72 6e 69 6e 67 73 silence warnings
e520: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
e530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
e540: 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 20 66 ** f
e550: 72 6f 6d 20 62 72 6f 6b 65 6e 20 63 6f 6d 70 69 rom broken compi
e560: 6c 65 72 73 20 2a 2f 0a 23 69 66 64 65 66 20 53 lers */.#ifdef S
e570: 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 QLITE_UNIX_THREA
e580: 44 53 0a 20 20 73 74 61 74 69 63 20 70 74 68 72 DS. static pthr
e590: 65 61 64 5f 6b 65 79 5f 74 20 6b 65 79 3b 0a 20 ead_key_t key;.
e5a0: 20 73 74 61 74 69 63 20 69 6e 74 20 6b 65 79 49 static int keyI
e5b0: 6e 69 74 20 3d 20 30 3b 0a 20 20 54 68 72 65 61 nit = 0;. Threa
e5c0: 64 44 61 74 61 20 2a 70 54 73 64 3b 0a 0a 20 20 dData *pTsd;..
e5d0: 69 66 28 20 21 6b 65 79 49 6e 69 74 20 29 7b 0a if( !keyInit ){.
e5e0: 20 20 20 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 sqlite3OsEnt
e5f0: 65 72 4d 75 74 65 78 28 29 3b 0a 20 20 20 20 69 erMutex();. i
e600: 66 28 20 21 6b 65 79 49 6e 69 74 20 29 7b 0a 20 f( !keyInit ){.
e610: 20 20 20 20 20 69 6e 74 20 72 63 3b 0a 20 20 20 int rc;.
e620: 20 20 20 72 63 20 3d 20 70 74 68 72 65 61 64 5f rc = pthread_
e630: 6b 65 79 5f 63 72 65 61 74 65 28 26 6b 65 79 2c key_create(&key,
e640: 20 30 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 0);. if( r
e650: 63 20 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c c ){. sql
e660: 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 ite3OsLeaveMutex
e670: 28 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 ();. retu
e680: 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 rn 0;. }.
e690: 20 20 20 20 6b 65 79 49 6e 69 74 20 3d 20 31 3b keyInit = 1;
e6a0: 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 . }. sqlit
e6b0: 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 e3OsLeaveMutex()
e6c0: 3b 0a 20 20 7d 0a 0a 20 20 70 54 73 64 20 3d 20 ;. }.. pTsd =
e6d0: 70 74 68 72 65 61 64 5f 67 65 74 73 70 65 63 69 pthread_getspeci
e6e0: 66 69 63 28 6b 65 79 29 3b 0a 20 20 69 66 28 20 fic(key);. if(
e6f0: 61 6c 6c 6f 63 61 74 65 46 6c 61 67 3e 30 20 29 allocateFlag>0 )
e700: 7b 0a 20 20 20 20 69 66 28 20 70 54 73 64 3d 3d {. if( pTsd==
e710: 30 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20 21 0 ){. if( !
e720: 73 71 6c 69 74 65 33 54 65 73 74 4d 61 6c 6c 6f sqlite3TestMallo
e730: 63 46 61 69 6c 28 29 20 29 7b 0a 20 20 20 20 20 cFail() ){.
e740: 20 20 20 70 54 73 64 20 3d 20 73 71 6c 69 74 65 pTsd = sqlite
e750: 33 4f 73 4d 61 6c 6c 6f 63 28 73 69 7a 65 6f 66 3OsMalloc(sizeof
e760: 28 7a 65 72 6f 44 61 74 61 29 29 3b 0a 20 20 20 (zeroData));.
e770: 20 20 20 7d 0a 23 69 66 64 65 66 20 53 51 4c 49 }.#ifdef SQLI
e780: 54 45 5f 4d 45 4d 44 45 42 55 47 0a 20 20 20 20 TE_MEMDEBUG.
e790: 20 20 73 71 6c 69 74 65 33 5f 69 73 46 61 69 6c sqlite3_isFail
e7a0: 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a 20 20 20 = 0;.#endif.
e7b0: 20 20 20 69 66 28 20 70 54 73 64 20 29 7b 0a 20 if( pTsd ){.
e7c0: 20 20 20 20 20 20 20 2a 70 54 73 64 20 3d 20 7a *pTsd = z
e7d0: 65 72 6f 44 61 74 61 3b 0a 20 20 20 20 20 20 20 eroData;.
e7e0: 20 70 74 68 72 65 61 64 5f 73 65 74 73 70 65 63 pthread_setspec
e7f0: 69 66 69 63 28 6b 65 79 2c 20 70 54 73 64 29 3b ific(key, pTsd);
e800: 0a 20 20 20 20 20 20 20 20 54 53 44 5f 43 4f 55 . TSD_COU
e810: 4e 54 45 52 28 2b 31 29 3b 0a 20 20 20 20 20 20 NTER(+1);.
e820: 7d 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20 }. }. }else
e830: 69 66 28 20 70 54 73 64 21 3d 30 20 26 26 20 61 if( pTsd!=0 && a
e840: 6c 6c 6f 63 61 74 65 46 6c 61 67 3c 30 20 0a 20 llocateFlag<0 .
e850: 20 20 20 20 20 20 20 20 20 20 20 26 26 20 6d 65 && me
e860: 6d 63 6d 70 28 70 54 73 64 2c 20 26 7a 65 72 6f mcmp(pTsd, &zero
e870: 44 61 74 61 2c 20 73 69 7a 65 6f 66 28 54 68 72 Data, sizeof(Thr
e880: 65 61 64 44 61 74 61 29 29 3d 3d 30 20 29 7b 0a eadData))==0 ){.
e890: 20 20 20 20 73 71 6c 69 74 65 33 4f 73 46 72 65 sqlite3OsFre
e8a0: 65 28 70 54 73 64 29 3b 0a 20 20 20 20 70 74 68 e(pTsd);. pth
e8b0: 72 65 61 64 5f 73 65 74 73 70 65 63 69 66 69 63 read_setspecific
e8c0: 28 6b 65 79 2c 20 30 29 3b 0a 20 20 20 20 54 53 (key, 0);. TS
e8d0: 44 5f 43 4f 55 4e 54 45 52 28 2d 31 29 3b 0a 20 D_COUNTER(-1);.
e8e0: 20 20 20 70 54 73 64 20 3d 20 30 3b 0a 20 20 7d pTsd = 0;. }
e8f0: 0a 20 20 72 65 74 75 72 6e 20 70 54 73 64 3b 0a . return pTsd;.
e900: 23 65 6c 73 65 0a 20 20 73 74 61 74 69 63 20 54 #else. static T
e910: 68 72 65 61 64 44 61 74 61 20 2a 70 54 73 64 20 hreadData *pTsd
e920: 3d 20 30 3b 0a 20 20 69 66 28 20 61 6c 6c 6f 63 = 0;. if( alloc
e930: 61 74 65 46 6c 61 67 3e 30 20 29 7b 0a 20 20 20 ateFlag>0 ){.
e940: 20 69 66 28 20 70 54 73 64 3d 3d 30 20 29 7b 0a if( pTsd==0 ){.
e950: 20 20 20 20 20 20 69 66 28 20 21 73 71 6c 69 74 if( !sqlit
e960: 65 33 54 65 73 74 4d 61 6c 6c 6f 63 46 61 69 6c e3TestMallocFail
e970: 28 29 20 29 7b 0a 20 20 20 20 20 20 20 20 70 54 () ){. pT
e980: 73 64 20 3d 20 73 71 6c 69 74 65 33 4f 73 4d 61 sd = sqlite3OsMa
e990: 6c 6c 6f 63 28 20 73 69 7a 65 6f 66 28 7a 65 72 lloc( sizeof(zer
e9a0: 6f 44 61 74 61 29 20 29 3b 0a 20 20 20 20 20 20 oData) );.
e9b0: 7d 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f }.#ifdef SQLITE_
e9c0: 4d 45 4d 44 45 42 55 47 0a 20 20 20 20 20 20 73 MEMDEBUG. s
e9d0: 71 6c 69 74 65 33 5f 69 73 46 61 69 6c 20 3d 20 qlite3_isFail =
e9e0: 30 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20 20 20 0;.#endif.
e9f0: 69 66 28 20 70 54 73 64 20 29 7b 0a 20 20 20 20 if( pTsd ){.
ea00: 20 20 20 20 2a 70 54 73 64 20 3d 20 7a 65 72 6f *pTsd = zero
ea10: 44 61 74 61 3b 0a 20 20 20 20 20 20 20 20 54 53 Data;. TS
ea20: 44 5f 43 4f 55 4e 54 45 52 28 2b 31 29 3b 0a 20 D_COUNTER(+1);.
ea30: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d }. }. }
ea40: 65 6c 73 65 20 69 66 28 20 70 54 73 64 21 3d 30 else if( pTsd!=0
ea50: 20 26 26 20 61 6c 6c 6f 63 61 74 65 46 6c 61 67 && allocateFlag
ea60: 3c 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 26 <0. &
ea70: 26 20 6d 65 6d 63 6d 70 28 70 54 73 64 2c 20 26 & memcmp(pTsd, &
ea80: 7a 65 72 6f 44 61 74 61 2c 20 73 69 7a 65 6f 66 zeroData, sizeof
ea90: 28 54 68 72 65 61 64 44 61 74 61 29 29 3d 3d 30 (ThreadData))==0
eaa0: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 4f ){. sqlite3O
eab0: 73 46 72 65 65 28 70 54 73 64 29 3b 0a 20 20 20 sFree(pTsd);.
eac0: 20 54 53 44 5f 43 4f 55 4e 54 45 52 28 2d 31 29 TSD_COUNTER(-1)
ead0: 3b 0a 20 20 20 20 70 54 73 64 20 3d 20 30 3b 0a ;. pTsd = 0;.
eae0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 70 54 73 }. return pTs
eaf0: 64 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a d;.#endif.}../*.
eb00: 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 ** The following
eb10: 20 76 61 72 69 61 62 6c 65 2c 20 69 66 20 73 65 variable, if se
eb20: 74 20 74 6f 20 61 20 6e 6f 6e 2d 7a 65 72 6f 20 t to a non-zero
eb30: 76 61 6c 75 65 2c 20 62 65 63 6f 6d 65 73 20 74 value, becomes t
eb40: 68 65 20 72 65 73 75 6c 74 0a 2a 2a 20 72 65 74 he result.** ret
eb50: 75 72 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 urned from sqlit
eb60: 65 33 4f 73 43 75 72 72 65 6e 74 54 69 6d 65 28 e3OsCurrentTime(
eb70: 29 2e 20 20 54 68 69 73 20 69 73 20 75 73 65 64 ). This is used
eb80: 20 66 6f 72 20 74 65 73 74 69 6e 67 2e 0a 2a 2f for testing..*/
eb90: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 .#ifdef SQLITE_T
eba0: 45 53 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f EST.int sqlite3_
ebb0: 63 75 72 72 65 6e 74 5f 74 69 6d 65 20 3d 20 30 current_time = 0
ebc0: 3b 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 ;.#endif../*.**
ebd0: 46 69 6e 64 20 74 68 65 20 63 75 72 72 65 6e 74 Find the current
ebe0: 20 74 69 6d 65 20 28 69 6e 20 55 6e 69 76 65 72 time (in Univer
ebf0: 73 61 6c 20 43 6f 6f 72 64 69 6e 61 74 65 64 20 sal Coordinated
ec00: 54 69 6d 65 29 2e 20 20 57 72 69 74 65 20 74 68 Time). Write th
ec10: 65 0a 2a 2a 20 63 75 72 72 65 6e 74 20 74 69 6d e.** current tim
ec20: 65 20 61 6e 64 20 64 61 74 65 20 61 73 20 61 20 e and date as a
ec30: 4a 75 6c 69 61 6e 20 44 61 79 20 6e 75 6d 62 65 Julian Day numbe
ec40: 72 20 69 6e 74 6f 20 2a 70 72 4e 6f 77 20 61 6e r into *prNow an
ec50: 64 0a 2a 2a 20 72 65 74 75 72 6e 20 30 2e 20 20 d.** return 0.
ec60: 52 65 74 75 72 6e 20 31 20 69 66 20 74 68 65 20 Return 1 if the
ec70: 74 69 6d 65 20 61 6e 64 20 64 61 74 65 20 63 61 time and date ca
ec80: 6e 6e 6f 74 20 62 65 20 66 6f 75 6e 64 2e 0a 2a nnot be found..*
ec90: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 55 6e 69 /.int sqlite3Uni
eca0: 78 43 75 72 72 65 6e 74 54 69 6d 65 28 64 6f 75 xCurrentTime(dou
ecb0: 62 6c 65 20 2a 70 72 4e 6f 77 29 7b 0a 23 69 66 ble *prNow){.#if
ecc0: 64 65 66 20 4e 4f 5f 47 45 54 54 4f 44 0a 20 20 def NO_GETTOD.
ecd0: 74 69 6d 65 5f 74 20 74 3b 0a 20 20 74 69 6d 65 time_t t;. time
ece0: 28 26 74 29 3b 0a 20 20 2a 70 72 4e 6f 77 20 3d (&t);. *prNow =
ecf0: 20 74 2f 38 36 34 30 30 2e 30 20 2b 20 32 34 34 t/86400.0 + 244
ed00: 30 35 38 37 2e 35 3b 0a 23 65 6c 73 65 0a 20 20 0587.5;.#else.
ed10: 73 74 72 75 63 74 20 74 69 6d 65 76 61 6c 20 73 struct timeval s
ed20: 4e 6f 77 3b 0a 20 20 73 74 72 75 63 74 20 74 69 Now;. struct ti
ed30: 6d 65 7a 6f 6e 65 20 73 54 7a 3b 20 20 2f 2a 20 mezone sTz; /*
ed40: 4e 6f 74 20 75 73 65 64 20 2a 2f 0a 20 20 67 65 Not used */. ge
ed50: 74 74 69 6d 65 6f 66 64 61 79 28 26 73 4e 6f 77 ttimeofday(&sNow
ed60: 2c 20 26 73 54 7a 29 3b 0a 20 20 2a 70 72 4e 6f , &sTz);. *prNo
ed70: 77 20 3d 20 32 34 34 30 35 38 37 2e 35 20 2b 20 w = 2440587.5 +
ed80: 73 4e 6f 77 2e 74 76 5f 73 65 63 2f 38 36 34 30 sNow.tv_sec/8640
ed90: 30 2e 30 20 2b 20 73 4e 6f 77 2e 74 76 5f 75 73 0.0 + sNow.tv_us
eda0: 65 63 2f 38 36 34 30 30 30 30 30 30 30 30 2e 30 ec/86400000000.0
edb0: 3b 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 ;.#endif.#ifdef
edc0: 53 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 69 66 SQLITE_TEST. if
edd0: 28 20 73 71 6c 69 74 65 33 5f 63 75 72 72 65 6e ( sqlite3_curren
ede0: 74 5f 74 69 6d 65 20 29 7b 0a 20 20 20 20 2a 70 t_time ){. *p
edf0: 72 4e 6f 77 20 3d 20 73 71 6c 69 74 65 33 5f 63 rNow = sqlite3_c
ee00: 75 72 72 65 6e 74 5f 74 69 6d 65 2f 38 36 34 30 urrent_time/8640
ee10: 30 2e 30 20 2b 20 32 34 34 30 35 38 37 2e 35 3b 0.0 + 2440587.5;
ee20: 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 72 65 . }.#endif. re
ee30: 74 75 72 6e 20 30 3b 0a 7d 0a 0a 23 65 6e 64 69 turn 0;.}..#endi
ee40: 66 20 2f 2a 20 4f 53 5f 55 4e 49 58 20 2a 2f 0a f /* OS_UNIX */.