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 43 48 41 52 4c 49 54 20 20 20 20 31 e etCHARLIT 1
0be0: 30 20 2f 2a 20 4c 69 74 65 72 61 6c 20 63 68 61 0 /* Literal cha
0bf0: 72 61 63 74 65 72 73 2e 20 20 25 27 20 2a 2f 0a racters. %' */.
0c00: 23 64 65 66 69 6e 65 20 65 74 53 51 4c 45 53 43 #define etSQLESC
0c10: 41 50 45 20 20 31 31 20 2f 2a 20 53 74 72 69 6e APE 11 /* Strin
0c20: 67 73 20 77 69 74 68 20 27 5c 27 27 20 64 6f 75 gs with '\'' dou
0c30: 62 6c 65 64 2e 20 20 25 71 20 2a 2f 0a 23 64 65 bled. %q */.#de
0c40: 66 69 6e 65 20 65 74 53 51 4c 45 53 43 41 50 45 fine etSQLESCAPE
0c50: 32 20 31 32 20 2f 2a 20 53 74 72 69 6e 67 73 20 2 12 /* Strings
0c60: 77 69 74 68 20 27 5c 27 27 20 64 6f 75 62 6c 65 with '\'' double
0c70: 64 20 61 6e 64 20 65 6e 63 6c 6f 73 65 64 20 69 d and enclosed i
0c80: 6e 20 27 27 2c 0a 20 20 20 20 20 20 20 20 20 20 n '',.
0c90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0ca0: 4e 55 4c 4c 20 70 6f 69 6e 74 65 72 73 20 72 65 NULL pointers re
0cb0: 70 6c 61 63 65 64 20 62 79 20 53 51 4c 20 4e 55 placed by SQL NU
0cc0: 4c 4c 2e 20 20 25 51 20 2a 2f 0a 23 64 65 66 69 LL. %Q */.#defi
0cd0: 6e 65 20 65 74 54 4f 4b 45 4e 20 20 20 20 20 20 ne etTOKEN
0ce0: 31 33 20 2f 2a 20 61 20 70 6f 69 6e 74 65 72 20 13 /* a pointer
0cf0: 74 6f 20 61 20 54 6f 6b 65 6e 20 73 74 72 75 63 to a Token struc
0d00: 74 75 72 65 20 2a 2f 0a 23 64 65 66 69 6e 65 20 ture */.#define
0d10: 65 74 53 52 43 4c 49 53 54 20 20 20 20 31 34 20 etSRCLIST 14
0d20: 2f 2a 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 /* a pointer to
0d30: 61 20 53 72 63 4c 69 73 74 20 2a 2f 0a 23 64 65 a SrcList */.#de
0d40: 66 69 6e 65 20 65 74 50 4f 49 4e 54 45 52 20 20 fine etPOINTER
0d50: 20 20 31 35 20 2f 2a 20 54 68 65 20 25 70 20 63 15 /* The %p c
0d60: 6f 6e 76 65 72 73 69 6f 6e 20 2a 2f 0a 23 64 65 onversion */.#de
0d70: 66 69 6e 65 20 65 74 53 51 4c 45 53 43 41 50 45 fine etSQLESCAPE
0d80: 33 20 31 36 20 2f 2a 20 25 77 20 2d 3e 20 53 74 3 16 /* %w -> St
0d90: 72 69 6e 67 73 20 77 69 74 68 20 27 5c 22 27 20 rings with '\"'
0da0: 64 6f 75 62 6c 65 64 20 2a 2f 0a 0a 0a 2f 2a 0a doubled */.../*.
0db0: 2a 2a 20 41 6e 20 22 65 74 42 79 74 65 22 20 69 ** An "etByte" i
0dc0: 73 20 61 6e 20 38 2d 62 69 74 20 75 6e 73 69 67 s an 8-bit unsig
0dd0: 6e 65 64 20 76 61 6c 75 65 2e 0a 2a 2f 0a 74 79 ned value..*/.ty
0de0: 70 65 64 65 66 20 75 6e 73 69 67 6e 65 64 20 63 pedef unsigned c
0df0: 68 61 72 20 65 74 42 79 74 65 3b 0a 0a 2f 2a 0a har etByte;../*.
0e00: 2a 2a 20 45 61 63 68 20 62 75 69 6c 74 69 6e 20 ** Each builtin
0e10: 63 6f 6e 76 65 72 73 69 6f 6e 20 63 68 61 72 61 conversion chara
0e20: 63 74 65 72 20 28 65 78 3a 20 74 68 65 20 27 64 cter (ex: the 'd
0e30: 27 20 69 6e 20 22 25 64 22 29 20 69 73 20 64 65 ' in "%d") is de
0e40: 73 63 72 69 62 65 64 0a 2a 2a 20 62 79 20 61 6e scribed.** by an
0e50: 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65 instance of the
0e60: 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 following struc
0e70: 74 75 72 65 0a 2a 2f 0a 74 79 70 65 64 65 66 20 ture.*/.typedef
0e80: 73 74 72 75 63 74 20 65 74 5f 69 6e 66 6f 20 7b struct et_info {
0e90: 20 20 20 2f 2a 20 49 6e 66 6f 72 6d 61 74 69 6f /* Informatio
0ea0: 6e 20 61 62 6f 75 74 20 65 61 63 68 20 66 6f 72 n about each for
0eb0: 6d 61 74 20 66 69 65 6c 64 20 2a 2f 0a 20 20 63 mat field */. c
0ec0: 68 61 72 20 66 6d 74 74 79 70 65 3b 20 20 20 20 har fmttype;
0ed0: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 66 /* The f
0ee0: 6f 72 6d 61 74 20 66 69 65 6c 64 20 63 6f 64 65 ormat field code
0ef0: 20 6c 65 74 74 65 72 20 2a 2f 0a 20 20 65 74 42 letter */. etB
0f00: 79 74 65 20 62 61 73 65 3b 20 20 20 20 20 20 20 yte base;
0f10: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 62 61 73 /* The bas
0f20: 65 20 66 6f 72 20 72 61 64 69 78 20 63 6f 6e 76 e for radix conv
0f30: 65 72 73 69 6f 6e 20 2a 2f 0a 20 20 65 74 42 79 ersion */. etBy
0f40: 74 65 20 66 6c 61 67 73 3b 20 20 20 20 20 20 20 te flags;
0f50: 20 20 20 20 20 2f 2a 20 4f 6e 65 20 6f 72 20 6d /* One or m
0f60: 6f 72 65 20 6f 66 20 46 4c 41 47 5f 20 63 6f 6e ore of FLAG_ con
0f70: 73 74 61 6e 74 73 20 62 65 6c 6f 77 20 2a 2f 0a stants below */.
0f80: 20 20 65 74 42 79 74 65 20 74 79 70 65 3b 20 20 etByte type;
0f90: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 43 6f /* Co
0fa0: 6e 76 65 72 73 69 6f 6e 20 70 61 72 61 64 69 67 nversion paradig
0fb0: 6d 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 63 68 m */. etByte ch
0fc0: 61 72 73 65 74 3b 20 20 20 20 20 20 20 20 20 20 arset;
0fd0: 2f 2a 20 4f 66 66 73 65 74 20 69 6e 74 6f 20 61 /* Offset into a
0fe0: 44 69 67 69 74 73 5b 5d 20 6f 66 20 74 68 65 20 Digits[] of the
0ff0: 64 69 67 69 74 73 20 73 74 72 69 6e 67 20 2a 2f digits string */
1000: 0a 20 20 65 74 42 79 74 65 20 70 72 65 66 69 78 . etByte prefix
1010: 3b 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4f ; /* O
1020: 66 66 73 65 74 20 69 6e 74 6f 20 61 50 72 65 66 ffset into aPref
1030: 69 78 5b 5d 20 6f 66 20 74 68 65 20 70 72 65 66 ix[] of the pref
1040: 69 78 20 73 74 72 69 6e 67 20 2a 2f 0a 7d 20 65 ix string */.} e
1050: 74 5f 69 6e 66 6f 3b 0a 0a 2f 2a 0a 2a 2a 20 41 t_info;../*.** A
1060: 6c 6c 6f 77 65 64 20 76 61 6c 75 65 73 20 66 6f llowed values fo
1070: 72 20 65 74 5f 69 6e 66 6f 2e 66 6c 61 67 73 0a r et_info.flags.
1080: 2a 2f 0a 23 64 65 66 69 6e 65 20 46 4c 41 47 5f */.#define FLAG_
1090: 53 49 47 4e 45 44 20 20 31 20 20 20 20 20 2f 2a SIGNED 1 /*
10a0: 20 54 72 75 65 20 69 66 20 74 68 65 20 76 61 6c True if the val
10b0: 75 65 20 74 6f 20 63 6f 6e 76 65 72 74 20 69 73 ue to convert is
10c0: 20 73 69 67 6e 65 64 20 2a 2f 0a 23 64 65 66 69 signed */.#defi
10d0: 6e 65 20 46 4c 41 47 5f 49 4e 54 45 52 4e 20 20 ne FLAG_INTERN
10e0: 32 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 2 /* True if
10f0: 20 66 6f 72 20 69 6e 74 65 72 6e 61 6c 20 75 73 for internal us
1100: 65 20 6f 6e 6c 79 20 2a 2f 0a 23 64 65 66 69 6e e only */.#defin
1110: 65 20 46 4c 41 47 5f 53 54 52 49 4e 47 20 20 34 e FLAG_STRING 4
1120: 20 20 20 20 20 2f 2a 20 41 6c 6c 6f 77 20 69 6e /* Allow in
1130: 66 69 6e 69 74 79 20 70 72 65 63 69 73 69 6f 6e finity precision
1140: 20 2a 2f 0a 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 */.../*.** The
1150: 66 6f 6c 6c 6f 77 69 6e 67 20 74 61 62 6c 65 20 following table
1160: 69 73 20 73 65 61 72 63 68 65 64 20 6c 69 6e 65 is searched line
1170: 61 72 6c 79 2c 20 73 6f 20 69 74 20 69 73 20 67 arly, so it is g
1180: 6f 6f 64 20 74 6f 20 70 75 74 20 74 68 65 0a 2a ood to put the.*
1190: 2a 20 6d 6f 73 74 20 66 72 65 71 75 65 6e 74 6c * most frequentl
11a0: 79 20 75 73 65 64 20 63 6f 6e 76 65 72 73 69 6f y used conversio
11b0: 6e 20 74 79 70 65 73 20 66 69 72 73 74 2e 0a 2a n types first..*
11c0: 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 /.static const c
11d0: 68 61 72 20 61 44 69 67 69 74 73 5b 5d 20 3d 20 har aDigits[] =
11e0: 22 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 "0123456789ABCDE
11f0: 46 30 31 32 33 34 35 36 37 38 39 61 62 63 64 65 F0123456789abcde
1200: 66 22 3b 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 f";.static const
1210: 20 63 68 61 72 20 61 50 72 65 66 69 78 5b 5d 20 char aPrefix[]
1220: 3d 20 22 2d 78 30 5c 30 30 30 58 30 22 3b 0a 73 = "-x0\000X0";.s
1230: 74 61 74 69 63 20 63 6f 6e 73 74 20 65 74 5f 69 tatic const et_i
1240: 6e 66 6f 20 66 6d 74 69 6e 66 6f 5b 5d 20 3d 20 nfo fmtinfo[] =
1250: 7b 0a 20 20 7b 20 20 27 64 27 2c 20 31 30 2c 20 {. { 'd', 10,
1260: 31 2c 20 65 74 52 41 44 49 58 2c 20 20 20 20 20 1, etRADIX,
1270: 20 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 0, 0 },. { '
1280: 73 27 2c 20 20 30 2c 20 34 2c 20 65 74 53 54 52 s', 0, 4, etSTR
1290: 49 4e 47 2c 20 20 20 20 20 30 2c 20 20 30 20 7d ING, 0, 0 }
12a0: 2c 0a 20 20 7b 20 20 27 67 27 2c 20 20 30 2c 20 ,. { 'g', 0,
12b0: 31 2c 20 65 74 47 45 4e 45 52 49 43 2c 20 20 20 1, etGENERIC,
12c0: 20 33 30 2c 20 30 20 7d 2c 0a 20 20 7b 20 20 27 30, 0 },. { '
12d0: 7a 27 2c 20 20 30 2c 20 34 2c 20 65 74 44 59 4e z', 0, 4, etDYN
12e0: 53 54 52 49 4e 47 2c 20 20 30 2c 20 20 30 20 7d STRING, 0, 0 }
12f0: 2c 0a 20 20 7b 20 20 27 71 27 2c 20 20 30 2c 20 ,. { 'q', 0,
1300: 34 2c 20 65 74 53 51 4c 45 53 43 41 50 45 2c 20 4, etSQLESCAPE,
1310: 20 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 0, 0 },. { '
1320: 51 27 2c 20 20 30 2c 20 34 2c 20 65 74 53 51 4c Q', 0, 4, etSQL
1330: 45 53 43 41 50 45 32 2c 20 30 2c 20 20 30 20 7d ESCAPE2, 0, 0 }
1340: 2c 0a 20 20 7b 20 20 27 77 27 2c 20 20 30 2c 20 ,. { 'w', 0,
1350: 34 2c 20 65 74 53 51 4c 45 53 43 41 50 45 33 2c 4, etSQLESCAPE3,
1360: 20 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 20 27 0, 0 },. { '
1370: 63 27 2c 20 20 30 2c 20 30 2c 20 65 74 43 48 41 c', 0, 0, etCHA
1380: 52 58 2c 20 20 20 20 20 20 30 2c 20 20 30 20 7d RX, 0, 0 }
1390: 2c 0a 20 20 7b 20 20 27 6f 27 2c 20 20 38 2c 20 ,. { 'o', 8,
13a0: 30 2c 20 65 74 52 41 44 49 58 2c 20 20 20 20 20 0, etRADIX,
13b0: 20 30 2c 20 20 32 20 7d 2c 0a 20 20 7b 20 20 27 0, 2 },. { '
13c0: 75 27 2c 20 31 30 2c 20 30 2c 20 65 74 52 41 44 u', 10, 0, etRAD
13d0: 49 58 2c 20 20 20 20 20 20 30 2c 20 20 30 20 7d IX, 0, 0 }
13e0: 2c 0a 20 20 7b 20 20 27 78 27 2c 20 31 36 2c 20 ,. { 'x', 16,
13f0: 30 2c 20 65 74 52 41 44 49 58 2c 20 20 20 20 20 0, etRADIX,
1400: 20 31 36 2c 20 31 20 7d 2c 0a 20 20 7b 20 20 27 16, 1 },. { '
1410: 58 27 2c 20 31 36 2c 20 30 2c 20 65 74 52 41 44 X', 16, 0, etRAD
1420: 49 58 2c 20 20 20 20 20 20 30 2c 20 20 34 20 7d IX, 0, 4 }
1430: 2c 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 ,.#ifndef SQLITE
1440: 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 _OMIT_FLOATING_P
1450: 4f 49 4e 54 0a 20 20 7b 20 20 27 66 27 2c 20 20 OINT. { 'f',
1460: 30 2c 20 31 2c 20 65 74 46 4c 4f 41 54 2c 20 20 0, 1, etFLOAT,
1470: 20 20 20 20 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 0, 0 },. {
1480: 20 20 27 65 27 2c 20 20 30 2c 20 31 2c 20 65 74 'e', 0, 1, et
1490: 45 58 50 2c 20 20 20 20 20 20 20 20 33 30 2c 20 EXP, 30,
14a0: 30 20 7d 2c 0a 20 20 7b 20 20 27 45 27 2c 20 20 0 },. { 'E',
14b0: 30 2c 20 31 2c 20 65 74 45 58 50 2c 20 20 20 20 0, 1, etEXP,
14c0: 20 20 20 20 31 34 2c 20 30 20 7d 2c 0a 20 20 7b 14, 0 },. {
14d0: 20 20 27 47 27 2c 20 20 30 2c 20 31 2c 20 65 74 'G', 0, 1, et
14e0: 47 45 4e 45 52 49 43 2c 20 20 20 20 31 34 2c 20 GENERIC, 14,
14f0: 30 20 7d 2c 0a 23 65 6e 64 69 66 0a 20 20 7b 20 0 },.#endif. {
1500: 20 27 69 27 2c 20 31 30 2c 20 31 2c 20 65 74 52 'i', 10, 1, etR
1510: 41 44 49 58 2c 20 20 20 20 20 20 30 2c 20 20 30 ADIX, 0, 0
1520: 20 7d 2c 0a 20 20 7b 20 20 27 6e 27 2c 20 20 30 },. { 'n', 0
1530: 2c 20 30 2c 20 65 74 53 49 5a 45 2c 20 20 20 20 , 0, etSIZE,
1540: 20 20 20 30 2c 20 20 30 20 7d 2c 0a 20 20 7b 20 0, 0 },. {
1550: 20 27 25 27 2c 20 20 30 2c 20 30 2c 20 65 74 50 '%', 0, 0, etP
1560: 45 52 43 45 4e 54 2c 20 20 20 20 30 2c 20 20 30 ERCENT, 0, 0
1570: 20 7d 2c 0a 20 20 7b 20 20 27 70 27 2c 20 31 36 },. { 'p', 16
1580: 2c 20 30 2c 20 65 74 50 4f 49 4e 54 45 52 2c 20 , 0, etPOINTER,
1590: 20 20 20 30 2c 20 20 31 20 7d 2c 0a 20 20 7b 20 0, 1 },. {
15a0: 20 27 54 27 2c 20 20 30 2c 20 32 2c 20 65 74 54 'T', 0, 2, etT
15b0: 4f 4b 45 4e 2c 20 20 20 20 20 20 30 2c 20 20 30 OKEN, 0, 0
15c0: 20 7d 2c 0a 20 20 7b 20 20 27 53 27 2c 20 20 30 },. { 'S', 0
15d0: 2c 20 32 2c 20 65 74 53 52 43 4c 49 53 54 2c 20 , 2, etSRCLIST,
15e0: 20 20 20 30 2c 20 20 30 20 7d 2c 0a 7d 3b 0a 23 0, 0 },.};.#
15f0: 64 65 66 69 6e 65 20 65 74 4e 49 4e 46 4f 20 20 define etNINFO
1600: 28 73 69 7a 65 6f 66 28 66 6d 74 69 6e 66 6f 29 (sizeof(fmtinfo)
1610: 2f 73 69 7a 65 6f 66 28 66 6d 74 69 6e 66 6f 5b /sizeof(fmtinfo[
1620: 30 5d 29 29 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 53 0]))../*.** If S
1630: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 QLITE_OMIT_FLOAT
1640: 49 4e 47 5f 50 4f 49 4e 54 20 69 73 20 64 65 66 ING_POINT is def
1650: 69 6e 65 64 2c 20 74 68 65 6e 20 6e 6f 6e 65 20 ined, then none
1660: 6f 66 20 74 68 65 20 66 6c 6f 61 74 69 6e 67 20 of the floating
1670: 70 6f 69 6e 74 0a 2a 2a 20 63 6f 6e 76 65 72 73 point.** convers
1680: 69 6f 6e 73 20 77 69 6c 6c 20 77 6f 72 6b 2e 0a ions will work..
1690: 2a 2f 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 */.#ifndef SQLIT
16a0: 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f E_OMIT_FLOATING_
16b0: 50 4f 49 4e 54 0a 2f 2a 0a 2a 2a 20 22 2a 76 61 POINT./*.** "*va
16c0: 6c 22 20 69 73 20 61 20 64 6f 75 62 6c 65 20 73 l" is a double s
16d0: 75 63 68 20 74 68 61 74 20 30 2e 31 20 3c 3d 20 uch that 0.1 <=
16e0: 2a 76 61 6c 20 3c 20 31 30 2e 30 0a 2a 2a 20 52 *val < 10.0.** R
16f0: 65 74 75 72 6e 20 74 68 65 20 61 73 63 69 69 20 eturn the ascii
1700: 63 6f 64 65 20 66 6f 72 20 74 68 65 20 6c 65 61 code for the lea
1710: 64 69 6e 67 20 64 69 67 69 74 20 6f 66 20 2a 76 ding digit of *v
1720: 61 6c 2c 20 74 68 65 6e 0a 2a 2a 20 6d 75 6c 74 al, then.** mult
1730: 69 70 6c 79 20 22 2a 76 61 6c 22 20 62 79 20 31 iply "*val" by 1
1740: 30 2e 30 20 74 6f 20 72 65 6e 6f 72 6d 61 6c 69 0.0 to renormali
1750: 7a 65 2e 0a 2a 2a 0a 2a 2a 20 45 78 61 6d 70 6c ze..**.** Exampl
1760: 65 3a 0a 2a 2a 20 20 20 20 20 69 6e 70 75 74 3a e:.** input:
1770: 20 20 20 20 20 2a 76 61 6c 20 3d 20 33 2e 31 34 *val = 3.14
1780: 31 35 39 0a 2a 2a 20 20 20 20 20 6f 75 74 70 75 159.** outpu
1790: 74 3a 20 20 20 20 2a 76 61 6c 20 3d 20 31 2e 34 t: *val = 1.4
17a0: 31 35 39 20 20 20 20 66 75 6e 63 74 69 6f 6e 20 159 function
17b0: 72 65 74 75 72 6e 20 3d 20 27 33 27 0a 2a 2a 0a return = '3'.**.
17c0: 2a 2a 20 54 68 65 20 63 6f 75 6e 74 65 72 20 2a ** The counter *
17d0: 63 6e 74 20 69 73 20 69 6e 63 72 65 6d 65 6e 74 cnt is increment
17e0: 65 64 20 65 61 63 68 20 74 69 6d 65 2e 20 20 41 ed each time. A
17f0: 66 74 65 72 20 63 6f 75 6e 74 65 72 20 65 78 63 fter counter exc
1800: 65 65 64 73 0a 2a 2a 20 31 36 20 28 74 68 65 20 eeds.** 16 (the
1810: 6e 75 6d 62 65 72 20 6f 66 20 73 69 67 6e 69 66 number of signif
1820: 69 63 61 6e 74 20 64 69 67 69 74 73 20 69 6e 20 icant digits in
1830: 61 20 36 34 2d 62 69 74 20 66 6c 6f 61 74 29 20 a 64-bit float)
1840: 27 30 27 20 69 73 0a 2a 2a 20 61 6c 77 61 79 73 '0' is.** always
1850: 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2f 0a 73 74 returned..*/.st
1860: 61 74 69 63 20 69 6e 74 20 65 74 5f 67 65 74 64 atic int et_getd
1870: 69 67 69 74 28 4c 4f 4e 47 44 4f 55 42 4c 45 5f igit(LONGDOUBLE_
1880: 54 59 50 45 20 2a 76 61 6c 2c 20 69 6e 74 20 2a TYPE *val, int *
1890: 63 6e 74 29 7b 0a 20 20 69 6e 74 20 64 69 67 69 cnt){. int digi
18a0: 74 3b 0a 20 20 4c 4f 4e 47 44 4f 55 42 4c 45 5f t;. LONGDOUBLE_
18b0: 54 59 50 45 20 64 3b 0a 20 20 69 66 28 20 28 2a TYPE d;. if( (*
18c0: 63 6e 74 29 2b 2b 20 3e 3d 20 31 36 20 29 20 72 cnt)++ >= 16 ) r
18d0: 65 74 75 72 6e 20 27 30 27 3b 0a 20 20 64 69 67 eturn '0';. dig
18e0: 69 74 20 3d 20 28 69 6e 74 29 2a 76 61 6c 3b 0a it = (int)*val;.
18f0: 20 20 64 20 3d 20 64 69 67 69 74 3b 0a 20 20 64 d = digit;. d
1900: 69 67 69 74 20 2b 3d 20 27 30 27 3b 0a 20 20 2a igit += '0';. *
1910: 76 61 6c 20 3d 20 28 2a 76 61 6c 20 2d 20 64 29 val = (*val - d)
1920: 2a 31 30 2e 30 3b 0a 20 20 72 65 74 75 72 6e 20 *10.0;. return
1930: 64 69 67 69 74 3b 0a 7d 0a 23 65 6e 64 69 66 20 digit;.}.#endif
1940: 2f 2a 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 /* SQLITE_OMIT_F
1950: 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 20 2a 2f LOATING_POINT */
1960: 0a 0a 2f 2a 0a 2a 2a 20 41 70 70 65 6e 64 20 4e ../*.** Append N
1970: 20 73 70 61 63 65 20 63 68 61 72 61 63 74 65 72 space character
1980: 73 20 74 6f 20 74 68 65 20 67 69 76 65 6e 20 73 s to the given s
1990: 74 72 69 6e 67 20 62 75 66 66 65 72 2e 0a 2a 2f tring buffer..*/
19a0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 61 70 70 .static void app
19b0: 65 6e 64 53 70 61 63 65 28 53 74 72 41 63 63 75 endSpace(StrAccu
19c0: 6d 20 2a 70 41 63 63 75 6d 2c 20 69 6e 74 20 4e m *pAccum, int N
19d0: 29 7b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 ){. static cons
19e0: 74 20 63 68 61 72 20 7a 53 70 61 63 65 73 5b 5d t char zSpaces[]
19f0: 20 3d 20 22 20 20 20 20 20 20 20 20 20 20 20 20 = "
1a00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1a10: 20 22 3b 0a 20 20 77 68 69 6c 65 28 20 4e 3e 3d ";. while( N>=
1a20: 73 69 7a 65 6f 66 28 7a 53 70 61 63 65 73 29 2d sizeof(zSpaces)-
1a30: 31 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 1 ){. sqlite3
1a40: 53 74 72 41 63 63 75 6d 41 70 70 65 6e 64 28 70 StrAccumAppend(p
1a50: 41 63 63 75 6d 2c 20 7a 53 70 61 63 65 73 2c 20 Accum, zSpaces,
1a60: 73 69 7a 65 6f 66 28 7a 53 70 61 63 65 73 29 2d sizeof(zSpaces)-
1a70: 31 29 3b 0a 20 20 20 20 4e 20 2d 3d 20 73 69 7a 1);. N -= siz
1a80: 65 6f 66 28 7a 53 70 61 63 65 73 29 2d 31 3b 0a eof(zSpaces)-1;.
1a90: 20 20 7d 0a 20 20 69 66 28 20 4e 3e 30 20 29 7b }. if( N>0 ){
1aa0: 0a 20 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 . sqlite3StrA
1ab0: 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 ccumAppend(pAccu
1ac0: 6d 2c 20 7a 53 70 61 63 65 73 2c 20 4e 29 3b 0a m, zSpaces, N);.
1ad0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 6e 20 }.}../*.** On
1ae0: 6d 61 63 68 69 6e 65 73 20 77 69 74 68 20 61 20 machines with a
1af0: 73 6d 61 6c 6c 20 73 74 61 63 6b 20 73 69 7a 65 small stack size
1b00: 2c 20 79 6f 75 20 63 61 6e 20 72 65 64 65 66 69 , you can redefi
1b10: 6e 65 20 74 68 65 0a 2a 2a 20 53 51 4c 49 54 45 ne the.** SQLITE
1b20: 5f 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a 45 20 _PRINT_BUF_SIZE
1b30: 74 6f 20 62 65 20 6c 65 73 73 20 74 68 61 6e 20 to be less than
1b40: 33 35 30 2e 20 20 42 75 74 20 62 65 77 61 72 65 350. But beware
1b50: 20 2d 20 66 6f 72 0a 2a 2a 20 73 6d 61 6c 6c 65 - for.** smalle
1b60: 72 20 76 61 6c 75 65 73 20 73 6f 6d 65 20 25 66 r values some %f
1b70: 20 63 6f 6e 76 65 72 73 69 6f 6e 73 20 6d 61 79 conversions may
1b80: 20 67 6f 20 69 6e 74 6f 20 61 6e 20 69 6e 66 69 go into an infi
1b90: 6e 69 74 65 20 6c 6f 6f 70 2e 0a 2a 2f 0a 23 69 nite loop..*/.#i
1ba0: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 50 52 49 fndef SQLITE_PRI
1bb0: 4e 54 5f 42 55 46 5f 53 49 5a 45 0a 23 20 64 65 NT_BUF_SIZE.# de
1bc0: 66 69 6e 65 20 53 51 4c 49 54 45 5f 50 52 49 4e fine SQLITE_PRIN
1bd0: 54 5f 42 55 46 5f 53 49 5a 45 20 33 35 30 0a 23 T_BUF_SIZE 350.#
1be0: 65 6e 64 69 66 0a 23 64 65 66 69 6e 65 20 65 74 endif.#define et
1bf0: 42 55 46 53 49 5a 45 20 53 51 4c 49 54 45 5f 50 BUFSIZE SQLITE_P
1c00: 52 49 4e 54 5f 42 55 46 5f 53 49 5a 45 20 20 2f RINT_BUF_SIZE /
1c10: 2a 20 53 69 7a 65 20 6f 66 20 74 68 65 20 6f 75 * Size of the ou
1c20: 74 70 75 74 20 62 75 66 66 65 72 20 2a 2f 0a 0a tput buffer */..
1c30: 2f 2a 0a 2a 2a 20 54 68 65 20 72 6f 6f 74 20 70 /*.** The root p
1c40: 72 6f 67 72 61 6d 2e 20 20 41 6c 6c 20 76 61 72 rogram. All var
1c50: 69 61 74 69 6f 6e 73 20 63 61 6c 6c 20 74 68 69 iations call thi
1c60: 73 20 63 6f 72 65 2e 0a 2a 2a 0a 2a 2a 20 49 4e s core..**.** IN
1c70: 50 55 54 53 3a 0a 2a 2a 20 20 20 66 75 6e 63 20 PUTS:.** func
1c80: 20 20 54 68 69 73 20 69 73 20 61 20 70 6f 69 6e This is a poin
1c90: 74 65 72 20 74 6f 20 61 20 66 75 6e 63 74 69 6f ter to a functio
1ca0: 6e 20 74 61 6b 69 6e 67 20 74 68 72 65 65 20 61 n taking three a
1cb0: 72 67 75 6d 65 6e 74 73 0a 2a 2a 20 20 20 20 20 rguments.**
1cc0: 20 20 20 20 20 20 20 31 2e 20 41 20 70 6f 69 6e 1. A poin
1cd0: 74 65 72 20 74 6f 20 61 6e 79 74 68 69 6e 67 2e ter to anything.
1ce0: 20 20 53 61 6d 65 20 61 73 20 74 68 65 20 22 61 Same as the "a
1cf0: 72 67 22 20 70 61 72 61 6d 65 74 65 72 2e 0a 2a rg" parameter..*
1d00: 2a 20 20 20 20 20 20 20 20 20 20 20 20 32 2e 20 * 2.
1d10: 41 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 A pointer to the
1d20: 20 6c 69 73 74 20 6f 66 20 63 68 61 72 61 63 74 list of charact
1d30: 65 72 73 20 74 6f 20 62 65 20 6f 75 74 70 75 74 ers to be output
1d40: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 .**
1d50: 20 20 28 4e 6f 74 65 2c 20 74 68 69 73 20 6c 69 (Note, this li
1d60: 73 74 20 69 73 20 4e 4f 54 20 6e 75 6c 6c 20 74 st is NOT null t
1d70: 65 72 6d 69 6e 61 74 65 64 2e 29 0a 2a 2a 20 20 erminated.).**
1d80: 20 20 20 20 20 20 20 20 20 20 33 2e 20 41 6e 20 3. An
1d90: 69 6e 74 65 67 65 72 20 6e 75 6d 62 65 72 20 6f integer number o
1da0: 66 20 63 68 61 72 61 63 74 65 72 73 20 74 6f 20 f characters to
1db0: 62 65 20 6f 75 74 70 75 74 2e 0a 2a 2a 20 20 20 be output..**
1dc0: 20 20 20 20 20 20 20 20 20 20 20 20 28 4e 6f 74 (Not
1dd0: 65 3a 20 54 68 69 73 20 6e 75 6d 62 65 72 20 6d e: This number m
1de0: 69 67 68 74 20 62 65 20 7a 65 72 6f 2e 29 0a 2a ight be zero.).*
1df0: 2a 0a 2a 2a 20 20 20 61 72 67 20 20 20 20 54 68 *.** arg Th
1e00: 69 73 20 69 73 20 74 68 65 20 70 6f 69 6e 74 65 is is the pointe
1e10: 72 20 74 6f 20 61 6e 79 74 68 69 6e 67 20 77 68 r to anything wh
1e20: 69 63 68 20 77 69 6c 6c 20 62 65 20 70 61 73 73 ich will be pass
1e30: 65 64 20 61 73 20 74 68 65 0a 2a 2a 20 20 20 20 ed as the.**
1e40: 20 20 20 20 20 20 66 69 72 73 74 20 61 72 67 75 first argu
1e50: 6d 65 6e 74 20 74 6f 20 22 66 75 6e 63 22 2e 20 ment to "func".
1e60: 20 55 73 65 20 69 74 20 66 6f 72 20 77 68 61 74 Use it for what
1e70: 65 76 65 72 20 79 6f 75 20 6c 69 6b 65 2e 0a 2a ever you like..*
1e80: 2a 0a 2a 2a 20 20 20 66 6d 74 20 20 20 20 54 68 *.** fmt Th
1e90: 69 73 20 69 73 20 74 68 65 20 66 6f 72 6d 61 74 is is the format
1ea0: 20 73 74 72 69 6e 67 2c 20 61 73 20 69 6e 20 74 string, as in t
1eb0: 68 65 20 75 73 75 61 6c 20 70 72 69 6e 74 2e 0a he usual print..
1ec0: 2a 2a 0a 2a 2a 20 20 20 61 70 20 20 20 20 20 54 **.** ap T
1ed0: 68 69 73 20 69 73 20 61 20 70 6f 69 6e 74 65 72 his is a pointer
1ee0: 20 74 6f 20 61 20 6c 69 73 74 20 6f 66 20 61 72 to a list of ar
1ef0: 67 75 6d 65 6e 74 73 2e 20 20 53 61 6d 65 20 61 guments. Same a
1f00: 73 20 69 6e 0a 2a 2a 20 20 20 20 20 20 20 20 20 s in.**
1f10: 20 76 66 70 72 69 6e 74 2e 0a 2a 2a 0a 2a 2a 20 vfprint..**.**
1f20: 4f 55 54 50 55 54 53 3a 0a 2a 2a 20 20 20 20 20 OUTPUTS:.**
1f30: 20 20 20 20 20 54 68 65 20 72 65 74 75 72 6e 20 The return
1f40: 76 61 6c 75 65 20 69 73 20 74 68 65 20 74 6f 74 value is the tot
1f50: 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 al number of cha
1f60: 72 61 63 74 65 72 73 20 73 65 6e 74 20 74 6f 0a racters sent to.
1f70: 2a 2a 20 20 20 20 20 20 20 20 20 20 74 68 65 20 ** the
1f80: 66 75 6e 63 74 69 6f 6e 20 22 66 75 6e 63 22 2e function "func".
1f90: 20 20 52 65 74 75 72 6e 73 20 2d 31 20 6f 6e 20 Returns -1 on
1fa0: 61 20 65 72 72 6f 72 2e 0a 2a 2a 0a 2a 2a 20 4e a error..**.** N
1fb0: 6f 74 65 20 74 68 61 74 20 74 68 65 20 6f 72 64 ote that the ord
1fc0: 65 72 20 69 6e 20 77 68 69 63 68 20 61 75 74 6f er in which auto
1fd0: 6d 61 74 69 63 20 76 61 72 69 61 62 6c 65 73 20 matic variables
1fe0: 61 72 65 20 64 65 63 6c 61 72 65 64 20 62 65 6c are declared bel
1ff0: 6f 77 0a 2a 2a 20 73 65 65 6d 73 20 74 6f 20 6d ow.** seems to m
2000: 61 6b 65 20 61 20 62 69 67 20 64 69 66 66 65 72 ake a big differ
2010: 65 6e 63 65 20 69 6e 20 64 65 74 65 72 6d 69 6e ence in determin
2020: 69 6e 67 20 68 6f 77 20 66 61 73 74 20 74 68 69 ing how fast thi
2030: 73 20 62 65 61 73 74 0a 2a 2a 20 77 69 6c 6c 20 s beast.** will
2040: 72 75 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 run..*/.static v
2050: 6f 69 64 20 76 78 70 72 69 6e 74 66 28 0a 20 20 oid vxprintf(.
2060: 53 74 72 41 63 63 75 6d 20 2a 70 41 63 63 75 6d StrAccum *pAccum
2070: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
2080: 20 20 20 2f 2a 20 41 63 63 75 6d 75 6c 61 74 65 /* Accumulate
2090: 20 72 65 73 75 6c 74 73 20 68 65 72 65 20 2a 2f results here */
20a0: 0a 20 20 69 6e 74 20 75 73 65 45 78 74 65 6e 64 . int useExtend
20b0: 65 64 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ed,
20c0: 20 20 20 20 20 20 2f 2a 20 41 6c 6c 6f 77 20 65 /* Allow e
20d0: 78 74 65 6e 64 65 64 20 25 2d 63 6f 6e 76 65 72 xtended %-conver
20e0: 73 69 6f 6e 73 20 2a 2f 0a 20 20 63 6f 6e 73 74 sions */. const
20f0: 20 63 68 61 72 20 2a 66 6d 74 2c 20 20 20 20 20 char *fmt,
2100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
2110: 20 46 6f 72 6d 61 74 20 73 74 72 69 6e 67 20 2a Format string *
2120: 2f 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 20 20 /. va_list ap
2130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2140: 20 20 20 20 20 20 20 2f 2a 20 61 72 67 75 6d 65 /* argume
2150: 6e 74 73 20 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 nts */.){. int
2160: 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c;
2170: 20 20 20 20 20 20 20 2f 2a 20 4e 65 78 74 20 63 /* Next c
2180: 68 61 72 61 63 74 65 72 20 69 6e 20 74 68 65 20 haracter in the
2190: 66 6f 72 6d 61 74 20 73 74 72 69 6e 67 20 2a 2f format string */
21a0: 0a 20 20 63 68 61 72 20 2a 62 75 66 70 74 3b 20 . char *bufpt;
21b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
21c0: 20 50 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 20 Pointer to the
21d0: 63 6f 6e 76 65 72 73 69 6f 6e 20 62 75 66 66 65 conversion buffe
21e0: 72 20 2a 2f 0a 20 20 69 6e 74 20 70 72 65 63 69 r */. int preci
21f0: 73 69 6f 6e 3b 20 20 20 20 20 20 20 20 20 20 20 sion;
2200: 20 20 2f 2a 20 50 72 65 63 69 73 69 6f 6e 20 6f /* Precision o
2210: 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 69 f the current fi
2220: 65 6c 64 20 2a 2f 0a 20 20 69 6e 74 20 6c 65 6e eld */. int len
2230: 67 74 68 3b 20 20 20 20 20 20 20 20 20 20 20 20 gth;
2240: 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66 /* Length of
2250: 20 74 68 65 20 66 69 65 6c 64 20 2a 2f 0a 20 20 the field */.
2260: 69 6e 74 20 69 64 78 3b 20 20 20 20 20 20 20 20 int idx;
2270: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 20 /* A
2280: 67 65 6e 65 72 61 6c 20 70 75 72 70 6f 73 65 20 general purpose
2290: 6c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a loop counter */.
22a0: 20 20 69 6e 74 20 77 69 64 74 68 3b 20 20 20 20 int width;
22b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
22c0: 57 69 64 74 68 20 6f 66 20 74 68 65 20 63 75 72 Width of the cur
22d0: 72 65 6e 74 20 66 69 65 6c 64 20 2a 2f 0a 20 20 rent field */.
22e0: 65 74 42 79 74 65 20 66 6c 61 67 5f 6c 65 66 74 etByte flag_left
22f0: 6a 75 73 74 69 66 79 3b 20 20 20 2f 2a 20 54 72 justify; /* Tr
2300: 75 65 20 69 66 20 22 2d 22 20 66 6c 61 67 20 69 ue if "-" flag i
2310: 73 20 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 65 s present */. e
2320: 74 42 79 74 65 20 66 6c 61 67 5f 70 6c 75 73 73 tByte flag_pluss
2330: 69 67 6e 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 ign; /* Tru
2340: 65 20 69 66 20 22 2b 22 20 66 6c 61 67 20 69 73 e if "+" flag is
2350: 20 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 65 74 present */. et
2360: 42 79 74 65 20 66 6c 61 67 5f 62 6c 61 6e 6b 73 Byte flag_blanks
2370: 69 67 6e 3b 20 20 20 20 20 2f 2a 20 54 72 75 65 ign; /* True
2380: 20 69 66 20 22 20 22 20 66 6c 61 67 20 69 73 20 if " " flag is
2390: 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 65 74 42 present */. etB
23a0: 79 74 65 20 66 6c 61 67 5f 61 6c 74 65 72 6e 61 yte flag_alterna
23b0: 74 65 66 6f 72 6d 3b 20 2f 2a 20 54 72 75 65 20 teform; /* True
23c0: 69 66 20 22 23 22 20 66 6c 61 67 20 69 73 20 70 if "#" flag is p
23d0: 72 65 73 65 6e 74 20 2a 2f 0a 20 20 65 74 42 79 resent */. etBy
23e0: 74 65 20 66 6c 61 67 5f 61 6c 74 66 6f 72 6d 32 te flag_altform2
23f0: 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 ; /* True i
2400: 66 20 22 21 22 20 66 6c 61 67 20 69 73 20 70 72 f "!" flag is pr
2410: 65 73 65 6e 74 20 2a 2f 0a 20 20 65 74 42 79 74 esent */. etByt
2420: 65 20 66 6c 61 67 5f 7a 65 72 6f 70 61 64 3b 20 e flag_zeropad;
2430: 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 /* True if
2440: 20 66 69 65 6c 64 20 77 69 64 74 68 20 63 6f 6e field width con
2450: 73 74 61 6e 74 20 73 74 61 72 74 73 20 77 69 74 stant starts wit
2460: 68 20 7a 65 72 6f 20 2a 2f 0a 20 20 65 74 42 79 h zero */. etBy
2470: 74 65 20 66 6c 61 67 5f 6c 6f 6e 67 3b 20 20 20 te flag_long;
2480: 20 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 /* True i
2490: 66 20 22 6c 22 20 66 6c 61 67 20 69 73 20 70 72 f "l" flag is pr
24a0: 65 73 65 6e 74 20 2a 2f 0a 20 20 65 74 42 79 74 esent */. etByt
24b0: 65 20 66 6c 61 67 5f 6c 6f 6e 67 6c 6f 6e 67 3b e flag_longlong;
24c0: 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 /* True if
24d0: 20 74 68 65 20 22 6c 6c 22 20 66 6c 61 67 20 69 the "ll" flag i
24e0: 73 20 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 65 s present */. e
24f0: 74 42 79 74 65 20 64 6f 6e 65 3b 20 20 20 20 20 tByte done;
2500: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f /* Loo
2510: 70 20 74 65 72 6d 69 6e 61 74 69 6f 6e 20 66 6c p termination fl
2520: 61 67 20 2a 2f 0a 20 20 73 71 6c 69 74 65 5f 75 ag */. sqlite_u
2530: 69 6e 74 36 34 20 6c 6f 6e 67 76 61 6c 75 65 3b int64 longvalue;
2540: 20 20 20 2f 2a 20 56 61 6c 75 65 20 66 6f 72 20 /* Value for
2550: 69 6e 74 65 67 65 72 20 74 79 70 65 73 20 2a 2f integer types */
2560: 0a 20 20 4c 4f 4e 47 44 4f 55 42 4c 45 5f 54 59 . LONGDOUBLE_TY
2570: 50 45 20 72 65 61 6c 76 61 6c 75 65 3b 20 2f 2a PE realvalue; /*
2580: 20 56 61 6c 75 65 20 66 6f 72 20 72 65 61 6c 20 Value for real
2590: 74 79 70 65 73 20 2a 2f 0a 20 20 63 6f 6e 73 74 types */. const
25a0: 20 65 74 5f 69 6e 66 6f 20 2a 69 6e 66 6f 70 3b et_info *infop;
25b0: 20 20 20 20 20 20 2f 2a 20 50 6f 69 6e 74 65 72 /* Pointer
25c0: 20 74 6f 20 74 68 65 20 61 70 70 72 6f 70 72 69 to the appropri
25d0: 61 74 65 20 69 6e 66 6f 20 73 74 72 75 63 74 75 ate info structu
25e0: 72 65 20 2a 2f 0a 20 20 63 68 61 72 20 62 75 66 re */. char buf
25f0: 5b 65 74 42 55 46 53 49 5a 45 5d 3b 20 20 20 20 [etBUFSIZE];
2600: 20 20 20 2f 2a 20 43 6f 6e 76 65 72 73 69 6f 6e /* Conversion
2610: 20 62 75 66 66 65 72 20 2a 2f 0a 20 20 63 68 61 buffer */. cha
2620: 72 20 70 72 65 66 69 78 3b 20 20 20 20 20 20 20 r prefix;
2630: 20 20 20 20 20 20 20 20 2f 2a 20 50 72 65 66 69 /* Prefi
2640: 78 20 63 68 61 72 61 63 74 65 72 2e 20 20 22 2b x character. "+
2650: 22 20 6f 72 20 22 2d 22 20 6f 72 20 22 20 22 20 " or "-" or " "
2660: 6f 72 20 27 5c 30 27 2e 20 2a 2f 0a 20 20 65 74 or '\0'. */. et
2670: 42 79 74 65 20 65 72 72 6f 72 66 6c 61 67 20 3d Byte errorflag =
2680: 20 30 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 65 0; /* True
2690: 20 69 66 20 61 6e 20 65 72 72 6f 72 20 69 73 20 if an error is
26a0: 65 6e 63 6f 75 6e 74 65 72 65 64 20 2a 2f 0a 20 encountered */.
26b0: 20 65 74 42 79 74 65 20 78 74 79 70 65 3b 20 20 etByte xtype;
26c0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 43 /* C
26d0: 6f 6e 76 65 72 73 69 6f 6e 20 70 61 72 61 64 69 onversion paradi
26e0: 67 6d 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 45 gm */. char *zE
26f0: 78 74 72 61 3b 20 20 20 20 20 20 20 20 20 20 20 xtra;
2700: 20 20 20 2f 2a 20 45 78 74 72 61 20 6d 65 6d 6f /* Extra memo
2710: 72 79 20 75 73 65 64 20 66 6f 72 20 65 74 54 43 ry used for etTC
2720: 4c 45 53 43 41 50 45 20 63 6f 6e 76 65 72 73 69 LESCAPE conversi
2730: 6f 6e 73 20 2a 2f 0a 23 69 66 6e 64 65 66 20 53 ons */.#ifndef S
2740: 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41 54 QLITE_OMIT_FLOAT
2750: 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 69 6e 74 20 ING_POINT. int
2760: 20 65 78 70 2c 20 65 32 3b 20 20 20 20 20 20 20 exp, e2;
2770: 20 20 20 20 20 20 20 2f 2a 20 65 78 70 6f 6e 65 /* expone
2780: 6e 74 20 6f 66 20 72 65 61 6c 20 6e 75 6d 62 65 nt of real numbe
2790: 72 73 20 2a 2f 0a 20 20 64 6f 75 62 6c 65 20 72 rs */. double r
27a0: 6f 75 6e 64 65 72 3b 20 20 20 20 20 20 20 20 20 ounder;
27b0: 20 20 20 2f 2a 20 55 73 65 64 20 66 6f 72 20 72 /* Used for r
27c0: 6f 75 6e 64 69 6e 67 20 66 6c 6f 61 74 69 6e 67 ounding floating
27d0: 20 70 6f 69 6e 74 20 76 61 6c 75 65 73 20 2a 2f point values */
27e0: 0a 20 20 65 74 42 79 74 65 20 66 6c 61 67 5f 64 . etByte flag_d
27f0: 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a p; /*
2800: 20 54 72 75 65 20 69 66 20 64 65 63 69 6d 61 6c True if decimal
2810: 20 70 6f 69 6e 74 20 73 68 6f 75 6c 64 20 62 65 point should be
2820: 20 73 68 6f 77 6e 20 2a 2f 0a 20 20 65 74 42 79 shown */. etBy
2830: 74 65 20 66 6c 61 67 5f 72 74 7a 3b 20 20 20 20 te flag_rtz;
2840: 20 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69 /* True i
2850: 66 20 74 72 61 69 6c 69 6e 67 20 7a 65 72 6f 73 f trailing zeros
2860: 20 73 68 6f 75 6c 64 20 62 65 20 72 65 6d 6f 76 should be remov
2870: 65 64 20 2a 2f 0a 20 20 65 74 42 79 74 65 20 66 ed */. etByte f
2880: 6c 61 67 5f 65 78 70 3b 20 20 20 20 20 20 20 20 lag_exp;
2890: 20 20 20 2f 2a 20 54 72 75 65 20 74 6f 20 66 6f /* True to fo
28a0: 72 63 65 20 64 69 73 70 6c 61 79 20 6f 66 20 74 rce display of t
28b0: 68 65 20 65 78 70 6f 6e 65 6e 74 20 2a 2f 0a 20 he exponent */.
28c0: 20 69 6e 74 20 6e 73 64 3b 20 20 20 20 20 20 20 int nsd;
28d0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e /* N
28e0: 75 6d 62 65 72 20 6f 66 20 73 69 67 6e 69 66 69 umber of signifi
28f0: 63 61 6e 74 20 64 69 67 69 74 73 20 72 65 74 75 cant digits retu
2900: 72 6e 65 64 20 2a 2f 0a 23 65 6e 64 69 66 0a 0a rned */.#endif..
2910: 20 20 6c 65 6e 67 74 68 20 3d 20 30 3b 0a 20 20 length = 0;.
2920: 62 75 66 70 74 20 3d 20 30 3b 0a 20 20 66 6f 72 bufpt = 0;. for
2930: 28 3b 20 28 63 3d 28 2a 66 6d 74 29 29 21 3d 30 (; (c=(*fmt))!=0
2940: 3b 20 2b 2b 66 6d 74 29 7b 0a 20 20 20 20 69 66 ; ++fmt){. if
2950: 28 20 63 21 3d 27 25 27 20 29 7b 0a 20 20 20 20 ( c!='%' ){.
2960: 20 20 69 6e 74 20 61 6d 74 3b 0a 20 20 20 20 20 int amt;.
2970: 20 62 75 66 70 74 20 3d 20 28 63 68 61 72 20 2a bufpt = (char *
2980: 29 66 6d 74 3b 0a 20 20 20 20 20 20 61 6d 74 20 )fmt;. amt
2990: 3d 20 31 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 = 1;. while
29a0: 28 20 28 63 3d 28 2a 2b 2b 66 6d 74 29 29 21 3d ( (c=(*++fmt))!=
29b0: 27 25 27 20 26 26 20 63 21 3d 30 20 29 20 61 6d '%' && c!=0 ) am
29c0: 74 2b 2b 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 t++;. sqlit
29d0: 65 33 53 74 72 41 63 63 75 6d 41 70 70 65 6e 64 e3StrAccumAppend
29e0: 28 70 41 63 63 75 6d 2c 20 62 75 66 70 74 2c 20 (pAccum, bufpt,
29f0: 61 6d 74 29 3b 0a 20 20 20 20 20 20 69 66 28 20 amt);. if(
2a00: 63 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 c==0 ) break;.
2a10: 20 20 7d 0a 20 20 20 20 69 66 28 20 28 63 3d 28 }. if( (c=(
2a20: 2a 2b 2b 66 6d 74 29 29 3d 3d 30 20 29 7b 0a 20 *++fmt))==0 ){.
2a30: 20 20 20 20 20 65 72 72 6f 72 66 6c 61 67 20 3d errorflag =
2a40: 20 31 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 1;. sqlite
2a50: 33 53 74 72 41 63 63 75 6d 41 70 70 65 6e 64 28 3StrAccumAppend(
2a60: 70 41 63 63 75 6d 2c 20 22 25 22 2c 20 31 29 3b pAccum, "%", 1);
2a70: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 . break;.
2a80: 20 20 7d 0a 20 20 20 20 2f 2a 20 46 69 6e 64 20 }. /* Find
2a90: 6f 75 74 20 77 68 61 74 20 66 6c 61 67 73 20 61 out what flags a
2aa0: 72 65 20 70 72 65 73 65 6e 74 20 2a 2f 0a 20 20 re present */.
2ab0: 20 20 66 6c 61 67 5f 6c 65 66 74 6a 75 73 74 69 flag_leftjusti
2ac0: 66 79 20 3d 20 66 6c 61 67 5f 70 6c 75 73 73 69 fy = flag_plussi
2ad0: 67 6e 20 3d 20 66 6c 61 67 5f 62 6c 61 6e 6b 73 gn = flag_blanks
2ae0: 69 67 6e 20 3d 20 0a 20 20 20 20 20 66 6c 61 67 ign = . flag
2af0: 5f 61 6c 74 65 72 6e 61 74 65 66 6f 72 6d 20 3d _alternateform =
2b00: 20 66 6c 61 67 5f 61 6c 74 66 6f 72 6d 32 20 3d flag_altform2 =
2b10: 20 66 6c 61 67 5f 7a 65 72 6f 70 61 64 20 3d 20 flag_zeropad =
2b20: 30 3b 0a 20 20 20 20 64 6f 6e 65 20 3d 20 30 3b 0;. done = 0;
2b30: 0a 20 20 20 20 64 6f 7b 0a 20 20 20 20 20 20 73 . do{. s
2b40: 77 69 74 63 68 28 20 63 20 29 7b 0a 20 20 20 20 witch( c ){.
2b50: 20 20 20 20 63 61 73 65 20 27 2d 27 3a 20 20 20 case '-':
2b60: 66 6c 61 67 5f 6c 65 66 74 6a 75 73 74 69 66 79 flag_leftjustify
2b70: 20 3d 20 31 3b 20 20 20 20 20 62 72 65 61 6b 3b = 1; break;
2b80: 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 27 2b . case '+
2b90: 27 3a 20 20 20 66 6c 61 67 5f 70 6c 75 73 73 69 ': flag_plussi
2ba0: 67 6e 20 3d 20 31 3b 20 20 20 20 20 20 20 20 62 gn = 1; b
2bb0: 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 63 61 reak;. ca
2bc0: 73 65 20 27 20 27 3a 20 20 20 66 6c 61 67 5f 62 se ' ': flag_b
2bd0: 6c 61 6e 6b 73 69 67 6e 20 3d 20 31 3b 20 20 20 lanksign = 1;
2be0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 break;.
2bf0: 20 20 20 63 61 73 65 20 27 23 27 3a 20 20 20 66 case '#': f
2c00: 6c 61 67 5f 61 6c 74 65 72 6e 61 74 65 66 6f 72 lag_alternatefor
2c10: 6d 20 3d 20 31 3b 20 20 20 62 72 65 61 6b 3b 0a m = 1; break;.
2c20: 20 20 20 20 20 20 20 20 63 61 73 65 20 27 21 27 case '!'
2c30: 3a 20 20 20 66 6c 61 67 5f 61 6c 74 66 6f 72 6d : flag_altform
2c40: 32 20 3d 20 31 3b 20 20 20 20 20 20 20 20 62 72 2 = 1; br
2c50: 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 63 61 73 eak;. cas
2c60: 65 20 27 30 27 3a 20 20 20 66 6c 61 67 5f 7a 65 e '0': flag_ze
2c70: 72 6f 70 61 64 20 3d 20 31 3b 20 20 20 20 20 20 ropad = 1;
2c80: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 break;.
2c90: 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20 64 6f default: do
2ca0: 6e 65 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 ne = 1;
2cb0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 break;.
2cc0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 77 68 69 6c }. }whil
2cd0: 65 28 20 21 64 6f 6e 65 20 26 26 20 28 63 3d 28 e( !done && (c=(
2ce0: 2a 2b 2b 66 6d 74 29 29 21 3d 30 20 29 3b 0a 20 *++fmt))!=0 );.
2cf0: 20 20 20 2f 2a 20 47 65 74 20 74 68 65 20 66 69 /* Get the fi
2d00: 65 6c 64 20 77 69 64 74 68 20 2a 2f 0a 20 20 20 eld width */.
2d10: 20 77 69 64 74 68 20 3d 20 30 3b 0a 20 20 20 20 width = 0;.
2d20: 69 66 28 20 63 3d 3d 27 2a 27 20 29 7b 0a 20 20 if( c=='*' ){.
2d30: 20 20 20 20 77 69 64 74 68 20 3d 20 76 61 5f 61 width = va_a
2d40: 72 67 28 61 70 2c 69 6e 74 29 3b 0a 20 20 20 20 rg(ap,int);.
2d50: 20 20 69 66 28 20 77 69 64 74 68 3c 30 20 29 7b if( width<0 ){
2d60: 0a 20 20 20 20 20 20 20 20 66 6c 61 67 5f 6c 65 . flag_le
2d70: 66 74 6a 75 73 74 69 66 79 20 3d 20 31 3b 0a 20 ftjustify = 1;.
2d80: 20 20 20 20 20 20 20 77 69 64 74 68 20 3d 20 2d width = -
2d90: 77 69 64 74 68 3b 0a 20 20 20 20 20 20 7d 0a 20 width;. }.
2da0: 20 20 20 20 20 63 20 3d 20 2a 2b 2b 66 6d 74 3b c = *++fmt;
2db0: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 . }else{.
2dc0: 20 20 77 68 69 6c 65 28 20 63 3e 3d 27 30 27 20 while( c>='0'
2dd0: 26 26 20 63 3c 3d 27 39 27 20 29 7b 0a 20 20 20 && c<='9' ){.
2de0: 20 20 20 20 20 77 69 64 74 68 20 3d 20 77 69 64 width = wid
2df0: 74 68 2a 31 30 20 2b 20 63 20 2d 20 27 30 27 3b th*10 + c - '0';
2e00: 0a 20 20 20 20 20 20 20 20 63 20 3d 20 2a 2b 2b . c = *++
2e10: 66 6d 74 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 fmt;. }.
2e20: 20 7d 0a 20 20 20 20 69 66 28 20 77 69 64 74 68 }. if( width
2e30: 20 3e 20 65 74 42 55 46 53 49 5a 45 2d 31 30 20 > etBUFSIZE-10
2e40: 29 7b 0a 20 20 20 20 20 20 77 69 64 74 68 20 3d ){. width =
2e50: 20 65 74 42 55 46 53 49 5a 45 2d 31 30 3b 0a 20 etBUFSIZE-10;.
2e60: 20 20 20 7d 0a 20 20 20 20 2f 2a 20 47 65 74 20 }. /* Get
2e70: 74 68 65 20 70 72 65 63 69 73 69 6f 6e 20 2a 2f the precision */
2e80: 0a 20 20 20 20 69 66 28 20 63 3d 3d 27 2e 27 20 . if( c=='.'
2e90: 29 7b 0a 20 20 20 20 20 20 70 72 65 63 69 73 69 ){. precisi
2ea0: 6f 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 63 20 on = 0;. c
2eb0: 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 20 20 = *++fmt;.
2ec0: 69 66 28 20 63 3d 3d 27 2a 27 20 29 7b 0a 20 20 if( c=='*' ){.
2ed0: 20 20 20 20 20 20 70 72 65 63 69 73 69 6f 6e 20 precision
2ee0: 3d 20 76 61 5f 61 72 67 28 61 70 2c 69 6e 74 29 = va_arg(ap,int)
2ef0: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 70 72 ;. if( pr
2f00: 65 63 69 73 69 6f 6e 3c 30 20 29 20 70 72 65 63 ecision<0 ) prec
2f10: 69 73 69 6f 6e 20 3d 20 2d 70 72 65 63 69 73 69 ision = -precisi
2f20: 6f 6e 3b 0a 20 20 20 20 20 20 20 20 63 20 3d 20 on;. c =
2f30: 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 20 20 7d 65 *++fmt;. }e
2f40: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 77 68 69 lse{. whi
2f50: 6c 65 28 20 63 3e 3d 27 30 27 20 26 26 20 63 3c le( c>='0' && c<
2f60: 3d 27 39 27 20 29 7b 0a 20 20 20 20 20 20 20 20 ='9' ){.
2f70: 20 20 70 72 65 63 69 73 69 6f 6e 20 3d 20 70 72 precision = pr
2f80: 65 63 69 73 69 6f 6e 2a 31 30 20 2b 20 63 20 2d ecision*10 + c -
2f90: 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 20 20 '0';.
2fa0: 63 20 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 c = *++fmt;.
2fb0: 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 }. }.
2fc0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 }else{. p
2fd0: 72 65 63 69 73 69 6f 6e 20 3d 20 2d 31 3b 0a 20 recision = -1;.
2fe0: 20 20 20 7d 0a 20 20 20 20 2f 2a 20 47 65 74 20 }. /* Get
2ff0: 74 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e 20 74 the conversion t
3000: 79 70 65 20 6d 6f 64 69 66 69 65 72 20 2a 2f 0a ype modifier */.
3010: 20 20 20 20 69 66 28 20 63 3d 3d 27 6c 27 20 29 if( c=='l' )
3020: 7b 0a 20 20 20 20 20 20 66 6c 61 67 5f 6c 6f 6e {. flag_lon
3030: 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 63 20 3d g = 1;. c =
3040: 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 20 20 69 *++fmt;. i
3050: 66 28 20 63 3d 3d 27 6c 27 20 29 7b 0a 20 20 20 f( c=='l' ){.
3060: 20 20 20 20 20 66 6c 61 67 5f 6c 6f 6e 67 6c 6f flag_longlo
3070: 6e 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 ng = 1;.
3080: 63 20 3d 20 2a 2b 2b 66 6d 74 3b 0a 20 20 20 20 c = *++fmt;.
3090: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 }else{.
30a0: 20 66 6c 61 67 5f 6c 6f 6e 67 6c 6f 6e 67 20 3d flag_longlong =
30b0: 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 0;. }.
30c0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 66 6c 61 }else{. fla
30d0: 67 5f 6c 6f 6e 67 20 3d 20 66 6c 61 67 5f 6c 6f g_long = flag_lo
30e0: 6e 67 6c 6f 6e 67 20 3d 20 30 3b 0a 20 20 20 20 nglong = 0;.
30f0: 7d 0a 20 20 20 20 2f 2a 20 46 65 74 63 68 20 74 }. /* Fetch t
3100: 68 65 20 69 6e 66 6f 20 65 6e 74 72 79 20 66 6f he info entry fo
3110: 72 20 74 68 65 20 66 69 65 6c 64 20 2a 2f 0a 20 r the field */.
3120: 20 20 20 69 6e 66 6f 70 20 3d 20 30 3b 0a 20 20 infop = 0;.
3130: 20 20 66 6f 72 28 69 64 78 3d 30 3b 20 69 64 78 for(idx=0; idx
3140: 3c 65 74 4e 49 4e 46 4f 3b 20 69 64 78 2b 2b 29 <etNINFO; idx++)
3150: 7b 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 66 {. if( c==f
3160: 6d 74 69 6e 66 6f 5b 69 64 78 5d 2e 66 6d 74 74 mtinfo[idx].fmtt
3170: 79 70 65 20 29 7b 0a 20 20 20 20 20 20 20 20 69 ype ){. i
3180: 6e 66 6f 70 20 3d 20 26 66 6d 74 69 6e 66 6f 5b nfop = &fmtinfo[
3190: 69 64 78 5d 3b 0a 20 20 20 20 20 20 20 20 69 66 idx];. if
31a0: 28 20 75 73 65 45 78 74 65 6e 64 65 64 20 7c 7c ( useExtended ||
31b0: 20 28 69 6e 66 6f 70 2d 3e 66 6c 61 67 73 20 26 (infop->flags &
31c0: 20 46 4c 41 47 5f 49 4e 54 45 52 4e 29 3d 3d 30 FLAG_INTERN)==0
31d0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 78 74 ){. xt
31e0: 79 70 65 20 3d 20 69 6e 66 6f 70 2d 3e 74 79 70 ype = infop->typ
31f0: 65 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 e;. }else
3200: 7b 0a 20 20 20 20 20 20 20 20 20 20 72 65 74 75 {. retu
3210: 72 6e 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 rn;. }.
3220: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 break;.
3230: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 7a }. }. z
3240: 45 78 74 72 61 20 3d 20 30 3b 0a 20 20 20 20 69 Extra = 0;. i
3250: 66 28 20 69 6e 66 6f 70 3d 3d 30 20 29 7b 0a 20 f( infop==0 ){.
3260: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 return;.
3270: 20 7d 0a 0a 0a 20 20 20 20 2f 2a 20 4c 69 6d 69 }... /* Limi
3280: 74 20 74 68 65 20 70 72 65 63 69 73 69 6f 6e 20 t the precision
3290: 74 6f 20 70 72 65 76 65 6e 74 20 6f 76 65 72 66 to prevent overf
32a0: 6c 6f 77 69 6e 67 20 62 75 66 5b 5d 20 64 75 72 lowing buf[] dur
32b0: 69 6e 67 20 63 6f 6e 76 65 72 73 69 6f 6e 20 2a ing conversion *
32c0: 2f 0a 20 20 20 20 69 66 28 20 70 72 65 63 69 73 /. if( precis
32d0: 69 6f 6e 3e 65 74 42 55 46 53 49 5a 45 2d 34 30 ion>etBUFSIZE-40
32e0: 20 26 26 20 28 69 6e 66 6f 70 2d 3e 66 6c 61 67 && (infop->flag
32f0: 73 20 26 20 46 4c 41 47 5f 53 54 52 49 4e 47 29 s & FLAG_STRING)
3300: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 70 72 65 ==0 ){. pre
3310: 63 69 73 69 6f 6e 20 3d 20 65 74 42 55 46 53 49 cision = etBUFSI
3320: 5a 45 2d 34 30 3b 0a 20 20 20 20 7d 0a 0a 20 20 ZE-40;. }..
3330: 20 20 2f 2a 0a 20 20 20 20 2a 2a 20 41 74 20 74 /*. ** At t
3340: 68 69 73 20 70 6f 69 6e 74 2c 20 76 61 72 69 61 his point, varia
3350: 62 6c 65 73 20 61 72 65 20 69 6e 69 74 69 61 6c bles are initial
3360: 69 7a 65 64 20 61 73 20 66 6f 6c 6c 6f 77 73 3a ized as follows:
3370: 0a 20 20 20 20 2a 2a 0a 20 20 20 20 2a 2a 20 20 . **. **
3380: 20 66 6c 61 67 5f 61 6c 74 65 72 6e 61 74 65 66 flag_alternatef
3390: 6f 72 6d 20 20 20 20 20 20 20 20 20 20 54 52 55 orm TRU
33a0: 45 20 69 66 20 61 20 27 23 27 20 69 73 20 70 72 E if a '#' is pr
33b0: 65 73 65 6e 74 2e 0a 20 20 20 20 2a 2a 20 20 20 esent.. **
33c0: 66 6c 61 67 5f 61 6c 74 66 6f 72 6d 32 20 20 20 flag_altform2
33d0: 20 20 20 20 20 20 20 20 20 20 20 20 54 52 55 45 TRUE
33e0: 20 69 66 20 61 20 27 21 27 20 69 73 20 70 72 65 if a '!' is pre
33f0: 73 65 6e 74 2e 0a 20 20 20 20 2a 2a 20 20 20 66 sent.. ** f
3400: 6c 61 67 5f 70 6c 75 73 73 69 67 6e 20 20 20 20 lag_plussign
3410: 20 20 20 20 20 20 20 20 20 20 20 54 52 55 45 20 TRUE
3420: 69 66 20 61 20 27 2b 27 20 69 73 20 70 72 65 73 if a '+' is pres
3430: 65 6e 74 2e 0a 20 20 20 20 2a 2a 20 20 20 66 6c ent.. ** fl
3440: 61 67 5f 6c 65 66 74 6a 75 73 74 69 66 79 20 20 ag_leftjustify
3450: 20 20 20 20 20 20 20 20 20 20 54 52 55 45 20 69 TRUE i
3460: 66 20 61 20 27 2d 27 20 69 73 20 70 72 65 73 65 f a '-' is prese
3470: 6e 74 20 6f 72 20 69 66 20 74 68 65 0a 20 20 20 nt or if the.
3480: 20 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 **
3490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
34a0: 20 20 66 69 65 6c 64 20 77 69 64 74 68 20 77 61 field width wa
34b0: 73 20 6e 65 67 61 74 69 76 65 2e 0a 20 20 20 20 s negative..
34c0: 2a 2a 20 20 20 66 6c 61 67 5f 7a 65 72 6f 70 61 ** flag_zeropa
34d0: 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d
34e0: 20 54 52 55 45 20 69 66 20 74 68 65 20 77 69 64 TRUE if the wid
34f0: 74 68 20 62 65 67 61 6e 20 77 69 74 68 20 30 2e th began with 0.
3500: 0a 20 20 20 20 2a 2a 20 20 20 66 6c 61 67 5f 6c . ** flag_l
3510: 6f 6e 67 20 20 20 20 20 20 20 20 20 20 20 20 20 ong
3520: 20 20 20 20 20 20 54 52 55 45 20 69 66 20 74 68 TRUE if th
3530: 65 20 6c 65 74 74 65 72 20 27 6c 27 20 28 65 6c e letter 'l' (el
3540: 6c 29 20 70 72 65 66 69 78 65 64 0a 20 20 20 20 l) prefixed.
3550: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
3560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3570: 20 74 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e 20 the conversion
3580: 63 68 61 72 61 63 74 65 72 2e 0a 20 20 20 20 2a character.. *
3590: 2a 20 20 20 66 6c 61 67 5f 6c 6f 6e 67 6c 6f 6e * flag_longlon
35a0: 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 g
35b0: 54 52 55 45 20 69 66 20 74 68 65 20 6c 65 74 74 TRUE if the lett
35c0: 65 72 20 27 6c 6c 27 20 28 65 6c 6c 20 65 6c 6c er 'll' (ell ell
35d0: 29 20 70 72 65 66 69 78 65 64 0a 20 20 20 20 2a ) prefixed. *
35e0: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
35f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3600: 74 68 65 20 63 6f 6e 76 65 72 73 69 6f 6e 20 63 the conversion c
3610: 68 61 72 61 63 74 65 72 2e 0a 20 20 20 20 2a 2a haracter.. **
3620: 20 20 20 66 6c 61 67 5f 62 6c 61 6e 6b 73 69 67 flag_blanksig
3630: 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 n T
3640: 52 55 45 20 69 66 20 61 20 27 20 27 20 69 73 20 RUE if a ' ' is
3650: 70 72 65 73 65 6e 74 2e 0a 20 20 20 20 2a 2a 20 present.. **
3660: 20 20 77 69 64 74 68 20 20 20 20 20 20 20 20 20 width
3670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 Th
3680: 65 20 73 70 65 63 69 66 69 65 64 20 66 69 65 6c e specified fiel
3690: 64 20 77 69 64 74 68 2e 20 20 54 68 69 73 20 69 d width. This i
36a0: 73 0a 20 20 20 20 2a 2a 20 20 20 20 20 20 20 20 s. **
36b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
36c0: 20 20 20 20 20 20 20 61 6c 77 61 79 73 20 6e 6f always no
36d0: 6e 2d 6e 65 67 61 74 69 76 65 2e 20 20 5a 65 72 n-negative. Zer
36e0: 6f 20 69 73 20 74 68 65 20 64 65 66 61 75 6c 74 o is the default
36f0: 2e 0a 20 20 20 20 2a 2a 20 20 20 70 72 65 63 69 .. ** preci
3700: 73 69 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20 sion
3710: 20 20 20 20 20 20 20 54 68 65 20 73 70 65 63 69 The speci
3720: 66 69 65 64 20 70 72 65 63 69 73 69 6f 6e 2e 20 fied precision.
3730: 20 54 68 65 20 64 65 66 61 75 6c 74 0a 20 20 20 The default.
3740: 20 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 **
3750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3760: 20 20 69 73 20 2d 31 2e 0a 20 20 20 20 2a 2a 20 is -1.. **
3770: 20 20 78 74 79 70 65 20 20 20 20 20 20 20 20 20 xtype
3780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 Th
3790: 65 20 63 6c 61 73 73 20 6f 66 20 74 68 65 20 63 e class of the c
37a0: 6f 6e 76 65 72 73 69 6f 6e 2e 0a 20 20 20 20 2a onversion.. *
37b0: 2a 20 20 20 69 6e 66 6f 70 20 20 20 20 20 20 20 * infop
37c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
37d0: 50 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 20 61 Pointer to the a
37e0: 70 70 72 6f 70 72 69 61 74 65 20 69 6e 66 6f 20 ppropriate info
37f0: 73 74 72 75 63 74 2e 0a 20 20 20 20 2a 2f 0a 20 struct.. */.
3800: 20 20 20 73 77 69 74 63 68 28 20 78 74 79 70 65 switch( xtype
3810: 20 29 7b 0a 20 20 20 20 20 20 63 61 73 65 20 65 ){. case e
3820: 74 50 4f 49 4e 54 45 52 3a 0a 20 20 20 20 20 20 tPOINTER:.
3830: 20 20 66 6c 61 67 5f 6c 6f 6e 67 6c 6f 6e 67 20 flag_longlong
3840: 3d 20 73 69 7a 65 6f 66 28 63 68 61 72 2a 29 3d = sizeof(char*)=
3850: 3d 73 69 7a 65 6f 66 28 69 36 34 29 3b 0a 20 20 =sizeof(i64);.
3860: 20 20 20 20 20 20 66 6c 61 67 5f 6c 6f 6e 67 20 flag_long
3870: 3d 20 73 69 7a 65 6f 66 28 63 68 61 72 2a 29 3d = sizeof(char*)=
3880: 3d 73 69 7a 65 6f 66 28 6c 6f 6e 67 20 69 6e 74 =sizeof(long int
3890: 29 3b 0a 20 20 20 20 20 20 20 20 2f 2a 20 46 61 );. /* Fa
38a0: 6c 6c 20 74 68 72 6f 75 67 68 20 69 6e 74 6f 20 ll through into
38b0: 74 68 65 20 6e 65 78 74 20 63 61 73 65 20 2a 2f the next case */
38c0: 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 52 41 . case etRA
38d0: 44 49 58 3a 0a 20 20 20 20 20 20 20 20 69 66 28 DIX:. if(
38e0: 20 69 6e 66 6f 70 2d 3e 66 6c 61 67 73 20 26 20 infop->flags &
38f0: 46 4c 41 47 5f 53 49 47 4e 45 44 20 29 7b 0a 20 FLAG_SIGNED ){.
3900: 20 20 20 20 20 20 20 20 20 69 36 34 20 76 3b 0a i64 v;.
3910: 20 20 20 20 20 20 20 20 20 20 69 66 28 20 66 6c if( fl
3920: 61 67 5f 6c 6f 6e 67 6c 6f 6e 67 20 29 20 20 20 ag_longlong )
3930: 76 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 69 36 v = va_arg(ap,i6
3940: 34 29 3b 0a 20 20 20 20 20 20 20 20 20 20 65 6c 4);. el
3950: 73 65 20 69 66 28 20 66 6c 61 67 5f 6c 6f 6e 67 se if( flag_long
3960: 20 29 20 20 76 20 3d 20 76 61 5f 61 72 67 28 61 ) v = va_arg(a
3970: 70 2c 6c 6f 6e 67 20 69 6e 74 29 3b 0a 20 20 20 p,long int);.
3980: 20 20 20 20 20 20 20 65 6c 73 65 20 20 20 20 20 else
3990: 20 20 20 20 20 20 20 20 20 20 20 20 20 76 20 3d v =
39a0: 20 76 61 5f 61 72 67 28 61 70 2c 69 6e 74 29 3b va_arg(ap,int);
39b0: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 76 . if( v
39c0: 3c 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 <0 ){.
39d0: 20 20 6c 6f 6e 67 76 61 6c 75 65 20 3d 20 2d 76 longvalue = -v
39e0: 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 70 72 ;. pr
39f0: 65 66 69 78 20 3d 20 27 2d 27 3b 0a 20 20 20 20 efix = '-';.
3a00: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 }else{.
3a10: 20 20 20 20 20 20 20 20 20 6c 6f 6e 67 76 61 6c longval
3a20: 75 65 20 3d 20 76 3b 0a 20 20 20 20 20 20 20 20 ue = v;.
3a30: 20 20 20 20 69 66 28 20 66 6c 61 67 5f 70 6c 75 if( flag_plu
3a40: 73 73 69 67 6e 20 29 20 20 20 20 20 20 20 20 70 ssign ) p
3a50: 72 65 66 69 78 20 3d 20 27 2b 27 3b 0a 20 20 20 refix = '+';.
3a60: 20 20 20 20 20 20 20 20 20 65 6c 73 65 20 69 66 else if
3a70: 28 20 66 6c 61 67 5f 62 6c 61 6e 6b 73 69 67 6e ( flag_blanksign
3a80: 20 29 20 20 70 72 65 66 69 78 20 3d 20 27 20 27 ) prefix = ' '
3a90: 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6c ;. el
3aa0: 73 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 se
3ab0: 20 20 20 20 20 20 20 20 20 70 72 65 66 69 78 20 prefix
3ac0: 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 20 20 7d = 0;. }
3ad0: 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a . }else{.
3ae0: 20 20 20 20 20 20 20 20 20 20 69 66 28 20 66 6c if( fl
3af0: 61 67 5f 6c 6f 6e 67 6c 6f 6e 67 20 29 20 20 20 ag_longlong )
3b00: 6c 6f 6e 67 76 61 6c 75 65 20 3d 20 76 61 5f 61 longvalue = va_a
3b10: 72 67 28 61 70 2c 75 36 34 29 3b 0a 20 20 20 20 rg(ap,u64);.
3b20: 20 20 20 20 20 20 65 6c 73 65 20 69 66 28 20 66 else if( f
3b30: 6c 61 67 5f 6c 6f 6e 67 20 29 20 20 6c 6f 6e 67 lag_long ) long
3b40: 76 61 6c 75 65 20 3d 20 76 61 5f 61 72 67 28 61 value = va_arg(a
3b50: 70 2c 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 20 p,unsigned long
3b60: 69 6e 74 29 3b 0a 20 20 20 20 20 20 20 20 20 20 int);.
3b70: 65 6c 73 65 20 20 20 20 20 20 20 20 20 20 20 20 else
3b80: 20 20 20 20 20 20 6c 6f 6e 67 76 61 6c 75 65 20 longvalue
3b90: 3d 20 76 61 5f 61 72 67 28 61 70 2c 75 6e 73 69 = va_arg(ap,unsi
3ba0: 67 6e 65 64 20 69 6e 74 29 3b 0a 20 20 20 20 20 gned int);.
3bb0: 20 20 20 20 20 70 72 65 66 69 78 20 3d 20 30 3b prefix = 0;
3bc0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 . }.
3bd0: 20 20 20 69 66 28 20 6c 6f 6e 67 76 61 6c 75 65 if( longvalue
3be0: 3d 3d 30 20 29 20 66 6c 61 67 5f 61 6c 74 65 72 ==0 ) flag_alter
3bf0: 6e 61 74 65 66 6f 72 6d 20 3d 20 30 3b 0a 20 20 nateform = 0;.
3c00: 20 20 20 20 20 20 69 66 28 20 66 6c 61 67 5f 7a if( flag_z
3c10: 65 72 6f 70 61 64 20 26 26 20 70 72 65 63 69 73 eropad && precis
3c20: 69 6f 6e 3c 77 69 64 74 68 2d 28 70 72 65 66 69 ion<width-(prefi
3c30: 78 21 3d 30 29 20 29 7b 0a 20 20 20 20 20 20 20 x!=0) ){.
3c40: 20 20 20 70 72 65 63 69 73 69 6f 6e 20 3d 20 77 precision = w
3c50: 69 64 74 68 2d 28 70 72 65 66 69 78 21 3d 30 29 idth-(prefix!=0)
3c60: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 ;. }.
3c70: 20 20 20 20 62 75 66 70 74 20 3d 20 26 62 75 66 bufpt = &buf
3c80: 5b 65 74 42 55 46 53 49 5a 45 2d 31 5d 3b 0a 20 [etBUFSIZE-1];.
3c90: 20 20 20 20 20 20 20 7b 0a 20 20 20 20 20 20 20 {.
3ca0: 20 20 20 72 65 67 69 73 74 65 72 20 63 6f 6e 73 register cons
3cb0: 74 20 63 68 61 72 20 2a 63 73 65 74 3b 20 20 20 t char *cset;
3cc0: 20 20 20 2f 2a 20 55 73 65 20 72 65 67 69 73 74 /* Use regist
3cd0: 65 72 73 20 66 6f 72 20 73 70 65 65 64 20 2a 2f ers for speed */
3ce0: 0a 20 20 20 20 20 20 20 20 20 20 72 65 67 69 73 . regis
3cf0: 74 65 72 20 69 6e 74 20 62 61 73 65 3b 0a 20 20 ter int base;.
3d00: 20 20 20 20 20 20 20 20 63 73 65 74 20 3d 20 26 cset = &
3d10: 61 44 69 67 69 74 73 5b 69 6e 66 6f 70 2d 3e 63 aDigits[infop->c
3d20: 68 61 72 73 65 74 5d 3b 0a 20 20 20 20 20 20 20 harset];.
3d30: 20 20 20 62 61 73 65 20 3d 20 69 6e 66 6f 70 2d base = infop-
3d40: 3e 62 61 73 65 3b 0a 20 20 20 20 20 20 20 20 20 >base;.
3d50: 20 64 6f 7b 20 20 20 20 20 20 20 20 20 20 20 20 do{
3d60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3d70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
3d80: 2a 20 43 6f 6e 76 65 72 74 20 74 6f 20 61 73 63 * Convert to asc
3d90: 69 69 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 ii */.
3da0: 20 20 2a 28 2d 2d 62 75 66 70 74 29 20 3d 20 63 *(--bufpt) = c
3db0: 73 65 74 5b 6c 6f 6e 67 76 61 6c 75 65 25 62 61 set[longvalue%ba
3dc0: 73 65 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 20 se];.
3dd0: 20 6c 6f 6e 67 76 61 6c 75 65 20 3d 20 6c 6f 6e longvalue = lon
3de0: 67 76 61 6c 75 65 2f 62 61 73 65 3b 0a 20 20 20 gvalue/base;.
3df0: 20 20 20 20 20 20 20 7d 77 68 69 6c 65 28 20 6c }while( l
3e00: 6f 6e 67 76 61 6c 75 65 3e 30 20 29 3b 0a 20 20 ongvalue>0 );.
3e10: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 }.
3e20: 6c 65 6e 67 74 68 20 3d 20 26 62 75 66 5b 65 74 length = &buf[et
3e30: 42 55 46 53 49 5a 45 2d 31 5d 2d 62 75 66 70 74 BUFSIZE-1]-bufpt
3e40: 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 64 ;. for(id
3e50: 78 3d 70 72 65 63 69 73 69 6f 6e 2d 6c 65 6e 67 x=precision-leng
3e60: 74 68 3b 20 69 64 78 3e 30 3b 20 69 64 78 2d 2d th; idx>0; idx--
3e70: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 2a 28 2d ){. *(-
3e80: 2d 62 75 66 70 74 29 20 3d 20 27 30 27 3b 20 20 -bufpt) = '0';
3e90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3ea0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 5a 65 /* Ze
3eb0: 72 6f 20 70 61 64 20 2a 2f 0a 20 20 20 20 20 20 ro pad */.
3ec0: 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 }. if(
3ed0: 70 72 65 66 69 78 20 29 20 2a 28 2d 2d 62 75 66 prefix ) *(--buf
3ee0: 70 74 29 20 3d 20 70 72 65 66 69 78 3b 20 20 20 pt) = prefix;
3ef0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 /* A
3f00: 64 64 20 73 69 67 6e 20 2a 2f 0a 20 20 20 20 20 dd sign */.
3f10: 20 20 20 69 66 28 20 66 6c 61 67 5f 61 6c 74 65 if( flag_alte
3f20: 72 6e 61 74 65 66 6f 72 6d 20 26 26 20 69 6e 66 rnateform && inf
3f30: 6f 70 2d 3e 70 72 65 66 69 78 20 29 7b 20 20 20 op->prefix ){
3f40: 20 20 20 2f 2a 20 41 64 64 20 22 30 22 20 6f 72 /* Add "0" or
3f50: 20 22 30 78 22 20 2a 2f 0a 20 20 20 20 20 20 20 "0x" */.
3f60: 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 const char *p
3f70: 72 65 3b 0a 20 20 20 20 20 20 20 20 20 20 63 68 re;. ch
3f80: 61 72 20 78 3b 0a 20 20 20 20 20 20 20 20 20 20 ar x;.
3f90: 70 72 65 20 3d 20 26 61 50 72 65 66 69 78 5b 69 pre = &aPrefix[i
3fa0: 6e 66 6f 70 2d 3e 70 72 65 66 69 78 5d 3b 0a 20 nfop->prefix];.
3fb0: 20 20 20 20 20 20 20 20 20 69 66 28 20 2a 62 75 if( *bu
3fc0: 66 70 74 21 3d 70 72 65 5b 30 5d 20 29 7b 0a 20 fpt!=pre[0] ){.
3fd0: 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 28 3b for(;
3fe0: 20 28 78 3d 28 2a 70 72 65 29 29 21 3d 30 3b 20 (x=(*pre))!=0;
3ff0: 70 72 65 2b 2b 29 20 2a 28 2d 2d 62 75 66 70 74 pre++) *(--bufpt
4000: 29 20 3d 20 78 3b 0a 20 20 20 20 20 20 20 20 20 ) = x;.
4010: 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 }. }.
4020: 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 26 62 length = &b
4030: 75 66 5b 65 74 42 55 46 53 49 5a 45 2d 31 5d 2d uf[etBUFSIZE-1]-
4040: 62 75 66 70 74 3b 0a 20 20 20 20 20 20 20 20 62 bufpt;. b
4050: 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 reak;. case
4060: 20 65 74 46 4c 4f 41 54 3a 0a 20 20 20 20 20 20 etFLOAT:.
4070: 63 61 73 65 20 65 74 45 58 50 3a 0a 20 20 20 20 case etEXP:.
4080: 20 20 63 61 73 65 20 65 74 47 45 4e 45 52 49 43 case etGENERIC
4090: 3a 0a 20 20 20 20 20 20 20 20 72 65 61 6c 76 61 :. realva
40a0: 6c 75 65 20 3d 20 76 61 5f 61 72 67 28 61 70 2c lue = va_arg(ap,
40b0: 64 6f 75 62 6c 65 29 3b 0a 23 69 66 6e 64 65 66 double);.#ifndef
40c0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f SQLITE_OMIT_FLO
40d0: 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20 20 ATING_POINT.
40e0: 20 20 20 20 69 66 28 20 70 72 65 63 69 73 69 6f if( precisio
40f0: 6e 3c 30 20 29 20 70 72 65 63 69 73 69 6f 6e 20 n<0 ) precision
4100: 3d 20 36 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 = 6; /*
4110: 53 65 74 20 64 65 66 61 75 6c 74 20 70 72 65 63 Set default prec
4120: 69 73 69 6f 6e 20 2a 2f 0a 20 20 20 20 20 20 20 ision */.
4130: 20 69 66 28 20 70 72 65 63 69 73 69 6f 6e 3e 65 if( precision>e
4140: 74 42 55 46 53 49 5a 45 2f 32 2d 31 30 20 29 20 tBUFSIZE/2-10 )
4150: 70 72 65 63 69 73 69 6f 6e 20 3d 20 65 74 42 55 precision = etBU
4160: 46 53 49 5a 45 2f 32 2d 31 30 3b 0a 20 20 20 20 FSIZE/2-10;.
4170: 20 20 20 20 69 66 28 20 72 65 61 6c 76 61 6c 75 if( realvalu
4180: 65 3c 30 2e 30 20 29 7b 0a 20 20 20 20 20 20 20 e<0.0 ){.
4190: 20 20 20 72 65 61 6c 76 61 6c 75 65 20 3d 20 2d realvalue = -
41a0: 72 65 61 6c 76 61 6c 75 65 3b 0a 20 20 20 20 20 realvalue;.
41b0: 20 20 20 20 20 70 72 65 66 69 78 20 3d 20 27 2d prefix = '-
41c0: 27 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 ';. }else
41d0: 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 {. if(
41e0: 66 6c 61 67 5f 70 6c 75 73 73 69 67 6e 20 29 20 flag_plussign )
41f0: 20 20 20 20 20 20 20 20 20 70 72 65 66 69 78 20 prefix
4200: 3d 20 27 2b 27 3b 0a 20 20 20 20 20 20 20 20 20 = '+';.
4210: 20 65 6c 73 65 20 69 66 28 20 66 6c 61 67 5f 62 else if( flag_b
4220: 6c 61 6e 6b 73 69 67 6e 20 29 20 20 20 20 70 72 lanksign ) pr
4230: 65 66 69 78 20 3d 20 27 20 27 3b 0a 20 20 20 20 efix = ' ';.
4240: 20 20 20 20 20 20 65 6c 73 65 20 20 20 20 20 20 else
4250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
4260: 20 20 20 70 72 65 66 69 78 20 3d 20 30 3b 0a 20 prefix = 0;.
4270: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
4280: 20 69 66 28 20 78 74 79 70 65 3d 3d 65 74 47 45 if( xtype==etGE
4290: 4e 45 52 49 43 20 26 26 20 70 72 65 63 69 73 69 NERIC && precisi
42a0: 6f 6e 3e 30 20 29 20 70 72 65 63 69 73 69 6f 6e on>0 ) precision
42b0: 2d 2d 3b 0a 23 69 66 20 30 0a 20 20 20 20 20 20 --;.#if 0.
42c0: 20 20 2f 2a 20 52 6f 75 6e 64 69 6e 67 20 77 6f /* Rounding wo
42d0: 72 6b 73 20 6c 69 6b 65 20 42 53 44 20 77 68 65 rks like BSD whe
42e0: 6e 20 74 68 65 20 63 6f 6e 73 74 61 6e 74 20 30 n the constant 0
42f0: 2e 34 39 39 39 20 69 73 20 75 73 65 64 2e 20 20 .4999 is used.
4300: 57 69 65 72 64 21 20 2a 2f 0a 20 20 20 20 20 20 Wierd! */.
4310: 20 20 66 6f 72 28 69 64 78 3d 70 72 65 63 69 73 for(idx=precis
4320: 69 6f 6e 2c 20 72 6f 75 6e 64 65 72 3d 30 2e 34 ion, rounder=0.4
4330: 39 39 39 3b 20 69 64 78 3e 30 3b 20 69 64 78 2d 999; idx>0; idx-
4340: 2d 2c 20 72 6f 75 6e 64 65 72 2a 3d 30 2e 31 29 -, rounder*=0.1)
4350: 3b 0a 23 65 6c 73 65 0a 20 20 20 20 20 20 20 20 ;.#else.
4360: 2f 2a 20 49 74 20 6d 61 6b 65 73 20 6d 6f 72 65 /* It makes more
4370: 20 73 65 6e 73 65 20 74 6f 20 75 73 65 20 30 2e sense to use 0.
4380: 35 20 2a 2f 0a 20 20 20 20 20 20 20 20 66 6f 72 5 */. for
4390: 28 69 64 78 3d 70 72 65 63 69 73 69 6f 6e 2c 20 (idx=precision,
43a0: 72 6f 75 6e 64 65 72 3d 30 2e 35 3b 20 69 64 78 rounder=0.5; idx
43b0: 3e 30 3b 20 69 64 78 2d 2d 2c 20 72 6f 75 6e 64 >0; idx--, round
43c0: 65 72 2a 3d 30 2e 31 29 7b 7d 0a 23 65 6e 64 69 er*=0.1){}.#endi
43d0: 66 0a 20 20 20 20 20 20 20 20 69 66 28 20 78 74 f. if( xt
43e0: 79 70 65 3d 3d 65 74 46 4c 4f 41 54 20 29 20 72 ype==etFLOAT ) r
43f0: 65 61 6c 76 61 6c 75 65 20 2b 3d 20 72 6f 75 6e ealvalue += roun
4400: 64 65 72 3b 0a 20 20 20 20 20 20 20 20 2f 2a 20 der;. /*
4410: 4e 6f 72 6d 61 6c 69 7a 65 20 72 65 61 6c 76 61 Normalize realva
4420: 6c 75 65 20 74 6f 20 77 69 74 68 69 6e 20 31 30 lue to within 10
4430: 2e 30 20 3e 20 72 65 61 6c 76 61 6c 75 65 20 3e .0 > realvalue >
4440: 3d 20 31 2e 30 20 2a 2f 0a 20 20 20 20 20 20 20 = 1.0 */.
4450: 20 65 78 70 20 3d 20 30 3b 0a 20 20 20 20 20 20 exp = 0;.
4460: 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 69 73 if( sqlite3_is
4470: 6e 61 6e 28 72 65 61 6c 76 61 6c 75 65 29 20 29 nan(realvalue) )
4480: 7b 0a 20 20 20 20 20 20 20 20 20 20 62 75 66 70 {. bufp
4490: 74 20 3d 20 22 4e 61 4e 22 3b 0a 20 20 20 20 20 t = "NaN";.
44a0: 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 33 3b length = 3;
44b0: 0a 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b . break
44c0: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 ;. }.
44d0: 20 20 20 20 69 66 28 20 72 65 61 6c 76 61 6c 75 if( realvalu
44e0: 65 3e 30 2e 30 20 29 7b 0a 20 20 20 20 20 20 20 e>0.0 ){.
44f0: 20 20 20 77 68 69 6c 65 28 20 72 65 61 6c 76 61 while( realva
4500: 6c 75 65 3e 3d 31 65 33 32 20 26 26 20 65 78 70 lue>=1e32 && exp
4510: 3c 3d 33 35 30 20 29 7b 20 72 65 61 6c 76 61 6c <=350 ){ realval
4520: 75 65 20 2a 3d 20 31 65 2d 33 32 3b 20 65 78 70 ue *= 1e-32; exp
4530: 2b 3d 33 32 3b 20 7d 0a 20 20 20 20 20 20 20 20 +=32; }.
4540: 20 20 77 68 69 6c 65 28 20 72 65 61 6c 76 61 6c while( realval
4550: 75 65 3e 3d 31 65 38 20 26 26 20 65 78 70 3c 3d ue>=1e8 && exp<=
4560: 33 35 30 20 29 7b 20 72 65 61 6c 76 61 6c 75 65 350 ){ realvalue
4570: 20 2a 3d 20 31 65 2d 38 3b 20 65 78 70 2b 3d 38 *= 1e-8; exp+=8
4580: 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 20 77 68 ; }. wh
4590: 69 6c 65 28 20 72 65 61 6c 76 61 6c 75 65 3e 3d ile( realvalue>=
45a0: 31 30 2e 30 20 26 26 20 65 78 70 3c 3d 33 35 30 10.0 && exp<=350
45b0: 20 29 7b 20 72 65 61 6c 76 61 6c 75 65 20 2a 3d ){ realvalue *=
45c0: 20 30 2e 31 3b 20 65 78 70 2b 2b 3b 20 7d 0a 20 0.1; exp++; }.
45d0: 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 while(
45e0: 72 65 61 6c 76 61 6c 75 65 3c 31 65 2d 38 20 26 realvalue<1e-8 &
45f0: 26 20 65 78 70 3e 3d 2d 33 35 30 20 29 7b 20 72 & exp>=-350 ){ r
4600: 65 61 6c 76 61 6c 75 65 20 2a 3d 20 31 65 38 3b ealvalue *= 1e8;
4610: 20 65 78 70 2d 3d 38 3b 20 7d 0a 20 20 20 20 20 exp-=8; }.
4620: 20 20 20 20 20 77 68 69 6c 65 28 20 72 65 61 6c while( real
4630: 76 61 6c 75 65 3c 31 2e 30 20 26 26 20 65 78 70 value<1.0 && exp
4640: 3e 3d 2d 33 35 30 20 29 7b 20 72 65 61 6c 76 61 >=-350 ){ realva
4650: 6c 75 65 20 2a 3d 20 31 30 2e 30 3b 20 65 78 70 lue *= 10.0; exp
4660: 2d 2d 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 20 --; }.
4670: 69 66 28 20 65 78 70 3e 33 35 30 20 7c 7c 20 65 if( exp>350 || e
4680: 78 70 3c 2d 33 35 30 20 29 7b 0a 20 20 20 20 20 xp<-350 ){.
4690: 20 20 20 20 20 20 20 69 66 28 20 70 72 65 66 69 if( prefi
46a0: 78 3d 3d 27 2d 27 20 29 7b 0a 20 20 20 20 20 20 x=='-' ){.
46b0: 20 20 20 20 20 20 20 20 62 75 66 70 74 20 3d 20 bufpt =
46c0: 22 2d 49 6e 66 22 3b 0a 20 20 20 20 20 20 20 20 "-Inf";.
46d0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 70 72 }else if( pr
46e0: 65 66 69 78 3d 3d 27 2b 27 20 29 7b 0a 20 20 20 efix=='+' ){.
46f0: 20 20 20 20 20 20 20 20 20 20 20 62 75 66 70 74 bufpt
4700: 20 3d 20 22 2b 49 6e 66 22 3b 0a 20 20 20 20 20 = "+Inf";.
4710: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
4720: 20 20 20 20 20 20 20 20 20 20 20 20 62 75 66 70 bufp
4730: 74 20 3d 20 22 49 6e 66 22 3b 0a 20 20 20 20 20 t = "Inf";.
4740: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
4750: 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 73 74 length = st
4760: 72 6c 65 6e 28 62 75 66 70 74 29 3b 0a 20 20 20 rlen(bufpt);.
4770: 20 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a break;.
4780: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 }.
4790: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 62 75 }. bu
47a0: 66 70 74 20 3d 20 62 75 66 3b 0a 20 20 20 20 20 fpt = buf;.
47b0: 20 20 20 2f 2a 0a 20 20 20 20 20 20 20 20 2a 2a /*. **
47c0: 20 49 66 20 74 68 65 20 66 69 65 6c 64 20 74 79 If the field ty
47d0: 70 65 20 69 73 20 65 74 47 45 4e 45 52 49 43 2c pe is etGENERIC,
47e0: 20 74 68 65 6e 20 63 6f 6e 76 65 72 74 20 74 6f then convert to
47f0: 20 65 69 74 68 65 72 20 65 74 45 58 50 0a 20 20 either etEXP.
4800: 20 20 20 20 20 20 2a 2a 20 6f 72 20 65 74 46 4c ** or etFL
4810: 4f 41 54 2c 20 61 73 20 61 70 70 72 6f 70 72 69 OAT, as appropri
4820: 61 74 65 2e 0a 20 20 20 20 20 20 20 20 2a 2f 0a ate.. */.
4830: 20 20 20 20 20 20 20 20 66 6c 61 67 5f 65 78 70 flag_exp
4840: 20 3d 20 78 74 79 70 65 3d 3d 65 74 45 58 50 3b = xtype==etEXP;
4850: 0a 20 20 20 20 20 20 20 20 69 66 28 20 78 74 79 . if( xty
4860: 70 65 21 3d 65 74 46 4c 4f 41 54 20 29 7b 0a 20 pe!=etFLOAT ){.
4870: 20 20 20 20 20 20 20 20 20 72 65 61 6c 76 61 6c realval
4880: 75 65 20 2b 3d 20 72 6f 75 6e 64 65 72 3b 0a 20 ue += rounder;.
4890: 20 20 20 20 20 20 20 20 20 69 66 28 20 72 65 61 if( rea
48a0: 6c 76 61 6c 75 65 3e 3d 31 30 2e 30 20 29 7b 20 lvalue>=10.0 ){
48b0: 72 65 61 6c 76 61 6c 75 65 20 2a 3d 20 30 2e 31 realvalue *= 0.1
48c0: 3b 20 65 78 70 2b 2b 3b 20 7d 0a 20 20 20 20 20 ; exp++; }.
48d0: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 }. if(
48e0: 20 78 74 79 70 65 3d 3d 65 74 47 45 4e 45 52 49 xtype==etGENERI
48f0: 43 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 66 C ){. f
4900: 6c 61 67 5f 72 74 7a 20 3d 20 21 66 6c 61 67 5f lag_rtz = !flag_
4910: 61 6c 74 65 72 6e 61 74 65 66 6f 72 6d 3b 0a 20 alternateform;.
4920: 20 20 20 20 20 20 20 20 20 69 66 28 20 65 78 70 if( exp
4930: 3c 2d 34 20 7c 7c 20 65 78 70 3e 70 72 65 63 69 <-4 || exp>preci
4940: 73 69 6f 6e 20 29 7b 0a 20 20 20 20 20 20 20 20 sion ){.
4950: 20 20 20 20 78 74 79 70 65 20 3d 20 65 74 45 58 xtype = etEX
4960: 50 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 65 6c P;. }el
4970: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 se{.
4980: 70 72 65 63 69 73 69 6f 6e 20 3d 20 70 72 65 63 precision = prec
4990: 69 73 69 6f 6e 20 2d 20 65 78 70 3b 0a 20 20 20 ision - exp;.
49a0: 20 20 20 20 20 20 20 20 20 78 74 79 70 65 20 3d xtype =
49b0: 20 65 74 46 4c 4f 41 54 3b 0a 20 20 20 20 20 20 etFLOAT;.
49c0: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 65 }. }e
49d0: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 66 lse{. f
49e0: 6c 61 67 5f 72 74 7a 20 3d 20 30 3b 0a 20 20 20 lag_rtz = 0;.
49f0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 }. i
4a00: 66 28 20 78 74 79 70 65 3d 3d 65 74 45 58 50 20 f( xtype==etEXP
4a10: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 65 32 20 ){. e2
4a20: 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c = 0;. }el
4a30: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 65 32 se{. e2
4a40: 20 3d 20 65 78 70 3b 0a 20 20 20 20 20 20 20 20 = exp;.
4a50: 7d 0a 20 20 20 20 20 20 20 20 6e 73 64 20 3d 20 }. nsd =
4a60: 30 3b 0a 20 20 20 20 20 20 20 20 66 6c 61 67 5f 0;. flag_
4a70: 64 70 20 3d 20 28 70 72 65 63 69 73 69 6f 6e 3e dp = (precision>
4a80: 30 29 20 7c 20 66 6c 61 67 5f 61 6c 74 65 72 6e 0) | flag_altern
4a90: 61 74 65 66 6f 72 6d 20 7c 20 66 6c 61 67 5f 61 ateform | flag_a
4aa0: 6c 74 66 6f 72 6d 32 3b 0a 20 20 20 20 20 20 20 ltform2;.
4ab0: 20 2f 2a 20 54 68 65 20 73 69 67 6e 20 69 6e 20 /* The sign in
4ac0: 66 72 6f 6e 74 20 6f 66 20 74 68 65 20 6e 75 6d front of the num
4ad0: 62 65 72 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 ber */. i
4ae0: 66 28 20 70 72 65 66 69 78 20 29 7b 0a 20 20 20 f( prefix ){.
4af0: 20 20 20 20 20 20 20 2a 28 62 75 66 70 74 2b 2b *(bufpt++
4b00: 29 20 3d 20 70 72 65 66 69 78 3b 0a 20 20 20 20 ) = prefix;.
4b10: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 2f 2a }. /*
4b20: 20 44 69 67 69 74 73 20 70 72 69 6f 72 20 74 6f Digits prior to
4b30: 20 74 68 65 20 64 65 63 69 6d 61 6c 20 70 6f 69 the decimal poi
4b40: 6e 74 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 nt */. if
4b50: 28 20 65 32 3c 30 20 29 7b 0a 20 20 20 20 20 20 ( e2<0 ){.
4b60: 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d *(bufpt++) =
4b70: 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d 65 '0';. }e
4b80: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 66 lse{. f
4b90: 6f 72 28 3b 20 65 32 3e 3d 30 3b 20 65 32 2d 2d or(; e2>=0; e2--
4ba0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 2a ){. *
4bb0: 28 62 75 66 70 74 2b 2b 29 20 3d 20 65 74 5f 67 (bufpt++) = et_g
4bc0: 65 74 64 69 67 69 74 28 26 72 65 61 6c 76 61 6c etdigit(&realval
4bd0: 75 65 2c 26 6e 73 64 29 3b 0a 20 20 20 20 20 20 ue,&nsd);.
4be0: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a }. }.
4bf0: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 64 /* The d
4c00: 65 63 69 6d 61 6c 20 70 6f 69 6e 74 20 2a 2f 0a ecimal point */.
4c10: 20 20 20 20 20 20 20 20 69 66 28 20 66 6c 61 67 if( flag
4c20: 5f 64 70 20 29 7b 0a 20 20 20 20 20 20 20 20 20 _dp ){.
4c30: 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 27 2e *(bufpt++) = '.
4c40: 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 ';. }.
4c50: 20 20 20 20 20 2f 2a 20 22 30 22 20 64 69 67 69 /* "0" digi
4c60: 74 73 20 61 66 74 65 72 20 74 68 65 20 64 65 63 ts after the dec
4c70: 69 6d 61 6c 20 70 6f 69 6e 74 20 62 75 74 20 62 imal point but b
4c80: 65 66 6f 72 65 20 74 68 65 20 66 69 72 73 74 0a efore the first.
4c90: 20 20 20 20 20 20 20 20 2a 2a 20 73 69 67 6e 69 ** signi
4ca0: 66 69 63 61 6e 74 20 64 69 67 69 74 20 6f 66 20 ficant digit of
4cb0: 74 68 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 the number */.
4cc0: 20 20 20 20 20 20 66 6f 72 28 65 32 2b 2b 3b 20 for(e2++;
4cd0: 65 32 3c 30 20 26 26 20 70 72 65 63 69 73 69 6f e2<0 && precisio
4ce0: 6e 3e 30 3b 20 70 72 65 63 69 73 69 6f 6e 2d 2d n>0; precision--
4cf0: 2c 20 65 32 2b 2b 29 7b 0a 20 20 20 20 20 20 20 , e2++){.
4d00: 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 *(bufpt++) =
4d10: 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 '0';. }.
4d20: 20 20 20 20 20 20 20 2f 2a 20 53 69 67 6e 69 66 /* Signif
4d30: 69 63 61 6e 74 20 64 69 67 69 74 73 20 61 66 74 icant digits aft
4d40: 65 72 20 74 68 65 20 64 65 63 69 6d 61 6c 20 70 er the decimal p
4d50: 6f 69 6e 74 20 2a 2f 0a 20 20 20 20 20 20 20 20 oint */.
4d60: 77 68 69 6c 65 28 20 28 70 72 65 63 69 73 69 6f while( (precisio
4d70: 6e 2d 2d 29 3e 30 20 29 7b 0a 20 20 20 20 20 20 n--)>0 ){.
4d80: 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d *(bufpt++) =
4d90: 20 65 74 5f 67 65 74 64 69 67 69 74 28 26 72 65 et_getdigit(&re
4da0: 61 6c 76 61 6c 75 65 2c 26 6e 73 64 29 3b 0a 20 alvalue,&nsd);.
4db0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
4dc0: 20 2f 2a 20 52 65 6d 6f 76 65 20 74 72 61 69 6c /* Remove trail
4dd0: 69 6e 67 20 7a 65 72 6f 73 20 61 6e 64 20 74 68 ing zeros and th
4de0: 65 20 22 2e 22 20 69 66 20 6e 6f 20 64 69 67 69 e "." if no digi
4df0: 74 73 20 66 6f 6c 6c 6f 77 20 74 68 65 20 22 2e ts follow the ".
4e00: 22 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 28 " */. if(
4e10: 20 66 6c 61 67 5f 72 74 7a 20 26 26 20 66 6c 61 flag_rtz && fla
4e20: 67 5f 64 70 20 29 7b 0a 20 20 20 20 20 20 20 20 g_dp ){.
4e30: 20 20 77 68 69 6c 65 28 20 62 75 66 70 74 5b 2d while( bufpt[-
4e40: 31 5d 3d 3d 27 30 27 20 29 20 2a 28 2d 2d 62 75 1]=='0' ) *(--bu
4e50: 66 70 74 29 20 3d 20 30 3b 0a 20 20 20 20 20 20 fpt) = 0;.
4e60: 20 20 20 20 61 73 73 65 72 74 28 20 62 75 66 70 assert( bufp
4e70: 74 3e 62 75 66 20 29 3b 0a 20 20 20 20 20 20 20 t>buf );.
4e80: 20 20 20 69 66 28 20 62 75 66 70 74 5b 2d 31 5d if( bufpt[-1]
4e90: 3d 3d 27 2e 27 20 29 7b 0a 20 20 20 20 20 20 20 =='.' ){.
4ea0: 20 20 20 20 20 69 66 28 20 66 6c 61 67 5f 61 6c if( flag_al
4eb0: 74 66 6f 72 6d 32 20 29 7b 0a 20 20 20 20 20 20 tform2 ){.
4ec0: 20 20 20 20 20 20 20 20 2a 28 62 75 66 70 74 2b *(bufpt+
4ed0: 2b 29 20 3d 20 27 30 27 3b 0a 20 20 20 20 20 20 +) = '0';.
4ee0: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 }else{.
4ef0: 20 20 20 20 20 20 20 20 20 20 20 2a 28 2d 2d 62 *(--b
4f00: 75 66 70 74 29 20 3d 20 30 3b 0a 20 20 20 20 20 ufpt) = 0;.
4f10: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 }.
4f20: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 }. }.
4f30: 20 20 20 20 20 20 20 2f 2a 20 41 64 64 20 74 68 /* Add th
4f40: 65 20 22 65 4e 4e 4e 22 20 73 75 66 66 69 78 20 e "eNNN" suffix
4f50: 2a 2f 0a 20 20 20 20 20 20 20 20 69 66 28 20 66 */. if( f
4f60: 6c 61 67 5f 65 78 70 20 7c 7c 20 28 78 74 79 70 lag_exp || (xtyp
4f70: 65 3d 3d 65 74 45 58 50 20 26 26 20 65 78 70 29 e==etEXP && exp)
4f80: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 2a 28 ){. *(
4f90: 62 75 66 70 74 2b 2b 29 20 3d 20 61 44 69 67 69 bufpt++) = aDigi
4fa0: 74 73 5b 69 6e 66 6f 70 2d 3e 63 68 61 72 73 65 ts[infop->charse
4fb0: 74 5d 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 t];. if
4fc0: 28 20 65 78 70 3c 30 20 29 7b 0a 20 20 20 20 20 ( exp<0 ){.
4fd0: 20 20 20 20 20 20 20 2a 28 62 75 66 70 74 2b 2b *(bufpt++
4fe0: 29 20 3d 20 27 2d 27 3b 20 65 78 70 20 3d 20 2d ) = '-'; exp = -
4ff0: 65 78 70 3b 0a 20 20 20 20 20 20 20 20 20 20 7d exp;. }
5000: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 else{.
5010: 20 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 27 *(bufpt++) = '
5020: 2b 27 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a +';. }.
5030: 20 20 20 20 20 20 20 20 20 20 69 66 28 20 65 78 if( ex
5040: 70 3e 3d 31 30 30 20 29 7b 0a 20 20 20 20 20 20 p>=100 ){.
5050: 20 20 20 20 20 20 2a 28 62 75 66 70 74 2b 2b 29 *(bufpt++)
5060: 20 3d 20 28 65 78 70 2f 31 30 30 29 2b 27 30 27 = (exp/100)+'0'
5070: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
5080: 20 2f 2a 20 31 30 30 27 73 20 64 69 67 69 74 20 /* 100's digit
5090: 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 */. e
50a0: 78 70 20 25 3d 20 31 30 30 3b 0a 20 20 20 20 20 xp %= 100;.
50b0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 20 }.
50c0: 20 2a 28 62 75 66 70 74 2b 2b 29 20 3d 20 65 78 *(bufpt++) = ex
50d0: 70 2f 31 30 2b 27 30 27 3b 20 20 20 20 20 20 20 p/10+'0';
50e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
50f0: 20 31 30 27 73 20 64 69 67 69 74 20 2a 2f 0a 20 10's digit */.
5100: 20 20 20 20 20 20 20 20 20 2a 28 62 75 66 70 74 *(bufpt
5110: 2b 2b 29 20 3d 20 65 78 70 25 31 30 2b 27 30 27 ++) = exp%10+'0'
5120: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
5130: 20 20 20 20 20 20 2f 2a 20 31 27 73 20 64 69 67 /* 1's dig
5140: 69 74 20 2a 2f 0a 20 20 20 20 20 20 20 20 7d 0a it */. }.
5150: 20 20 20 20 20 20 20 20 2a 62 75 66 70 74 20 3d *bufpt =
5160: 20 30 3b 0a 0a 20 20 20 20 20 20 20 20 2f 2a 20 0;.. /*
5170: 54 68 65 20 63 6f 6e 76 65 72 74 65 64 20 6e 75 The converted nu
5180: 6d 62 65 72 20 69 73 20 69 6e 20 62 75 66 5b 5d mber is in buf[]
5190: 20 61 6e 64 20 7a 65 72 6f 20 74 65 72 6d 69 6e and zero termin
51a0: 61 74 65 64 2e 20 4f 75 74 70 75 74 20 69 74 2e ated. Output it.
51b0: 0a 20 20 20 20 20 20 20 20 2a 2a 20 4e 6f 74 65 . ** Note
51c0: 20 74 68 61 74 20 74 68 65 20 6e 75 6d 62 65 72 that the number
51d0: 20 69 73 20 69 6e 20 74 68 65 20 75 73 75 61 6c is in the usual
51e0: 20 6f 72 64 65 72 2c 20 6e 6f 74 20 72 65 76 65 order, not reve
51f0: 72 73 65 64 20 61 73 20 77 69 74 68 0a 20 20 20 rsed as with.
5200: 20 20 20 20 20 2a 2a 20 69 6e 74 65 67 65 72 20 ** integer
5210: 63 6f 6e 76 65 72 73 69 6f 6e 73 2e 20 2a 2f 0a conversions. */.
5220: 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d length =
5230: 20 62 75 66 70 74 2d 62 75 66 3b 0a 20 20 20 20 bufpt-buf;.
5240: 20 20 20 20 62 75 66 70 74 20 3d 20 62 75 66 3b bufpt = buf;
5250: 0a 0a 20 20 20 20 20 20 20 20 2f 2a 20 53 70 65 .. /* Spe
5260: 63 69 61 6c 20 63 61 73 65 3a 20 20 41 64 64 20 cial case: Add
5270: 6c 65 61 64 69 6e 67 20 7a 65 72 6f 73 20 69 66 leading zeros if
5280: 20 74 68 65 20 66 6c 61 67 5f 7a 65 72 6f 70 61 the flag_zeropa
5290: 64 20 66 6c 61 67 20 69 73 0a 20 20 20 20 20 20 d flag is.
52a0: 20 20 2a 2a 20 73 65 74 20 61 6e 64 20 77 65 20 ** set and we
52b0: 61 72 65 20 6e 6f 74 20 6c 65 66 74 20 6a 75 73 are not left jus
52c0: 74 69 66 69 65 64 20 2a 2f 0a 20 20 20 20 20 20 tified */.
52d0: 20 20 69 66 28 20 66 6c 61 67 5f 7a 65 72 6f 70 if( flag_zerop
52e0: 61 64 20 26 26 20 21 66 6c 61 67 5f 6c 65 66 74 ad && !flag_left
52f0: 6a 75 73 74 69 66 79 20 26 26 20 6c 65 6e 67 74 justify && lengt
5300: 68 20 3c 20 77 69 64 74 68 29 7b 0a 20 20 20 20 h < width){.
5310: 20 20 20 20 20 20 69 6e 74 20 69 3b 0a 20 20 20 int i;.
5320: 20 20 20 20 20 20 20 69 6e 74 20 6e 50 61 64 20 int nPad
5330: 3d 20 77 69 64 74 68 20 2d 20 6c 65 6e 67 74 68 = width - length
5340: 3b 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 28 ;. for(
5350: 69 3d 77 69 64 74 68 3b 20 69 3e 3d 6e 50 61 64 i=width; i>=nPad
5360: 3b 20 69 2d 2d 29 7b 0a 20 20 20 20 20 20 20 20 ; i--){.
5370: 20 20 20 20 62 75 66 70 74 5b 69 5d 20 3d 20 62 bufpt[i] = b
5380: 75 66 70 74 5b 69 2d 6e 50 61 64 5d 3b 0a 20 20 ufpt[i-nPad];.
5390: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 }.
53a0: 20 20 20 20 69 20 3d 20 70 72 65 66 69 78 21 3d i = prefix!=
53b0: 30 3b 0a 20 20 20 20 20 20 20 20 20 20 77 68 69 0;. whi
53c0: 6c 65 28 20 6e 50 61 64 2d 2d 20 29 20 62 75 66 le( nPad-- ) buf
53d0: 70 74 5b 69 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20 pt[i++] = '0';.
53e0: 20 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 length
53f0: 3d 20 77 69 64 74 68 3b 0a 20 20 20 20 20 20 20 = width;.
5400: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 20 20 20 }.#endif.
5410: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 break;. c
5420: 61 73 65 20 65 74 53 49 5a 45 3a 0a 20 20 20 20 ase etSIZE:.
5430: 20 20 20 20 2a 28 76 61 5f 61 72 67 28 61 70 2c *(va_arg(ap,
5440: 69 6e 74 2a 29 29 20 3d 20 70 41 63 63 75 6d 2d int*)) = pAccum-
5450: 3e 6e 43 68 61 72 3b 0a 20 20 20 20 20 20 20 20 >nChar;.
5460: 6c 65 6e 67 74 68 20 3d 20 77 69 64 74 68 20 3d length = width =
5470: 20 30 3b 0a 20 20 20 20 20 20 20 20 62 72 65 61 0;. brea
5480: 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 k;. case et
5490: 50 45 52 43 45 4e 54 3a 0a 20 20 20 20 20 20 20 PERCENT:.
54a0: 20 62 75 66 5b 30 5d 20 3d 20 27 25 27 3b 0a 20 buf[0] = '%';.
54b0: 20 20 20 20 20 20 20 62 75 66 70 74 20 3d 20 62 bufpt = b
54c0: 75 66 3b 0a 20 20 20 20 20 20 20 20 6c 65 6e 67 uf;. leng
54d0: 74 68 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 th = 1;.
54e0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 break;. cas
54f0: 65 20 65 74 43 48 41 52 4c 49 54 3a 0a 20 20 20 e etCHARLIT:.
5500: 20 20 20 63 61 73 65 20 65 74 43 48 41 52 58 3a case etCHARX:
5510: 0a 20 20 20 20 20 20 20 20 63 20 3d 20 62 75 66 . c = buf
5520: 5b 30 5d 20 3d 20 28 78 74 79 70 65 3d 3d 65 74 [0] = (xtype==et
5530: 43 48 41 52 58 20 3f 20 76 61 5f 61 72 67 28 61 CHARX ? va_arg(a
5540: 70 2c 69 6e 74 29 20 3a 20 2a 2b 2b 66 6d 74 29 p,int) : *++fmt)
5550: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 70 72 ;. if( pr
5560: 65 63 69 73 69 6f 6e 3e 3d 30 20 29 7b 0a 20 20 ecision>=0 ){.
5570: 20 20 20 20 20 20 20 20 66 6f 72 28 69 64 78 3d for(idx=
5580: 31 3b 20 69 64 78 3c 70 72 65 63 69 73 69 6f 6e 1; idx<precision
5590: 3b 20 69 64 78 2b 2b 29 20 62 75 66 5b 69 64 78 ; idx++) buf[idx
55a0: 5d 20 3d 20 63 3b 0a 20 20 20 20 20 20 20 20 20 ] = c;.
55b0: 20 6c 65 6e 67 74 68 20 3d 20 70 72 65 63 69 73 length = precis
55c0: 69 6f 6e 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c ion;. }el
55d0: 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 6c 65 se{. le
55e0: 6e 67 74 68 20 3d 31 3b 0a 20 20 20 20 20 20 20 ngth =1;.
55f0: 20 7d 0a 20 20 20 20 20 20 20 20 62 75 66 70 74 }. bufpt
5600: 20 3d 20 62 75 66 3b 0a 20 20 20 20 20 20 20 20 = buf;.
5610: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 break;. cas
5620: 65 20 65 74 53 54 52 49 4e 47 3a 0a 20 20 20 20 e etSTRING:.
5630: 20 20 63 61 73 65 20 65 74 44 59 4e 53 54 52 49 case etDYNSTRI
5640: 4e 47 3a 0a 20 20 20 20 20 20 20 20 62 75 66 70 NG:. bufp
5650: 74 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 63 68 t = va_arg(ap,ch
5660: 61 72 2a 29 3b 0a 20 20 20 20 20 20 20 20 69 66 ar*);. if
5670: 28 20 62 75 66 70 74 3d 3d 30 20 29 7b 0a 20 20 ( bufpt==0 ){.
5680: 20 20 20 20 20 20 20 20 62 75 66 70 74 20 3d 20 bufpt =
5690: 22 22 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 "";. }els
56a0: 65 20 69 66 28 20 78 74 79 70 65 3d 3d 65 74 44 e if( xtype==etD
56b0: 59 4e 53 54 52 49 4e 47 20 29 7b 0a 20 20 20 20 YNSTRING ){.
56c0: 20 20 20 20 20 20 7a 45 78 74 72 61 20 3d 20 62 zExtra = b
56d0: 75 66 70 74 3b 0a 20 20 20 20 20 20 20 20 7d 0a ufpt;. }.
56e0: 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d length =
56f0: 20 73 74 72 6c 65 6e 28 62 75 66 70 74 29 3b 0a strlen(bufpt);.
5700: 20 20 20 20 20 20 20 20 69 66 28 20 70 72 65 63 if( prec
5710: 69 73 69 6f 6e 3e 3d 30 20 26 26 20 70 72 65 63 ision>=0 && prec
5720: 69 73 69 6f 6e 3c 6c 65 6e 67 74 68 20 29 20 6c ision<length ) l
5730: 65 6e 67 74 68 20 3d 20 70 72 65 63 69 73 69 6f ength = precisio
5740: 6e 3b 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b n;. break
5750: 3b 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 53 ;. case etS
5760: 51 4c 45 53 43 41 50 45 3a 0a 20 20 20 20 20 20 QLESCAPE:.
5770: 63 61 73 65 20 65 74 53 51 4c 45 53 43 41 50 45 case etSQLESCAPE
5780: 32 3a 0a 20 20 20 20 20 20 63 61 73 65 20 65 74 2:. case et
5790: 53 51 4c 45 53 43 41 50 45 33 3a 20 7b 0a 20 20 SQLESCAPE3: {.
57a0: 20 20 20 20 20 20 69 6e 74 20 69 2c 20 6a 2c 20 int i, j,
57b0: 6e 2c 20 63 68 2c 20 69 73 6e 75 6c 6c 3b 0a 20 n, ch, isnull;.
57c0: 20 20 20 20 20 20 20 69 6e 74 20 6e 65 65 64 51 int needQ
57d0: 75 6f 74 65 3b 0a 20 20 20 20 20 20 20 20 63 68 uote;. ch
57e0: 61 72 20 71 20 3d 20 28 28 78 74 79 70 65 3d 3d ar q = ((xtype==
57f0: 65 74 53 51 4c 45 53 43 41 50 45 33 29 3f 27 22 etSQLESCAPE3)?'"
5800: 27 3a 27 5c 27 27 29 3b 20 20 20 2f 2a 20 51 75 ':'\''); /* Qu
5810: 6f 74 65 20 63 68 61 72 61 63 74 65 72 20 2a 2f ote character */
5820: 0a 20 20 20 20 20 20 20 20 63 68 61 72 20 2a 65 . char *e
5830: 73 63 61 72 67 20 3d 20 76 61 5f 61 72 67 28 61 scarg = va_arg(a
5840: 70 2c 63 68 61 72 2a 29 3b 0a 20 20 20 20 20 20 p,char*);.
5850: 20 20 69 73 6e 75 6c 6c 20 3d 20 65 73 63 61 72 isnull = escar
5860: 67 3d 3d 30 3b 0a 20 20 20 20 20 20 20 20 69 66 g==0;. if
5870: 28 20 69 73 6e 75 6c 6c 20 29 20 65 73 63 61 72 ( isnull ) escar
5880: 67 20 3d 20 28 78 74 79 70 65 3d 3d 65 74 53 51 g = (xtype==etSQ
5890: 4c 45 53 43 41 50 45 32 20 3f 20 22 4e 55 4c 4c LESCAPE2 ? "NULL
58a0: 22 20 3a 20 22 28 4e 55 4c 4c 29 22 29 3b 0a 20 " : "(NULL)");.
58b0: 20 20 20 20 20 20 20 66 6f 72 28 69 3d 6e 3d 30 for(i=n=0
58c0: 3b 20 28 63 68 3d 65 73 63 61 72 67 5b 69 5d 29 ; (ch=escarg[i])
58d0: 21 3d 30 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 !=0; i++){.
58e0: 20 20 20 20 20 69 66 28 20 63 68 3d 3d 71 20 29 if( ch==q )
58f0: 20 20 6e 2b 2b 3b 0a 20 20 20 20 20 20 20 20 7d n++;. }
5900: 0a 20 20 20 20 20 20 20 20 6e 65 65 64 51 75 6f . needQuo
5910: 74 65 20 3d 20 21 69 73 6e 75 6c 6c 20 26 26 20 te = !isnull &&
5920: 78 74 79 70 65 3d 3d 65 74 53 51 4c 45 53 43 41 xtype==etSQLESCA
5930: 50 45 32 3b 0a 20 20 20 20 20 20 20 20 6e 20 2b PE2;. n +
5940: 3d 20 69 20 2b 20 31 20 2b 20 6e 65 65 64 51 75 = i + 1 + needQu
5950: 6f 74 65 2a 32 3b 0a 20 20 20 20 20 20 20 20 69 ote*2;. i
5960: 66 28 20 6e 3e 65 74 42 55 46 53 49 5a 45 20 29 f( n>etBUFSIZE )
5970: 7b 0a 20 20 20 20 20 20 20 20 20 20 62 75 66 70 {. bufp
5980: 74 20 3d 20 7a 45 78 74 72 61 20 3d 20 73 71 6c t = zExtra = sql
5990: 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 6e 20 29 ite3_malloc( n )
59a0: 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 ;. if(
59b0: 62 75 66 70 74 3d 3d 30 20 29 20 72 65 74 75 72 bufpt==0 ) retur
59c0: 6e 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 n;. }else
59d0: 7b 0a 20 20 20 20 20 20 20 20 20 20 62 75 66 70 {. bufp
59e0: 74 20 3d 20 62 75 66 3b 0a 20 20 20 20 20 20 20 t = buf;.
59f0: 20 7d 0a 20 20 20 20 20 20 20 20 6a 20 3d 20 30 }. j = 0
5a00: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 6e 65 ;. if( ne
5a10: 65 64 51 75 6f 74 65 20 29 20 62 75 66 70 74 5b edQuote ) bufpt[
5a20: 6a 2b 2b 5d 20 3d 20 71 3b 0a 20 20 20 20 20 20 j++] = q;.
5a30: 20 20 66 6f 72 28 69 3d 30 3b 20 28 63 68 3d 65 for(i=0; (ch=e
5a40: 73 63 61 72 67 5b 69 5d 29 21 3d 30 3b 20 69 2b scarg[i])!=0; i+
5a50: 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 62 75 +){. bu
5a60: 66 70 74 5b 6a 2b 2b 5d 20 3d 20 63 68 3b 0a 20 fpt[j++] = ch;.
5a70: 20 20 20 20 20 20 20 20 20 69 66 28 20 63 68 3d if( ch=
5a80: 3d 71 20 29 20 62 75 66 70 74 5b 6a 2b 2b 5d 20 =q ) bufpt[j++]
5a90: 3d 20 63 68 3b 0a 20 20 20 20 20 20 20 20 7d 0a = ch;. }.
5aa0: 20 20 20 20 20 20 20 20 69 66 28 20 6e 65 65 64 if( need
5ab0: 51 75 6f 74 65 20 29 20 62 75 66 70 74 5b 6a 2b Quote ) bufpt[j+
5ac0: 2b 5d 20 3d 20 71 3b 0a 20 20 20 20 20 20 20 20 +] = q;.
5ad0: 62 75 66 70 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 bufpt[j] = 0;.
5ae0: 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 6a length = j
5af0: 3b 0a 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 ;. /* The
5b00: 20 70 72 65 63 69 73 69 6f 6e 20 69 73 20 69 67 precision is ig
5b10: 6e 6f 72 65 64 20 6f 6e 20 25 71 20 61 6e 64 20 nored on %q and
5b20: 25 51 20 2a 2f 0a 20 20 20 20 20 20 20 20 2f 2a %Q */. /*
5b30: 20 69 66 28 20 70 72 65 63 69 73 69 6f 6e 3e 3d if( precision>=
5b40: 30 20 26 26 20 70 72 65 63 69 73 69 6f 6e 3c 6c 0 && precision<l
5b50: 65 6e 67 74 68 20 29 20 6c 65 6e 67 74 68 20 3d ength ) length =
5b60: 20 70 72 65 63 69 73 69 6f 6e 3b 20 2a 2f 0a 20 precision; */.
5b70: 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 break;.
5b80: 20 20 20 20 7d 0a 20 20 20 20 20 20 63 61 73 65 }. case
5b90: 20 65 74 54 4f 4b 45 4e 3a 20 7b 0a 20 20 20 20 etTOKEN: {.
5ba0: 20 20 20 20 54 6f 6b 65 6e 20 2a 70 54 6f 6b 65 Token *pToke
5bb0: 6e 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 20 54 n = va_arg(ap, T
5bc0: 6f 6b 65 6e 2a 29 3b 0a 20 20 20 20 20 20 20 20 oken*);.
5bd0: 69 66 28 20 70 54 6f 6b 65 6e 20 26 26 20 70 54 if( pToken && pT
5be0: 6f 6b 65 6e 2d 3e 7a 20 29 7b 0a 20 20 20 20 20 oken->z ){.
5bf0: 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 sqlite3StrA
5c00: 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 ccumAppend(pAccu
5c10: 6d 2c 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 m, (const char*)
5c20: 70 54 6f 6b 65 6e 2d 3e 7a 2c 20 70 54 6f 6b 65 pToken->z, pToke
5c30: 6e 2d 3e 6e 29 3b 0a 20 20 20 20 20 20 20 20 7d n->n);. }
5c40: 0a 20 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 . length
5c50: 3d 20 77 69 64 74 68 20 3d 20 30 3b 0a 20 20 20 = width = 0;.
5c60: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 break;.
5c70: 20 20 7d 0a 20 20 20 20 20 20 63 61 73 65 20 65 }. case e
5c80: 74 53 52 43 4c 49 53 54 3a 20 7b 0a 20 20 20 20 tSRCLIST: {.
5c90: 20 20 20 20 53 72 63 4c 69 73 74 20 2a 70 53 72 SrcList *pSr
5ca0: 63 20 3d 20 76 61 5f 61 72 67 28 61 70 2c 20 53 c = va_arg(ap, S
5cb0: 72 63 4c 69 73 74 2a 29 3b 0a 20 20 20 20 20 20 rcList*);.
5cc0: 20 20 69 6e 74 20 6b 20 3d 20 76 61 5f 61 72 67 int k = va_arg
5cd0: 28 61 70 2c 20 69 6e 74 29 3b 0a 20 20 20 20 20 (ap, int);.
5ce0: 20 20 20 73 74 72 75 63 74 20 53 72 63 4c 69 73 struct SrcLis
5cf0: 74 5f 69 74 65 6d 20 2a 70 49 74 65 6d 20 3d 20 t_item *pItem =
5d00: 26 70 53 72 63 2d 3e 61 5b 6b 5d 3b 0a 20 20 20 &pSrc->a[k];.
5d10: 20 20 20 20 20 61 73 73 65 72 74 28 20 6b 3e 3d assert( k>=
5d20: 30 20 26 26 20 6b 3c 70 53 72 63 2d 3e 6e 53 72 0 && k<pSrc->nSr
5d30: 63 20 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 c );. if(
5d40: 20 70 49 74 65 6d 2d 3e 7a 44 61 74 61 62 61 73 pItem->zDatabas
5d50: 65 20 26 26 20 70 49 74 65 6d 2d 3e 7a 44 61 74 e && pItem->zDat
5d60: 61 62 61 73 65 5b 30 5d 20 29 7b 0a 20 20 20 20 abase[0] ){.
5d70: 20 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72 sqlite3Str
5d80: 41 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63 AccumAppend(pAcc
5d90: 75 6d 2c 20 70 49 74 65 6d 2d 3e 7a 44 61 74 61 um, pItem->zData
5da0: 62 61 73 65 2c 20 2d 31 29 3b 0a 20 20 20 20 20 base, -1);.
5db0: 20 20 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 sqlite3StrA
5dc0: 63 63 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 ccumAppend(pAccu
5dd0: 6d 2c 20 22 2e 22 2c 20 31 29 3b 0a 20 20 20 20 m, ".", 1);.
5de0: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 73 71 }. sq
5df0: 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41 70 70 lite3StrAccumApp
5e00: 65 6e 64 28 70 41 63 63 75 6d 2c 20 70 49 74 65 end(pAccum, pIte
5e10: 6d 2d 3e 7a 4e 61 6d 65 2c 20 2d 31 29 3b 0a 20 m->zName, -1);.
5e20: 20 20 20 20 20 20 20 6c 65 6e 67 74 68 20 3d 20 length =
5e30: 77 69 64 74 68 20 3d 20 30 3b 0a 20 20 20 20 20 width = 0;.
5e40: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 break;.
5e50: 7d 0a 20 20 20 20 7d 2f 2a 20 45 6e 64 20 73 77 }. }/* End sw
5e60: 69 74 63 68 20 6f 76 65 72 20 74 68 65 20 66 6f itch over the fo
5e70: 72 6d 61 74 20 74 79 70 65 20 2a 2f 0a 20 20 20 rmat type */.
5e80: 20 2f 2a 0a 20 20 20 20 2a 2a 20 54 68 65 20 74 /*. ** The t
5e90: 65 78 74 20 6f 66 20 74 68 65 20 63 6f 6e 76 65 ext of the conve
5ea0: 72 73 69 6f 6e 20 69 73 20 70 6f 69 6e 74 65 64 rsion is pointed
5eb0: 20 74 6f 20 62 79 20 22 62 75 66 70 74 22 20 61 to by "bufpt" a
5ec0: 6e 64 20 69 73 0a 20 20 20 20 2a 2a 20 22 6c 65 nd is. ** "le
5ed0: 6e 67 74 68 22 20 63 68 61 72 61 63 74 65 72 73 ngth" characters
5ee0: 20 6c 6f 6e 67 2e 20 20 54 68 65 20 66 69 65 6c long. The fiel
5ef0: 64 20 77 69 64 74 68 20 69 73 20 22 77 69 64 74 d width is "widt
5f00: 68 22 2e 20 20 44 6f 0a 20 20 20 20 2a 2a 20 74 h". Do. ** t
5f10: 68 65 20 6f 75 74 70 75 74 2e 0a 20 20 20 20 2a he output.. *
5f20: 2f 0a 20 20 20 20 69 66 28 20 21 66 6c 61 67 5f /. if( !flag_
5f30: 6c 65 66 74 6a 75 73 74 69 66 79 20 29 7b 0a 20 leftjustify ){.
5f40: 20 20 20 20 20 72 65 67 69 73 74 65 72 20 69 6e register in
5f50: 74 20 6e 73 70 61 63 65 3b 0a 20 20 20 20 20 20 t nspace;.
5f60: 6e 73 70 61 63 65 20 3d 20 77 69 64 74 68 2d 6c nspace = width-l
5f70: 65 6e 67 74 68 3b 0a 20 20 20 20 20 20 69 66 28 ength;. if(
5f80: 20 6e 73 70 61 63 65 3e 30 20 29 7b 0a 20 20 20 nspace>0 ){.
5f90: 20 20 20 20 20 61 70 70 65 6e 64 53 70 61 63 65 appendSpace
5fa0: 28 70 41 63 63 75 6d 2c 20 6e 73 70 61 63 65 29 (pAccum, nspace)
5fb0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a ;. }. }.
5fc0: 20 20 20 20 69 66 28 20 6c 65 6e 67 74 68 3e 30 if( length>0
5fd0: 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 ){. sqlite
5fe0: 33 53 74 72 41 63 63 75 6d 41 70 70 65 6e 64 28 3StrAccumAppend(
5ff0: 70 41 63 63 75 6d 2c 20 62 75 66 70 74 2c 20 6c pAccum, bufpt, l
6000: 65 6e 67 74 68 29 3b 0a 20 20 20 20 7d 0a 20 20 ength);. }.
6010: 20 20 69 66 28 20 66 6c 61 67 5f 6c 65 66 74 6a if( flag_leftj
6020: 75 73 74 69 66 79 20 29 7b 0a 20 20 20 20 20 20 ustify ){.
6030: 72 65 67 69 73 74 65 72 20 69 6e 74 20 6e 73 70 register int nsp
6040: 61 63 65 3b 0a 20 20 20 20 20 20 6e 73 70 61 63 ace;. nspac
6050: 65 20 3d 20 77 69 64 74 68 2d 6c 65 6e 67 74 68 e = width-length
6060: 3b 0a 20 20 20 20 20 20 69 66 28 20 6e 73 70 61 ;. if( nspa
6070: 63 65 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 ce>0 ){.
6080: 61 70 70 65 6e 64 53 70 61 63 65 28 70 41 63 63 appendSpace(pAcc
6090: 75 6d 2c 20 6e 73 70 61 63 65 29 3b 0a 20 20 20 um, nspace);.
60a0: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 }. }. i
60b0: 66 28 20 7a 45 78 74 72 61 20 29 7b 0a 20 20 20 f( zExtra ){.
60c0: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 sqlite3_free(
60d0: 7a 45 78 74 72 61 29 3b 0a 20 20 20 20 7d 0a 20 zExtra);. }.
60e0: 20 7d 2f 2a 20 45 6e 64 20 66 6f 72 20 6c 6f 6f }/* End for loo
60f0: 70 20 6f 76 65 72 20 74 68 65 20 66 6f 72 6d 61 p over the forma
6100: 74 20 73 74 72 69 6e 67 20 2a 2f 0a 7d 20 2f 2a t string */.} /*
6110: 20 45 6e 64 20 6f 66 20 66 75 6e 63 74 69 6f 6e End of function
6120: 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 70 70 65 6e */../*.** Appen
6130: 64 20 4e 20 62 79 74 65 73 20 6f 66 20 74 65 78 d N bytes of tex
6140: 74 20 66 72 6f 6d 20 7a 20 74 6f 20 74 68 65 20 t from z to the
6150: 53 74 72 41 63 63 75 6d 20 6f 62 6a 65 63 74 2e StrAccum object.
6160: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 .*/.void sqlite3
6170: 53 74 72 41 63 63 75 6d 41 70 70 65 6e 64 28 53 StrAccumAppend(S
6180: 74 72 41 63 63 75 6d 20 2a 70 2c 20 63 6f 6e 73 trAccum *p, cons
6190: 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e 74 20 4e t char *z, int N
61a0: 29 7b 0a 20 20 69 66 28 20 70 2d 3e 74 6f 6f 42 ){. if( p->tooB
61b0: 69 67 20 7c 20 70 2d 3e 6d 61 6c 6c 6f 63 46 61 ig | p->mallocFa
61c0: 69 6c 65 64 20 29 7b 0a 20 20 20 20 72 65 74 75 iled ){. retu
61d0: 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 4e 3c rn;. }. if( N<
61e0: 30 20 29 7b 0a 20 20 20 20 4e 20 3d 20 73 74 72 0 ){. N = str
61f0: 6c 65 6e 28 7a 29 3b 0a 20 20 7d 0a 20 20 69 66 len(z);. }. if
6200: 28 20 4e 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 ( N==0 ){. re
6210: 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 turn;. }. if(
6220: 70 2d 3e 6e 43 68 61 72 2b 4e 20 3e 3d 20 70 2d p->nChar+N >= p-
6230: 3e 6e 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 63 >nAlloc ){. c
6240: 68 61 72 20 2a 7a 4e 65 77 3b 0a 20 20 20 20 69 har *zNew;. i
6250: 66 28 20 21 70 2d 3e 75 73 65 4d 61 6c 6c 6f 63 f( !p->useMalloc
6260: 20 29 7b 0a 20 20 20 20 20 20 70 2d 3e 74 6f 6f ){. p->too
6270: 42 69 67 20 3d 20 31 3b 0a 20 20 20 20 20 20 4e Big = 1;. N
6280: 20 3d 20 70 2d 3e 6e 41 6c 6c 6f 63 20 2d 20 70 = p->nAlloc - p
6290: 2d 3e 6e 43 68 61 72 20 2d 20 31 3b 0a 20 20 20 ->nChar - 1;.
62a0: 20 20 20 69 66 28 20 4e 3c 3d 30 20 29 7b 0a 20 if( N<=0 ){.
62b0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 return;.
62c0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 }. }else
62d0: 7b 0a 20 20 20 20 20 20 70 2d 3e 6e 41 6c 6c 6f {. p->nAllo
62e0: 63 20 2b 3d 20 70 2d 3e 6e 41 6c 6c 6f 63 20 2b c += p->nAlloc +
62f0: 20 4e 20 2b 20 31 3b 0a 20 20 20 20 20 20 69 66 N + 1;. if
6300: 28 20 70 2d 3e 6e 41 6c 6c 6f 63 20 3e 20 53 51 ( p->nAlloc > SQ
6310: 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e 47 54 48 20 LITE_MAX_LENGTH
6320: 29 7b 0a 20 20 20 20 20 20 20 20 70 2d 3e 6e 41 ){. p->nA
6330: 6c 6c 6f 63 20 3d 20 53 51 4c 49 54 45 5f 4d 41 lloc = SQLITE_MA
6340: 58 5f 4c 45 4e 47 54 48 3b 0a 20 20 20 20 20 20 X_LENGTH;.
6350: 20 20 69 66 28 20 70 2d 3e 6e 43 68 61 72 2b 4e if( p->nChar+N
6360: 20 3e 3d 20 70 2d 3e 6e 41 6c 6c 6f 63 20 29 7b >= p->nAlloc ){
6370: 0a 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 . sqlit
6380: 65 33 53 74 72 41 63 63 75 6d 52 65 73 65 74 28 e3StrAccumReset(
6390: 70 29 3b 0a 20 20 20 20 20 20 20 20 20 20 70 2d p);. p-
63a0: 3e 74 6f 6f 42 69 67 20 3d 20 31 3b 0a 20 20 20 >tooBig = 1;.
63b0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 return;.
63c0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d }. }
63d0: 0a 20 20 20 20 20 20 7a 4e 65 77 20 3d 20 73 71 . zNew = sq
63e0: 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 70 2d lite3_malloc( p-
63f0: 3e 6e 41 6c 6c 6f 63 20 29 3b 0a 20 20 20 20 20 >nAlloc );.
6400: 20 69 66 28 20 7a 4e 65 77 20 29 7b 0a 20 20 20 if( zNew ){.
6410: 20 20 20 20 20 6d 65 6d 63 70 79 28 7a 4e 65 77 memcpy(zNew
6420: 2c 20 70 2d 3e 7a 54 65 78 74 2c 20 70 2d 3e 6e , p->zText, p->n
6430: 43 68 61 72 29 3b 0a 20 20 20 20 20 20 20 20 73 Char);. s
6440: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 52 65 qlite3StrAccumRe
6450: 73 65 74 28 70 29 3b 0a 20 20 20 20 20 20 20 20 set(p);.
6460: 70 2d 3e 7a 54 65 78 74 20 3d 20 7a 4e 65 77 3b p->zText = zNew;
6470: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 . }else{.
6480: 20 20 20 20 20 20 70 2d 3e 6d 61 6c 6c 6f 63 46 p->mallocF
6490: 61 69 6c 65 64 20 3d 20 31 3b 0a 20 20 20 20 20 ailed = 1;.
64a0: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 sqlite3StrAcc
64b0: 75 6d 52 65 73 65 74 28 70 29 3b 0a 20 20 20 20 umReset(p);.
64c0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 return;.
64d0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 }. }. }.
64e0: 6d 65 6d 63 70 79 28 26 70 2d 3e 7a 54 65 78 74 memcpy(&p->zText
64f0: 5b 70 2d 3e 6e 43 68 61 72 5d 2c 20 7a 2c 20 4e [p->nChar], z, N
6500: 29 3b 0a 20 20 70 2d 3e 6e 43 68 61 72 20 2b 3d );. p->nChar +=
6510: 20 4e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 46 69 6e N;.}../*.** Fin
6520: 69 73 68 20 6f 66 66 20 61 20 73 74 72 69 6e 67 ish off a string
6530: 20 62 79 20 6d 61 6b 69 6e 67 20 73 75 72 65 20 by making sure
6540: 69 74 20 69 73 20 7a 65 72 6f 2d 74 65 72 6d 69 it is zero-termi
6550: 6e 61 74 65 64 2e 0a 2a 2a 20 52 65 74 75 72 6e nated..** Return
6560: 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 a pointer to th
6570: 65 20 72 65 73 75 6c 74 69 6e 67 20 73 74 72 69 e resulting stri
6580: 6e 67 2e 20 20 52 65 74 75 72 6e 20 61 20 4e 55 ng. Return a NU
6590: 4c 4c 0a 2a 2a 20 70 6f 69 6e 74 65 72 20 69 66 LL.** pointer if
65a0: 20 61 6e 79 20 6b 69 6e 64 20 6f 66 20 65 72 72 any kind of err
65b0: 6f 72 20 77 61 73 20 65 6e 63 6f 75 6e 74 65 72 or was encounter
65c0: 65 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c ed..*/.char *sql
65d0: 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 ite3StrAccumFini
65e0: 73 68 28 53 74 72 41 63 63 75 6d 20 2a 70 29 7b sh(StrAccum *p){
65f0: 0a 20 20 69 66 28 20 70 2d 3e 7a 54 65 78 74 20 . if( p->zText
6600: 29 7b 0a 20 20 20 20 70 2d 3e 7a 54 65 78 74 5b ){. p->zText[
6610: 70 2d 3e 6e 43 68 61 72 5d 20 3d 20 30 3b 0a 20 p->nChar] = 0;.
6620: 20 20 20 69 66 28 20 70 2d 3e 75 73 65 4d 61 6c if( p->useMal
6630: 6c 6f 63 20 26 26 20 70 2d 3e 7a 54 65 78 74 3d loc && p->zText=
6640: 3d 70 2d 3e 7a 42 61 73 65 20 29 7b 0a 20 20 20 =p->zBase ){.
6650: 20 20 20 70 2d 3e 7a 54 65 78 74 20 3d 20 73 71 p->zText = sq
6660: 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 70 2d lite3_malloc( p-
6670: 3e 6e 43 68 61 72 2b 31 20 29 3b 0a 20 20 20 20 >nChar+1 );.
6680: 20 20 69 66 28 20 70 2d 3e 7a 54 65 78 74 20 29 if( p->zText )
6690: 7b 0a 20 20 20 20 20 20 20 20 6d 65 6d 63 70 79 {. memcpy
66a0: 28 70 2d 3e 7a 54 65 78 74 2c 20 70 2d 3e 7a 42 (p->zText, p->zB
66b0: 61 73 65 2c 20 70 2d 3e 6e 43 68 61 72 2b 31 29 ase, p->nChar+1)
66c0: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 ;. }else{.
66d0: 20 20 20 20 20 20 20 70 2d 3e 6d 61 6c 6c 6f 63 p->malloc
66e0: 46 61 69 6c 65 64 20 3d 20 31 3b 0a 20 20 20 20 Failed = 1;.
66f0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 }. }. }.
6700: 72 65 74 75 72 6e 20 70 2d 3e 7a 54 65 78 74 3b return p->zText;
6710: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 73 65 74 20 .}../*.** Reset
6720: 61 6e 20 53 74 72 41 63 63 75 6d 20 73 74 72 69 an StrAccum stri
6730: 6e 67 2e 20 20 52 65 63 6c 61 69 6d 20 61 6c 6c ng. Reclaim all
6740: 20 6d 61 6c 6c 6f 63 65 64 20 6d 65 6d 6f 72 79 malloced memory
6750: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 ..*/.void sqlite
6760: 33 53 74 72 41 63 63 75 6d 52 65 73 65 74 28 53 3StrAccumReset(S
6770: 74 72 41 63 63 75 6d 20 2a 70 29 7b 0a 20 20 69 trAccum *p){. i
6780: 66 28 20 70 2d 3e 7a 54 65 78 74 21 3d 70 2d 3e f( p->zText!=p->
6790: 7a 42 61 73 65 20 29 7b 0a 20 20 20 20 73 71 6c zBase ){. sql
67a0: 69 74 65 33 5f 66 72 65 65 28 70 2d 3e 7a 54 65 ite3_free(p->zTe
67b0: 78 74 29 3b 0a 20 20 20 20 70 2d 3e 7a 54 65 78 xt);. p->zTex
67c0: 74 20 3d 20 30 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a t = 0;. }.}../*
67d0: 0a 2a 2a 20 49 6e 69 74 69 61 6c 69 7a 65 20 61 .** Initialize a
67e0: 20 73 74 72 69 6e 67 20 61 63 63 75 6d 75 6c 61 string accumula
67f0: 74 6f 72 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f tor.*/.static vo
6800: 69 64 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 id sqlite3StrAcc
6810: 75 6d 49 6e 69 74 28 53 74 72 41 63 63 75 6d 20 umInit(StrAccum
6820: 2a 70 2c 20 63 68 61 72 20 2a 7a 42 61 73 65 2c *p, char *zBase,
6830: 20 69 6e 74 20 6e 29 7b 0a 20 20 70 2d 3e 7a 54 int n){. p->zT
6840: 65 78 74 20 3d 20 70 2d 3e 7a 42 61 73 65 20 3d ext = p->zBase =
6850: 20 7a 42 61 73 65 3b 0a 20 20 70 2d 3e 6e 43 68 zBase;. p->nCh
6860: 61 72 20 3d 20 30 3b 0a 20 20 70 2d 3e 6e 41 6c ar = 0;. p->nAl
6870: 6c 6f 63 20 3d 20 6e 3b 0a 20 20 70 2d 3e 75 73 loc = n;. p->us
6880: 65 4d 61 6c 6c 6f 63 20 3d 20 31 3b 0a 20 20 70 eMalloc = 1;. p
6890: 2d 3e 74 6f 6f 42 69 67 20 3d 20 30 3b 0a 20 20 ->tooBig = 0;.
68a0: 70 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 p->mallocFailed
68b0: 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 = 0;.}../*.** Pr
68c0: 69 6e 74 20 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 int into memory
68d0: 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 73 71 obtained from sq
68e0: 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 2e 20 20 55 liteMalloc(). U
68f0: 73 65 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 0a se the internal.
6900: 2a 2a 20 25 2d 63 6f 6e 76 65 72 73 69 6f 6e 20 ** %-conversion
6910: 65 78 74 65 6e 73 69 6f 6e 73 2e 0a 2a 2f 0a 63 extensions..*/.c
6920: 68 61 72 20 2a 73 71 6c 69 74 65 33 56 4d 50 72 har *sqlite3VMPr
6930: 69 6e 74 66 28 73 71 6c 69 74 65 33 20 2a 64 62 intf(sqlite3 *db
6940: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 , const char *zF
6950: 6f 72 6d 61 74 2c 20 76 61 5f 6c 69 73 74 20 61 ormat, va_list a
6960: 70 29 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 0a 20 p){. char *z;.
6970: 20 63 68 61 72 20 7a 42 61 73 65 5b 53 51 4c 49 char zBase[SQLI
6980: 54 45 5f 50 52 49 4e 54 5f 42 55 46 5f 53 49 5a TE_PRINT_BUF_SIZ
6990: 45 5d 3b 0a 20 20 53 74 72 41 63 63 75 6d 20 61 E];. StrAccum a
69a0: 63 63 3b 0a 20 20 73 71 6c 69 74 65 33 53 74 72 cc;. sqlite3Str
69b0: 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c 20 AccumInit(&acc,
69c0: 7a 42 61 73 65 2c 20 73 69 7a 65 6f 66 28 7a 42 zBase, sizeof(zB
69d0: 61 73 65 29 29 3b 0a 20 20 76 78 70 72 69 6e 74 ase));. vxprint
69e0: 66 28 26 61 63 63 2c 20 31 2c 20 7a 46 6f 72 6d f(&acc, 1, zForm
69f0: 61 74 2c 20 61 70 29 3b 0a 20 20 7a 20 3d 20 73 at, ap);. z = s
6a00: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 qlite3StrAccumFi
6a10: 6e 69 73 68 28 26 61 63 63 29 3b 0a 20 20 69 66 nish(&acc);. if
6a20: 28 20 61 63 63 2e 6d 61 6c 6c 6f 63 46 61 69 6c ( acc.mallocFail
6a30: 65 64 20 26 26 20 64 62 20 29 7b 0a 20 20 20 20 ed && db ){.
6a40: 64 62 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 db->mallocFailed
6a50: 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 = 1;. }. retu
6a60: 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 rn z;.}../*.** P
6a70: 72 69 6e 74 20 69 6e 74 6f 20 6d 65 6d 6f 72 79 rint into memory
6a80: 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 73 obtained from s
6a90: 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 2e 20 20 qliteMalloc().
6aa0: 55 73 65 20 74 68 65 20 69 6e 74 65 72 6e 61 6c Use the internal
6ab0: 0a 2a 2a 20 25 2d 63 6f 6e 76 65 72 73 69 6f 6e .** %-conversion
6ac0: 20 65 78 74 65 6e 73 69 6f 6e 73 2e 0a 2a 2f 0a extensions..*/.
6ad0: 63 68 61 72 20 2a 73 71 6c 69 74 65 33 4d 50 72 char *sqlite3MPr
6ae0: 69 6e 74 66 28 73 71 6c 69 74 65 33 20 2a 64 62 intf(sqlite3 *db
6af0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 , const char *zF
6b00: 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 ormat, ...){. v
6b10: 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61 a_list ap;. cha
6b20: 72 20 2a 7a 3b 0a 20 20 76 61 5f 73 74 61 72 74 r *z;. va_start
6b30: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 (ap, zFormat);.
6b40: 20 7a 20 3d 20 73 71 6c 69 74 65 33 56 4d 50 72 z = sqlite3VMPr
6b50: 69 6e 74 66 28 64 62 2c 20 7a 46 6f 72 6d 61 74 intf(db, zFormat
6b60: 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 , ap);. va_end(
6b70: 61 70 29 3b 0a 20 20 72 65 74 75 72 6e 20 7a 3b ap);. return z;
6b80: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 69 6e 74 20 .}../*.** Print
6b90: 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 6f 62 74 61 into memory obta
6ba0: 69 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 ined from sqlite
6bb0: 33 5f 6d 61 6c 6c 6f 63 28 29 2e 20 20 4f 6d 69 3_malloc(). Omi
6bc0: 74 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 0a 2a t the internal.*
6bd0: 2a 20 25 2d 63 6f 6e 76 65 72 73 69 6f 6e 20 65 * %-conversion e
6be0: 78 74 65 6e 73 69 6f 6e 73 2e 0a 2a 2f 0a 63 68 xtensions..*/.ch
6bf0: 61 72 20 2a 73 71 6c 69 74 65 33 5f 76 6d 70 72 ar *sqlite3_vmpr
6c00: 69 6e 74 66 28 63 6f 6e 73 74 20 63 68 61 72 20 intf(const char
6c10: 2a 7a 46 6f 72 6d 61 74 2c 20 76 61 5f 6c 69 73 *zFormat, va_lis
6c20: 74 20 61 70 29 7b 0a 20 20 63 68 61 72 20 2a 7a t ap){. char *z
6c30: 3b 0a 20 20 63 68 61 72 20 7a 42 61 73 65 5b 53 ;. char zBase[S
6c40: 51 4c 49 54 45 5f 50 52 49 4e 54 5f 42 55 46 5f QLITE_PRINT_BUF_
6c50: 53 49 5a 45 5d 3b 0a 20 20 53 74 72 41 63 63 75 SIZE];. StrAccu
6c60: 6d 20 61 63 63 3b 0a 20 20 73 71 6c 69 74 65 33 m acc;. sqlite3
6c70: 53 74 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 StrAccumInit(&ac
6c80: 63 2c 20 7a 42 61 73 65 2c 20 73 69 7a 65 6f 66 c, zBase, sizeof
6c90: 28 7a 42 61 73 65 29 29 3b 0a 20 20 76 78 70 72 (zBase));. vxpr
6ca0: 69 6e 74 66 28 26 61 63 63 2c 20 30 2c 20 7a 46 intf(&acc, 0, zF
6cb0: 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 7a 20 ormat, ap);. z
6cc0: 3d 20 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 = sqlite3StrAccu
6cd0: 6d 46 69 6e 69 73 68 28 26 61 63 63 29 3b 0a 20 mFinish(&acc);.
6ce0: 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a return z;.}../*
6cf0: 0a 2a 2a 20 50 72 69 6e 74 20 69 6e 74 6f 20 6d .** Print into m
6d00: 65 6d 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 66 emory obtained f
6d10: 72 6f 6d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c rom sqlite3_mall
6d20: 6f 63 28 29 28 29 2e 20 20 4f 6d 69 74 20 74 68 oc()(). Omit th
6d30: 65 20 69 6e 74 65 72 6e 61 6c 0a 2a 2a 20 25 2d e internal.** %-
6d40: 63 6f 6e 76 65 72 73 69 6f 6e 20 65 78 74 65 6e conversion exten
6d50: 73 69 6f 6e 73 2e 0a 2a 2f 0a 63 68 61 72 20 2a sions..*/.char *
6d60: 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 sqlite3_mprintf(
6d70: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 const char *zFor
6d80: 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f mat, ...){. va_
6d90: 6c 69 73 74 20 61 70 3b 0a 20 20 63 68 61 72 20 list ap;. char
6da0: 2a 7a 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 *z;. va_start(a
6db0: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 7a p, zFormat);. z
6dc0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 6d 70 72 69 = sqlite3_vmpri
6dd0: 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20 61 70 29 ntf(zFormat, ap)
6de0: 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a ;. va_end(ap);.
6df0: 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f return z;.}../
6e00: 2a 0a 2a 2a 20 73 71 6c 69 74 65 33 5f 73 6e 70 *.** sqlite3_snp
6e10: 72 69 6e 74 66 28 29 20 77 6f 72 6b 73 20 6c 69 rintf() works li
6e20: 6b 65 20 73 6e 70 72 69 6e 74 66 28 29 20 65 78 ke snprintf() ex
6e30: 63 65 70 74 20 74 68 61 74 20 69 74 20 69 67 6e cept that it ign
6e40: 6f 72 65 73 20 74 68 65 0a 2a 2a 20 63 75 72 72 ores the.** curr
6e50: 65 6e 74 20 6c 6f 63 61 6c 65 20 73 65 74 74 69 ent locale setti
6e60: 6e 67 73 2e 20 20 54 68 69 73 20 69 73 20 69 6d ngs. This is im
6e70: 70 6f 72 74 61 6e 74 20 66 6f 72 20 53 51 4c 69 portant for SQLi
6e80: 74 65 20 62 65 63 61 75 73 65 20 77 65 0a 2a 2a te because we.**
6e90: 20 61 72 65 20 6e 6f 74 20 61 62 6c 65 20 74 6f are not able to
6ea0: 20 75 73 65 20 61 20 22 2c 22 20 61 73 20 74 68 use a "," as th
6eb0: 65 20 64 65 63 69 6d 61 6c 20 70 6f 69 6e 74 20 e decimal point
6ec0: 69 6e 20 70 6c 61 63 65 20 6f 66 20 22 2e 22 20 in place of "."
6ed0: 61 73 0a 2a 2a 20 73 70 65 63 69 66 69 65 64 20 as.** specified
6ee0: 62 79 20 73 6f 6d 65 20 6c 6f 63 61 6c 65 73 2e by some locales.
6ef0: 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 .*/.char *sqlite
6f00: 33 5f 73 6e 70 72 69 6e 74 66 28 69 6e 74 20 6e 3_snprintf(int n
6f10: 2c 20 63 68 61 72 20 2a 7a 42 75 66 2c 20 63 6f , char *zBuf, co
6f20: 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 nst char *zForma
6f30: 74 2c 20 2e 2e 2e 29 7b 0a 20 20 63 68 61 72 20 t, ...){. char
6f40: 2a 7a 3b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 *z;. va_list ap
6f50: 3b 0a 20 20 53 74 72 41 63 63 75 6d 20 61 63 63 ;. StrAccum acc
6f60: 3b 0a 0a 20 20 69 66 28 20 6e 3c 3d 30 20 29 7b ;.. if( n<=0 ){
6f70: 0a 20 20 20 20 72 65 74 75 72 6e 20 7a 42 75 66 . return zBuf
6f80: 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 53 ;. }. sqlite3S
6f90: 74 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 trAccumInit(&acc
6fa0: 2c 20 7a 42 75 66 2c 20 6e 29 3b 0a 20 20 61 63 , zBuf, n);. ac
6fb0: 63 2e 75 73 65 4d 61 6c 6c 6f 63 20 3d 20 30 3b c.useMalloc = 0;
6fc0: 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 7a . va_start(ap,z
6fd0: 46 6f 72 6d 61 74 29 3b 0a 20 20 76 78 70 72 69 Format);. vxpri
6fe0: 6e 74 66 28 26 61 63 63 2c 20 30 2c 20 7a 46 6f ntf(&acc, 0, zFo
6ff0: 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61 5f rmat, ap);. va_
7000: 65 6e 64 28 61 70 29 3b 0a 20 20 7a 20 3d 20 73 end(ap);. z = s
7010: 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 46 69 qlite3StrAccumFi
7020: 6e 69 73 68 28 26 61 63 63 29 3b 0a 20 20 72 65 nish(&acc);. re
7030: 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 23 69 66 20 64 turn z;.}..#if d
7040: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 54 45 efined(SQLITE_TE
7050: 53 54 29 20 7c 7c 20 64 65 66 69 6e 65 64 28 53 ST) || defined(S
7060: 51 4c 49 54 45 5f 44 45 42 55 47 29 20 7c 7c 20 QLITE_DEBUG) ||
7070: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 4d defined(SQLITE_M
7080: 45 4d 44 45 42 55 47 29 0a 2f 2a 0a 2a 2a 20 41 EMDEBUG)./*.** A
7090: 20 76 65 72 73 69 6f 6e 20 6f 66 20 70 72 69 6e version of prin
70a0: 74 66 28 29 20 74 68 61 74 20 75 6e 64 65 72 73 tf() that unders
70b0: 74 61 6e 64 73 20 25 6c 6c 64 2e 20 20 55 73 65 tands %lld. Use
70c0: 64 20 66 6f 72 20 64 65 62 75 67 67 69 6e 67 2e d for debugging.
70d0: 0a 2a 2a 20 54 68 65 20 70 72 69 6e 74 66 28 29 .** The printf()
70e0: 20 62 75 69 6c 74 20 69 6e 74 6f 20 73 6f 6d 65 built into some
70f0: 20 76 65 72 73 69 6f 6e 73 20 6f 66 20 77 69 6e versions of win
7100: 64 6f 77 73 20 64 6f 65 73 20 6e 6f 74 20 75 6e dows does not un
7110: 64 65 72 73 74 61 6e 64 20 25 6c 6c 64 0a 2a 2a derstand %lld.**
7120: 20 61 6e 64 20 73 65 67 66 61 75 6c 74 73 20 69 and segfaults i
7130: 66 20 79 6f 75 20 67 69 76 65 20 69 74 20 61 20 f you give it a
7140: 6c 6f 6e 67 20 6c 6f 6e 67 20 69 6e 74 2e 0a 2a long long int..*
7150: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 44 65 /.void sqlite3De
7160: 62 75 67 50 72 69 6e 74 66 28 63 6f 6e 73 74 20 bugPrintf(const
7170: 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e char *zFormat, .
7180: 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 ..){. va_list a
7190: 70 3b 0a 20 20 53 74 72 41 63 63 75 6d 20 61 63 p;. StrAccum ac
71a0: 63 3b 0a 20 20 63 68 61 72 20 7a 42 75 66 5b 35 c;. char zBuf[5
71b0: 30 30 5d 3b 0a 20 20 73 71 6c 69 74 65 33 53 74 00];. sqlite3St
71c0: 72 41 63 63 75 6d 49 6e 69 74 28 26 61 63 63 2c rAccumInit(&acc,
71d0: 20 7a 42 75 66 2c 20 73 69 7a 65 6f 66 28 7a 42 zBuf, sizeof(zB
71e0: 75 66 29 29 3b 0a 20 20 61 63 63 2e 75 73 65 4d uf));. acc.useM
71f0: 61 6c 6c 6f 63 20 3d 20 30 3b 0a 20 20 76 61 5f alloc = 0;. va_
7200: 73 74 61 72 74 28 61 70 2c 7a 46 6f 72 6d 61 74 start(ap,zFormat
7210: 29 3b 0a 20 20 76 78 70 72 69 6e 74 66 28 26 61 );. vxprintf(&a
7220: 63 63 2c 20 30 2c 20 7a 46 6f 72 6d 61 74 2c 20 cc, 0, zFormat,
7230: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 ap);. va_end(ap
7240: 29 3b 0a 20 20 73 71 6c 69 74 65 33 53 74 72 41 );. sqlite3StrA
7250: 63 63 75 6d 46 69 6e 69 73 68 28 26 61 63 63 29 ccumFinish(&acc)
7260: 3b 0a 20 20 66 70 72 69 6e 74 66 28 73 74 64 6f ;. fprintf(stdo
7270: 75 74 2c 22 25 73 22 2c 20 7a 42 75 66 29 3b 0a ut,"%s", zBuf);.
7280: 20 20 66 66 6c 75 73 68 28 73 74 64 6f 75 74 29 fflush(stdout)
7290: 3b 0a 7d 0a 23 65 6e 64 69 66 0a ;.}.#endif.