Hex Artifact Content
Not logged in

Artifact 4abb9f0b2b95942d0971726387b880987412019a:

File src/encode.c part of check-in [91f151d57a] - Moved string_xform.c code into encode.c, since that code serves a similar purpose. by stephan on 2008-02-05 20:48:16.

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 30 36 20 44 2e 20 52 69 63 68  (c) 2006 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 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62   GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 76  lic.** License v
00b0: 65 72 73 69 6f 6e 20 32 20 61 73 20 70 75 62 6c  ersion 2 as publ
00c0: 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65  ished by the Fre
00d0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
00e0: 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68 69  ation..**.** Thi
00f0: 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73  s program is dis
0100: 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20  tributed in the 
0110: 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c  hope that it wil
0120: 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20  l be useful,.** 
0130: 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20  but WITHOUT ANY 
0140: 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75  WARRANTY; withou
0150: 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69  t even the impli
0160: 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a  ed warranty of.*
0170: 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54  * MERCHANTABILIT
0180: 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52  Y or FITNESS FOR
0190: 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55   A PARTICULAR PU
01a0: 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20  RPOSE.  See the 
01b0: 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20 50  GNU.** General P
01c0: 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f  ublic License fo
01d0: 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a  r more details..
01e0: 2a 2a 20 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c  ** .** You shoul
01f0: 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20  d have received 
0200: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e  a copy of the GN
0210: 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63  U General Public
0220: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e  .** License alon
0230: 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72  g with this libr
0240: 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69  ary; if not, wri
0250: 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65  te to the.** Fre
0260: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
0270: 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20  ation, Inc., 59 
0280: 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53  Temple Place - S
0290: 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73  uite 330,.** Bos
02a0: 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31  ton, MA  02111-1
02b0: 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20  307, USA..**.** 
02c0: 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69  Author contact i
02d0: 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20  nformation:.**  
02e0: 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a   drh@hwaci.com.*
02f0: 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68  *   http://www.h
0300: 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a  waci.com/drh/.**
0310: 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  .***************
0320: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0330: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0340: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0350: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0360: 0a 2a 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20  .**.** Routines 
0370: 66 6f 72 20 65 6e 63 6f 64 69 6e 67 20 61 6e 64  for encoding and
0380: 20 64 65 63 6f 64 69 6e 67 20 74 65 78 74 2e 0a   decoding text..
0390: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 63 6f 6e  */.#include "con
03a0: 66 69 67 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20  fig.h".#include 
03b0: 22 65 6e 63 6f 64 65 2e 68 22 0a 0a 2f 2a 0a 2a  "encode.h"../*.*
03c0: 2a 20 4d 61 6b 65 20 74 68 65 20 67 69 76 65 6e  * Make the given
03d0: 20 73 74 72 69 6e 67 20 73 61 66 65 20 66 6f 72   string safe for
03e0: 20 48 54 4d 4c 20 62 79 20 63 6f 6e 76 65 72 74   HTML by convert
03f0: 69 6e 67 20 65 76 65 72 79 20 22 3c 22 20 69 6e  ing every "<" in
0400: 74 6f 20 22 26 6c 74 3b 22 2c 0a 2a 2a 20 65 76  to "&lt;",.** ev
0410: 65 72 79 20 22 3e 22 20 69 6e 74 6f 20 22 26 67  ery ">" into "&g
0420: 74 3b 22 20 61 6e 64 20 65 76 65 72 79 20 22 26  t;" and every "&
0430: 22 20 69 6e 74 6f 20 22 26 61 6d 70 3b 22 2e 20  " into "&amp;". 
0440: 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65   Return a pointe
0450: 72 0a 2a 2a 20 74 6f 20 61 20 6e 65 77 20 73 74  r.** to a new st
0460: 72 69 6e 67 20 6f 62 74 61 69 6e 65 64 20 66 72  ring obtained fr
0470: 6f 6d 20 6d 61 6c 6c 6f 63 28 29 2e 0a 2a 2a 0a  om malloc()..**.
0480: 2a 2a 20 57 65 20 61 6c 73 6f 20 65 6e 63 6f 64  ** We also encod
0490: 65 20 22 20 61 73 20 26 71 75 6f 74 3b 20 73 6f  e " as &quot; so
04a0: 20 74 68 61 74 20 69 74 20 63 61 6e 20 61 70 70   that it can app
04b0: 65 61 72 20 61 73 20 61 6e 20 61 72 67 75 6d 65  ear as an argume
04c0: 6e 74 0a 2a 2a 20 74 6f 20 6d 61 72 6b 75 70 2e  nt.** to markup.
04d0: 0a 2a 2f 0a 63 68 61 72 20 2a 68 74 6d 6c 69 7a  .*/.char *htmliz
04e0: 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 49  e(const char *zI
04f0: 6e 2c 20 69 6e 74 20 6e 29 7b 0a 20 20 69 6e 74  n, int n){.  int
0500: 20 63 3b 0a 20 20 69 6e 74 20 69 20 3d 20 30 3b   c;.  int i = 0;
0510: 0a 20 20 69 6e 74 20 63 6f 75 6e 74 20 3d 20 30  .  int count = 0
0520: 3b 0a 20 20 63 68 61 72 20 2a 7a 4f 75 74 3b 0a  ;.  char *zOut;.
0530: 0a 20 20 69 66 28 20 6e 3c 30 20 29 20 6e 20 3d  .  if( n<0 ) n =
0540: 20 73 74 72 6c 65 6e 28 7a 49 6e 29 3b 0a 20 20   strlen(zIn);.  
0550: 77 68 69 6c 65 28 20 69 3c 6e 20 26 26 20 28 63  while( i<n && (c
0560: 20 3d 20 7a 49 6e 5b 69 5d 29 21 3d 30 20 29 7b   = zIn[i])!=0 ){
0570: 0a 20 20 20 20 73 77 69 74 63 68 28 20 63 20 29  .    switch( c )
0580: 7b 0a 20 20 20 20 20 20 63 61 73 65 20 27 3c 27  {.      case '<'
0590: 3a 20 20 20 63 6f 75 6e 74 20 2b 3d 20 34 3b 20  :   count += 4; 
05a0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
05b0: 20 20 20 63 61 73 65 20 27 3e 27 3a 20 20 20 63     case '>':   c
05c0: 6f 75 6e 74 20 2b 3d 20 34 3b 20 20 20 20 20 20  ount += 4;      
05d0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 61   break;.      ca
05e0: 73 65 20 27 26 27 3a 20 20 20 63 6f 75 6e 74 20  se '&':   count 
05f0: 2b 3d 20 35 3b 20 20 20 20 20 20 20 62 72 65 61  += 5;       brea
0600: 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20 27 22  k;.      case '"
0610: 27 3a 20 20 20 63 6f 75 6e 74 20 2b 3d 20 36 3b  ':   count += 6;
0620: 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20         break;.  
0630: 20 20 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20      default:    
0640: 63 6f 75 6e 74 2b 2b 3b 20 20 20 20 20 20 20 20  count++;        
0650: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
0660: 20 20 20 69 2b 2b 3b 0a 20 20 7d 0a 20 20 69 20     i++;.  }.  i 
0670: 3d 20 30 3b 0a 20 20 7a 4f 75 74 20 3d 20 6d 61  = 0;.  zOut = ma
0680: 6c 6c 6f 63 28 20 63 6f 75 6e 74 2b 31 20 29 3b  lloc( count+1 );
0690: 0a 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20 29  .  if( zOut==0 )
06a0: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 77 68 69   return 0;.  whi
06b0: 6c 65 28 20 6e 2d 2d 3e 30 20 26 26 20 28 63 20  le( n-->0 && (c 
06c0: 3d 20 2a 7a 49 6e 29 21 3d 30 20 29 7b 0a 20 20  = *zIn)!=0 ){.  
06d0: 20 20 73 77 69 74 63 68 28 20 63 20 29 7b 0a 20    switch( c ){. 
06e0: 20 20 20 20 20 63 61 73 65 20 27 3c 27 3a 20 20       case '<':  
06f0: 20 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 69   .        zOut[i
0700: 2b 2b 5d 20 3d 20 27 26 27 3b 0a 20 20 20 20 20  ++] = '&';.     
0710: 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27     zOut[i++] = '
0720: 6c 27 3b 0a 20 20 20 20 20 20 20 20 7a 4f 75 74  l';.        zOut
0730: 5b 69 2b 2b 5d 20 3d 20 27 74 27 3b 0a 20 20 20  [i++] = 't';.   
0740: 20 20 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d       zOut[i++] =
0750: 20 27 3b 27 3b 0a 20 20 20 20 20 20 20 20 62 72   ';';.        br
0760: 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65 20  eak;.      case 
0770: 27 3e 27 3a 20 20 20 0a 20 20 20 20 20 20 20 20  '>':   .        
0780: 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 26 27 3b  zOut[i++] = '&';
0790: 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 69 2b  .        zOut[i+
07a0: 2b 5d 20 3d 20 27 67 27 3b 0a 20 20 20 20 20 20  +] = 'g';.      
07b0: 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 74    zOut[i++] = 't
07c0: 27 3b 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b  ';.        zOut[
07d0: 69 2b 2b 5d 20 3d 20 27 3b 27 3b 0a 20 20 20 20  i++] = ';';.    
07e0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
07f0: 20 63 61 73 65 20 27 26 27 3a 20 20 20 0a 20 20   case '&':   .  
0800: 20 20 20 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20        zOut[i++] 
0810: 3d 20 27 26 27 3b 0a 20 20 20 20 20 20 20 20 7a  = '&';.        z
0820: 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 61 27 3b 0a  Out[i++] = 'a';.
0830: 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 69 2b 2b          zOut[i++
0840: 5d 20 3d 20 27 6d 27 3b 0a 20 20 20 20 20 20 20  ] = 'm';.       
0850: 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 70 27   zOut[i++] = 'p'
0860: 3b 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 69  ;.        zOut[i
0870: 2b 2b 5d 20 3d 20 27 3b 27 3b 0a 20 20 20 20 20  ++] = ';';.     
0880: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20     break;.      
0890: 63 61 73 65 20 27 22 27 3a 20 20 20 0a 20 20 20  case '"':   .   
08a0: 20 20 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d       zOut[i++] =
08b0: 20 27 26 27 3b 0a 20 20 20 20 20 20 20 20 7a 4f   '&';.        zO
08c0: 75 74 5b 69 2b 2b 5d 20 3d 20 27 71 27 3b 0a 20  ut[i++] = 'q';. 
08d0: 20 20 20 20 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d         zOut[i++]
08e0: 20 3d 20 27 75 27 3b 0a 20 20 20 20 20 20 20 20   = 'u';.        
08f0: 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 6f 27 3b  zOut[i++] = 'o';
0900: 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 69 2b  .        zOut[i+
0910: 2b 5d 20 3d 20 27 74 27 3b 0a 20 20 20 20 20 20  +] = 't';.      
0920: 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 3b    zOut[i++] = ';
0930: 27 3b 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b  ';.        break
0940: 3b 0a 20 20 20 20 20 20 64 65 66 61 75 6c 74 3a  ;.      default:
0950: 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 69 2b  .        zOut[i+
0960: 2b 5d 20 3d 20 63 3b 0a 20 20 20 20 20 20 20 20  +] = c;.        
0970: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
0980: 20 7a 49 6e 2b 2b 3b 0a 20 20 7d 0a 20 20 7a 4f   zIn++;.  }.  zO
0990: 75 74 5b 69 5d 20 3d 20 30 3b 0a 20 20 72 65 74  ut[i] = 0;.  ret
09a0: 75 72 6e 20 7a 4f 75 74 3b 0a 7d 0a 0a 0a 2f 2a  urn zOut;.}.../*
09b0: 0a 2a 2a 20 45 6e 63 6f 64 65 20 61 20 73 74 72  .** Encode a str
09c0: 69 6e 67 20 66 6f 72 20 48 54 54 50 2e 20 20 54  ing for HTTP.  T
09d0: 68 69 73 20 6d 65 61 6e 73 20 63 6f 6e 76 65 72  his means conver
09e0: 74 69 6e 67 20 6c 6f 74 73 20 6f 66 0a 2a 2a 20  ting lots of.** 
09f0: 63 68 61 72 61 63 74 65 72 73 20 69 6e 74 6f 20  characters into 
0a00: 74 68 65 20 22 25 48 48 22 20 77 68 65 72 65 20  the "%HH" where 
0a10: 48 20 69 73 20 61 20 68 65 78 20 64 69 67 69 74  H is a hex digit
0a20: 2e 20 20 49 74 20 61 6c 73 6f 0a 2a 2a 20 6d 65  .  It also.** me
0a30: 61 6e 73 20 63 6f 6e 76 65 72 74 69 6e 67 20 73  ans converting s
0a40: 70 61 63 65 73 20 74 6f 20 22 2b 22 2e 0a 2a 2a  paces to "+"..**
0a50: 0a 2a 2a 20 54 68 69 73 20 69 73 20 74 68 65 20  .** This is the 
0a60: 6f 70 70 6f 73 69 74 65 20 6f 66 20 44 65 48 74  opposite of DeHt
0a70: 74 70 69 7a 65 53 74 72 69 6e 67 20 62 65 6c 6f  tpizeString belo
0a80: 77 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61  w..*/.static cha
0a90: 72 20 2a 45 6e 63 6f 64 65 48 74 74 70 28 63 6f  r *EncodeHttp(co
0aa0: 6e 73 74 20 63 68 61 72 20 2a 7a 49 6e 2c 20 69  nst char *zIn, i
0ab0: 6e 74 20 6e 2c 20 69 6e 74 20 65 6e 63 6f 64 65  nt n, int encode
0ac0: 53 6c 61 73 68 29 7b 0a 20 20 69 6e 74 20 63 3b  Slash){.  int c;
0ad0: 0a 20 20 69 6e 74 20 69 20 3d 20 30 3b 0a 20 20  .  int i = 0;.  
0ae0: 69 6e 74 20 63 6f 75 6e 74 20 3d 20 30 3b 0a 20  int count = 0;. 
0af0: 20 63 68 61 72 20 2a 7a 4f 75 74 3b 0a 20 20 69   char *zOut;.  i
0b00: 6e 74 20 6f 74 68 65 72 3b 0a 23 20 64 65 66 69  nt other;.# defi
0b10: 6e 65 20 49 73 53 61 66 65 43 68 61 72 28 58 29  ne IsSafeChar(X)
0b20: 20 20 5c 0a 20 20 20 20 20 28 69 73 61 6c 6e 75    \.     (isalnu
0b30: 6d 28 58 29 20 7c 7c 20 28 58 29 3d 3d 27 2e 27  m(X) || (X)=='.'
0b40: 20 7c 7c 20 28 58 29 3d 3d 27 24 27 20 7c 7c 20   || (X)=='$' || 
0b50: 28 58 29 3d 3d 27 2d 27 20 7c 7c 20 28 58 29 3d  (X)=='-' || (X)=
0b60: 3d 27 5f 27 20 7c 7c 20 28 58 29 3d 3d 6f 74 68  ='_' || (X)==oth
0b70: 65 72 29 0a 0a 20 20 69 66 28 20 7a 49 6e 3d 3d  er)..  if( zIn==
0b80: 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20  0 ) return 0;.  
0b90: 69 66 28 20 6e 3c 30 20 29 20 6e 20 3d 20 73 74  if( n<0 ) n = st
0ba0: 72 6c 65 6e 28 7a 49 6e 29 3b 0a 20 20 6f 74 68  rlen(zIn);.  oth
0bb0: 65 72 20 3d 20 65 6e 63 6f 64 65 53 6c 61 73 68  er = encodeSlash
0bc0: 20 3f 20 27 61 27 20 3a 20 27 2f 27 3b 0a 20 20   ? 'a' : '/';.  
0bd0: 77 68 69 6c 65 28 20 69 3c 6e 20 26 26 20 28 63  while( i<n && (c
0be0: 20 3d 20 7a 49 6e 5b 69 5d 29 21 3d 30 20 29 7b   = zIn[i])!=0 ){
0bf0: 0a 20 20 20 20 69 66 28 20 49 73 53 61 66 65 43  .    if( IsSafeC
0c00: 68 61 72 28 63 29 20 7c 7c 20 63 3d 3d 27 20 27  har(c) || c==' '
0c10: 20 29 7b 0a 20 20 20 20 20 20 63 6f 75 6e 74 2b   ){.      count+
0c20: 2b 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  +;.    }else{.  
0c30: 20 20 20 20 63 6f 75 6e 74 20 2b 3d 20 33 3b 0a      count += 3;.
0c40: 20 20 20 20 7d 0a 20 20 20 20 69 2b 2b 3b 0a 20      }.    i++;. 
0c50: 20 7d 0a 20 20 69 20 3d 20 30 3b 0a 20 20 7a 4f   }.  i = 0;.  zO
0c60: 75 74 20 3d 20 6d 61 6c 6c 6f 63 28 20 63 6f 75  ut = malloc( cou
0c70: 6e 74 2b 31 20 29 3b 0a 20 20 69 66 28 20 7a 4f  nt+1 );.  if( zO
0c80: 75 74 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30  ut==0 ) return 0
0c90: 3b 0a 20 20 77 68 69 6c 65 28 20 6e 2d 2d 3e 30  ;.  while( n-->0
0ca0: 20 26 26 20 28 63 20 3d 20 2a 7a 49 6e 29 21 3d   && (c = *zIn)!=
0cb0: 30 20 29 7b 0a 20 20 20 20 69 66 28 20 49 73 53  0 ){.    if( IsS
0cc0: 61 66 65 43 68 61 72 28 63 29 20 29 7b 0a 20 20  afeChar(c) ){.  
0cd0: 20 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20      zOut[i++] = 
0ce0: 63 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28  c;.    }else if(
0cf0: 20 63 3d 3d 27 20 27 20 29 7b 0a 20 20 20 20 20   c==' ' ){.     
0d00: 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27 2b 27   zOut[i++] = '+'
0d10: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ;.    }else{.   
0d20: 20 20 20 7a 4f 75 74 5b 69 2b 2b 5d 20 3d 20 27     zOut[i++] = '
0d30: 25 27 3b 0a 20 20 20 20 20 20 7a 4f 75 74 5b 69  %';.      zOut[i
0d40: 2b 2b 5d 20 3d 20 22 30 31 32 33 34 35 36 37 38  ++] = "012345678
0d50: 39 41 42 43 44 45 46 22 5b 28 63 3e 3e 34 29 26  9ABCDEF"[(c>>4)&
0d60: 30 78 66 5d 3b 0a 20 20 20 20 20 20 7a 4f 75 74  0xf];.      zOut
0d70: 5b 69 2b 2b 5d 20 3d 20 22 30 31 32 33 34 35 36  [i++] = "0123456
0d80: 37 38 39 41 42 43 44 45 46 22 5b 63 26 30 78 66  789ABCDEF"[c&0xf
0d90: 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 49 6e  ];.    }.    zIn
0da0: 2b 2b 3b 0a 20 20 7d 0a 20 20 7a 4f 75 74 5b 69  ++;.  }.  zOut[i
0db0: 5d 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20  ] = 0;.  return 
0dc0: 7a 4f 75 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43  zOut;.}../*.** C
0dd0: 6f 6e 76 65 72 74 20 74 68 65 20 69 6e 70 75 74  onvert the input
0de0: 20 73 74 72 69 6e 67 20 69 6e 74 6f 20 61 20 66   string into a f
0df0: 6f 72 6d 20 74 68 61 74 20 69 73 20 73 75 69 74  orm that is suit
0e00: 61 62 6c 65 20 66 6f 72 20 75 73 65 20 61 73 0a  able for use as.
0e10: 2a 2a 20 61 20 74 6f 6b 65 6e 20 69 6e 20 74 68  ** a token in th
0e20: 65 20 48 54 54 50 20 70 72 6f 74 6f 63 6f 6c 2e  e HTTP protocol.
0e30: 20 20 53 70 61 63 65 73 20 61 72 65 20 65 6e 63    Spaces are enc
0e40: 6f 64 65 64 20 61 73 20 27 2b 27 20 61 6e 64 20  oded as '+' and 
0e50: 73 70 65 63 69 61 6c 0a 2a 2a 20 63 68 61 72 61  special.** chara
0e60: 63 74 65 72 73 20 61 72 65 20 65 6e 63 6f 64 65  cters are encode
0e70: 64 20 61 73 20 22 25 48 48 22 20 77 68 65 72 65  d as "%HH" where
0e80: 20 48 48 20 69 73 20 61 20 74 77 6f 2d 64 69 67   HH is a two-dig
0e90: 69 74 20 68 65 78 69 64 65 63 69 6d 61 6c 0a 2a  it hexidecimal.*
0ea0: 2a 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e  * representation
0eb0: 20 6f 66 20 74 68 65 20 63 68 61 72 61 63 74 65   of the characte
0ec0: 72 2e 20 20 54 68 65 20 22 2f 22 20 63 68 61 72  r.  The "/" char
0ed0: 61 63 74 65 72 20 69 73 20 65 6e 63 6f 64 65 64  acter is encoded
0ee0: 0a 2a 2a 20 61 73 20 22 25 32 46 22 2e 0a 2a 2f  .** as "%2F"..*/
0ef0: 0a 63 68 61 72 20 2a 68 74 74 70 69 7a 65 28 63  .char *httpize(c
0f00: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 2c 20 69 6e  onst char *z, in
0f10: 74 20 6e 29 7b 0a 20 20 72 65 74 75 72 6e 20 45  t n){.  return E
0f20: 6e 63 6f 64 65 48 74 74 70 28 7a 2c 20 6e 2c 20  ncodeHttp(z, n, 
0f30: 31 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6e  1);.}../*.** Con
0f40: 76 65 72 74 20 74 68 65 20 69 6e 70 75 74 20 73  vert the input s
0f50: 74 72 69 6e 67 20 69 6e 74 6f 20 61 20 66 6f 72  tring into a for
0f60: 6d 20 74 68 61 74 20 69 73 20 73 75 69 74 61 62  m that is suitab
0f70: 6c 65 20 66 6f 72 20 75 73 65 20 61 73 0a 2a 2a  le for use as.**
0f80: 20 61 20 74 6f 6b 65 6e 20 69 6e 20 74 68 65 20   a token in the 
0f90: 48 54 54 50 20 70 72 6f 74 6f 63 6f 6c 2e 20 20  HTTP protocol.  
0fa0: 53 70 61 63 65 73 20 61 72 65 20 65 6e 63 6f 64  Spaces are encod
0fb0: 65 64 20 61 73 20 27 2b 27 20 61 6e 64 20 73 70  ed as '+' and sp
0fc0: 65 63 69 61 6c 0a 2a 2a 20 63 68 61 72 61 63 74  ecial.** charact
0fd0: 65 72 73 20 61 72 65 20 65 6e 63 6f 64 65 64 20  ers are encoded 
0fe0: 61 73 20 22 25 48 48 22 20 77 68 65 72 65 20 48  as "%HH" where H
0ff0: 48 20 69 73 20 61 20 74 77 6f 2d 64 69 67 69 74  H is a two-digit
1000: 20 68 65 78 69 64 65 63 69 6d 61 6c 0a 2a 2a 20   hexidecimal.** 
1010: 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 6f  representation o
1020: 66 20 74 68 65 20 63 68 61 72 61 63 74 65 72 2e  f the character.
1030: 20 20 54 68 65 20 22 2f 22 20 63 68 61 72 61 63    The "/" charac
1040: 74 65 72 20 69 73 20 6e 6f 74 20 65 6e 63 6f 64  ter is not encod
1050: 65 64 0a 2a 2a 20 62 79 20 74 68 69 73 20 72 6f  ed.** by this ro
1060: 75 74 69 6e 65 2e 20 0a 2a 2f 0a 63 68 61 72 20  utine. .*/.char 
1070: 2a 75 72 6c 69 7a 65 28 63 6f 6e 73 74 20 63 68  *urlize(const ch
1080: 61 72 20 2a 7a 2c 20 69 6e 74 20 6e 29 7b 0a 20  ar *z, int n){. 
1090: 20 72 65 74 75 72 6e 20 45 6e 63 6f 64 65 48 74   return EncodeHt
10a0: 74 70 28 7a 2c 20 6e 2c 20 30 29 3b 0a 7d 0a 0a  tp(z, n, 0);.}..
10b0: 2f 2a 0a 2a 2a 20 43 6f 6e 76 65 72 74 20 61 20  /*.** Convert a 
10c0: 73 69 6e 67 6c 65 20 48 45 58 20 64 69 67 69 74  single HEX digit
10d0: 20 74 6f 20 61 6e 20 69 6e 74 65 67 65 72 0a 2a   to an integer.*
10e0: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 41 73 63  /.static int Asc
10f0: 69 69 54 6f 48 65 78 28 69 6e 74 20 63 29 7b 0a  iiToHex(int c){.
1100: 20 20 69 66 28 20 63 3e 3d 27 61 27 20 26 26 20    if( c>='a' && 
1110: 63 3c 3d 27 66 27 20 29 7b 0a 20 20 20 20 63 20  c<='f' ){.    c 
1120: 2b 3d 20 31 30 20 2d 20 27 61 27 3b 0a 20 20 7d  += 10 - 'a';.  }
1130: 65 6c 73 65 20 69 66 28 20 63 3e 3d 27 41 27 20  else if( c>='A' 
1140: 26 26 20 63 3c 3d 27 46 27 20 29 7b 0a 20 20 20  && c<='F' ){.   
1150: 20 63 20 2b 3d 20 31 30 20 2d 20 27 41 27 3b 0a   c += 10 - 'A';.
1160: 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3e 3d 27    }else if( c>='
1170: 30 27 20 26 26 20 63 3c 3d 27 39 27 20 29 7b 0a  0' && c<='9' ){.
1180: 20 20 20 20 63 20 2d 3d 20 27 30 27 3b 0a 20 20      c -= '0';.  
1190: 7d 65 6c 73 65 7b 0a 20 20 20 20 63 20 3d 20 30  }else{.    c = 0
11a0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 63  ;.  }.  return c
11b0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6d 6f 76  ;.}../*.** Remov
11c0: 65 20 74 68 65 20 48 54 54 50 20 65 6e 63 6f 64  e the HTTP encod
11d0: 69 6e 67 73 20 66 72 6f 6d 20 61 20 73 74 72 69  ings from a stri
11e0: 6e 67 2e 20 20 54 68 65 20 63 6f 6e 76 65 72 73  ng.  The convers
11f0: 69 6f 6e 20 69 73 20 64 6f 6e 65 0a 2a 2a 20 69  ion is done.** i
1200: 6e 2d 70 6c 61 63 65 2e 20 20 52 65 74 75 72 6e  n-place.  Return
1210: 20 74 68 65 20 6c 65 6e 67 74 68 20 6f 66 20 74   the length of t
1220: 68 65 20 73 74 72 69 6e 67 20 61 66 74 65 72 20  he string after 
1230: 63 6f 6e 76 65 72 73 69 6f 6e 2e 0a 2a 2f 0a 69  conversion..*/.i
1240: 6e 74 20 64 65 68 74 74 70 69 7a 65 28 63 68 61  nt dehttpize(cha
1250: 72 20 2a 7a 29 7b 0a 20 20 69 6e 74 20 69 2c 20  r *z){.  int i, 
1260: 6a 3b 0a 0a 20 20 2f 2a 20 54 72 65 61 74 20 61  j;..  /* Treat a
1270: 20 6e 75 6c 6c 20 70 6f 69 6e 74 65 72 20 61 73   null pointer as
1280: 20 61 20 7a 65 72 6f 2d 6c 65 6e 67 74 68 20 73   a zero-length s
1290: 74 72 69 6e 67 2e 20 2a 2f 0a 20 20 69 66 28 20  tring. */.  if( 
12a0: 21 7a 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 0a  !z ) return 0;..
12b0: 20 20 69 20 3d 20 6a 20 3d 20 30 3b 0a 20 20 77    i = j = 0;.  w
12c0: 68 69 6c 65 28 20 7a 5b 69 5d 20 29 7b 0a 20 20  hile( z[i] ){.  
12d0: 20 20 73 77 69 74 63 68 28 20 7a 5b 69 5d 20 29    switch( z[i] )
12e0: 7b 0a 20 20 20 20 20 20 63 61 73 65 20 27 25 27  {.      case '%'
12f0: 3a 0a 20 20 20 20 20 20 20 20 69 66 28 20 7a 5b  :.        if( z[
1300: 69 2b 31 5d 20 26 26 20 7a 5b 69 2b 32 5d 20 29  i+1] && z[i+2] )
1310: 7b 0a 20 20 20 20 20 20 20 20 20 20 7a 5b 6a 5d  {.          z[j]
1320: 20 3d 20 41 73 63 69 69 54 6f 48 65 78 28 7a 5b   = AsciiToHex(z[
1330: 69 2b 31 5d 29 20 3c 3c 20 34 3b 0a 20 20 20 20  i+1]) << 4;.    
1340: 20 20 20 20 20 20 7a 5b 6a 5d 20 7c 3d 20 41 73        z[j] |= As
1350: 63 69 69 54 6f 48 65 78 28 7a 5b 69 2b 32 5d 29  ciiToHex(z[i+2])
1360: 3b 0a 20 20 20 20 20 20 20 20 20 20 69 20 2b 3d  ;.          i +=
1370: 20 32 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20   2;.        }.  
1380: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
1390: 20 20 20 63 61 73 65 20 27 2b 27 3a 0a 20 20 20     case '+':.   
13a0: 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 27 20 27 3b       z[j] = ' ';
13b0: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  .        break;.
13c0: 20 20 20 20 20 20 64 65 66 61 75 6c 74 3a 0a 20        default:. 
13d0: 20 20 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 7a 5b         z[j] = z[
13e0: 69 5d 3b 0a 20 20 20 20 20 20 20 20 62 72 65 61  i];.        brea
13f0: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 2b 2b  k;.    }.    i++
1400: 3b 0a 20 20 20 20 6a 2b 2b 3b 0a 20 20 7d 0a 20  ;.    j++;.  }. 
1410: 20 7a 5b 6a 5d 20 3d 20 30 3b 0a 20 20 72 65 74   z[j] = 0;.  ret
1420: 75 72 6e 20 6a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn j;.}../*.** 
1430: 54 68 65 20 22 66 6f 73 73 69 6c 69 7a 65 22 20  The "fossilize" 
1440: 65 6e 63 6f 64 69 6e 67 20 69 73 20 75 73 65 64  encoding is used
1450: 20 69 6e 20 74 68 65 20 68 65 61 64 65 72 73 20   in the headers 
1460: 6f 66 20 72 65 63 6f 72 64 73 0a 2a 2a 20 28 61  of records.** (a
1470: 6b 61 20 22 63 6f 6e 74 65 6e 74 20 66 69 6c 65  ka "content file
1480: 73 22 29 20 74 6f 20 65 73 63 61 70 65 20 73 70  s") to escape sp
1490: 65 63 69 61 6c 20 63 68 61 72 61 63 74 65 72 73  ecial characters
14a0: 2e 20 20 54 68 65 0a 2a 2a 20 66 6f 73 73 69 6c  .  The.** fossil
14b0: 69 7a 65 20 65 6e 63 6f 64 69 6e 67 20 70 61 73  ize encoding pas
14c0: 73 65 73 20 6d 6f 73 74 20 63 68 61 72 61 63 74  ses most charact
14d0: 65 72 73 20 74 68 72 6f 75 67 68 20 75 6e 63 68  ers through unch
14e0: 61 6e 67 65 64 2e 0a 2a 2a 20 54 68 65 20 63 68  anged..** The ch
14f0: 61 6e 67 65 73 20 61 72 65 20 74 68 65 73 65 3a  anges are these:
1500: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20 73 70  .**.**        sp
1510: 61 63 65 20 20 20 20 2d 3e 20 20 20 5c 73 0a 2a  ace    ->   \s.*
1520: 2a 20 20 20 20 20 20 20 20 74 61 62 20 20 20 20  *        tab    
1530: 20 20 2d 3e 20 20 20 5c 74 0a 2a 2a 20 20 20 20    ->   \t.**    
1540: 20 20 20 20 6e 65 77 6c 69 6e 65 20 20 2d 3e 20      newline  -> 
1550: 20 20 5c 6e 0a 2a 2a 20 20 20 20 20 20 20 20 63    \n.**        c
1560: 72 20 20 20 20 20 20 20 2d 3e 20 20 20 5c 72 0a  r       ->   \r.
1570: 2a 2a 20 20 20 20 20 20 20 20 66 6f 72 6d 66 65  **        formfe
1580: 65 64 20 2d 3e 20 20 20 5c 66 0a 2a 2a 20 20 20  ed ->   \f.**   
1590: 20 20 20 20 20 76 74 61 62 20 20 20 20 20 2d 3e       vtab     ->
15a0: 20 20 20 5c 76 0a 2a 2a 20 20 20 20 20 20 20 20     \v.**        
15b0: 6e 75 6c 20 20 20 20 20 20 2d 3e 20 20 20 5c 30  nul      ->   \0
15c0: 0a 2a 2a 20 20 20 20 20 20 20 20 5c 20 20 20 20  .**        \    
15d0: 20 20 20 20 2d 3e 20 20 20 5c 5c 0a 2a 2a 0a 2a      ->   \\.**.*
15e0: 2a 20 54 68 65 20 66 6f 73 73 69 6c 69 7a 65 28  * The fossilize(
15f0: 29 20 72 6f 75 74 69 6e 65 20 64 6f 65 73 20 61  ) routine does a
1600: 6e 20 65 6e 63 6f 64 69 6e 67 20 6f 66 20 69 74  n encoding of it
1610: 73 20 69 6e 70 75 74 20 61 6e 64 0a 2a 2a 20 72  s input and.** r
1620: 65 74 75 72 6e 73 20 61 20 70 6f 69 6e 74 65 72  eturns a pointer
1630: 20 74 6f 20 74 68 65 20 65 6e 63 6f 64 69 6e 67   to the encoding
1640: 20 69 6e 20 73 70 61 63 65 20 6f 62 74 61 69 6e   in space obtain
1650: 65 64 20 66 72 6f 6d 0a 2a 2a 20 6d 61 6c 6c 6f  ed from.** mallo
1660: 63 2e 0a 2a 2f 0a 63 68 61 72 20 2a 66 6f 73 73  c..*/.char *foss
1670: 69 6c 69 7a 65 28 63 6f 6e 73 74 20 63 68 61 72  ilize(const char
1680: 20 2a 7a 49 6e 2c 20 69 6e 74 20 6e 49 6e 29 7b   *zIn, int nIn){
1690: 0a 20 20 69 6e 74 20 6e 2c 20 69 2c 20 6a 2c 20  .  int n, i, j, 
16a0: 63 3b 0a 20 20 63 68 61 72 20 2a 7a 4f 75 74 3b  c;.  char *zOut;
16b0: 0a 20 20 69 66 28 20 6e 49 6e 3c 30 20 29 20 6e  .  if( nIn<0 ) n
16c0: 49 6e 20 3d 20 73 74 72 6c 65 6e 28 7a 49 6e 29  In = strlen(zIn)
16d0: 3b 0a 20 20 66 6f 72 28 69 3d 6e 3d 30 3b 20 69  ;.  for(i=n=0; i
16e0: 3c 6e 49 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  <nIn; i++){.    
16f0: 63 20 3d 20 7a 49 6e 5b 69 5d 3b 0a 20 20 20 20  c = zIn[i];.    
1700: 69 66 28 20 63 3d 3d 30 20 7c 7c 20 69 73 73 70  if( c==0 || issp
1710: 61 63 65 28 63 29 20 7c 7c 20 63 3d 3d 27 5c 5c  ace(c) || c=='\\
1720: 27 20 29 20 6e 2b 2b 3b 0a 20 20 7d 0a 20 20 6e  ' ) n++;.  }.  n
1730: 20 2b 3d 20 6e 49 6e 3b 0a 20 20 7a 4f 75 74 20   += nIn;.  zOut 
1740: 3d 20 6d 61 6c 6c 6f 63 28 20 6e 2b 31 20 29 3b  = malloc( n+1 );
1750: 0a 20 20 69 66 28 20 7a 4f 75 74 20 29 7b 0a 20  .  if( zOut ){. 
1760: 20 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69 3c     for(i=j=0; i<
1770: 6e 49 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20  nIn; i++){.     
1780: 20 69 6e 74 20 63 20 3d 20 7a 49 6e 5b 69 5d 3b   int c = zIn[i];
1790: 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20  .      if( c==0 
17a0: 29 7b 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b  ){.        zOut[
17b0: 6a 2b 2b 5d 20 3d 20 27 5c 5c 27 3b 0a 20 20 20  j++] = '\\';.   
17c0: 20 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d       zOut[j++] =
17d0: 20 27 30 27 3b 0a 20 20 20 20 20 20 7d 65 6c 73   '0';.      }els
17e0: 65 20 69 66 28 20 63 3d 3d 27 5c 5c 27 20 29 7b  e if( c=='\\' ){
17f0: 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 6a 2b  .        zOut[j+
1800: 2b 5d 20 3d 20 27 5c 5c 27 3b 0a 20 20 20 20 20  +] = '\\';.     
1810: 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20 27     zOut[j++] = '
1820: 5c 5c 27 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  \\';.      }else
1830: 20 69 66 28 20 69 73 73 70 61 63 65 28 63 29 20   if( isspace(c) 
1840: 29 7b 0a 20 20 20 20 20 20 20 20 7a 4f 75 74 5b  ){.        zOut[
1850: 6a 2b 2b 5d 20 3d 20 27 5c 5c 27 3b 0a 20 20 20  j++] = '\\';.   
1860: 20 20 20 20 20 73 77 69 74 63 68 28 20 63 20 29       switch( c )
1870: 7b 0a 20 20 20 20 20 20 20 20 20 20 63 61 73 65  {.          case
1880: 20 27 5c 6e 27 3a 20 20 63 20 3d 20 27 6e 27 3b   '\n':  c = 'n';
1890: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20   break;.        
18a0: 20 20 63 61 73 65 20 27 20 27 3a 20 20 20 63 20    case ' ':   c 
18b0: 3d 20 27 73 27 3b 20 62 72 65 61 6b 3b 0a 20 20  = 's'; break;.  
18c0: 20 20 20 20 20 20 20 20 63 61 73 65 20 27 5c 74          case '\t
18d0: 27 3a 20 20 63 20 3d 20 27 74 27 3b 20 62 72 65  ':  c = 't'; bre
18e0: 61 6b 3b 0a 20 20 20 20 20 20 20 20 20 20 63 61  ak;.          ca
18f0: 73 65 20 27 5c 72 27 3a 20 20 63 20 3d 20 27 72  se '\r':  c = 'r
1900: 27 3b 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20  '; break;.      
1910: 20 20 20 20 63 61 73 65 20 27 5c 76 27 3a 20 20      case '\v':  
1920: 63 20 3d 20 27 76 27 3b 20 62 72 65 61 6b 3b 0a  c = 'v'; break;.
1930: 20 20 20 20 20 20 20 20 20 20 63 61 73 65 20 27            case '
1940: 5c 66 27 3a 20 20 63 20 3d 20 27 66 27 3b 20 62  \f':  c = 'f'; b
1950: 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 7d 0a  reak;.        }.
1960: 20 20 20 20 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b          zOut[j++
1970: 5d 20 3d 20 63 3b 0a 20 20 20 20 20 20 7d 65 6c  ] = c;.      }el
1980: 73 65 7b 0a 20 20 20 20 20 20 20 20 7a 4f 75 74  se{.        zOut
1990: 5b 6a 2b 2b 5d 20 3d 20 63 3b 0a 20 20 20 20 20  [j++] = c;.     
19a0: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 7a 4f 75   }.    }.    zOu
19b0: 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 7d 0a 20 20  t[j] = 0;.  }.  
19c0: 72 65 74 75 72 6e 20 7a 4f 75 74 3b 0a 7d 0a 0a  return zOut;.}..
19d0: 2f 2a 0a 2a 2a 20 44 65 63 6f 64 65 20 61 20 66  /*.** Decode a f
19e0: 6f 73 73 69 6c 69 7a 65 64 20 73 74 72 69 6e 67  ossilized string
19f0: 20 69 6e 2d 70 6c 61 63 65 2e 0a 2a 2f 0a 76 6f   in-place..*/.vo
1a00: 69 64 20 64 65 66 6f 73 73 69 6c 69 7a 65 28 63  id defossilize(c
1a10: 68 61 72 20 2a 7a 29 7b 0a 20 20 69 6e 74 20 69  har *z){.  int i
1a20: 2c 20 6a 2c 20 63 3b 0a 20 20 66 6f 72 28 69 3d  , j, c;.  for(i=
1a30: 6a 3d 30 3b 20 7a 5b 69 5d 3b 20 69 2b 2b 29 7b  j=0; z[i]; i++){
1a40: 0a 20 20 20 20 63 20 3d 20 7a 5b 69 5d 3b 0a 20  .    c = z[i];. 
1a50: 20 20 20 69 66 28 20 63 3d 3d 27 5c 5c 27 20 26     if( c=='\\' &
1a60: 26 20 7a 5b 69 2b 31 5d 20 29 7b 0a 20 20 20 20  & z[i+1] ){.    
1a70: 20 20 69 2b 2b 3b 0a 20 20 20 20 20 20 73 77 69    i++;.      swi
1a80: 74 63 68 28 20 7a 5b 69 5d 20 29 7b 0a 20 20 20  tch( z[i] ){.   
1a90: 20 20 20 20 20 63 61 73 65 20 27 6e 27 3a 20 20       case 'n':  
1aa0: 63 20 3d 20 27 5c 6e 27 3b 20 20 62 72 65 61 6b  c = '\n';  break
1ab0: 3b 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 27  ;.        case '
1ac0: 73 27 3a 20 20 63 20 3d 20 27 20 27 3b 20 20 20  s':  c = ' ';   
1ad0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 63  break;.        c
1ae0: 61 73 65 20 27 74 27 3a 20 20 63 20 3d 20 27 5c  ase 't':  c = '\
1af0: 74 27 3b 20 20 62 72 65 61 6b 3b 0a 20 20 20 20  t';  break;.    
1b00: 20 20 20 20 63 61 73 65 20 27 72 27 3a 20 20 63      case 'r':  c
1b10: 20 3d 20 27 5c 72 27 3b 20 20 62 72 65 61 6b 3b   = '\r';  break;
1b20: 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 27 76  .        case 'v
1b30: 27 3a 20 20 63 20 3d 20 27 5c 76 27 3b 20 20 62  ':  c = '\v';  b
1b40: 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 63 61  reak;.        ca
1b50: 73 65 20 27 66 27 3a 20 20 63 20 3d 20 27 5c 66  se 'f':  c = '\f
1b60: 27 3b 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20  ';  break;.     
1b70: 20 20 20 63 61 73 65 20 27 30 27 3a 20 20 63 20     case '0':  c 
1b80: 3d 20 30 3b 20 20 20 20 20 62 72 65 61 6b 3b 0a  = 0;     break;.
1b90: 20 20 20 20 20 20 20 20 63 61 73 65 20 27 5c 5c          case '\\
1ba0: 27 3a 20 63 20 3d 20 27 5c 5c 27 3b 20 20 62 72  ': c = '\\';  br
1bb0: 65 61 6b 3b 0a 20 20 20 20 20 20 20 20 64 65 66  eak;.        def
1bc0: 61 75 6c 74 3a 20 20 20 63 20 3d 20 7a 5b 69 5d  ault:   c = z[i]
1bd0: 3b 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20  ;  break;.      
1be0: 7d 0a 20 20 20 20 7d 0a 20 20 20 20 7a 5b 6a 2b  }.    }.    z[j+
1bf0: 2b 5d 20 3d 20 63 3b 0a 20 20 7d 0a 20 20 7a 5b  +] = c;.  }.  z[
1c00: 6a 5d 20 3d 20 30 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a  j] = 0;.}.../*.*
1c10: 2a 20 54 68 65 20 63 68 61 72 61 63 74 65 72 73  * The characters
1c20: 20 75 73 65 64 20 66 6f 72 20 48 54 54 50 20 62   used for HTTP b
1c30: 61 73 65 36 34 20 65 6e 63 6f 64 69 6e 67 2e 0a  ase64 encoding..
1c40: 2a 2f 0a 73 74 61 74 69 63 20 75 6e 73 69 67 6e  */.static unsign
1c50: 65 64 20 63 68 61 72 20 7a 42 61 73 65 5b 5d 20  ed char zBase[] 
1c60: 3d 20 0a 20 20 22 30 31 32 33 34 35 36 37 38 39  = .  "0123456789
1c70: 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50  ABCDEFGHIJKLMNOP
1c80: 51 52 53 54 55 56 57 58 59 5a 5f 61 62 63 64 65  QRSTUVWXYZ_abcde
1c90: 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75  fghijklmnopqrstu
1ca0: 76 77 78 79 7a 7e 22 3b 0a 0a 2f 2a 0a 2a 2a 20  vwxyz~";../*.** 
1cb0: 45 6e 63 6f 64 65 20 61 20 73 74 72 69 6e 67 20  Encode a string 
1cc0: 75 73 69 6e 67 20 61 20 62 61 73 65 2d 36 34 20  using a base-64 
1cd0: 65 6e 63 6f 64 69 6e 67 2e 0a 2a 2a 20 54 68 65  encoding..** The
1ce0: 20 65 6e 63 6f 64 69 6e 67 20 63 61 6e 20 62 65   encoding can be
1cf0: 20 72 65 76 65 72 73 65 64 20 75 73 69 6e 67 20   reversed using 
1d00: 74 68 65 20 3c 62 3e 64 65 63 6f 64 65 36 34 3c  the <b>decode64<
1d10: 2f 62 3e 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a  /b> function..**
1d20: 0a 2a 2a 20 53 70 61 63 65 20 74 6f 20 68 6f 6c  .** Space to hol
1d30: 64 20 74 68 65 20 72 65 73 75 6c 74 20 63 6f 6d  d the result com
1d40: 65 73 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 28 29  es from malloc()
1d50: 2e 0a 2a 2f 0a 63 68 61 72 20 2a 65 6e 63 6f 64  ..*/.char *encod
1d60: 65 36 34 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  e64(const char *
1d70: 7a 44 61 74 61 2c 20 69 6e 74 20 6e 44 61 74 61  zData, int nData
1d80: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 36 34 3b 0a  ){.  char *z64;.
1d90: 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 0a 20 20 69    int i, n;..  i
1da0: 66 28 20 6e 44 61 74 61 3c 3d 30 20 29 7b 0a 20  f( nData<=0 ){. 
1db0: 20 20 20 6e 44 61 74 61 20 3d 20 73 74 72 6c 65     nData = strle
1dc0: 6e 28 7a 44 61 74 61 29 3b 0a 20 20 7d 0a 20 20  n(zData);.  }.  
1dd0: 7a 36 34 20 3d 20 6d 61 6c 6c 6f 63 28 20 28 6e  z64 = malloc( (n
1de0: 44 61 74 61 2a 34 29 2f 33 20 2b 20 36 20 29 3b  Data*4)/3 + 6 );
1df0: 0a 20 20 66 6f 72 28 69 3d 6e 3d 30 3b 20 69 2b  .  for(i=n=0; i+
1e00: 32 3c 6e 44 61 74 61 3b 20 69 2b 3d 33 29 7b 0a  2<nData; i+=3){.
1e10: 20 20 20 20 7a 36 34 5b 6e 2b 2b 5d 20 3d 20 7a      z64[n++] = z
1e20: 42 61 73 65 5b 20 28 7a 44 61 74 61 5b 69 5d 3e  Base[ (zData[i]>
1e30: 3e 32 29 20 26 20 30 78 33 66 20 5d 3b 0a 20 20  >2) & 0x3f ];.  
1e40: 20 20 7a 36 34 5b 6e 2b 2b 5d 20 3d 20 7a 42 61    z64[n++] = zBa
1e50: 73 65 5b 20 28 28 7a 44 61 74 61 5b 69 5d 3c 3c  se[ ((zData[i]<<
1e60: 34 29 20 26 20 30 78 33 30 29 20 7c 20 28 28 7a  4) & 0x30) | ((z
1e70: 44 61 74 61 5b 69 2b 31 5d 3e 3e 34 29 20 26 20  Data[i+1]>>4) & 
1e80: 30 78 30 66 29 20 5d 3b 0a 20 20 20 20 7a 36 34  0x0f) ];.    z64
1e90: 5b 6e 2b 2b 5d 20 3d 20 7a 42 61 73 65 5b 20 28  [n++] = zBase[ (
1ea0: 28 7a 44 61 74 61 5b 69 2b 31 5d 3c 3c 32 29 20  (zData[i+1]<<2) 
1eb0: 26 20 30 78 33 63 29 20 7c 20 28 28 7a 44 61 74  & 0x3c) | ((zDat
1ec0: 61 5b 69 2b 32 5d 3e 3e 36 29 20 26 20 30 78 30  a[i+2]>>6) & 0x0
1ed0: 33 29 20 5d 3b 0a 20 20 20 20 7a 36 34 5b 6e 2b  3) ];.    z64[n+
1ee0: 2b 5d 20 3d 20 7a 42 61 73 65 5b 20 7a 44 61 74  +] = zBase[ zDat
1ef0: 61 5b 69 2b 32 5d 20 26 20 30 78 33 66 20 5d 3b  a[i+2] & 0x3f ];
1f00: 0a 20 20 7d 0a 20 20 69 66 28 20 69 2b 31 3c 6e  .  }.  if( i+1<n
1f10: 44 61 74 61 20 29 7b 0a 20 20 20 20 7a 36 34 5b  Data ){.    z64[
1f20: 6e 2b 2b 5d 20 3d 20 7a 42 61 73 65 5b 20 28 7a  n++] = zBase[ (z
1f30: 44 61 74 61 5b 69 5d 3e 3e 32 29 20 26 20 30 78  Data[i]>>2) & 0x
1f40: 33 66 20 5d 3b 0a 20 20 20 20 7a 36 34 5b 6e 2b  3f ];.    z64[n+
1f50: 2b 5d 20 3d 20 7a 42 61 73 65 5b 20 28 28 7a 44  +] = zBase[ ((zD
1f60: 61 74 61 5b 69 5d 3c 3c 34 29 20 26 20 30 78 33  ata[i]<<4) & 0x3
1f70: 30 29 20 7c 20 28 28 7a 44 61 74 61 5b 69 2b 31  0) | ((zData[i+1
1f80: 5d 3e 3e 34 29 20 26 20 30 78 30 66 29 20 5d 3b  ]>>4) & 0x0f) ];
1f90: 0a 20 20 20 20 7a 36 34 5b 6e 2b 2b 5d 20 3d 20  .    z64[n++] = 
1fa0: 7a 42 61 73 65 5b 20 28 28 7a 44 61 74 61 5b 69  zBase[ ((zData[i
1fb0: 2b 31 5d 3c 3c 32 29 20 26 20 30 78 33 63 29 20  +1]<<2) & 0x3c) 
1fc0: 5d 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 69  ];.  }else if( i
1fd0: 3c 6e 44 61 74 61 20 29 7b 0a 20 20 20 20 7a 36  <nData ){.    z6
1fe0: 34 5b 6e 2b 2b 5d 20 3d 20 7a 42 61 73 65 5b 20  4[n++] = zBase[ 
1ff0: 28 7a 44 61 74 61 5b 69 5d 3e 3e 32 29 20 26 20  (zData[i]>>2) & 
2000: 30 78 33 66 20 5d 3b 0a 20 20 20 20 7a 36 34 5b  0x3f ];.    z64[
2010: 6e 2b 2b 5d 20 3d 20 7a 42 61 73 65 5b 20 28 28  n++] = zBase[ ((
2020: 7a 44 61 74 61 5b 69 5d 3c 3c 34 29 20 26 20 30  zData[i]<<4) & 0
2030: 78 33 30 29 20 5d 3b 0a 20 20 7d 0a 20 20 7a 36  x30) ];.  }.  z6
2040: 34 5b 6e 5d 20 3d 20 30 3b 0a 20 20 72 65 74 75  4[n] = 0;.  retu
2050: 72 6e 20 7a 36 34 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  rn z64;.}../*.**
2060: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 74   This function t
2070: 72 65 61 74 73 20 69 74 73 20 69 6e 70 75 74 20  reats its input 
2080: 61 73 20 61 20 62 61 73 65 2d 36 34 20 73 74 72  as a base-64 str
2090: 69 6e 67 20 61 6e 64 20 72 65 74 75 72 6e 73 20  ing and returns 
20a0: 74 68 65 0a 2a 2a 20 64 65 63 6f 64 65 64 20 76  the.** decoded v
20b0: 61 6c 75 65 20 6f 66 20 74 68 61 74 20 73 74 72  alue of that str
20c0: 69 6e 67 2e 20 20 43 68 61 72 61 63 74 65 72 73  ing.  Characters
20d0: 20 6f 66 20 69 6e 70 75 74 20 74 68 61 74 20 61   of input that a
20e0: 72 65 20 6e 6f 74 0a 2a 2a 20 76 61 6c 69 64 20  re not.** valid 
20f0: 62 61 73 65 2d 36 34 20 63 68 61 72 61 63 74 65  base-64 characte
2100: 72 73 20 28 73 75 63 68 20 61 73 20 73 70 61 63  rs (such as spac
2110: 65 73 20 61 6e 64 20 6e 65 77 6c 69 6e 65 73 29  es and newlines)
2120: 20 61 72 65 20 69 67 6e 6f 72 65 64 2e 0a 2a 2a   are ignored..**
2130: 0a 2a 2a 20 53 70 61 63 65 20 74 6f 20 68 6f 6c  .** Space to hol
2140: 64 20 74 68 65 20 64 65 63 6f 64 65 64 20 73 74  d the decoded st
2150: 72 69 6e 67 20 69 73 20 6f 62 74 61 69 6e 65 64  ring is obtained
2160: 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 28 29 2e 0a   from malloc()..
2170: 2a 2a 0a 2a 2a 20 54 68 65 20 6e 75 6d 62 65 72  **.** The number
2180: 20 6f 66 20 62 79 74 65 73 20 64 65 63 6f 64 65   of bytes decode
2190: 64 20 69 73 20 72 65 74 75 72 6e 65 64 20 69 6e  d is returned in
21a0: 20 2a 70 6e 42 79 74 65 0a 2a 2f 0a 63 68 61 72   *pnByte.*/.char
21b0: 20 2a 64 65 63 6f 64 65 36 34 28 63 6f 6e 73 74   *decode64(const
21c0: 20 63 68 61 72 20 2a 7a 36 34 2c 20 69 6e 74 20   char *z64, int 
21d0: 2a 70 6e 42 79 74 65 29 7b 0a 20 20 63 68 61 72  *pnByte){.  char
21e0: 20 2a 7a 44 61 74 61 3b 0a 20 20 69 6e 74 20 6e   *zData;.  int n
21f0: 36 34 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a  64;.  int i, j;.
2200: 20 20 69 6e 74 20 61 2c 20 62 2c 20 63 2c 20 64    int a, b, c, d
2210: 3b 0a 20 20 73 74 61 74 69 63 20 69 6e 74 20 69  ;.  static int i
2220: 73 49 6e 69 74 20 3d 20 30 3b 0a 20 20 73 74 61  sInit = 0;.  sta
2230: 74 69 63 20 69 6e 74 20 74 72 61 6e 73 5b 31 32  tic int trans[12
2240: 38 5d 3b 0a 0a 20 20 69 66 28 20 21 69 73 49 6e  8];..  if( !isIn
2250: 69 74 20 29 7b 0a 20 20 20 20 66 6f 72 28 69 3d  it ){.    for(i=
2260: 30 3b 20 69 3c 31 32 38 3b 20 69 2b 2b 29 7b 20  0; i<128; i++){ 
2270: 74 72 61 6e 73 5b 69 5d 20 3d 20 30 3b 20 7d 0a  trans[i] = 0; }.
2280: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 42 61      for(i=0; zBa
2290: 73 65 5b 69 5d 3b 20 69 2b 2b 29 7b 20 74 72 61  se[i]; i++){ tra
22a0: 6e 73 5b 7a 42 61 73 65 5b 69 5d 20 26 20 30 78  ns[zBase[i] & 0x
22b0: 37 66 5d 20 3d 20 69 3b 20 7d 0a 20 20 20 20 69  7f] = i; }.    i
22c0: 73 49 6e 69 74 20 3d 20 31 3b 0a 20 20 7d 0a 20  sInit = 1;.  }. 
22d0: 20 6e 36 34 20 3d 20 73 74 72 6c 65 6e 28 7a 36   n64 = strlen(z6
22e0: 34 29 3b 0a 20 20 77 68 69 6c 65 28 20 6e 36 34  4);.  while( n64
22f0: 3e 30 20 26 26 20 7a 36 34 5b 6e 36 34 2d 31 5d  >0 && z64[n64-1]
2300: 3d 3d 27 3d 27 20 29 20 6e 36 34 2d 2d 3b 0a 20  =='=' ) n64--;. 
2310: 20 7a 44 61 74 61 20 3d 20 6d 61 6c 6c 6f 63 28   zData = malloc(
2320: 20 28 6e 36 34 2a 33 29 2f 34 20 2b 20 34 20 29   (n64*3)/4 + 4 )
2330: 3b 0a 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69  ;.  for(i=j=0; i
2340: 2b 33 3c 6e 36 34 3b 20 69 2b 3d 34 29 7b 0a 20  +3<n64; i+=4){. 
2350: 20 20 20 61 20 3d 20 74 72 61 6e 73 5b 7a 36 34     a = trans[z64
2360: 5b 69 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20  [i] & 0x7f];.   
2370: 20 62 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69   b = trans[z64[i
2380: 2b 31 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20  +1] & 0x7f];.   
2390: 20 63 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69   c = trans[z64[i
23a0: 2b 32 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20  +2] & 0x7f];.   
23b0: 20 64 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69   d = trans[z64[i
23c0: 2b 33 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20  +3] & 0x7f];.   
23d0: 20 7a 44 61 74 61 5b 6a 2b 2b 5d 20 3d 20 28 28   zData[j++] = ((
23e0: 61 3c 3c 32 29 20 26 20 30 78 66 63 29 20 7c 20  a<<2) & 0xfc) | 
23f0: 28 28 62 3e 3e 34 29 20 26 20 30 78 30 33 29 3b  ((b>>4) & 0x03);
2400: 0a 20 20 20 20 7a 44 61 74 61 5b 6a 2b 2b 5d 20  .    zData[j++] 
2410: 3d 20 28 28 62 3c 3c 34 29 20 26 20 30 78 66 30  = ((b<<4) & 0xf0
2420: 29 20 7c 20 28 28 63 3e 3e 32 29 20 26 20 30 78  ) | ((c>>2) & 0x
2430: 30 66 29 3b 0a 20 20 20 20 7a 44 61 74 61 5b 6a  0f);.    zData[j
2440: 2b 2b 5d 20 3d 20 28 28 63 3c 3c 36 29 20 26 20  ++] = ((c<<6) & 
2450: 30 78 63 30 29 20 7c 20 28 64 20 26 20 30 78 33  0xc0) | (d & 0x3
2460: 66 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 69 2b  f);.  }.  if( i+
2470: 32 3c 6e 36 34 20 29 7b 0a 20 20 20 20 61 20 3d  2<n64 ){.    a =
2480: 20 74 72 61 6e 73 5b 7a 36 34 5b 69 5d 20 26 20   trans[z64[i] & 
2490: 30 78 37 66 5d 3b 0a 20 20 20 20 62 20 3d 20 74  0x7f];.    b = t
24a0: 72 61 6e 73 5b 7a 36 34 5b 69 2b 31 5d 20 26 20  rans[z64[i+1] & 
24b0: 30 78 37 66 5d 3b 0a 20 20 20 20 63 20 3d 20 74  0x7f];.    c = t
24c0: 72 61 6e 73 5b 7a 36 34 5b 69 2b 32 5d 20 26 20  rans[z64[i+2] & 
24d0: 30 78 37 66 5d 3b 0a 20 20 20 20 7a 44 61 74 61  0x7f];.    zData
24e0: 5b 6a 2b 2b 5d 20 3d 20 28 28 61 3c 3c 32 29 20  [j++] = ((a<<2) 
24f0: 26 20 30 78 66 63 29 20 7c 20 28 28 62 3e 3e 34  & 0xfc) | ((b>>4
2500: 29 20 26 20 30 78 30 33 29 3b 0a 20 20 20 20 7a  ) & 0x03);.    z
2510: 44 61 74 61 5b 6a 2b 2b 5d 20 3d 20 28 28 62 3c  Data[j++] = ((b<
2520: 3c 34 29 20 26 20 30 78 66 30 29 20 7c 20 28 28  <4) & 0xf0) | ((
2530: 63 3e 3e 32 29 20 26 20 30 78 30 66 29 3b 0a 20  c>>2) & 0x0f);. 
2540: 20 7d 65 6c 73 65 20 69 66 28 20 69 2b 31 3c 6e   }else if( i+1<n
2550: 36 34 20 29 7b 0a 20 20 20 20 61 20 3d 20 74 72  64 ){.    a = tr
2560: 61 6e 73 5b 7a 36 34 5b 69 5d 20 26 20 30 78 37  ans[z64[i] & 0x7
2570: 66 5d 3b 0a 20 20 20 20 62 20 3d 20 74 72 61 6e  f];.    b = tran
2580: 73 5b 7a 36 34 5b 69 2b 31 5d 20 26 20 30 78 37  s[z64[i+1] & 0x7
2590: 66 5d 3b 0a 20 20 20 20 7a 44 61 74 61 5b 6a 2b  f];.    zData[j+
25a0: 2b 5d 20 3d 20 28 28 61 3c 3c 32 29 20 26 20 30  +] = ((a<<2) & 0
25b0: 78 66 63 29 20 7c 20 28 28 62 3e 3e 34 29 20 26  xfc) | ((b>>4) &
25c0: 20 30 78 30 33 29 3b 0a 20 20 7d 0a 20 20 7a 44   0x03);.  }.  zD
25d0: 61 74 61 5b 6a 5d 20 3d 20 30 3b 0a 20 20 2a 70  ata[j] = 0;.  *p
25e0: 6e 42 79 74 65 20 3d 20 6a 3b 0a 20 20 72 65 74  nByte = j;.  ret
25f0: 75 72 6e 20 7a 44 61 74 61 3b 0a 7d 0a 0a 2f 2a  urn zData;.}../*
2600: 0a 2a 2a 20 54 68 65 20 62 61 73 65 2d 31 36 20  .** The base-16 
2610: 65 6e 63 6f 64 69 6e 67 20 75 73 69 6e 67 20 74  encoding using t
2620: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 68 61  he following cha
2630: 72 61 63 74 65 72 73 3a 0a 2a 2a 0a 2a 2a 20 20  racters:.**.**  
2640: 20 20 20 20 20 20 20 30 31 32 33 34 35 36 37 38         012345678
2650: 39 61 62 63 64 65 66 0a 2a 2a 0a 2a 2f 0a 0a 2f  9abcdef.**.*/../
2660: 2a 0a 2a 2a 20 54 68 65 20 61 72 72 61 79 20 75  *.** The array u
2670: 73 65 64 20 66 6f 72 20 65 6e 63 6f 64 69 6e 67  sed for encoding
2680: 0a 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20  .*/             
2690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
26a0: 20 31 32 33 34 35 36 37 38 39 20 31 32 33 34 35   123456789 12345
26b0: 20 20 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73    */.static cons
26c0: 74 20 63 68 61 72 20 7a 45 6e 63 6f 64 65 5b 5d  t char zEncode[]
26d0: 20 3d 20 22 30 31 32 33 34 35 36 37 38 39 61 62   = "0123456789ab
26e0: 63 64 65 66 22 3b 20 0a 0a 2f 2a 0a 2a 2a 20 45  cdef"; ../*.** E
26f0: 6e 63 6f 64 65 20 61 20 4e 2d 64 69 67 69 74 20  ncode a N-digit 
2700: 62 61 73 65 2d 32 35 36 20 69 6e 20 62 61 73 65  base-256 in base
2710: 2d 31 36 2e 20 20 52 65 74 75 72 6e 20 7a 65 72  -16.  Return zer
2720: 6f 20 6f 6e 20 73 75 63 63 65 73 73 0a 2a 2a 20  o on success.** 
2730: 61 6e 64 20 6e 6f 6e 2d 7a 65 72 6f 20 69 66 20  and non-zero if 
2740: 74 68 65 72 65 20 69 73 20 61 6e 20 65 72 72 6f  there is an erro
2750: 72 2e 0a 2a 2f 0a 69 6e 74 20 65 6e 63 6f 64 65  r..*/.int encode
2760: 31 36 28 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65  16(const unsigne
2770: 64 20 63 68 61 72 20 2a 70 49 6e 2c 20 75 6e 73  d char *pIn, uns
2780: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 4f 75 74  igned char *zOut
2790: 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 69 6e 74 20  , int N){.  int 
27a0: 69 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  i;.  for(i=0; i<
27b0: 4e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 2a 28 7a  N; i++){.    *(z
27c0: 4f 75 74 2b 2b 29 20 3d 20 7a 45 6e 63 6f 64 65  Out++) = zEncode
27d0: 5b 70 49 6e 5b 69 5d 3e 3e 34 5d 3b 0a 20 20 20  [pIn[i]>>4];.   
27e0: 20 2a 28 7a 4f 75 74 2b 2b 29 20 3d 20 7a 45 6e   *(zOut++) = zEn
27f0: 63 6f 64 65 5b 70 49 6e 5b 69 5d 26 30 78 66 5d  code[pIn[i]&0xf]
2800: 3b 0a 20 20 7d 0a 20 20 2a 7a 4f 75 74 20 3d 20  ;.  }.  *zOut = 
2810: 30 3b 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d  0;.  return 0;.}
2820: 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 61 72 72 61 79  ../*.** An array
2830: 20 66 6f 72 20 74 72 61 6e 73 6c 61 74 69 6e 67   for translating
2840: 20 73 69 6e 67 6c 65 20 62 61 73 65 2d 31 36 20   single base-16 
2850: 63 68 61 72 61 63 74 65 72 73 20 69 6e 74 6f 20  characters into 
2860: 61 20 76 61 6c 75 65 2e 0a 2a 2a 20 44 69 73 61  a value..** Disa
2870: 6c 6c 6f 77 65 64 20 69 6e 70 75 74 20 63 68 61  llowed input cha
2880: 72 61 63 74 65 72 73 20 68 61 76 65 20 61 20 76  racters have a v
2890: 61 6c 75 65 20 6f 66 20 36 34 2e 20 20 55 70 70  alue of 64.  Upp
28a0: 65 72 20 61 6e 64 20 6c 6f 77 65 72 0a 2a 2a 20  er and lower.** 
28b0: 63 61 73 65 20 69 73 20 74 68 65 20 73 61 6d 65  case is the same
28c0: 2e 20 0a 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e  . .*/.static con
28d0: 73 74 20 63 68 61 72 20 7a 44 65 63 6f 64 65 5b  st char zDecode[
28e0: 5d 20 3d 20 7b 0a 20 20 36 34 2c 20 36 34 2c 20  ] = {.  64, 64, 
28f0: 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20  64, 64, 64, 64, 
2900: 36 34 2c 20 36 34 2c 20 20 36 34 2c 20 36 34 2c  64, 64,  64, 64,
2910: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
2920: 20 36 34 2c 20 36 34 2c 20 0a 20 20 36 34 2c 20   64, 64, .  64, 
2930: 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20  64, 64, 64, 64, 
2940: 36 34 2c 20 36 34 2c 20 36 34 2c 20 20 36 34 2c  64, 64, 64,  64,
2950: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
2960: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 0a 20 20   64, 64, 64, .  
2970: 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20  64, 64, 64, 64, 
2980: 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20  64, 64, 64, 64, 
2990: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
29a0: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
29b0: 20 0a 20 20 20 30 2c 20 20 31 2c 20 20 32 2c 20   .   0,  1,  2, 
29c0: 20 33 2c 20 20 34 2c 20 20 35 2c 20 20 36 2c 20   3,  4,  5,  6, 
29d0: 20 37 2c 20 20 20 38 2c 20 20 39 2c 20 36 34 2c   7,   8,  9, 64,
29e0: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
29f0: 20 36 34 2c 20 0a 20 20 36 34 2c 20 31 30 2c 20   64, .  64, 10, 
2a00: 31 31 2c 20 31 32 2c 20 31 33 2c 20 31 34 2c 20  11, 12, 13, 14, 
2a10: 31 35 2c 20 36 34 2c 20 20 36 34 2c 20 20 31 2c  15, 64,  64,  1,
2a20: 20 36 34 2c 20 36 34 2c 20 20 31 2c 20 36 34 2c   64, 64,  1, 64,
2a30: 20 36 34 2c 20 20 30 2c 0a 20 20 36 34 2c 20 36   64,  0,.  64, 6
2a40: 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36  4, 64, 64, 64, 6
2a50: 34 2c 20 36 34 2c 20 36 34 2c 20 20 36 34 2c 20  4, 64, 64,  64, 
2a60: 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20  64, 64, 64, 64, 
2a70: 36 34 2c 20 36 34 2c 20 36 34 2c 0a 20 20 36 34  64, 64, 64,.  64
2a80: 2c 20 31 30 2c 20 31 31 2c 20 31 32 2c 20 31 33  , 10, 11, 12, 13
2a90: 2c 20 31 34 2c 20 31 35 2c 20 36 34 2c 20 20 36  , 14, 15, 64,  6
2aa0: 34 2c 20 20 31 2c 20 36 34 2c 20 36 34 2c 20 20  4,  1, 64, 64,  
2ab0: 31 2c 20 36 34 2c 20 36 34 2c 20 20 30 2c 0a 20  1, 64, 64,  0,. 
2ac0: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
2ad0: 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c   64, 64, 64, 64,
2ae0: 20 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34    64, 64, 64, 64
2af0: 2c 20 36 34 2c 20 36 34 2c 20 36 34 2c 20 36 34  , 64, 64, 64, 64
2b00: 2c 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 44 65 63 6f  ,.};../*.** Deco
2b10: 64 65 20 61 20 4e 2d 63 68 61 72 61 63 74 65 72  de a N-character
2b20: 20 62 61 73 65 2d 31 36 20 6e 75 6d 62 65 72 20   base-16 number 
2b30: 69 6e 74 6f 20 62 61 73 65 2d 32 35 36 2e 20 20  into base-256.  
2b40: 4e 20 6d 75 73 74 20 62 65 20 61 20 0a 2a 2a 20  N must be a .** 
2b50: 6d 75 6c 74 69 70 6c 65 20 6f 66 20 32 2e 20 20  multiple of 2.  
2b60: 54 68 65 20 6f 75 74 70 75 74 20 62 75 66 66 65  The output buffe
2b70: 72 20 6d 75 73 74 20 62 65 20 61 74 20 6c 65 61  r must be at lea
2b80: 73 74 20 4e 2f 32 20 63 68 61 72 61 63 74 65 72  st N/2 character
2b90: 73 0a 2a 2a 20 69 6e 20 6c 65 6e 67 74 68 0a 2a  s.** in length.*
2ba0: 2f 0a 69 6e 74 20 64 65 63 6f 64 65 31 36 28 63  /.int decode16(c
2bb0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
2bc0: 61 72 20 2a 7a 49 6e 2c 20 75 6e 73 69 67 6e 65  ar *zIn, unsigne
2bd0: 64 20 63 68 61 72 20 2a 70 4f 75 74 2c 20 69 6e  d char *pOut, in
2be0: 74 20 4e 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a  t N){.  int i, j
2bf0: 3b 0a 20 20 69 66 28 20 28 4e 26 31 29 21 3d 30  ;.  if( (N&1)!=0
2c00: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 66   ) return 1;.  f
2c10: 6f 72 28 69 3d 6a 3d 30 3b 20 69 3c 4e 3b 20 69  or(i=j=0; i<N; i
2c20: 20 2b 3d 20 32 2c 20 6a 2b 2b 29 7b 0a 20 20 20   += 2, j++){.   
2c30: 20 69 6e 74 20 76 31 2c 20 76 32 2c 20 61 3b 0a   int v1, v2, a;.
2c40: 20 20 20 20 61 20 3d 20 7a 49 6e 5b 69 5d 3b 0a      a = zIn[i];.
2c50: 20 20 20 20 69 66 28 20 28 61 20 26 20 30 78 38      if( (a & 0x8
2c60: 30 29 21 3d 30 20 7c 7c 20 28 76 31 20 3d 20 7a  0)!=0 || (v1 = z
2c70: 44 65 63 6f 64 65 5b 61 5d 29 3d 3d 36 34 20 29  Decode[a])==64 )
2c80: 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 61   return 1;.    a
2c90: 20 3d 20 7a 49 6e 5b 69 2b 31 5d 3b 0a 20 20 20   = zIn[i+1];.   
2ca0: 20 69 66 28 20 28 61 20 26 20 30 78 38 30 29 21   if( (a & 0x80)!
2cb0: 3d 30 20 7c 7c 20 28 76 32 20 3d 20 7a 44 65 63  =0 || (v2 = zDec
2cc0: 6f 64 65 5b 61 5d 29 3d 3d 36 34 20 29 20 72 65  ode[a])==64 ) re
2cd0: 74 75 72 6e 20 31 3b 0a 20 20 20 20 70 4f 75 74  turn 1;.    pOut
2ce0: 5b 6a 5d 20 3d 20 28 76 31 3c 3c 34 29 20 2b 20  [j] = (v1<<4) + 
2cf0: 76 32 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e  v2;.  }.  return
2d00: 20 30 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 52 65   0;.}.../*.** Re
2d10: 74 75 72 6e 20 74 72 75 65 20 69 66 20 74 68 65  turn true if the
2d20: 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 63 6f   input string co
2d30: 6e 74 61 69 6e 73 20 6f 6e 6c 79 20 76 61 6c 69  ntains only vali
2d40: 64 20 62 61 73 65 2d 31 36 20 64 69 67 69 74 73  d base-16 digits
2d50: 2e 0a 2a 2a 20 49 66 20 61 6e 79 20 69 6e 76 61  ..** If any inva
2d60: 6c 69 64 20 63 68 61 72 61 63 74 65 72 73 20 61  lid characters a
2d70: 70 70 65 61 72 20 69 6e 20 74 68 65 20 73 74 72  ppear in the str
2d80: 69 6e 67 2c 20 72 65 74 75 72 6e 20 66 61 6c 73  ing, return fals
2d90: 65 2e 0a 2a 2f 0a 69 6e 74 20 76 61 6c 69 64 61  e..*/.int valida
2da0: 74 65 31 36 28 63 6f 6e 73 74 20 63 68 61 72 20  te16(const char 
2db0: 2a 7a 49 6e 2c 20 69 6e 74 20 6e 49 6e 29 7b 0a  *zIn, int nIn){.
2dc0: 20 20 69 6e 74 20 63 2c 20 69 3b 0a 20 20 66 6f    int c, i;.  fo
2dd0: 72 28 69 3d 30 3b 20 69 3c 6e 49 6e 20 26 26 20  r(i=0; i<nIn && 
2de0: 28 63 20 3d 20 7a 49 6e 5b 69 5d 29 21 3d 30 3b  (c = zIn[i])!=0;
2df0: 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 63   i++){.    if( c
2e00: 20 26 20 7e 30 78 37 66 20 29 20 72 65 74 75 72   & ~0x7f ) retur
2e10: 6e 20 30 3b 0a 20 20 20 20 69 66 28 20 7a 44 65  n 0;.    if( zDe
2e20: 63 6f 64 65 5b 63 5d 3e 36 33 20 29 20 72 65 74  code[c]>63 ) ret
2e30: 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74  urn 0;.  }.  ret
2e40: 75 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn 1;.}../*.** 
2e50: 54 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67  The input string
2e60: 20 69 73 20 61 20 62 61 73 65 31 36 20 76 61 6c   is a base16 val
2e70: 75 65 2e 20 20 43 6f 6e 76 65 72 74 20 69 74 20  ue.  Convert it 
2e80: 69 6e 74 6f 20 69 74 73 20 63 61 6e 6f 6e 69 63  into its canonic
2e90: 61 6c 0a 2a 2a 20 66 6f 72 6d 2e 20 20 54 68 69  al.** form.  Thi
2ea0: 73 20 6d 65 61 6e 73 20 74 68 61 74 20 64 69 67  s means that dig
2eb0: 69 74 73 20 61 72 65 20 61 6c 6c 20 6c 6f 77 65  its are all lowe
2ec0: 72 20 63 61 73 65 20 61 6e 64 20 74 68 61 74 20  r case and that 
2ed0: 63 6f 6e 76 65 72 73 69 6f 6e 73 0a 2a 2a 20 6c  conversions.** l
2ee0: 69 6b 65 20 22 6c 22 2d 3e 22 31 22 20 61 6e 64  ike "l"->"1" and
2ef0: 20 22 4f 22 2d 3e 22 30 22 20 6f 63 63 75 72 2e   "O"->"0" occur.
2f00: 0a 2a 2f 0a 76 6f 69 64 20 63 61 6e 6f 6e 69 63  .*/.void canonic
2f10: 61 6c 31 36 28 63 68 61 72 20 2a 7a 2c 20 69 6e  al16(char *z, in
2f20: 74 20 6e 29 7b 0a 20 20 77 68 69 6c 65 28 20 2a  t n){.  while( *
2f30: 7a 20 26 26 20 6e 2d 2d 20 29 7b 0a 20 20 20 20  z && n-- ){.    
2f40: 2a 7a 20 3d 20 7a 45 6e 63 6f 64 65 5b 7a 44 65  *z = zEncode[zDe
2f50: 63 6f 64 65 5b 28 2a 7a 29 26 30 78 37 66 5d 26  code[(*z)&0x7f]&
2f60: 30 78 31 66 5d 3b 0a 20 20 20 20 7a 2b 2b 3b 0a  0x1f];.    z++;.
2f70: 20 20 7d 0a 7d 0a 0a 23 69 66 20 49 4e 54 45 52    }.}..#if INTER
2f80: 46 41 43 45 0a 2f 2a 2a 0a 73 74 72 69 6e 67 5f  FACE./**.string_
2f90: 75 6e 61 72 79 5f 78 66 6f 72 6d 5f 66 20 69 73  unary_xform_f is
2fa0: 20 61 20 74 79 70 65 64 65 66 20 66 6f 72 20 66   a typedef for f
2fb0: 75 6e 63 73 20 77 69 74 68 20 74 68 65 20 66 6f  uncs with the fo
2fc0: 6c 6c 6f 77 69 6e 67 20 70 6f 6c 69 63 79 3a 0a  llowing policy:.
2fd0: 0a 54 68 65 79 20 61 63 63 65 70 74 20 61 20 63  .They accept a c
2fe0: 6f 6e 73 74 20 73 74 72 69 6e 67 20 77 68 69 63  onst string whic
2ff0: 68 20 74 68 65 79 20 74 68 65 6e 20 74 72 61 6e  h they then tran
3000: 73 66 6f 72 6d 20 69 6e 74 6f 20 73 6f 6d 65 20  sform into some 
3010: 6f 74 68 65 72 0a 66 6f 72 6d 2e 20 54 68 65 79  other.form. They
3020: 20 72 65 74 75 72 6e 20 61 20 74 72 61 6e 73 66   return a transf
3030: 6f 72 6d 65 64 20 63 6f 70 79 2c 20 77 68 69 63  ormed copy, whic
3040: 68 20 74 68 65 20 63 61 6c 6c 65 72 20 69 73 20  h the caller is 
3050: 72 65 73 70 6f 6e 73 69 62 6c 65 0a 66 6f 72 20  responsible.for 
3060: 66 72 65 65 69 6e 67 2e 0a 0a 54 68 65 20 69 6e  freeing...The in
3070: 74 65 6e 74 69 6f 6e 20 6f 66 20 74 68 69 73 20  tention of this 
3080: 69 73 20 74 6f 20 70 72 6f 76 69 64 65 20 61 20  is to provide a 
3090: 77 61 79 20 66 6f 72 20 61 20 67 65 6e 65 72 69  way for a generi
30a0: 63 20 71 75 65 72 79 20 72 6f 75 74 69 6e 65 0a  c query routine.
30b0: 74 6f 20 66 6f 72 6d 61 74 20 73 70 65 63 69 66  to format specif
30c0: 69 63 20 63 6f 6c 75 6d 6e 20 64 61 74 61 20 28  ic column data (
30d0: 65 2e 67 2e 20 74 72 61 6e 73 66 6f 72 6d 20 61  e.g. transform a
30e0: 6e 20 6f 62 6a 65 63 74 20 49 44 20 69 6e 74 6f  n object ID into
30f0: 20 61 0a 6c 69 6e 6b 20 74 6f 20 74 68 61 74 20   a.link to that 
3100: 6f 62 6a 65 63 74 29 2e 0a 2a 2f 0a 74 79 70 65  object)..*/.type
3110: 64 65 66 20 63 68 61 72 20 2a 20 28 2a 73 74 72  def char * (*str
3120: 69 6e 67 5f 75 6e 61 72 79 5f 78 66 6f 72 6d 5f  ing_unary_xform_
3130: 66 29 28 20 63 68 61 72 20 63 6f 6e 73 74 20 2a  f)( char const *
3140: 20 29 3b 0a 0a 23 65 6e 64 69 66 20 2f 2f 20 49   );..#endif // I
3150: 4e 54 45 52 46 41 43 45 0a 0a 23 69 66 20 30 0a  NTERFACE..#if 0.
3160: 2f 2a 2a 20 41 20 6e 6f 2d 6f 70 20 74 72 61 6e  /** A no-op tran
3170: 73 66 6f 72 6d 65 72 20 77 68 69 63 68 20 63 61  sformer which ca
3180: 6e 20 62 65 20 75 73 65 64 20 61 73 20 61 20 70  n be used as a p
3190: 6c 61 63 65 68 6f 6c 64 65 72 2e 0a 0a 43 6f 6e  laceholder...Con
31a0: 66 6f 72 6d 73 20 74 6f 20 74 68 65 20 73 74 72  forms to the str
31b0: 69 6e 67 5f 75 6e 61 72 79 5f 78 66 6f 72 6d 5f  ing_unary_xform_
31c0: 66 20 74 79 70 65 64 65 66 27 73 20 70 6f 6c 69  f typedef's poli
31d0: 63 69 65 73 2e 0a 2a 2f 0a 63 68 61 72 20 2a 20  cies..*/.char * 
31e0: 73 74 72 78 66 6f 72 6d 5f 63 6f 70 79 28 20 63  strxform_copy( c
31f0: 68 61 72 20 63 6f 6e 73 74 20 2a 20 75 75 69 64  har const * uuid
3200: 20 29 0a 7b 0a 20 20 69 6e 74 20 6c 65 6e 20 3d   ).{.  int len =
3210: 20 73 74 72 6c 65 6e 28 75 75 69 64 29 20 2b 20   strlen(uuid) + 
3220: 31 3b 0a 20 20 63 68 61 72 20 2a 20 72 65 74 20  1;.  char * ret 
3230: 3d 20 28 63 68 61 72 20 2a 29 20 6d 61 6c 6c 6f  = (char *) mallo
3240: 63 28 20 6c 65 6e 20 29 3b 0a 20 20 72 65 74 5b  c( len );.  ret[
3250: 6c 65 6e 5d 20 3d 20 27 5c 30 27 3b 0a 20 20 73  len] = '\0';.  s
3260: 74 72 6e 63 70 79 28 20 72 65 74 2c 20 75 75 69  trncpy( ret, uui
3270: 64 2c 20 6c 65 6e 2d 31 20 29 3b 0a 20 20 72 65  d, len-1 );.  re
3280: 74 75 72 6e 20 72 65 74 3b 0a 7d 0a 23 65 6e 64  turn ret;.}.#end
3290: 69 66 0a 0a 2f 2a 2a 0a 52 65 74 75 72 6e 73 20  if../**.Returns 
32a0: 61 20 68 79 70 65 72 6c 69 6e 6b 20 74 6f 20 75  a hyperlink to u
32b0: 75 69 64 2e 0a 0a 43 6f 6e 66 6f 72 6d 73 20 74  uid...Conforms t
32c0: 6f 20 74 68 65 20 73 74 72 69 6e 67 5f 75 6e 61  o the string_una
32d0: 72 79 5f 78 66 6f 72 6d 5f 66 20 74 79 70 65 64  ry_xform_f typed
32e0: 65 66 27 73 20 70 6f 6c 69 63 69 65 73 2e 0a 2a  ef's policies..*
32f0: 2f 0a 63 68 61 72 20 2a 20 73 74 72 78 66 6f 72  /.char * strxfor
3300: 6d 5f 6c 69 6e 6b 5f 74 6f 5f 75 75 69 64 28 20  m_link_to_uuid( 
3310: 63 68 61 72 20 63 6f 6e 73 74 20 2a 20 75 75 69  char const * uui
3320: 64 20 29 0a 7b 0a 20 20 63 6f 6e 73 74 20 69 6e  d ).{.  const in
3330: 74 20 6f 66 66 73 65 74 20 3d 20 31 30 3b 0a 20  t offset = 10;. 
3340: 20 63 68 61 72 20 73 68 6f 72 74 6e 61 6d 65 5b   char shortname[
3350: 6f 66 66 73 65 74 2b 31 5d 3b 0a 20 20 73 68 6f  offset+1];.  sho
3360: 72 74 6e 61 6d 65 5b 6f 66 66 73 65 74 5d 20 3d  rtname[offset] =
3370: 20 27 5c 30 27 3b 0a 20 20 6d 65 6d 63 70 79 28   '\0';.  memcpy(
3380: 20 73 68 6f 72 74 6e 61 6d 65 2c 20 75 75 69 64   shortname, uuid
3390: 2c 20 6f 66 66 73 65 74 20 29 3b 0a 20 20 72 65  , offset );.  re
33a0: 74 75 72 6e 20 6d 70 72 69 6e 74 66 28 22 3c 74  turn mprintf("<t
33b0: 74 3e 3c 61 20 68 72 65 66 3d 27 25 73 2f 76 69  t><a href='%s/vi
33c0: 6e 66 6f 2f 25 73 27 3e 3c 73 70 61 6e 20 73 74  nfo/%s'><span st
33d0: 79 6c 65 3d 27 66 6f 6e 74 2d 73 69 7a 65 3a 31  yle='font-size:1
33e0: 2e 35 65 6d 27 3e 22 0a 20 20 20 20 20 20 20 20  .5em'>".        
33f0: 20 20 20 20 20 20 20 20 20 22 25 73 3c 2f 73 70           "%s</sp
3400: 61 6e 3e 25 73 3c 2f 61 3e 3c 2f 74 74 3e 22 2c  an>%s</a></tt>",
3410: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
3420: 20 20 67 2e 7a 42 61 73 65 55 52 4c 2c 20 75 75    g.zBaseURL, uu
3430: 69 64 2c 20 73 68 6f 72 74 6e 61 6d 65 2c 20 75  id, shortname, u
3440: 75 69 64 2b 6f 66 66 73 65 74 20 29 3b 0a 7d 0a  uid+offset );.}.
3450: 0a 2f 2a 2a 20 52 65 74 75 72 6e 73 20 61 20 68  ./** Returns a h
3460: 79 70 65 72 6c 69 6e 6b 20 74 6f 20 74 68 65 20  yperlink to the 
3470: 67 69 76 65 6e 20 74 61 67 2e 0a 0a 43 6f 6e 66  given tag...Conf
3480: 6f 72 6d 73 20 74 6f 20 74 68 65 20 73 74 72 69  orms to the stri
3490: 6e 67 5f 75 6e 61 72 79 5f 78 66 6f 72 6d 5f 66  ng_unary_xform_f
34a0: 20 74 79 70 65 64 65 66 27 73 20 70 6f 6c 69 63   typedef's polic
34b0: 69 65 73 2e 0a 2a 2f 0a 63 68 61 72 20 2a 20 73  ies..*/.char * s
34c0: 74 72 78 66 6f 72 6d 5f 6c 69 6e 6b 5f 74 6f 5f  trxform_link_to_
34d0: 74 61 67 69 64 28 20 63 68 61 72 20 63 6f 6e 73  tagid( char cons
34e0: 74 20 2a 20 74 61 67 69 64 20 29 0a 7b 0a 20 20  t * tagid ).{.  
34f0: 72 65 74 75 72 6e 20 6d 70 72 69 6e 74 66 28 20  return mprintf( 
3500: 22 3c 61 20 68 72 65 66 3d 27 25 73 2f 74 61 67  "<a href='%s/tag
3510: 76 69 65 77 3f 74 61 67 69 64 3d 25 73 27 3e 25  view?tagid=%s'>%
3520: 73 3c 2f 61 3e 22 2c 0a 20 20 20 20 20 20 20 20  s</a>",.        
3530: 20 20 20 20 20 20 20 20 20 20 67 2e 7a 42 61 73            g.zBas
3540: 65 55 52 4c 2c 20 74 61 67 69 64 2c 20 74 61 67  eURL, tagid, tag
3550: 69 64 20 29 3b 0a 7d 0a 0a 2f 2a 2a 20 52 65 74  id );.}../** Ret
3560: 75 72 6e 73 20 61 20 68 79 70 65 72 6c 69 6e 6b  urns a hyperlink
3570: 20 74 6f 20 74 68 65 20 6e 61 6d 65 64 20 74 61   to the named ta
3580: 67 2e 0a 0a 43 6f 6e 66 6f 72 6d 73 20 74 6f 20  g...Conforms to 
3590: 74 68 65 20 73 74 72 69 6e 67 5f 75 6e 61 72 79  the string_unary
35a0: 5f 78 66 6f 72 6d 5f 66 20 74 79 70 65 64 65 66  _xform_f typedef
35b0: 27 73 20 70 6f 6c 69 63 69 65 73 2e 0a 2a 2f 0a  's policies..*/.
35c0: 63 68 61 72 20 2a 20 73 74 72 78 66 6f 72 6d 5f  char * strxform_
35d0: 6c 69 6e 6b 5f 74 6f 5f 74 61 67 6e 61 6d 65 28  link_to_tagname(
35e0: 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 20 74 61   char const * ta
35f0: 67 69 64 20 29 0a 7b 0a 20 20 72 65 74 75 72 6e  gid ).{.  return
3600: 20 6d 70 72 69 6e 74 66 28 20 22 3c 61 20 68 72   mprintf( "<a hr
3610: 65 66 3d 27 25 73 2f 74 61 67 76 69 65 77 2f 25  ef='%s/tagview/%
3620: 73 27 3e 25 73 3c 2f 61 3e 22 2c 0a 20 20 20 20  s'>%s</a>",.    
3630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 2e                g.
3640: 7a 42 61 73 65 55 52 4c 2c 20 74 61 67 69 64 2c  zBaseURL, tagid,
3650: 20 74 61 67 69 64 20 29 3b 0a 7d 0a               tagid );.}.