0000: 2f 2a 0a 2a 2a 20 54 68 65 20 22 70 72 69 6e 74 /*.** The "print
0010: 66 22 20 63 6f 64 65 20 74 68 61 74 20 66 6f 6c f" code that fol
0020: 6c 6f 77 73 20 64 61 74 65 73 20 66 72 6f 6d 20 lows dates from
0030: 74 68 65 20 31 39 38 30 27 73 2e 20 20 49 74 20 the 1980's. It
0040: 69 73 20 69 6e 0a 2a 2a 20 74 68 65 20 70 75 62 is in.** the pub
0050: 6c 69 63 20 64 6f 6d 61 69 6e 2e 20 20 54 68 65 lic domain. The
0060: 20 6f 72 69 67 69 6e 61 6c 20 63 6f 6d 6d 65 6e original commen
0070: 74 73 20 61 72 65 20 69 6e 63 6c 75 64 65 64 20 ts are included
0080: 68 65 72 65 20 66 6f 72 0a 2a 2a 20 63 6f 6d 70 here for.** comp
0090: 6c 65 74 65 6e 65 73 73 2e 20 20 54 68 65 79 20 leteness. They
00a0: 61 72 65 20 76 65 72 79 20 6f 75 74 2d 6f 66 2d are very out-of-
00b0: 64 61 74 65 20 62 75 74 20 6d 69 67 68 74 20 62 date but might b
00c0: 65 20 75 73 65 66 75 6c 20 61 73 0a 2a 2a 20 61 e useful as.** a
00d0: 6e 20 68 69 73 74 6f 72 69 63 61 6c 20 72 65 66 n historical ref
00e0: 65 72 65 6e 63 65 2e 20 20 4d 6f 73 74 20 6f 66 erence. Most of
00f0: 20 74 68 65 20 22 65 6e 68 61 6e 63 65 6d 65 6e the "enhancemen
0100: 74 73 22 20 68 61 76 65 20 62 65 65 6e 20 62 61 ts" have been ba
0110: 63 6b 65 64 0a 2a 2a 20 6f 75 74 20 73 6f 20 74 cked.** out so t
0120: 68 61 74 20 74 68 65 20 66 75 6e 63 74 69 6f 6e hat the function
0130: 61 6c 69 74 79 20 69 73 20 6e 6f 77 20 74 68 65 ality is now the
0140: 20 73 61 6d 65 20 61 73 20 73 74 61 6e 64 61 72 same as standar
0150: 64 20 70 72 69 6e 74 66 28 29 2e 0a 2a 2a 0a 2a d printf()..**.*
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0170: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0180: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0190: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
01a0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 2a 2a 0a 2a 2a 20 *********.**.**
01b0: 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 6d 6f The following mo
01c0: 64 75 6c 65 73 20 69 73 20 61 6e 20 65 6e 68 61 dules is an enha
01d0: 6e 63 65 64 20 72 65 70 6c 61 63 65 6d 65 6e 74 nced replacement
01e0: 20 66 6f 72 20 74 68 65 20 22 70 72 69 6e 74 66 for the "printf
01f0: 22 20 73 75 62 72 6f 75 74 69 6e 65 73 0a 2a 2a " subroutines.**
0200: 20 66 6f 75 6e 64 20 69 6e 20 74 68 65 20 73 74 found in the st
0210: 61 6e 64 61 72 64 20 43 20 6c 69 62 72 61 72 79 andard C library
0220: 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 . The following
0230: 20 65 6e 68 61 6e 63 65 6d 65 6e 74 73 20 61 72 enhancements ar
0240: 65 0a 2a 2a 20 73 75 70 70 6f 72 74 65 64 3a 0a e.** supported:.
0250: 2a 2a 0a 2a 2a 20 20 20 20 20 20 2b 20 20 41 64 **.** + Ad
0260: 64 69 74 69 6f 6e 61 6c 20 66 75 6e 63 74 69 6f ditional functio
0270: 6e 73 2e 20 20 54 68 65 20 73 74 61 6e 64 61 72 ns. The standar
0280: 64 20 73 65 74 20 6f 66 20 22 70 72 69 6e 74 66 d set of "printf
0290: 22 20 66 75 6e 63 74 69 6f 6e 73 0a 2a 2a 20 20 " functions.**
02a0: 20 20 20 20 20 20 20 69 6e 63 6c 75 64 65 73 20 includes
02b0: 70 72 69 6e 74 66 2c 20 66 70 72 69 6e 74 66 2c printf, fprintf,
02c0: 20 73 70 72 69 6e 74 66 2c 20 76 70 72 69 6e 74 sprintf, vprint
02d0: 66 2c 20 76 66 70 72 69 6e 74 66 2c 20 61 6e 64 f, vfprintf, and
02e0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 76 73 70 72 .** vspr
02f0: 69 6e 74 66 2e 20 20 54 68 69 73 20 6d 6f 64 75 intf. This modu
0300: 6c 65 20 61 64 64 73 20 74 68 65 20 66 6f 6c 6c le adds the foll
0310: 6f 77 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 owing:.**.**
0320: 20 20 20 20 20 20 20 2a 20 20 73 6e 70 72 69 6e * snprin
0330: 74 66 20 2d 2d 20 57 6f 72 6b 73 20 6c 69 6b 65 tf -- Works like
0340: 20 73 70 72 69 6e 74 66 2c 20 62 75 74 20 68 61 sprintf, but ha
0350: 73 20 61 6e 20 65 78 74 72 61 20 61 72 67 75 6d s an extra argum
0360: 65 6e 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 ent.**
0370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0380: 77 68 69 63 68 20 69 73 20 74 68 65 20 73 69 7a which is the siz
0390: 65 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 20 e of the buffer
03a0: 77 72 69 74 74 65 6e 20 74 6f 2e 0a 2a 2a 0a 2a written to..**.*
03b0: 2a 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 6d * * m
03c0: 70 72 69 6e 74 66 20 2d 2d 20 20 53 69 6d 69 6c printf -- Simil
03d0: 61 72 20 74 6f 20 73 70 72 69 6e 74 66 2e 20 20 ar to sprintf.
03e0: 57 72 69 74 65 73 20 6f 75 74 70 75 74 20 74 6f Writes output to
03f0: 20 6d 65 6d 6f 72 79 0a 2a 2a 20 20 20 20 20 20 memory.**
0400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0410: 20 20 20 20 6f 62 74 61 69 6e 65 64 20 66 72 6f obtained fro
0420: 6d 20 6d 61 6c 6c 6f 63 2e 0a 2a 2a 0a 2a 2a 20 m malloc..**.**
0430: 20 20 20 20 20 20 20 20 20 20 2a 20 20 78 70 72 * xpr
0440: 69 6e 74 66 20 2d 2d 20 20 43 61 6c 6c 73 20 61 intf -- Calls a
0450: 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 64 69 73 function to dis
0460: 70 6f 73 65 20 6f 66 20 6f 75 74 70 75 74 2e 0a pose of output..
0470: 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 **.**
0480: 2a 20 20 6e 70 72 69 6e 74 66 20 2d 2d 20 20 4e * nprintf -- N
0490: 6f 20 6f 75 74 70 75 74 2c 20 62 75 74 20 72 65 o output, but re
04a0: 74 75 72 6e 73 20 74 68 65 20 6e 75 6d 62 65 72 turns the number
04b0: 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 0a 2a of characters.*
04c0: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
04d0: 20 20 20 20 20 20 20 20 20 20 20 74 68 61 74 20 that
04e0: 77 6f 75 6c 64 20 68 61 76 65 20 62 65 65 6e 20 would have been
04f0: 6f 75 74 70 75 74 20 62 79 20 70 72 69 6e 74 66 output by printf
0500: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20 20 ..**.**
0510: 20 20 2a 20 20 41 20 76 2d 20 76 65 72 73 69 6f * A v- versio
0520: 6e 20 28 65 78 3a 20 76 73 6e 70 72 69 6e 74 66 n (ex: vsnprintf
0530: 29 20 6f 66 20 65 76 65 72 79 20 66 75 6e 63 74 ) of every funct
0540: 69 6f 6e 20 69 73 20 61 6c 73 6f 0a 2a 2a 20 20 ion is also.**
0550: 20 20 20 20 20 20 20 20 20 20 20 20 73 75 70 70 supp
0560: 6c 69 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 lied..**.**
0570: 20 2b 20 20 41 20 66 65 77 20 65 78 74 65 6e 73 + A few extens
0580: 69 6f 6e 73 20 74 6f 20 74 68 65 20 66 6f 72 6d ions to the form
0590: 61 74 74 69 6e 67 20 6e 6f 74 61 74 69 6f 6e 20 atting notation
05a0: 61 72 65 20 73 75 70 70 6f 72 74 65 64 3a 0a 2a are supported:.*
05b0: 2a 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 2a *.** *
05c0: 20 20 54 68 65 20 22 3d 22 20 66 6c 61 67 20 28 The "=" flag (
05d0: 73 69 6d 69 6c 61 72 20 74 6f 20 22 2d 22 29 20 similar to "-")
05e0: 63 61 75 73 65 73 20 74 68 65 20 6f 75 74 70 75 causes the outpu
05f0: 74 20 74 6f 20 62 65 0a 2a 2a 20 20 20 20 20 20 t to be.**
0600: 20 20 20 20 20 20 20 20 62 65 20 63 65 6e 74 65 be cente
0610: 72 65 64 20 69 6e 20 74 68 65 20 61 70 70 72 6f red in the appro
0620: 70 72 69 61 74 65 6c 79 20 73 69 7a 65 64 20 66 priately sized f
0630: 69 65 6c 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 ield..**.**
0640: 20 20 20 20 20 20 2a 20 20 54 68 65 20 25 62 20 * The %b
0650: 66 69 65 6c 64 20 6f 75 74 70 75 74 73 20 61 6e field outputs an
0660: 20 69 6e 74 65 67 65 72 20 69 6e 20 62 69 6e 61 integer in bina
0670: 72 79 20 6e 6f 74 61 74 69 6f 6e 2e 0a 2a 2a 0a ry notation..**.
0680: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 ** *
0690: 54 68 65 20 25 63 20 66 69 65 6c 64 20 6e 6f 77 The %c field now
06a0: 20 61 63 63 65 70 74 73 20 61 20 70 72 65 63 69 accepts a preci
06b0: 73 69 6f 6e 2e 20 20 54 68 65 20 63 68 61 72 61 sion. The chara
06c0: 63 74 65 72 20 6f 75 74 70 75 74 0a 2a 2a 20 20 cter output.**
06d0: 20 20 20 20 20 20 20 20 20 20 20 20 69 73 20 72 is r
06e0: 65 70 65 61 74 65 64 20 62 79 20 74 68 65 20 6e epeated by the n
06f0: 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74 umber of times t
0700: 68 65 20 70 72 65 63 69 73 69 6f 6e 20 73 70 65 he precision spe
0710: 63 69 66 69 65 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 cifies..**.**
0720: 20 20 20 20 20 20 20 20 2a 20 20 54 68 65 20 25 * The %
0730: 27 20 66 69 65 6c 64 20 77 6f 72 6b 73 20 6c 69 ' field works li
0740: 6b 65 20 25 63 2c 20 62 75 74 20 74 61 6b 65 73 ke %c, but takes
0750: 20 61 73 20 69 74 73 20 63 68 61 72 61 63 74 65 as its characte
0760: 72 20 74 68 65 0a 2a 2a 20 20 20 20 20 20 20 20 r the.**
0770: 20 20 20 20 20 20 6e 65 78 74 20 63 68 61 72 61 next chara
0780: 63 74 65 72 20 6f 66 20 74 68 65 20 66 6f 72 6d cter of the form
0790: 61 74 20 73 74 72 69 6e 67 2c 20 69 6e 73 74 65 at string, inste
07a0: 61 64 20 6f 66 20 74 68 65 20 6e 65 78 74 0a 2a ad of the next.*
07b0: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 * a
07c0: 72 67 75 6d 65 6e 74 2e 20 20 46 6f 72 20 65 78 rgument. For ex
07d0: 61 6d 70 6c 65 2c 20 20 70 72 69 6e 74 66 28 22 ample, printf("
07e0: 25 2e 37 38 27 2d 22 29 20 20 70 72 69 6e 74 73 %.78'-") prints
07f0: 20 37 38 20 6d 69 6e 75 73 0a 2a 2a 20 20 20 20 78 minus.**
0800: 20 20 20 20 20 20 20 20 20 20 73 69 67 6e 73 2c signs,
0810: 20 74 68 65 20 73 61 6d 65 20 61 73 20 20 70 72 the same as pr
0820: 69 6e 74 66 28 22 25 2e 37 38 63 22 2c 27 2d 27 intf("%.78c",'-'
0830: 29 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 2b 20 )..**.** +
0840: 20 57 68 65 6e 20 63 6f 6d 70 69 6c 65 64 20 75 When compiled u
0850: 73 69 6e 67 20 47 43 43 20 6f 6e 20 61 20 53 50 sing GCC on a SP
0860: 41 52 43 2c 20 74 68 69 73 20 76 65 72 73 69 6f ARC, this versio
0870: 6e 20 6f 66 20 70 72 69 6e 74 66 20 69 73 0a 2a n of printf is.*
0880: 2a 20 20 20 20 20 20 20 20 20 66 61 73 74 65 72 * faster
0890: 20 74 68 61 6e 20 74 68 65 20 6c 69 62 72 61 72 than the librar
08a0: 79 20 70 72 69 6e 74 66 20 66 6f 72 20 53 55 4e y printf for SUN
08b0: 20 4f 53 20 34 2e 31 2e 0a 2a 2a 0a 2a 2a 20 20 OS 4.1..**.**
08c0: 20 20 20 20 2b 20 20 41 6c 6c 20 66 75 6e 63 74 + All funct
08d0: 69 6f 6e 73 20 61 72 65 20 66 75 6c 6c 79 20 72 ions are fully r
08e0: 65 65 6e 74 72 61 6e 74 2e 0a 2a 2a 0a 2a 2f 0a eentrant..**.*/.
08f0: 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 #include "sqlite
0900: 49 6e 74 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20 43 6f Int.h"../*.** Co
0910: 6e 76 65 72 73 69 6f 6e 20 74 79 70 65 73 20 66 nversion types f
0920: 61 6c 6c 20 69 6e 74 6f 20 76 61 72 69 6f 75 73 all into various
0930: 20 63 61 74 65 67 6f 72 69 65 73 20 61 73 20 64 categories as d
0940: 65 66 69 6e 65 64 20 62 79 20 74 68 65 0a 2a 2a efined by the.**
0950: 20 66 6f 6c 6c 6f 77 69 6e 67 20 65 6e 75 6d 65 following enume
0960: 72 61 74 69 6f 6e 2e 0a 2a 2f 0a 23 64 65 66 69 ration..*/.#defi
0970: 6e 65 20 65 74 52 41 44 49 58 20 20 20 20 20 20 ne etRADIX
0980: 20 31 20 2f 2a 20 49 6e 74 65 67 65 72 20 74 79 1 /* Integer ty
0990: 70 65 73 2e 20 20 25 64 2c 20 25 78 2c 20 25 6f pes. %d, %x, %o
09a0: 2c 20 61 6e 64 20 73 6f 20 66 6f 72 74 68 20 2a , and so forth *
09b0: 2f 0a 23 64 65 66 69 6e 65 20 65 74 46 4c 4f 41 /.#define etFLOA
09c0: 54 20 20 20 20 20 20 20 32 20 2f 2a 20 46 6c 6f T 2 /* Flo
09d0: 61 74 69 6e 67 20 70 6f 69 6e 74 2e 20 20 25 66 ating point. %f
09e0: 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 74 45 58 */.#define etEX
09f0: 50 20 20 20 20 20 20 20 20 20 33 20 2f 2a 20 45 P 3 /* E
0a00: 78 70 6f 6e 65 6e 74 69 6f 6e 61 6c 20 6e 6f 74 xponentional not
0a10: 61 74 69 6f 6e 2e 20 25 65 20 61 6e 64 20 25 45 ation. %e and %E
0a20: 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 74 47 45 */.#define etGE
0a30: 4e 45 52 49 43 20 20 20 20 20 34 20 2f 2a 20 46 NERIC 4 /* F
0a40: 6c 6f 61 74 69 6e 67 20 6f 72 20 65 78 70 6f 6e loating or expon
0a50: 65 6e 74 69 61 6c 2c 20 64 65 70 65 6e 64 69 6e ential, dependin
0a60: 67 20 6f 6e 20 65 78 70 6f 6e 65 6e 74 2e 20 25 g on exponent. %
0a70: 67 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 74 53 g */.#define etS
0a80: 49 5a 45 20 20 20 20 20 20 20 20 35 20 2f 2a 20 IZE 5 /*
0a90: 52 65 74 75 72 6e 20 6e 75 6d 62 65 72 20 6f 66 Return number of
0aa0: 20 63 68 61 72 61 63 74 65 72 73 20 70 72 6f 63 characters proc
0ab0: 65 73 73 65 64 20 73 6f 20 66 61 72 2e 20 25 6e essed so far. %n
0ac0: 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 74 53 54 */.#define etST
0ad0: 52 49 4e 47 20 20 20 20 20 20 36 20 2f 2a 20 53 RING 6 /* S
0ae0: 74 72 69 6e 67 73 2e 20 25 73 20 2a 2f 0a 23 64 trings. %s */.#d
0af0: 65 66 69 6e 65 20 65 74 44 59 4e 53 54 52 49 4e efine etDYNSTRIN
0b00: 47 20 20 20 37 20 2f 2a 20 44 79 6e 61 6d 69 63 G 7 /* Dynamic
0b10: 61 6c 6c 79 20 61 6c 6c 6f 63 61 74 65 64 20 73 ally allocated s
0b20: 74 72 69 6e 67 73 2e 20 25 7a 20 2a 2f 0a 23 64 trings. %z */.#d
0b30: 65 66 69 6e 65 20 65 74 50 45 52 43 45 4e 54 20 efine etPERCENT
0b40: 20 20 20 20 38 20 2f 2a 20 50 65 72 63 65 6e 74 8 /* Percent
0b50: 20 73 79 6d 62 6f 6c 2e 20 25 25 20 2a 2f 0a 23 symbol. %% */.#
0b60: 64 65 66 69 6e 65 20 65 74 43 48 41 52 58 20 20 define etCHARX
0b70: 20 20 20 20 20 39 20 2f 2a 20 43 68 61 72 61 63 9 /* Charac
0b80: 74 65 72 73 2e 20 25 63 20 2a 2f 0a 2f 2a 20 54 ters. %c */./* T
0b90: 68 65 20 72 65 73 74 20 61 72 65 20 65 78 74 65 he rest are exte
0ba0: 6e 73 69 6f 6e 73 2c 20 6e 6f 74 20 6e 6f 72 6d nsions, not norm
0bb0: 61 6c 6c 79 20 66 6f 75 6e 64 20 69 6e 20 70 72 ally found in pr
0bc0: 69 6e 74 66 28 29 20 2a 2f 0a 23 64 65 66 69 6e intf() */.#defin
0bd0: 65 20 65 74 53 51 4c 45 53 43 41 50 45 20 20 31 e etSQLESCAPE 1
0be0: 30 20 2f 2a 20 53 74 72 69 6e 67 73 20 77 69 74 0 /* Strings wit
0bf0: 68 20 27 5c 27 27 20 64 6f 75 62 6c 65 64 2e 20 h '\'' doubled.
0c00: 20 25 71 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 %q */.#define e
0c10: 74 53 51 4c 45 53 43 41 50 45 32 20 31 31 20 2f tSQLESCAPE2 11 /
0c20: 2a 20 53 74 72 69 6e 67 73 20 77 69 74 68 20 27 * Strings with '
0c30: 5c 27 27 20 64 6f 75 62 6c 65 64 20 61 6e 64 20 \'' doubled and
0c40: 65 6e 63 6c 6f 73 65 64 20 69 6e 20 27 27 2c 0a enclosed in '',.
0c50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0c60: 20 20 20 20 20 20 20 20 20 20 4e 55 4c 4c 20 70 NULL p
0c70: 6f 69 6e 74 65 72 73 20 72 65 70 6c 61 63 65 64 ointers replaced
0c80: 20 62 79 20 53 51 4c 20 4e 55 4c 4c 2e 20 20 25 by SQL NULL. %
0c90: 51 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 74 54 Q */.#define etT
0ca0: 4f 4b 45 4e 20 20 20 20 20 20 31 32 20 2f 2a 20 OKEN 12 /*
0cb0: 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 20 54 a pointer to a T
0cc0: 6f 6b 65 6e 20 73 74 72 75 63 74 75 72 65 20 2a oken structure *
0cd0: 2f 0a 23 64 65 66 69 6e 65 20 65 74 53 52 43 4c /.#define etSRCL
0ce0: 49 53 54 20 20 20 20 31 33 20 2f 2a 20 61 20 70 IST 13 /* a p
0cf0: 6f 69 6e 74 65 72 20 74 6f 20 61 20 53 72 63 4c ointer to a SrcL
0d00: 69 73 74 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 ist */.#define e
0d10: 74 50 4f 49 4e 54 45 52 20 20 20 20 31 34 20 2f tPOINTER 14 /
0d20: 2a 20 54 68 65 20 25 70 20 63 6f 6e 76 65 72 73 * The %p convers
0d30: 69 6f 6e 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 ion */.#define e
0d40: 74 53 51 4c 45 53 43 41 50 45 33 20 31 35 20 2f tSQLESCAPE3 15 /
0d50: 2a 20 25 77 20 2d 3e 20 53 74 72 69 6e 67 73 20 * %w -> Strings
0d60: 77 69 74 68 20 27 5c 22 27 20 64 6f 75 62 6c 65 with '\"' double
0d70: 64 20 2a 2f 0a 23 64 65 66 69 6e 65 20 65 74 4f d */.#define etO
0d80: 52 44 49 4e 41 4c 20 20 20 20 31 36 20 2f 2a 20 RDINAL 16 /*
0d90: 25 72 20 2d 3e 20 31 73 74 2c 20 32 6e 64 2c 20 %r -> 1st, 2nd,
0da0: 33 72 64 2c 20 34 74 68 2c 20 65 74 63 2e 20 20 3rd, 4th, etc.
0db0: 45 6e 67 6c 69 73 68 20 6f 6e 6c 79 20 2a 2f 0a English only */.
0dc0: 0a 23 64 65 66 69 6e 65 20 65 74 49 4e 56 41 4c .#define etINVAL
0dd0: 49 44 20 20 20 20 20 30 20 2f 2a 20 41 6e 79 20 ID 0 /* Any
0de0: 75 6e 72 65 63 6f 67 6e 69 7a 65 64 20 63 6f 6e unrecognized con
0df0: 76 65 72 73 69 6f 6e 20 74 79 70 65 20 2a 2f 0a version type */.
0e00: 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 22 65 74 42 79 ../*.** An "etBy
0e10: 74 65 22 20 69 73 20 61 6e 20 38 2d 62 69 74 20 te" is an 8-bit
0e20: 75 6e 73 69 67 6e 65 64 20 76 61 6c 75 65 2e 0a unsigned value..
0e30: 2a 2f 0a 74 79 70 65 64 65 66 20 75 6e 73 69 67 */.typedef unsig
0e40: 6e 65 64 20 63 68 61 72 20 65 74 42 79 74 65 3b ned char etByte;
0e50: 0a 0a 2f 2a 0a 2a 2a 20 45 61 63 68 20 62 75 69 ../*.** Each bui
0e60: 6c 74 69 6e 20 63 6f 6e 76 65 72 73 69 6f 6e 20 ltin conversion
0e70: 63 68 61 72 61 63 74 65 72 20 28 65 78 3a 20 74 character (ex: t
0e80: 68 65 20 27 64 27 20 69 6e 20 22 25 64 22 29 20 he 'd' in "%d")
0e90: 69 73 20 64 65 73 63 72 69 62 65 64 0a 2a 2a 20 is described.**
0ea0: 62 79 20 61 6e 20 69 6e 73 74 61 6e 63 65 20 6f by an instance o
0eb0: 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 f the following
0ec0: 73 74 72 75 63 74 75 72 65 0a 2a 2f 0a 74 79 70 structure.*/.typ
0ed0: 65 64 65 66 20 73 74 72 75 63 74 20 65 74 5f 69 edef struct et_i
0ee0: 6e 66 6f 20 7b 20 20 20 2f 2a 20 49 6e 66 6f 72 nfo { /* Infor
0ef0: 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20 65 61 63 mation about eac
0f00: 68 20 66 6f 72 6d 61 74 20 66 69 65 6c 64 20 2a h format field *
0f10: 2f 0a 20 20 63 68 61 72 20 66 6d 74 74 79 70 65 /. char fmttype
0f20: 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 ; /*
0f30: 54 68 65 20 66 6f 72 6d 61 74 20 66 69 65 6c 64 The format field
0f40: 20 63 6f 64 65 20 6c 65 74 74 65 72 20 2a 2f 0a code letter */.
0f50: 20 20 65 74 42 79 74 65 20 62 61 73 65 3b 20 20 etByte base;
0f60: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 /* Th
0f70: 65 20 62 61 73 65 20 66 6f 72 20 72 61 64 69 78 e base for radix
0f80: 20 63 6f 6e 76 65 72 73 69 6f 6e 20 2a 2f 0a 20 conversion */.
0f90: 20 65 74 42 79 74 65 20 66 6c 61 67 73 3b 20 20 etByte flags;
0fa0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4f 6e 65 /* One
0fb0: 20 6f 72 20 6d 6f 72 65 20 6f 66 20 46 4c 41 47 or more of FLAG
0fc0: 5f 20 63 6f 6e 73 74 61 6e 74 73 20 62 65 6c 6f _ constants belo
0fd0: 77 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 74 79 w */. etByte ty
0fe0: 70 65 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 pe;
0ff0: 2f 2a 20 43 6f 6e 76 65 72 73 69 6f 6e 20 70 61 /* Conversion pa
1000: 72 61 64 69 67 6d 20 2a 2f 0a 20 20 65 74 42 79 radigm */. etBy
1010: 74 65 20 63 68 61 72 73 65 74 3b 20 20 20 20 20 te charset;
1020: 20 20 20 20 20 2f 2a 20 4f 66 66 73 65 74 20 69 /* Offset i
1030: 6e 74 6f 20 61 44 69 67 69 74 73 5b 5d 20 6f 66 nto aDigits[] of
1040: 20 74 68 65 20 64 69 67 69 74 73 20 73 74 72 69 the digits stri
1050: 6e 67 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 70 ng */. etByte p
1060: 72 65 66 69 78 3b 20 20 20 20 20 20 20 20 20 20 refix;
1070: 20 2f 2a 20 4f 66 66 73 65 74 20 69 6e 74 6f 20 /* Offset into
1080: 61 50 72 65 66 69 78 5b 5d 20 6f 66 20 74 68 65 aPrefix[] of the
1090: 20 70 72 65 66 69 78 20 73 74 72 69 6e 67 20 2a prefix string *
10a0: 2f 0a 7d 20 65 74 5f 69 6e 66 6f 3b 0a 0a 2f 2a /.} et_info;../*
10b0: 0a 2a 2a 20 41 6c 6c 6f 77 65 64 20 76 61 6c 75 .** Allowed valu
10c0: 65 73 20 66 6f 72 20 65 74 5f 69 6e 66 6f 2e 66 es for et_info.f
10d0: 6c 61 67 73 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 lags.*/.#define
10e0: 46 4c 41 47 5f 53 49 47 4e 45 44 20 20 31 20 20 FLAG_SIGNED 1
10f0: 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 74 68 /* True if th
1100: 65 20 76 61 6c 75 65 20 74 6f 20 63 6f 6e 76 65 e value to conve
1110: 72 74 20 69 73 20 73 69 67 6e 65 64 20 2a 2f 0a rt is signed */.
1120: 23 64 65 66 69 6e 65 20 46 4c 41 47 5f 49 4e 54 #define FLAG_INT
1130: 45 52 4e 20 20 32 20 20 20 20 20 2f 2a 20 54 72 ERN 2 /* Tr
1140: 75 65 20 69 66 20 66 6f 72 20 69 6e 74 65 72 6e ue if for intern
1150: 61 6c 20 75 73 65 20 6f 6e 6c 79 20 2a 2f 0a 23 al use only */.#
1160: 64 65 66 69 6e 65 20 46 4c 41 47 5f 53 54 52 49 define FLAG_STRI
1170: 4e 47 20 20 34 20 20 20 20 20 2f 2a 20 41 6c 6c NG 4 /* All
1180: 6f 77 20 69 6e 66 69 6e 69 74 79 20 70 72 65 63 ow infinity prec
1190: 69 73 69 6f 6e 20 2a 2f 0a 0a 0a 2f 2a 0a 2a 2a ision */.../*.**
11a0: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 The following t
11b0: 61 62 6c 65 20 69 73 20 73 65 61 72 63 68 65 64 able is searched
11c0: 20 6c 69 6e 65 61 72 6c 79 2c 20 73 6f 20 69 74 linearly, so it
11d0: 20 69 73 20 67 6f 6f 64 20 74 6f 20 70 75 74 20 is good to put
11e0: 74 68 65 0a 2a 2a 20 6d 6f 73 74 20 66 72 65 71 the.** most freq
11f0: 75 65 6e 74 6c 79 20 75 73 65 64 20 63 6f 6e 76 uently used conv
1200: 65 72 73 69 6f 6e 20 74 79 70 65 73 20 66 69 72 ersion types fir
1210: 73 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 6f st..*/.static co
1220: 6e 73 74 20 63 68 61 72 20 61 44 69 67 69 74 73 nst char aDigits
1230: 5b 5d 20 3d 20 22 30 31 32 33 34 35 36 37 38 39 [] = "0123456789
1240: 41 42 43 44 45 46 30 31 32 33 34 35 36 37 38 39 ABCDEF0123456789
1250: 61 62 63 64 65 66 22 3b 0a 73 74 61 74 69 63 20 abcdef";.static
1260: 63 6f 6e 73 74 20 63 68 61 72 20 61 50 72 65 66 const char aPref
1270: 69 78 5b 5d 20 3d 20 22 2d 78 30 5c 30 30 30 58 ix[] = "-x0\000X
1280: 30 22 3b 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 0";.static const
1290: 20 65 74 5f 69 6e 66 6f 20 66 6d 74 69 6e 66 6f et_info fmtinfo
12a0: 5b 5d 20 3d 20 7b 0a 20 20 7b 20 20 27 64 27 2c [] = {. { 'd',
12b0: 20 31 30 2c 20 31 2c 20 65 74 52 41 44 49 58 2c 10, 1, etRADIX,
12c0: 20 20 20 20 20 20 30 2c 20 20 30 20 7d 2c 0a 20 0, 0 },.
12d0: 20 7b 20 20 27 73 27 2c 20 20 30 2c 20 34 2c 20 { 's', 0, 4,
12e0: 65 74 53 54 52 49 4e 47 2c 20 20 20 20 20 30 2c etSTRING, 0,
12f0: 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 67 27 2c 0 },. { 'g',
1300: 20 20 30 2c 20 31 2c 20 65 74 47 45 4e 45 52 49 0, 1, etGENERI
1310: 43 2c 20 20 20 20 33 30 2c 20 30 20 7d 2c 0a 20 C, 30, 0 },.
1320: 20 7b 20 20 27 7a 27 2c 20 20 30 2c 20 34 2c 20 { 'z', 0, 4,
1330: 65 74 44 59 4e 53 54 52 49 4e 47 2c 20 20 30 2c etDYNSTRING, 0,
1340: 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 71 27 2c 0 },. { 'q',
1350: 20 20 30 2c 20 34 2c 20 65 74 53 51 4c 45 53 43 0, 4, etSQLESC
1360: 41 50 45 2c 20 20 30 2c 20 20 30 20 7d 2c 0a 20 APE, 0, 0 },.
1370: 20 7b 20 20 27 51 27 2c 20 20 30 2c 20 34 2c 20 { 'Q', 0, 4,
1380: 65 74 53 51 4c 45 53 43 41 50 45 32 2c 20 30 2c etSQLESCAPE2, 0,
1390: 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 77 27 2c 0 },. { 'w',
13a0: 20 20 30 2c 20 34 2c 20 65 74 53 51 4c 45 53 43 0, 4, etSQLESC
13b0: 41 50 45 33 2c 20 30 2c 20 20 30 20 7d 2c 0a 20 APE3, 0, 0 },.
13c0: 20 7b 20 20 27 63 27 2c 20 20 30 2c 20 30 2c 20 { 'c', 0, 0,
13d0: 65 74 43 48 41 52 58 2c 20 20 20 20 20 20 30 2c etCHARX, 0,
13e0: 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 6f 27 2c 0 },. { 'o',
13f0: 20 20 38 2c 20 30 2c 20 65 74 52 41 44 49 58 2c 8, 0, etRADIX,
1400: 20 20 20 20 20 20 30 2c 20 20 32 20 7d 2c 0a 20 0, 2 },.
1410: 20 7b 20 20 27 75 27 2c 20 31 30 2c 20 30 2c 20 { 'u', 10, 0,
1420: 65 74 52 41 44 49 58 2c 20 20 20 20 20 20 30 2c etRADIX, 0,
1430: 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 78 27 2c 0 },. { 'x',
1440: 20 31 36 2c 20 30 2c 20 65 74 52 41 44 49 58 2c 16, 0, etRADIX,
1450: 20 20 20 20 20 20 31 36 2c 20 31 20 7d 2c 0a 20 16, 1 },.
1460: 20 7b 20 20 27 58 27 2c 20 31 36 2c 20 30 2c 20 { 'X', 16, 0,
1470: 65 74 52 41 44 49 58 2c 20 20 20 20 20 20 30 2c etRADIX, 0,
1480: 20 20 34 20 7d 2c 0a 23 69 66 6e 64 65 66 20 53 4 },.#ifndef S
1490: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 QLITE_OMIT_FLOAT
14a0: 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 7b 20 20 27 ING_POINT. { '
14b0: 66 27 2c 20 20 30 2c 20 31 2c 20 65 74 46 4c 4f f', 0, 1, etFLO
14c0: 41 54 2c 20 20 20 20 20 20 30 2c 20 20 30 20 7d AT, 0, 0 }
14d0: 2c 0a 20 20 7b 20 20 27 65 27 2c 20 20 30 2c 20 ,. { 'e', 0,
14e0: 31 2c 20 65 74 45 58 50 2c 20 20 20 20 20 20 20 1, etEXP,
14f0: 20 33 30 2c 20 30 20 7d 2c 0a 20 20 7b 20 20 27 30, 0 },. { '
1500: 45 27 2c 20 20 30 2c 20 31 2c 20 65 74 45 58 50 E', 0, 1, etEXP
1510: 2c 20 20 20 20 20 20 20 20 31 34 2c 20 30 20 7d , 14, 0 }
1520: 2c 0a 20 20 7b 20 20 27 47 27 2c 20 20 30 2c 20 ,. { 'G', 0,
1530: 31 2c 20 65 74 47 45 4e 45 52 49 43 2c 20 20 20 1, etGENERIC,
1540: 20 31 34 2c 20 30 20 7d 2c 0a 23 65 6e 64 69 66 14, 0 },.#endif
1550: 0a 20 20 7b 20 20 27 69 27 2c 20 31 30 2c 20 31 . { 'i', 10, 1
1560: 2c 20 65 74 52 41 44 49 58 2c 20 20 20 20 20 20 , etRADIX,
1570: 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 6e 0, 0 },. { 'n
1580: 27 2c 20 20 30 2c 20 30 2c 20 65 74 53 49 5a 45 ', 0, 0, etSIZE
1590: 2c 20 20 20 20 20 20 20 30 2c 20 20 30 20 7d 2c , 0, 0 },
15a0: 0a 20 20 7b 20 20 27 25 27 2c 20 20 30 2c 20 30 . { '%', 0, 0
15b0: 2c 20 65 74 50 45 52 43 45 4e 54 2c 20 20 20 20 , etPERCENT,
15c0: 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 70 0, 0 },. { 'p
15d0: 27 2c 20 31 36 2c 20 30 2c 20 65 74 50 4f 49 4e ', 16, 0, etPOIN
15e0: 54 45 52 2c 20 20 20 20 30 2c 20 20 31 20 7d 2c TER, 0, 1 },
15f0: 0a 0a 2f 2a 20 41 6c 6c 20 74 68 65 20 72 65 73 ../* All the res
1600: 74 20 68 61 76 65 20 74 68 65 20 46 4c 41 47 5f t have the FLAG_
1610: 49 4e 54 45 52 4e 20 62 69 74 20 73 65 74 20 61 INTERN bit set a
1620: 6e 64 20 61 72 65 20 74 68 75 73 20 66 6f 72 20 nd are thus for
1630: 69 6e 74 65 72 6e 61 6c 0a 2a 2a 20 75 73 65 20 internal.** use
1640: 6f 6e 6c 79 20 2a 2f 0a 20 20 7b 20 20 27 54 27 only */. { 'T'
1650: 2c 20 20 30 2c 20 32 2c 20 65 74 54 4f 4b 45 4e , 0, 2, etTOKEN
1660: 2c 20 20 20 20 20 20 30 2c 20 20 30 20 7d 2c 0a , 0, 0 },.
1670: 20 20 7b 20 20 27 53 27 2c 20 20 30 2c 20 32 2c { 'S', 0, 2,
1680: 20 65 74 53 52 43 4c 49 53 54 2c 20 20 20 20 30 etSRCLIST, 0
1690: 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 72 27 , 0 },. { 'r'
16a0: 2c 20 31 30 2c 20 33 2c 20 65 74 4f 52 44 49 4e , 10, 3, etORDIN
16b0: 41 4c 2c 20 20 20 20 30 2c 20 20 30 20 7d 2c 0a AL, 0, 0 },.
16c0: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 53 51 4c };../*.** If SQL
16d0: 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e ITE_OMIT_FLOATIN
16e0: 47 5f 50 4f 49 4e 54 20 69 73 20 64 65 66 69 6e G_POINT is defin
16f0: 65 64 2c 20 74 68 65 6e 20 6e 6f 6e 65 20 6f 66 ed, then none of
1700: 20 74 68 65 20 66 6c 6f 61 74 69 6e 67 20 70 6f the floating po
1710: 69 6e 74 0a 2a 2a 20 63 6f 6e 76 65 72 73 69 6f int.** conversio
1720: 6e 73 20 77 69 6c 6c 20 77 6f 72 6b 2e 0a 2a 2f ns will work..*/
1730: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f .#ifndef SQLITE_
1740: 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f OMIT_FLOATING_PO
1750: 49 4e 54 0a 2f 2a 0a 2a 2a 20 22 2a 76 61 6c 22 INT./*.** "*val"
1760: 20 69 73 20 61 20 64 6f 75 62 6c 65 20 73 75 63 is a double suc
1770: 68 20 74 68 61 74 20 30 2e 31 20 3c 3d 20 2a 76 h that 0.1 <= *v
1780: 61 6c 20 3c 20 31 30 2e 30 0a 2a 2a 20 52 65 74 al < 10.0.** Ret
1790: 75 72 6e 20 74 68 65 20 61 73 63 69 69 20 63 6f urn the ascii co
17a0: 64 65 20 66 6f 72 20 74 68 65 20 6c 65 61 64 69 de for the leadi
17b0: 6e 67 20 64 69 67 69 74 20 6f 66 20 2a 76 61 6c ng digit of *val
17c0: 2c 20 74 68 65 6e 0a 2a 2a 20 6d 75 6c 74 69 70 , then.** multip
17d0: 6c 79 20 22 2a 76 61 6c 22 20 62 79 20 31 30 2e ly "*val" by 10.
17e0: 30 20 74 6f 20 72 65 6e 6f 72 6d 61 6c 69 7a 65 0 to renormalize
17f0: 2e 0a 2a 2a 0a 2a 2a 20 45 78 61 6d 70 6c 65 3a ..**.** Example:
1800: 0a 2a 2a 20 20 20 20 20 69 6e 70 75 74 3a 20 20 .** input:
1810: 20 20 20 2a 76 61 6c 20 3d 20 33 2e 31 34 31 35 *val = 3.1415
1820: 39 0a 2a 2a 20 20 20 20 20 6f 75 74 70 75 74 3a 9.** output:
1830: 20 20 20 20 2a 76 61 6c 20 3d 20 31 2e 34 31 35 *val = 1.415
1840: 39 20 20 20 20 66 75 6e 63 74 69 6f 6e 20 72 65 9 function re
1850: 74 75 72 6e 20 3d 20 27 33 27 0a 2a 2a 0a 2a 2a turn = '3'.**.**
1860: 20 54 68 65 20 63 6f 75 6e 74 65 72 20 2a 63 6e The counter *cn
1870: 74 20 69 73 20 69 6e 63 72 65 6d 65 6e 74 65 64 t is incremented
1880: 20 65 61 63 68 20 74 69 6d 65 2e 20 20 41 66 74 each time. Aft
1890: 65 72 20 63 6f 75 6e 74 65 72 20 65 78 63 65 65 er counter excee
18a0: 64 73 0a 2a 2a 20 31 36 20 28 74 68 65 20 6e 75 ds.** 16 (the nu
18b0: 6d 62 65 72 20 6f 66 20 73 69 67 6e 69 66 69 63 mber of signific
18c0: 61 6e 74 20 64 69 67 69 74 73 20 69 6e 20 61 20 ant digits in a
18d0: 36 34 2d 62 69 74 20 66 6c 6f 61 74 29 20 27 30 64-bit float) '0
18e0: 27 20 69 73 0a 2a 2a 20 61 6c 77 61 79 73 20 72 ' is.** always r
18f0: 65 74 75 72 6e 65 64 2e 0a 2a 2f 0a 73 74 61 74 eturned..*/.stat
1900: 69 63 20 63 68 61 72 20 65 74 5f 67 65 74 64 69 ic char et_getdi
1910: 67 69 74 28 4c 4f 4e 47 44 4f 55 42 4c 45 5f 54 git(LONGDOUBLE_T
1920: 59 50 45 20 2a 76 61 6c 2c 20 69 6e 74 20 2a 63 YPE *val, int *c
1930: 6e 74 29 7b 0a 20 20 69 6e 74 20 64 69 67 69 74 nt){. int digit
1940: 3b 0a 20 20 4c 4f 4e 47 44 4f 55 42 4c 45 5f 54 ;. LONGDOUBLE_T
1950: 59 50 45 20 64 3b 0a 20 20 69 66 28 20 28 2a 63 YPE d;. if( (*c
1960: 6e 74 29 2b 2b 20 3e 3d 20 31 36 20 29 20 72 65 nt)++ >= 16 ) re
1970: 74 75 72 6e 20 27 30 27 3b 0a 20 20 64 69 67 69 turn '0';. digi
1980: 74 20 3d 20 28 69 6e 74 29 2a 76 61 6c 3b 0a 20 t = (int)*val;.
1990: 20 64 20 3d 20 64 69 67 69 74 3b 0a 20 20 64 69 d = digit;. di
19a0: 67 69 74 20 2b 3d 20 27 30 27 3b 0a 20 20 2a 76 git += '0';. *v
19b0: 61 6c 20 3d 20 28 2a 76 61 6c 20 2d 20 64 29 2a al = (*val - d)*
19c0: 31 30 2e 30 3b 0a 20 20 72 65 74 75 72 6e 20 28 10.0;. return (
19d0: 63 68 61 72 29 64 69 67 69 74 3b 0a 7d 0a 23 65 char)digit;.}.#e
19e0: 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 4f ndif /* SQLITE_O
19f0: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 MIT_FLOATING_POI
1a00: 4e 54 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 70 70 NT */../*.** App
1a10: 65 6e 64 20 4e 20 73 70 61 63 65 20 63 68 61 72 end N space char
1a20: 61 63 74 65 72 73 20 74 6f 20 74 68 65 20 67 69 acters to the gi
1a30: 76 65 6e 20 73 74 72 69 6e 67 20 62 75 66 66 65 ven string buffe
1a40: 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 r..*/.static voi
1a50: 64 20 61 70 70 65 6e 64 53 70 61 63 65 28 53 74 d appendSpace(St
1a60: 72 41 63 63 75 6d 20 2a 70 41 63 63 75 6d 2c 20 rAccum *pAccum,
1a70: 69 6e 74 20 4e 29 7b 0a 20 20 73 74 61 74 69 63 int N){. static
1a80: 20 63 6f 6e 73 74 20 63 68 61 72 20 7a 53 70 61 const char zSpa
1a90: 63 65 73 5b 5d 20 3d 20 22 20 20 20 20 20 20 20 ces[] = "
1aa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1ab0: 20 20 20 20 20 20 22 3b 0a 20 20 77 68 69 6c 65 ";. while
1ac0: 28 20 4e 3e 3d 28 69 6e 74 29 73 69 7a 65 6f 66 ( N>=(int)sizeof
1ad0: 28 7a 53 70 61 63 65 73 29 2d 31 20 29 7b 0a 20 (zSpaces)-1 ){.
1ae0: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 sqlite3StrAcc
1af0: 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c umAppend(pAccum,
1b00: 20 7a 53 70 61 63 65 73 2c 20 73 69 7a 65 6f 66 zSpaces, sizeof
1b10: 28 7a 53 70 61 63 65 73 29 2d 31 29 3b 0a 20 20 (zSpaces)-1);.
1b20: 20 20 4e 20 2d 3d 20 73 69 7a 65 6f 66 28 7a 53 N -= sizeof(zS
1b30: 70 61 63 65 73 29 2d 31 3b 0a 20 20 7d 0a 20 20 paces)-1;. }.
1b40: 69 66 28 20 4e 3e 30 20 29 7b 0a 20 20 20 20 73 if( N>0 ){. s
1b50: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 qlite3StrAccumAp
1b60: 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 53 70 pend(pAccum, zSp
1b70: 61 63 65 73 2c 20 4e 29 3b 0a 20 20 7d 0a 7d 0a aces, N);. }.}.
1b80: 0a 2f 2a 0a 2a 2a 20 4f 6e 20 6d 61 63 68 69 6e ./*.** On machin
1b90: 65 73 20 77 69 74 68 20 61 20 73 6d 61 6c 6c 20 es with a small
1ba0: 73 74 61 63 6b 20 73 69 7a 65 2c 20 79 6f 75 20 stack size, you
1bb0: 63 61 6e 20 72 65 64 65 66 69 6e 65 20 74 68 65 can redefine the
1bc0: 0a 2a 2a 20 53 51 4c 49 54 45 5f 50 52 49 4e 54 .** SQLITE_PRINT
1bd0: 5f 42 55 46 5f 53 49 5a 45 20 74 6f 20 62 65 20 _BUF_SIZE to be
1be0: 6c 65 73 73 20 74 68 61 6e 20 33 35 30 2e 0a 2a less than 350..*
1bf0: 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 /.#ifndef SQLITE
1c00: 5f 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a 45 0a _PRINT_BUF_SIZE.
1c10: 23 20 69 66 20 64 65 66 69 6e 65 64 28 53 51 4c # if defined(SQL
1c20: 49 54 45 5f 53 4d 41 4c 4c 5f 53 54 41 43 4b 29 ITE_SMALL_STACK)
1c30: 0a 23 20 20 20 64 65 66 69 6e 65 20 53 51 4c 49 .# define SQLI
1c40: 54 45 5f 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a TE_PRINT_BUF_SIZ
1c50: 45 20 35 30 0a 23 20 65 6c 73 65 0a 23 20 20 20 E 50.# else.#
1c60: 64 65 66 69 6e 65 20 53 51 4c 49 54 45 5f 50 52 define SQLITE_PR
1c70: 49 4e 54 5f 42 55 46 5f 53 49 5a 45 20 33 35 30 INT_BUF_SIZE 350
1c80: 0a 23 20 65 6e 64 69 66 0a 23 65 6e 64 69 66 0a .# endif.#endif.
1c90: 23 64 65 66 69 6e 65 20 65 74 42 55 46 53 49 5a #define etBUFSIZ
1ca0: 45 20 53 51 4c 49 54 45 5f 50 52 49 4e 54 5f 42 E SQLITE_PRINT_B
1cb0: 55 46 5f 53 49 5a 45 20 20 2f 2a 20 53 69 7a 65 UF_SIZE /* Size
1cc0: 20 6f 66 20 74 68 65 20 6f 75 74 70 75 74 20 62 of the output b
1cd0: 75 66 66 65 72 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 uffer */../*.**
1ce0: 54 68 65 20 72 6f 6f 74 20 70 72 6f 67 72 61 6d The root program
1cf0: 2e 20 20 41 6c 6c 20 76 61 72 69 61 74 69 6f 6e . All variation
1d00: 73 20 63 61 6c 6c 20 74 68 69 73 20 63 6f 72 65 s call this core
1d10: 2e 0a 2a 2a 0a 2a 2a 20 49 4e 50 55 54 53 3a 0a ..**.** INPUTS:.
1d20: 2a 2a 20 20 20 66 75 6e 63 20 20 20 54 68 69 73 ** func This
1d30: 20 69 73 20 61 20 70 6f 69 6e 74 65 72 20 74 6f is a pointer to
1d40: 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 61 6b 69 a function taki
1d50: 6e 67 20 74 68 72 65 65 20 61 72 67 75 6d 65 6e ng three argumen
1d60: 74 73 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 ts.**
1d70: 20 31 2e 20 41 20 70 6f 69 6e 74 65 72 20 74 6f 1. A pointer to
1d80: 20 61 6e 79 74 68 69 6e 67 2e 20 20 53 61 6d 65 anything. Same
1d90: 20 61 73 20 74 68 65 20 22 61 72 67 22 20 70 61 as the "arg" pa
1da0: 72 61 6d 65 74 65 72 2e 0a 2a 2a 20 20 20 20 20 rameter..**
1db0: 20 20 20 20 20 20 20 32 2e 20 41 20 70 6f 69 6e 2. A poin
1dc0: 74 65 72 20 74 6f 20 74 68 65 20 6c 69 73 74 20 ter to the list
1dd0: 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 74 6f of characters to
1de0: 20 62 65 20 6f 75 74 70 75 74 0a 2a 2a 20 20 20 be output.**
1df0: 20 20 20 20 20 20 20 20 20 20 20 20 28 4e 6f 74 (Not
1e00: 65 2c 20 74 68 69 73 20 6c 69 73 74 20 69 73 20 e, this list is
1e10: 4e 4f 54 20 6e 75 6c 6c 20 74 65 72 6d 69 6e 61 NOT null termina
1e20: 74 65 64 2e 29 0a 2a 2a 20 20 20 20 20 20 20 20 ted.).**
1e30: 20 20 20 20 33 2e 20 41 6e 20 69 6e 74 65 67 65 3. An intege
1e40: 72 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 72 r number of char
1e50: 61 63 74 65 72 73 20 74 6f 20 62 65 20 6f 75 74 acters to be out
1e60: 70 75 74 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 put..**
1e70: 20 20 20 20 20 20 28 4e 6f 74 65 3a 20 54 68 69 (Note: Thi
1e80: 73 20 6e 75 6d 62 65 72 20 6d 69 67 68 74 20 62 s number might b
1e90: 65 20 7a 65 72 6f 2e 29 0a 2a 2a 0a 2a 2a 20 20 e zero.).**.**
1ea0: 20 61 72 67 20 20 20 20 54 68 69 73 20 69 73 20 arg This is
1eb0: 74 68 65 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 the pointer to a
1ec0: 6e 79 74 68 69 6e 67 20 77 68 69 63 68 20 77 69 nything which wi
1ed0: 6c 6c 20 62 65 20 70 61 73 73 65 64 20 61 73 20 ll be passed as
1ee0: 74 68 65 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 the.**
1ef0: 66 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20 74 first argument t
1f00: 6f 20 22 66 75 6e 63 22 2e 20 20 55 73 65 20 69 o "func". Use i
1f10: 74 20 66 6f 72 20 77 68 61 74 65 76 65 72 20 79 t for whatever y
1f20: 6f 75 20 6c 69 6b 65 2e 0a 2a 2a 0a 2a 2a 20 20 ou like..**.**
1f30: 20 66 6d 74 20 20 20 20 54 68 69 73 20 69 73 20 fmt This is
1f40: 74 68 65 20 66 6f 72 6d 61 74 20 73 74 72 69 6e the format strin
1f50: 67 2c 20 61 73 20 69 6e 20 74 68 65 20 75 73 75 g, as in the usu
1f60: 61 6c 20 70 72 69 6e 74 2e 0a 2a 2a 0a 2a 2a 20 al print..**.**
1f70: 20 20 61 70 20 20 20 20 20 54 68 69 73 20 69 73 ap This is
1f80: 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 20 a pointer to a
1f90: 6c 69 73 74 20 6f 66 20 61 72 67 75 6d 65 6e 74 list of argument
1fa0: 73 2e 20 20 53 61 6d 65 20 61 73 20 69 6e 0a 2a s. Same as in.*
1fb0: 2a 20 20 20 20 20 20 20 20 20 20 76 66 70 72 69 * vfpri
1fc0: 6e 74 2e 0a 2a 2a 0a 2a 2a 20 4f 55 54 50 55 54 nt..**.** OUTPUT
1fd0: 53 3a 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 54 S:.** T
1fe0: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 he return value
1ff0: 69 73 20 74 68 65 20 74 6f 74 61 6c 20 6e 75 6d is the total num
2000: 62 65 72 20 6f 66 20 63 68 61 72 61 63 74 65 72 ber of character
2010: 73 20 73 65 6e 74 20 74 6f 0a 2a 2a 20 20 20 20 s sent to.**
2020: 20 20 20 20 20 20 74 68 65 20 66 75 6e 63 74 69 the functi
2030: 6f 6e 20 22 66 75 6e 63 22 2e 20 20 52 65 74 75 on "func". Retu
2040: 72 6e 73 20 2d 31 20 6f 6e 20 61 20 65 72 72 6f rns -1 on a erro
2050: 72 2e 0a 2a 2a 0a 2a 2a 20 4e 6f 74 65 20 74 68 r..**.** Note th
2060: 61 74 20 74 68 65 20 6f 72 64 65 72 20 69 6e 20 at the order in
2070: 77 68 69 63 68 20 61 75 74 6f 6d 61 74 69 63 20 which automatic
2080: 76 61 72 69 61 62 6c 65 73 20 61 72 65 20 64 65 variables are de
2090: 63 6c 61 72 65 64 20 62 65 6c 6f 77 0a 2a 2a 20 clared below.**
20a0: 73 65 65 6d 73 20 74 6f 20 6d 61 6b 65 20 61 20 seems to make a
20b0: 62 69 67 20 64 69 66 66 65 72 65 6e 63 65 20 69 big difference i
20c0: 6e 20 64 65 74 65 72 6d 69 6e 69 6e 67 20 68 6f n determining ho
20d0: 77 20 66 61 73 74 20 74 68 69 73 20 62 65 61 73 w fast this beas
20e0: 74 0a 2a 2a 20 77 69 6c 6c 20 72 75 6e 2e 0a 2a t.** will run..*
20f0: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 56 58 /.void sqlite3VX
2100: 50 72 69 6e 74 66 28 0a 20 20 53 74 72 41 63 63 Printf(. StrAcc
2110: 75 6d 20 2a 70 41 63 63 75 6d 2c 20 20 20 20 20 um *pAccum,
2120: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
2130: 41 63 63 75 6d 75 6c 61 74 65 20 72 65 73 75 6c Accumulate resul
2140: 74 73 20 68 65 72 65 20 2a 2f 0a 20 20 69 6e 74 ts here */. int
2150: 20 75 73 65 45 78 74 65 6e 64 65 64 2c 20 20 20 useExtended,
2160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2170: 2f 2a 20 41 6c 6c 6f 77 20 65 78 74 65 6e 64 65 /* Allow extende
2180: 64 20 25 2d 63 6f 6e 76 65 72 73 69 6f 6e 73 20 d %-conversions
2190: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 */. const char
21a0: 2a 66 6d 74 2c 20 20 20 20 20 20 20 20 20 20 20 *fmt,
21b0: 20 20 20 20 20 20 20 20 2f 2a 20 46 6f 72 6d 61 /* Forma
21c0: 74 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 76 61 t string */. va
21d0: 5f 6c 69 73 74 20 61 70 20 20 20 20 20 20 20 20 _list ap
21e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
21f0: 20 2f 2a 20 61 72 67 75 6d 65 6e 74 73 20 2a 2f /* arguments */
2200: 0a 29 7b 0a 20 20 69 6e 74 20 63 3b 20 20 20 20 .){. int c;
2210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2220: 20 2f 2a 20 4e 65 78 74 20 63 68 61 72 61 63 74 /* Next charact
2230: 65 72 20 69 6e 20 74 68 65 20 66 6f 72 6d 61 74 er in the format
2240: 20 73 74 72 69 6e 67 20 2a 2f 0a 20 20 63 68 61 string */. cha
2250: 72 20 2a 62 75 66 70 74 3b 20 20 20 20 20 20 20 r *bufpt;
2260: 20 20 20 20 20 20 20 20 2f 2a 20 50 6f 69 6e 74 /* Point
2270: 65 72 20 74 6f 20 74 68 65 20 63 6f 6e 76 65 72 er to the conver
2280: 73 69 6f 6e 20 62 75 66 66 65 72 20 2a 2f 0a 20 sion buffer */.
2290: 20 69 6e 74 20 70 72 65 63 69 73 69 6f 6e 3b 20 int precision;
22a0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 50 /* P
22b0: 72 65 63 69 73 69 6f 6e 20 6f 66 20 74 68 65 20 recision of the
22c0: 63 75 72 72 65 6e 74 20 66 69 65 6c 64 20 2a 2f current field */
22d0: 0a 20 20 69 6e 74 20 6c 65 6e 67 74 68 3b 20 20 . int length;
22e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
22f0: 20 4c 65 6e 67 74 68 20 6f 66 20 74 68 65 20 66 Length of the f
2300: 69 65 6c 64 20 2a 2f 0a 20 20 69 6e 74 20 69 64 ield */. int id
2310: 78 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 x;
2320: 20 20 20 20 20 2f 2a 20 41 20 67 65 6e 65 72 61 /* A genera
2330: 6c 20 70 75 72 70 6f 73 65 20 6c 6f 6f 70 20 63 l purpose loop c
2340: 6f 75 6e 74 65 72 20 2a 2f 0a 20 20 69 6e 74 20 ounter */. int
2350: 77 69 64 74 68 3b 20 20 20 20 20 20 20 20 20 20 width;
2360: 20 20 20 20 20 20 20 2f 2a 20 57 69 64 74 68 20 /* Width
2370: 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 of the current f
2380: 69 65 6c 64 20 2a 2f 0a 20 20 65 74 42 79 74 65 ield */. etByte
2390: 20 66 6c 61 67 5f 6c 65 66 74 6a 75 73 74 69 66 flag_leftjustif
23a0: 79 3b 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 y; /* True if
23b0: 22 2d 22 20 66 6c 61 67 20 69 73 20 70 72 65 73 "-" flag is pres
23c0: 65 6e 74 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 ent */. etByte
23d0: 66 6c 61 67 5f 70 6c 75 73 73 69 67 6e 3b 20 20 flag_plussign;
23e0: 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 22 /* True if "
23f0: 2b 22 20 66 6c 61 67 20 69 73 20 70 72 65 73 65 +" flag is prese
2400: 6e 74 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 nt */. etByte f
2410: 6c 61 67 5f 62 6c 61 6e 6b 73 69 67 6e 3b 20 20 lag_blanksign;
2420: 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 22 20 /* True if "
2430: 22 20 66 6c 61 67 20 69 73 20 70 72 65 73 65 6e " flag is presen
2440: 74 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 6c t */. etByte fl
2450: 61 67 5f 61 6c 74 65 72 6e 61 74 65 66 6f 72 6d ag_alternateform
2460: 3b 20 2f 2a 20 54 72 75 65 20 69 66 20 22 23 22 ; /* True if "#"
2470: 20 66 6c 61 67 20 69 73 20 70 72 65 73 65 6e 74 flag is present
2480: 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 6c 61 */. etByte fla
2490: 67 5f 61 6c 74 66 6f 72 6d 32 3b 20 20 20 20 20 g_altform2;
24a0: 20 2f 2a 20 54 72 75 65 20 69 66 20 22 21 22 20 /* True if "!"
24b0: 66 6c 61 67 20 69 73 20 70 72 65 73 65 6e 74 20 flag is present
24c0: 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 6c 61 67 */. etByte flag
24d0: 5f 7a 65 72 6f 70 61 64 3b 20 20 20 20 20 20 20 _zeropad;
24e0: 2f 2a 20 54 72 75 65 20 69 66 20 66 69 65 6c 64 /* True if field
24f0: 20 77 69 64 74 68 20 63 6f 6e 73 74 61 6e 74 20 width constant
2500: 73 74 61 72 74 73 20 77 69 74 68 20 7a 65 72 6f starts with zero
2510: 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 6c 61 */. etByte fla
2520: 67 5f 6c 6f 6e 67 3b 20 20 20 20 20 20 20 20 20 g_long;
2530: 20 2f 2a 20 54 72 75 65 20 69 66 20 22 6c 22 20 /* True if "l"
2540: 66 6c 61 67 20 69 73 20 70 72 65 73 65 6e 74 20 flag is present
2550: 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 6c 61 67 */. etByte flag
2560: 5f 6c 6f 6e 67 6c 6f 6e 67 3b 20 20 20 20 20 20 _longlong;
2570: 2f 2a 20 54 72 75 65 20 69 66 20 74 68 65 20 22 /* True if the "
2580: 6c 6c 22 20 66 6c 61 67 20 69 73 20 70 72 65 73 ll" flag is pres
2590: 65 6e 74 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 ent */. etByte
25a0: 64 6f 6e 65 3b 20 20 20 20 20 20 20 20 20 20 20 done;
25b0: 20 20 20 20 2f 2a 20 4c 6f 6f 70 20 74 65 72 6d /* Loop term
25c0: 69 6e 61 74 69 6f 6e 20 66 6c 61 67 20 2a 2f 0a ination flag */.
25d0: 20 20 73 71 6c 69 74 65 5f 75 69 6e 74 36 34 20 sqlite_uint64
25e0: 6c 6f 6e 67 76 61 6c 75 65 3b 20 20 20 2f 2a 20 longvalue; /*
25f0: 56 61 6c 75 65 20 66 6f 72 20 69 6e 74 65 67 65 Value for intege
2600: 72 20 74 79 70 65 73 20 2a 2f 0a 20 20 4c 4f 4e r types */. LON
2610: 47 44 4f 55 42 4c 45 5f 54 59 50 45 20 72 65 61 GDOUBLE_TYPE rea
2620: 6c 76 61 6c 75 65 3b 20 2f 2a 20 56 61 6c 75 65 lvalue; /* Value
2630: 20 66 6f 72 20 72 65 61 6c 20 74 79 70 65 73 20 for real types
2640: 2a 2f 0a 20 20 63 6f 6e 73 74 20 65 74 5f 69 6e */. const et_in
2650: 66 6f 20 2a 69 6e 66 6f 70 3b 20 20 20 20 20 20 fo *infop;
2660: 2f 2a 20 50 6f 69 6e 74 65 72 20 74 6f 20 74 68 /* Pointer to th
2670: 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 69 6e e appropriate in
2680: 66 6f 20 73 74 72 75 63 74 75 72 65 20 2a 2f 0a fo structure */.
2690: 20 20 63 68 61 72 20 62 75 66 5b 65 74 42 55 46 char buf[etBUF
26a0: 53 49 5a 45 5d 3b 20 20 20 20 20 20 20 2f 2a 20 SIZE]; /*
26b0: 43 6f 6e 76 65 72 73 69 6f 6e 20 62 75 66 66 65 Conversion buffe
26c0: 72 20 2a 2f 0a 20 20 63 68 61 72 20 70 72 65 66 r */. char pref
26d0: 69 78 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ix;
26e0: 20 20 2f 2a 20 50 72 65 66 69 78 20 63 68 61 72 /* Prefix char
26f0: 61 63 74 65 72 2e 20 20 22 2b 22 20 6f 72 20 22 acter. "+" or "
2700: 2d 22 20 6f 72 20 22 20 22 20 6f 72 20 27 5c 30 -" or " " or '\0
2710: 27 2e 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 78 '. */. etByte x
2720: 74 79 70 65 20 3d 20 30 3b 20 20 20 20 20 20 20 type = 0;
2730: 20 20 20 2f 2a 20 43 6f 6e 76 65 72 73 69 6f 6e /* Conversion
2740: 20 70 61 72 61 64 69 67 6d 20 2a 2f 0a 20 20 63 paradigm */. c
2750: 68 61 72 20 2a 7a 45 78 74 72 61 3b 20 20 20 20 har *zExtra;
2760: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 45 78 74 /* Ext
2770: 72 61 20 6d 65 6d 6f 72 79 20 75 73 65 64 20 66 ra memory used f
2780: 6f 72 20 65 74 54 43 4c 45 53 43 41 50 45 20 63 or etTCLESCAPE c
2790: 6f 6e 76 65 72 73 69 6f 6e 73 20 2a 2f 0a 23 69 onversions */.#i
27a0: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 fndef SQLITE_OMI
27b0: 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 T_FLOATING_POINT
27c0: 0a 20 20 69 6e 74 20 20 65 78 70 2c 20 65 32 3b . int exp, e2;
27d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
27e0: 20 65 78 70 6f 6e 65 6e 74 20 6f 66 20 72 65 61 exponent of rea
27f0: 6c 20 6e 75 6d 62 65 72 73 20 2a 2f 0a 20 20 64 l numbers */. d
2800: 6f 75 62 6c 65 20 72 6f 75 6e 64 65 72 3b 20 20 ouble rounder;
2810: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 55 73 65 /* Use
2820: 64 20 66 6f 72 20 72 6f 75 6e 64 69 6e 67 20 66 d for rounding f
2830: 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74 20 76 61 loating point va
2840: 6c 75 65 73 20 2a 2f 0a 20 20 65 74 42 79 74 65 lues */. etByte
2850: 20 66 6c 61 67 5f 64 70 3b 20 20 20 20 20 20 20 flag_dp;
2860: 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 /* True if
2870: 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 20 73 68 decimal point sh
2880: 6f 75 6c 64 20 62 65 20 73 68 6f 77 6e 20 2a 2f ould be shown */
2890: 0a 20 20 65 74 42 79 74 65 20 66 6c 61 67 5f 72 . etByte flag_r
28a0: 74 7a 3b 20 20 20 20 20 20 20 20 20 20 20 2f 2a tz; /*
28b0: 20 54 72 75 65 20 69 66 20 74 72 61 69 6c 69 6e True if trailin
28c0: 67 20 7a 65 72 6f 73 20 73 68 6f 75 6c 64 20 62 g zeros should b
28d0: 65 20 72 65 6d 6f 76 65 64 20 2a 2f 0a 20 20 65 e removed */. e
28e0: 74 42 79 74 65 20 66 6c 61 67 5f 65 78 70 3b 20 tByte flag_exp;
28f0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 72 75 /* Tru
2900: 65 20 74 6f 20 66 6f 72 63 65 20 64 69 73 70 6c e to force displ
2910: 61 79 20 6f 66 20 74 68 65 20 65 78 70 6f 6e 65 ay of the expone
2920: 6e 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 73 64 3b nt */. int nsd;
2930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2940: 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 /* Number of
2950: 73 69 67 6e 69 66 69 63 61 6e 74 20 64 69 67 69 significant digi
2960: 74 73 20 72 65 74 75 72 6e 65 64 20 2a 2f 0a 23 ts returned */.#
2970: 65 6e 64 69 66 0a 0a 20 20 6c 65 6e 67 74 68 20 endif.. length
2980: 3d 20 30 3b 0a 20 20 62 75 66 70 74 20 3d 20 30 = 0;. bufpt = 0
2990: 3b 0a 20 20 66 6f 72 28 3b 20 28 63 3d 28 2a 66 ;. for(; (c=(*f
29a0: 6d 74 29 29 21 3d 30 3b 20 2b 2b 66 6d 74 29 7b mt))!=0; ++fmt){
29b0: 0a 20 20 20 20 69 66 28 20 63 21 3d 27 25 27 20 . if( c!='%'
29c0: 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 61 6d 74 ){. int amt
29d0: 3b 0a 20 20 20 20 20 20 62 75 66 70 74 20 3d 20 ;. bufpt =
29e0: 28 63 68 61 72 20 2a 29 66 6d 74 3b 0a 20 20 20 (char *)fmt;.
29f0: 20 20 20 61 6d 74 20 3d 20 31 3b 0a 20 20 20 20 amt = 1;.
2a00: 20 20 77 68 69 6c 65 28 20 28 63 3d 28 2a 2b 2b while( (c=(*++
2a10: 66 6d 74 29 29 21 3d 27 25 27 20 26 26 20 63 21 fmt))!='%' && c!
2a20: 3d 30 20 29 20 61 6d 74 2b 2b 3b 0a 20 20 20 20 =0 ) amt++;.
2a30: 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 sqlite3StrAccu
2a40: 6d 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 mAppend(pAccum,
2a50: 62 75 66 70 74 2c 20 61 6d 74 29 3b 0a 20 20 20 bufpt, amt);.
2a60: 20 20 20 69 66 28 20 63 3d 3d 30 20 29 20 62 72 if( c==0 ) br
2a70: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 eak;. }. i
2a80: 66 28 20 28 63 3d 28 2a 2b 2b 66 6d 74 29 29 3d f( (c=(*++fmt))=
2a90: 3d 30 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 =0 ){. sqli
2aa0: 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 65 6e te3StrAccumAppen
2ab0: 64 28 70 41 63 63 75 6d 2c 20 22 25 22 2c 20 31 d(pAccum, "%", 1
2ac0: 29 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a );. break;.
2ad0: 20 20 20 20 7d 0a 20 20 20 20 2f 2a 20 46 69 6e }. /* Fin
2ae0: 64 20 6f 75 74 20 77 68 61 74 20 66 6c 61 67 73 d out what flags
2af0: 20 61 72 65 20 70 72 65 73 65 6e 74 20 2a 2f 0a are present */.
2b00: 20 20 20 20 66 6c 61 67 5f 6c 65 66 74 6a 75 73 flag_leftjus
2b10: 74 69 66 79 20 3d 20 66 6c 61 67 5f 70 6c 75 73 tify = flag_plus
2b20: 73 69 67 6e 20 3d 20 66 6c 61 67 5f 62 6c 61 6e sign = flag_blan
2b30: 6b 73 69 67 6e 20 3d 20 0a 20 20 20 20 20 66 6c ksign = . fl
2b40: 61 67 5f 61 6c 74 65 72 6e 61 74 65 66 6f 72 6d ag_alternateform
2b50: 20 3d 20 66 6c 61 67 5f 61 6c 74 66 6f 72 6d 32 = flag_altform2
2b60: 20 3d 20 66 6c 61 67 5f 7a 65 72 6f 70 61 64 20 = flag_zeropad
2b70: 3d 20 30 3b 0a 20 20 20 20 64 6f 6e 65 20 3d 20 = 0;. done =
2b80: 30 3b 0a 20 20 20 20 64 6f 7b 0a 20 20 20 20 20 0;. do{.
2b90: 20 73 77 69 74 63 68 28 20 63 20 29 7b 0a 20 20 switch( c ){.
2ba0: 20 20 20 20 20 20 63 61 73 65 20 27 2d 27 3a 20 case '-':
2bb0: 20 20 66 6c 61 67 5f 6c 65 66 74 6a 75 73 74 69 flag_leftjusti
2bc0: 66 79 20 3d 20 31 3b 20 20 20 20 20 62 72 65 61 fy = 1; brea
2bd0: 6b 3b 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 k;. case
2be0: 27 2b 27 3a 20 20 20 66 6c 61 67 5f 70 6c 75 73 '+': flag_plus
2bf0: 73 69 67 6e 20 3d 20 31 3b 20 20 20 20 20 20 20 sign = 1;
2c00: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 break;.
2c10: 63 61 73 65 20 27 20 27 3a 20 20 20 66 6c 61 67 case ' ': flag
2c20: 5f 62 6c 61 6e 6b 73 69 67 6e 20 3d 20 31 3b 20 _blanksign = 1;
2c30: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 break;.
2c40: 20 20 20 20 20 63 61 73 65 20 27 23 27 3a 20 20 case '#':
2c50: 20 66 6c 61 67 5f 61 6c 74 65 72 6e 61 74 65 66 flag_alternatef
2c60: 6f 72 6d 20 3d 20 31 3b 20 20 20 62 72 65 61 6b orm = 1; break
2c70: 3b 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 27 ;. case '
2c80: 21 27 3a 20 20 20 66 6c 61 67 5f 61 6c 74 66 6f !': flag_altfo
2c90: 72 6d 32 20 3d 20 31 3b 20 20 20 20 20 20 20 20 rm2 = 1;
2ca0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 63 break;. c
2cb0: 61 73 65 20 27 30 27 3a 20 20 20 66 6c 61 67 5f ase '0': flag_
2cc0: 7a 65 72 6f 70 61 64 20 3d 20 31 3b 20 20 20 20 zeropad = 1;
2cd0: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 break;.
2ce0: 20 20 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20 default:
2cf0: 64 6f 6e 65 20 3d 20 31 3b 20 20 20 20 20 20 20 done = 1;
2d00: 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b break;
2d10: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 77 68 . }. }wh
2d20: 69 6c 65 28 20 21 64 6f 6e 65 20 26 26 20 28 63 ile( !done && (c
2d30: 3d 28 2a 2b 2b 66 6d 74 29 29 21 3d 30 20 29 3b =(*++fmt))!=0 );
2d40: 0a 20 20 20 20 2f 2a 20 47 65 74 20 74 68 65 20 . /* Get the
2d50: 66 69 65 6c 64 20 77 69 64 74 68 20 2a 2f 0a 20 field width */.
2d60: 20 20 20 77 69 64 74 68 20 3d 20 30 3b 0a 20 20 width = 0;.
2d70: 20 20 69 66 28 20 63 3d 3d 27 2a 27 20 29 7b 0a if( c=='*' ){.
2d80: 20 20 20 20 20 20 77 69 64 74 68 20 3d 20 76 61 width = va
2d90: 5f 61 72 67 28 61 70 2c 69 6e 74 29 3b 0a 20 20 _arg(ap,int);.
2da0: 20 20 20 20 69 66 28 20 77 69 64 74 68 3c 30 20 if( width<0
2db0: 29 7b 0a 20 20 20 20 20 20 20 20 66 6c 61 67 5f ){. flag_
2dc0: 6c 65 66 74 6a 75 73 74 69 66 79 20 3d 20 31 3b leftjustify = 1;
2dd0: 0a 20 20 20 20 20 20 20 20 77 69 64 74 68 20 3d . width =
2de0: 20 2d 77 69 64 74 68 3b 0a 20 20 20 20 20 20 7d -width;. }
2df0: 0a 20 20 20 20 20 20 63 20 3d 20 2a 2b 2b 66 6d . c = *++fm
2e00: 74 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 t;. }else{.
2e10: 20 20 20 20 77 68 69 6c 65 28 20 63 3e 3d 27 30 while( c>='0
2e20: 27 20 26 26 20 63 3c 3d 27 39 27 20 29 7b 0a 20 ' && c<='9' ){.
2e30: 20 20 20 20 20 20 20 77 69 64 74 68 20 3d 20 77 width = w
2e40: 69 64 74 68 2a 31 30 20 2b 20 63 20 2d 20 27 30 idth*10 + c - '0
2e50: 27 3b 0a 20 20 20 20 20 20 20 20 63 20 3d 20 2a ';. c = *
2e60: 2b 2b 66 6d 74 3b 0a 20 20 20 20 20 20 7d 0a 20 ++fmt;. }.
2e70: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 77 69 64 }. if( wid
2e80: 74 68 20 3e 20 65 74 42 55 46 53 49 5a 45 2d 31 th > etBUFSIZE-1
2e90: 30 20 29 7b 0a 20 20 20 20 20 20 77 69 64 74 68 0 ){. width
2ea0: 20 3d 20 65 74 42 55 46 53 49 5a 45 2d 31 30 3b = etBUFSIZE-10;
2eb0: 0a 20 20 20 20 7d 0a 20 20 20 20 2f 2a 20 47 65 . }. /* Ge
2ec0: 74 20 74 68 65 20 70 72 65 63 69 73 69 6f 6e 20 t the precision
2ed0: 2a 2f 0a 20 20 20 20 69 66 28 20 63 3d 3d 27 2e */. if( c=='.
2ee0: 27 20 29 7b 0a 20 20 20 20 20 20 70 72 65 63 69 ' ){. preci
2ef0: 73 69 6f 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 sion = 0;.
2f00: 63 20 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 c = *++fmt;.
2f10: 20 20 69 66 28 20 63 3d 3d 27 2a 27 20 29 7b 0a if( c=='*' ){.
2f20: 20 20 20 20 20 20 20 20 70 72 65 63 69 73 69 6f precisio
2f30: 6e 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 69 6e n = va_arg(ap,in
2f40: 74 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 t);. if(
2f50: 70 72 65 63 69 73 69 6f 6e 3c 30 20 29 20 70 72 precision<0 ) pr
2f60: 65 63 69 73 69 6f 6e 20 3d 20 2d 70 72 65 63 69 ecision = -preci
2f70: 73 69 6f 6e 3b 0a 20 20 20 20 20 20 20 20 63 20 sion;. c
2f80: 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 20 20 = *++fmt;.
2f90: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 77 }else{. w
2fa0: 68 69 6c 65 28 20 63 3e 3d 27 30 27 20 26 26 20 hile( c>='0' &&
2fb0: 63 3c 3d 27 39 27 20 29 7b 0a 20 20 20 20 20 20 c<='9' ){.
2fc0: 20 20 20 20 70 72 65 63 69 73 69 6f 6e 20 3d 20 precision =
2fd0: 70 72 65 63 69 73 69 6f 6e 2a 31 30 20 2b 20 63 precision*10 + c
2fe0: 20 2d 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 - '0';.
2ff0: 20 20 63 20 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 c = *++fmt;.
3000: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a }. }.
3010: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
3020: 20 70 72 65 63 69 73 69 6f 6e 20 3d 20 2d 31 3b precision = -1;
3030: 0a 20 20 20 20 7d 0a 20 20 20 20 2f 2a 20 47 65 . }. /* Ge
3040: 74 20 74 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e t the conversion
3050: 20 74 79 70 65 20 6d 6f 64 69 66 69 65 72 20 2a type modifier *
3060: 2f 0a 20 20 20 20 69 66 28 20 63 3d 3d 27 6c 27 /. if( c=='l'
3070: 20 29 7b 0a 20 20 20 20 20 20 66 6c 61 67 5f 6c ){. flag_l
3080: 6f 6e 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 63 ong = 1;. c
3090: 20 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 20 = *++fmt;.
30a0: 20 69 66 28 20 63 3d 3d 27 6c 27 20 29 7b 0a 20 if( c=='l' ){.
30b0: 20 20 20 20 20 20 20 66 6c 61 67 5f 6c 6f 6e 67 flag_long
30c0: 6c 6f 6e 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 long = 1;.
30d0: 20 20 63 20 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 c = *++fmt;.
30e0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 }else{.
30f0: 20 20 20 66 6c 61 67 5f 6c 6f 6e 67 6c 6f 6e 67 flag_longlong
3100: 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 = 0;. }.
3110: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 66 }else{. f
3120: 6c 61 67 5f 6c 6f 6e 67 20 3d 20 66 6c 61 67 5f lag_long = flag_
3130: 6c 6f 6e 67 6c 6f 6e 67 20 3d 20 30 3b 0a 20 20 longlong = 0;.
3140: 20 20 7d 0a 20 20 20 20 2f 2a 20 46 65 74 63 68 }. /* Fetch
3150: 20 74 68 65 20 69 6e 66 6f 20 65 6e 74 72 79 20 the info entry
3160: 66 6f 72 20 74 68 65 20 66 69 65 6c 64 20 2a 2f for the field */
3170: 0a 20 20 20 20 69 6e 66 6f 70 20 3d 20 26 66 6d . infop = &fm
3180: 74 69 6e 66 6f 5b 30 5d 3b 0a 20 20 20 20 78 74 tinfo[0];. xt
3190: 79 70 65 20 3d 20 65 74 49 4e 56 41 4c 49 44 3b ype = etINVALID;
31a0: 0a 20 20 20 20 66 6f 72 28 69 64 78 3d 30 3b 20 . for(idx=0;
31b0: 69 64 78 3c 41 72 72 61 79 53 69 7a 65 28 66 6d idx<ArraySize(fm
31c0: 74 69 6e 66 6f 29 3b 20 69 64 78 2b 2b 29 7b 0a tinfo); idx++){.
31d0: 20 20 20 20 20 20 69 66 28 20 63 3d 3d 66 6d 74 if( c==fmt
31e0: 69 6e 66 6f 5b 69 64 78 5d 2e 66 6d 74 74 79 70 info[idx].fmttyp
31f0: 65 20 29 7b 0a 20 20 20 20 20 20 20 20 69 6e 66 e ){. inf
3200: 6f 70 20 3d 20 26 66 6d 74 69 6e 66 6f 5b 69 64 op = &fmtinfo[id
3210: 78 5d 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 x];. if(
3220: 75 73 65 45 78 74 65 6e 64 65 64 20 7c 7c 20 28 useExtended || (
3230: 69 6e 66 6f 70 2d 3e 66 6c 61 67 73 20 26 20 46 infop->flags & F
3240: 4c 41 47 5f 49 4e 54 45 52 4e 29 3d 3d 30 20 29 LAG_INTERN)==0 )
3250: 7b 0a 20 20 20 20 20 20 20 20 20 20 78 74 79 70 {. xtyp
3260: 65 20 3d 20 69 6e 66 6f 70 2d 3e 74 79 70 65 3b e = infop->type;
3270: 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a . }else{.
3280: 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e return
3290: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 ;. }.
32a0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 break;.
32b0: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 7a 45 78 }. }. zEx
32c0: 74 72 61 20 3d 20 30 3b 0a 0a 0a 20 20 20 20 2f tra = 0;... /
32d0: 2a 20 4c 69 6d 69 74 20 74 68 65 20 70 72 65 63 * Limit the prec
32e0: 69 73 69 6f 6e 20 74 6f 20 70 72 65 76 65 6e 74 ision to prevent
32f0: 20 6f 76 65 72 66 6c 6f 77 69 6e 67 20 62 75 66 overflowing buf
3300: 5b 5d 20 64 75 72 69 6e 67 20 63 6f 6e 76 65 72 [] during conver
3310: 73 69 6f 6e 20 2a 2f 0a 20 20 20 20 69 66 28 20 sion */. if(
3320: 70 72 65 63 69 73 69 6f 6e 3e 65 74 42 55 46 53 precision>etBUFS
3330: 49 5a 45 2d 34 30 20 26 26 20 28 69 6e 66 6f 70 IZE-40 && (infop
3340: 2d 3e 66 6c 61 67 73 20 26 20 46 4c 41 47 5f 53 ->flags & FLAG_S
3350: 54 52 49 4e 47 29 3d 3d 30 20 29 7b 0a 20 20 20 TRING)==0 ){.
3360: 20 20 20 70 72 65 63 69 73 69 6f 6e 20 3d 20 65 precision = e
3370: 74 42 55 46 53 49 5a 45 2d 34 30 3b 0a 20 20 20 tBUFSIZE-40;.
3380: 20 7d 0a 0a 20 20 20 20 2f 2a 0a 20 20 20 20 2a }.. /*. *
3390: 2a 20 41 74 20 74 68 69 73 20 70 6f 69 6e 74 2c * At this point,
33a0: 20 76 61 72 69 61 62 6c 65 73 20 61 72 65 20 69 variables are i
33b0: 6e 69 74 69 61 6c 69 7a 65 64 20 61 73 20 66 6f nitialized as fo
33c0: 6c 6c 6f 77 73 3a 0a 20 20 20 20 2a 2a 0a 20 20 llows:. **.
33d0: 20 20 2a 2a 20 20 20 66 6c 61 67 5f 61 6c 74 65 ** flag_alte
33e0: 72 6e 61 74 65 66 6f 72 6d 20 20 20 20 20 20 20 rnateform
33f0: 20 20 20 54 52 55 45 20 69 66 20 61 20 27 23 27 TRUE if a '#'
3400: 20 69 73 20 70 72 65 73 65 6e 74 2e 0a 20 20 20 is present..
3410: 20 2a 2a 20 20 20 66 6c 61 67 5f 61 6c 74 66 6f ** flag_altfo
3420: 72 6d 32 20 20 20 20 20 20 20 20 20 20 20 20 20 rm2
3430: 20 20 54 52 55 45 20 69 66 20 61 20 27 21 27 20 TRUE if a '!'
3440: 69 73 20 70 72 65 73 65 6e 74 2e 0a 20 20 20 20 is present..
3450: 2a 2a 20 20 20 66 6c 61 67 5f 70 6c 75 73 73 69 ** flag_plussi
3460: 67 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 gn
3470: 20 54 52 55 45 20 69 66 20 61 20 27 2b 27 20 69 TRUE if a '+' i
3480: 73 20 70 72 65 73 65 6e 74 2e 0a 20 20 20 20 2a s present.. *
3490: 2a 20 20 20 66 6c 61 67 5f 6c 65 66 74 6a 75 73 * flag_leftjus
34a0: 74 69 66 79 20 20 20 20 20 20 20 20 20 20 20 20 tify
34b0: 54 52 55 45 20 69 66 20 61 20 27 2d 27 20 69 73 TRUE if a '-' is
34c0: 20 70 72 65 73 65 6e 74 20 6f 72 20 69 66 20 74 present or if t
34d0: 68 65 0a 20 20 20 20 2a 2a 20 20 20 20 20 20 20 he. **
34e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
34f0: 20 20 20 20 20 20 20 20 66 69 65 6c 64 20 77 69 field wi
3500: 64 74 68 20 77 61 73 20 6e 65 67 61 74 69 76 65 dth was negative
3510: 2e 0a 20 20 20 20 2a 2a 20 20 20 66 6c 61 67 5f .. ** flag_
3520: 7a 65 72 6f 70 61 64 20 20 20 20 20 20 20 20 20 zeropad
3530: 20 20 20 20 20 20 20 54 52 55 45 20 69 66 20 74 TRUE if t
3540: 68 65 20 77 69 64 74 68 20 62 65 67 61 6e 20 77 he width began w
3550: 69 74 68 20 30 2e 0a 20 20 20 20 2a 2a 20 20 20 ith 0.. **
3560: 66 6c 61 67 5f 6c 6f 6e 67 20 20 20 20 20 20 20 flag_long
3570: 20 20 20 20 20 20 20 20 20 20 20 20 54 52 55 45 TRUE
3580: 20 69 66 20 74 68 65 20 6c 65 74 74 65 72 20 27 if the letter '
3590: 6c 27 20 28 65 6c 6c 29 20 70 72 65 66 69 78 65 l' (ell) prefixe
35a0: 64 0a 20 20 20 20 2a 2a 20 20 20 20 20 20 20 20 d. **
35b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
35c0: 20 20 20 20 20 20 20 74 68 65 20 63 6f 6e 76 65 the conve
35d0: 72 73 69 6f 6e 20 63 68 61 72 61 63 74 65 72 2e rsion character.
35e0: 0a 20 20 20 20 2a 2a 20 20 20 66 6c 61 67 5f 6c . ** flag_l
35f0: 6f 6e 67 6c 6f 6e 67 20 20 20 20 20 20 20 20 20 onglong
3600: 20 20 20 20 20 20 54 52 55 45 20 69 66 20 74 68 TRUE if th
3610: 65 20 6c 65 74 74 65 72 20 27 6c 6c 27 20 28 65 e letter 'll' (e
3620: 6c 6c 20 65 6c 6c 29 20 70 72 65 66 69 78 65 64 ll ell) prefixed
3630: 0a 20 20 20 20 2a 2a 20 20 20 20 20 20 20 20 20 . **
3640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3650: 20 20 20 20 20 20 74 68 65 20 63 6f 6e 76 65 72 the conver
3660: 73 69 6f 6e 20 63 68 61 72 61 63 74 65 72 2e 0a sion character..
3670: 20 20 20 20 2a 2a 20 20 20 66 6c 61 67 5f 62 6c ** flag_bl
3680: 61 6e 6b 73 69 67 6e 20 20 20 20 20 20 20 20 20 anksign
3690: 20 20 20 20 20 54 52 55 45 20 69 66 20 61 20 27 TRUE if a '
36a0: 20 27 20 69 73 20 70 72 65 73 65 6e 74 2e 0a 20 ' is present..
36b0: 20 20 20 2a 2a 20 20 20 77 69 64 74 68 20 20 20 ** width
36c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
36d0: 20 20 20 20 54 68 65 20 73 70 65 63 69 66 69 65 The specifie
36e0: 64 20 66 69 65 6c 64 20 77 69 64 74 68 2e 20 20 d field width.
36f0: 54 68 69 73 20 69 73 0a 20 20 20 20 2a 2a 20 20 This is. **
3700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3710: 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 77 alw
3720: 61 79 73 20 6e 6f 6e 2d 6e 65 67 61 74 69 76 65 ays non-negative
3730: 2e 20 20 5a 65 72 6f 20 69 73 20 74 68 65 20 64 . Zero is the d
3740: 65 66 61 75 6c 74 2e 0a 20 20 20 20 2a 2a 20 20 efault.. **
3750: 20 70 72 65 63 69 73 69 6f 6e 20 20 20 20 20 20 precision
3760: 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
3770: 20 73 70 65 63 69 66 69 65 64 20 70 72 65 63 69 specified preci
3780: 73 69 6f 6e 2e 20 20 54 68 65 20 64 65 66 61 75 sion. The defau
3790: 6c 74 0a 20 20 20 20 2a 2a 20 20 20 20 20 20 20 lt. **
37a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
37b0: 20 20 20 20 20 20 20 20 69 73 20 2d 31 2e 0a 20 is -1..
37c0: 20 20 20 2a 2a 20 20 20 78 74 79 70 65 20 20 20 ** xtype
37d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
37e0: 20 20 20 20 54 68 65 20 63 6c 61 73 73 20 6f 66 The class of
37f0: 20 74 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e 2e the conversion.
3800: 0a 20 20 20 20 2a 2a 20 20 20 69 6e 66 6f 70 20 . ** infop
3810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3820: 20 20 20 20 20 20 50 6f 69 6e 74 65 72 20 74 6f Pointer to
3830: 20 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 the appropriate
3840: 20 69 6e 66 6f 20 73 74 72 75 63 74 2e 0a 20 20 info struct..
3850: 20 20 2a 2f 0a 20 20 20 20 73 77 69 74 63 68 28 */. switch(
3860: 20 78 74 79 70 65 20 29 7b 0a 20 20 20 20 20 20 xtype ){.
3870: 63 61 73 65 20 65 74 50 4f 49 4e 54 45 52 3a 0a case etPOINTER:.
3880: 20 20 20 20 20 20 20 20 66 6c 61 67 5f 6c 6f 6e flag_lon
3890: 67 6c 6f 6e 67 20 3d 20 73 69 7a 65 6f 66 28 63 glong = sizeof(c
38a0: 68 61 72 2a 29 3d 3d 73 69 7a 65 6f 66 28 69 36 har*)==sizeof(i6
38b0: 34 29 3b 0a 20 20 20 20 20 20 20 20 66 6c 61 67 4);. flag
38c0: 5f 6c 6f 6e 67 20 3d 20 73 69 7a 65 6f 66 28 63 _long = sizeof(c
38d0: 68 61 72 2a 29 3d 3d 73 69 7a 65 6f 66 28 6c 6f har*)==sizeof(lo
38e0: 6e 67 20 69 6e 74 29 3b 0a 20 20 20 20 20 20 20 ng int);.
38f0: 20 2f 2a 20 46 61 6c 6c 20 74 68 72 6f 75 67 68 /* Fall through
3900: 20 69 6e 74 6f 20 74 68 65 20 6e 65 78 74 20 63 into the next c
3910: 61 73 65 20 2a 2f 0a 20 20 20 20 20 20 63 61 73 ase */. cas
3920: 65 20 65 74 4f 52 44 49 4e 41 4c 3a 0a 20 20 20 e etORDINAL:.
3930: 20 20 20 63 61 73 65 20 65 74 52 41 44 49 58 3a case etRADIX:
3940: 0a 20 20 20 20 20 20 20 20 69 66 28 20 69 6e 66 . if( inf
3950: 6f 70 2d 3e 66 6c 61 67 73 20 26 20 46 4c 41 47 op->flags & FLAG
3960: 5f 53 49 47 4e 45 44 20 29 7b 0a 20 20 20 20 20 _SIGNED ){.
3970: 20 20 20 20 20 69 36 34 20 76 3b 0a 20 20 20 20 i64 v;.
3980: 20 20 20 20 20 20 69 66 28 20 66 6c 61 67 5f 6c if( flag_l
3990: 6f 6e 67 6c 6f 6e 67 20 29 7b 0a 20 20 20 20 20 onglong ){.
39a0: 20 20 20 20 20 20 20 76 20 3d 20 76 61 5f 61 72 v = va_ar
39b0: 67 28 61 70 2c 69 36 34 29 3b 0a 20 20 20 20 20 g(ap,i64);.
39c0: 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 66 }else if( f
39d0: 6c 61 67 5f 6c 6f 6e 67 20 29 7b 0a 20 20 20 20 lag_long ){.
39e0: 20 20 20 20 20 20 20 20 76 20 3d 20 76 61 5f 61 v = va_a
39f0: 72 67 28 61 70 2c 6c 6f 6e 67 20 69 6e 74 29 3b rg(ap,long int);
3a00: 0a 20 20 20 20 20 20 20 20 20 20 7d 65 6c 73 65 . }else
3a10: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 76 20 {. v
3a20: 3d 20 76 61 5f 61 72 67 28 61 70 2c 69 6e 74 29 = va_arg(ap,int)
3a30: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 ;. }.
3a40: 20 20 20 20 20 20 20 20 69 66 28 20 76 3c 30 20 if( v<0
3a50: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 6c ){. l
3a60: 6f 6e 67 76 61 6c 75 65 20 3d 20 2d 76 3b 0a 20 ongvalue = -v;.
3a70: 20 20 20 20 20 20 20 20 20 20 20 70 72 65 66 69 prefi
3a80: 78 20 3d 20 27 2d 27 3b 0a 20 20 20 20 20 20 20 x = '-';.
3a90: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
3aa0: 20 20 20 20 20 20 6c 6f 6e 67 76 61 6c 75 65 20 longvalue
3ab0: 3d 20 76 3b 0a 20 20 20 20 20 20 20 20 20 20 20 = v;.
3ac0: 20 69 66 28 20 66 6c 61 67 5f 70 6c 75 73 73 69 if( flag_plussi
3ad0: 67 6e 20 29 20 20 20 20 20 20 20 20 70 72 65 66 gn ) pref
3ae0: 69 78 20 3d 20 27 2b 27 3b 0a 20 20 20 20 20 20 ix = '+';.
3af0: 20 20 20 20 20 20 65 6c 73 65 20 69 66 28 20 66 else if( f
3b00: 6c 61 67 5f 62 6c 61 6e 6b 73 69 67 6e 20 29 20 lag_blanksign )
3b10: 20 70 72 65 66 69 78 20 3d 20 27 20 27 3b 0a 20 prefix = ' ';.
3b20: 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 20 else
3b30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3b40: 20 20 20 20 20 20 70 72 65 66 69 78 20 3d 20 30 prefix = 0
3b50: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 ;. }.
3b60: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 }else{.
3b70: 20 20 20 20 20 20 20 69 66 28 20 66 6c 61 67 5f if( flag_
3b80: 6c 6f 6e 67 6c 6f 6e 67 20 29 7b 0a 20 20 20 20 longlong ){.
3b90: 20 20 20 20 20 20 20 20 6c 6f 6e 67 76 61 6c 75 longvalu
3ba0: 65 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 75 36 e = va_arg(ap,u6
3bb0: 34 29 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 65 4);. }e
3bc0: 6c 73 65 20 69 66 28 20 66 6c 61 67 5f 6c 6f 6e lse if( flag_lon
3bd0: 67 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 g ){.
3be0: 20 6c 6f 6e 67 76 61 6c 75 65 20 3d 20 76 61 5f longvalue = va_
3bf0: 61 72 67 28 61 70 2c 75 6e 73 69 67 6e 65 64 20 arg(ap,unsigned
3c00: 6c 6f 6e 67 20 69 6e 74 29 3b 0a 20 20 20 20 20 long int);.
3c10: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 }else{.
3c20: 20 20 20 20 20 20 20 20 6c 6f 6e 67 76 61 6c 75 longvalu
3c30: 65 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 75 6e e = va_arg(ap,un
3c40: 73 69 67 6e 65 64 20 69 6e 74 29 3b 0a 20 20 20 signed int);.
3c50: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
3c60: 20 20 20 70 72 65 66 69 78 20 3d 20 30 3b 0a 20 prefix = 0;.
3c70: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
3c80: 20 69 66 28 20 6c 6f 6e 67 76 61 6c 75 65 3d 3d if( longvalue==
3c90: 30 20 29 20 66 6c 61 67 5f 61 6c 74 65 72 6e 61 0 ) flag_alterna
3ca0: 74 65 66 6f 72 6d 20 3d 20 30 3b 0a 20 20 20 20 teform = 0;.
3cb0: 20 20 20 20 69 66 28 20 66 6c 61 67 5f 7a 65 72 if( flag_zer
3cc0: 6f 70 61 64 20 26 26 20 70 72 65 63 69 73 69 6f opad && precisio
3cd0: 6e 3c 77 69 64 74 68 2d 28 70 72 65 66 69 78 21 n<width-(prefix!
3ce0: 3d 30 29 20 29 7b 0a 20 20 20 20 20 20 20 20 20 =0) ){.
3cf0: 20 70 72 65 63 69 73 69 6f 6e 20 3d 20 77 69 64 precision = wid
3d00: 74 68 2d 28 70 72 65 66 69 78 21 3d 30 29 3b 0a th-(prefix!=0);.
3d10: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 }.
3d20: 20 20 62 75 66 70 74 20 3d 20 26 62 75 66 5b 65 bufpt = &buf[e
3d30: 74 42 55 46 53 49 5a 45 2d 31 5d 3b 0a 20 20 20 tBUFSIZE-1];.
3d40: 20 20 20 20 20 69 66 28 20 78 74 79 70 65 3d 3d if( xtype==
3d50: 65 74 4f 52 44 49 4e 41 4c 20 29 7b 0a 20 20 20 etORDINAL ){.
3d60: 20 20 20 20 20 20 20 73 74 61 74 69 63 20 63 6f static co
3d70: 6e 73 74 20 63 68 61 72 20 7a 4f 72 64 5b 5d 20 nst char zOrd[]
3d80: 3d 20 22 74 68 73 74 6e 64 72 64 22 3b 0a 20 20 = "thstndrd";.
3d90: 20 20 20 20 20 20 20 20 69 6e 74 20 78 20 3d 20 int x =
3da0: 28 69 6e 74 29 28 6c 6f 6e 67 76 61 6c 75 65 20 (int)(longvalue
3db0: 25 20 31 30 29 3b 0a 20 20 20 20 20 20 20 20 20 % 10);.
3dc0: 20 69 66 28 20 78 3e 3d 34 20 7c 7c 20 28 6c 6f if( x>=4 || (lo
3dd0: 6e 67 76 61 6c 75 65 2f 31 30 29 25 31 30 3d 3d ngvalue/10)%10==
3de0: 31 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 1 ){.
3df0: 20 78 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 x = 0;.
3e00: 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20 62 75 }. bu
3e10: 66 5b 65 74 42 55 46 53 49 5a 45 2d 33 5d 20 3d f[etBUFSIZE-3] =
3e20: 20 7a 4f 72 64 5b 78 2a 32 5d 3b 0a 20 20 20 20 zOrd[x*2];.
3e30: 20 20 20 20 20 20 62 75 66 5b 65 74 42 55 46 53 buf[etBUFS
3e40: 49 5a 45 2d 32 5d 20 3d 20 7a 4f 72 64 5b 78 2a IZE-2] = zOrd[x*
3e50: 32 2b 31 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 2+1];.
3e60: 62 75 66 70 74 20 2d 3d 20 32 3b 0a 20 20 20 20 bufpt -= 2;.
3e70: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7b 0a }. {.
3e80: 20 20 20 20 20 20 20 20 20 20 72 65 67 69 73 74 regist
3e90: 65 72 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 63 er const char *c
3ea0: 73 65 74 3b 20 20 20 20 20 20 2f 2a 20 55 73 65 set; /* Use
3eb0: 20 72 65 67 69 73 74 65 72 73 20 66 6f 72 20 73 registers for s
3ec0: 70 65 65 64 20 2a 2f 0a 20 20 20 20 20 20 20 20 peed */.
3ed0: 20 20 72 65 67 69 73 74 65 72 20 69 6e 74 20 62 register int b
3ee0: 61 73 65 3b 0a 20 20 20 20 20 20 20 20 20 20 63 ase;. c
3ef0: 73 65 74 20 3d 20 26 61 44 69 67 69 74 73 5b 69 set = &aDigits[i
3f00: 6e 66 6f 70 2d 3e 63 68 61 72 73 65 74 5d 3b 0a nfop->charset];.
3f10: 20 20 20 20 20 20 20 20 20 20 62 61 73 65 20 3d base =
3f20: 20 69 6e 66 6f 70 2d 3e 62 61 73 65 3b 0a 20 20 infop->base;.
3f30: 20 20 20 20 20 20 20 20 64 6f 7b 20 20 20 20 20 do{
3f40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3f50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3f60: 20 20 20 20 20 20 2f 2a 20 43 6f 6e 76 65 72 74 /* Convert
3f70: 20 74 6f 20 61 73 63 69 69 20 2a 2f 0a 20 20 20 to ascii */.
3f80: 20 20 20 20 20 20 20 20 20 2a 28 2d 2d 62 75 66 *(--buf
3f90: 70 74 29 20 3d 20 63 73 65 74 5b 6c 6f 6e 67 76 pt) = cset[longv
3fa0: 61 6c 75 65 25 62 61 73 65 5d 3b 0a 20 20 20 20 alue%base];.
3fb0: 20 20 20 20 20 20 20 20 6c 6f 6e 67 76 61 6c 75 longvalu
3fc0: 65 20 3d 20 6c 6f 6e 67 76 61 6c 75 65 2f 62 61 e = longvalue/ba
3fd0: 73 65 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 77 se;. }w
3fe0: 68 69 6c 65 28 20 6c 6f 6e 67 76 61 6c 75 65 3e hile( longvalue>
3ff0: 30 20 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 0 );. }.
4000: 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 length =
4010: 28 69 6e 74 29 28 26 62 75 66 5b 65 74 42 55 46 (int)(&buf[etBUF
4020: 53 49 5a 45 2d 31 5d 2d 62 75 66 70 74 29 3b 0a SIZE-1]-bufpt);.
4030: 20 20 20 20 20 20 20 20 66 6f 72 28 69 64 78 3d for(idx=
4040: 70 72 65 63 69 73 69 6f 6e 2d 6c 65 6e 67 74 68 precision-length
4050: 3b 20 69 64 78 3e 30 3b 20 69 64 78 2d 2d 29 7b ; idx>0; idx--){
4060: 0a 20 20 20 20 20 20 20 20 20 20 2a 28 2d 2d 62 . *(--b
4070: 75 66 70 74 29 20 3d 20 27 30 27 3b 20 20 20 20 ufpt) = '0';
4080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
4090: 20 20 20 20 20 20 20 20 20 2f 2a 20 5a 65 72 6f /* Zero
40a0: 20 70 61 64 20 2a 2f 0a 20 20 20 20 20 20 20 20 pad */.
40b0: 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 70 72 }. if( pr
40c0: 65 66 69 78 20 29 20 2a 28 2d 2d 62 75 66 70 74 efix ) *(--bufpt
40d0: 29 20 3d 20 70 72 65 66 69 78 3b 20 20 20 20 20 ) = prefix;
40e0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 64 64 /* Add
40f0: 20 73 69 67 6e 20 2a 2f 0a 20 20 20 20 20 20 20 sign */.
4100: 20 69 66 28 20 66 6c 61 67 5f 61 6c 74 65 72 6e if( flag_altern
4110: 61 74 65 66 6f 72 6d 20 26 26 20 69 6e 66 6f 70 ateform && infop
4120: 2d 3e 70 72 65 66 69 78 20 29 7b 20 20 20 20 20 ->prefix ){
4130: 20 2f 2a 20 41 64 64 20 22 30 22 20 6f 72 20 22 /* Add "0" or "
4140: 30 78 22 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 0x" */.
4150: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 72 65 const char *pre
4160: 3b 0a 20 20 20 20 20 20 20 20 20 20 63 68 61 72 ;. char
4170: 20 78 3b 0a 20 20 20 20 20 20 20 20 20 20 70 72 x;. pr
4180: 65 20 3d 20 26 61 50 72 65 66 69 78 5b 69 6e 66 e = &aPrefix[inf
4190: 6f 70 2d 3e 70 72 65 66 69 78 5d 3b 0a 20 20 20 op->prefix];.
41a0: 20 20 20 20 20 20 20 66 6f 72 28 3b 20 28 78 3d for(; (x=
41b0: 28 2a 70 72 65 29 29 21 3d 30 3b 20 70 72 65 2b (*pre))!=0; pre+
41c0: 2b 29 20 2a 28 2d 2d 62 75 66 70 74 29 20 3d 20 +) *(--bufpt) =
41d0: 78 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 x;. }.
41e0: 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 28 69 length = (i
41f0: 6e 74 29 28 26 62 75 66 5b 65 74 42 55 46 53 49 nt)(&buf[etBUFSI
4200: 5a 45 2d 31 5d 2d 62 75 66 70 74 29 3b 0a 20 20 ZE-1]-bufpt);.
4210: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 break;.
4220: 20 20 20 63 61 73 65 20 65 74 46 4c 4f 41 54 3a case etFLOAT:
4230: 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 45 58 . case etEX
4240: 50 3a 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 P:. case et
4250: 47 45 4e 45 52 49 43 3a 0a 20 20 20 20 20 20 20 GENERIC:.
4260: 20 72 65 61 6c 76 61 6c 75 65 20 3d 20 76 61 5f realvalue = va_
4270: 61 72 67 28 61 70 2c 64 6f 75 62 6c 65 29 3b 0a arg(ap,double);.
4280: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d #ifdef SQLITE_OM
4290: 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e IT_FLOATING_POIN
42a0: 54 0a 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 T. length
42b0: 20 3d 20 30 3b 0a 23 65 6c 73 65 0a 20 20 20 20 = 0;.#else.
42c0: 20 20 20 20 69 66 28 20 70 72 65 63 69 73 69 6f if( precisio
42d0: 6e 3c 30 20 29 20 70 72 65 63 69 73 69 6f 6e 20 n<0 ) precision
42e0: 3d 20 36 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 = 6; /*
42f0: 53 65 74 20 64 65 66 61 75 6c 74 20 70 72 65 63 Set default prec
4300: 69 73 69 6f 6e 20 2a 2f 0a 20 20 20 20 20 20 20 ision */.
4310: 20 69 66 28 20 70 72 65 63 69 73 69 6f 6e 3e 65 if( precision>e
4320: 74 42 55 46 53 49 5a 45 2f 32 2d 31 30 20 29 20 tBUFSIZE/2-10 )
4330: 70 72 65 63 69 73 69 6f 6e 20 3d 20 65 74 42 55 precision = etBU
4340: 46 53 49 5a 45 2f 32 2d 31 30 3b 0a 20 20 20 20 FSIZE/2-10;.
4350: 20 20 20 20 69 66 28 20 72 65 61 6c 76 61 6c 75 if( realvalu
4360: 65 3c 30 2e 30 20 29 7b 0a 20 20 20 20 20 20 20 e<0.0 ){.
4370: 20 20 20 72 65 61 6c 76 61 6c 75 65 20 3d 20 2d realvalue = -
4380: 72 65 61 6c 76 61 6c 75 65 3b 0a 20 20 20 20 20 realvalue;.
4390: 20 20 20 20 20 70 72 65 66 69 78 20 3d 20 27 2d prefix = '-
43a0: 27 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 ';. }else
43b0: 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 {. if(
43c0: 66 6c 61 67 5f 70 6c 75 73 73 69 67 6e 20 29 20 flag_plussign )
43d0: 20 20 20 20 20 20 20 20 20 70 72 65 66 69 78 20 prefix
43e0: 3d 20 27 2b 27 3b 0a 20 20 20 20 20 20 20 20 20 = '+';.
43f0: 20 65 6c 73 65 20 69 66 28 20 66 6c 61 67 5f 62 else if( flag_b
4400: 6c 61 6e 6b 73 69 67 6e 20 29 20 20 20 20 70 72 lanksign ) pr
4410: 65 66 69 78 20 3d 20 27 20 27 3b 0a 20 20 20 20 efix = ' ';.
4420: 20 20 20 20 20 20 65 6c 73 65 20 20 20 20 20 20 else
4430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
4440: 20 20 20 70 72 65 66 69 78 20 3d 20 30 3b 0a 20 prefix = 0;.
4450: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
4460: 20 69 66 28 20 78 74 79 70 65 3d 3d 65 74 47 45 if( xtype==etGE
4470: 4e 45 52 49 43 20 26 26 20 70 72 65 63 69 73 69 NERIC && precisi
4480: 6f 6e 3e 30 20 29 20 70 72 65 63 69 73 69 6f 6e on>0 ) precision
4490: 2d 2d 3b 0a 23 69 66 20 30 0a 20 20 20 20 20 20 --;.#if 0.
44a0: 20 20 2f 2a 20 52 6f 75 6e 64 69 6e 67 20 77 6f /* Rounding wo
44b0: 72 6b 73 20 6c 69 6b 65 20 42 53 44 20 77 68 65 rks like BSD whe
44c0: 6e 20 74 68 65 20 63 6f 6e 73 74 61 6e 74 20 30 n the constant 0
44d0: 2e 34 39 39 39 20 69 73 20 75 73 65 64 2e 20 20 .4999 is used.
44e0: 57 69 65 72 64 21 20 2a 2f 0a 20 20 20 20 20 20 Wierd! */.
44f0: 20 20 66 6f 72 28 69 64 78 3d 70 72 65 63 69 73 for(idx=precis
4500: 69 6f 6e 2c 20 72 6f 75 6e 64 65 72 3d 30 2e 34 ion, rounder=0.4
4510: 39 39 39 3b 20 69 64 78 3e 30 3b 20 69 64 78 2d 999; idx>0; idx-
4520: 2d 2c 20 72 6f 75 6e 64 65 72 2a 3d 30 2e 31 29 -, rounder*=0.1)
4530: 3b 0a 23 65 6c 73 65 0a 20 20 20 20 20 20 20 20 ;.#else.
4540: 2f 2a 20 49 74 20 6d 61 6b 65 73 20 6d 6f 72 65 /* It makes more
4550: 20 73 65 6e 73 65 20 74 6f 20 75 73 65 20 30 2e sense to use 0.
4560: 35 20 2a 2f 0a 20 20 20 20 20 20 20 20 66 6f 72 5 */. for
4570: 28 69 64 78 3d 70 72 65 63 69 73 69 6f 6e 2c 20 (idx=precision,
4580: 72 6f 75 6e 64 65 72 3d 30 2e 35 3b 20 69 64 78 rounder=0.5; idx
4590: 3e 30 3b 20 69 64 78 2d 2d 2c 20 72 6f 75 6e 64 >0; idx--, round
45a0: 65 72 2a 3d 30 2e 31 29 7b 7d 0a 23 65 6e 64 69 er*=0.1){}.#endi
45b0: 66 0a 20 20 20 20 20 20 20 20 69 66 28 20 78 74 f. if( xt
45c0: 79 70 65 3d 3d 65 74 46 4c 4f 41 54 20 29 20 72 ype==etFLOAT ) r
45d0: 65 61 6c 76 61 6c 75 65 20 2b 3d 20 72 6f 75 6e ealvalue += roun
45e0: 64 65 72 3b 0a 20 20 20 20 20 20 20 20 2f 2a 20 der;. /*
45f0: 4e 6f 72 6d 61 6c 69 7a 65 20 72 65 61 6c 76 61 Normalize realva
4600: 6c 75 65 20 74 6f 20 77 69 74 68 69 6e 20 31 30 lue to within 10
4610: 2e 30 20 3e 20 72 65 61 6c 76 61 6c 75 65 20 3e .0 > realvalue >
4620: 3d 20 31 2e 30 20 2a 2f 0a 20 20 20 20 20 20 20 = 1.0 */.
4630: 20 65 78 70 20 3d 20 30 3b 0a 20 20 20 20 20 20 exp = 0;.
4640: 20 20 69 66 28 20 73 71 6c 69 74 65 33 49 73 4e if( sqlite3IsN
4650: 61 4e 28 28 64 6f 75 62 6c 65 29 72 65 61 6c 76 aN((double)realv
4660: 61 6c 75 65 29 20 29 7b 0a 20 20 20 20 20 20 20 alue) ){.
4670: 20 20 20 62 75 66 70 74 20 3d 20 22 4e 61 4e 22 bufpt = "NaN"
4680: 3b 0a 20 20 20 20 20 20 20 20 20 20 6c 65 6e 67 ;. leng
4690: 74 68 20 3d 20 33 3b 0a 20 20 20 20 20 20 20 20 th = 3;.
46a0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 break;.
46b0: 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 72 }. if( r
46c0: 65 61 6c 76 61 6c 75 65 3e 30 2e 30 20 29 7b 0a ealvalue>0.0 ){.
46d0: 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 while(
46e0: 20 72 65 61 6c 76 61 6c 75 65 3e 3d 31 65 33 32 realvalue>=1e32
46f0: 20 26 26 20 65 78 70 3c 3d 33 35 30 20 29 7b 20 && exp<=350 ){
4700: 72 65 61 6c 76 61 6c 75 65 20 2a 3d 20 31 65 2d realvalue *= 1e-
4710: 33 32 3b 20 65 78 70 2b 3d 33 32 3b 20 7d 0a 20 32; exp+=32; }.
4720: 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 while(
4730: 72 65 61 6c 76 61 6c 75 65 3e 3d 31 65 38 20 26 realvalue>=1e8 &
4740: 26 20 65 78 70 3c 3d 33 35 30 20 29 7b 20 72 65 & exp<=350 ){ re
4750: 61 6c 76 61 6c 75 65 20 2a 3d 20 31 65 2d 38 3b alvalue *= 1e-8;
4760: 20 65 78 70 2b 3d 38 3b 20 7d 0a 20 20 20 20 20 exp+=8; }.
4770: 20 20 20 20 20 77 68 69 6c 65 28 20 72 65 61 6c while( real
4780: 76 61 6c 75 65 3e 3d 31 30 2e 30 20 26 26 20 65 value>=10.0 && e
4790: 78 70 3c 3d 33 35 30 20 29 7b 20 72 65 61 6c 76 xp<=350 ){ realv
47a0: 61 6c 75 65 20 2a 3d 20 30 2e 31 3b 20 65 78 70 alue *= 0.1; exp
47b0: 2b 2b 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 20 ++; }.
47c0: 77 68 69 6c 65 28 20 72 65 61 6c 76 61 6c 75 65 while( realvalue
47d0: 3c 31 65 2d 38 20 29 7b 20 72 65 61 6c 76 61 6c <1e-8 ){ realval
47e0: 75 65 20 2a 3d 20 31 65 38 3b 20 65 78 70 2d 3d ue *= 1e8; exp-=
47f0: 38 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 20 77 8; }. w
4800: 68 69 6c 65 28 20 72 65 61 6c 76 61 6c 75 65 3c hile( realvalue<
4810: 31 2e 30 20 29 7b 20 72 65 61 6c 76 61 6c 75 65 1.0 ){ realvalue
4820: 20 2a 3d 20 31 30 2e 30 3b 20 65 78 70 2d 2d 3b *= 10.0; exp--;
4830: 20 7d 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 }. if(
4840: 20 65 78 70 3e 33 35 30 20 29 7b 0a 20 20 20 20 exp>350 ){.
4850: 20 20 20 20 20 20 20 20 69 66 28 20 70 72 65 66 if( pref
4860: 69 78 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 20 ix=='-' ){.
4870: 20 20 20 20 20 20 20 20 20 62 75 66 70 74 20 3d bufpt =
4880: 20 22 2d 49 6e 66 22 3b 0a 20 20 20 20 20 20 20 "-Inf";.
4890: 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 70 }else if( p
48a0: 72 65 66 69 78 3d 3d 27 2b 27 20 29 7b 0a 20 20 refix=='+' ){.
48b0: 20 20 20 20 20 20 20 20 20 20 20 20 62 75 66 70 bufp
48c0: 74 20 3d 20 22 2b 49 6e 66 22 3b 0a 20 20 20 20 t = "+Inf";.
48d0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 }else{.
48e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 62 75 66 buf
48f0: 70 74 20 3d 20 22 49 6e 66 22 3b 0a 20 20 20 20 pt = "Inf";.
4900: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 }.
4910: 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 73 length = s
4920: 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28 62 qlite3Strlen30(b
4930: 75 66 70 74 29 3b 0a 20 20 20 20 20 20 20 20 20 ufpt);.
4940: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 break;.
4950: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a }. }.
4960: 20 20 20 20 20 20 20 20 62 75 66 70 74 20 3d 20 bufpt =
4970: 62 75 66 3b 0a 20 20 20 20 20 20 20 20 2f 2a 0a buf;. /*.
4980: 20 20 20 20 20 20 20 20 2a 2a 20 49 66 20 74 68 ** If th
4990: 65 20 66 69 65 6c 64 20 74 79 70 65 20 69 73 20 e field type is
49a0: 65 74 47 45 4e 45 52 49 43 2c 20 74 68 65 6e 20 etGENERIC, then
49b0: 63 6f 6e 76 65 72 74 20 74 6f 20 65 69 74 68 65 convert to eithe
49c0: 72 20 65 74 45 58 50 0a 20 20 20 20 20 20 20 20 r etEXP.
49d0: 2a 2a 20 6f 72 20 65 74 46 4c 4f 41 54 2c 20 61 ** or etFLOAT, a
49e0: 73 20 61 70 70 72 6f 70 72 69 61 74 65 2e 0a 20 s appropriate..
49f0: 20 20 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 */.
4a00: 20 20 66 6c 61 67 5f 65 78 70 20 3d 20 78 74 79 flag_exp = xty
4a10: 70 65 3d 3d 65 74 45 58 50 3b 0a 20 20 20 20 20 pe==etEXP;.
4a20: 20 20 20 69 66 28 20 78 74 79 70 65 21 3d 65 74 if( xtype!=et
4a30: 46 4c 4f 41 54 20 29 7b 0a 20 20 20 20 20 20 20 FLOAT ){.
4a40: 20 20 20 72 65 61 6c 76 61 6c 75 65 20 2b 3d 20 realvalue +=
4a50: 72 6f 75 6e 64 65 72 3b 0a 20 20 20 20 20 20 20 rounder;.
4a60: 20 20 20 69 66 28 20 72 65 61 6c 76 61 6c 75 65 if( realvalue
4a70: 3e 3d 31 30 2e 30 20 29 7b 20 72 65 61 6c 76 61 >=10.0 ){ realva
4a80: 6c 75 65 20 2a 3d 20 30 2e 31 3b 20 65 78 70 2b lue *= 0.1; exp+
4a90: 2b 3b 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 +; }. }.
4aa0: 20 20 20 20 20 20 20 69 66 28 20 78 74 79 70 65 if( xtype
4ab0: 3d 3d 65 74 47 45 4e 45 52 49 43 20 29 7b 0a 20 ==etGENERIC ){.
4ac0: 20 20 20 20 20 20 20 20 20 66 6c 61 67 5f 72 74 flag_rt
4ad0: 7a 20 3d 20 21 66 6c 61 67 5f 61 6c 74 65 72 6e z = !flag_altern
4ae0: 61 74 65 66 6f 72 6d 3b 0a 20 20 20 20 20 20 20 ateform;.
4af0: 20 20 20 69 66 28 20 65 78 70 3c 2d 34 20 7c 7c if( exp<-4 ||
4b00: 20 65 78 70 3e 70 72 65 63 69 73 69 6f 6e 20 29 exp>precision )
4b10: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 78 74 {. xt
4b20: 79 70 65 20 3d 20 65 74 45 58 50 3b 0a 20 20 20 ype = etEXP;.
4b30: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
4b40: 20 20 20 20 20 20 20 20 20 20 70 72 65 63 69 73 precis
4b50: 69 6f 6e 20 3d 20 70 72 65 63 69 73 69 6f 6e 20 ion = precision
4b60: 2d 20 65 78 70 3b 0a 20 20 20 20 20 20 20 20 20 - exp;.
4b70: 20 20 20 78 74 79 70 65 20 3d 20 65 74 46 4c 4f xtype = etFLO
4b80: 41 54 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a AT;. }.
4b90: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 }else{.
4ba0: 20 20 20 20 20 20 20 20 20 66 6c 61 67 5f 72 74 flag_rt
4bb0: 7a 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 7d z = 0;. }
4bc0: 0a 20 20 20 20 20 20 20 20 69 66 28 20 78 74 79 . if( xty
4bd0: 70 65 3d 3d 65 74 45 58 50 20 29 7b 0a 20 20 20 pe==etEXP ){.
4be0: 20 20 20 20 20 20 20 65 32 20 3d 20 30 3b 0a 20 e2 = 0;.
4bf0: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
4c00: 20 20 20 20 20 20 20 20 65 32 20 3d 20 65 78 70 e2 = exp
4c10: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 ;. }.
4c20: 20 20 20 20 6e 73 64 20 3d 20 30 3b 0a 20 20 20 nsd = 0;.
4c30: 20 20 20 20 20 66 6c 61 67 5f 64 70 20 3d 20 28 flag_dp = (
4c40: 70 72 65 63 69 73 69 6f 6e 3e 30 20 3f 31 3a 30 precision>0 ?1:0
4c50: 29 20 7c 20 66 6c 61 67 5f 61 6c 74 65 72 6e 61 ) | flag_alterna
4c60: 74 65 66 6f 72 6d 20 7c 20 66 6c 61 67 5f 61 6c teform | flag_al
4c70: 74 66 6f 72 6d 32 3b 0a 20 20 20 20 20 20 20 20 tform2;.
4c80: 2f 2a 20 54 68 65 20 73 69 67 6e 20 69 6e 20 66 /* The sign in f
4c90: 72 6f 6e 74 20 6f 66 20 74 68 65 20 6e 75 6d 62 ront of the numb
4ca0: 65 72 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 er */. if
4cb0: 28 20 70 72 65 66 69 78 20 29 7b 0a 20 20 20 20 ( prefix ){.
4cc0: 20 20 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 *(bufpt++)
4cd0: 20 3d 20 70 72 65 66 69 78 3b 0a 20 20 20 20 20 = prefix;.
4ce0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 2f 2a 20 }. /*
4cf0: 44 69 67 69 74 73 20 70 72 69 6f 72 20 74 6f 20 Digits prior to
4d00: 74 68 65 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e the decimal poin
4d10: 74 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 28 t */. if(
4d20: 20 65 32 3c 30 20 29 7b 0a 20 20 20 20 20 20 20 e2<0 ){.
4d30: 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 *(bufpt++) =
4d40: 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c '0';. }el
4d50: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 66 6f se{. fo
4d60: 72 28 3b 20 65 32 3e 3d 30 3b 20 65 32 2d 2d 29 r(; e2>=0; e2--)
4d70: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 2a 28 {. *(
4d80: 62 75 66 70 74 2b 2b 29 20 3d 20 65 74 5f 67 65 bufpt++) = et_ge
4d90: 74 64 69 67 69 74 28 26 72 65 61 6c 76 61 6c 75 tdigit(&realvalu
4da0: 65 2c 26 6e 73 64 29 3b 0a 20 20 20 20 20 20 20 e,&nsd);.
4db0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 }. }.
4dc0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 64 65 /* The de
4dd0: 63 69 6d 61 6c 20 70 6f 69 6e 74 20 2a 2f 0a 20 cimal point */.
4de0: 20 20 20 20 20 20 20 69 66 28 20 66 6c 61 67 5f if( flag_
4df0: 64 70 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 dp ){.
4e00: 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 27 2e 27 *(bufpt++) = '.'
4e10: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 ;. }.
4e20: 20 20 20 20 2f 2a 20 22 30 22 20 64 69 67 69 74 /* "0" digit
4e30: 73 20 61 66 74 65 72 20 74 68 65 20 64 65 63 69 s after the deci
4e40: 6d 61 6c 20 70 6f 69 6e 74 20 62 75 74 20 62 65 mal point but be
4e50: 66 6f 72 65 20 74 68 65 20 66 69 72 73 74 0a 20 fore the first.
4e60: 20 20 20 20 20 20 20 2a 2a 20 73 69 67 6e 69 66 ** signif
4e70: 69 63 61 6e 74 20 64 69 67 69 74 20 6f 66 20 74 icant digit of t
4e80: 68 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 20 he number */.
4e90: 20 20 20 20 20 66 6f 72 28 65 32 2b 2b 3b 20 65 for(e2++; e
4ea0: 32 3c 30 3b 20 70 72 65 63 69 73 69 6f 6e 2d 2d 2<0; precision--
4eb0: 2c 20 65 32 2b 2b 29 7b 0a 20 20 20 20 20 20 20 , e2++){.
4ec0: 20 20 20 61 73 73 65 72 74 28 20 70 72 65 63 69 assert( preci
4ed0: 73 69 6f 6e 3e 30 20 29 3b 0a 20 20 20 20 20 20 sion>0 );.
4ee0: 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d *(bufpt++) =
4ef0: 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a '0';. }.
4f00: 20 20 20 20 20 20 20 20 2f 2a 20 53 69 67 6e 69 /* Signi
4f10: 66 69 63 61 6e 74 20 64 69 67 69 74 73 20 61 66 ficant digits af
4f20: 74 65 72 20 74 68 65 20 64 65 63 69 6d 61 6c 20 ter the decimal
4f30: 70 6f 69 6e 74 20 2a 2f 0a 20 20 20 20 20 20 20 point */.
4f40: 20 77 68 69 6c 65 28 20 28 70 72 65 63 69 73 69 while( (precisi
4f50: 6f 6e 2d 2d 29 3e 30 20 29 7b 0a 20 20 20 20 20 on--)>0 ){.
4f60: 20 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 *(bufpt++)
4f70: 3d 20 65 74 5f 67 65 74 64 69 67 69 74 28 26 72 = et_getdigit(&r
4f80: 65 61 6c 76 61 6c 75 65 2c 26 6e 73 64 29 3b 0a ealvalue,&nsd);.
4f90: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 }.
4fa0: 20 20 2f 2a 20 52 65 6d 6f 76 65 20 74 72 61 69 /* Remove trai
4fb0: 6c 69 6e 67 20 7a 65 72 6f 73 20 61 6e 64 20 74 ling zeros and t
4fc0: 68 65 20 22 2e 22 20 69 66 20 6e 6f 20 64 69 67 he "." if no dig
4fd0: 69 74 73 20 66 6f 6c 6c 6f 77 20 74 68 65 20 22 its follow the "
4fe0: 2e 22 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 ." */. if
4ff0: 28 20 66 6c 61 67 5f 72 74 7a 20 26 26 20 66 6c ( flag_rtz && fl
5000: 61 67 5f 64 70 20 29 7b 0a 20 20 20 20 20 20 20 ag_dp ){.
5010: 20 20 20 77 68 69 6c 65 28 20 62 75 66 70 74 5b while( bufpt[
5020: 2d 31 5d 3d 3d 27 30 27 20 29 20 2a 28 2d 2d 62 -1]=='0' ) *(--b
5030: 75 66 70 74 29 20 3d 20 30 3b 0a 20 20 20 20 20 ufpt) = 0;.
5040: 20 20 20 20 20 61 73 73 65 72 74 28 20 62 75 66 assert( buf
5050: 70 74 3e 62 75 66 20 29 3b 0a 20 20 20 20 20 20 pt>buf );.
5060: 20 20 20 20 69 66 28 20 62 75 66 70 74 5b 2d 31 if( bufpt[-1
5070: 5d 3d 3d 27 2e 27 20 29 7b 0a 20 20 20 20 20 20 ]=='.' ){.
5080: 20 20 20 20 20 20 69 66 28 20 66 6c 61 67 5f 61 if( flag_a
5090: 6c 74 66 6f 72 6d 32 20 29 7b 0a 20 20 20 20 20 ltform2 ){.
50a0: 20 20 20 20 20 20 20 20 20 2a 28 62 75 66 70 74 *(bufpt
50b0: 2b 2b 29 20 3d 20 27 30 27 3b 0a 20 20 20 20 20 ++) = '0';.
50c0: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
50d0: 20 20 20 20 20 20 20 20 20 20 20 20 2a 28 2d 2d *(--
50e0: 62 75 66 70 74 29 20 3d 20 30 3b 0a 20 20 20 20 bufpt) = 0;.
50f0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 }.
5100: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a }. }.
5110: 20 20 20 20 20 20 20 20 2f 2a 20 41 64 64 20 74 /* Add t
5120: 68 65 20 22 65 4e 4e 4e 22 20 73 75 66 66 69 78 he "eNNN" suffix
5130: 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 28 20 */. if(
5140: 66 6c 61 67 5f 65 78 70 20 7c 7c 20 78 74 79 70 flag_exp || xtyp
5150: 65 3d 3d 65 74 45 58 50 20 29 7b 0a 20 20 20 20 e==etEXP ){.
5160: 20 20 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 *(bufpt++)
5170: 20 3d 20 61 44 69 67 69 74 73 5b 69 6e 66 6f 70 = aDigits[infop
5180: 2d 3e 63 68 61 72 73 65 74 5d 3b 0a 20 20 20 20 ->charset];.
5190: 20 20 20 20 20 20 69 66 28 20 65 78 70 3c 30 20 if( exp<0
51a0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 2a ){. *
51b0: 28 62 75 66 70 74 2b 2b 29 20 3d 20 27 2d 27 3b (bufpt++) = '-';
51c0: 20 65 78 70 20 3d 20 2d 65 78 70 3b 0a 20 20 20 exp = -exp;.
51d0: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
51e0: 20 20 20 20 20 20 20 20 20 20 2a 28 62 75 66 70 *(bufp
51f0: 74 2b 2b 29 20 3d 20 27 2b 27 3b 0a 20 20 20 20 t++) = '+';.
5200: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
5210: 20 20 69 66 28 20 65 78 70 3e 3d 31 30 30 20 29 if( exp>=100 )
5220: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 2a 28 {. *(
5230: 62 75 66 70 74 2b 2b 29 20 3d 20 28 63 68 61 72 bufpt++) = (char
5240: 29 28 28 65 78 70 2f 31 30 30 29 2b 27 30 27 29 )((exp/100)+'0')
5250: 3b 20 20 20 20 20 20 20 20 2f 2a 20 31 30 30 27 ; /* 100'
5260: 73 20 64 69 67 69 74 20 2a 2f 0a 20 20 20 20 20 s digit */.
5270: 20 20 20 20 20 20 20 65 78 70 20 25 3d 20 31 30 exp %= 10
5280: 30 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 0;. }.
5290: 20 20 20 20 20 20 20 20 20 2a 28 62 75 66 70 74 *(bufpt
52a0: 2b 2b 29 20 3d 20 28 63 68 61 72 29 28 65 78 70 ++) = (char)(exp
52b0: 2f 31 30 2b 27 30 27 29 3b 20 20 20 20 20 20 20 /10+'0');
52c0: 20 20 20 20 20 20 2f 2a 20 31 30 27 73 20 64 69 /* 10's di
52d0: 67 69 74 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 git */.
52e0: 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 28 63 *(bufpt++) = (c
52f0: 68 61 72 29 28 65 78 70 25 31 30 2b 27 30 27 29 har)(exp%10+'0')
5300: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a ; /*
5310: 20 31 27 73 20 64 69 67 69 74 20 2a 2f 0a 20 20 1's digit */.
5320: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
5330: 2a 62 75 66 70 74 20 3d 20 30 3b 0a 0a 20 20 20 *bufpt = 0;..
5340: 20 20 20 20 20 2f 2a 20 54 68 65 20 63 6f 6e 76 /* The conv
5350: 65 72 74 65 64 20 6e 75 6d 62 65 72 20 69 73 20 erted number is
5360: 69 6e 20 62 75 66 5b 5d 20 61 6e 64 20 7a 65 72 in buf[] and zer
5370: 6f 20 74 65 72 6d 69 6e 61 74 65 64 2e 20 4f 75 o terminated. Ou
5380: 74 70 75 74 20 69 74 2e 0a 20 20 20 20 20 20 20 tput it..
5390: 20 2a 2a 20 4e 6f 74 65 20 74 68 61 74 20 74 68 ** Note that th
53a0: 65 20 6e 75 6d 62 65 72 20 69 73 20 69 6e 20 74 e number is in t
53b0: 68 65 20 75 73 75 61 6c 20 6f 72 64 65 72 2c 20 he usual order,
53c0: 6e 6f 74 20 72 65 76 65 72 73 65 64 20 61 73 20 not reversed as
53d0: 77 69 74 68 0a 20 20 20 20 20 20 20 20 2a 2a 20 with. **
53e0: 69 6e 74 65 67 65 72 20 63 6f 6e 76 65 72 73 69 integer conversi
53f0: 6f 6e 73 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20 ons. */.
5400: 6c 65 6e 67 74 68 20 3d 20 28 69 6e 74 29 28 62 length = (int)(b
5410: 75 66 70 74 2d 62 75 66 29 3b 0a 20 20 20 20 20 ufpt-buf);.
5420: 20 20 20 62 75 66 70 74 20 3d 20 62 75 66 3b 0a bufpt = buf;.
5430: 0a 20 20 20 20 20 20 20 20 2f 2a 20 53 70 65 63 . /* Spec
5440: 69 61 6c 20 63 61 73 65 3a 20 20 41 64 64 20 6c ial case: Add l
5450: 65 61 64 69 6e 67 20 7a 65 72 6f 73 20 69 66 20 eading zeros if
5460: 74 68 65 20 66 6c 61 67 5f 7a 65 72 6f 70 61 64 the flag_zeropad
5470: 20 66 6c 61 67 20 69 73 0a 20 20 20 20 20 20 20 flag is.
5480: 20 2a 2a 20 73 65 74 20 61 6e 64 20 77 65 20 61 ** set and we a
5490: 72 65 20 6e 6f 74 20 6c 65 66 74 20 6a 75 73 74 re not left just
54a0: 69 66 69 65 64 20 2a 2f 0a 20 20 20 20 20 20 20 ified */.
54b0: 20 69 66 28 20 66 6c 61 67 5f 7a 65 72 6f 70 61 if( flag_zeropa
54c0: 64 20 26 26 20 21 66 6c 61 67 5f 6c 65 66 74 6a d && !flag_leftj
54d0: 75 73 74 69 66 79 20 26 26 20 6c 65 6e 67 74 68 ustify && length
54e0: 20 3c 20 77 69 64 74 68 29 7b 0a 20 20 20 20 20 < width){.
54f0: 20 20 20 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 int i;.
5500: 20 20 20 20 20 20 69 6e 74 20 6e 50 61 64 20 3d int nPad =
5510: 20 77 69 64 74 68 20 2d 20 6c 65 6e 67 74 68 3b width - length;
5520: 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 28 69 . for(i
5530: 3d 77 69 64 74 68 3b 20 69 3e 3d 6e 50 61 64 3b =width; i>=nPad;
5540: 20 69 2d 2d 29 7b 0a 20 20 20 20 20 20 20 20 20 i--){.
5550: 20 20 20 62 75 66 70 74 5b 69 5d 20 3d 20 62 75 bufpt[i] = bu
5560: 66 70 74 5b 69 2d 6e 50 61 64 5d 3b 0a 20 20 20 fpt[i-nPad];.
5570: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
5580: 20 20 20 69 20 3d 20 70 72 65 66 69 78 21 3d 30 i = prefix!=0
5590: 3b 0a 20 20 20 20 20 20 20 20 20 20 77 68 69 6c ;. whil
55a0: 65 28 20 6e 50 61 64 2d 2d 20 29 20 62 75 66 70 e( nPad-- ) bufp
55b0: 74 5b 69 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20 20 t[i++] = '0';.
55c0: 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d length =
55d0: 20 77 69 64 74 68 3b 0a 20 20 20 20 20 20 20 20 width;.
55e0: 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 21 64 65 66 }.#endif /* !def
55f0: 69 6e 65 64 28 53 51 4c 49 54 45 5f 4f 4d 49 54 ined(SQLITE_OMIT
5600: 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 29 _FLOATING_POINT)
5610: 20 2a 2f 0a 20 20 20 20 20 20 20 20 62 72 65 61 */. brea
5620: 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 k;. case et
5630: 53 49 5a 45 3a 0a 20 20 20 20 20 20 20 20 2a 28 SIZE:. *(
5640: 76 61 5f 61 72 67 28 61 70 2c 69 6e 74 2a 29 29 va_arg(ap,int*))
5650: 20 3d 20 70 41 63 63 75 6d 2d 3e 6e 43 68 61 72 = pAccum->nChar
5660: 3b 0a 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 ;. length
5670: 20 3d 20 77 69 64 74 68 20 3d 20 30 3b 0a 20 20 = width = 0;.
5680: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 break;.
5690: 20 20 20 63 61 73 65 20 65 74 50 45 52 43 45 4e case etPERCEN
56a0: 54 3a 0a 20 20 20 20 20 20 20 20 62 75 66 5b 30 T:. buf[0
56b0: 5d 20 3d 20 27 25 27 3b 0a 20 20 20 20 20 20 20 ] = '%';.
56c0: 20 62 75 66 70 74 20 3d 20 62 75 66 3b 0a 20 20 bufpt = buf;.
56d0: 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 31 length = 1
56e0: 3b 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b ;. break;
56f0: 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 43 48 . case etCH
5700: 41 52 58 3a 0a 20 20 20 20 20 20 20 20 63 20 3d ARX:. c =
5710: 20 76 61 5f 61 72 67 28 61 70 2c 69 6e 74 29 3b va_arg(ap,int);
5720: 0a 20 20 20 20 20 20 20 20 62 75 66 5b 30 5d 20 . buf[0]
5730: 3d 20 28 63 68 61 72 29 63 3b 0a 20 20 20 20 20 = (char)c;.
5740: 20 20 20 69 66 28 20 70 72 65 63 69 73 69 6f 6e if( precision
5750: 3e 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 >=0 ){.
5760: 20 66 6f 72 28 69 64 78 3d 31 3b 20 69 64 78 3c for(idx=1; idx<
5770: 70 72 65 63 69 73 69 6f 6e 3b 20 69 64 78 2b 2b precision; idx++
5780: 29 20 62 75 66 5b 69 64 78 5d 20 3d 20 28 63 68 ) buf[idx] = (ch
5790: 61 72 29 63 3b 0a 20 20 20 20 20 20 20 20 20 20 ar)c;.
57a0: 6c 65 6e 67 74 68 20 3d 20 70 72 65 63 69 73 69 length = precisi
57b0: 6f 6e 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 on;. }els
57c0: 65 7b 0a 20 20 20 20 20 20 20 20 20 20 6c 65 6e e{. len
57d0: 67 74 68 20 3d 31 3b 0a 20 20 20 20 20 20 20 20 gth =1;.
57e0: 7d 0a 20 20 20 20 20 20 20 20 62 75 66 70 74 20 }. bufpt
57f0: 3d 20 62 75 66 3b 0a 20 20 20 20 20 20 20 20 62 = buf;. b
5800: 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 reak;. case
5810: 20 65 74 53 54 52 49 4e 47 3a 0a 20 20 20 20 20 etSTRING:.
5820: 20 63 61 73 65 20 65 74 44 59 4e 53 54 52 49 4e case etDYNSTRIN
5830: 47 3a 0a 20 20 20 20 20 20 20 20 62 75 66 70 74 G:. bufpt
5840: 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 63 68 61 = va_arg(ap,cha
5850: 72 2a 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 r*);. if(
5860: 20 62 75 66 70 74 3d 3d 30 20 29 7b 0a 20 20 20 bufpt==0 ){.
5870: 20 20 20 20 20 20 20 62 75 66 70 74 20 3d 20 22 bufpt = "
5880: 22 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 ";. }else
5890: 20 69 66 28 20 78 74 79 70 65 3d 3d 65 74 44 59 if( xtype==etDY
58a0: 4e 53 54 52 49 4e 47 20 29 7b 0a 20 20 20 20 20 NSTRING ){.
58b0: 20 20 20 20 20 7a 45 78 74 72 61 20 3d 20 62 75 zExtra = bu
58c0: 66 70 74 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 fpt;. }.
58d0: 20 20 20 20 20 20 20 69 66 28 20 70 72 65 63 69 if( preci
58e0: 73 69 6f 6e 3e 3d 30 20 29 7b 0a 20 20 20 20 20 sion>=0 ){.
58f0: 20 20 20 20 20 66 6f 72 28 6c 65 6e 67 74 68 3d for(length=
5900: 30 3b 20 6c 65 6e 67 74 68 3c 70 72 65 63 69 73 0; length<precis
5910: 69 6f 6e 20 26 26 20 62 75 66 70 74 5b 6c 65 6e ion && bufpt[len
5920: 67 74 68 5d 3b 20 6c 65 6e 67 74 68 2b 2b 29 7b gth]; length++){
5930: 7d 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b }. }else{
5940: 0a 20 20 20 20 20 20 20 20 20 20 6c 65 6e 67 74 . lengt
5950: 68 20 3d 20 73 71 6c 69 74 65 33 53 74 72 6c 65 h = sqlite3Strle
5960: 6e 33 30 28 62 75 66 70 74 29 3b 0a 20 20 20 20 n30(bufpt);.
5970: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 62 72 }. br
5980: 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 eak;. case
5990: 65 74 53 51 4c 45 53 43 41 50 45 3a 0a 20 20 20 etSQLESCAPE:.
59a0: 20 20 20 63 61 73 65 20 65 74 53 51 4c 45 53 43 case etSQLESC
59b0: 41 50 45 32 3a 0a 20 20 20 20 20 20 63 61 73 65 APE2:. case
59c0: 20 65 74 53 51 4c 45 53 43 41 50 45 33 3a 20 7b etSQLESCAPE3: {
59d0: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69 2c 20 . int i,
59e0: 6a 2c 20 6b 2c 20 6e 2c 20 69 73 6e 75 6c 6c 3b j, k, n, isnull;
59f0: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 6e 65 65 . int nee
5a00: 64 51 75 6f 74 65 3b 0a 20 20 20 20 20 20 20 20 dQuote;.
5a10: 63 68 61 72 20 63 68 3b 0a 20 20 20 20 20 20 20 char ch;.
5a20: 20 63 68 61 72 20 71 20 3d 20 28 28 78 74 79 70 char q = ((xtyp
5a30: 65 3d 3d 65 74 53 51 4c 45 53 43 41 50 45 33 29 e==etSQLESCAPE3)
5a40: 3f 27 22 27 3a 27 5c 27 27 29 3b 20 20 20 2f 2a ?'"':'\''); /*
5a50: 20 51 75 6f 74 65 20 63 68 61 72 61 63 74 65 72 Quote character
5a60: 20 2a 2f 0a 20 20 20 20 20 20 20 20 63 68 61 72 */. char
5a70: 20 2a 65 73 63 61 72 67 20 3d 20 76 61 5f 61 72 *escarg = va_ar
5a80: 67 28 61 70 2c 63 68 61 72 2a 29 3b 0a 20 20 20 g(ap,char*);.
5a90: 20 20 20 20 20 69 73 6e 75 6c 6c 20 3d 20 65 73 isnull = es
5aa0: 63 61 72 67 3d 3d 30 3b 0a 20 20 20 20 20 20 20 carg==0;.
5ab0: 20 69 66 28 20 69 73 6e 75 6c 6c 20 29 20 65 73 if( isnull ) es
5ac0: 63 61 72 67 20 3d 20 28 78 74 79 70 65 3d 3d 65 carg = (xtype==e
5ad0: 74 53 51 4c 45 53 43 41 50 45 32 20 3f 20 22 4e tSQLESCAPE2 ? "N
5ae0: 55 4c 4c 22 20 3a 20 22 28 4e 55 4c 4c 29 22 29 ULL" : "(NULL)")
5af0: 3b 0a 20 20 20 20 20 20 20 20 6b 20 3d 20 70 72 ;. k = pr
5b00: 65 63 69 73 69 6f 6e 3b 0a 20 20 20 20 20 20 20 ecision;.
5b10: 20 66 6f 72 28 69 3d 6e 3d 30 3b 20 6b 21 3d 30 for(i=n=0; k!=0
5b20: 20 26 26 20 28 63 68 3d 65 73 63 61 72 67 5b 69 && (ch=escarg[i
5b30: 5d 29 21 3d 30 3b 20 69 2b 2b 2c 20 6b 2d 2d 29 ])!=0; i++, k--)
5b40: 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 {. if(
5b50: 63 68 3d 3d 71 20 29 20 20 6e 2b 2b 3b 0a 20 20 ch==q ) n++;.
5b60: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
5b70: 6e 65 65 64 51 75 6f 74 65 20 3d 20 21 69 73 6e needQuote = !isn
5b80: 75 6c 6c 20 26 26 20 78 74 79 70 65 3d 3d 65 74 ull && xtype==et
5b90: 53 51 4c 45 53 43 41 50 45 32 3b 0a 20 20 20 20 SQLESCAPE2;.
5ba0: 20 20 20 20 6e 20 2b 3d 20 69 20 2b 20 31 20 2b n += i + 1 +
5bb0: 20 6e 65 65 64 51 75 6f 74 65 2a 32 3b 0a 20 20 needQuote*2;.
5bc0: 20 20 20 20 20 20 69 66 28 20 6e 3e 65 74 42 55 if( n>etBU
5bd0: 46 53 49 5a 45 20 29 7b 0a 20 20 20 20 20 20 20 FSIZE ){.
5be0: 20 20 20 62 75 66 70 74 20 3d 20 7a 45 78 74 72 bufpt = zExtr
5bf0: 61 20 3d 20 73 71 6c 69 74 65 33 4d 61 6c 6c 6f a = sqlite3Mallo
5c00: 63 28 20 6e 20 29 3b 0a 20 20 20 20 20 20 20 20 c( n );.
5c10: 20 20 69 66 28 20 62 75 66 70 74 3d 3d 30 20 29 if( bufpt==0 )
5c20: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 70 41 {. pA
5c30: 63 63 75 6d 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c ccum->mallocFail
5c40: 65 64 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 ed = 1;.
5c50: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 return;.
5c60: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
5c70: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 }else{.
5c80: 20 62 75 66 70 74 20 3d 20 62 75 66 3b 0a 20 20 bufpt = buf;.
5c90: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
5ca0: 6a 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 69 j = 0;. i
5cb0: 66 28 20 6e 65 65 64 51 75 6f 74 65 20 29 20 62 f( needQuote ) b
5cc0: 75 66 70 74 5b 6a 2b 2b 5d 20 3d 20 71 3b 0a 20 ufpt[j++] = q;.
5cd0: 20 20 20 20 20 20 20 6b 20 3d 20 69 3b 0a 20 20 k = i;.
5ce0: 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 for(i=0; i
5cf0: 3c 6b 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 <k; i++){.
5d00: 20 20 20 20 62 75 66 70 74 5b 6a 2b 2b 5d 20 3d bufpt[j++] =
5d10: 20 63 68 20 3d 20 65 73 63 61 72 67 5b 69 5d 3b ch = escarg[i];
5d20: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 63 . if( c
5d30: 68 3d 3d 71 20 29 20 62 75 66 70 74 5b 6a 2b 2b h==q ) bufpt[j++
5d40: 5d 20 3d 20 63 68 3b 0a 20 20 20 20 20 20 20 20 ] = ch;.
5d50: 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 6e 65 }. if( ne
5d60: 65 64 51 75 6f 74 65 20 29 20 62 75 66 70 74 5b edQuote ) bufpt[
5d70: 6a 2b 2b 5d 20 3d 20 71 3b 0a 20 20 20 20 20 20 j++] = q;.
5d80: 20 20 62 75 66 70 74 5b 6a 5d 20 3d 20 30 3b 0a bufpt[j] = 0;.
5d90: 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d length =
5da0: 20 6a 3b 0a 20 20 20 20 20 20 20 20 2f 2a 20 54 j;. /* T
5db0: 68 65 20 70 72 65 63 69 73 69 6f 6e 20 69 6e 20 he precision in
5dc0: 25 71 20 61 6e 64 20 25 51 20 6d 65 61 6e 73 20 %q and %Q means
5dd0: 68 6f 77 20 6d 61 6e 79 20 69 6e 70 75 74 20 63 how many input c
5de0: 68 61 72 61 63 74 65 72 73 20 74 6f 0a 20 20 20 haracters to.
5df0: 20 20 20 20 20 2a 2a 20 63 6f 6e 73 75 6d 65 2c ** consume,
5e00: 20 6e 6f 74 20 74 68 65 20 6c 65 6e 67 74 68 20 not the length
5e10: 6f 66 20 74 68 65 20 6f 75 74 70 75 74 2e 2e 2e of the output...
5e20: 0a 20 20 20 20 20 20 20 20 2a 2a 20 69 66 28 20 . ** if(
5e30: 70 72 65 63 69 73 69 6f 6e 3e 3d 30 20 26 26 20 precision>=0 &&
5e40: 70 72 65 63 69 73 69 6f 6e 3c 6c 65 6e 67 74 68 precision<length
5e50: 20 29 20 6c 65 6e 67 74 68 20 3d 20 70 72 65 63 ) length = prec
5e60: 69 73 69 6f 6e 3b 20 2a 2f 0a 20 20 20 20 20 20 ision; */.
5e70: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d break;. }
5e80: 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 54 4f . case etTO
5e90: 4b 45 4e 3a 20 7b 0a 20 20 20 20 20 20 20 20 54 KEN: {. T
5ea0: 6f 6b 65 6e 20 2a 70 54 6f 6b 65 6e 20 3d 20 76 oken *pToken = v
5eb0: 61 5f 61 72 67 28 61 70 2c 20 54 6f 6b 65 6e 2a a_arg(ap, Token*
5ec0: 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 70 );. if( p
5ed0: 54 6f 6b 65 6e 20 29 7b 0a 20 20 20 20 20 20 20 Token ){.
5ee0: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 sqlite3StrAcc
5ef0: 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c umAppend(pAccum,
5f00: 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 70 54 (const char*)pT
5f10: 6f 6b 65 6e 2d 3e 7a 2c 20 70 54 6f 6b 65 6e 2d oken->z, pToken-
5f20: 3e 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 >n);. }.
5f30: 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 length =
5f40: 77 69 64 74 68 20 3d 20 30 3b 0a 20 20 20 20 20 width = 0;.
5f50: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 break;.
5f60: 7d 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 53 }. case etS
5f70: 52 43 4c 49 53 54 3a 20 7b 0a 20 20 20 20 20 20 RCLIST: {.
5f80: 20 20 53 72 63 4c 69 73 74 20 2a 70 53 72 63 20 SrcList *pSrc
5f90: 3d 20 76 61 5f 61 72 67 28 61 70 2c 20 53 72 63 = va_arg(ap, Src
5fa0: 4c 69 73 74 2a 29 3b 0a 20 20 20 20 20 20 20 20 List*);.
5fb0: 69 6e 74 20 6b 20 3d 20 76 61 5f 61 72 67 28 61 int k = va_arg(a
5fc0: 70 2c 20 69 6e 74 29 3b 0a 20 20 20 20 20 20 20 p, int);.
5fd0: 20 73 74 72 75 63 74 20 53 72 63 4c 69 73 74 5f struct SrcList_
5fe0: 69 74 65 6d 20 2a 70 49 74 65 6d 20 3d 20 26 70 item *pItem = &p
5ff0: 53 72 63 2d 3e 61 5b 6b 5d 3b 0a 20 20 20 20 20 Src->a[k];.
6000: 20 20 20 61 73 73 65 72 74 28 20 6b 3e 3d 30 20 assert( k>=0
6010: 26 26 20 6b 3c 70 53 72 63 2d 3e 6e 53 72 63 20 && k<pSrc->nSrc
6020: 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 70 );. if( p
6030: 49 74 65 6d 2d 3e 7a 44 61 74 61 62 61 73 65 20 Item->zDatabase
6040: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 73 71 6c ){. sql
6050: 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 65 ite3StrAccumAppe
6060: 6e 64 28 70 41 63 63 75 6d 2c 20 70 49 74 65 6d nd(pAccum, pItem
6070: 2d 3e 7a 44 61 74 61 62 61 73 65 2c 20 2d 31 29 ->zDatabase, -1)
6080: 3b 0a 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 ;. sqli
6090: 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 65 6e te3StrAccumAppen
60a0: 64 28 70 41 63 63 75 6d 2c 20 22 2e 22 2c 20 31 d(pAccum, ".", 1
60b0: 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 );. }.
60c0: 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 sqlite3StrA
60d0: 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 ccumAppend(pAccu
60e0: 6d 2c 20 70 49 74 65 6d 2d 3e 7a 4e 61 6d 65 2c m, pItem->zName,
60f0: 20 2d 31 29 3b 0a 20 20 20 20 20 20 20 20 6c 65 -1);. le
6100: 6e 67 74 68 20 3d 20 77 69 64 74 68 20 3d 20 30 ngth = width = 0
6110: 3b 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b ;. break;
6120: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 64 . }. d
6130: 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 efault: {.
6140: 20 20 61 73 73 65 72 74 28 20 78 74 79 70 65 3d assert( xtype=
6150: 3d 65 74 49 4e 56 41 4c 49 44 20 29 3b 0a 20 20 =etINVALID );.
6160: 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 return;.
6170: 20 20 20 20 7d 0a 20 20 20 20 7d 2f 2a 20 45 6e }. }/* En
6180: 64 20 73 77 69 74 63 68 20 6f 76 65 72 20 74 68 d switch over th
6190: 65 20 66 6f 72 6d 61 74 20 74 79 70 65 20 2a 2f e format type */
61a0: 0a 20 20 20 20 2f 2a 0a 20 20 20 20 2a 2a 20 54 . /*. ** T
61b0: 68 65 20 74 65 78 74 20 6f 66 20 74 68 65 20 63 he text of the c
61c0: 6f 6e 76 65 72 73 69 6f 6e 20 69 73 20 70 6f 69 onversion is poi
61d0: 6e 74 65 64 20 74 6f 20 62 79 20 22 62 75 66 70 nted to by "bufp
61e0: 74 22 20 61 6e 64 20 69 73 0a 20 20 20 20 2a 2a t" and is. **
61f0: 20 22 6c 65 6e 67 74 68 22 20 63 68 61 72 61 63 "length" charac
6200: 74 65 72 73 20 6c 6f 6e 67 2e 20 20 54 68 65 20 ters long. The
6210: 66 69 65 6c 64 20 77 69 64 74 68 20 69 73 20 22 field width is "
6220: 77 69 64 74 68 22 2e 20 20 44 6f 0a 20 20 20 20 width". Do.
6230: 2a 2a 20 74 68 65 20 6f 75 74 70 75 74 2e 0a 20 ** the output..
6240: 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20 21 66 */. if( !f
6250: 6c 61 67 5f 6c 65 66 74 6a 75 73 74 69 66 79 20 lag_leftjustify
6260: 29 7b 0a 20 20 20 20 20 20 72 65 67 69 73 74 65 ){. registe
6270: 72 20 69 6e 74 20 6e 73 70 61 63 65 3b 0a 20 20 r int nspace;.
6280: 20 20 20 20 6e 73 70 61 63 65 20 3d 20 77 69 64 nspace = wid
6290: 74 68 2d 6c 65 6e 67 74 68 3b 0a 20 20 20 20 20 th-length;.
62a0: 20 69 66 28 20 6e 73 70 61 63 65 3e 30 20 29 7b if( nspace>0 ){
62b0: 0a 20 20 20 20 20 20 20 20 61 70 70 65 6e 64 53 . appendS
62c0: 70 61 63 65 28 70 41 63 63 75 6d 2c 20 6e 73 70 pace(pAccum, nsp
62d0: 61 63 65 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 ace);. }.
62e0: 20 20 7d 0a 20 20 20 20 69 66 28 20 6c 65 6e 67 }. if( leng
62f0: 74 68 3e 30 20 29 7b 0a 20 20 20 20 20 20 73 71 th>0 ){. sq
6300: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 lite3StrAccumApp
6310: 65 6e 64 28 70 41 63 63 75 6d 2c 20 62 75 66 70 end(pAccum, bufp
6320: 74 2c 20 6c 65 6e 67 74 68 29 3b 0a 20 20 20 20 t, length);.
6330: 7d 0a 20 20 20 20 69 66 28 20 66 6c 61 67 5f 6c }. if( flag_l
6340: 65 66 74 6a 75 73 74 69 66 79 20 29 7b 0a 20 20 eftjustify ){.
6350: 20 20 20 20 72 65 67 69 73 74 65 72 20 69 6e 74 register int
6360: 20 6e 73 70 61 63 65 3b 0a 20 20 20 20 20 20 6e nspace;. n
6370: 73 70 61 63 65 20 3d 20 77 69 64 74 68 2d 6c 65 space = width-le
6380: 6e 67 74 68 3b 0a 20 20 20 20 20 20 69 66 28 20 ngth;. if(
6390: 6e 73 70 61 63 65 3e 30 20 29 7b 0a 20 20 20 20 nspace>0 ){.
63a0: 20 20 20 20 61 70 70 65 6e 64 53 70 61 63 65 28 appendSpace(
63b0: 70 41 63 63 75 6d 2c 20 6e 73 70 61 63 65 29 3b pAccum, nspace);
63c0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 . }. }.
63d0: 20 20 20 69 66 28 20 7a 45 78 74 72 61 20 29 7b if( zExtra ){
63e0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 . sqlite3_f
63f0: 72 65 65 28 7a 45 78 74 72 61 29 3b 0a 20 20 20 ree(zExtra);.
6400: 20 7d 0a 20 20 7d 2f 2a 20 45 6e 64 20 66 6f 72 }. }/* End for
6410: 20 6c 6f 6f 70 20 6f 76 65 72 20 74 68 65 20 66 loop over the f
6420: 6f 72 6d 61 74 20 73 74 72 69 6e 67 20 2a 2f 0a ormat string */.
6430: 7d 20 2f 2a 20 45 6e 64 20 6f 66 20 66 75 6e 63 } /* End of func
6440: 74 69 6f 6e 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 tion */../*.** A
6450: 70 70 65 6e 64 20 4e 20 62 79 74 65 73 20 6f 66 ppend N bytes of
6460: 20 74 65 78 74 20 66 72 6f 6d 20 7a 20 74 6f 20 text from z to
6470: 74 68 65 20 53 74 72 41 63 63 75 6d 20 6f 62 6a the StrAccum obj
6480: 65 63 74 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c ect..*/.void sql
6490: 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 65 ite3StrAccumAppe
64a0: 6e 64 28 53 74 72 41 63 63 75 6d 20 2a 70 2c 20 nd(StrAccum *p,
64b0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 69 const char *z, i
64c0: 6e 74 20 4e 29 7b 0a 20 20 61 73 73 65 72 74 28 nt N){. assert(
64d0: 20 7a 21 3d 30 20 7c 7c 20 4e 3d 3d 30 20 29 3b z!=0 || N==0 );
64e0: 0a 20 20 69 66 28 20 70 2d 3e 74 6f 6f 42 69 67 . if( p->tooBig
64f0: 20 7c 20 70 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c | p->mallocFail
6500: 65 64 20 29 7b 0a 20 20 20 20 74 65 73 74 63 61 ed ){. testca
6510: 73 65 28 70 2d 3e 74 6f 6f 42 69 67 29 3b 0a 20 se(p->tooBig);.
6520: 20 20 20 74 65 73 74 63 61 73 65 28 70 2d 3e 6d testcase(p->m
6530: 61 6c 6c 6f 63 46 61 69 6c 65 64 29 3b 0a 20 20 allocFailed);.
6540: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 return;. }.
6550: 69 66 28 20 4e 3c 30 20 29 7b 0a 20 20 20 20 4e if( N<0 ){. N
6560: 20 3d 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e = sqlite3Strlen
6570: 33 30 28 7a 29 3b 0a 20 20 7d 0a 20 20 69 66 28 30(z);. }. if(
6580: 20 4e 3d 3d 30 20 7c 7c 20 4e 45 56 45 52 28 7a N==0 || NEVER(z
6590: 3d 3d 30 29 20 29 7b 0a 20 20 20 20 72 65 74 75 ==0) ){. retu
65a0: 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 2d rn;. }. if( p-
65b0: 3e 6e 43 68 61 72 2b 4e 20 3e 3d 20 70 2d 3e 6e >nChar+N >= p->n
65c0: 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 63 68 61 Alloc ){. cha
65d0: 72 20 2a 7a 4e 65 77 3b 0a 20 20 20 20 69 66 28 r *zNew;. if(
65e0: 20 21 70 2d 3e 75 73 65 4d 61 6c 6c 6f 63 20 29 !p->useMalloc )
65f0: 7b 0a 20 20 20 20 20 20 70 2d 3e 74 6f 6f 42 69 {. p->tooBi
6600: 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 4e 20 3d g = 1;. N =
6610: 20 70 2d 3e 6e 41 6c 6c 6f 63 20 2d 20 70 2d 3e p->nAlloc - p->
6620: 6e 43 68 61 72 20 2d 20 31 3b 0a 20 20 20 20 20 nChar - 1;.
6630: 20 69 66 28 20 4e 3c 3d 30 20 29 7b 0a 20 20 20 if( N<=0 ){.
6640: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 return;.
6650: 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a }. }else{.
6660: 20 20 20 20 20 20 63 68 61 72 20 2a 7a 4f 6c 64 char *zOld
6670: 20 3d 20 28 70 2d 3e 7a 54 65 78 74 3d 3d 70 2d = (p->zText==p-
6680: 3e 7a 42 61 73 65 20 3f 20 30 20 3a 20 70 2d 3e >zBase ? 0 : p->
6690: 7a 54 65 78 74 29 3b 0a 20 20 20 20 20 20 69 36 zText);. i6
66a0: 34 20 73 7a 4e 65 77 20 3d 20 70 2d 3e 6e 43 68 4 szNew = p->nCh
66b0: 61 72 3b 0a 20 20 20 20 20 20 73 7a 4e 65 77 20 ar;. szNew
66c0: 2b 3d 20 4e 20 2b 20 31 3b 0a 20 20 20 20 20 20 += N + 1;.
66d0: 69 66 28 20 73 7a 4e 65 77 20 3e 20 70 2d 3e 6d if( szNew > p->m
66e0: 78 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 20 20 xAlloc ){.
66f0: 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 sqlite3StrAccu
6700: 6d 52 65 73 65 74 28 70 29 3b 0a 20 20 20 20 20 mReset(p);.
6710: 20 20 20 70 2d 3e 74 6f 6f 42 69 67 20 3d 20 31 p->tooBig = 1
6720: 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e ;. return
6730: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 ;. }else{.
6740: 20 20 20 20 20 20 20 70 2d 3e 6e 41 6c 6c 6f 63 p->nAlloc
6750: 20 3d 20 28 69 6e 74 29 73 7a 4e 65 77 3b 0a 20 = (int)szNew;.
6760: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28 }. if(
6770: 20 70 2d 3e 75 73 65 4d 61 6c 6c 6f 63 3d 3d 31 p->useMalloc==1
6780: 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 4e 65 77 ){. zNew
6790: 20 3d 20 73 71 6c 69 74 65 33 44 62 52 65 61 6c = sqlite3DbReal
67a0: 6c 6f 63 28 70 2d 3e 64 62 2c 20 7a 4f 6c 64 2c loc(p->db, zOld,
67b0: 20 70 2d 3e 6e 41 6c 6c 6f 63 29 3b 0a 20 20 20 p->nAlloc);.
67c0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
67d0: 20 20 7a 4e 65 77 20 3d 20 73 71 6c 69 74 65 33 zNew = sqlite3
67e0: 5f 72 65 61 6c 6c 6f 63 28 7a 4f 6c 64 2c 20 70 _realloc(zOld, p
67f0: 2d 3e 6e 41 6c 6c 6f 63 29 3b 0a 20 20 20 20 20 ->nAlloc);.
6800: 20 7d 0a 20 20 20 20 20 20 69 66 28 20 7a 4e 65 }. if( zNe
6810: 77 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66 28 w ){. if(
6820: 20 7a 4f 6c 64 3d 3d 30 20 29 20 6d 65 6d 63 70 zOld==0 ) memcp
6830: 79 28 7a 4e 65 77 2c 20 70 2d 3e 7a 54 65 78 74 y(zNew, p->zText
6840: 2c 20 70 2d 3e 6e 43 68 61 72 29 3b 0a 20 20 20 , p->nChar);.
6850: 20 20 20 20 20 70 2d 3e 7a 54 65 78 74 20 3d 20 p->zText =
6860: 7a 4e 65 77 3b 0a 20 20 20 20 20 20 7d 65 6c 73 zNew;. }els
6870: 65 7b 0a 20 20 20 20 20 20 20 20 70 2d 3e 6d 61 e{. p->ma
6880: 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a llocFailed = 1;.
6890: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 53 sqlite3S
68a0: 74 72 41 63 63 75 6d 52 65 73 65 74 28 70 29 3b trAccumReset(p);
68b0: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b . return;
68c0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 . }. }.
68d0: 20 7d 0a 20 20 6d 65 6d 63 70 79 28 26 70 2d 3e }. memcpy(&p->
68e0: 7a 54 65 78 74 5b 70 2d 3e 6e 43 68 61 72 5d 2c zText[p->nChar],
68f0: 20 7a 2c 20 4e 29 3b 0a 20 20 70 2d 3e 6e 43 68 z, N);. p->nCh
6900: 61 72 20 2b 3d 20 4e 3b 0a 7d 0a 0a 2f 2a 0a 2a ar += N;.}../*.*
6910: 2a 20 46 69 6e 69 73 68 20 6f 66 66 20 61 20 73 * Finish off a s
6920: 74 72 69 6e 67 20 62 79 20 6d 61 6b 69 6e 67 20 tring by making
6930: 73 75 72 65 20 69 74 20 69 73 20 7a 65 72 6f 2d sure it is zero-
6940: 74 65 72 6d 69 6e 61 74 65 64 2e 0a 2a 2a 20 52 terminated..** R
6950: 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 20 eturn a pointer
6960: 74 6f 20 74 68 65 20 72 65 73 75 6c 74 69 6e 67 to the resulting
6970: 20 73 74 72 69 6e 67 2e 20 20 52 65 74 75 72 6e string. Return
6980: 20 61 20 4e 55 4c 4c 0a 2a 2a 20 70 6f 69 6e 74 a NULL.** point
6990: 65 72 20 69 66 20 61 6e 79 20 6b 69 6e 64 20 6f er if any kind o
69a0: 66 20 65 72 72 6f 72 20 77 61 73 20 65 6e 63 6f f error was enco
69b0: 75 6e 74 65 72 65 64 2e 0a 2a 2f 0a 63 68 61 72 untered..*/.char
69c0: 20 2a 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 *sqlite3StrAccu
69d0: 6d 46 69 6e 69 73 68 28 53 74 72 41 63 63 75 6d mFinish(StrAccum
69e0: 20 2a 70 29 7b 0a 20 20 69 66 28 20 70 2d 3e 7a *p){. if( p->z
69f0: 54 65 78 74 20 29 7b 0a 20 20 20 20 70 2d 3e 7a Text ){. p->z
6a00: 54 65 78 74 5b 70 2d 3e 6e 43 68 61 72 5d 20 3d Text[p->nChar] =
6a10: 20 30 3b 0a 20 20 20 20 69 66 28 20 70 2d 3e 75 0;. if( p->u
6a20: 73 65 4d 61 6c 6c 6f 63 20 26 26 20 70 2d 3e 7a seMalloc && p->z
6a30: 54 65 78 74 3d 3d 70 2d 3e 7a 42 61 73 65 20 29 Text==p->zBase )
6a40: 7b 0a 20 20 20 20 20 20 69 66 28 20 70 2d 3e 75 {. if( p->u
6a50: 73 65 4d 61 6c 6c 6f 63 3d 3d 31 20 29 7b 0a 20 seMalloc==1 ){.
6a60: 20 20 20 20 20 20 20 70 2d 3e 7a 54 65 78 74 20 p->zText
6a70: 3d 20 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f = sqlite3DbMallo
6a80: 63 52 61 77 28 70 2d 3e 64 62 2c 20 70 2d 3e 6e cRaw(p->db, p->n
6a90: 43 68 61 72 2b 31 20 29 3b 0a 20 20 20 20 20 20 Char+1 );.
6aa0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 70 }else{. p
6ab0: 2d 3e 7a 54 65 78 74 20 3d 20 73 71 6c 69 74 65 ->zText = sqlite
6ac0: 33 5f 6d 61 6c 6c 6f 63 28 70 2d 3e 6e 43 68 61 3_malloc(p->nCha
6ad0: 72 2b 31 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 r+1);. }.
6ae0: 20 20 20 20 69 66 28 20 70 2d 3e 7a 54 65 78 74 if( p->zText
6af0: 20 29 7b 0a 20 20 20 20 20 20 20 20 6d 65 6d 63 ){. memc
6b00: 70 79 28 70 2d 3e 7a 54 65 78 74 2c 20 70 2d 3e py(p->zText, p->
6b10: 7a 42 61 73 65 2c 20 70 2d 3e 6e 43 68 61 72 2b zBase, p->nChar+
6b20: 31 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 1);. }else{
6b30: 0a 20 20 20 20 20 20 20 20 70 2d 3e 6d 61 6c 6c . p->mall
6b40: 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a 20 20 ocFailed = 1;.
6b50: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a }. }. }.
6b60: 20 20 72 65 74 75 72 6e 20 70 2d 3e 7a 54 65 78 return p->zTex
6b70: 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 73 65 t;.}../*.** Rese
6b80: 74 20 61 6e 20 53 74 72 41 63 63 75 6d 20 73 74 t an StrAccum st
6b90: 72 69 6e 67 2e 20 20 52 65 63 6c 61 69 6d 20 61 ring. Reclaim a
6ba0: 6c 6c 20 6d 61 6c 6c 6f 63 65 64 20 6d 65 6d 6f ll malloced memo
6bb0: 72 79 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 ry..*/.void sqli
6bc0: 74 65 33 53 74 72 41 63 63 75 6d 52 65 73 65 74 te3StrAccumReset
6bd0: 28 53 74 72 41 63 63 75 6d 20 2a 70 29 7b 0a 20 (StrAccum *p){.
6be0: 20 69 66 28 20 70 2d 3e 7a 54 65 78 74 21 3d 70 if( p->zText!=p
6bf0: 2d 3e 7a 42 61 73 65 20 29 7b 0a 20 20 20 20 69 ->zBase ){. i
6c00: 66 28 20 70 2d 3e 75 73 65 4d 61 6c 6c 6f 63 3d f( p->useMalloc=
6c10: 3d 31 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 =1 ){. sqli
6c20: 74 65 33 44 62 46 72 65 65 28 70 2d 3e 64 62 2c te3DbFree(p->db,
6c30: 20 70 2d 3e 7a 54 65 78 74 29 3b 0a 20 20 20 20 p->zText);.
6c40: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c }else{. sql
6c50: 69 74 65 33 5f 66 72 65 65 28 70 2d 3e 7a 54 65 ite3_free(p->zTe
6c60: 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 xt);. }. }.
6c70: 20 70 2d 3e 7a 54 65 78 74 20 3d 20 30 3b 0a 7d p->zText = 0;.}
6c80: 0a 0a 2f 2a 0a 2a 2a 20 49 6e 69 74 69 61 6c 69 ../*.** Initiali
6c90: 7a 65 20 61 20 73 74 72 69 6e 67 20 61 63 63 75 ze a string accu
6ca0: 6d 75 6c 61 74 6f 72 0a 2a 2f 0a 76 6f 69 64 20 mulator.*/.void
6cb0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 49 sqlite3StrAccumI
6cc0: 6e 69 74 28 53 74 72 41 63 63 75 6d 20 2a 70 2c nit(StrAccum *p,
6cd0: 20 63 68 61 72 20 2a 7a 42 61 73 65 2c 20 69 6e char *zBase, in
6ce0: 74 20 6e 2c 20 69 6e 74 20 6d 78 29 7b 0a 20 20 t n, int mx){.
6cf0: 70 2d 3e 7a 54 65 78 74 20 3d 20 70 2d 3e 7a 42 p->zText = p->zB
6d00: 61 73 65 20 3d 20 7a 42 61 73 65 3b 0a 20 20 70 ase = zBase;. p
6d10: 2d 3e 64 62 20 3d 20 30 3b 0a 20 20 70 2d 3e 6e ->db = 0;. p->n
6d20: 43 68 61 72 20 3d 20 30 3b 0a 20 20 70 2d 3e 6e Char = 0;. p->n
6d30: 41 6c 6c 6f 63 20 3d 20 6e 3b 0a 20 20 70 2d 3e Alloc = n;. p->
6d40: 6d 78 41 6c 6c 6f 63 20 3d 20 6d 78 3b 0a 20 20 mxAlloc = mx;.
6d50: 70 2d 3e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 31 p->useMalloc = 1
6d60: 3b 0a 20 20 70 2d 3e 74 6f 6f 42 69 67 20 3d 20 ;. p->tooBig =
6d70: 30 3b 0a 20 20 70 2d 3e 6d 61 6c 6c 6f 63 46 61 0;. p->mallocFa
6d80: 69 6c 65 64 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a iled = 0;.}../*.
6d90: 2a 2a 20 50 72 69 6e 74 20 69 6e 74 6f 20 6d 65 ** Print into me
6da0: 6d 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 66 72 mory obtained fr
6db0: 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 om sqliteMalloc(
6dc0: 29 2e 20 20 55 73 65 20 74 68 65 20 69 6e 74 65 ). Use the inte
6dd0: 72 6e 61 6c 0a 2a 2a 20 25 2d 63 6f 6e 76 65 72 rnal.** %-conver
6de0: 73 69 6f 6e 20 65 78 74 65 6e 73 69 6f 6e 73 2e sion extensions.
6df0: 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 .*/.char *sqlite
6e00: 33 56 4d 50 72 69 6e 74 66 28 73 71 6c 69 74 65 3VMPrintf(sqlite
6e10: 33 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 3 *db, const cha
6e20: 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 76 61 5f 6c r *zFormat, va_l
6e30: 69 73 74 20 61 70 29 7b 0a 20 20 63 68 61 72 20 ist ap){. char
6e40: 2a 7a 3b 0a 20 20 63 68 61 72 20 7a 42 61 73 65 *z;. char zBase
6e50: 5b 53 51 4c 49 54 45 5f 50 52 49 4e 54 5f 42 55 [SQLITE_PRINT_BU
6e60: 46 5f 53 49 5a 45 5d 3b 0a 20 20 53 74 72 41 63 F_SIZE];. StrAc
6e70: 63 75 6d 20 61 63 63 3b 0a 20 20 61 73 73 65 72 cum acc;. asser
6e80: 74 28 20 64 62 21 3d 30 20 29 3b 0a 20 20 73 71 t( db!=0 );. sq
6e90: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 49 6e 69 lite3StrAccumIni
6ea0: 74 28 26 61 63 63 2c 20 7a 42 61 73 65 2c 20 73 t(&acc, zBase, s
6eb0: 69 7a 65 6f 66 28 7a 42 61 73 65 29 2c 0a 20 20 izeof(zBase),.
6ec0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
6ed0: 20 20 20 20 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 db->aLimit[S
6ee0: 51 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 QLITE_LIMIT_LENG
6ef0: 54 48 5d 29 3b 0a 20 20 61 63 63 2e 64 62 20 3d TH]);. acc.db =
6f00: 20 64 62 3b 0a 20 20 73 71 6c 69 74 65 33 56 58 db;. sqlite3VX
6f10: 50 72 69 6e 74 66 28 26 61 63 63 2c 20 31 2c 20 Printf(&acc, 1,
6f20: 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 zFormat, ap);.
6f30: 7a 20 3d 20 73 71 6c 69 74 65 33 53 74 72 41 63 z = sqlite3StrAc
6f40: 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 3b cumFinish(&acc);
6f50: 0a 20 20 69 66 28 20 61 63 63 2e 6d 61 6c 6c 6f . if( acc.mallo
6f60: 63 46 61 69 6c 65 64 20 29 7b 0a 20 20 20 20 64 cFailed ){. d
6f70: 62 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 b->mallocFailed
6f80: 3d 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 = 1;. }. retur
6f90: 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 n z;.}../*.** Pr
6fa0: 69 6e 74 20 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 int into memory
6fb0: 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 73 71 obtained from sq
6fc0: 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 2e 20 20 55 liteMalloc(). U
6fd0: 73 65 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 0a se the internal.
6fe0: 2a 2a 20 25 2d 63 6f 6e 76 65 72 73 69 6f 6e 20 ** %-conversion
6ff0: 65 78 74 65 6e 73 69 6f 6e 73 2e 0a 2a 2f 0a 63 extensions..*/.c
7000: 68 61 72 20 2a 73 71 6c 69 74 65 33 4d 50 72 69 har *sqlite3MPri
7010: 6e 74 66 28 73 71 6c 69 74 65 33 20 2a 64 62 2c ntf(sqlite3 *db,
7020: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f const char *zFo
7030: 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 rmat, ...){. va
7040: 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61 72 _list ap;. char
7050: 20 2a 7a 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 *z;. va_start(
7060: 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 ap, zFormat);.
7070: 7a 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 69 z = sqlite3VMPri
7080: 6e 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 2c ntf(db, zFormat,
7090: 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 ap);. va_end(a
70a0: 70 29 3b 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a p);. return z;.
70b0: 7d 0a 0a 2f 2a 0a 2a 2a 20 4c 69 6b 65 20 73 71 }../*.** Like sq
70c0: 6c 69 74 65 33 4d 50 72 69 6e 74 66 28 29 2c 20 lite3MPrintf(),
70d0: 62 75 74 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 but call sqlite3
70e0: 44 62 46 72 65 65 28 29 20 6f 6e 20 7a 53 74 72 DbFree() on zStr
70f0: 20 61 66 74 65 72 20 66 6f 72 6d 61 74 74 69 6e after formattin
7100: 67 0a 2a 2a 20 74 68 65 20 73 74 72 69 6e 67 20 g.** the string
7110: 61 6e 64 20 62 65 66 6f 72 65 20 72 65 74 75 72 and before retur
7120: 6e 6e 69 6e 67 2e 20 20 54 68 69 73 20 72 6f 75 nning. This rou
7130: 74 69 6e 65 20 69 73 20 69 6e 74 65 6e 64 65 64 tine is intended
7140: 20 74 6f 20 62 65 20 75 73 65 64 0a 2a 2a 20 74 to be used.** t
7150: 6f 20 6d 6f 64 69 66 79 20 61 6e 20 65 78 69 73 o modify an exis
7160: 74 69 6e 67 20 73 74 72 69 6e 67 2e 20 20 46 6f ting string. Fo
7170: 72 20 65 78 61 6d 70 6c 65 3a 0a 2a 2a 0a 2a 2a r example:.**.**
7180: 20 20 20 20 20 20 20 78 20 3d 20 73 71 6c 69 74 x = sqlit
7190: 65 33 4d 50 72 69 6e 74 66 28 64 62 2c 20 78 2c e3MPrintf(db, x,
71a0: 20 22 70 72 65 66 69 78 20 25 73 20 73 75 66 66 "prefix %s suff
71b0: 69 78 22 2c 20 78 29 3b 0a 2a 2a 0a 2a 2f 0a 63 ix", x);.**.*/.c
71c0: 68 61 72 20 2a 73 71 6c 69 74 65 33 4d 41 70 70 har *sqlite3MApp
71d0: 65 6e 64 66 28 73 71 6c 69 74 65 33 20 2a 64 62 endf(sqlite3 *db
71e0: 2c 20 63 68 61 72 20 2a 7a 53 74 72 2c 20 63 6f , char *zStr, co
71f0: 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 nst char *zForma
7200: 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 t, ...){. va_li
7210: 73 74 20 61 70 3b 0a 20 20 63 68 61 72 20 2a 7a st ap;. char *z
7220: 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c ;. va_start(ap,
7230: 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a 20 3d zFormat);. z =
7240: 20 73 71 6c 69 74 65 33 56 4d 50 72 69 6e 74 66 sqlite3VMPrintf
7250: 28 64 62 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 (db, zFormat, ap
7260: 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b );. va_end(ap);
7270: 0a 20 20 73 71 6c 69 74 65 33 44 62 46 72 65 65 . sqlite3DbFree
7280: 28 64 62 2c 20 7a 53 74 72 29 3b 0a 20 20 72 65 (db, zStr);. re
7290: 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a turn z;.}../*.**
72a0: 20 50 72 69 6e 74 20 69 6e 74 6f 20 6d 65 6d 6f Print into memo
72b0: 72 79 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d ry obtained from
72c0: 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 sqlite3_malloc(
72d0: 29 2e 20 20 4f 6d 69 74 20 74 68 65 20 69 6e 74 ). Omit the int
72e0: 65 72 6e 61 6c 0a 2a 2a 20 25 2d 63 6f 6e 76 65 ernal.** %-conve
72f0: 72 73 69 6f 6e 20 65 78 74 65 6e 73 69 6f 6e 73 rsion extensions
7300: 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 ..*/.char *sqlit
7310: 65 33 5f 76 6d 70 72 69 6e 74 66 28 63 6f 6e 73 e3_vmprintf(cons
7320: 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c t char *zFormat,
7330: 20 76 61 5f 6c 69 73 74 20 61 70 29 7b 0a 20 20 va_list ap){.
7340: 63 68 61 72 20 2a 7a 3b 0a 20 20 63 68 61 72 20 char *z;. char
7350: 7a 42 61 73 65 5b 53 51 4c 49 54 45 5f 50 52 49 zBase[SQLITE_PRI
7360: 4e 54 5f 42 55 46 5f 53 49 5a 45 5d 3b 0a 20 20 NT_BUF_SIZE];.
7370: 53 74 72 41 63 63 75 6d 20 61 63 63 3b 0a 23 69 StrAccum acc;.#i
7380: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 fndef SQLITE_OMI
7390: 54 5f 41 55 54 4f 49 4e 49 54 0a 20 20 69 66 28 T_AUTOINIT. if(
73a0: 20 73 71 6c 69 74 65 33 5f 69 6e 69 74 69 61 6c sqlite3_initial
73b0: 69 7a 65 28 29 20 29 20 72 65 74 75 72 6e 20 30 ize() ) return 0
73c0: 3b 0a 23 65 6e 64 69 66 0a 20 20 73 71 6c 69 74 ;.#endif. sqlit
73d0: 65 33 53 74 72 41 63 63 75 6d 49 6e 69 74 28 26 e3StrAccumInit(&
73e0: 61 63 63 2c 20 7a 42 61 73 65 2c 20 73 69 7a 65 acc, zBase, size
73f0: 6f 66 28 7a 42 61 73 65 29 2c 20 53 51 4c 49 54 of(zBase), SQLIT
7400: 45 5f 4d 41 58 5f 4c 45 4e 47 54 48 29 3b 0a 20 E_MAX_LENGTH);.
7410: 20 61 63 63 2e 75 73 65 4d 61 6c 6c 6f 63 20 3d acc.useMalloc =
7420: 20 32 3b 0a 20 20 73 71 6c 69 74 65 33 56 58 50 2;. sqlite3VXP
7430: 72 69 6e 74 66 28 26 61 63 63 2c 20 30 2c 20 7a rintf(&acc, 0, z
7440: 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 7a Format, ap);. z
7450: 20 3d 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 = sqlite3StrAcc
7460: 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 3b 0a umFinish(&acc);.
7470: 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f return z;.}../
7480: 2a 0a 2a 2a 20 50 72 69 6e 74 20 69 6e 74 6f 20 *.** Print into
7490: 6d 65 6d 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 memory obtained
74a0: 66 72 6f 6d 20 73 71 6c 69 74 65 33 5f 6d 61 6c from sqlite3_mal
74b0: 6c 6f 63 28 29 28 29 2e 20 20 4f 6d 69 74 20 74 loc()(). Omit t
74c0: 68 65 20 69 6e 74 65 72 6e 61 6c 0a 2a 2a 20 25 he internal.** %
74d0: 2d 63 6f 6e 76 65 72 73 69 6f 6e 20 65 78 74 65 -conversion exte
74e0: 6e 73 69 6f 6e 73 2e 0a 2a 2f 0a 63 68 61 72 20 nsions..*/.char
74f0: 2a 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 *sqlite3_mprintf
7500: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f (const char *zFo
7510: 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 rmat, ...){. va
7520: 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61 72 _list ap;. char
7530: 20 2a 7a 3b 0a 23 69 66 6e 64 65 66 20 53 51 4c *z;.#ifndef SQL
7540: 49 54 45 5f 4f 4d 49 54 5f 41 55 54 4f 49 4e 49 ITE_OMIT_AUTOINI
7550: 54 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f T. if( sqlite3_
7560: 69 6e 69 74 69 61 6c 69 7a 65 28 29 20 29 20 72 initialize() ) r
7570: 65 74 75 72 6e 20 30 3b 0a 23 65 6e 64 69 66 0a eturn 0;.#endif.
7580: 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a va_start(ap, z
7590: 46 6f 72 6d 61 74 29 3b 0a 20 20 7a 20 3d 20 73 Format);. z = s
75a0: 71 6c 69 74 65 33 5f 76 6d 70 72 69 6e 74 66 28 qlite3_vmprintf(
75b0: 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 zFormat, ap);.
75c0: 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 72 65 va_end(ap);. re
75d0: 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a turn z;.}../*.**
75e0: 20 73 71 6c 69 74 65 33 5f 73 6e 70 72 69 6e 74 sqlite3_snprint
75f0: 66 28 29 20 77 6f 72 6b 73 20 6c 69 6b 65 20 73 f() works like s
7600: 6e 70 72 69 6e 74 66 28 29 20 65 78 63 65 70 74 nprintf() except
7610: 20 74 68 61 74 20 69 74 20 69 67 6e 6f 72 65 73 that it ignores
7620: 20 74 68 65 0a 2a 2a 20 63 75 72 72 65 6e 74 20 the.** current
7630: 6c 6f 63 61 6c 65 20 73 65 74 74 69 6e 67 73 2e locale settings.
7640: 20 20 54 68 69 73 20 69 73 20 69 6d 70 6f 72 74 This is import
7650: 61 6e 74 20 66 6f 72 20 53 51 4c 69 74 65 20 62 ant for SQLite b
7660: 65 63 61 75 73 65 20 77 65 0a 2a 2a 20 61 72 65 ecause we.** are
7670: 20 6e 6f 74 20 61 62 6c 65 20 74 6f 20 75 73 65 not able to use
7680: 20 61 20 22 2c 22 20 61 73 20 74 68 65 20 64 65 a "," as the de
7690: 63 69 6d 61 6c 20 70 6f 69 6e 74 20 69 6e 20 70 cimal point in p
76a0: 6c 61 63 65 20 6f 66 20 22 2e 22 20 61 73 0a 2a lace of "." as.*
76b0: 2a 20 73 70 65 63 69 66 69 65 64 20 62 79 20 73 * specified by s
76c0: 6f 6d 65 20 6c 6f 63 61 6c 65 73 2e 0a 2a 2a 0a ome locales..**.
76d0: 2a 2a 20 4f 6f 70 73 3a 20 20 54 68 65 20 66 69 ** Oops: The fi
76e0: 72 73 74 20 74 77 6f 20 61 72 67 75 6d 65 6e 74 rst two argument
76f0: 73 20 6f 66 20 73 71 6c 69 74 65 33 5f 73 6e 70 s of sqlite3_snp
7700: 72 69 6e 74 66 28 29 20 61 72 65 20 62 61 63 6b rintf() are back
7710: 77 61 72 64 73 0a 2a 2a 20 66 72 6f 6d 20 74 68 wards.** from th
7720: 65 20 73 6e 70 72 69 6e 74 66 28 29 20 73 74 61 e snprintf() sta
7730: 6e 64 61 72 64 2e 20 20 55 6e 66 6f 72 74 75 6e ndard. Unfortun
7740: 61 74 65 6c 79 2c 20 69 74 20 69 73 20 74 6f 6f ately, it is too
7750: 20 6c 61 74 65 20 74 6f 20 63 68 61 6e 67 65 0a late to change.
7760: 2a 2a 20 74 68 69 73 20 77 69 74 68 6f 75 74 20 ** this without
7770: 62 72 65 61 6b 69 6e 67 20 63 6f 6d 70 61 74 69 breaking compati
7780: 62 69 6c 69 74 79 2c 20 73 6f 20 77 65 20 6a 75 bility, so we ju
7790: 73 74 20 68 61 76 65 20 74 6f 20 6c 69 76 65 20 st have to live
77a0: 77 69 74 68 20 74 68 65 0a 2a 2a 20 6d 69 73 74 with the.** mist
77b0: 61 6b 65 2e 0a 2a 2a 0a 2a 2a 20 73 71 6c 69 74 ake..**.** sqlit
77c0: 65 33 5f 76 73 6e 70 72 69 6e 74 66 28 29 20 69 e3_vsnprintf() i
77d0: 73 20 74 68 65 20 76 61 72 61 72 67 73 20 76 65 s the varargs ve
77e0: 72 73 69 6f 6e 2e 0a 2a 2f 0a 63 68 61 72 20 2a rsion..*/.char *
77f0: 73 71 6c 69 74 65 33 5f 76 73 6e 70 72 69 6e 74 sqlite3_vsnprint
7800: 66 28 69 6e 74 20 6e 2c 20 63 68 61 72 20 2a 7a f(int n, char *z
7810: 42 75 66 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 Buf, const char
7820: 2a 7a 46 6f 72 6d 61 74 2c 20 76 61 5f 6c 69 73 *zFormat, va_lis
7830: 74 20 61 70 29 7b 0a 20 20 53 74 72 41 63 63 75 t ap){. StrAccu
7840: 6d 20 61 63 63 3b 0a 20 20 69 66 28 20 6e 3c 3d m acc;. if( n<=
7850: 30 20 29 20 72 65 74 75 72 6e 20 7a 42 75 66 3b 0 ) return zBuf;
7860: 0a 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 . sqlite3StrAcc
7870: 75 6d 49 6e 69 74 28 26 61 63 63 2c 20 7a 42 75 umInit(&acc, zBu
7880: 66 2c 20 6e 2c 20 30 29 3b 0a 20 20 61 63 63 2e f, n, 0);. acc.
7890: 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 30 3b 0a 20 useMalloc = 0;.
78a0: 20 73 71 6c 69 74 65 33 56 58 50 72 69 6e 74 66 sqlite3VXPrintf
78b0: 28 26 61 63 63 2c 20 30 2c 20 7a 46 6f 72 6d 61 (&acc, 0, zForma
78c0: 74 2c 20 61 70 29 3b 0a 20 20 72 65 74 75 72 6e t, ap);. return
78d0: 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d sqlite3StrAccum
78e0: 46 69 6e 69 73 68 28 26 61 63 63 29 3b 0a 7d 0a Finish(&acc);.}.
78f0: 63 68 61 72 20 2a 73 71 6c 69 74 65 33 5f 73 6e char *sqlite3_sn
7900: 70 72 69 6e 74 66 28 69 6e 74 20 6e 2c 20 63 68 printf(int n, ch
7910: 61 72 20 2a 7a 42 75 66 2c 20 63 6f 6e 73 74 20 ar *zBuf, const
7920: 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e char *zFormat, .
7930: 2e 2e 29 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 0a ..){. char *z;.
7940: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 va_list ap;.
7950: 76 61 5f 73 74 61 72 74 28 61 70 2c 7a 46 6f 72 va_start(ap,zFor
7960: 6d 61 74 29 3b 0a 20 20 7a 20 3d 20 73 71 6c 69 mat);. z = sqli
7970: 74 65 33 5f 76 73 6e 70 72 69 6e 74 66 28 6e 2c te3_vsnprintf(n,
7980: 20 7a 42 75 66 2c 20 7a 46 6f 72 6d 61 74 2c 20 zBuf, zFormat,
7990: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 ap);. va_end(ap
79a0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d );. return z;.}
79b0: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 69 73 20 ../*.** This is
79c0: 74 68 65 20 72 6f 75 74 69 6e 65 20 74 68 61 74 the routine that
79d0: 20 61 63 74 75 61 6c 6c 79 20 66 6f 72 6d 61 74 actually format
79e0: 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 6f s the sqlite3_lo
79f0: 67 28 29 20 6d 65 73 73 61 67 65 2e 0a 2a 2a 20 g() message..**
7a00: 57 65 20 68 6f 75 73 65 20 69 74 20 69 6e 20 61 We house it in a
7a10: 20 73 65 70 61 72 61 74 65 20 72 6f 75 74 69 6e separate routin
7a20: 65 20 66 72 6f 6d 20 73 71 6c 69 74 65 33 5f 6c e from sqlite3_l
7a30: 6f 67 28 29 20 74 6f 20 61 76 6f 69 64 20 75 73 og() to avoid us
7a40: 69 6e 67 0a 2a 2a 20 73 74 61 63 6b 20 73 70 61 ing.** stack spa
7a50: 63 65 20 6f 6e 20 73 6d 61 6c 6c 2d 73 74 61 63 ce on small-stac
7a60: 6b 20 73 79 73 74 65 6d 73 20 77 68 65 6e 20 6c k systems when l
7a70: 6f 67 67 69 6e 67 20 69 73 20 64 69 73 61 62 6c ogging is disabl
7a80: 65 64 2e 0a 2a 2a 0a 2a 2a 20 73 71 6c 69 74 65 ed..**.** sqlite
7a90: 33 5f 6c 6f 67 28 29 20 6d 75 73 74 20 72 65 6e 3_log() must ren
7aa0: 64 65 72 20 69 6e 74 6f 20 61 20 73 74 61 74 69 der into a stati
7ab0: 63 20 62 75 66 66 65 72 2e 20 20 49 74 20 63 61 c buffer. It ca
7ac0: 6e 6e 6f 74 20 64 79 6e 61 6d 69 63 61 6c 6c 79 nnot dynamically
7ad0: 0a 2a 2a 20 61 6c 6c 6f 63 61 74 65 20 6d 65 6d .** allocate mem
7ae0: 6f 72 79 20 62 65 63 61 75 73 65 20 69 74 20 6d ory because it m
7af0: 69 67 68 74 20 62 65 20 63 61 6c 6c 65 64 20 77 ight be called w
7b00: 68 69 6c 65 20 74 68 65 20 6d 65 6d 6f 72 79 20 hile the memory
7b10: 61 6c 6c 6f 63 61 74 6f 72 0a 2a 2a 20 6d 75 74 allocator.** mut
7b20: 65 78 20 69 73 20 68 65 6c 64 2e 0a 2a 2f 0a 73 ex is held..*/.s
7b30: 74 61 74 69 63 20 76 6f 69 64 20 72 65 6e 64 65 tatic void rende
7b40: 72 4c 6f 67 4d 73 67 28 69 6e 74 20 69 45 72 72 rLogMsg(int iErr
7b50: 43 6f 64 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 Code, const char
7b60: 20 2a 7a 46 6f 72 6d 61 74 2c 20 76 61 5f 6c 69 *zFormat, va_li
7b70: 73 74 20 61 70 29 7b 0a 20 20 53 74 72 41 63 63 st ap){. StrAcc
7b80: 75 6d 20 61 63 63 3b 20 20 20 20 20 20 20 20 20 um acc;
7b90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7ba0: 20 2f 2a 20 53 74 72 69 6e 67 20 61 63 63 75 6d /* String accum
7bb0: 75 6c 61 74 6f 72 20 2a 2f 0a 20 20 63 68 61 72 ulator */. char
7bc0: 20 7a 4d 73 67 5b 53 51 4c 49 54 45 5f 50 52 49 zMsg[SQLITE_PRI
7bd0: 4e 54 5f 42 55 46 5f 53 49 5a 45 2a 33 5d 3b 20 NT_BUF_SIZE*3];
7be0: 20 20 20 2f 2a 20 43 6f 6d 70 6c 65 74 65 20 6c /* Complete l
7bf0: 6f 67 20 6d 65 73 73 61 67 65 20 2a 2f 0a 0a 20 og message */..
7c00: 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d sqlite3StrAccum
7c10: 49 6e 69 74 28 26 61 63 63 2c 20 7a 4d 73 67 2c Init(&acc, zMsg,
7c20: 20 73 69 7a 65 6f 66 28 7a 4d 73 67 29 2c 20 30 sizeof(zMsg), 0
7c30: 29 3b 0a 20 20 61 63 63 2e 75 73 65 4d 61 6c 6c );. acc.useMall
7c40: 6f 63 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65 oc = 0;. sqlite
7c50: 33 56 58 50 72 69 6e 74 66 28 26 61 63 63 2c 20 3VXPrintf(&acc,
7c60: 30 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0, zFormat, ap);
7c70: 0a 20 20 73 71 6c 69 74 65 33 47 6c 6f 62 61 6c . sqlite3Global
7c80: 43 6f 6e 66 69 67 2e 78 4c 6f 67 28 73 71 6c 69 Config.xLog(sqli
7c90: 74 65 33 47 6c 6f 62 61 6c 43 6f 6e 66 69 67 2e te3GlobalConfig.
7ca0: 70 4c 6f 67 41 72 67 2c 20 69 45 72 72 43 6f 64 pLogArg, iErrCod
7cb0: 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e,.
7cc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 71 sq
7cd0: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e lite3StrAccumFin
7ce0: 69 73 68 28 26 61 63 63 29 29 3b 0a 7d 0a 0a 2f ish(&acc));.}../
7cf0: 2a 0a 2a 2a 20 46 6f 72 6d 61 74 20 61 6e 64 20 *.** Format and
7d00: 77 72 69 74 65 20 61 20 6d 65 73 73 61 67 65 20 write a message
7d10: 74 6f 20 74 68 65 20 6c 6f 67 20 69 66 20 6c 6f to the log if lo
7d20: 67 67 69 6e 67 20 69 73 20 65 6e 61 62 6c 65 64 gging is enabled
7d30: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 ..*/.void sqlite
7d40: 33 5f 6c 6f 67 28 69 6e 74 20 69 45 72 72 43 6f 3_log(int iErrCo
7d50: 64 65 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a de, const char *
7d60: 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 zFormat, ...){.
7d70: 20 76 61 5f 6c 69 73 74 20 61 70 3b 20 20 20 20 va_list ap;
7d80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7d90: 20 20 20 20 20 20 20 20 20 2f 2a 20 56 61 72 61 /* Vara
7da0: 72 67 20 6c 69 73 74 20 2a 2f 0a 20 20 69 66 28 rg list */. if(
7db0: 20 73 71 6c 69 74 65 33 47 6c 6f 62 61 6c 43 6f sqlite3GlobalCo
7dc0: 6e 66 69 67 2e 78 4c 6f 67 20 29 7b 0a 20 20 20 nfig.xLog ){.
7dd0: 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 va_start(ap, zF
7de0: 6f 72 6d 61 74 29 3b 0a 20 20 20 20 72 65 6e 64 ormat);. rend
7df0: 65 72 4c 6f 67 4d 73 67 28 69 45 72 72 43 6f 64 erLogMsg(iErrCod
7e00: 65 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b e, zFormat, ap);
7e10: 0a 20 20 20 20 76 61 5f 65 6e 64 28 61 70 29 3b . va_end(ap);
7e20: 0a 20 20 7d 0a 7d 0a 0a 23 69 66 20 64 65 66 69 . }.}..#if defi
7e30: 6e 65 64 28 53 51 4c 49 54 45 5f 44 45 42 55 47 ned(SQLITE_DEBUG
7e40: 29 0a 2f 2a 0a 2a 2a 20 41 20 76 65 72 73 69 6f )./*.** A versio
7e50: 6e 20 6f 66 20 70 72 69 6e 74 66 28 29 20 74 68 n of printf() th
7e60: 61 74 20 75 6e 64 65 72 73 74 61 6e 64 73 20 25 at understands %
7e70: 6c 6c 64 2e 20 20 55 73 65 64 20 66 6f 72 20 64 lld. Used for d
7e80: 65 62 75 67 67 69 6e 67 2e 0a 2a 2a 20 54 68 65 ebugging..** The
7e90: 20 70 72 69 6e 74 66 28 29 20 62 75 69 6c 74 20 printf() built
7ea0: 69 6e 74 6f 20 73 6f 6d 65 20 76 65 72 73 69 6f into some versio
7eb0: 6e 73 20 6f 66 20 77 69 6e 64 6f 77 73 20 64 6f ns of windows do
7ec0: 65 73 20 6e 6f 74 20 75 6e 64 65 72 73 74 61 6e es not understan
7ed0: 64 20 25 6c 6c 64 0a 2a 2a 20 61 6e 64 20 73 65 d %lld.** and se
7ee0: 67 66 61 75 6c 74 73 20 69 66 20 79 6f 75 20 67 gfaults if you g
7ef0: 69 76 65 20 69 74 20 61 20 6c 6f 6e 67 20 6c 6f ive it a long lo
7f00: 6e 67 20 69 6e 74 2e 0a 2a 2f 0a 76 6f 69 64 20 ng int..*/.void
7f10: 73 71 6c 69 74 65 33 44 65 62 75 67 50 72 69 6e sqlite3DebugPrin
7f20: 74 66 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a tf(const char *z
7f30: 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 Format, ...){.
7f40: 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 53 74 va_list ap;. St
7f50: 72 41 63 63 75 6d 20 61 63 63 3b 0a 20 20 63 68 rAccum acc;. ch
7f60: 61 72 20 7a 42 75 66 5b 35 30 30 5d 3b 0a 20 20 ar zBuf[500];.
7f70: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 49 sqlite3StrAccumI
7f80: 6e 69 74 28 26 61 63 63 2c 20 7a 42 75 66 2c 20 nit(&acc, zBuf,
7f90: 73 69 7a 65 6f 66 28 7a 42 75 66 29 2c 20 30 29 sizeof(zBuf), 0)
7fa0: 3b 0a 20 20 61 63 63 2e 75 73 65 4d 61 6c 6c 6f ;. acc.useMallo
7fb0: 63 20 3d 20 30 3b 0a 20 20 76 61 5f 73 74 61 72 c = 0;. va_star
7fc0: 74 28 61 70 2c 7a 46 6f 72 6d 61 74 29 3b 0a 20 t(ap,zFormat);.
7fd0: 20 73 71 6c 69 74 65 33 56 58 50 72 69 6e 74 66 sqlite3VXPrintf
7fe0: 28 26 61 63 63 2c 20 30 2c 20 7a 46 6f 72 6d 61 (&acc, 0, zForma
7ff0: 74 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 t, ap);. va_end
8000: 28 61 70 29 3b 0a 20 20 73 71 6c 69 74 65 33 53 (ap);. sqlite3S
8010: 74 72 41 63 63 75 6d 46 69 6e 69 73 68 28 26 61 trAccumFinish(&a
8020: 63 63 29 3b 0a 20 20 66 70 72 69 6e 74 66 28 73 cc);. fprintf(s
8030: 74 64 6f 75 74 2c 22 25 73 22 2c 20 7a 42 75 66 tdout,"%s", zBuf
8040: 29 3b 0a 20 20 66 66 6c 75 73 68 28 73 74 64 6f );. fflush(stdo
8050: 75 74 29 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 23 ut);.}.#endif..#
8060: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d ifndef SQLITE_OM
8070: 49 54 5f 54 52 41 43 45 0a 2f 2a 0a 2a 2a 20 76 IT_TRACE./*.** v
8080: 61 72 69 61 62 6c 65 2d 61 72 67 75 6d 65 6e 74 ariable-argument
8090: 20 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 wrapper around
80a0: 73 71 6c 69 74 65 33 56 58 50 72 69 6e 74 66 28 sqlite3VXPrintf(
80b0: 29 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 )..*/.void sqlit
80c0: 65 33 58 50 72 69 6e 74 66 28 53 74 72 41 63 63 e3XPrintf(StrAcc
80d0: 75 6d 20 2a 70 2c 20 63 6f 6e 73 74 20 63 68 61 um *p, const cha
80e0: 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 r *zFormat, ...)
80f0: 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a {. va_list ap;.
8100: 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 7a 46 va_start(ap,zF
8110: 6f 72 6d 61 74 29 3b 0a 20 20 73 71 6c 69 74 65 ormat);. sqlite
8120: 33 56 58 50 72 69 6e 74 66 28 70 2c 20 31 2c 20 3VXPrintf(p, 1,
8130: 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 zFormat, ap);.
8140: 76 61 5f 65 6e 64 28 61 70 29 3b 0a 7d 0a 23 65 va_end(ap);.}.#e
8150: 6e 64 69 66 0a ndif.