0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20 /*.** Copyright
0010: 28 63 29 20 32 30 32 30 20 44 2e 20 52 69 63 68 (c) 2020 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54 ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20 te it and/or.**
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 modify it under
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 the terms of the
0090: 20 53 69 6d 70 6c 69 66 69 65 64 20 42 53 44 20 Simplified BSD
00a0: 4c 69 63 65 6e 73 65 20 28 61 6c 73 6f 0a 2a 2a License (also.**
00b0: 20 6b 6e 6f 77 6e 20 61 73 20 74 68 65 20 22 32 known as the "2
00c0: 2d 43 6c 61 75 73 65 20 4c 69 63 65 6e 73 65 22 -Clause License"
00d0: 20 6f 72 20 22 46 72 65 65 42 53 44 20 4c 69 63 or "FreeBSD Lic
00e0: 65 6e 73 65 22 2e 29 0a 2a 2a 0a 2a 2a 20 54 68 ense".).**.** Th
00f0: 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 is program is di
0100: 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 stributed in the
0110: 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 hope that it wi
0120: 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a ll be useful,.**
0130: 20 62 75 74 20 77 69 74 68 6f 75 74 20 61 6e 79 but without any
0140: 20 77 61 72 72 61 6e 74 79 3b 20 77 69 74 68 6f warranty; witho
0150: 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c ut even the impl
0160: 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a ied warranty of.
0170: 2a 2a 20 6d 65 72 63 68 61 6e 74 61 62 69 6c 69 ** merchantabili
0180: 74 79 20 6f 72 20 66 69 74 6e 65 73 73 20 66 6f ty or fitness fo
0190: 72 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 70 r a particular p
01a0: 75 72 70 6f 73 65 2e 0a 2a 2a 0a 2a 2a 20 41 75 urpose..**.** Au
01b0: 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69 6e 66 thor contact inf
01c0: 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20 20 64 ormation:.** d
01d0: 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a 2a 20 rh@hwaci.com.**
01e0: 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68 77 61 http://www.hwa
01f0: 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a 0a 2a ci.com/drh/.**.*
0200: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0210: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0220: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0230: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0240: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 2a **************.*
0250: 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c 65 20 63 *.** This file c
0260: 6f 6e 74 61 69 6e 73 20 66 6f 73 73 69 6c 2d 73 ontains fossil-s
0270: 70 65 63 69 66 69 63 20 63 6f 64 65 20 72 65 6c pecific code rel
0280: 61 74 65 64 20 74 6f 20 70 69 6b 63 68 72 2e 0a ated to pikchr..
0290: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 63 6f 6e */.#include "con
02a0: 66 69 67 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 fig.h".#include
02b0: 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c <assert.h>.#incl
02c0: 75 64 65 20 3c 63 74 79 70 65 2e 68 3e 0a 23 69 ude <ctype.h>.#i
02d0: 6e 63 6c 75 64 65 20 22 70 69 6b 63 68 72 73 68 nclude "pikchrsh
02e0: 6f 77 2e 68 22 0a 0a 23 69 66 20 49 4e 54 45 52 ow.h"..#if INTER
02f0: 46 41 43 45 0a 2f 2a 20 54 68 65 73 65 20 61 72 FACE./* These ar
0300: 65 20 64 65 73 63 72 69 62 65 64 20 69 6e 20 70 e described in p
0310: 69 6b 63 68 72 5f 70 72 6f 63 65 73 73 28 29 27 ikchr_process()'
0320: 73 20 64 6f 63 73 2e 20 2a 2f 0a 2f 2a 20 54 68 s docs. */./* Th
0330: 65 20 66 69 72 73 74 20 74 77 6f 20 6d 75 73 74 e first two must
0340: 20 6d 61 74 63 68 20 74 68 65 20 76 61 6c 75 65 match the value
0350: 73 20 66 72 6f 6d 20 70 69 6b 63 68 72 2e 63 20 s from pikchr.c
0360: 2a 2f 0a 23 64 65 66 69 6e 65 20 50 49 4b 43 48 */.#define PIKCH
0370: 52 5f 50 52 4f 43 45 53 53 5f 50 4c 41 49 4e 54 R_PROCESS_PLAINT
0380: 45 58 54 5f 45 52 52 4f 52 53 20 20 30 78 30 30 EXT_ERRORS 0x00
0390: 30 31 0a 23 64 65 66 69 6e 65 20 50 49 4b 43 48 01.#define PIKCH
03a0: 52 5f 50 52 4f 43 45 53 53 5f 44 41 52 4b 5f 4d R_PROCESS_DARK_M
03b0: 4f 44 45 20 20 20 20 20 20 20 20 20 30 78 30 30 ODE 0x00
03c0: 30 32 0a 2f 2a 20 65 6e 64 20 6f 66 20 66 6c 61 02./* end of fla
03d0: 67 73 20 73 75 70 70 6f 72 74 65 64 20 64 69 72 gs supported dir
03e0: 65 63 74 6c 79 20 62 79 20 70 69 6b 63 68 72 28 ectly by pikchr(
03f0: 29 20 2a 2f 0a 23 64 65 66 69 6e 65 20 50 49 4b ) */.#define PIK
0400: 43 48 52 5f 50 52 4f 43 45 53 53 5f 50 41 53 53 CHR_PROCESS_PASS
0410: 54 48 52 4f 55 47 48 20 20 20 20 20 20 20 30 78 THROUGH 0x
0420: 30 30 30 33 20 20 20 2f 2a 20 50 61 73 73 20 74 0003 /* Pass t
0430: 68 72 6f 75 67 68 20 74 68 65 73 65 20 66 6c 61 hrough these fla
0440: 67 73 20 2a 2f 0a 23 64 65 66 69 6e 65 20 50 49 gs */.#define PI
0450: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 54 48 31 KCHR_PROCESS_TH1
0460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 0
0470: 78 30 30 30 34 0a 23 64 65 66 69 6e 65 20 50 49 x0004.#define PI
0480: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 54 48 31 KCHR_PROCESS_TH1
0490: 5f 4e 4f 53 56 47 20 20 20 20 20 20 20 20 20 30 _NOSVG 0
04a0: 78 30 30 30 38 0a 23 64 65 66 69 6e 65 20 50 49 x0008.#define PI
04b0: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 4e 4f 4e KCHR_PROCESS_NON
04c0: 43 45 20 20 20 20 20 20 20 20 20 20 20 20 20 30 CE 0
04d0: 78 30 30 31 30 0a 23 64 65 66 69 6e 65 20 50 49 x0010.#define PI
04e0: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 45 52 52 KCHR_PROCESS_ERR
04f0: 5f 50 52 45 20 20 20 20 20 20 20 20 20 20 20 30 _PRE 0
0500: 78 30 30 32 30 0a 23 64 65 66 69 6e 65 20 50 49 x0020.#define PI
0510: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 53 52 43 KCHR_PROCESS_SRC
0520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 0
0530: 78 30 30 34 30 0a 23 64 65 66 69 6e 65 20 50 49 x0040.#define PI
0540: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
0550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 0
0560: 78 30 30 38 30 0a 23 64 65 66 69 6e 65 20 50 49 x0080.#define PI
0570: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
0580: 5f 49 4e 44 45 4e 54 20 20 20 20 20 20 20 20 30 _INDENT 0
0590: 78 30 31 30 30 0a 23 64 65 66 69 6e 65 20 50 49 x0100.#define PI
05a0: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
05b0: 5f 43 45 4e 54 45 52 20 20 20 20 20 20 20 20 30 _CENTER 0
05c0: 78 30 32 30 30 0a 23 64 65 66 69 6e 65 20 50 49 x0200.#define PI
05d0: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
05e0: 5f 46 4c 4f 41 54 5f 4c 45 46 54 20 20 20 20 30 _FLOAT_LEFT 0
05f0: 78 30 34 30 30 0a 23 64 65 66 69 6e 65 20 50 49 x0400.#define PI
0600: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
0610: 5f 46 4c 4f 41 54 5f 52 49 47 48 54 20 20 20 30 _FLOAT_RIGHT 0
0620: 78 30 38 30 30 0a 23 64 65 66 69 6e 65 20 50 49 x0800.#define PI
0630: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
0640: 5f 54 4f 47 47 4c 45 20 20 20 20 20 20 20 20 30 _TOGGLE 0
0650: 78 31 30 30 30 0a 23 64 65 66 69 6e 65 20 50 49 x1000.#define PI
0660: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
0670: 5f 53 4f 55 52 43 45 20 20 20 20 20 20 20 20 30 _SOURCE 0
0680: 78 32 30 30 30 0a 23 64 65 66 69 6e 65 20 50 49 x2000.#define PI
0690: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
06a0: 5f 53 4f 55 52 43 45 5f 49 4e 4c 49 4e 45 20 30 _SOURCE_INLINE 0
06b0: 78 34 30 30 30 0a 23 65 6e 64 69 66 0a 0a 2f 2a x4000.#endif../*
06c0: 0a 2a 2a 20 50 72 6f 63 65 73 73 65 73 20 61 20 .** Processes a
06d0: 70 69 6b 63 68 72 20 73 63 72 69 70 74 2c 20 6f pikchr script, o
06e0: 70 74 69 6f 6e 61 6c 6c 79 20 77 69 74 68 20 65 ptionally with e
06f0: 6d 62 65 64 64 65 64 20 54 48 31 2c 20 61 6e 64 mbedded TH1, and
0700: 0a 2a 2a 20 70 72 6f 64 75 63 65 73 20 48 54 4d .** produces HTM
0710: 4c 20 63 6f 64 65 20 66 6f 72 20 69 74 2e 20 7a L code for it. z
0720: 49 6e 20 69 73 20 74 68 65 20 4e 55 4c 2d 74 65 In is the NUL-te
0730: 72 6d 69 6e 61 74 65 64 20 69 6e 70 75 74 0a 2a rminated input.*
0740: 2a 20 73 63 72 69 70 74 2e 20 70 69 6b 46 6c 61 * script. pikFla
0750: 67 73 20 6d 61 79 20 62 65 20 61 20 62 69 74 6d gs may be a bitm
0760: 61 73 6b 20 6f 66 20 61 6e 79 20 6f 66 20 74 68 ask of any of th
0770: 65 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 e PIKCHR_PROCESS
0780: 5f 78 78 78 0a 2a 2a 20 66 6c 61 67 73 20 64 6f _xxx.** flags do
0790: 63 75 6d 65 6e 74 65 64 20 62 65 6c 6f 77 2e 20 cumented below.
07a0: 74 68 46 6c 61 67 73 20 6d 61 79 20 62 65 20 61 thFlags may be a
07b0: 20 62 69 74 6d 61 73 6b 20 6f 66 20 61 6e 79 20 bitmask of any
07c0: 6f 66 20 74 68 65 0a 2a 2a 20 54 48 5f 49 4e 49 of the.** TH_INI
07d0: 54 5f 78 78 78 20 61 6e 64 2f 6f 72 20 54 48 5f T_xxx and/or TH_
07e0: 52 32 42 5f 78 78 78 20 66 6c 61 67 73 2e 20 4f R2B_xxx flags. O
07f0: 75 74 70 75 74 20 69 73 20 73 65 6e 74 20 74 6f utput is sent to
0800: 20 70 4f 75 74 2c 0a 2a 2a 20 61 70 70 65 6e 64 pOut,.** append
0810: 69 6e 67 20 74 6f 20 69 74 20 77 69 74 68 6f 75 ing to it withou
0820: 74 20 6d 6f 64 69 66 79 69 6e 67 20 61 6e 79 20 t modifying any
0830: 70 72 69 6f 72 20 63 6f 6e 74 65 6e 74 73 2e 0a prior contents..
0840: 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e 73 20 30 20 **.** Returns 0
0850: 6f 6e 20 73 75 63 63 65 73 73 2c 20 31 20 69 66 on success, 1 if
0860: 20 54 48 31 20 70 72 6f 63 65 73 73 69 6e 67 20 TH1 processing
0870: 66 61 69 6c 65 64 2c 20 6f 72 20 32 20 69 66 20 failed, or 2 if
0880: 70 69 6b 63 68 72 0a 2a 2a 20 70 72 6f 63 65 73 pikchr.** proces
0890: 73 69 6e 67 20 66 61 69 6c 65 64 2e 20 49 6e 20 sing failed. In
08a0: 65 69 74 68 65 72 20 63 61 73 65 2c 20 74 68 65 either case, the
08b0: 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20 28 error message (
08c0: 69 66 20 61 6e 79 29 20 66 72 6f 6d 0a 2a 2a 20 if any) from.**
08d0: 54 48 31 20 6f 72 20 70 69 6b 63 68 72 20 77 69 TH1 or pikchr wi
08e0: 6c 6c 20 62 65 20 61 70 70 65 6e 64 65 64 20 74 ll be appended t
08f0: 6f 20 70 4f 75 74 2e 0a 2a 2a 0a 2a 2a 20 70 69 o pOut..**.** pi
0900: 6b 46 6c 61 67 73 20 66 6c 61 67 20 64 65 73 63 kFlags flag desc
0910: 72 69 70 74 69 6f 6e 73 3a 0a 2a 2a 0a 2a 2a 20 riptions:.**.**
0920: 2d 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 - PIKCHR_PROCESS
0930: 5f 54 48 31 20 6d 65 61 6e 73 20 74 6f 20 72 75 _TH1 means to ru
0940: 6e 20 7a 49 6e 20 74 68 72 6f 75 67 68 20 54 48 n zIn through TH
0950: 31 2c 20 75 73 69 6e 67 20 74 68 65 20 54 48 31 1, using the TH1
0960: 0a 2a 2a 20 69 6e 69 74 20 66 6c 61 67 73 20 73 .** init flags s
0970: 70 65 63 69 66 69 65 64 20 69 6e 20 74 68 65 20 pecified in the
0980: 33 72 64 20 61 72 67 75 6d 65 6e 74 2e 20 49 66 3rd argument. If
0990: 20 74 68 46 6c 61 67 73 20 69 73 20 6e 6f 6e 2d thFlags is non-
09a0: 30 20 74 68 65 6e 0a 2a 2a 20 74 68 69 73 20 66 0 then.** this f
09b0: 6c 61 67 20 69 73 20 61 73 73 75 6d 65 64 20 65 lag is assumed e
09c0: 76 65 6e 20 69 66 20 69 74 20 69 73 20 6e 6f 74 ven if it is not
09d0: 20 73 70 65 63 69 66 69 65 64 2e 0a 2a 2a 0a 2a specified..**.*
09e0: 2a 20 2d 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 * - PIKCHR_PROCE
09f0: 53 53 5f 54 48 31 5f 4e 4f 53 56 47 20 6d 65 61 SS_TH1_NOSVG mea
0a00: 6e 73 20 74 68 61 74 20 70 72 6f 63 65 73 73 69 ns that processi
0a10: 6e 67 20 73 74 6f 70 73 20 61 66 74 65 72 20 74 ng stops after t
0a20: 68 65 0a 2a 2a 20 54 48 31 20 65 76 61 6c 20 73 he.** TH1 eval s
0a30: 74 65 70 2c 20 74 68 75 73 20 74 68 65 20 6f 75 tep, thus the ou
0a40: 74 70 75 74 20 77 69 6c 6c 20 62 65 20 28 70 72 tput will be (pr
0a50: 65 73 75 6d 61 62 6c 79 29 20 61 0a 2a 2a 20 54 esumably) a.** T
0a60: 48 31 2d 67 65 6e 65 72 61 74 65 64 2f 70 72 6f H1-generated/pro
0a70: 63 65 73 73 65 64 20 70 69 6b 63 68 72 20 73 63 cessed pikchr sc
0a80: 72 69 70 74 20 28 6f 72 20 77 68 61 74 65 76 65 ript (or whateve
0a90: 72 20 65 6c 73 65 20 74 68 65 20 54 48 31 0a 2a r else the TH1.*
0aa0: 2a 20 6f 75 74 70 75 74 73 29 2e 20 49 66 20 74 * outputs). If t
0ab0: 68 69 73 20 66 6c 61 67 20 69 73 20 73 65 74 2c his flag is set,
0ac0: 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f PIKCHR_PROCESS_
0ad0: 54 48 31 20 69 73 20 61 73 73 75 6d 65 64 20 65 TH1 is assumed e
0ae0: 76 65 6e 0a 2a 2a 20 69 66 20 69 74 20 69 73 20 ven.** if it is
0af0: 6e 6f 74 20 73 70 65 63 69 66 69 65 64 2e 0a 2a not specified..*
0b00: 2a 0a 2a 2a 20 41 6c 6c 20 6f 66 20 74 68 65 20 *.** All of the
0b10: 72 65 6d 61 69 6e 69 6e 67 20 66 6c 61 67 73 20 remaining flags
0b20: 6c 69 73 74 65 64 20 62 65 6c 6f 77 20 61 72 65 listed below are
0b30: 20 69 67 6e 6f 72 65 64 20 69 66 0a 2a 2a 20 50 ignored if.** P
0b40: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 54 48 IKCHR_PROCESS_TH
0b50: 31 5f 4e 4f 53 56 47 20 69 73 20 73 70 65 63 69 1_NOSVG is speci
0b60: 66 69 65 64 21 0a 2a 2a 0a 2a 2a 20 2d 20 50 49 fied!.**.** - PI
0b70: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
0b80: 3a 20 69 66 20 73 65 74 2c 20 74 68 65 20 53 56 : if set, the SV
0b90: 47 20 72 65 73 75 6c 74 20 69 73 20 77 72 61 70 G result is wrap
0ba0: 70 65 64 20 69 6e 20 61 20 44 49 56 0a 2a 2a 20 ped in a DIV.**
0bb0: 65 6c 65 6d 65 6e 74 20 77 68 69 63 68 20 73 70 element which sp
0bc0: 65 63 69 66 69 65 73 20 61 20 6d 61 78 2d 77 69 ecifies a max-wi
0bd0: 64 74 68 20 73 74 79 6c 65 20 76 61 6c 75 65 20 dth style value
0be0: 62 61 73 65 64 20 6f 6e 20 74 68 65 20 53 56 47 based on the SVG
0bf0: 27 73 0a 2a 2a 20 63 61 6c 63 75 6c 61 74 65 64 's.** calculated
0c00: 20 73 69 7a 65 2e 20 54 68 69 73 20 66 6c 61 67 size. This flag
0c10: 20 68 61 73 20 6d 75 6c 74 69 70 6c 65 20 6d 75 has multiple mu
0c20: 74 75 61 6c 6c 79 20 65 78 63 6c 75 73 69 76 65 tually exclusive
0c30: 20 66 6f 72 6d 73 3a 0a 2a 2a 0a 2a 2a 20 20 2d forms:.**.** -
0c40: 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f PIKCHR_PROCESS_
0c50: 44 49 56 20 75 73 65 73 20 64 65 66 61 75 6c 74 DIV uses default
0c60: 20 65 6c 65 6d 65 6e 74 20 61 6c 69 67 6e 6d 65 element alignme
0c70: 6e 74 2e 0a 2a 2a 20 20 2d 20 50 49 4b 43 48 52 nt..** - PIKCHR
0c80: 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 49 4e 44 _PROCESS_DIV_IND
0c90: 45 4e 54 20 69 6e 64 65 6e 74 73 20 74 68 65 20 ENT indents the
0ca0: 64 69 76 2e 0a 2a 2a 20 20 2d 20 50 49 4b 43 48 div..** - PIKCH
0cb0: 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 43 45 R_PROCESS_DIV_CE
0cc0: 4e 54 45 52 20 63 65 6e 74 65 72 73 20 74 68 65 NTER centers the
0cd0: 20 64 69 76 2e 0a 2a 2a 20 20 2d 20 50 49 4b 43 div..** - PIKC
0ce0: 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 46 HR_PROCESS_DIV_F
0cf0: 4c 4f 41 54 5f 4c 45 46 54 20 66 6c 6f 61 74 73 LOAT_LEFT floats
0d00: 20 74 68 65 20 64 69 76 20 6c 65 66 74 2e 0a 2a the div left..*
0d10: 2a 20 20 2d 20 50 49 4b 43 48 52 5f 50 52 4f 43 * - PIKCHR_PROC
0d20: 45 53 53 5f 44 49 56 5f 46 4c 4f 41 54 5f 52 49 ESS_DIV_FLOAT_RI
0d30: 47 48 54 20 66 6c 6f 61 74 73 20 74 68 65 20 64 GHT floats the d
0d40: 69 76 20 72 69 67 68 74 2e 0a 2a 2a 0a 2a 2a 20 iv right..**.**
0d50: 49 66 20 6d 6f 72 65 20 74 68 61 6e 20 6f 6e 65 If more than one
0d60: 20 69 73 20 73 70 65 63 69 66 69 65 64 2c 20 77 is specified, w
0d70: 68 69 63 68 20 6f 6e 65 20 69 73 20 75 73 65 64 hich one is used
0d80: 20 69 73 20 75 6e 64 65 66 69 6e 65 64 2e 20 54 is undefined. T
0d90: 68 6f 73 65 0a 2a 2a 20 66 6c 61 67 73 20 6d 61 hose.** flags ma
0da0: 79 20 62 65 20 4f 52 27 64 20 77 69 74 68 20 6f y be OR'd with o
0db0: 6e 65 20 6f 72 20 62 6f 74 68 20 6f 66 20 74 68 ne or both of th
0dc0: 65 20 66 6f 6c 6c 6f 77 69 6e 67 3a 0a 2a 2a 0a e following:.**.
0dd0: 2a 2a 20 20 2d 20 50 49 4b 43 48 52 5f 50 52 4f ** - PIKCHR_PRO
0de0: 43 45 53 53 5f 44 49 56 5f 54 4f 47 47 4c 45 3a CESS_DIV_TOGGLE:
0df0: 20 61 64 64 73 20 74 68 65 20 27 74 6f 67 67 6c adds the 'toggl
0e00: 65 27 20 43 53 53 20 63 6c 61 73 73 20 74 6f 20 e' CSS class to
0e10: 74 68 65 0a 2a 2a 20 20 20 20 6f 75 74 65 72 20 the.** outer
0e20: 44 49 56 20 73 6f 20 74 68 61 74 20 65 76 65 6e DIV so that even
0e30: 74 2d 68 61 6e 64 6c 65 72 20 63 6f 64 65 20 63 t-handler code c
0e40: 61 6e 20 69 6e 73 74 61 6c 6c 20 64 69 66 66 65 an install diffe
0e50: 72 65 6e 74 0a 2a 2a 20 20 20 20 74 6f 67 67 6c rent.** toggl
0e60: 69 6e 67 20 62 65 68 61 76 69 6f 75 72 20 74 68 ing behaviour th
0e70: 61 6e 20 74 68 65 20 64 65 66 61 75 6c 74 2e 20 an the default.
0e80: 44 65 66 61 75 6c 74 20 69 73 20 63 74 72 6c 2d Default is ctrl-
0e90: 63 6c 69 63 6b 2c 20 62 75 74 0a 2a 2a 20 20 20 click, but.**
0ea0: 20 74 68 69 73 20 66 6c 61 67 20 65 6e 61 62 6c this flag enabl
0eb0: 65 73 20 73 69 6e 67 6c 65 2d 63 6c 69 63 6b 20 es single-click
0ec0: 74 6f 67 67 6c 69 6e 67 20 66 6f 72 20 74 68 65 toggling for the
0ed0: 20 65 6c 65 6d 65 6e 74 2e 0a 2a 2a 0a 2a 2a 20 element..**.**
0ee0: 20 2d 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 - PIKCHR_PROCES
0ef0: 53 5f 44 49 56 5f 53 4f 55 52 43 45 3a 20 61 64 S_DIV_SOURCE: ad
0f00: 64 73 20 74 68 65 20 27 73 6f 75 72 63 65 27 20 ds the 'source'
0f10: 43 53 53 20 63 6c 61 73 73 20 74 6f 20 74 68 65 CSS class to the
0f20: 0a 2a 2a 20 20 20 20 6f 75 74 65 72 20 44 49 56 .** outer DIV
0f30: 2c 20 77 68 69 63 68 20 69 73 20 61 20 68 69 6e , which is a hin
0f40: 74 20 74 6f 20 74 68 65 20 63 6c 69 65 6e 74 2d t to the client-
0f50: 73 69 64 65 20 72 65 6e 64 65 72 65 72 20 28 73 side renderer (s
0f60: 65 65 0a 2a 2a 20 20 20 20 66 6f 73 73 69 6c 2e ee.** fossil.
0f70: 70 69 6b 63 68 72 2e 6a 73 29 20 74 68 61 74 20 pikchr.js) that
0f80: 74 68 65 20 70 69 6b 63 68 72 20 73 68 6f 75 6c the pikchr shoul
0f90: 64 20 69 6e 69 74 69 61 6c 6c 79 20 62 65 20 72 d initially be r
0fa0: 65 6e 64 65 72 65 64 0a 2a 2a 20 20 20 20 69 6e endered.** in
0fb0: 20 73 6f 75 72 63 65 20 63 6f 64 65 20 66 6f 72 source code for
0fc0: 6d 20 6d 6f 64 65 20 28 74 68 65 20 64 65 66 61 m mode (the defa
0fd0: 75 6c 74 20 69 73 20 74 6f 20 68 69 64 65 20 74 ult is to hide t
0fe0: 68 65 20 73 6f 75 72 63 65 20 61 6e 64 0a 2a 2a he source and.**
0ff0: 20 20 20 20 73 68 6f 77 20 74 68 65 20 53 56 47 show the SVG
1000: 29 2e 0a 2a 2a 0a 2a 2a 20 20 2d 20 50 49 4b 43 )..**.** - PIKC
1010: 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 53 HR_PROCESS_DIV_S
1020: 4f 55 52 43 45 5f 49 4e 4c 49 4e 45 3a 20 61 64 OURCE_INLINE: ad
1030: 64 73 20 74 68 65 20 27 73 6f 75 72 63 65 2d 69 ds the 'source-i
1040: 6e 6c 69 6e 65 27 20 43 53 53 0a 2a 2a 20 20 20 nline' CSS.**
1050: 20 63 6c 61 73 73 20 74 6f 20 74 68 65 20 6f 75 class to the ou
1060: 74 65 72 20 77 72 61 70 70 65 72 2e 20 54 68 69 ter wrapper. Thi
1070: 73 20 6d 6f 64 69 66 69 65 72 20 63 68 61 6e 67 s modifier chang
1080: 65 73 20 68 6f 77 20 74 68 65 0a 2a 2a 20 20 20 es how the.**
1090: 20 27 73 6f 75 72 63 65 27 20 43 53 53 20 63 6c 'source' CSS cl
10a0: 61 73 73 20 67 65 74 73 20 61 70 70 6c 69 65 64 ass gets applied
10b0: 3a 20 77 69 74 68 20 74 68 69 73 20 66 6c 61 67 : with this flag
10c0: 2c 20 74 68 65 20 73 6f 75 72 63 65 20 76 69 65 , the source vie
10d0: 77 0a 2a 2a 20 20 20 20 73 68 6f 75 6c 64 20 62 w.** should b
10e0: 65 20 72 65 6e 64 65 72 65 64 20 22 69 6e 6c 69 e rendered "inli
10f0: 6e 65 22 20 28 73 61 6d 65 20 70 6f 73 69 74 69 ne" (same positi
1100: 6f 6e 20 61 73 20 74 68 65 20 67 72 61 70 68 69 on as the graphi
1110: 63 29 2c 20 65 6c 73 65 0a 2a 2a 20 20 20 20 69 c), else.** i
1120: 74 20 69 73 20 74 6f 20 62 65 20 6c 65 66 74 2d t is to be left-
1130: 61 6c 69 67 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 2d aligned..**.** -
1140: 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f PIKCHR_PROCESS_
1150: 4e 4f 4e 43 45 3a 20 69 66 20 73 65 74 2c 20 74 NONCE: if set, t
1160: 68 65 20 72 65 73 75 6c 74 69 6e 67 20 53 56 47 he resulting SVG
1170: 2f 44 49 56 20 61 72 65 20 77 72 61 70 70 65 64 /DIV are wrapped
1180: 0a 2a 2a 20 69 6e 20 22 73 61 66 65 20 6e 6f 6e .** in "safe non
1190: 63 65 22 20 63 6f 6d 6d 65 6e 74 73 2c 20 77 68 ce" comments, wh
11a0: 69 63 68 20 61 72 65 20 61 20 66 6f 73 73 69 6c ich are a fossil
11b0: 2d 69 6e 74 65 72 6e 61 6c 20 6d 65 63 68 61 6e -internal mechan
11c0: 69 73 6d 0a 2a 2a 20 77 68 69 63 68 20 70 72 65 ism.** which pre
11d0: 76 65 6e 74 73 20 74 68 65 20 77 69 6b 69 2f 6d vents the wiki/m
11e0: 61 72 6b 64 6f 77 6e 20 70 72 6f 63 65 73 73 6f arkdown processo
11f0: 72 73 20 66 72 6f 6d 20 72 65 2d 70 72 6f 63 65 rs from re-proce
1200: 73 73 69 6e 67 20 74 68 69 73 0a 2a 2a 20 6f 75 ssing this.** ou
1210: 74 70 75 74 2e 20 54 68 69 73 20 69 73 20 6e 65 tput. This is ne
1220: 63 65 73 73 61 72 79 20 77 68 65 6e 20 63 61 6c cessary when cal
1230: 6c 69 6e 67 20 74 68 69 73 20 72 6f 75 74 69 6e ling this routin
1240: 65 20 69 6e 20 74 68 65 20 63 6f 6e 74 65 78 74 e in the context
1250: 0a 2a 2a 20 6f 66 20 77 69 6b 69 2f 65 6d 62 65 .** of wiki/embe
1260: 64 64 65 64 20 64 6f 63 20 70 72 6f 63 65 73 73 dded doc process
1270: 69 6e 67 2c 20 62 75 74 20 6e 6f 74 20 28 65 2e ing, but not (e.
1280: 67 2e 29 20 77 68 65 6e 20 66 65 74 63 68 69 6e g.) when fetchin
1290: 67 0a 2a 2a 20 61 6e 20 69 6d 61 67 65 20 66 6f g.** an image fo
12a0: 72 20 2f 70 69 6b 63 68 72 70 61 67 65 2e 0a 2a r /pikchrpage..*
12b0: 2a 0a 2a 2a 20 2d 20 50 49 4b 43 48 52 5f 50 52 *.** - PIKCHR_PR
12c0: 4f 43 45 53 53 5f 53 52 43 3a 20 69 66 20 73 65 OCESS_SRC: if se
12d0: 74 2c 20 61 20 6e 65 77 20 50 52 45 2e 70 69 6b t, a new PRE.pik
12e0: 63 68 72 2d 73 72 63 20 65 6c 65 6d 65 6e 74 20 chr-src element
12f0: 69 73 0a 2a 2a 20 69 6e 6a 65 63 74 65 64 20 61 is.** injected a
1300: 64 6a 61 63 65 6e 74 20 74 6f 20 74 68 65 20 53 djacent to the S
1310: 56 47 20 65 6c 65 6d 65 6e 74 20 77 68 69 63 68 VG element which
1320: 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 0a 2a 2a contains the.**
1330: 20 48 54 4d 4c 2d 65 73 63 61 70 65 64 20 63 6f HTML-escaped co
1340: 6e 74 65 6e 74 20 6f 66 20 74 68 65 20 69 6e 70 ntent of the inp
1350: 75 74 20 73 63 72 69 70 74 2e 20 49 66 0a 2a 2a ut script. If.**
1360: 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f PIKCHR_PROCESS_
1370: 44 49 56 5f 53 4f 55 52 43 45 20 6f 72 20 50 49 DIV_SOURCE or PI
1380: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
1390: 5f 53 4f 55 52 43 45 5f 49 4e 4c 49 4e 45 20 69 _SOURCE_INLINE i
13a0: 73 0a 2a 2a 20 73 65 74 2c 20 74 68 69 73 20 66 s.** set, this f
13b0: 6c 61 67 20 69 73 20 61 75 74 6f 6d 61 74 69 63 lag is automatic
13c0: 61 6c 6c 79 20 69 6d 70 6c 69 65 64 2e 0a 2a 2a ally implied..**
13d0: 0a 2a 2a 20 2d 20 50 49 4b 43 48 52 5f 50 52 4f .** - PIKCHR_PRO
13e0: 43 45 53 53 5f 45 52 52 5f 50 52 45 3a 20 69 66 CESS_ERR_PRE: if
13f0: 20 73 65 74 20 61 6e 64 20 70 69 6b 63 68 72 28 set and pikchr(
1400: 29 20 66 61 69 6c 73 2c 20 74 68 65 20 72 65 73 ) fails, the res
1410: 75 6c 74 69 6e 67 0a 2a 2a 20 65 72 72 6f 72 20 ulting.** error
1420: 72 65 70 6f 72 74 20 69 73 20 77 72 61 70 70 65 report is wrappe
1430: 64 20 69 6e 20 61 20 50 52 45 20 65 6c 65 6d 65 d in a PRE eleme
1440: 6e 74 2c 20 65 6c 73 65 20 69 74 20 69 73 20 72 nt, else it is r
1450: 65 74 61 69 6e 65 64 0a 2a 2a 20 61 73 2d 69 73 etained.** as-is
1460: 20 28 69 6e 74 65 6e 64 65 64 20 6f 6e 6c 79 20 (intended only
1470: 66 6f 72 20 63 6f 6e 73 6f 6c 65 20 6f 75 74 70 for console outp
1480: 75 74 29 2e 0a 2a 2f 0a 69 6e 74 20 70 69 6b 63 ut)..*/.int pikc
1490: 68 72 5f 70 72 6f 63 65 73 73 28 63 6f 6e 73 74 hr_process(const
14a0: 20 63 68 61 72 20 2a 20 7a 49 6e 2c 20 69 6e 74 char * zIn, int
14b0: 20 70 69 6b 46 6c 61 67 73 2c 20 69 6e 74 20 74 pikFlags, int t
14c0: 68 46 6c 61 67 73 2c 0a 20 20 20 20 20 20 20 20 hFlags,.
14d0: 20 20 20 20 20 20 20 20 20 20 20 42 6c 6f 62 20 Blob
14e0: 2a 20 70 4f 75 74 29 7b 0a 20 20 42 6c 6f 62 20 * pOut){. Blob
14f0: 62 49 6e 20 3d 20 65 6d 70 74 79 5f 62 6c 6f 62 bIn = empty_blob
1500: 3b 0a 20 20 69 6e 74 20 69 73 45 72 72 20 3d 20 ;. int isErr =
1510: 30 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 0;. const char
1520: 2a 7a 4e 6f 6e 63 65 20 3d 20 28 50 49 4b 43 48 *zNonce = (PIKCH
1530: 52 5f 50 52 4f 43 45 53 53 5f 4e 4f 4e 43 45 20 R_PROCESS_NONCE
1540: 26 20 70 69 6b 46 6c 61 67 73 29 0a 20 20 20 20 & pikFlags).
1550: 3f 20 73 61 66 65 5f 68 74 6d 6c 5f 6e 6f 6e 63 ? safe_html_nonc
1560: 65 28 31 29 20 3a 20 30 3b 0a 0a 20 20 69 66 28 e(1) : 0;.. if(
1570: 21 28 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 !(PIKCHR_PROCESS
1580: 5f 44 49 56 20 26 20 70 69 6b 46 6c 61 67 73 29 _DIV & pikFlags)
1590: 0a 20 20 20 20 20 2f 2a 20 49 66 20 61 6e 79 20 . /* If any
15a0: 44 49 56 5f 78 78 78 20 66 6c 61 67 73 20 61 72 DIV_xxx flags ar
15b0: 65 20 73 65 74 2c 20 73 65 74 20 44 49 56 20 2a e set, set DIV *
15c0: 2f 0a 20 20 20 20 20 26 26 20 28 50 49 4b 43 48 /. && (PIKCH
15d0: 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 49 4e R_PROCESS_DIV_IN
15e0: 44 45 4e 54 0a 20 20 20 20 20 20 20 20 20 7c 20 DENT. |
15f0: 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 PIKCHR_PROCESS_D
1600: 49 56 5f 43 45 4e 54 45 52 0a 20 20 20 20 20 20 IV_CENTER.
1610: 20 20 20 7c 20 50 49 4b 43 48 52 5f 50 52 4f 43 | PIKCHR_PROC
1620: 45 53 53 5f 44 49 56 5f 46 4c 4f 41 54 5f 52 49 ESS_DIV_FLOAT_RI
1630: 47 48 54 0a 20 20 20 20 20 20 20 20 20 7c 20 50 GHT. | P
1640: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 IKCHR_PROCESS_DI
1650: 56 5f 46 4c 4f 41 54 5f 4c 45 46 54 0a 20 20 20 V_FLOAT_LEFT.
1660: 20 20 20 20 20 20 7c 20 50 49 4b 43 48 52 5f 50 | PIKCHR_P
1670: 52 4f 43 45 53 53 5f 44 49 56 5f 53 4f 55 52 43 ROCESS_DIV_SOURC
1680: 45 0a 20 20 20 20 20 20 20 20 20 7c 20 50 49 4b E. | PIK
1690: 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f CHR_PROCESS_DIV_
16a0: 53 4f 55 52 43 45 5f 49 4e 4c 49 4e 45 0a 20 20 SOURCE_INLINE.
16b0: 20 20 20 20 20 20 20 7c 20 50 49 4b 43 48 52 5f | PIKCHR_
16c0: 50 52 4f 43 45 53 53 5f 44 49 56 5f 54 4f 47 47 PROCESS_DIV_TOGG
16d0: 4c 45 0a 20 20 20 20 20 20 20 20 20 29 20 26 20 LE. ) &
16e0: 70 69 6b 46 6c 61 67 73 29 7b 0a 20 20 20 20 70 pikFlags){. p
16f0: 69 6b 46 6c 61 67 73 20 7c 3d 20 50 49 4b 43 48 ikFlags |= PIKCH
1700: 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 3b 0a 20 R_PROCESS_DIV;.
1710: 20 7d 0a 20 20 69 66 28 21 28 50 49 4b 43 48 52 }. if(!(PIKCHR
1720: 5f 50 52 4f 43 45 53 53 5f 54 48 31 20 26 20 70 _PROCESS_TH1 & p
1730: 69 6b 46 6c 61 67 73 29 0a 20 20 20 20 20 2f 2a ikFlags). /*
1740: 20 49 66 20 61 6e 79 20 54 48 31 5f 78 78 78 20 If any TH1_xxx
1750: 66 6c 61 67 73 20 61 72 65 20 73 65 74 2c 20 73 flags are set, s
1760: 65 74 20 54 48 31 20 2a 2f 0a 20 20 20 20 20 26 et TH1 */. &
1770: 26 20 28 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 & (PIKCHR_PROCES
1780: 53 5f 54 48 31 5f 4e 4f 53 56 47 20 26 20 70 69 S_TH1_NOSVG & pi
1790: 6b 46 6c 61 67 73 20 7c 7c 20 74 68 46 6c 61 67 kFlags || thFlag
17a0: 73 21 3d 30 29 29 7b 0a 20 20 20 20 70 69 6b 46 s!=0)){. pikF
17b0: 6c 61 67 73 20 7c 3d 20 50 49 4b 43 48 52 5f 50 lags |= PIKCHR_P
17c0: 52 4f 43 45 53 53 5f 54 48 31 3b 0a 20 20 7d 0a ROCESS_TH1;. }.
17d0: 20 20 69 66 28 7a 4e 6f 6e 63 65 29 7b 0a 20 20 if(zNonce){.
17e0: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 70 blob_appendf(p
17f0: 4f 75 74 2c 20 22 25 73 5c 6e 22 2c 20 7a 4e 6f Out, "%s\n", zNo
1800: 6e 63 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 50 nce);. }. if(P
1810: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 54 48 IKCHR_PROCESS_TH
1820: 31 20 26 20 70 69 6b 46 6c 61 67 73 29 7b 0a 20 1 & pikFlags){.
1830: 20 20 20 42 6c 6f 62 20 6f 75 74 20 3d 20 65 6d Blob out = em
1840: 70 74 79 5f 62 6c 6f 62 3b 0a 20 20 20 20 69 73 pty_blob;. is
1850: 45 72 72 20 3d 20 54 68 5f 52 65 6e 64 65 72 54 Err = Th_RenderT
1860: 6f 42 6c 6f 62 28 7a 49 6e 2c 20 26 6f 75 74 2c oBlob(zIn, &out,
1870: 20 74 68 46 6c 61 67 73 29 0a 20 20 20 20 20 20 thFlags).
1880: 3f 20 31 20 3a 20 30 3b 0a 20 20 20 20 69 66 28 ? 1 : 0;. if(
1890: 69 73 45 72 72 29 7b 0a 20 20 20 20 20 20 62 6c isErr){. bl
18a0: 6f 62 5f 61 70 70 65 6e 64 28 70 4f 75 74 2c 20 ob_append(pOut,
18b0: 62 6c 6f 62 5f 73 74 72 28 26 6f 75 74 29 2c 20 blob_str(&out),
18c0: 62 6c 6f 62 5f 73 69 7a 65 28 26 6f 75 74 29 29 blob_size(&out))
18d0: 3b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 72 65 73 ;. blob_res
18e0: 65 74 28 26 6f 75 74 29 3b 0a 20 20 20 20 7d 65 et(&out);. }e
18f0: 6c 73 65 7b 0a 20 20 20 20 20 20 62 49 6e 20 3d lse{. bIn =
1900: 20 6f 75 74 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 out;. }. }e
1910: 6c 73 65 7b 0a 20 20 20 20 62 6c 6f 62 5f 69 6e lse{. blob_in
1920: 69 74 28 26 62 49 6e 2c 20 7a 49 6e 2c 20 2d 31 it(&bIn, zIn, -1
1930: 29 3b 0a 20 20 7d 0a 20 20 69 66 28 21 69 73 45 );. }. if(!isE
1940: 72 72 29 7b 0a 20 20 20 20 69 66 28 50 49 4b 43 rr){. if(PIKC
1950: 48 52 5f 50 52 4f 43 45 53 53 5f 54 48 31 5f 4e HR_PROCESS_TH1_N
1960: 4f 53 56 47 20 26 20 70 69 6b 46 6c 61 67 73 29 OSVG & pikFlags)
1970: 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 {. blob_app
1980: 65 6e 64 28 70 4f 75 74 2c 20 62 6c 6f 62 5f 73 end(pOut, blob_s
1990: 74 72 28 26 62 49 6e 29 2c 20 62 6c 6f 62 5f 73 tr(&bIn), blob_s
19a0: 69 7a 65 28 26 62 49 6e 29 29 3b 0a 20 20 20 20 ize(&bIn));.
19b0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 69 6e 74 }else{. int
19c0: 20 77 20 3d 20 30 2c 20 68 20 3d 20 30 3b 0a 20 w = 0, h = 0;.
19d0: 20 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 const char
19e0: 2a 20 7a 43 6f 6e 74 65 6e 74 20 3d 20 62 6c 6f * zContent = blo
19f0: 62 5f 73 74 72 28 26 62 49 6e 29 3b 0a 20 20 20 b_str(&bIn);.
1a00: 20 20 20 63 68 61 72 20 2a 7a 4f 75 74 3b 0a 20 char *zOut;.
1a10: 20 20 20 20 20 7a 4f 75 74 20 3d 20 70 69 6b 63 zOut = pikc
1a20: 68 72 28 7a 43 6f 6e 74 65 6e 74 2c 20 22 70 69 hr(zContent, "pi
1a30: 6b 63 68 72 22 2c 0a 20 20 20 20 20 20 20 20 20 kchr",.
1a40: 20 20 20 20 20 20 20 20 20 20 20 30 78 30 31 20 0x01
1a50: 7c 20 28 70 69 6b 46 6c 61 67 73 26 50 49 4b 43 | (pikFlags&PIKC
1a60: 48 52 5f 50 52 4f 43 45 53 53 5f 50 41 53 53 54 HR_PROCESS_PASST
1a70: 48 52 4f 55 47 48 29 2c 0a 20 20 20 20 20 20 20 HROUGH),.
1a80: 20 20 20 20 20 20 20 20 20 20 20 20 20 26 77 2c &w,
1a90: 20 26 68 29 3b 0a 20 20 20 20 20 20 69 66 28 20 &h);. if(
1aa0: 77 3e 30 20 26 26 20 68 3e 30 20 29 7b 0a 20 20 w>0 && h>0 ){.
1ab0: 20 20 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 const char
1ac0: 20 2a 20 7a 43 6c 61 73 73 54 6f 67 67 6c 65 20 * zClassToggle
1ad0: 3d 20 22 22 3b 0a 20 20 20 20 20 20 20 20 63 6f = "";. co
1ae0: 6e 73 74 20 63 68 61 72 20 2a 20 7a 43 6c 61 73 nst char * zClas
1af0: 73 53 6f 75 72 63 65 20 3d 20 22 22 3b 0a 20 20 sSource = "";.
1b00: 20 20 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 const char
1b10: 20 2a 20 7a 57 72 61 70 70 65 72 43 6c 61 73 73 * zWrapperClass
1b20: 20 3d 20 22 22 3b 0a 20 20 20 20 20 20 20 20 69 = "";. i
1b30: 66 28 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 f(PIKCHR_PROCESS
1b40: 5f 44 49 56 20 26 20 70 69 6b 46 6c 61 67 73 29 _DIV & pikFlags)
1b50: 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 50 {. if(P
1b60: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 IKCHR_PROCESS_DI
1b70: 56 5f 43 45 4e 54 45 52 20 26 20 70 69 6b 46 6c V_CENTER & pikFl
1b80: 61 67 73 29 7b 0a 20 20 20 20 20 20 20 20 20 20 ags){.
1b90: 20 20 7a 57 72 61 70 70 65 72 43 6c 61 73 73 20 zWrapperClass
1ba0: 3d 20 22 20 63 65 6e 74 65 72 22 3b 0a 20 20 20 = " center";.
1bb0: 20 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 }else if(
1bc0: 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 PIKCHR_PROCESS_D
1bd0: 49 56 5f 49 4e 44 45 4e 54 20 26 20 70 69 6b 46 IV_INDENT & pikF
1be0: 6c 61 67 73 29 7b 0a 20 20 20 20 20 20 20 20 20 lags){.
1bf0: 20 20 20 7a 57 72 61 70 70 65 72 43 6c 61 73 73 zWrapperClass
1c00: 20 3d 20 22 20 69 6e 64 65 6e 74 22 3b 0a 20 20 = " indent";.
1c10: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 }else if
1c20: 28 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f (PIKCHR_PROCESS_
1c30: 44 49 56 5f 46 4c 4f 41 54 5f 4c 45 46 54 20 26 DIV_FLOAT_LEFT &
1c40: 20 70 69 6b 46 6c 61 67 73 29 7b 0a 20 20 20 20 pikFlags){.
1c50: 20 20 20 20 20 20 20 20 7a 57 72 61 70 70 65 72 zWrapper
1c60: 43 6c 61 73 73 20 3d 20 22 20 66 6c 6f 61 74 2d Class = " float-
1c70: 6c 65 66 74 22 3b 0a 20 20 20 20 20 20 20 20 20 left";.
1c80: 20 7d 65 6c 73 65 20 69 66 28 50 49 4b 43 48 52 }else if(PIKCHR
1c90: 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 46 4c 4f _PROCESS_DIV_FLO
1ca0: 41 54 5f 52 49 47 48 54 20 26 20 70 69 6b 46 6c AT_RIGHT & pikFl
1cb0: 61 67 73 29 7b 0a 20 20 20 20 20 20 20 20 20 20 ags){.
1cc0: 20 20 7a 57 72 61 70 70 65 72 43 6c 61 73 73 20 zWrapperClass
1cd0: 3d 20 22 20 66 6c 6f 61 74 2d 72 69 67 68 74 22 = " float-right"
1ce0: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 ;. }.
1cf0: 20 20 20 20 20 20 20 20 69 66 28 50 49 4b 43 48 if(PIKCH
1d00: 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 54 4f R_PROCESS_DIV_TO
1d10: 47 47 4c 45 20 26 20 70 69 6b 46 6c 61 67 73 29 GGLE & pikFlags)
1d20: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 7a 43 {. zC
1d30: 6c 61 73 73 54 6f 67 67 6c 65 20 3d 20 22 20 74 lassToggle = " t
1d40: 6f 67 67 6c 65 22 3b 0a 20 20 20 20 20 20 20 20 oggle";.
1d50: 20 20 7d 0a 20 20 20 20 20 20 20 20 20 20 69 66 }. if
1d60: 28 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f (PIKCHR_PROCESS_
1d70: 44 49 56 5f 53 4f 55 52 43 45 5f 49 4e 4c 49 4e DIV_SOURCE_INLIN
1d80: 45 20 26 20 70 69 6b 46 6c 61 67 73 29 7b 0a 20 E & pikFlags){.
1d90: 20 20 20 20 20 20 20 20 20 20 20 69 66 28 50 49 if(PI
1da0: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 KCHR_PROCESS_DIV
1db0: 5f 53 4f 55 52 43 45 20 26 20 70 69 6b 46 6c 61 _SOURCE & pikFla
1dc0: 67 73 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 gs){.
1dd0: 20 20 20 7a 43 6c 61 73 73 53 6f 75 72 63 65 20 zClassSource
1de0: 3d 20 22 20 73 6f 75 72 63 65 20 73 6f 75 72 63 = " source sourc
1df0: 65 2d 69 6e 6c 69 6e 65 22 3b 0a 20 20 20 20 20 e-inline";.
1e00: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
1e10: 20 20 20 20 20 20 20 20 20 20 20 20 7a 43 6c 61 zCla
1e20: 73 73 53 6f 75 72 63 65 20 3d 20 22 20 73 6f 75 ssSource = " sou
1e30: 72 63 65 2d 69 6e 6c 69 6e 65 22 3b 0a 20 20 20 rce-inline";.
1e40: 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 }.
1e50: 20 20 20 20 20 20 20 70 69 6b 46 6c 61 67 73 20 pikFlags
1e60: 7c 3d 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 |= PIKCHR_PROCES
1e70: 53 5f 53 52 43 3b 0a 20 20 20 20 20 20 20 20 20 S_SRC;.
1e80: 20 7d 65 6c 73 65 20 69 66 28 50 49 4b 43 48 52 }else if(PIKCHR
1e90: 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 53 4f 55 _PROCESS_DIV_SOU
1ea0: 52 43 45 20 26 20 70 69 6b 46 6c 61 67 73 29 7b RCE & pikFlags){
1eb0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 7a 43 6c . zCl
1ec0: 61 73 73 53 6f 75 72 63 65 20 3d 20 22 20 73 6f assSource = " so
1ed0: 75 72 63 65 22 3b 0a 20 20 20 20 20 20 20 20 20 urce";.
1ee0: 20 20 20 70 69 6b 46 6c 61 67 73 20 7c 3d 20 50 pikFlags |= P
1ef0: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 53 52 IKCHR_PROCESS_SR
1f00: 43 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 C;. }.
1f10: 20 20 20 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 blob_ap
1f20: 70 65 6e 64 66 28 70 4f 75 74 2c 22 3c 64 69 76 pendf(pOut,"<div
1f30: 20 63 6c 61 73 73 3d 27 70 69 6b 63 68 72 2d 77 class='pikchr-w
1f40: 72 61 70 70 65 72 22 0a 20 20 20 20 20 20 20 20 rapper".
1f50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "
1f60: 25 73 25 73 25 73 27 3e 22 0a 20 20 20 20 20 20 %s%s%s'>".
1f70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1f80: 20 22 3c 64 69 76 20 63 6c 61 73 73 3d 5c 22 70 "<div class=\"p
1f90: 69 6b 63 68 72 2d 73 76 67 5c 22 20 22 0a 20 20 ikchr-svg\" ".
1fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1fb0: 20 20 20 20 20 22 73 74 79 6c 65 3d 5c 22 6d 61 "style=\"ma
1fc0: 78 2d 77 69 64 74 68 3a 25 64 70 78 5c 22 3e 5c x-width:%dpx\">\
1fd0: 6e 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 n",.
1fe0: 20 20 20 20 20 20 20 20 20 20 20 7a 57 72 61 70 zWrap
1ff0: 70 65 72 43 6c 61 73 73 2f 2a 73 61 66 65 2d 66 perClass/*safe-f
2000: 6f 72 2d 25 73 2a 2f 2c 0a 20 20 20 20 20 20 20 or-%s*/,.
2010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2020: 7a 43 6c 61 73 73 54 6f 67 67 6c 65 2f 2a 73 61 zClassToggle/*sa
2030: 66 65 2d 66 6f 72 2d 25 73 2a 2f 2c 0a 20 20 20 fe-for-%s*/,.
2040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2050: 20 20 20 20 7a 43 6c 61 73 73 53 6f 75 72 63 65 zClassSource
2060: 2f 2a 73 61 66 65 2d 66 6f 72 2d 25 73 2a 2f 2c /*safe-for-%s*/,
2070: 20 77 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 w);. }.
2080: 20 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 blob_appe
2090: 6e 64 28 70 4f 75 74 2c 20 7a 4f 75 74 2c 20 2d nd(pOut, zOut, -
20a0: 31 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 50 1);. if(P
20b0: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 IKCHR_PROCESS_DI
20c0: 56 20 26 20 70 69 6b 46 6c 61 67 73 29 7b 0a 20 V & pikFlags){.
20d0: 20 20 20 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 blob_ap
20e0: 70 65 6e 64 28 70 4f 75 74 2c 20 22 3c 2f 64 69 pend(pOut, "</di
20f0: 76 3e 5c 6e 22 2c 20 37 29 3b 0a 20 20 20 20 20 v>\n", 7);.
2100: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 69 66 28 }. if(
2110: 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 53 PIKCHR_PROCESS_S
2120: 52 43 20 26 20 70 69 6b 46 6c 61 67 73 29 7b 0a RC & pikFlags){.
2130: 20 20 20 20 20 20 20 20 20 20 73 74 61 74 69 63 static
2140: 20 69 6e 74 20 63 6f 75 6e 74 65 72 20 3d 20 30 int counter = 0
2150: 3b 0a 20 20 20 20 20 20 20 20 20 20 2b 2b 63 6f ;. ++co
2160: 75 6e 74 65 72 3b 0a 20 20 20 20 20 20 20 20 20 unter;.
2170: 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 70 4f blob_appendf(pO
2180: 75 74 2c 20 22 3c 64 69 76 20 63 6c 61 73 73 3d ut, "<div class=
2190: 27 70 69 6b 63 68 72 2d 73 72 63 27 3e 22 0a 20 'pikchr-src'>".
21a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
21b0: 20 20 20 20 20 20 22 3c 70 72 65 20 69 64 3d 27 "<pre id='
21c0: 70 69 6b 63 68 72 2d 73 72 63 2d 25 64 27 3e 25 pikchr-src-%d'>%
21d0: 68 3c 2f 70 72 65 3e 22 0a 20 20 20 20 20 20 20 h</pre>".
21e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
21f0: 22 3c 73 70 61 6e 20 63 6c 61 73 73 3d 27 68 69 "<span class='hi
2200: 64 64 65 6e 27 3e 22 0a 20 20 20 20 20 20 20 20 dden'>".
2210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "
2220: 3c 61 20 68 72 65 66 3d 27 25 52 2f 70 69 6b 63 <a href='%R/pikc
2230: 68 72 73 68 6f 77 3f 66 72 6f 6d 53 65 73 73 69 hrshow?fromSessi
2240: 6f 6e 27 20 22 0a 20 20 20 20 20 20 20 20 20 20 on' ".
2250: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 63 6c "cl
2260: 61 73 73 3d 27 70 69 6b 63 68 72 2d 73 72 63 2d ass='pikchr-src-
2270: 70 69 6b 63 68 72 73 68 6f 77 27 20 74 61 72 67 pikchrshow' targ
2280: 65 74 3d 27 5f 6e 65 77 2d 25 64 27 20 22 0a 20 et='_new-%d' ".
2290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
22a0: 20 20 20 20 20 20 22 64 61 74 61 2d 70 69 6b 63 "data-pikc
22b0: 68 72 69 64 3d 27 70 69 6b 63 68 72 2d 73 72 63 hrid='pikchr-src
22c0: 2d 25 64 27 20 22 0a 20 20 20 20 20 20 20 20 20 -%d' ".
22d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 "t
22e0: 69 74 6c 65 3d 27 4f 70 65 6e 20 74 68 69 73 20 itle='Open this
22f0: 70 69 6b 63 68 72 20 69 6e 20 2f 70 69 6b 63 68 pikchr in /pikch
2300: 72 73 68 6f 77 27 22 0a 20 20 20 20 20 20 20 20 rshow'".
2310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "
2320: 3e 26 72 61 72 72 3b 20 2f 70 69 6b 63 68 72 73 >→ /pikchrs
2330: 68 6f 77 3c 2f 61 3e 3c 2f 73 70 61 6e 3e 22 0a how</a></span>".
2340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2350: 20 20 20 20 20 20 20 22 3c 2f 64 69 76 3e 5c 6e "</div>\n
2360: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ",.
2370: 20 20 20 20 20 20 20 20 20 20 63 6f 75 6e 74 65 counte
2380: 72 2c 20 62 6c 6f 62 5f 73 74 72 28 26 62 49 6e r, blob_str(&bIn
2390: 29 2c 20 63 6f 75 6e 74 65 72 2c 20 63 6f 75 6e ), counter, coun
23a0: 74 65 72 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a ter);. }.
23b0: 20 20 20 20 20 20 20 20 69 66 28 50 49 4b 43 48 if(PIKCH
23c0: 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 20 26 20 R_PROCESS_DIV &
23d0: 70 69 6b 46 6c 61 67 73 29 7b 0a 20 20 20 20 20 pikFlags){.
23e0: 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 blob_append
23f0: 28 70 4f 75 74 2c 20 22 3c 2f 64 69 76 3e 5c 6e (pOut, "</div>\n
2400: 22 2c 20 37 29 3b 0a 20 20 20 20 20 20 20 20 7d ", 7);. }
2410: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 . }else{.
2420: 20 20 20 20 20 20 69 73 45 72 72 20 3d 20 32 3b isErr = 2;
2430: 0a 20 20 20 20 20 20 20 20 69 66 28 50 49 4b 43 . if(PIKC
2440: 48 52 5f 50 52 4f 43 45 53 53 5f 45 52 52 5f 50 HR_PROCESS_ERR_P
2450: 52 45 20 26 20 70 69 6b 46 6c 61 67 73 29 7b 0a RE & pikFlags){.
2460: 20 20 20 20 20 20 20 20 20 20 62 6c 6f 62 5f 61 blob_a
2470: 70 70 65 6e 64 28 70 4f 75 74 2c 20 22 3c 70 72 ppend(pOut, "<pr
2480: 65 20 63 6c 61 73 73 3d 27 65 72 72 6f 72 27 3e e class='error'>
2490: 5c 6e 22 2c 20 32 30 29 3b 0a 20 20 20 20 20 20 \n", 20);.
24a0: 20 20 7d 0a 20 20 20 20 20 20 20 20 62 6c 6f 62 }. blob
24b0: 5f 61 70 70 65 6e 64 66 28 70 4f 75 74 2c 20 22 _appendf(pOut, "
24c0: 25 68 22 2c 20 7a 4f 75 74 29 3b 0a 20 20 20 20 %h", zOut);.
24d0: 20 20 20 20 69 66 28 50 49 4b 43 48 52 5f 50 52 if(PIKCHR_PR
24e0: 4f 43 45 53 53 5f 45 52 52 5f 50 52 45 20 26 20 OCESS_ERR_PRE &
24f0: 70 69 6b 46 6c 61 67 73 29 7b 0a 20 20 20 20 20 pikFlags){.
2500: 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 blob_append
2510: 28 70 4f 75 74 2c 20 22 5c 6e 3c 2f 70 72 65 3e (pOut, "\n</pre>
2520: 5c 6e 22 2c 20 38 29 3b 0a 20 20 20 20 20 20 20 \n", 8);.
2530: 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 }. }.
2540: 20 66 6f 73 73 69 6c 5f 66 72 65 65 28 7a 4f 75 fossil_free(zOu
2550: 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 t);. }. }.
2560: 69 66 28 7a 4e 6f 6e 63 65 29 7b 0a 20 20 20 20 if(zNonce){.
2570: 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 70 4f 75 blob_appendf(pOu
2580: 74 2c 20 22 25 73 5c 6e 22 2c 20 7a 4e 6f 6e 63 t, "%s\n", zNonc
2590: 65 29 3b 0a 20 20 7d 0a 20 20 62 6c 6f 62 5f 72 e);. }. blob_r
25a0: 65 73 65 74 28 26 62 49 6e 29 3b 0a 20 20 72 65 eset(&bIn);. re
25b0: 74 75 72 6e 20 69 73 45 72 72 3b 0a 7d 0a 0a 2f turn isErr;.}../
25c0: 2a 0a 2a 2a 20 4c 65 67 61 63 79 20 69 6d 70 6c *.** Legacy impl
25d0: 20 6f 66 20 2f 70 69 6b 63 68 72 73 68 6f 77 2e of /pikchrshow.
25e0: 20 70 69 6b 63 68 72 73 68 6f 77 5f 70 61 67 65 pikchrshow_page
25f0: 28 29 20 77 69 6c 6c 20 64 65 6c 65 67 61 74 65 () will delegate
2600: 20 74 6f 0a 2a 2a 20 74 68 69 73 20 6f 6e 65 20 to.** this one
2610: 69 66 20 74 68 65 20 22 6c 65 67 61 63 79 22 20 if the "legacy"
2620: 6f 72 20 22 61 6a 61 78 22 20 72 65 71 75 65 73 or "ajax" reques
2630: 74 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 t arguments are
2640: 73 65 74 2e 0a 2a 2a 0a 2a 2a 20 41 20 70 69 6b set..**.** A pik
2650: 63 68 72 20 63 6f 64 65 20 65 64 69 74 6f 72 20 chr code editor
2660: 61 6e 64 20 70 72 65 76 69 65 77 65 72 2c 20 61 and previewer, a
2670: 6c 6c 6f 77 69 6e 67 20 75 73 65 72 73 20 74 6f llowing users to
2680: 20 65 78 70 65 72 69 6d 65 6e 74 0a 2a 2a 20 77 experiment.** w
2690: 69 74 68 20 70 69 6b 63 68 72 20 63 6f 64 65 20 ith pikchr code
26a0: 6f 72 20 70 72 6f 74 6f 74 79 70 65 20 69 74 20 or prototype it
26b0: 66 6f 72 20 75 73 65 20 69 6e 20 63 6f 70 79 2f for use in copy/
26c0: 70 61 73 74 69 6e 67 20 69 6e 74 6f 20 66 6f 72 pasting into for
26d0: 75 6d 0a 2a 2a 20 70 6f 73 74 73 2c 20 77 69 6b um.** posts, wik
26e0: 69 20 70 61 67 65 73 2c 20 6f 72 20 65 6d 62 65 i pages, or embe
26f0: 64 64 65 64 20 64 6f 63 73 2e 20 54 68 69 73 20 dded docs. This
2700: 76 65 72 73 69 6f 6e 20 6f 66 20 70 69 6b 63 68 version of pikch
2710: 72 73 68 6f 77 0a 2a 2a 20 75 73 65 73 20 4a 61 rshow.** uses Ja
2720: 76 61 53 63 72 69 70 74 20 74 6f 20 73 65 6e 64 vaScript to send
2730: 20 70 69 6b 63 68 72 20 63 6f 64 65 20 74 6f 20 pikchr code to
2740: 74 68 65 20 73 65 72 76 65 72 20 66 6f 72 0a 2a the server for.*
2750: 2a 20 70 72 6f 63 65 73 73 69 6e 67 2e 20 54 68 * processing. Th
2760: 65 20 6e 65 77 65 72 20 2f 70 69 6b 63 68 72 73 e newer /pikchrs
2770: 68 6f 77 20 61 70 70 6c 69 63 61 74 69 6f 6e 73 how applications
2780: 20 72 75 6e 73 20 70 69 6b 63 68 72 20 6f 6e 20 runs pikchr on
2790: 74 68 65 0a 2a 2a 20 63 6c 69 65 6e 74 20 6d 61 the.** client ma
27a0: 63 68 69 6e 65 2c 20 77 69 74 68 6f 75 74 20 74 chine, without t
27b0: 68 65 20 6e 65 65 64 20 66 6f 72 20 62 61 63 6b he need for back
27c0: 2d 61 6e 64 2d 66 6f 72 74 68 20 6e 65 74 77 6f -and-forth netwo
27d0: 72 6b 0a 2a 2a 20 74 72 61 66 66 69 63 2e 0a 2a rk.** traffic..*
27e0: 2f 0a 76 6f 69 64 20 70 69 6b 63 68 72 73 68 6f /.void pikchrsho
27f0: 77 63 73 5f 70 61 67 65 28 76 6f 69 64 29 7b 0a wcs_page(void){.
2800: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 const char *zC
2810: 6f 6e 74 65 6e 74 20 3d 20 30 3b 0a 20 20 69 6e ontent = 0;. in
2820: 74 20 69 73 44 61 72 6b 3b 20 20 20 20 20 20 20 t isDark;
2830: 20 20 20 20 20 20 20 2f 2a 20 74 72 75 65 20 69 /* true i
2840: 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 73 6b f the current sk
2850: 69 6e 20 69 73 20 22 64 61 72 6b 22 20 2a 2f 0a in is "dark" */.
2860: 20 20 69 6e 74 20 70 69 6b 46 6c 61 67 73 20 3d int pikFlags =
2870: 0a 20 20 20 20 50 49 4b 43 48 52 5f 50 52 4f 43 . PIKCHR_PROC
2880: 45 53 53 5f 44 49 56 0a 20 20 20 20 7c 20 50 49 ESS_DIV. | PI
2890: 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 53 52 43 KCHR_PROCESS_SRC
28a0: 0a 20 20 20 20 7c 20 50 49 4b 43 48 52 5f 50 52 . | PIKCHR_PR
28b0: 4f 43 45 53 53 5f 45 52 52 5f 50 52 45 3b 0a 0a OCESS_ERR_PRE;..
28c0: 20 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 login_check_cr
28d0: 65 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 edentials();. i
28e0: 66 28 20 21 67 2e 70 65 72 6d 2e 52 64 57 69 6b f( !g.perm.RdWik
28f0: 69 20 26 26 20 21 67 2e 70 65 72 6d 2e 52 65 61 i && !g.perm.Rea
2900: 64 20 26 26 20 21 67 2e 70 65 72 6d 2e 52 64 46 d && !g.perm.RdF
2910: 6f 72 75 6d 20 29 7b 0a 20 20 20 20 63 67 69 5f orum ){. cgi_
2920: 72 65 64 69 72 65 63 74 66 28 22 25 52 2f 6c 6f redirectf("%R/lo
2930: 67 69 6e 3f 67 3d 70 69 6b 63 68 72 73 68 6f 77 gin?g=pikchrshow
2940: 63 73 22 29 3b 0a 20 20 7d 0a 20 20 69 66 28 50 cs");. }. if(P
2950: 28 22 77 61 73 6d 22 29 29 7b 0a 20 20 20 20 70 ("wasm")){. p
2960: 69 6b 63 68 72 73 68 6f 77 5f 70 61 67 65 28 29 ikchrshow_page()
2970: 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 ;. return;.
2980: 7d 0a 20 20 7a 43 6f 6e 74 65 6e 74 20 3d 20 50 }. zContent = P
2990: 44 28 22 63 6f 6e 74 65 6e 74 22 2c 50 28 22 70 D("content",P("p
29a0: 22 29 29 3b 0a 20 20 69 66 28 50 28 22 61 6a 61 "));. if(P("aja
29b0: 78 22 29 21 3d 30 29 7b 0a 20 20 20 20 2f 2a 20 x")!=0){. /*
29c0: 43 61 6c 6c 65 64 20 66 72 6f 6d 20 74 68 65 20 Called from the
29d0: 4a 53 2d 73 69 64 65 20 70 72 65 76 69 65 77 20 JS-side preview
29e0: 75 70 64 61 74 65 72 2e 0a 20 20 20 20 20 20 20 updater..
29f0: 54 4f 44 4f 3a 20 72 65 73 70 6f 6e 64 20 77 69 TODO: respond wi
2a00: 74 68 20 4a 53 4f 4e 20 69 6e 73 74 65 61 64 2e th JSON instead.
2a10: 2a 2f 0a 20 20 20 20 63 67 69 5f 73 65 74 5f 63 */. cgi_set_c
2a20: 6f 6e 74 65 6e 74 5f 74 79 70 65 28 22 74 65 78 ontent_type("tex
2a30: 74 2f 68 74 6d 6c 22 29 3b 0a 20 20 20 20 69 66 t/html");. if
2a40: 28 7a 43 6f 6e 74 65 6e 74 20 26 26 20 2a 7a 43 (zContent && *zC
2a50: 6f 6e 74 65 6e 74 29 7b 0a 20 20 20 20 20 20 42 ontent){. B
2a60: 6c 6f 62 20 6f 75 74 20 3d 20 65 6d 70 74 79 5f lob out = empty_
2a70: 62 6c 6f 62 3b 0a 20 20 20 20 20 20 63 6f 6e 73 blob;. cons
2a80: 74 20 69 6e 74 20 69 73 45 72 72 20 3d 0a 20 20 t int isErr =.
2a90: 20 20 20 20 20 20 70 69 6b 63 68 72 5f 70 72 6f pikchr_pro
2aa0: 63 65 73 73 28 7a 43 6f 6e 74 65 6e 74 2c 20 70 cess(zContent, p
2ab0: 69 6b 46 6c 61 67 73 2c 20 30 2c 20 26 6f 75 74 ikFlags, 0, &out
2ac0: 29 3b 0a 20 20 20 20 20 20 69 66 28 69 73 45 72 );. if(isEr
2ad0: 72 29 7b 0a 20 20 20 20 20 20 20 20 63 67 69 5f r){. cgi_
2ae0: 70 72 69 6e 74 66 5f 68 65 61 64 65 72 28 22 78 printf_header("x
2af0: 2d 70 69 6b 63 68 72 73 68 6f 77 2d 69 73 2d 65 -pikchrshow-is-e
2b00: 72 72 6f 72 3a 20 25 64 5c 72 5c 6e 22 2c 20 69 rror: %d\r\n", i
2b10: 73 45 72 72 29 3b 0a 20 20 20 20 20 20 7d 0a 20 sErr);. }.
2b20: 20 20 20 20 20 43 58 28 22 25 62 22 2c 20 26 6f CX("%b", &o
2b30: 75 74 29 3b 0a 20 20 20 20 20 20 62 6c 6f 62 5f ut);. blob_
2b40: 72 65 73 65 74 28 26 6f 75 74 29 3b 0a 20 20 20 reset(&out);.
2b50: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 43 58 }else{. CX
2b60: 28 22 3c 70 72 65 3e 4e 6f 20 63 6f 6e 74 65 6e ("<pre>No conten
2b70: 74 21 20 4e 6f 74 68 69 6e 67 20 74 6f 20 72 65 t! Nothing to re
2b80: 6e 64 65 72 3c 2f 70 72 65 3e 22 29 3b 0a 20 20 nder</pre>");.
2b90: 20 20 7d 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a }. return;.
2ba0: 20 20 7d 2f 2a 61 6a 61 78 20 72 65 73 70 6f 6e }/*ajax respon
2bb0: 73 65 2a 2f 0a 20 20 73 74 79 6c 65 5f 65 6d 69 se*/. style_emi
2bc0: 74 5f 6e 6f 73 63 72 69 70 74 5f 66 6f 72 5f 6a t_noscript_for_j
2bd0: 73 5f 70 61 67 65 28 29 3b 0a 20 20 69 73 44 61 s_page();. isDa
2be0: 72 6b 20 3d 20 73 6b 69 6e 5f 64 65 74 61 69 6c rk = skin_detail
2bf0: 5f 62 6f 6f 6c 65 61 6e 28 22 77 68 69 74 65 2d _boolean("white-
2c00: 66 6f 72 65 67 72 6f 75 6e 64 22 29 3b 0a 20 20 foreground");.
2c10: 69 66 28 21 7a 43 6f 6e 74 65 6e 74 29 7b 0a 20 if(!zContent){.
2c20: 20 20 20 7a 43 6f 6e 74 65 6e 74 20 3d 20 22 61 zContent = "a
2c30: 72 72 6f 77 20 72 69 67 68 74 20 32 30 30 25 20 rrow right 200%
2c40: 5c 22 4d 61 72 6b 64 6f 77 6e 5c 22 20 5c 22 53 \"Markdown\" \"S
2c50: 6f 75 72 63 65 5c 22 5c 6e 22 0a 20 20 20 20 20 ource\"\n".
2c60: 20 22 62 6f 78 20 72 61 64 20 31 30 70 78 20 5c "box rad 10px \
2c70: 22 4d 61 72 6b 64 6f 77 6e 5c 22 20 5c 22 46 6f "Markdown\" \"Fo
2c80: 72 6d 61 74 74 65 72 5c 22 20 5c 22 28 6d 61 72 rmatter\" \"(mar
2c90: 6b 64 6f 77 6e 2e 63 29 5c 22 20 66 69 74 5c 6e kdown.c)\" fit\n
2ca0: 22 0a 20 20 20 20 20 20 22 61 72 72 6f 77 20 72 ". "arrow r
2cb0: 69 67 68 74 20 32 30 30 25 20 5c 22 48 54 4d 4c ight 200% \"HTML
2cc0: 2b 53 56 47 5c 22 20 5c 22 4f 75 74 70 75 74 5c +SVG\" \"Output\
2cd0: 22 5c 6e 22 0a 20 20 20 20 20 20 22 61 72 72 6f "\n". "arro
2ce0: 77 20 3c 2d 3e 20 64 6f 77 6e 20 66 72 6f 6d 20 w <-> down from
2cf0: 6c 61 73 74 20 62 6f 78 2e 73 5c 6e 22 0a 20 20 last box.s\n".
2d00: 20 20 20 20 22 62 6f 78 20 73 61 6d 65 20 5c 22 "box same \"
2d10: 50 69 6b 63 68 72 5c 22 20 5c 22 46 6f 72 6d 61 Pikchr\" \"Forma
2d20: 74 74 65 72 5c 22 20 5c 22 28 70 69 6b 63 68 72 tter\" \"(pikchr
2d30: 2e 63 29 5c 22 20 66 69 74 5c 6e 22 3b 0a 20 20 .c)\" fit\n";.
2d40: 7d 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72 }. style_header
2d50: 28 22 50 69 6b 63 68 72 53 68 6f 77 20 43 6c 69 ("PikchrShow Cli
2d60: 65 6e 74 2f 53 65 72 76 65 72 22 29 3b 0a 20 20 ent/Server");.
2d70: 43 58 28 22 3c 73 74 79 6c 65 3e 22 29 3b 20 7b CX("<style>"); {
2d80: 0a 20 20 20 20 43 58 28 22 64 69 76 2e 63 6f 6e . CX("div.con
2d90: 74 65 6e 74 20 7b 20 70 61 64 64 69 6e 67 2d 74 tent { padding-t
2da0: 6f 70 3a 20 30 2e 35 65 6d 20 7d 5c 6e 22 29 3b op: 0.5em }\n");
2db0: 0a 20 20 20 20 43 58 28 22 23 73 62 73 2d 77 72 . CX("#sbs-wr
2dc0: 61 70 70 65 72 20 7b 22 0a 20 20 20 20 20 20 20 apper {".
2dd0: 22 64 69 73 70 6c 61 79 3a 20 66 6c 65 78 3b 20 "display: flex;
2de0: 66 6c 65 78 2d 64 69 72 65 63 74 69 6f 6e 3a 20 flex-direction:
2df0: 63 6f 6c 75 6d 6e 3b 22 0a 20 20 20 20 20 20 20 column;".
2e00: 22 7d 5c 6e 22 29 3b 0a 20 20 20 20 43 58 28 22 "}\n");. CX("
2e10: 23 73 62 73 2d 77 72 61 70 70 65 72 20 3e 20 2a #sbs-wrapper > *
2e20: 20 7b 22 0a 20 20 20 20 20 20 20 22 6d 61 72 67 {". "marg
2e30: 69 6e 3a 20 30 20 30 2e 32 35 65 6d 20 30 2e 35 in: 0 0.25em 0.5
2e40: 65 6d 20 30 3b 20 66 6c 65 78 3a 20 31 20 31 30 em 0; flex: 1 10
2e50: 20 61 75 74 6f 3b 22 0a 20 20 20 20 20 20 20 22 auto;". "
2e60: 61 6c 69 67 6e 2d 73 65 6c 66 3a 20 73 74 72 65 align-self: stre
2e70: 74 63 68 3b 22 0a 20 20 20 20 20 20 20 22 7d 5c tch;". "}\
2e80: 6e 22 29 3b 0a 20 20 20 20 43 58 28 22 23 73 62 n");. CX("#sb
2e90: 73 2d 77 72 61 70 70 65 72 20 74 65 78 74 61 72 s-wrapper textar
2ea0: 65 61 20 7b 22 0a 20 20 20 20 20 20 20 22 6d 61 ea {". "ma
2eb0: 78 2d 77 69 64 74 68 3a 20 69 6e 69 74 69 61 6c x-width: initial
2ec0: 3b 20 66 6c 65 78 3a 20 31 20 31 20 61 75 74 6f ; flex: 1 1 auto
2ed0: 3b 22 0a 20 20 20 20 20 20 20 22 7d 5c 6e 22 29 ;". "}\n")
2ee0: 3b 0a 20 20 20 20 43 58 28 22 23 70 69 6b 63 68 ;. CX("#pikch
2ef0: 72 73 68 6f 77 2d 6f 75 74 70 75 74 2c 20 23 70 rshow-output, #p
2f00: 69 6b 63 68 72 73 68 6f 77 2d 66 6f 72 6d 22 0a ikchrshow-form".
2f10: 20 20 20 20 20 20 20 22 7b 64 69 73 70 6c 61 79 "{display
2f20: 3a 20 66 6c 65 78 3b 20 66 6c 65 78 2d 64 69 72 : flex; flex-dir
2f30: 65 63 74 69 6f 6e 3a 20 63 6f 6c 75 6d 6e 3b 20 ection: column;
2f40: 61 6c 69 67 6e 2d 69 74 65 6d 73 3a 20 73 74 72 align-items: str
2f50: 65 74 63 68 3b 7d 22 29 3b 0a 20 20 20 20 43 58 etch;}");. CX
2f60: 28 22 23 70 69 6b 63 68 72 73 68 6f 77 2d 66 6f ("#pikchrshow-fo
2f70: 72 6d 20 3e 20 2a 20 7b 6d 61 72 67 69 6e 3a 20 rm > * {margin:
2f80: 30 2e 32 35 65 6d 20 30 7d 5c 6e 22 29 3b 0a 20 0.25em 0}\n");.
2f90: 20 20 20 43 58 28 22 23 70 69 6b 63 68 72 73 68 CX("#pikchrsh
2fa0: 6f 77 2d 6f 75 74 70 75 74 20 7b 66 6c 65 78 3a ow-output {flex:
2fb0: 20 35 20 31 20 61 75 74 6f 3b 20 70 61 64 64 69 5 1 auto; paddi
2fc0: 6e 67 3a 20 30 7d 5c 6e 22 29 3b 0a 20 20 20 20 ng: 0}\n");.
2fd0: 43 58 28 22 23 70 69 6b 63 68 72 73 68 6f 77 2d CX("#pikchrshow-
2fe0: 6f 75 74 70 75 74 20 3e 20 70 72 65 2c 20 22 0a output > pre, ".
2ff0: 20 20 20 20 20 20 20 22 23 70 69 6b 63 68 72 73 "#pikchrs
3000: 68 6f 77 2d 6f 75 74 70 75 74 20 3e 20 70 72 65 how-output > pre
3010: 20 3e 20 64 69 76 2c 20 22 0a 20 20 20 20 20 20 > div, ".
3020: 20 22 23 70 69 6b 63 68 72 73 68 6f 77 2d 6f 75 "#pikchrshow-ou
3030: 74 70 75 74 20 3e 20 70 72 65 20 3e 20 64 69 76 tput > pre > div
3040: 20 3e 20 70 72 65 20 22 0a 20 20 20 20 20 20 20 > pre ".
3050: 22 7b 6d 61 72 67 69 6e 3a 20 30 3b 20 70 61 64 "{margin: 0; pad
3060: 64 69 6e 67 3a 20 30 7d 5c 6e 22 29 3b 0a 20 20 ding: 0}\n");.
3070: 20 20 43 58 28 22 23 70 69 6b 63 68 72 73 68 6f CX("#pikchrsho
3080: 77 2d 6f 75 74 70 75 74 2e 65 72 72 6f 72 20 3e w-output.error >
3090: 20 70 72 65 20 22 0a 20 20 20 20 20 20 20 2f 2a pre ". /*
30a0: 20 53 65 72 76 65 72 2d 73 69 64 65 20 65 72 72 Server-side err
30b0: 6f 72 20 72 65 70 6f 72 74 20 2a 2f 0a 20 20 20 or report */.
30c0: 20 20 20 20 22 7b 70 61 64 64 69 6e 67 3a 20 30 "{padding: 0
30d0: 2e 35 65 6d 7d 5c 6e 22 29 3b 0a 20 20 20 20 43 .5em}\n");. C
30e0: 58 28 22 23 70 69 6b 63 68 72 73 68 6f 77 2d 63 X("#pikchrshow-c
30f0: 6f 6e 74 72 6f 6c 73 20 7b 22 20 2f 2a 20 77 68 ontrols {" /* wh
3100: 65 72 65 20 74 68 65 20 62 75 74 74 6f 6e 73 20 ere the buttons
3110: 6c 69 76 65 20 2a 2f 0a 20 20 20 20 20 20 20 22 live */. "
3120: 64 69 73 70 6c 61 79 3a 20 66 6c 65 78 3b 20 66 display: flex; f
3130: 6c 65 78 2d 64 69 72 65 63 74 69 6f 6e 3a 20 72 lex-direction: r
3140: 6f 77 3b 20 22 0a 20 20 20 20 20 20 20 22 61 6c ow; ". "al
3150: 69 67 6e 2d 69 74 65 6d 73 3a 20 63 65 6e 74 65 ign-items: cente
3160: 72 3b 20 66 6c 65 78 2d 77 72 61 70 3a 20 77 72 r; flex-wrap: wr
3170: 61 70 3b 22 0a 20 20 20 20 20 20 20 22 7d 5c 6e ap;". "}\n
3180: 22 29 3b 0a 20 20 20 20 43 58 28 22 23 70 69 6b ");. CX("#pik
3190: 63 68 72 73 68 6f 77 2d 63 6f 6e 74 72 6f 6c 73 chrshow-controls
31a0: 20 3e 20 2a 20 7b 22 0a 20 20 20 20 20 20 20 22 > * {". "
31b0: 64 69 73 70 6c 61 79 3a 20 69 6e 6c 69 6e 65 3b display: inline;
31c0: 20 6d 61 72 67 69 6e 3a 20 30 20 30 2e 32 35 65 margin: 0 0.25e
31d0: 6d 20 30 2e 35 65 6d 20 30 3b 22 0a 20 20 20 20 m 0.5em 0;".
31e0: 20 20 20 22 7d 5c 6e 22 29 3b 0a 20 20 20 20 43 "}\n");. C
31f0: 58 28 22 23 70 69 6b 63 68 72 73 68 6f 77 2d 6f X("#pikchrshow-o
3200: 75 74 70 75 74 2d 77 72 61 70 70 65 72 20 6c 61 utput-wrapper la
3210: 62 65 6c 20 7b 22 0a 20 20 20 20 20 20 20 22 63 bel {". "c
3220: 75 72 73 6f 72 3a 20 70 6f 69 6e 74 65 72 3b 22 ursor: pointer;"
3230: 0a 20 20 20 20 20 20 20 22 7d 5c 6e 22 29 3b 0a . "}\n");.
3240: 20 20 20 20 43 58 28 22 62 6f 64 79 2e 70 69 6b CX("body.pik
3250: 63 68 72 73 68 6f 77 20 2e 69 6e 70 75 74 2d 77 chrshow .input-w
3260: 69 74 68 2d 6c 61 62 65 6c 20 3e 20 2a 20 7b 22 ith-label > * {"
3270: 0a 20 20 20 20 20 20 20 22 6d 61 72 67 69 6e 3a . "margin:
3280: 20 30 20 30 2e 32 65 6d 3b 22 0a 20 20 20 20 20 0 0.2em;".
3290: 20 20 22 7d 5c 6e 22 29 3b 0a 20 20 20 20 43 58 "}\n");. CX
32a0: 28 22 62 6f 64 79 2e 70 69 6b 63 68 72 73 68 6f ("body.pikchrsho
32b0: 77 20 2e 69 6e 70 75 74 2d 77 69 74 68 2d 6c 61 w .input-with-la
32c0: 62 65 6c 20 3e 20 6c 61 62 65 6c 20 7b 22 0a 20 bel > label {".
32d0: 20 20 20 20 20 20 22 63 75 72 73 6f 72 3a 20 70 "cursor: p
32e0: 6f 69 6e 74 65 72 3b 22 0a 20 20 20 20 20 20 20 ointer;".
32f0: 22 7d 5c 6e 22 29 3b 0a 20 20 20 20 43 58 28 22 "}\n");. CX("
3300: 23 70 69 6b 63 68 72 73 68 6f 77 2d 6f 75 74 70 #pikchrshow-outp
3310: 75 74 2e 64 61 72 6b 2d 6d 6f 64 65 20 73 76 67 ut.dark-mode svg
3320: 20 7b 22 0a 20 20 20 20 20 20 20 2f 2a 20 46 6c {". /* Fl
3330: 69 70 20 74 68 65 20 63 6f 6c 6f 72 73 20 74 6f ip the colors to
3340: 20 61 70 70 72 6f 78 69 6d 61 74 65 20 61 20 64 approximate a d
3350: 61 72 6b 20 74 68 65 6d 65 20 6c 6f 6f 6b 20 2a ark theme look *
3360: 2f 0a 20 20 20 20 20 20 20 22 66 69 6c 74 65 72 /. "filter
3370: 3a 20 69 6e 76 65 72 74 28 31 29 20 68 75 65 2d : invert(1) hue-
3380: 72 6f 74 61 74 65 28 31 38 30 64 65 67 29 3b 22 rotate(180deg);"
3390: 0a 20 20 20 20 20 20 20 22 7d 5c 6e 22 29 3b 0a . "}\n");.
33a0: 20 20 20 20 43 58 28 22 23 70 69 6b 63 68 72 73 CX("#pikchrs
33b0: 68 6f 77 2d 6f 75 74 70 75 74 2d 77 72 61 70 70 how-output-wrapp
33c0: 65 72 20 7b 22 0a 20 20 20 20 20 20 20 22 70 61 er {". "pa
33d0: 64 64 69 6e 67 3a 20 30 2e 32 35 65 6d 20 30 2e dding: 0.25em 0.
33e0: 35 65 6d 3b 20 62 6f 72 64 65 72 2d 72 61 64 69 5em; border-radi
33f0: 75 73 3a 20 30 2e 32 35 65 6d 3b 22 0a 20 20 20 us: 0.25em;".
3400: 20 20 20 20 22 62 6f 72 64 65 72 2d 77 69 64 74 "border-widt
3410: 68 3a 20 31 70 78 3b 22 2f 2a 73 6f 6d 65 20 73 h: 1px;"/*some s
3420: 6b 69 6e 73 20 64 69 73 61 62 6c 65 20 66 69 65 kins disable fie
3430: 6c 64 73 65 74 20 62 6f 72 64 65 72 73 2a 2f 0a ldset borders*/.
3440: 20 20 20 20 20 20 20 22 7d 5c 6e 22 29 3b 0a 20 "}\n");.
3450: 20 20 20 43 58 28 22 23 70 69 6b 63 68 72 73 68 CX("#pikchrsh
3460: 6f 77 2d 6f 75 74 70 75 74 2d 77 72 61 70 70 65 ow-output-wrappe
3470: 72 20 3e 20 6c 65 67 65 6e 64 20 3e 20 2a 3a 6e r > legend > *:n
3480: 6f 74 28 2e 63 6f 70 79 2d 62 75 74 74 6f 6e 29 ot(.copy-button)
3490: 7b 22 0a 20 20 20 20 20 20 20 22 6d 61 72 67 69 {". "margi
34a0: 6e 2d 72 69 67 68 74 3a 20 30 2e 35 65 6d 3b 20 n-right: 0.5em;
34b0: 76 65 72 74 69 63 61 6c 2d 61 6c 69 67 6e 3a 20 vertical-align:
34c0: 6d 69 64 64 6c 65 3b 22 0a 20 20 20 20 20 20 20 middle;".
34d0: 22 7d 5c 6e 22 29 3b 0a 20 20 20 20 43 58 28 22 "}\n");. CX("
34e0: 62 6f 64 79 2e 70 69 6b 63 68 72 73 68 6f 77 20 body.pikchrshow
34f0: 2e 76 2d 61 6c 69 67 6e 2d 6d 69 64 64 6c 65 7b .v-align-middle{
3500: 22 0a 20 20 20 20 20 20 20 22 76 65 72 74 69 63 ". "vertic
3510: 61 6c 2d 61 6c 69 67 6e 3a 20 6d 69 64 64 6c 65 al-align: middle
3520: 22 0a 20 20 20 20 20 20 20 22 7d 5c 6e 22 29 3b ". "}\n");
3530: 0a 20 20 20 20 43 58 28 22 2e 64 72 61 67 6f 76 . CX(".dragov
3540: 65 72 20 7b 62 6f 72 64 65 72 3a 20 33 70 78 20 er {border: 3px
3550: 64 6f 74 74 65 64 20 72 67 62 61 28 30 2c 32 35 dotted rgba(0,25
3560: 35 2c 30 2c 30 2e 36 29 7d 5c 6e 22 29 3b 0a 20 5,0,0.6)}\n");.
3570: 20 7d 20 43 58 28 22 3c 2f 73 74 79 6c 65 3e 22 } CX("</style>"
3580: 29 3b 0a 20 20 43 58 28 22 3c 64 69 76 3e 49 6e );. CX("<div>In
3590: 70 75 74 20 70 69 6b 63 68 72 20 63 6f 64 65 20 put pikchr code
35a0: 61 6e 64 20 74 61 70 20 50 72 65 76 69 65 77 20 and tap Preview
35b0: 28 6f 72 20 53 68 69 66 74 2d 45 6e 74 65 72 29 (or Shift-Enter)
35c0: 20 74 6f 20 72 65 6e 64 65 72 20 22 0a 20 20 20 to render ".
35d0: 20 20 22 69 74 2e 20 3c 61 20 68 72 65 66 3d 27 "it. <a href='
35e0: 3f 77 61 73 6d 27 3e 53 77 69 74 63 68 20 74 6f ?wasm'>Switch to
35f0: 20 57 41 53 4d 20 6d 6f 64 65 3c 2f 61 3e 2e 3c WASM mode</a>.<
3600: 2f 64 69 76 3e 22 29 3b 0a 20 20 43 58 28 22 3c /div>");. CX("<
3610: 64 69 76 20 69 64 3d 27 73 62 73 2d 77 72 61 70 div id='sbs-wrap
3620: 70 65 72 27 3e 22 29 3b 20 7b 0a 20 20 20 20 43 per'>"); {. C
3630: 58 28 22 3c 64 69 76 20 69 64 3d 27 70 69 6b 63 X("<div id='pikc
3640: 68 72 73 68 6f 77 2d 66 6f 72 6d 27 3e 22 29 3b hrshow-form'>");
3650: 20 7b 0a 20 20 20 20 20 20 43 58 28 22 3c 74 65 {. CX("<te
3660: 78 74 61 72 65 61 20 69 64 3d 27 63 6f 6e 74 65 xtarea id='conte
3670: 6e 74 27 20 6e 61 6d 65 3d 27 63 6f 6e 74 65 6e nt' name='conten
3680: 74 27 20 72 6f 77 73 3d 27 31 35 27 3e 22 0a 20 t' rows='15'>".
3690: 20 20 20 20 20 20 20 20 22 25 73 3c 2f 74 65 78 "%s</tex
36a0: 74 61 72 65 61 3e 22 2c 7a 43 6f 6e 74 65 6e 74 tarea>",zContent
36b0: 2f 2a 73 61 66 65 2d 66 6f 72 2d 25 73 2a 2f 29 /*safe-for-%s*/)
36c0: 3b 0a 20 20 20 20 20 20 43 58 28 22 3c 64 69 76 ;. CX("<div
36d0: 20 69 64 3d 27 70 69 6b 63 68 72 73 68 6f 77 2d id='pikchrshow-
36e0: 63 6f 6e 74 72 6f 6c 73 27 3e 22 29 3b 20 7b 0a controls'>"); {.
36f0: 20 20 20 20 20 20 20 20 43 58 28 22 3c 62 75 74 CX("<but
3700: 74 6f 6e 20 69 64 3d 27 70 69 6b 63 68 72 2d 73 ton id='pikchr-s
3710: 75 62 6d 69 74 2d 70 72 65 76 69 65 77 27 3e 50 ubmit-preview'>P
3720: 72 65 76 69 65 77 3c 2f 62 75 74 74 6f 6e 3e 22 review</button>"
3730: 29 3b 0a 20 20 20 20 20 20 20 20 43 58 28 22 3c );. CX("<
3740: 64 69 76 20 63 6c 61 73 73 3d 27 69 6e 70 75 74 div class='input
3750: 2d 77 69 74 68 2d 6c 61 62 65 6c 27 3e 22 29 3b -with-label'>");
3760: 20 7b 0a 20 20 20 20 20 20 20 20 20 20 43 58 28 {. CX(
3770: 22 3c 62 75 74 74 6f 6e 20 69 64 3d 27 70 69 6b "<button id='pik
3780: 63 68 72 2d 73 74 61 73 68 27 3e 53 74 61 73 68 chr-stash'>Stash
3790: 3c 2f 62 75 74 74 6f 6e 3e 22 29 3b 0a 20 20 20 </button>");.
37a0: 20 20 20 20 20 20 20 43 58 28 22 3c 62 75 74 74 CX("<butt
37b0: 6f 6e 20 69 64 3d 27 70 69 6b 63 68 72 2d 75 6e on id='pikchr-un
37c0: 73 74 61 73 68 27 3e 55 6e 73 74 61 73 68 3c 2f stash'>Unstash</
37d0: 62 75 74 74 6f 6e 3e 22 29 3b 0a 20 20 20 20 20 button>");.
37e0: 20 20 20 20 20 43 58 28 22 3c 62 75 74 74 6f 6e CX("<button
37f0: 20 69 64 3d 27 70 69 6b 63 68 72 2d 63 6c 65 61 id='pikchr-clea
3800: 72 2d 73 74 61 73 68 27 3e 43 6c 65 61 72 20 73 r-stash'>Clear s
3810: 74 61 73 68 3c 2f 62 75 74 74 6f 6e 3e 22 29 3b tash</button>");
3820: 0a 20 20 20 20 20 20 20 20 20 20 43 58 28 22 3c . CX("<
3830: 73 70 61 6e 3e 53 74 6f 72 65 73 2f 72 65 73 74 span>Stores/rest
3840: 6f 72 65 73 20 61 20 73 69 6e 67 6c 65 20 70 69 ores a single pi
3850: 6b 63 68 72 20 73 63 72 69 70 74 20 74 6f 2f 66 kchr script to/f
3860: 72 6f 6d 20 22 0a 20 20 20 20 20 20 20 20 20 20 rom ".
3870: 20 20 20 22 62 72 6f 77 73 65 72 2d 6c 6f 63 61 "browser-loca
3880: 6c 20 73 74 6f 72 61 67 65 20 66 72 6f 6d 2f 74 l storage from/t
3890: 6f 20 74 68 65 20 65 64 69 74 6f 72 2e 3c 2f 73 o the editor.</s
38a0: 70 61 6e 3e 22 0a 20 20 20 20 20 20 20 20 20 20 pan>".
38b0: 20 20 20 2f 2a 20 67 65 74 73 20 74 75 72 6e 65 /* gets turne
38c0: 64 20 69 6e 74 6f 20 61 20 68 65 6c 70 2d 62 75 d into a help-bu
38d0: 74 74 6f 6e 6c 65 74 20 2a 2f 29 3b 0a 20 20 20 ttonlet */);.
38e0: 20 20 20 20 20 7d 20 43 58 28 22 3c 2f 64 69 76 } CX("</div
38f0: 3e 22 2f 2a 73 74 61 73 68 20 63 6f 6e 74 72 6f >"/*stash contro
3900: 6c 73 2a 2f 29 3b 0a 20 20 20 20 20 20 20 20 73 ls*/);. s
3910: 74 79 6c 65 5f 6c 61 62 65 6c 65 64 5f 63 68 65 tyle_labeled_che
3920: 63 6b 62 6f 78 28 22 66 6c 69 70 63 6f 6c 6f 72 ckbox("flipcolor
3930: 73 2d 77 72 61 70 70 65 72 22 2c 20 22 66 6c 69 s-wrapper", "fli
3940: 70 63 6f 6c 6f 72 73 22 2c 0a 20 20 20 20 20 20 pcolors",.
3950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3960: 20 20 20 20 20 20 20 20 20 22 44 61 72 6b 20 6d "Dark m
3970: 6f 64 65 3f 22 2c 0a 20 20 20 20 20 20 20 20 20 ode?",.
3980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3990: 20 20 20 20 20 20 22 31 22 2c 20 69 73 44 61 72 "1", isDar
39a0: 6b 2c 20 30 29 3b 0a 20 20 20 20 20 20 7d 20 43 k, 0);. } C
39b0: 58 28 22 3c 2f 64 69 76 3e 22 2f 2a 23 70 69 6b X("</div>"/*#pik
39c0: 63 68 72 73 68 6f 77 2d 63 6f 6e 74 72 6f 6c 73 chrshow-controls
39d0: 2a 2f 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 43 */);. }. C
39e0: 58 28 22 3c 2f 64 69 76 3e 22 2f 2a 23 70 69 6b X("</div>"/*#pik
39f0: 63 68 72 73 68 6f 77 2d 66 6f 72 6d 2a 2f 29 3b chrshow-form*/);
3a00: 0a 20 20 20 20 43 58 28 22 3c 66 69 65 6c 64 73 . CX("<fields
3a10: 65 74 20 69 64 3d 27 70 69 6b 63 68 72 73 68 6f et id='pikchrsho
3a20: 77 2d 6f 75 74 70 75 74 2d 77 72 61 70 70 65 72 w-output-wrapper
3a30: 27 3e 22 29 3b 20 7b 0a 20 20 20 20 20 20 43 58 '>"); {. CX
3a40: 28 22 3c 6c 65 67 65 6e 64 3e 3c 2f 6c 65 67 65 ("<legend></lege
3a50: 6e 64 3e 22 0a 20 20 20 20 20 20 20 20 20 2f 2a nd>". /*
3a60: 20 52 65 6d 69 6e 64 65 72 3a 20 46 69 72 65 66 Reminder: Firef
3a70: 6f 78 20 64 6f 65 73 20 6e 6f 74 20 70 72 6f 70 ox does not prop
3a80: 65 72 6c 79 20 66 6c 65 78 62 6f 78 20 61 20 4c erly flexbox a L
3a90: 45 47 45 4e 44 0a 20 20 20 20 20 20 20 20 20 20 EGEND.
3aa0: 20 20 65 6c 65 6d 65 6e 74 2c 20 61 6c 77 61 79 element, alway
3ab0: 73 20 66 6c 6f 77 69 6e 67 20 69 74 20 69 6e 20 s flowing it in
3ac0: 63 6f 6c 75 6d 6e 20 6d 6f 64 65 2e 20 2a 2f 29 column mode. */)
3ad0: 3b 0a 20 20 20 20 20 20 43 58 28 22 3c 64 69 76 ;. CX("<div
3ae0: 20 69 64 3d 27 70 69 6b 63 68 72 73 68 6f 77 2d id='pikchrshow-
3af0: 6f 75 74 70 75 74 27 3e 22 29 3b 0a 20 20 20 20 output'>");.
3b00: 20 20 69 66 28 2a 7a 43 6f 6e 74 65 6e 74 29 7b if(*zContent){
3b10: 0a 20 20 20 20 20 20 20 20 42 6c 6f 62 20 6f 75 . Blob ou
3b20: 74 20 3d 20 65 6d 70 74 79 5f 62 6c 6f 62 3b 0a t = empty_blob;.
3b30: 20 20 20 20 20 20 20 20 70 69 6b 63 68 72 5f 70 pikchr_p
3b40: 72 6f 63 65 73 73 28 7a 43 6f 6e 74 65 6e 74 2c rocess(zContent,
3b50: 20 70 69 6b 46 6c 61 67 73 2c 20 30 2c 20 26 6f pikFlags, 0, &o
3b60: 75 74 29 3b 0a 20 20 20 20 20 20 20 20 43 58 28 ut);. CX(
3b70: 22 25 62 22 2c 20 26 6f 75 74 29 3b 0a 20 20 20 "%b", &out);.
3b80: 20 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 28 blob_reset(
3b90: 26 6f 75 74 29 3b 0a 20 20 20 20 20 20 7d 20 43 &out);. } C
3ba0: 58 28 22 3c 2f 64 69 76 3e 22 2f 2a 23 70 69 6b X("</div>"/*#pik
3bb0: 63 68 72 73 68 6f 77 2d 6f 75 74 70 75 74 2a 2f chrshow-output*/
3bc0: 29 3b 0a 20 20 20 20 7d 20 43 58 28 22 3c 2f 66 );. } CX("</f
3bd0: 69 65 6c 64 73 65 74 3e 22 2f 2a 23 70 69 6b 63 ieldset>"/*#pikc
3be0: 68 72 73 68 6f 77 2d 6f 75 74 70 75 74 2d 77 72 hrshow-output-wr
3bf0: 61 70 70 65 72 2a 2f 29 3b 0a 20 20 7d 20 43 58 apper*/);. } CX
3c00: 28 22 3c 2f 64 69 76 3e 22 2f 2a 73 62 73 2d 77 ("</div>"/*sbs-w
3c10: 72 61 70 70 65 72 2a 2f 29 3b 0a 20 20 62 75 69 rapper*/);. bui
3c20: 6c 74 69 6e 5f 66 6f 73 73 69 6c 5f 6a 73 5f 62 ltin_fossil_js_b
3c30: 75 6e 64 6c 65 5f 6f 72 28 22 66 65 74 63 68 22 undle_or("fetch"
3c40: 2c 20 22 63 6f 70 79 62 75 74 74 6f 6e 22 2c 20 , "copybutton",
3c50: 22 70 6f 70 75 70 77 69 64 67 65 74 22 2c 0a 20 "popupwidget",.
3c60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3c70: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 74 "st
3c80: 6f 72 61 67 65 22 2c 20 22 70 69 6b 63 68 72 22 orage", "pikchr"
3c90: 2c 20 4e 55 4c 4c 29 3b 0a 20 20 62 75 69 6c 74 , NULL);. built
3ca0: 69 6e 5f 72 65 71 75 65 73 74 5f 6a 73 28 22 66 in_request_js("f
3cb0: 6f 73 73 69 6c 2e 70 61 67 65 2e 70 69 6b 63 68 ossil.page.pikch
3cc0: 72 73 68 6f 77 2e 6a 73 22 29 3b 0a 20 20 62 75 rshow.js");. bu
3cd0: 69 6c 74 69 6e 5f 66 75 6c 66 69 6c 6c 5f 6a 73 iltin_fulfill_js
3ce0: 5f 72 65 71 75 65 73 74 73 28 29 3b 0a 20 20 73 _requests();. s
3cf0: 74 79 6c 65 5f 66 69 6e 69 73 68 5f 70 61 67 65 tyle_finish_page
3d00: 28 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 ();.}../*.** WEB
3d10: 50 41 47 45 3a 20 70 69 6b 63 68 72 73 68 6f 77 PAGE: pikchrshow
3d20: 0a 2a 2a 0a 2a 2a 20 41 20 70 69 6b 63 68 72 20 .**.** A pikchr
3d30: 63 6f 64 65 20 65 64 69 74 6f 72 20 61 6e 64 20 code editor and
3d40: 70 72 65 76 69 65 77 65 72 2c 20 61 6c 6c 6f 77 previewer, allow
3d50: 69 6e 67 20 75 73 65 72 73 20 74 6f 20 65 78 70 ing users to exp
3d60: 65 72 69 6d 65 6e 74 0a 2a 2a 20 77 69 74 68 20 eriment.** with
3d70: 70 69 6b 63 68 72 20 63 6f 64 65 20 6f 72 20 70 pikchr code or p
3d80: 72 6f 74 6f 74 79 70 65 20 69 74 20 66 6f 72 20 rototype it for
3d90: 75 73 65 20 69 6e 20 63 6f 70 79 2f 70 61 73 74 use in copy/past
3da0: 69 6e 67 20 69 6e 74 6f 20 66 6f 72 75 6d 0a 2a ing into forum.*
3db0: 2a 20 70 6f 73 74 73 2c 20 77 69 6b 69 20 70 61 * posts, wiki pa
3dc0: 67 65 73 2c 20 6f 72 20 65 6d 62 65 64 64 65 64 ges, or embedded
3dd0: 20 64 6f 63 73 2e 20 54 68 69 73 20 76 65 72 73 docs. This vers
3de0: 69 6f 6e 20 6f 66 20 70 69 6b 63 68 72 73 68 6f ion of pikchrsho
3df0: 77 0a 2a 2a 20 75 73 65 73 20 57 65 62 41 73 73 w.** uses WebAss
3e00: 65 6d 62 6c 79 20 74 6f 20 72 75 6e 20 65 6e 74 embly to run ent
3e10: 69 72 65 6c 79 20 69 6e 20 74 68 65 20 63 6c 69 irely in the cli
3e20: 65 6e 74 20 62 72 6f 77 73 65 72 2c 20 77 69 74 ent browser, wit
3e30: 68 6f 75 74 20 61 0a 2a 2a 20 6e 65 65 64 20 66 hout a.** need f
3e40: 6f 72 20 62 61 63 6b 2d 61 6e 64 2d 66 6f 72 74 or back-and-fort
3e50: 68 20 63 6c 69 65 6e 74 2f 73 65 72 76 65 72 20 h client/server
3e60: 74 72 61 66 66 69 63 20 74 6f 20 70 65 72 66 6f traffic to perfo
3e70: 72 6d 20 74 68 65 0a 2a 2a 20 72 65 6e 64 65 72 rm the.** render
3e80: 69 6e 67 2e 20 54 68 65 20 22 6c 65 67 61 63 79 ing. The "legacy
3e90: 22 20 76 65 72 73 69 6f 6e 20 6f 66 20 74 68 69 " version of thi
3ea0: 73 20 61 70 70 6c 69 63 61 74 69 6f 6e 2c 20 77 s application, w
3eb0: 68 69 63 68 20 73 65 6e 64 73 0a 2a 2a 20 61 6c hich sends.** al
3ec0: 6c 20 69 6e 70 75 74 20 74 6f 20 74 68 65 20 73 l input to the s
3ed0: 65 72 76 65 72 20 66 6f 72 20 72 65 6e 64 65 72 erver for render
3ee0: 69 6e 67 2c 20 63 61 6e 20 62 65 20 61 63 63 65 ing, can be acce
3ef0: 73 73 65 64 20 62 79 20 61 64 64 69 6e 67 0a 2a ssed by adding.*
3f00: 2a 20 74 68 65 20 22 6c 65 67 61 63 79 22 20 55 * the "legacy" U
3f10: 52 4c 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2a 0a RL argument..**.
3f20: 2a 2a 20 49 74 20 6f 70 74 69 6f 6e 61 6c 6c 79 ** It optionally
3f30: 20 61 63 63 65 70 74 73 20 61 20 70 3d 70 69 6b accepts a p=pik
3f40: 63 68 72 2d 73 63 72 69 70 74 2d 63 6f 64 65 20 chr-script-code
3f50: 55 52 4c 20 70 61 72 61 6d 65 74 65 72 20 6f 72 URL parameter or
3f60: 20 50 4f 53 54 0a 2a 2a 20 76 61 6c 75 65 20 74 POST.** value t
3f70: 6f 20 70 72 65 2d 70 6f 70 75 6c 61 74 65 20 74 o pre-populate t
3f80: 68 65 20 65 64 69 74 6f 72 20 77 69 74 68 20 74 he editor with t
3f90: 68 61 74 20 63 6f 64 65 2e 0a 2a 2f 0a 76 6f 69 hat code..*/.voi
3fa0: 64 20 70 69 6b 63 68 72 73 68 6f 77 5f 70 61 67 d pikchrshow_pag
3fb0: 65 28 76 6f 69 64 29 7b 0a 20 20 63 6f 6e 73 74 e(void){. const
3fc0: 20 63 68 61 72 20 2a 7a 43 6f 6e 74 65 6e 74 20 char *zContent
3fd0: 3d 20 30 3b 0a 0a 20 20 69 66 28 50 28 22 6c 65 = 0;.. if(P("le
3fe0: 67 61 63 79 22 29 20 7c 7c 20 50 28 22 61 6a 61 gacy") || P("aja
3ff0: 78 22 29 29 7b 0a 20 20 20 20 70 69 6b 63 68 72 x")){. pikchr
4000: 73 68 6f 77 63 73 5f 70 61 67 65 28 29 3b 0a 20 showcs_page();.
4010: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 return;. }.
4020: 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65 login_check_cre
4030: 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66 dentials();. if
4040: 28 20 21 67 2e 70 65 72 6d 2e 52 64 57 69 6b 69 ( !g.perm.RdWiki
4050: 20 26 26 20 21 67 2e 70 65 72 6d 2e 52 65 61 64 && !g.perm.Read
4060: 20 26 26 20 21 67 2e 70 65 72 6d 2e 52 64 46 6f && !g.perm.RdFo
4070: 72 75 6d 20 29 7b 0a 20 20 20 20 63 67 69 5f 72 rum ){. cgi_r
4080: 65 64 69 72 65 63 74 66 28 22 25 52 2f 6c 6f 67 edirectf("%R/log
4090: 69 6e 3f 67 3d 70 69 6b 63 68 72 73 68 6f 77 22 in?g=pikchrshow"
40a0: 29 3b 0a 20 20 7d 0a 20 20 73 74 79 6c 65 5f 65 );. }. style_e
40b0: 6d 69 74 5f 6e 6f 73 63 72 69 70 74 5f 66 6f 72 mit_noscript_for
40c0: 5f 6a 73 5f 70 61 67 65 28 29 3b 0a 20 20 73 74 _js_page();. st
40d0: 79 6c 65 5f 68 65 61 64 65 72 28 22 50 69 6b 63 yle_header("Pikc
40e0: 68 72 53 68 6f 77 22 29 3b 0a 20 20 7a 43 6f 6e hrShow");. zCon
40f0: 74 65 6e 74 20 3d 20 50 44 28 22 63 6f 6e 74 65 tent = PD("conte
4100: 6e 74 22 2c 50 28 22 70 22 29 29 3b 0a 20 20 69 nt",P("p"));. i
4110: 66 28 21 7a 43 6f 6e 74 65 6e 74 29 7b 0a 20 20 f(!zContent){.
4120: 20 20 7a 43 6f 6e 74 65 6e 74 20 3d 20 22 61 72 zContent = "ar
4130: 72 6f 77 20 72 69 67 68 74 20 32 30 30 25 20 5c row right 200% \
4140: 22 4d 61 72 6b 64 6f 77 6e 5c 22 20 5c 22 53 6f "Markdown\" \"So
4150: 75 72 63 65 5c 22 5c 6e 22 0a 20 20 20 20 20 20 urce\"\n".
4160: 22 62 6f 78 20 72 61 64 20 31 30 70 78 20 5c 22 "box rad 10px \"
4170: 4d 61 72 6b 64 6f 77 6e 5c 22 20 5c 22 46 6f 72 Markdown\" \"For
4180: 6d 61 74 74 65 72 5c 22 20 5c 22 28 6d 61 72 6b matter\" \"(mark
4190: 64 6f 77 6e 2e 63 29 5c 22 20 66 69 74 5c 6e 22 down.c)\" fit\n"
41a0: 0a 20 20 20 20 20 20 22 61 72 72 6f 77 20 72 69 . "arrow ri
41b0: 67 68 74 20 32 30 30 25 20 5c 22 48 54 4d 4c 2b ght 200% \"HTML+
41c0: 53 56 47 5c 22 20 5c 22 4f 75 74 70 75 74 5c 22 SVG\" \"Output\"
41d0: 5c 6e 22 0a 20 20 20 20 20 20 22 61 72 72 6f 77 \n". "arrow
41e0: 20 3c 2d 3e 20 64 6f 77 6e 20 66 72 6f 6d 20 6c <-> down from l
41f0: 61 73 74 20 62 6f 78 2e 73 5c 6e 22 0a 20 20 20 ast box.s\n".
4200: 20 20 20 22 62 6f 78 20 73 61 6d 65 20 5c 22 50 "box same \"P
4210: 69 6b 63 68 72 5c 22 20 5c 22 46 6f 72 6d 61 74 ikchr\" \"Format
4220: 74 65 72 5c 22 20 5c 22 28 70 69 6b 63 68 72 2e ter\" \"(pikchr.
4230: 63 29 5c 22 20 66 69 74 5c 6e 22 3b 0a 20 20 7d c)\" fit\n";. }
4240: 0a 20 20 2f 2a 20 57 61 73 6d 20 6c 6f 61 64 2f . /* Wasm load/
4250: 69 6e 69 74 20 70 72 6f 67 72 65 73 73 20 77 69 init progress wi
4260: 64 67 65 74 2e 2e 2e 20 2a 2f 0a 20 20 43 58 28 dget... */. CX(
4270: 22 3c 64 69 76 20 63 6c 61 73 73 3d 27 65 6d 73 "<div class='ems
4280: 63 72 69 70 74 65 6e 27 3e 22 29 3b 20 7b 0a 20 cripten'>"); {.
4290: 20 20 20 43 58 28 22 3c 66 69 67 75 72 65 20 69 CX("<figure i
42a0: 64 3d 27 6d 6f 64 75 6c 65 2d 73 70 69 6e 6e 65 d='module-spinne
42b0: 72 27 3e 22 29 3b 0a 20 20 20 20 20 20 43 58 28 r'>");. CX(
42c0: 22 3c 64 69 76 20 63 6c 61 73 73 3d 27 73 70 69 "<div class='spi
42d0: 6e 6e 65 72 27 3e 3c 2f 64 69 76 3e 22 29 3b 0a nner'></div>");.
42e0: 20 20 20 20 20 20 43 58 28 22 3c 64 69 76 20 63 CX("<div c
42f0: 6c 61 73 73 3d 27 63 65 6e 74 65 72 27 3e 3c 73 lass='center'><s
4300: 74 72 6f 6e 67 3e 49 6e 69 74 69 61 6c 69 7a 69 trong>Initializi
4310: 6e 67 20 61 70 70 2e 2e 2e 3c 2f 73 74 72 6f 6e ng app...</stron
4320: 67 3e 3c 2f 64 69 76 3e 22 29 3b 0a 20 20 20 20 g></div>");.
4330: 20 20 43 58 28 22 3c 64 69 76 20 63 6c 61 73 73 CX("<div class
4340: 3d 27 63 65 6e 74 65 72 27 3e 22 29 3b 0a 20 20 ='center'>");.
4350: 20 20 20 20 20 20 43 58 28 22 4f 6e 20 61 20 73 CX("On a s
4360: 6c 6f 77 20 69 6e 74 65 72 6e 65 74 20 63 6f 6e low internet con
4370: 6e 65 63 74 69 6f 6e 20 74 68 69 73 20 6d 61 79 nection this may
4380: 20 74 61 6b 65 20 61 20 6d 6f 6d 65 6e 74 2e 20 take a moment.
4390: 20 49 66 20 74 68 69 73 20 22 29 3b 0a 20 20 20 If this ");.
43a0: 20 20 20 20 20 43 58 28 22 6d 65 73 73 61 67 65 CX("message
43b0: 20 64 69 73 70 6c 61 79 73 20 66 6f 72 20 5c 22 displays for \"
43c0: 61 20 6c 6f 6e 67 20 74 69 6d 65 5c 22 2c 20 69 a long time\", i
43d0: 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20 6d 61 nitialization ma
43e0: 79 20 68 61 76 65 20 22 29 3b 0a 20 20 20 20 20 y have ");.
43f0: 20 20 20 43 58 28 22 66 61 69 6c 65 64 20 61 6e CX("failed an
4400: 64 20 74 68 65 20 4a 61 76 61 53 63 72 69 70 74 d the JavaScript
4410: 20 63 6f 6e 73 6f 6c 65 20 6d 61 79 20 63 6f 6e console may con
4420: 74 61 69 6e 20 63 6c 75 65 73 20 61 73 20 74 6f tain clues as to
4430: 20 77 68 79 2e 20 22 29 3b 0a 20 20 20 20 20 20 why. ");.
4440: 43 58 28 22 3c 2f 64 69 76 3e 22 29 3b 0a 20 20 CX("</div>");.
4450: 20 20 20 20 43 58 28 22 3c 64 69 76 3e 3c 61 20 CX("<div><a
4460: 68 72 65 66 3d 27 3f 6c 65 67 61 63 79 27 3e 53 href='?legacy'>S
4470: 77 69 74 63 68 20 74 6f 20 6c 65 67 61 63 79 20 witch to legacy
4480: 6d 6f 64 65 3c 2f 61 3e 3c 2f 64 69 76 3e 22 29 mode</a></div>")
4490: 3b 0a 20 20 20 20 43 58 28 22 3c 2f 66 69 67 75 ;. CX("</figu
44a0: 72 65 3e 22 29 3b 0a 20 20 20 20 43 58 28 22 3c re>");. CX("<
44b0: 64 69 76 20 63 6c 61 73 73 3d 27 65 6d 73 63 72 div class='emscr
44c0: 69 70 74 65 6e 27 20 69 64 3d 27 6d 6f 64 75 6c ipten' id='modul
44d0: 65 2d 73 74 61 74 75 73 27 3e 44 6f 77 6e 6c 6f e-status'>Downlo
44e0: 61 64 69 6e 67 2e 2e 2e 3c 2f 64 69 76 3e 22 29 ading...</div>")
44f0: 3b 0a 20 20 20 20 43 58 28 22 3c 70 72 6f 67 72 ;. CX("<progr
4500: 65 73 73 20 76 61 6c 75 65 3d 27 30 27 20 6d 61 ess value='0' ma
4510: 78 3d 27 31 30 30 27 20 69 64 3d 27 6d 6f 64 75 x='100' id='modu
4520: 6c 65 2d 70 72 6f 67 72 65 73 73 27 20 68 69 64 le-progress' hid
4530: 64 65 6e 3d 27 31 27 3e 22 0a 20 20 20 20 20 20 den='1'>".
4540: 20 22 3c 2f 70 72 6f 67 72 65 73 73 3e 22 29 3b "</progress>");
4550: 0a 20 20 7d 20 43 58 28 22 3c 2f 64 69 76 3e 3c . } CX("</div><
4560: 21 2d 2d 20 2e 65 6d 73 63 72 69 70 74 65 6e 20 !-- .emscripten
4570: 2d 2d 3e 22 29 3b 0a 20 20 2f 2a 20 4d 61 69 6e -->");. /* Main
4580: 20 76 69 65 77 2e 2e 2e 20 2a 2f 0a 20 20 43 58 view... */. CX
4590: 28 22 3c 64 69 76 20 69 64 3d 27 76 69 65 77 2d ("<div id='view-
45a0: 73 70 6c 69 74 27 20 63 6c 61 73 73 3d 27 61 70 split' class='ap
45b0: 70 2d 76 69 65 77 20 69 6e 69 74 69 61 6c 6c 79 p-view initially
45c0: 2d 68 69 64 64 65 6e 27 3e 22 29 3b 20 7b 0a 20 -hidden'>"); {.
45d0: 20 20 20 43 58 28 22 3c 66 69 65 6c 64 73 65 74 CX("<fieldset
45e0: 20 63 6c 61 73 73 3d 27 6f 70 74 69 6f 6e 73 20 class='options
45f0: 63 6f 6c 6c 61 70 73 69 62 6c 65 27 3e 22 29 3b collapsible'>");
4600: 20 7b 0a 20 20 20 20 20 20 43 58 28 22 3c 6c 65 {. CX("<le
4610: 67 65 6e 64 3e 3c 62 75 74 74 6f 6e 20 63 6c 61 gend><button cla
4620: 73 73 3d 27 66 69 65 6c 64 73 65 74 2d 74 6f 67 ss='fieldset-tog
4630: 67 6c 65 27 3e 4f 70 74 69 6f 6e 73 3c 2f 62 75 gle'>Options</bu
4640: 74 74 6f 6e 3e 3c 2f 6c 65 67 65 6e 64 3e 22 29 tton></legend>")
4650: 3b 0a 20 20 20 20 20 20 43 58 28 22 3c 64 69 76 ;. CX("<div
4660: 3e 22 29 3b 0a 20 20 20 20 20 20 43 58 28 22 3c >");. CX("<
4670: 73 70 61 6e 20 63 6c 61 73 73 3d 27 6c 61 62 65 span class='labe
4680: 6c 65 64 2d 69 6e 70 75 74 27 3e 22 29 3b 0a 20 led-input'>");.
4690: 20 20 20 20 20 20 20 43 58 28 22 3c 69 6e 70 75 CX("<inpu
46a0: 74 20 74 79 70 65 3d 27 63 68 65 63 6b 62 6f 78 t type='checkbox
46b0: 27 20 69 64 3d 27 6f 70 74 2d 63 62 2d 73 62 73 ' id='opt-cb-sbs
46c0: 27 20 22 29 3b 0a 20 20 20 20 20 20 20 20 43 58 ' ");. CX
46d0: 28 22 64 61 74 61 2d 63 73 73 74 67 74 3d 27 23 ("data-csstgt='#
46e0: 6d 61 69 6e 2d 77 72 61 70 70 65 72 27 20 22 29 main-wrapper' ")
46f0: 3b 0a 20 20 20 20 20 20 20 20 43 58 28 22 64 61 ;. CX("da
4700: 74 61 2d 63 73 73 63 6c 61 73 73 3d 27 73 69 64 ta-cssclass='sid
4710: 65 2d 62 79 2d 73 69 64 65 27 20 22 29 3b 0a 20 e-by-side' ");.
4720: 20 20 20 20 20 20 20 43 58 28 22 64 61 74 61 2d CX("data-
4730: 63 6f 6e 66 69 67 3d 27 73 69 64 65 42 79 53 69 config='sideBySi
4740: 64 65 27 3e 22 29 3b 0a 20 20 20 20 20 20 20 20 de'>");.
4750: 43 58 28 22 3c 6c 61 62 65 6c 20 66 6f 72 3d 27 CX("<label for='
4760: 6f 70 74 2d 63 62 2d 73 62 73 27 3e 53 69 64 65 opt-cb-sbs'>Side
4770: 2d 62 79 2d 73 69 64 65 3c 2f 6c 61 62 65 6c 3e -by-side</label>
4780: 22 29 3b 0a 20 20 20 20 20 20 43 58 28 22 3c 2f ");. CX("</
4790: 73 70 61 6e 3e 22 29 3b 0a 20 20 20 20 20 20 43 span>");. C
47a0: 58 28 22 3c 73 70 61 6e 20 63 6c 61 73 73 3d 27 X("<span class='
47b0: 6c 61 62 65 6c 65 64 2d 69 6e 70 75 74 27 3e 22 labeled-input'>"
47c0: 29 3b 0a 20 20 20 20 20 20 20 20 43 58 28 22 3c );. CX("<
47d0: 69 6e 70 75 74 20 74 79 70 65 3d 27 63 68 65 63 input type='chec
47e0: 6b 62 6f 78 27 20 69 64 3d 27 6f 70 74 2d 63 62 kbox' id='opt-cb
47f0: 2d 73 77 61 70 69 6f 27 20 22 29 3b 0a 20 20 20 -swapio' ");.
4800: 20 20 20 20 20 43 58 28 22 64 61 74 61 2d 63 73 CX("data-cs
4810: 73 74 67 74 3d 27 23 6d 61 69 6e 2d 77 72 61 70 stgt='#main-wrap
4820: 70 65 72 27 20 22 29 3b 0a 20 20 20 20 20 20 20 per' ");.
4830: 20 43 58 28 22 64 61 74 61 2d 63 73 73 63 6c 61 CX("data-csscla
4840: 73 73 3d 27 73 77 61 70 69 6f 27 20 22 29 3b 0a ss='swapio' ");.
4850: 20 20 20 20 20 20 20 20 43 58 28 22 64 61 74 61 CX("data
4860: 2d 63 6f 6e 66 69 67 3d 27 73 77 61 70 49 6e 4f -config='swapInO
4870: 75 74 27 3e 22 29 3b 0a 20 20 20 20 20 20 20 20 ut'>");.
4880: 43 58 28 22 3c 6c 61 62 65 6c 20 66 6f 72 3d 27 CX("<label for='
4890: 6f 70 74 2d 63 62 2d 73 77 61 70 69 6f 27 3e 53 opt-cb-swapio'>S
48a0: 77 61 70 20 69 6e 2f 6f 75 74 3c 2f 6c 61 62 65 wap in/out</labe
48b0: 6c 3e 22 29 3b 0a 20 20 20 20 20 20 43 58 28 22 l>");. CX("
48c0: 3c 2f 73 70 61 6e 3e 22 29 3b 0a 20 20 20 20 20 </span>");.
48d0: 20 43 58 28 22 3c 73 70 61 6e 20 63 6c 61 73 73 CX("<span class
48e0: 3d 27 6c 61 62 65 6c 65 64 2d 69 6e 70 75 74 27 ='labeled-input'
48f0: 3e 22 29 3b 0a 20 20 20 20 20 20 20 20 43 58 28 >");. CX(
4900: 22 3c 69 6e 70 75 74 20 74 79 70 65 3d 27 63 68 "<input type='ch
4910: 65 63 6b 62 6f 78 27 20 69 64 3d 27 6f 70 74 2d eckbox' id='opt-
4920: 63 62 2d 61 75 74 6f 66 69 74 27 20 22 29 3b 0a cb-autofit' ");.
4930: 20 20 20 20 20 20 20 20 43 58 28 22 64 61 74 61 CX("data
4940: 2d 63 6f 6e 66 69 67 3d 27 72 65 6e 64 65 72 41 -config='renderA
4950: 75 74 6f 66 69 74 27 3e 22 29 3b 0a 20 20 20 20 utofit'>");.
4960: 20 20 20 20 43 58 28 22 3c 6c 61 62 65 6c 20 66 CX("<label f
4970: 6f 72 3d 27 6f 70 74 2d 63 62 2d 61 75 74 6f 66 or='opt-cb-autof
4980: 69 74 27 20 22 0a 20 20 20 20 20 20 20 20 20 20 it' ".
4990: 20 22 74 69 74 6c 65 3d 27 41 74 74 65 6d 70 74 "title='Attempt
49a0: 20 74 6f 20 73 63 61 6c 65 20 53 56 47 20 74 6f to scale SVG to
49b0: 20 66 69 74 20 76 69 65 77 70 6f 72 74 2e 20 22 fit viewport. "
49c0: 0a 20 20 20 20 20 20 20 20 20 20 20 22 57 68 65 . "Whe
49d0: 74 68 65 72 20 69 74 20 77 69 6c 6c 20 77 6f 72 ther it will wor
49e0: 6b 20 64 65 70 65 6e 64 73 20 69 6e 20 70 61 72 k depends in par
49f0: 74 20 6f 6e 20 74 68 65 20 73 69 7a 65 20 22 0a t on the size ".
4a00: 20 20 20 20 20 20 20 20 20 20 20 22 61 6e 64 20 "and
4a10: 73 68 61 70 65 20 6f 66 20 74 68 65 20 69 6d 61 shape of the ima
4a20: 67 65 20 61 6e 64 20 74 68 65 20 76 69 65 77 70 ge and the viewp
4a30: 6f 72 74 2e 27 22 0a 20 20 20 20 20 20 20 20 20 ort.'".
4a40: 20 20 22 3e 41 75 74 6f 2d 66 69 74 20 53 56 47 ">Auto-fit SVG
4a50: 3c 2f 6c 61 62 65 6c 3e 22 29 3b 0a 20 20 20 20 </label>");.
4a60: 20 20 43 58 28 22 3c 2f 73 70 61 6e 3e 22 29 3b CX("</span>");
4a70: 0a 20 20 20 20 20 20 43 58 28 22 3c 73 70 61 6e . CX("<span
4a80: 20 63 6c 61 73 73 3d 27 6c 61 62 65 6c 65 64 2d class='labeled-
4a90: 69 6e 70 75 74 27 3e 22 29 3b 0a 20 20 20 20 20 input'>");.
4aa0: 20 20 20 43 58 28 22 3c 69 6e 70 75 74 20 74 79 CX("<input ty
4ab0: 70 65 3d 27 63 68 65 63 6b 62 6f 78 27 20 69 64 pe='checkbox' id
4ac0: 3d 27 6f 70 74 2d 63 62 2d 61 75 74 6f 72 65 6e ='opt-cb-autoren
4ad0: 64 65 72 27 20 22 29 3b 0a 20 20 20 20 20 20 20 der' ");.
4ae0: 20 43 58 28 22 64 61 74 61 2d 63 73 73 74 67 74 CX("data-csstgt
4af0: 3d 27 23 6d 61 69 6e 2d 77 72 61 70 70 65 72 27 ='#main-wrapper'
4b00: 20 22 29 3b 0a 20 20 20 20 20 20 20 20 43 58 28 ");. CX(
4b10: 22 64 61 74 61 2d 63 73 73 63 6c 61 73 73 3d 27 "data-cssclass='
4b20: 61 75 74 6f 2d 72 65 6e 64 65 72 27 20 22 29 3b auto-render' ");
4b30: 0a 20 20 20 20 20 20 20 20 43 58 28 22 64 61 74 . CX("dat
4b40: 61 2d 63 6f 6e 66 69 67 3d 27 72 65 6e 64 65 72 a-config='render
4b50: 57 68 69 6c 65 54 79 70 69 6e 67 27 3e 22 29 3b WhileTyping'>");
4b60: 0a 20 20 20 20 20 20 20 20 43 58 28 22 3c 6c 61 . CX("<la
4b70: 62 65 6c 20 66 6f 72 3d 27 6f 70 74 2d 63 62 2d bel for='opt-cb-
4b80: 61 75 74 6f 72 65 6e 64 65 72 27 3e 52 65 6e 64 autorender'>Rend
4b90: 65 72 20 77 68 69 6c 65 20 74 79 70 69 6e 67 3c er while typing<
4ba0: 2f 6c 61 62 65 6c 3e 22 29 3b 0a 20 20 20 20 20 /label>");.
4bb0: 20 43 58 28 22 3c 2f 73 70 61 6e 3e 22 29 3b 0a CX("</span>");.
4bc0: 20 20 20 20 20 20 43 58 28 22 3c 73 70 61 6e 20 CX("<span
4bd0: 63 6c 61 73 73 3d 27 6c 61 62 65 6c 65 64 2d 69 class='labeled-i
4be0: 6e 70 75 74 27 3e 22 29 3b 0a 20 20 20 20 20 20 nput'>");.
4bf0: 20 20 43 58 28 22 3c 61 20 68 72 65 66 3d 27 3f CX("<a href='?
4c00: 6c 65 67 61 63 79 27 3e 4c 65 67 61 63 79 20 6d legacy'>Legacy m
4c10: 6f 64 65 3c 2f 61 3e 22 29 3b 0a 20 20 20 20 20 ode</a>");.
4c20: 20 43 58 28 22 3c 2f 73 70 61 6e 3e 22 29 3b 0a CX("</span>");.
4c30: 20 20 20 20 20 20 43 58 28 22 3c 2f 64 69 76 3e CX("</div>
4c40: 3c 21 2d 2d 20 6f 70 74 69 6f 6e 73 20 77 72 61 <!-- options wra
4c50: 70 70 65 72 20 2d 2d 3e 22 29 3b 0a 20 20 20 20 pper -->");.
4c60: 7d 20 43 58 28 22 3c 2f 66 69 65 6c 64 73 65 74 } CX("</fieldset
4c70: 3e 22 29 3b 0a 20 20 20 20 43 58 28 22 3c 64 69 >");. CX("<di
4c80: 76 20 69 64 3d 27 6d 61 69 6e 2d 77 72 61 70 70 v id='main-wrapp
4c90: 65 72 27 20 63 6c 61 73 73 3d 27 27 3e 22 29 3b er' class=''>");
4ca0: 20 7b 0a 20 20 20 20 20 20 43 58 28 22 3c 66 69 {. CX("<fi
4cb0: 65 6c 64 73 65 74 20 63 6c 61 73 73 3d 27 7a 6f eldset class='zo
4cc0: 6e 65 2d 77 72 61 70 70 65 72 20 69 6e 70 75 74 ne-wrapper input
4cd0: 27 3e 22 29 3b 20 7b 0a 20 20 20 20 20 20 20 20 '>"); {.
4ce0: 43 58 28 22 3c 6c 65 67 65 6e 64 3e 3c 64 69 76 CX("<legend><div
4cf0: 20 63 6c 61 73 73 3d 27 62 75 74 74 6f 6e 2d 62 class='button-b
4d00: 61 72 27 3e 22 29 3b 0a 20 20 20 20 20 20 20 20 ar'>");.
4d10: 20 20 43 58 28 22 3c 62 75 74 74 6f 6e 20 69 64 CX("<button id
4d20: 3d 27 62 74 6e 2d 72 65 6e 64 65 72 27 20 22 0a ='btn-render' ".
4d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 69 "ti
4d40: 74 6c 65 3d 27 43 74 72 6c 2d 45 6e 74 65 72 2f tle='Ctrl-Enter/
4d50: 53 68 69 66 74 2d 45 6e 74 65 72 27 3e 52 65 6e Shift-Enter'>Ren
4d60: 64 65 72 3c 2f 62 75 74 74 6f 6e 3e 22 29 3b 0a der</button>");.
4d70: 20 20 20 20 20 20 20 20 20 20 43 58 28 22 3c 62 CX("<b
4d80: 75 74 74 6f 6e 20 69 64 3d 27 62 74 6e 2d 63 6c utton id='btn-cl
4d90: 65 61 72 27 3e 43 6c 65 61 72 20 49 6e 70 75 74 ear'>Clear Input
4da0: 3c 2f 62 75 74 74 6f 6e 3e 22 29 3b 0a 20 20 20 </button>");.
4db0: 20 20 20 20 20 43 58 28 22 3c 2f 64 69 76 3e 3c CX("</div><
4dc0: 2f 6c 65 67 65 6e 64 3e 22 29 3b 0a 20 20 20 20 /legend>");.
4dd0: 20 20 20 20 43 58 28 22 3c 64 69 76 3e 3c 74 65 CX("<div><te
4de0: 78 74 61 72 65 61 20 69 64 3d 27 69 6e 70 75 74 xtarea id='input
4df0: 27 22 29 3b 0a 20 20 20 20 20 20 20 20 20 20 43 '");. C
4e00: 58 28 22 70 6c 61 63 65 68 6f 6c 64 65 72 3d 27 X("placeholder='
4e10: 50 69 6b 63 68 72 20 69 6e 70 75 74 2e 20 43 74 Pikchr input. Ct
4e20: 72 6c 2d 65 6e 74 65 72 2f 73 68 69 66 74 2d 65 rl-enter/shift-e
4e30: 6e 74 65 72 20 72 75 6e 73 20 69 74 2e 27 3e 22 nter runs it.'>"
4e40: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 43 58 28 );. CX(
4e50: 22 2f 2a 2a 5c 6e 22 29 3b 0a 20 20 20 20 20 20 "/**\n");.
4e60: 20 20 20 20 43 58 28 22 20 20 55 73 65 20 63 74 CX(" Use ct
4e70: 72 6c 2d 65 6e 74 65 72 20 6f 72 20 73 68 69 66 rl-enter or shif
4e80: 74 2d 65 6e 74 65 72 20 74 6f 20 65 78 65 63 75 t-enter to execu
4e90: 74 65 5c 6e 22 29 3b 0a 20 20 20 20 20 20 20 20 te\n");.
4ea0: 20 20 43 58 28 22 20 20 70 69 6b 63 68 72 20 63 CX(" pikchr c
4eb0: 6f 64 65 2e 20 49 66 20 6f 6e 6c 79 20 61 20 73 ode. If only a s
4ec0: 75 62 73 65 74 20 69 73 20 63 75 72 72 65 6e 74 ubset is current
4ed0: 6c 79 5c 6e 22 29 3b 0a 20 20 20 20 20 20 20 20 ly\n");.
4ee0: 20 20 43 58 28 22 20 20 73 65 6c 65 63 74 65 64 CX(" selected
4ef0: 2c 20 6f 6e 6c 79 20 74 68 61 74 20 70 61 72 74 , only that part
4f00: 20 69 73 20 65 76 61 6c 75 61 74 65 64 2e 5c 6e is evaluated.\n
4f10: 2a 2f 5c 6e 22 29 3b 0a 20 20 20 20 20 20 20 20 */\n");.
4f20: 43 58 28 22 25 73 3c 2f 74 65 78 74 61 72 65 61 CX("%s</textarea
4f30: 3e 3c 2f 64 69 76 3e 22 2c 7a 43 6f 6e 74 65 6e ></div>",zConten
4f40: 74 2f 2a 73 61 66 65 2d 66 6f 72 2d 25 73 2a 2f t/*safe-for-%s*/
4f50: 29 3b 0a 20 20 20 20 20 20 7d 20 43 58 28 22 3c );. } CX("<
4f60: 2f 66 69 65 6c 64 73 65 74 3e 3c 21 2d 2d 20 2e /fieldset><!-- .
4f70: 7a 6f 6e 65 2d 77 72 61 70 70 65 72 2e 69 6e 70 zone-wrapper.inp
4f80: 75 74 20 2d 2d 3e 22 29 3b 0a 20 20 20 20 20 20 ut -->");.
4f90: 43 58 28 22 3c 66 69 65 6c 64 73 65 74 20 63 6c CX("<fieldset cl
4fa0: 61 73 73 3d 27 7a 6f 6e 65 2d 77 72 61 70 70 65 ass='zone-wrappe
4fb0: 72 20 6f 75 74 70 75 74 27 3e 22 29 3b 20 7b 0a r output'>"); {.
4fc0: 20 20 20 20 20 20 20 20 43 58 28 22 3c 6c 65 67 CX("<leg
4fd0: 65 6e 64 3e 3c 64 69 76 20 63 6c 61 73 73 3d 27 end><div class='
4fe0: 62 75 74 74 6f 6e 2d 62 61 72 27 3e 22 29 3b 0a button-bar'>");.
4ff0: 20 20 20 20 20 20 20 20 20 20 43 58 28 22 3c 62 CX("<b
5000: 75 74 74 6f 6e 20 69 64 3d 27 62 74 6e 2d 72 65 utton id='btn-re
5010: 6e 64 65 72 2d 6d 6f 64 65 27 3e 52 65 6e 64 65 nder-mode'>Rende
5020: 72 20 4d 6f 64 65 3c 2f 62 75 74 74 6f 6e 3e 20 r Mode</button>
5030: 22 29 3b 0a 20 20 20 20 20 20 20 20 20 20 43 58 ");. CX
5040: 28 22 3c 73 70 61 6e 20 73 74 79 6c 65 3d 27 77 ("<span style='w
5050: 68 69 74 65 2d 73 70 61 63 65 3a 6e 6f 77 72 61 hite-space:nowra
5060: 70 27 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 p'>".
5070: 20 20 22 3c 73 70 61 6e 20 69 64 3d 27 70 72 65 "<span id='pre
5080: 76 69 65 77 2d 63 6f 70 79 2d 62 75 74 74 6f 6e view-copy-button
5090: 27 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 ' ".
50a0: 20 22 74 69 74 6c 65 3d 27 54 61 70 20 74 6f 20 "title='Tap to
50b0: 63 6f 70 79 20 74 6f 20 63 6c 69 70 62 6f 61 72 copy to clipboar
50c0: 64 2e 27 3e 3c 2f 73 70 61 6e 3e 22 0a 20 20 20 d.'></span>".
50d0: 20 20 20 20 20 20 20 20 20 20 22 3c 6c 61 62 65 "<labe
50e0: 6c 20 66 6f 72 3d 27 70 72 65 76 69 65 77 2d 63 l for='preview-c
50f0: 6f 70 79 2d 62 75 74 74 6f 6e 27 20 22 0a 20 20 opy-button' ".
5100: 20 20 20 20 20 20 20 20 20 20 20 22 74 69 74 6c "titl
5110: 65 3d 27 54 61 70 20 74 6f 20 63 6f 70 79 20 74 e='Tap to copy t
5120: 6f 20 63 6c 69 70 62 6f 61 72 64 2e 27 3e 3c 2f o clipboard.'></
5130: 6c 61 62 65 6c 3e 22 0a 20 20 20 20 20 20 20 20 label>".
5140: 20 20 20 20 20 22 3c 2f 73 70 61 6e 3e 22 29 3b "</span>");
5150: 0a 20 20 20 20 20 20 20 20 43 58 28 22 3c 2f 64 . CX("</d
5160: 69 76 3e 3c 2f 6c 65 67 65 6e 64 3e 22 29 3b 0a iv></legend>");.
5170: 20 20 20 20 20 20 20 20 43 58 28 22 3c 64 69 76 CX("<div
5180: 20 69 64 3d 27 70 69 6b 63 68 72 2d 6f 75 74 70 id='pikchr-outp
5190: 75 74 2d 77 72 61 70 70 65 72 27 3e 22 29 3b 0a ut-wrapper'>");.
51a0: 20 20 20 20 20 20 20 20 20 20 43 58 28 22 3c 64 CX("<d
51b0: 69 76 20 69 64 3d 27 70 69 6b 63 68 72 2d 6f 75 iv id='pikchr-ou
51c0: 74 70 75 74 27 3e 3c 2f 64 69 76 3e 22 29 3b 0a tput'></div>");.
51d0: 20 20 20 20 20 20 20 20 20 20 43 58 28 22 3c 74 CX("<t
51e0: 65 78 74 61 72 65 61 20 63 6c 61 73 73 3d 27 68 extarea class='h
51f0: 69 64 64 65 6e 27 20 69 64 3d 27 70 69 6b 63 68 idden' id='pikch
5200: 72 2d 6f 75 74 70 75 74 2d 74 65 78 74 27 3e 3c r-output-text'><
5210: 2f 74 65 78 74 61 72 65 61 3e 22 29 3b 0a 20 20 /textarea>");.
5220: 20 20 20 20 20 20 43 58 28 22 3c 2f 64 69 76 3e CX("</div>
5230: 22 29 3b 0a 20 20 20 20 20 20 7d 20 43 58 28 22 ");. } CX("
5240: 3c 2f 66 69 65 6c 64 73 65 74 3e 20 3c 21 2d 2d </fieldset> <!--
5250: 20 2e 7a 6f 6e 65 2d 77 72 61 70 70 65 72 2e 6f .zone-wrapper.o
5260: 75 74 70 75 74 20 2d 2d 3e 22 29 3b 0a 20 20 20 utput -->");.
5270: 20 7d 20 43 58 28 22 3c 2f 64 69 76 3e 3c 21 2d } CX("</div><!-
5280: 2d 20 23 6d 61 69 6e 2d 77 72 61 70 70 65 72 20 - #main-wrapper
5290: 2d 2d 3e 22 29 3b 0a 20 20 7d 20 43 58 28 22 3c -->");. } CX("<
52a0: 2f 64 69 76 3e 3c 21 2d 2d 20 23 76 69 65 77 2d /div><!-- #view-
52b0: 73 70 6c 69 74 20 2d 2d 3e 22 29 3b 0a 20 20 62 split -->");. b
52c0: 75 69 6c 74 69 6e 5f 66 6f 73 73 69 6c 5f 6a 73 uiltin_fossil_js
52d0: 5f 62 75 6e 64 6c 65 5f 6f 72 28 22 64 6f 6d 22 _bundle_or("dom"
52e0: 2c 20 22 73 74 6f 72 61 67 65 22 2c 20 22 63 6f , "storage", "co
52f0: 70 79 62 75 74 74 6f 6e 22 2c 20 4e 55 4c 4c 29 pybutton", NULL)
5300: 3b 0a 20 20 62 75 69 6c 74 69 6e 5f 72 65 71 75 ;. builtin_requ
5310: 65 73 74 5f 6a 73 28 22 66 6f 73 73 69 6c 2e 70 est_js("fossil.p
5320: 61 67 65 2e 70 69 6b 63 68 72 73 68 6f 77 61 73 age.pikchrshowas
5330: 6d 2e 6a 73 22 29 3b 0a 20 20 62 75 69 6c 74 69 m.js");. builti
5340: 6e 5f 66 75 6c 66 69 6c 6c 5f 6a 73 5f 72 65 71 n_fulfill_js_req
5350: 75 65 73 74 73 28 29 3b 0a 20 20 73 74 79 6c 65 uests();. style
5360: 5f 66 69 6e 69 73 68 5f 70 61 67 65 28 29 3b 0a _finish_page();.
5370: 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e }.../*.** COMMAN
5380: 44 3a 20 70 69 6b 63 68 72 2a 0a 2a 2a 0a 2a 2a D: pikchr*.**.**
5390: 20 55 73 61 67 65 3a 20 25 66 6f 73 73 69 6c 20 Usage: %fossil
53a0: 70 69 6b 63 68 72 20 5b 6f 70 74 69 6f 6e 73 5d pikchr [options]
53b0: 20 3f 49 4e 46 49 4c 45 3f 20 3f 4f 55 54 46 49 ?INFILE? ?OUTFI
53c0: 4c 45 3f 0a 2a 2a 0a 2a 2a 20 41 63 63 65 70 74 LE?.**.** Accept
53d0: 73 20 61 20 70 69 6b 63 68 72 20 73 63 72 69 70 s a pikchr scrip
53e0: 74 20 61 73 20 69 6e 70 75 74 20 61 6e 64 20 6f t as input and o
53f0: 75 74 70 75 74 73 20 74 68 65 20 72 65 6e 64 65 utputs the rende
5400: 72 65 64 20 73 63 72 69 70 74 20 61 73 0a 2a 2a red script as.**
5410: 20 61 6e 20 53 56 47 20 67 72 61 70 68 69 63 2e an SVG graphic.
5420: 20 54 68 65 20 49 4e 46 49 4c 45 20 61 6e 64 20 The INFILE and
5430: 4f 55 54 46 49 4c 45 20 6f 70 74 69 6f 6e 73 20 OUTFILE options
5440: 64 65 66 61 75 6c 74 20 74 6f 20 73 74 64 69 6e default to stdin
5450: 0a 2a 2a 20 72 65 73 70 2e 20 73 74 64 6f 75 74 .** resp. stdout
5460: 2c 20 61 6e 64 20 74 68 65 20 6e 61 6d 65 73 20 , and the names
5470: 22 2d 22 20 63 61 6e 20 62 65 20 75 73 65 64 20 "-" can be used
5480: 61 73 20 61 6c 69 61 73 65 73 20 66 6f 72 20 74 as aliases for t
5490: 68 6f 73 65 0a 2a 2a 20 73 74 72 65 61 6d 73 2e hose.** streams.
54a0: 0a 2a 2a 0a 2a 2a 20 4f 70 74 69 6f 6e 73 3a 0a .**.** Options:.
54b0: 2a 2a 20 20 20 20 2d 64 69 76 20 20 20 20 20 20 ** -div
54c0: 20 4f 6e 20 73 75 63 63 65 73 73 2c 20 61 64 64 On success, add
54d0: 20 61 20 44 49 56 20 77 72 61 70 70 65 72 20 61 a DIV wrapper a
54e0: 72 6f 75 6e 64 20 74 68 65 0a 2a 2a 20 20 20 20 round the.**
54f0: 20 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c resul
5500: 74 69 6e 67 20 53 56 47 20 6f 75 74 70 75 74 20 ting SVG output
5510: 77 68 69 63 68 20 6c 69 6d 69 74 73 20 69 74 73 which limits its
5520: 20 6d 61 78 2d 77 69 64 74 68 20 74 6f 0a 2a 2a max-width to.**
5530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 i
5540: 74 73 20 63 6f 6d 70 75 74 65 64 20 6d 61 78 69 ts computed maxi
5550: 6d 75 6d 20 69 64 65 61 6c 20 73 69 7a 65 0a 2a mum ideal size.*
5560: 2a 0a 2a 2a 20 20 20 20 2d 64 69 76 2d 69 6e 64 *.** -div-ind
5570: 65 6e 74 20 20 4c 69 6b 65 20 2d 64 69 76 20 62 ent Like -div b
5580: 75 74 20 69 6e 64 65 6e 74 20 74 68 65 20 64 69 ut indent the di
5590: 76 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 64 69 76 2d v.**.** -div-
55a0: 63 65 6e 74 65 72 20 20 4c 69 6b 65 20 2d 64 69 center Like -di
55b0: 76 20 62 75 74 20 63 65 6e 74 65 72 20 74 68 65 v but center the
55c0: 20 64 69 76 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 64 div.**.** -d
55d0: 69 76 2d 6c 65 66 74 20 20 20 20 4c 69 6b 65 20 iv-left Like
55e0: 2d 64 69 76 20 62 75 74 20 66 6c 6f 61 74 20 74 -div but float t
55f0: 68 65 20 64 69 76 20 6c 65 66 74 0a 2a 2a 0a 2a he div left.**.*
5600: 2a 20 20 20 20 2d 64 69 76 2d 72 69 67 68 74 20 * -div-right
5610: 20 20 4c 69 6b 65 20 2d 64 69 76 20 62 75 74 20 Like -div but
5620: 66 6c 6f 61 74 20 74 68 65 20 64 69 76 20 72 69 float the div ri
5630: 67 68 74 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 64 69 ght.**.** -di
5640: 76 2d 74 6f 67 67 6c 65 20 20 53 65 74 20 74 68 v-toggle Set th
5650: 65 20 27 74 6f 67 67 6c 65 27 20 43 53 53 20 63 e 'toggle' CSS c
5660: 6c 61 73 73 20 6f 6e 20 74 68 65 20 64 69 76 20 lass on the div
5670: 28 75 73 65 64 20 62 79 20 74 68 65 0a 2a 2a 20 (used by the.**
5680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
5690: 4a 61 76 61 53 63 72 69 70 74 2d 73 69 64 65 20 JavaScript-side
56a0: 70 6f 73 74 2d 70 72 6f 63 65 73 73 6f 72 29 0a post-processor).
56b0: 2a 2a 0a 2a 2a 20 20 20 20 2d 64 69 76 2d 73 6f **.** -div-so
56c0: 75 72 63 65 20 20 53 65 74 20 74 68 65 20 27 73 urce Set the 's
56d0: 6f 75 72 63 65 27 20 43 53 53 20 63 6c 61 73 73 ource' CSS class
56e0: 20 6f 6e 20 74 68 65 20 64 69 76 2c 20 77 68 69 on the div, whi
56f0: 63 68 20 74 65 6c 6c 73 0a 2a 2a 20 20 20 20 20 ch tells.**
5700: 20 20 20 20 20 20 20 20 20 20 20 20 43 53 53 20 CSS
5710: 74 6f 20 68 69 64 65 20 74 68 65 20 53 56 47 20 to hide the SVG
5720: 61 6e 64 20 72 65 76 65 61 6c 20 74 68 65 20 73 and reveal the s
5730: 6f 75 72 63 65 20 62 79 20 64 65 66 61 75 6c 74 ource by default
5740: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 73 72 63 20 ..**.** -src
5750: 20 20 20 20 20 20 53 74 6f 72 65 20 74 68 65 20 Store the
5760: 69 6e 70 75 74 20 70 69 6b 63 68 72 27 73 20 73 input pikchr's s
5770: 6f 75 72 63 65 20 63 6f 64 65 20 69 6e 20 74 68 ource code in th
5780: 65 20 6f 75 74 70 75 74 20 61 73 0a 2a 2a 20 20 e output as.**
5790: 20 20 20 20 20 20 20 20 20 20 20 20 20 61 20 73 a s
57a0: 65 70 61 72 61 74 65 20 65 6c 65 6d 65 6e 74 20 eparate element
57b0: 61 64 6a 61 63 65 6e 74 20 74 6f 20 74 68 65 20 adjacent to the
57c0: 53 56 47 20 6f 6e 65 2e 20 49 6d 70 6c 69 65 64 SVG one. Implied
57d0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 .**
57e0: 20 20 62 79 20 2d 64 69 76 2d 73 6f 75 72 63 65 by -div-source
57f0: 2e 0a 2a 2a 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 74 ..**.**.** -t
5800: 68 20 20 20 20 20 20 20 20 50 72 6f 63 65 73 73 h Process
5810: 20 74 68 65 20 69 6e 70 75 74 20 75 73 69 6e 67 the input using
5820: 20 54 48 31 20 62 65 66 6f 72 65 20 70 61 73 73 TH1 before pass
5830: 69 6e 67 20 69 74 20 74 6f 20 70 69 6b 63 68 72 ing it to pikchr
5840: 0a 2a 2a 0a 2a 2a 20 20 20 20 2d 74 68 2d 6e 6f .**.** -th-no
5850: 76 61 72 20 20 44 69 73 61 62 6c 65 20 24 76 61 var Disable $va
5860: 72 20 61 6e 64 20 24 3c 76 61 72 3e 20 54 48 31 r and $<var> TH1
5870: 20 70 72 6f 63 65 73 73 69 6e 67 2e 20 55 73 65 processing. Use
5880: 20 74 68 69 73 20 69 66 20 74 68 65 0a 2a 2a 20 this if the.**
5890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 69 pi
58a0: 6b 63 68 72 20 73 63 72 69 70 74 20 75 73 65 73 kchr script uses
58b0: 20 27 24 27 20 66 6f 72 20 69 74 73 20 6f 77 6e '$' for its own
58c0: 20 70 75 72 70 6f 73 65 73 20 61 6e 64 20 74 68 purposes and th
58d0: 61 74 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 at.**
58e0: 20 20 20 20 63 61 75 73 65 73 20 69 73 73 75 65 causes issue
58f0: 73 2e 20 54 68 69 73 20 6f 6e 6c 79 20 61 66 66 s. This only aff
5900: 65 63 74 73 20 70 61 72 73 69 6e 67 20 6f 66 20 ects parsing of
5910: 27 24 27 20 6f 75 74 73 69 64 65 0a 2a 2a 20 20 '$' outside.**
5920: 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 66 20 of
5930: 54 48 31 20 73 63 72 69 70 74 20 62 6c 6f 63 6b TH1 script block
5940: 73 2e 20 43 6f 64 65 20 69 6e 20 73 75 63 68 20 s. Code in such
5950: 62 6c 6f 63 6b 73 20 69 73 20 75 6e 61 66 66 65 blocks is unaffe
5960: 63 74 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 2d cted..**.** -
5970: 74 68 2d 6e 6f 73 76 67 20 20 57 68 65 6e 20 75 th-nosvg When u
5980: 73 69 6e 67 20 2d 74 68 2c 20 6f 75 74 70 75 74 sing -th, output
5990: 20 74 68 65 20 70 6f 73 74 2d 54 48 31 27 64 20 the post-TH1'd
59a0: 73 63 72 69 70 74 0a 2a 2a 20 20 20 20 20 20 20 script.**
59b0: 20 20 20 20 20 20 20 20 69 6e 73 74 65 61 64 20 instead
59c0: 6f 66 20 74 68 65 20 70 69 6b 63 68 72 2d 72 65 of the pikchr-re
59d0: 6e 64 65 72 65 64 20 6f 75 74 70 75 74 0a 2a 2a ndered output.**
59e0: 0a 2a 2a 20 20 20 20 2d 74 68 2d 74 72 61 63 65 .** -th-trace
59f0: 20 20 54 72 61 63 65 20 54 48 31 20 65 78 65 63 Trace TH1 exec
5a00: 75 74 69 6f 6e 20 28 66 6f 72 20 64 65 62 75 67 ution (for debug
5a10: 67 69 6e 67 20 70 75 72 70 6f 73 65 73 29 0a 2a ging purposes).*
5a20: 2a 0a 2a 2a 20 20 20 20 2d 64 61 72 6b 20 20 20 *.** -dark
5a30: 20 20 20 43 68 61 6e 67 65 20 70 69 6b 63 68 72 Change pikchr
5a40: 20 63 6f 6c 6f 72 73 20 74 6f 20 61 73 73 75 6d colors to assum
5a50: 65 20 61 20 64 61 72 6b 2d 6d 6f 64 65 20 74 68 e a dark-mode th
5a60: 65 6d 65 2e 0a 2a 2a 0a 2a 2a 0a 2a 2a 20 54 68 eme..**.**.** Th
5a70: 65 20 2d 64 69 76 2d 69 6e 64 65 6e 74 2f 63 65 e -div-indent/ce
5a80: 6e 74 65 72 2f 6c 65 66 74 2f 72 69 67 68 74 20 nter/left/right
5a90: 66 6c 61 67 73 20 6d 61 79 20 6e 6f 74 20 62 65 flags may not be
5aa0: 20 63 6f 6d 62 69 6e 65 64 2e 0a 2a 2a 0a 2a 2a combined..**.**
5ab0: 20 54 48 31 2d 72 65 6c 61 74 65 64 20 4e 6f 74 TH1-related Not
5ac0: 65 73 20 61 6e 64 20 43 61 76 65 61 74 73 3a 0a es and Caveats:.
5ad0: 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 2d 74 68 **.** If the -th
5ae0: 20 66 6c 61 67 20 69 73 20 75 73 65 64 2c 20 74 flag is used, t
5af0: 68 69 73 20 63 6f 6d 6d 61 6e 64 20 6d 75 73 74 his command must
5b00: 20 6f 70 65 6e 20 61 20 66 6f 73 73 69 6c 20 64 open a fossil d
5b10: 61 74 61 62 61 73 65 0a 2a 2a 20 66 6f 72 20 63 atabase.** for c
5b20: 65 72 74 61 69 6e 20 66 75 6e 63 74 69 6f 6e 61 ertain functiona
5b30: 6c 69 74 79 20 74 6f 20 77 6f 72 6b 20 28 76 69 lity to work (vi
5b40: 61 20 61 20 63 68 65 63 6b 2d 6f 75 74 20 6f 72 a a check-out or
5b50: 20 74 68 65 20 2d 52 20 52 45 50 4f 0a 2a 2a 20 the -R REPO.**
5b60: 66 6c 61 67 29 2e 20 49 66 20 6f 70 65 6e 69 6e flag). If openin
5b70: 67 20 61 20 64 62 20 66 61 69 6c 73 2c 20 65 78 g a db fails, ex
5b80: 65 63 75 74 69 6f 6e 20 77 69 6c 6c 20 63 6f 6e ecution will con
5b90: 74 69 6e 75 65 20 62 75 74 20 61 6e 79 20 54 48 tinue but any TH
5ba0: 31 0a 2a 2a 20 63 6f 6d 6d 61 6e 64 73 20 77 68 1.** commands wh
5bb0: 69 63 68 20 72 65 71 75 69 72 65 20 61 20 64 62 ich require a db
5bc0: 20 77 69 6c 6c 20 74 72 69 67 67 65 72 20 61 20 will trigger a
5bd0: 66 61 74 61 6c 20 65 72 72 6f 72 2e 0a 2a 2a 0a fatal error..**.
5be0: 2a 2a 20 49 6e 20 46 6f 73 73 69 6c 20 73 6b 69 ** In Fossil ski
5bf0: 6e 73 2c 20 54 48 31 20 76 61 72 69 61 62 6c 65 ns, TH1 variable
5c00: 73 20 69 6e 20 74 68 65 20 66 6f 72 6d 20 24 76 s in the form $v
5c10: 61 72 4e 61 6d 65 20 61 72 65 20 65 78 70 61 6e arName are expan
5c20: 64 65 64 0a 2a 2a 20 61 73 2d 69 73 20 61 6e 64 ded.** as-is and
5c30: 20 74 68 6f 73 65 20 69 6e 20 74 68 65 20 66 6f those in the fo
5c40: 72 6d 20 24 3c 76 61 72 4e 61 6d 65 3e 20 61 72 rm $<varName> ar
5c50: 65 20 68 74 6d 6c 69 7a 65 64 20 69 6e 20 74 68 e htmlized in th
5c60: 65 0a 2a 2a 20 72 65 73 75 6c 74 69 6e 67 20 6f e.** resulting o
5c70: 75 74 70 75 74 2e 20 54 68 69 73 20 70 72 6f 63 utput. This proc
5c80: 65 73 73 6f 72 20 64 69 73 61 62 6c 65 73 20 74 essor disables t
5c90: 68 65 20 68 74 6d 6c 69 7a 69 6e 67 20 73 74 65 he htmlizing ste
5ca0: 70 2c 20 73 6f 20 24 78 0a 2a 2a 20 61 6e 64 20 p, so $x.** and
5cb0: 24 3c 78 3e 20 61 72 65 20 65 71 75 69 76 61 6c $<x> are equival
5cc0: 65 6e 74 20 75 6e 6c 65 73 73 20 74 68 65 20 54 ent unless the T
5cd0: 48 31 2d 70 72 6f 63 65 73 73 65 64 20 70 69 6b H1-processed pik
5ce0: 63 68 72 20 73 63 72 69 70 74 0a 2a 2a 20 69 6e chr script.** in
5cf0: 76 6f 6b 65 73 20 74 68 65 20 54 48 31 20 63 6f vokes the TH1 co
5d00: 6d 6d 61 6e 64 20 5b 65 6e 61 62 6c 65 5f 68 74 mmand [enable_ht
5d10: 6d 6c 69 66 79 20 31 5d 20 74 6f 20 65 6e 61 62 mlify 1] to enab
5d20: 6c 65 20 69 74 2e 20 4e 6f 72 6d 61 6c 6c 79 0a le it. Normally.
5d30: 2a 2a 20 74 68 61 74 20 6f 70 74 69 6f 6e 20 77 ** that option w
5d40: 69 6c 6c 20 69 6e 74 65 72 66 65 72 65 20 77 69 ill interfere wi
5d50: 74 68 20 70 69 6b 63 68 72 20 6f 75 74 70 75 74 th pikchr output
5d60: 2c 20 68 6f 77 65 76 65 72 2c 20 65 2e 67 2e 20 , however, e.g.
5d70: 62 79 0a 2a 2a 20 48 54 4d 4c 2d 65 6e 63 6f 64 by.** HTML-encod
5d80: 69 6e 67 20 64 6f 75 62 6c 65 2d 71 75 6f 74 65 ing double-quote
5d90: 73 2e 0a 2a 2a 0a 2a 2a 20 4d 61 6e 79 20 6f 66 s..**.** Many of
5da0: 20 74 68 65 20 66 6f 73 73 69 6c 2d 69 6e 73 74 the fossil-inst
5db0: 61 6c 6c 65 64 20 54 48 31 20 66 75 6e 63 74 69 alled TH1 functi
5dc0: 6f 6e 73 20 73 69 6d 70 6c 79 20 64 6f 20 6e 6f ons simply do no
5dd0: 74 20 6d 61 6b 65 20 61 6e 79 0a 2a 2a 20 73 65 t make any.** se
5de0: 6e 73 65 20 66 6f 72 20 70 69 6b 63 68 72 20 73 nse for pikchr s
5df0: 63 72 69 70 74 73 2e 0a 2a 2f 0a 76 6f 69 64 20 cripts..*/.void
5e00: 70 69 6b 63 68 72 5f 63 6d 64 28 76 6f 69 64 29 pikchr_cmd(void)
5e10: 7b 0a 20 20 42 6c 6f 62 20 62 49 6e 20 3d 20 65 {. Blob bIn = e
5e20: 6d 70 74 79 5f 62 6c 6f 62 3b 0a 20 20 42 6c 6f mpty_blob;. Blo
5e30: 62 20 62 4f 75 74 20 3d 20 65 6d 70 74 79 5f 62 b bOut = empty_b
5e40: 6c 6f 62 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 lob;. const cha
5e50: 72 20 2a 20 7a 49 6e 66 69 6c 65 20 3d 20 22 2d r * zInfile = "-
5e60: 22 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 ";. const char
5e70: 2a 20 7a 4f 75 74 66 69 6c 65 20 3d 20 22 2d 22 * zOutfile = "-"
5e80: 3b 0a 20 20 63 6f 6e 73 74 20 69 6e 74 20 66 54 ;. const int fT
5e90: 68 31 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f 6e h1 = find_option
5ea0: 28 22 74 68 22 2c 30 2c 30 29 21 3d 30 3b 0a 20 ("th",0,0)!=0;.
5eb0: 20 63 6f 6e 73 74 20 69 6e 74 20 66 4e 6f 73 76 const int fNosv
5ec0: 67 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 g = find_option(
5ed0: 22 74 68 2d 6e 6f 73 76 67 22 2c 30 2c 30 29 21 "th-nosvg",0,0)!
5ee0: 3d 30 3b 0a 20 20 69 6e 74 20 69 73 45 72 72 20 =0;. int isErr
5ef0: 3d 20 30 3b 0a 20 20 69 6e 74 20 70 69 6b 46 6c = 0;. int pikFl
5f00: 61 67 73 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f ags = find_optio
5f10: 6e 28 22 73 72 63 22 2c 30 2c 30 29 21 3d 30 0a n("src",0,0)!=0.
5f20: 20 20 20 20 3f 20 50 49 4b 43 48 52 5f 50 52 4f ? PIKCHR_PRO
5f30: 43 45 53 53 5f 53 52 43 20 3a 20 30 3b 0a 20 20 CESS_SRC : 0;.
5f40: 75 33 32 20 66 54 68 46 6c 61 67 73 20 3d 20 54 u32 fThFlags = T
5f50: 48 5f 49 4e 49 54 5f 4e 4f 5f 45 4e 43 4f 44 45 H_INIT_NO_ENCODE
5f60: 0a 20 20 20 20 7c 20 28 66 69 6e 64 5f 6f 70 74 . | (find_opt
5f70: 69 6f 6e 28 22 74 68 2d 6e 6f 76 61 72 22 2c 30 ion("th-novar",0
5f80: 2c 30 29 21 3d 30 20 3f 20 54 48 5f 52 32 42 5f ,0)!=0 ? TH_R2B_
5f90: 4e 4f 5f 56 41 52 53 20 3a 20 30 29 3b 0a 0a 20 NO_VARS : 0);..
5fa0: 20 54 68 5f 49 6e 69 74 54 72 61 63 65 4c 6f 67 Th_InitTraceLog
5fb0: 28 29 2f 2a 70 72 6f 63 65 73 73 65 73 20 2d 74 ()/*processes -t
5fc0: 68 2d 74 72 61 63 65 20 66 6c 61 67 2a 2f 3b 0a h-trace flag*/;.
5fd0: 0a 20 20 69 66 28 66 69 6e 64 5f 6f 70 74 69 6f . if(find_optio
5fe0: 6e 28 22 64 69 76 22 2c 30 2c 30 29 21 3d 30 29 n("div",0,0)!=0)
5ff0: 7b 0a 20 20 20 20 70 69 6b 46 6c 61 67 73 20 7c {. pikFlags |
6000: 3d 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 = PIKCHR_PROCESS
6010: 5f 44 49 56 3b 0a 20 20 7d 65 6c 73 65 20 69 66 _DIV;. }else if
6020: 28 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 64 69 (find_option("di
6030: 76 2d 69 6e 64 65 6e 74 22 2c 30 2c 30 29 21 3d v-indent",0,0)!=
6040: 30 29 7b 0a 20 20 20 20 70 69 6b 46 6c 61 67 73 0){. pikFlags
6050: 20 7c 3d 20 50 49 4b 43 48 52 5f 50 52 4f 43 45 |= PIKCHR_PROCE
6060: 53 53 5f 44 49 56 5f 49 4e 44 45 4e 54 3b 0a 20 SS_DIV_INDENT;.
6070: 20 7d 65 6c 73 65 20 69 66 28 66 69 6e 64 5f 6f }else if(find_o
6080: 70 74 69 6f 6e 28 22 64 69 76 2d 63 65 6e 74 65 ption("div-cente
6090: 72 22 2c 30 2c 30 29 21 3d 30 29 7b 0a 20 20 20 r",0,0)!=0){.
60a0: 20 70 69 6b 46 6c 61 67 73 20 7c 3d 20 50 49 4b pikFlags |= PIK
60b0: 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f CHR_PROCESS_DIV_
60c0: 43 45 4e 54 45 52 3b 0a 20 20 7d 65 6c 73 65 20 CENTER;. }else
60d0: 69 66 28 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 if(find_option("
60e0: 64 69 76 2d 66 6c 6f 61 74 2d 6c 65 66 74 22 2c div-float-left",
60f0: 30 2c 30 29 21 3d 30 29 7b 0a 20 20 20 20 70 69 0,0)!=0){. pi
6100: 6b 46 6c 61 67 73 20 7c 3d 20 50 49 4b 43 48 52 kFlags |= PIKCHR
6110: 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 46 4c 4f _PROCESS_DIV_FLO
6120: 41 54 5f 4c 45 46 54 3b 0a 20 20 7d 65 6c 73 65 AT_LEFT;. }else
6130: 20 69 66 28 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 if(find_option(
6140: 22 64 69 76 2d 66 6c 6f 61 74 2d 72 69 67 68 74 "div-float-right
6150: 22 2c 30 2c 30 29 21 3d 30 29 7b 0a 20 20 20 20 ",0,0)!=0){.
6160: 70 69 6b 46 6c 61 67 73 20 7c 3d 20 50 49 4b 43 pikFlags |= PIKC
6170: 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 56 5f 46 HR_PROCESS_DIV_F
6180: 4c 4f 41 54 5f 52 49 47 48 54 3b 0a 20 20 7d 0a LOAT_RIGHT;. }.
6190: 20 20 69 66 28 66 69 6e 64 5f 6f 70 74 69 6f 6e if(find_option
61a0: 28 22 64 69 76 2d 74 6f 67 67 6c 65 22 2c 30 2c ("div-toggle",0,
61b0: 30 29 21 3d 30 29 7b 0a 20 20 20 20 70 69 6b 46 0)!=0){. pikF
61c0: 6c 61 67 73 20 7c 3d 20 50 49 4b 43 48 52 5f 50 lags |= PIKCHR_P
61d0: 52 4f 43 45 53 53 5f 44 49 56 5f 54 4f 47 47 4c ROCESS_DIV_TOGGL
61e0: 45 3b 0a 20 20 7d 0a 20 20 69 66 28 66 69 6e 64 E;. }. if(find
61f0: 5f 6f 70 74 69 6f 6e 28 22 64 69 76 2d 73 6f 75 _option("div-sou
6200: 72 63 65 22 2c 30 2c 30 29 21 3d 30 29 7b 0a 20 rce",0,0)!=0){.
6210: 20 20 20 70 69 6b 46 6c 61 67 73 20 7c 3d 20 50 pikFlags |= P
6220: 49 4b 43 48 52 5f 50 52 4f 43 45 53 53 5f 44 49 IKCHR_PROCESS_DI
6230: 56 5f 53 4f 55 52 43 45 20 7c 20 50 49 4b 43 48 V_SOURCE | PIKCH
6240: 52 5f 50 52 4f 43 45 53 53 5f 53 52 43 3b 0a 20 R_PROCESS_SRC;.
6250: 20 7d 0a 20 20 69 66 28 66 69 6e 64 5f 6f 70 74 }. if(find_opt
6260: 69 6f 6e 28 22 64 61 72 6b 22 2c 30 2c 30 29 21 ion("dark",0,0)!
6270: 3d 30 29 7b 0a 20 20 20 20 70 69 6b 46 6c 61 67 =0){. pikFlag
6280: 73 20 7c 3d 20 50 49 4b 43 48 52 5f 50 52 4f 43 s |= PIKCHR_PROC
6290: 45 53 53 5f 44 41 52 4b 5f 4d 4f 44 45 3b 0a 20 ESS_DARK_MODE;.
62a0: 20 7d 0a 0a 20 20 76 65 72 69 66 79 5f 61 6c 6c }.. verify_all
62b0: 5f 6f 70 74 69 6f 6e 73 28 29 3b 0a 20 20 69 66 _options();. if
62c0: 28 67 2e 61 72 67 63 3e 34 29 7b 0a 20 20 20 20 (g.argc>4){.
62d0: 75 73 61 67 65 28 22 3f 49 4e 46 49 4c 45 3f 20 usage("?INFILE?
62e0: 3f 4f 55 54 46 49 4c 45 3f 22 29 3b 0a 20 20 7d ?OUTFILE?");. }
62f0: 0a 20 20 69 66 28 67 2e 61 72 67 63 3e 32 29 7b . if(g.argc>2){
6300: 0a 20 20 20 20 7a 49 6e 66 69 6c 65 20 3d 20 67 . zInfile = g
6310: 2e 61 72 67 76 5b 32 5d 3b 0a 20 20 7d 0a 20 20 .argv[2];. }.
6320: 69 66 28 67 2e 61 72 67 63 3e 33 29 7b 0a 20 20 if(g.argc>3){.
6330: 20 20 7a 4f 75 74 66 69 6c 65 20 3d 20 67 2e 61 zOutfile = g.a
6340: 72 67 76 5b 33 5d 3b 0a 20 20 7d 0a 20 20 62 6c rgv[3];. }. bl
6350: 6f 62 5f 72 65 61 64 5f 66 72 6f 6d 5f 66 69 6c ob_read_from_fil
6360: 65 28 26 62 49 6e 2c 20 7a 49 6e 66 69 6c 65 2c e(&bIn, zInfile,
6370: 20 45 78 74 46 49 4c 45 29 3b 0a 20 20 69 66 28 ExtFILE);. if(
6380: 66 54 68 31 29 7b 0a 20 20 20 20 64 62 5f 66 69 fTh1){. db_fi
6390: 6e 64 5f 61 6e 64 5f 6f 70 65 6e 5f 72 65 70 6f nd_and_open_repo
63a0: 73 69 74 6f 72 79 28 4f 50 45 4e 5f 41 4e 59 5f sitory(OPEN_ANY_
63b0: 53 43 48 45 4d 41 20 7c 20 4f 50 45 4e 5f 4f 4b SCHEMA | OPEN_OK
63c0: 5f 4e 4f 54 5f 46 4f 55 4e 44 2c 20 30 29 0a 20 _NOT_FOUND, 0).
63d0: 20 20 20 20 20 2f 2a 20 5e 5e 5e 20 6e 65 65 64 /* ^^^ need
63e0: 65 64 20 66 6f 72 20 63 65 72 74 61 69 6e 20 54 ed for certain T
63f0: 48 31 20 66 75 6e 63 74 69 6f 6e 73 20 74 6f 20 H1 functions to
6400: 77 6f 72 6b 20 2a 2f 3b 0a 20 20 20 20 70 69 6b work */;. pik
6410: 46 6c 61 67 73 20 7c 3d 20 50 49 4b 43 48 52 5f Flags |= PIKCHR_
6420: 50 52 4f 43 45 53 53 5f 54 48 31 3b 0a 20 20 20 PROCESS_TH1;.
6430: 20 69 66 28 66 4e 6f 73 76 67 29 20 70 69 6b 46 if(fNosvg) pikF
6440: 6c 61 67 73 20 7c 3d 20 50 49 4b 43 48 52 5f 50 lags |= PIKCHR_P
6450: 52 4f 43 45 53 53 5f 54 48 31 5f 4e 4f 53 56 47 ROCESS_TH1_NOSVG
6460: 3b 0a 20 20 7d 0a 20 20 69 73 45 72 72 20 3d 20 ;. }. isErr =
6470: 70 69 6b 63 68 72 5f 70 72 6f 63 65 73 73 28 62 pikchr_process(b
6480: 6c 6f 62 5f 73 74 72 28 26 62 49 6e 29 2c 20 70 lob_str(&bIn), p
6490: 69 6b 46 6c 61 67 73 2c 0a 20 20 20 20 20 20 20 ikFlags,.
64a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
64b0: 20 20 66 54 68 31 20 3f 20 66 54 68 46 6c 61 67 fTh1 ? fThFlag
64c0: 73 20 3a 20 30 2c 20 26 62 4f 75 74 29 3b 0a 20 s : 0, &bOut);.
64d0: 20 69 66 28 69 73 45 72 72 29 7b 0a 20 20 20 20 if(isErr){.
64e0: 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 25 73 fossil_fatal("%s
64f0: 20 45 52 52 4f 52 3a 25 63 25 62 22 2c 20 31 3d ERROR:%c%b", 1=
6500: 3d 69 73 45 72 72 20 3f 20 22 54 48 31 22 20 3a =isErr ? "TH1" :
6510: 20 22 70 69 6b 63 68 72 22 2c 0a 20 20 20 20 20 "pikchr",.
6520: 20 20 20 20 20 20 20 20 20 20 20 20 31 3d 3d 69 1==i
6530: 73 45 72 72 20 3f 20 27 20 27 20 3a 20 27 5c 6e sErr ? ' ' : '\n
6540: 27 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ',.
6550: 20 20 20 20 26 62 4f 75 74 29 3b 0a 20 20 7d 65 &bOut);. }e
6560: 6c 73 65 7b 0a 20 20 20 20 62 6c 6f 62 5f 77 72 lse{. blob_wr
6570: 69 74 65 5f 74 6f 5f 66 69 6c 65 28 26 62 4f 75 ite_to_file(&bOu
6580: 74 2c 20 7a 4f 75 74 66 69 6c 65 29 3b 0a 20 20 t, zOutfile);.
6590: 7d 0a 20 20 54 68 5f 50 72 69 6e 74 54 72 61 63 }. Th_PrintTrac
65a0: 65 4c 6f 67 28 29 3b 0a 20 20 62 6c 6f 62 5f 72 eLog();. blob_r
65b0: 65 73 65 74 28 26 62 49 6e 29 3b 0a 20 20 62 6c eset(&bIn);. bl
65c0: 6f 62 5f 72 65 73 65 74 28 26 62 4f 75 74 29 3b ob_reset(&bOut);
65d0: 0a 7d 0a .}.