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