Hex Artifact Content
Not logged in

Artifact 77aac55e7cadc39b791f99861d543e4b4815ca68:

File src/info.c part of check-in [86c8768475] - Add the finfo web page. by drh on 2007-08-01 00:55:18.

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 37 20 44 2e 20 52 69 63 68  (c) 2007 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 54 68 69 73 20 66 69 6c 65  .**.** This file
0370: 20 63 6f 6e 74 61 69 6e 73 20 63 6f 64 65 20 74   contains code t
0380: 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 74 68 65 20  o implement the 
0390: 22 69 6e 66 6f 22 20 63 6f 6d 6d 61 6e 64 2e 20  "info" command. 
03a0: 20 54 68 65 0a 2a 2a 20 22 69 6e 66 6f 22 20 63   The.** "info" c
03b0: 6f 6d 6d 61 6e 64 20 67 69 76 65 73 20 63 6f 6d  ommand gives com
03c0: 6d 61 6e 64 2d 6c 69 6e 65 20 61 63 63 65 73 73  mand-line access
03d0: 20 74 6f 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20   to information 
03e0: 61 62 6f 75 74 0a 2a 2a 20 74 68 65 20 63 75 72  about.** the cur
03f0: 72 65 6e 74 20 74 72 65 65 2c 20 6f 72 20 61 20  rent tree, or a 
0400: 70 61 72 74 69 63 75 6c 61 72 20 66 69 6c 65 20  particular file 
0410: 6f 72 20 76 65 72 73 69 6f 6e 2e 0a 2a 2f 0a 23  or version..*/.#
0420: 69 6e 63 6c 75 64 65 20 22 63 6f 6e 66 69 67 2e  include "config.
0430: 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 69 6e 66  h".#include "inf
0440: 6f 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c 61  o.h".#include <a
0450: 73 73 65 72 74 2e 68 3e 0a 0a 0a 2f 2a 0a 2a 2a  ssert.h>.../*.**
0460: 20 50 72 69 6e 74 20 63 6f 6d 6d 6f 6e 20 69 6e   Print common in
0470: 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 20  formation about 
0480: 61 20 70 61 72 74 69 63 75 6c 61 72 20 72 65 63  a particular rec
0490: 6f 72 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 2a  ord..**.**     *
04a0: 20 20 54 68 65 20 55 55 49 44 0a 2a 2a 20 20 20    The UUID.**   
04b0: 20 20 2a 20 20 54 68 65 20 72 65 63 6f 72 64 20    *  The record 
04c0: 49 44 0a 2a 2a 20 20 20 20 20 2a 20 20 6d 74 69  ID.**     *  mti
04d0: 6d 65 20 61 6e 64 20 63 74 69 6d 65 0a 2a 2a 20  me and ctime.** 
04e0: 20 20 20 20 2a 20 20 77 68 6f 20 73 69 67 6e 65      *  who signe
04f0: 64 20 69 74 0a 2a 2f 0a 76 6f 69 64 20 73 68 6f  d it.*/.void sho
0500: 77 5f 63 6f 6d 6d 6f 6e 5f 69 6e 66 6f 28 69 6e  w_common_info(in
0510: 74 20 72 69 64 2c 20 63 6f 6e 73 74 20 63 68 61  t rid, const cha
0520: 72 20 2a 7a 55 75 69 64 4e 61 6d 65 2c 20 69 6e  r *zUuidName, in
0530: 74 20 73 68 6f 77 43 6f 6d 6d 65 6e 74 29 7b 0a  t showComment){.
0540: 20 20 53 74 6d 74 20 71 3b 0a 20 20 63 68 61 72    Stmt q;.  char
0550: 20 2a 7a 43 6f 6d 6d 65 6e 74 20 3d 20 30 3b 0a   *zComment = 0;.
0560: 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c    db_prepare(&q,
0570: 0a 20 20 20 20 22 53 45 4c 45 43 54 20 75 75 69  .    "SELECT uui
0580: 64 22 0a 20 20 20 20 22 20 20 46 52 4f 4d 20 62  d".    "  FROM b
0590: 6c 6f 62 20 57 48 45 52 45 20 72 69 64 3d 25 64  lob WHERE rid=%d
05a0: 22 2c 20 72 69 64 0a 20 20 29 3b 0a 20 20 69 66  ", rid.  );.  if
05b0: 28 20 64 62 5f 73 74 65 70 28 26 71 29 3d 3d 53  ( db_step(&q)==S
05c0: 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20  QLITE_ROW ){.   
05d0: 20 20 20 20 20 20 2f 2a 20 30 31 32 33 34 35 36        /* 0123456
05e0: 37 38 39 30 31 32 33 20 2a 2f 0a 20 20 20 20 70  7890123 */.    p
05f0: 72 69 6e 74 66 28 22 25 2d 31 33 73 20 25 73 5c  rintf("%-13s %s\
0600: 6e 22 2c 20 7a 55 75 69 64 4e 61 6d 65 2c 20 64  n", zUuidName, d
0610: 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71  b_column_text(&q
0620: 2c 20 30 29 29 3b 0a 20 20 7d 0a 20 20 64 62 5f  , 0));.  }.  db_
0630: 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20  finalize(&q);.  
0640: 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c 20 22  db_prepare(&q, "
0650: 53 45 4c 45 43 54 20 75 75 69 64 20 46 52 4f 4d  SELECT uuid FROM
0660: 20 70 6c 69 6e 6b 20 4a 4f 49 4e 20 62 6c 6f 62   plink JOIN blob
0670: 20 4f 4e 20 70 69 64 3d 72 69 64 20 22 0a 20 20   ON pid=rid ".  
0680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22                 "
0690: 20 57 48 45 52 45 20 63 69 64 3d 25 64 22 2c 20   WHERE cid=%d", 
06a0: 72 69 64 29 3b 0a 20 20 77 68 69 6c 65 28 20 64  rid);.  while( d
06b0: 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49  b_step(&q)==SQLI
06c0: 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 63 6f  TE_ROW ){.    co
06d0: 6e 73 74 20 63 68 61 72 20 2a 7a 55 75 69 64 20  nst char *zUuid 
06e0: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74  = db_column_text
06f0: 28 26 71 2c 20 30 29 3b 0a 20 20 20 20 70 72 69  (&q, 0);.    pri
0700: 6e 74 66 28 22 70 61 72 65 6e 74 3a 20 20 20 20  ntf("parent:    
0710: 20 20 20 25 73 5c 6e 22 2c 20 7a 55 75 69 64 29     %s\n", zUuid)
0720: 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 6c  ;.  }.  db_final
0730: 69 7a 65 28 26 71 29 3b 0a 20 20 64 62 5f 70 72  ize(&q);.  db_pr
0740: 65 70 61 72 65 28 26 71 2c 20 22 53 45 4c 45 43  epare(&q, "SELEC
0750: 54 20 75 75 69 64 20 46 52 4f 4d 20 70 6c 69 6e  T uuid FROM plin
0760: 6b 20 4a 4f 49 4e 20 62 6c 6f 62 20 4f 4e 20 63  k JOIN blob ON c
0770: 69 64 3d 72 69 64 20 22 0a 20 20 20 20 20 20 20  id=rid ".       
0780: 20 20 20 20 20 20 20 20 20 20 22 20 57 48 45 52            " WHER
0790: 45 20 70 69 64 3d 25 64 22 2c 20 72 69 64 29 3b  E pid=%d", rid);
07a0: 0a 20 20 77 68 69 6c 65 28 20 64 62 5f 73 74 65  .  while( db_ste
07b0: 70 28 26 71 29 3d 3d 53 51 4c 49 54 45 5f 52 4f  p(&q)==SQLITE_RO
07c0: 57 20 29 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63  W ){.    const c
07d0: 68 61 72 20 2a 7a 55 75 69 64 20 3d 20 64 62 5f  har *zUuid = db_
07e0: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20  column_text(&q, 
07f0: 30 29 3b 0a 20 20 20 20 70 72 69 6e 74 66 28 22  0);.    printf("
0800: 63 68 69 6c 64 3a 20 20 20 20 20 20 20 20 25 73  child:        %s
0810: 5c 6e 22 2c 20 7a 55 75 69 64 29 3b 0a 20 20 7d  \n", zUuid);.  }
0820: 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26  .  db_finalize(&
0830: 71 29 3b 0a 20 20 69 66 28 20 7a 43 6f 6d 6d 65  q);.  if( zComme
0840: 6e 74 20 29 7b 0a 20 20 20 20 70 72 69 6e 74 66  nt ){.    printf
0850: 28 22 63 6f 6d 6d 65 6e 74 3a 5c 6e 25 73 5c 6e  ("comment:\n%s\n
0860: 22 2c 20 7a 43 6f 6d 6d 65 6e 74 29 3b 0a 20 20  ", zComment);.  
0870: 20 20 66 72 65 65 28 7a 43 6f 6d 6d 65 6e 74 29    free(zComment)
0880: 3b 0a 20 20 7d 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20  ;.  }.}.../*.** 
0890: 43 4f 4d 4d 41 4e 44 3a 20 69 6e 66 6f 0a 2a 2a  COMMAND: info.**
08a0: 0a 2a 2a 20 57 69 74 68 20 6e 6f 20 61 72 67 75  .** With no argu
08b0: 6d 65 6e 74 73 2c 20 70 72 6f 76 69 64 65 20 69  ments, provide i
08c0: 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74  nformation about
08d0: 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 72 65   the current tre
08e0: 65 2e 0a 2a 2a 20 49 66 20 61 6e 20 61 72 67 75  e..** If an argu
08f0: 6d 65 6e 74 20 69 73 20 67 69 76 65 6e 2c 20 70  ment is given, p
0900: 72 6f 76 69 64 65 20 69 6e 66 6f 72 6d 61 74 69  rovide informati
0910: 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 72 65 63  on about the rec
0920: 6f 72 64 0a 2a 2a 20 74 68 61 74 20 74 68 65 20  ord.** that the 
0930: 61 72 67 75 6d 65 6e 74 20 72 65 66 65 72 73 20  argument refers 
0940: 74 6f 2e 0a 2a 2f 0a 76 6f 69 64 20 69 6e 66 6f  to..*/.void info
0950: 5f 63 6d 64 28 76 6f 69 64 29 7b 0a 20 20 69 66  _cmd(void){.  if
0960: 28 20 67 2e 61 72 67 63 21 3d 32 20 26 26 20 67  ( g.argc!=2 && g
0970: 2e 61 72 67 63 21 3d 33 20 29 7b 0a 20 20 20 20  .argc!=3 ){.    
0980: 75 73 61 67 65 28 22 3f 46 49 4c 45 49 44 7c 55  usage("?FILEID|U
0990: 55 49 44 3f 22 29 3b 0a 20 20 7d 0a 20 20 64 62  UID?");.  }.  db
09a0: 5f 6d 75 73 74 5f 62 65 5f 77 69 74 68 69 6e 5f  _must_be_within_
09b0: 74 72 65 65 28 29 3b 0a 20 20 69 66 28 20 67 2e  tree();.  if( g.
09c0: 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 69  argc==2 ){.    i
09d0: 6e 74 20 76 69 64 3b 0a 20 20 20 20 20 20 20 20  nt vid;.        
09e0: 20 2f 2a 20 30 31 32 33 34 35 36 37 38 39 30 31   /* 012345678901
09f0: 32 33 34 20 2a 2f 0a 20 20 20 20 70 72 69 6e 74  234 */.    print
0a00: 66 28 22 72 65 70 6f 73 69 74 6f 72 79 3a 20 20  f("repository:  
0a10: 20 25 73 5c 6e 22 2c 20 64 62 5f 6c 67 65 74 28   %s\n", db_lget(
0a20: 22 72 65 70 6f 73 69 74 6f 72 79 22 2c 20 22 22  "repository", ""
0a30: 29 29 3b 0a 20 20 20 20 70 72 69 6e 74 66 28 22  ));.    printf("
0a40: 6c 6f 63 61 6c 2d 72 6f 6f 74 3a 20 20 20 25 73  local-root:   %s
0a50: 5c 6e 22 2c 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f  \n", g.zLocalRoo
0a60: 74 29 3b 0a 20 20 20 20 70 72 69 6e 74 66 28 22  t);.    printf("
0a70: 70 72 6f 6a 65 63 74 2d 63 6f 64 65 3a 20 25 73  project-code: %s
0a80: 5c 6e 22 2c 20 64 62 5f 67 65 74 28 22 70 72 6f  \n", db_get("pro
0a90: 6a 65 63 74 2d 63 6f 64 65 22 2c 20 22 22 29 29  ject-code", ""))
0aa0: 3b 0a 20 20 20 20 70 72 69 6e 74 66 28 22 73 65  ;.    printf("se
0ab0: 72 76 65 72 2d 63 6f 64 65 3a 20 20 25 73 5c 6e  rver-code:  %s\n
0ac0: 22 2c 20 64 62 5f 67 65 74 28 22 73 65 72 76 65  ", db_get("serve
0ad0: 72 2d 63 6f 64 65 22 2c 20 22 22 29 29 3b 0a 20  r-code", ""));. 
0ae0: 20 20 20 76 69 64 20 3d 20 64 62 5f 6c 67 65 74     vid = db_lget
0af0: 5f 69 6e 74 28 22 63 68 65 63 6b 6f 75 74 22 2c  _int("checkout",
0b00: 20 30 29 3b 0a 20 20 20 20 69 66 28 20 76 69 64   0);.    if( vid
0b10: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 70 72 69  ==0 ){.      pri
0b20: 6e 74 66 28 22 63 68 65 63 6b 6f 75 74 3a 20 20  ntf("checkout:  
0b30: 20 20 20 6e 69 6c 5c 6e 22 29 3b 0a 20 20 20 20     nil\n");.    
0b40: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 68 6f  }else{.      sho
0b50: 77 5f 63 6f 6d 6d 6f 6e 5f 69 6e 66 6f 28 76 69  w_common_info(vi
0b60: 64 2c 20 22 63 68 65 63 6b 6f 75 74 3a 22 2c 20  d, "checkout:", 
0b70: 31 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73  1);.    }.  }els
0b80: 65 7b 0a 20 20 20 20 69 6e 74 20 72 69 64 20 3d  e{.    int rid =
0b90: 20 6e 61 6d 65 5f 74 6f 5f 72 69 64 28 67 2e 61   name_to_rid(g.a
0ba0: 72 67 76 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28  rgv[2]);.    if(
0bb0: 20 72 69 64 3d 3d 30 20 29 7b 0a 20 20 20 20 20   rid==0 ){.     
0bc0: 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 6e   fossil_panic("n
0bd0: 6f 20 73 75 63 68 20 6f 62 6a 65 63 74 3a 20 25  o such object: %
0be0: 73 5c 6e 22 2c 20 67 2e 61 72 67 76 5b 32 5d 29  s\n", g.argv[2])
0bf0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 68 6f 77  ;.    }.    show
0c00: 5f 63 6f 6d 6d 6f 6e 5f 69 6e 66 6f 28 72 69 64  _common_info(rid
0c10: 2c 20 22 75 75 69 64 3a 22 2c 20 31 29 3b 0a 20  , "uuid:", 1);. 
0c20: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 68 6f 77   }.}../*.** Show
0c30: 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f   information abo
0c40: 75 74 20 64 65 73 63 65 6e 64 65 6e 74 73 20 6f  ut descendents o
0c50: 66 20 61 20 76 65 72 73 69 6f 6e 2e 20 20 44 6f  f a version.  Do
0c60: 20 74 68 69 73 20 72 65 63 75 72 73 69 76 65 6c   this recursivel
0c70: 79 0a 2a 2a 20 74 6f 20 61 20 64 65 70 74 68 20  y.** to a depth 
0c80: 6f 66 20 4e 2e 20 20 52 65 74 75 72 6e 20 74 72  of N.  Return tr
0c90: 75 65 20 69 66 20 64 65 73 63 65 6e 64 65 6e 74  ue if descendent
0ca0: 73 20 61 72 65 20 73 68 6f 77 6e 20 61 6e 64 20  s are shown and 
0cb0: 66 61 6c 73 65 20 69 66 20 6e 6f 74 2e 0a 2a 2f  false if not..*/
0cc0: 0a 73 74 61 74 69 63 20 69 6e 74 20 73 68 6f 77  .static int show
0cd0: 44 65 73 63 65 6e 64 65 6e 74 73 28 69 6e 74 20  Descendents(int 
0ce0: 70 69 64 2c 20 69 6e 74 20 64 65 70 74 68 29 7b  pid, int depth){
0cf0: 0a 20 20 53 74 6d 74 20 71 3b 0a 20 20 69 6e 74  .  Stmt q;.  int
0d00: 20 63 6e 74 20 3d 20 30 3b 0a 20 20 64 62 5f 70   cnt = 0;.  db_p
0d10: 72 65 70 61 72 65 28 26 71 2c 0a 20 20 20 20 22  repare(&q,.    "
0d20: 53 45 4c 45 43 54 20 70 6c 69 6e 6b 2e 63 69 64  SELECT plink.cid
0d30: 2c 20 62 6c 6f 62 2e 75 75 69 64 2c 20 64 61 74  , blob.uuid, dat
0d40: 65 74 69 6d 65 28 70 6c 69 6e 6b 2e 6d 74 69 6d  etime(plink.mtim
0d50: 65 2c 20 27 6c 6f 63 61 6c 74 69 6d 65 27 29 2c  e, 'localtime'),
0d60: 22 0a 20 20 20 20 22 20 20 20 20 20 20 20 65 76  ".    "       ev
0d70: 65 6e 74 2e 75 73 65 72 2c 20 65 76 65 6e 74 2e  ent.user, event.
0d80: 63 6f 6d 6d 65 6e 74 22 0a 20 20 20 20 22 20 20  comment".    "  
0d90: 46 52 4f 4d 20 70 6c 69 6e 6b 2c 20 62 6c 6f 62  FROM plink, blob
0da0: 2c 20 65 76 65 6e 74 22 0a 20 20 20 20 22 20 57  , event".    " W
0db0: 48 45 52 45 20 70 6c 69 6e 6b 2e 70 69 64 3d 25  HERE plink.pid=%
0dc0: 64 22 0a 20 20 20 20 22 20 20 20 41 4e 44 20 62  d".    "   AND b
0dd0: 6c 6f 62 2e 72 69 64 3d 70 6c 69 6e 6b 2e 63 69  lob.rid=plink.ci
0de0: 64 22 0a 20 20 20 20 22 20 20 20 41 4e 44 20 65  d".    "   AND e
0df0: 76 65 6e 74 2e 6f 62 6a 69 64 3d 70 6c 69 6e 6b  vent.objid=plink
0e00: 2e 63 69 64 22 0a 20 20 20 20 22 20 4f 52 44 45  .cid".    " ORDE
0e10: 52 20 42 59 20 70 6c 69 6e 6b 2e 6d 74 69 6d 65  R BY plink.mtime
0e20: 20 41 53 43 22 2c 0a 20 20 20 20 70 69 64 0a 20   ASC",.    pid. 
0e30: 20 29 3b 0a 20 20 77 68 69 6c 65 28 20 64 62 5f   );.  while( db_
0e40: 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 54 45  step(&q)==SQLITE
0e50: 5f 52 4f 57 20 29 7b 0a 20 20 20 20 69 6e 74 20  _ROW ){.    int 
0e60: 6e 3b 0a 20 20 20 20 69 6e 74 20 63 69 64 20 3d  n;.    int cid =
0e70: 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26   db_column_int(&
0e80: 71 2c 20 30 29 3b 0a 20 20 20 20 63 6f 6e 73 74  q, 0);.    const
0e90: 20 63 68 61 72 20 2a 7a 55 75 69 64 20 3d 20 64   char *zUuid = d
0ea0: 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71  b_column_text(&q
0eb0: 2c 20 31 29 3b 0a 20 20 20 20 63 6f 6e 73 74 20  , 1);.    const 
0ec0: 63 68 61 72 20 2a 7a 44 61 74 65 20 3d 20 64 62  char *zDate = db
0ed0: 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c  _column_text(&q,
0ee0: 20 32 29 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63   2);.    const c
0ef0: 68 61 72 20 2a 7a 55 73 65 72 20 3d 20 64 62 5f  har *zUser = db_
0f00: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20  column_text(&q, 
0f10: 33 29 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68  3);.    const ch
0f20: 61 72 20 2a 7a 43 6f 6d 20 3d 20 64 62 5f 63 6f  ar *zCom = db_co
0f30: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 34 29  lumn_text(&q, 4)
0f40: 3b 0a 20 20 20 20 63 6e 74 2b 2b 3b 0a 20 20 20  ;.    cnt++;.   
0f50: 20 69 66 28 20 63 6e 74 3d 3d 31 20 29 7b 0a 20   if( cnt==1 ){. 
0f60: 20 20 20 20 20 40 20 3c 75 6c 3e 0a 20 20 20 20       @ <ul>.    
0f70: 7d 0a 20 20 20 20 40 20 3c 6c 69 3e 0a 20 20 20  }.    @ <li>.   
0f80: 20 68 79 70 65 72 6c 69 6e 6b 5f 74 6f 5f 75 75   hyperlink_to_uu
0f90: 69 64 28 7a 55 75 69 64 29 3b 0a 20 20 20 20 40  id(zUuid);.    @
0fa0: 20 25 73 28 7a 43 6f 6d 29 20 28 62 79 20 25 73   %s(zCom) (by %s
0fb0: 28 7a 55 73 65 72 29 20 6f 6e 20 25 73 28 7a 44  (zUser) on %s(zD
0fc0: 61 74 65 29 29 0a 20 20 20 20 69 66 28 20 64 65  ate)).    if( de
0fd0: 70 74 68 20 29 7b 0a 20 20 20 20 20 20 6e 20 3d  pth ){.      n =
0fe0: 20 73 68 6f 77 44 65 73 63 65 6e 64 65 6e 74 73   showDescendents
0ff0: 28 63 69 64 2c 20 64 65 70 74 68 2d 31 29 3b 0a  (cid, depth-1);.
1000: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
1010: 20 6e 20 3d 20 64 62 5f 69 6e 74 28 30 2c 20 22   n = db_int(0, "
1020: 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 70 6c  SELECT 1 FROM pl
1030: 69 6e 6b 20 57 48 45 52 45 20 70 69 64 3d 25 64  ink WHERE pid=%d
1040: 22 2c 20 63 69 64 29 3b 0a 20 20 20 20 7d 0a 20  ", cid);.    }. 
1050: 20 20 20 69 66 28 20 6e 3d 3d 30 20 29 7b 0a 20     if( n==0 ){. 
1060: 20 20 20 20 20 40 20 3c 62 3e 6c 65 61 66 3c 2f       @ <b>leaf</
1070: 62 3e 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69  b>.    }.  }.  i
1080: 66 28 20 63 6e 74 20 29 7b 0a 20 20 20 20 40 20  f( cnt ){.    @ 
1090: 3c 2f 75 6c 3e 0a 20 20 7d 0a 20 20 72 65 74 75  </ul>.  }.  retu
10a0: 72 6e 20 63 6e 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  rn cnt;.}../*.**
10b0: 20 53 68 6f 77 20 69 6e 66 6f 72 6d 61 74 69 6f   Show informatio
10c0: 6e 20 61 62 6f 75 74 20 61 6e 63 65 73 74 6f 72  n about ancestor
10d0: 73 20 6f 66 20 61 20 76 65 72 73 69 6f 6e 2e 20  s of a version. 
10e0: 20 44 6f 20 74 68 69 73 20 72 65 63 75 72 73 69   Do this recursi
10f0: 76 65 6c 79 0a 2a 2a 20 74 6f 20 61 20 64 65 70  vely.** to a dep
1100: 74 68 20 6f 66 20 4e 2e 20 20 52 65 74 75 72 6e  th of N.  Return
1110: 20 74 72 75 65 20 69 66 20 61 6e 63 65 73 74 6f   true if ancesto
1120: 72 73 20 61 72 65 20 73 68 6f 77 6e 20 61 6e 64  rs are shown and
1130: 20 66 61 6c 73 65 20 69 66 20 6e 6f 74 2e 0a 2a   false if not..*
1140: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 73 68 6f  /.static int sho
1150: 77 41 6e 63 65 73 74 6f 72 73 28 69 6e 74 20 70  wAncestors(int p
1160: 69 64 2c 20 69 6e 74 20 64 65 70 74 68 29 7b 0a  id, int depth){.
1170: 20 20 53 74 6d 74 20 71 3b 0a 20 20 69 6e 74 20    Stmt q;.  int 
1180: 63 6e 74 20 3d 20 30 3b 0a 20 20 64 62 5f 70 72  cnt = 0;.  db_pr
1190: 65 70 61 72 65 28 26 71 2c 0a 20 20 20 20 22 53  epare(&q,.    "S
11a0: 45 4c 45 43 54 20 70 6c 69 6e 6b 2e 70 69 64 2c  ELECT plink.pid,
11b0: 20 62 6c 6f 62 2e 75 75 69 64 2c 20 64 61 74 65   blob.uuid, date
11c0: 74 69 6d 65 28 65 76 65 6e 74 2e 6d 74 69 6d 65  time(event.mtime
11d0: 2c 20 27 6c 6f 63 61 6c 74 69 6d 65 27 29 2c 22  , 'localtime'),"
11e0: 0a 20 20 20 20 22 20 20 20 20 20 20 20 65 76 65  .    "       eve
11f0: 6e 74 2e 75 73 65 72 2c 20 65 76 65 6e 74 2e 63  nt.user, event.c
1200: 6f 6d 6d 65 6e 74 22 0a 20 20 20 20 22 20 20 46  omment".    "  F
1210: 52 4f 4d 20 70 6c 69 6e 6b 2c 20 62 6c 6f 62 2c  ROM plink, blob,
1220: 20 65 76 65 6e 74 22 0a 20 20 20 20 22 20 57 48   event".    " WH
1230: 45 52 45 20 70 6c 69 6e 6b 2e 63 69 64 3d 25 64  ERE plink.cid=%d
1240: 22 0a 20 20 20 20 22 20 20 20 41 4e 44 20 62 6c  ".    "   AND bl
1250: 6f 62 2e 72 69 64 3d 70 6c 69 6e 6b 2e 70 69 64  ob.rid=plink.pid
1260: 22 0a 20 20 20 20 22 20 20 20 41 4e 44 20 65 76  ".    "   AND ev
1270: 65 6e 74 2e 6f 62 6a 69 64 3d 70 6c 69 6e 6b 2e  ent.objid=plink.
1280: 70 69 64 22 0a 20 20 20 20 22 20 4f 52 44 45 52  pid".    " ORDER
1290: 20 42 59 20 65 76 65 6e 74 2e 6d 74 69 6d 65 20   BY event.mtime 
12a0: 44 45 53 43 22 2c 0a 20 20 20 20 70 69 64 0a 20  DESC",.    pid. 
12b0: 20 29 3b 0a 20 20 40 20 3c 75 6c 3e 0a 20 20 77   );.  @ <ul>.  w
12c0: 68 69 6c 65 28 20 64 62 5f 73 74 65 70 28 26 71  hile( db_step(&q
12d0: 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b  )==SQLITE_ROW ){
12e0: 0a 20 20 20 20 69 6e 74 20 63 69 64 20 3d 20 64  .    int cid = d
12f0: 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c  b_column_int(&q,
1300: 20 30 29 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63   0);.    const c
1310: 68 61 72 20 2a 7a 55 75 69 64 20 3d 20 64 62 5f  har *zUuid = db_
1320: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20  column_text(&q, 
1330: 31 29 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68  1);.    const ch
1340: 61 72 20 2a 7a 44 61 74 65 20 3d 20 64 62 5f 63  ar *zDate = db_c
1350: 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 32  olumn_text(&q, 2
1360: 29 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61  );.    const cha
1370: 72 20 2a 7a 55 73 65 72 20 3d 20 64 62 5f 63 6f  r *zUser = db_co
1380: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 33 29  lumn_text(&q, 3)
1390: 3b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72  ;.    const char
13a0: 20 2a 7a 43 6f 6d 20 3d 20 64 62 5f 63 6f 6c 75   *zCom = db_colu
13b0: 6d 6e 5f 74 65 78 74 28 26 71 2c 20 34 29 3b 0a  mn_text(&q, 4);.
13c0: 20 20 20 20 63 6e 74 2b 2b 3b 0a 20 20 20 20 40      cnt++;.    @
13d0: 20 3c 6c 69 3e 0a 20 20 20 20 68 79 70 65 72 6c   <li>.    hyperl
13e0: 69 6e 6b 5f 74 6f 5f 75 75 69 64 28 7a 55 75 69  ink_to_uuid(zUui
13f0: 64 29 3b 0a 20 20 20 20 40 20 25 73 28 7a 43 6f  d);.    @ %s(zCo
1400: 6d 29 20 28 62 79 20 25 73 28 7a 55 73 65 72 29  m) (by %s(zUser)
1410: 20 6f 6e 20 25 73 28 7a 44 61 74 65 29 29 0a 20   on %s(zDate)). 
1420: 20 20 20 69 66 28 20 64 65 70 74 68 20 29 7b 0a     if( depth ){.
1430: 20 20 20 20 20 20 73 68 6f 77 41 6e 63 65 73 74        showAncest
1440: 6f 72 73 28 63 69 64 2c 20 64 65 70 74 68 2d 31  ors(cid, depth-1
1450: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 40  );.    }.  }.  @
1460: 20 3c 2f 75 6c 3e 0a 20 20 72 65 74 75 72 6e 20   </ul>.  return 
1470: 63 6e 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45  cnt;.}../*.** WE
1480: 42 50 41 47 45 3a 20 76 69 6e 66 6f 0a 2a 2a 0a  BPAGE: vinfo.**.
1490: 2a 2a 20 52 65 74 75 72 6e 20 69 6e 66 6f 72 6d  ** Return inform
14a0: 61 74 69 6f 6e 20 61 62 6f 75 74 20 61 20 76 65  ation about a ve
14b0: 72 73 69 6f 6e 2e 20 20 54 68 65 20 76 65 72 73  rsion.  The vers
14c0: 69 6f 6e 20 6e 75 6d 62 65 72 20 69 73 20 63 6f  ion number is co
14d0: 6e 74 61 69 6e 65 64 0a 2a 2a 20 69 6e 20 67 2e  ntained.** in g.
14e0: 7a 45 78 74 72 61 2e 0a 2a 2f 0a 76 6f 69 64 20  zExtra..*/.void 
14f0: 76 69 6e 66 6f 5f 70 61 67 65 28 76 6f 69 64 29  vinfo_page(void)
1500: 7b 0a 20 20 53 74 6d 74 20 71 3b 0a 20 20 69 6e  {.  Stmt q;.  in
1510: 74 20 72 69 64 3b 0a 20 20 69 6e 74 20 69 73 4c  t rid;.  int isL
1520: 65 61 66 3b 0a 20 20 69 6e 74 20 6e 3b 0a 0a 20  eaf;.  int n;.. 
1530: 20 6c 6f 67 69 6e 5f 63 68 65 63 6b 5f 63 72 65   login_check_cre
1540: 64 65 6e 74 69 61 6c 73 28 29 3b 0a 20 20 69 66  dentials();.  if
1550: 28 20 21 67 2e 6f 6b 48 69 73 74 6f 72 79 20 29  ( !g.okHistory )
1560: 7b 20 6c 6f 67 69 6e 5f 6e 65 65 64 65 64 28 29  { login_needed()
1570: 3b 20 72 65 74 75 72 6e 3b 20 7d 0a 20 20 73 74  ; return; }.  st
1580: 79 6c 65 5f 68 65 61 64 65 72 28 22 56 65 72 73  yle_header("Vers
1590: 69 6f 6e 20 49 6e 66 6f 72 6d 61 74 69 6f 6e 22  ion Information"
15a0: 29 3b 0a 20 20 72 69 64 20 3d 20 6e 61 6d 65 5f  );.  rid = name_
15b0: 74 6f 5f 72 69 64 28 67 2e 7a 45 78 74 72 61 29  to_rid(g.zExtra)
15c0: 3b 0a 20 20 69 66 28 20 72 69 64 3d 3d 30 20 29  ;.  if( rid==0 )
15d0: 7b 0a 20 20 20 20 40 20 4e 6f 20 73 75 63 68 20  {.    @ No such 
15e0: 6f 62 6a 65 63 74 3a 20 25 68 28 67 2e 61 72 67  object: %h(g.arg
15f0: 76 5b 32 5d 29 0a 20 20 20 20 73 74 79 6c 65 5f  v[2]).    style_
1600: 66 6f 6f 74 65 72 28 29 3b 0a 20 20 20 20 72 65  footer();.    re
1610: 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 69 73 4c 65  turn;.  }.  isLe
1620: 61 66 20 3d 20 21 64 62 5f 65 78 69 73 74 73 28  af = !db_exists(
1630: 22 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 70  "SELECT 1 FROM p
1640: 6c 69 6e 6b 20 57 48 45 52 45 20 70 69 64 3d 25  link WHERE pid=%
1650: 64 22 2c 20 72 69 64 29 3b 0a 20 20 64 62 5f 70  d", rid);.  db_p
1660: 72 65 70 61 72 65 28 26 71 2c 20 0a 20 20 20 20  repare(&q, .    
1670: 20 22 53 45 4c 45 43 54 20 75 75 69 64 2c 20 64   "SELECT uuid, d
1680: 61 74 65 74 69 6d 65 28 6d 74 69 6d 65 2c 20 27  atetime(mtime, '
1690: 6c 6f 63 61 6c 74 69 6d 65 27 29 2c 20 75 73 65  localtime'), use
16a0: 72 2c 20 63 6f 6d 6d 65 6e 74 22 0a 20 20 20 20  r, comment".    
16b0: 20 22 20 20 46 52 4f 4d 20 62 6c 6f 62 2c 20 65   "  FROM blob, e
16c0: 76 65 6e 74 22 0a 20 20 20 20 20 22 20 57 48 45  vent".     " WHE
16d0: 52 45 20 62 6c 6f 62 2e 72 69 64 3d 25 64 22 0a  RE blob.rid=%d".
16e0: 20 20 20 20 20 22 20 20 20 41 4e 44 20 65 76 65       "   AND eve
16f0: 6e 74 2e 6f 62 6a 69 64 3d 25 64 22 2c 0a 20 20  nt.objid=%d",.  
1700: 20 20 20 72 69 64 2c 20 72 69 64 0a 20 20 29 3b     rid, rid.  );
1710: 0a 20 20 69 66 28 20 64 62 5f 73 74 65 70 28 26  .  if( db_step(&
1720: 71 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29  q)==SQLITE_ROW )
1730: 7b 0a 20 20 20 20 40 20 3c 68 32 3e 56 65 72 73  {.    @ <h2>Vers
1740: 69 6f 6e 20 25 73 28 64 62 5f 63 6f 6c 75 6d 6e  ion %s(db_column
1750: 5f 74 65 78 74 28 26 71 2c 30 29 29 3c 2f 68 32  _text(&q,0))</h2
1760: 3e 0a 20 20 20 20 40 20 3c 75 6c 3e 0a 20 20 20  >.    @ <ul>.   
1770: 20 40 20 3c 6c 69 3e 3c 62 3e 44 61 74 65 3a 3c   @ <li><b>Date:<
1780: 2f 62 3e 20 25 73 28 64 62 5f 63 6f 6c 75 6d 6e  /b> %s(db_column
1790: 5f 74 65 78 74 28 26 71 2c 20 31 29 29 3c 2f 6c  _text(&q, 1))</l
17a0: 69 3e 0a 20 20 20 20 40 20 3c 6c 69 3e 3c 62 3e  i>.    @ <li><b>
17b0: 55 73 65 72 3a 3c 2f 62 3e 20 25 73 28 64 62 5f  User:</b> %s(db_
17c0: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20  column_text(&q, 
17d0: 32 29 29 3c 2f 6c 69 3e 0a 20 20 20 20 40 20 3c  2))</li>.    @ <
17e0: 6c 69 3e 3c 62 3e 43 6f 6d 6d 65 6e 74 3a 3c 2f  li><b>Comment:</
17f0: 62 3e 20 25 73 28 64 62 5f 63 6f 6c 75 6d 6e 5f  b> %s(db_column_
1800: 74 65 78 74 28 26 71 2c 20 33 29 29 3c 2f 6c 69  text(&q, 3))</li
1810: 3e 0a 20 20 20 20 40 20 3c 2f 75 6c 3e 0a 20 20  >.    @ </ul>.  
1820: 7d 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28  }.  db_finalize(
1830: 26 71 29 3b 0a 20 20 40 20 3c 70 3e 3c 68 32 3e  &q);.  @ <p><h2>
1840: 44 65 73 63 65 6e 64 65 6e 74 73 3a 3c 2f 68 32  Descendents:</h2
1850: 3e 0a 20 20 6e 20 3d 20 73 68 6f 77 44 65 73 63  >.  n = showDesc
1860: 65 6e 64 65 6e 74 73 28 72 69 64 2c 20 32 29 3b  endents(rid, 2);
1870: 0a 20 20 69 66 28 20 6e 3d 3d 30 20 29 7b 0a 20  .  if( n==0 ){. 
1880: 20 20 20 40 20 3c 75 6c 3e 4e 6f 6e 65 2e 20 20     @ <ul>None.  
1890: 54 68 69 73 20 69 73 20 61 20 6c 65 61 66 20 6e  This is a leaf n
18a0: 6f 64 65 2e 3c 2f 75 6c 3e 0a 20 20 7d 0a 20 20  ode.</ul>.  }.  
18b0: 40 20 3c 70 3e 3c 68 32 3e 41 6e 63 65 73 74 6f  @ <p><h2>Ancesto
18c0: 72 73 3a 3c 2f 68 32 3e 0a 20 20 6e 20 3d 20 73  rs:</h2>.  n = s
18d0: 68 6f 77 41 6e 63 65 73 74 6f 72 73 28 72 69 64  howAncestors(rid
18e0: 2c 20 32 29 3b 0a 20 20 69 66 28 20 6e 3d 3d 30  , 2);.  if( n==0
18f0: 20 29 7b 0a 20 20 20 20 40 20 3c 75 6c 3e 4e 6f   ){.    @ <ul>No
1900: 6e 65 2e 20 20 54 68 69 73 20 69 73 20 74 68 65  ne.  This is the
1910: 20 72 6f 6f 74 20 6f 66 20 74 68 65 20 74 72 65   root of the tre
1920: 65 2e 3c 2f 75 6c 3e 0a 20 20 7d 0a 20 20 40 20  e.</ul>.  }.  @ 
1930: 3c 70 3e 3c 68 32 3e 43 68 61 6e 67 65 73 3a 3c  <p><h2>Changes:<
1940: 2f 68 32 3e 0a 20 20 40 20 3c 75 6c 3e 0a 20 20  /h2>.  @ <ul>.  
1950: 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c 20 0a  db_prepare(&q, .
1960: 20 20 20 20 20 22 53 45 4c 45 43 54 20 6e 61 6d       "SELECT nam
1970: 65 2c 20 70 69 64 2c 20 66 69 64 22 0a 20 20 20  e, pid, fid".   
1980: 20 20 22 20 20 46 52 4f 4d 20 6d 6c 69 6e 6b 2c    "  FROM mlink,
1990: 20 66 69 6c 65 6e 61 6d 65 22 0a 20 20 20 20 20   filename".     
19a0: 22 20 57 48 45 52 45 20 6d 69 64 3d 25 64 22 0a  " WHERE mid=%d".
19b0: 20 20 20 20 20 22 20 20 20 41 4e 44 20 66 69 6c       "   AND fil
19c0: 65 6e 61 6d 65 2e 66 6e 69 64 3d 6d 6c 69 6e 6b  ename.fnid=mlink
19d0: 2e 66 6e 69 64 22 2c 0a 20 20 20 20 20 72 69 64  .fnid",.     rid
19e0: 0a 20 20 29 3b 0a 20 20 77 68 69 6c 65 28 20 64  .  );.  while( d
19f0: 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49  b_step(&q)==SQLI
1a00: 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 63 6f  TE_ROW ){.    co
1a10: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 20  nst char *zName 
1a20: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74  = db_column_text
1a30: 28 26 71 2c 20 30 29 3b 0a 20 20 20 20 69 6e 74  (&q, 0);.    int
1a40: 20 70 69 64 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e   pid = db_column
1a50: 5f 69 6e 74 28 26 71 2c 20 31 29 3b 0a 20 20 20  _int(&q, 1);.   
1a60: 20 69 6e 74 20 66 69 64 20 3d 20 64 62 5f 63 6f   int fid = db_co
1a70: 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c 20 32 29 3b  lumn_int(&q, 2);
1a80: 0a 20 20 20 20 40 20 3c 6c 69 3e 0a 20 20 20 20  .    @ <li>.    
1a90: 69 66 28 20 70 69 64 20 26 26 20 66 69 64 20 29  if( pid && fid )
1aa0: 7b 0a 20 20 20 20 20 20 40 20 3c 62 3e 4d 6f 64  {.      @ <b>Mod
1ab0: 69 66 69 65 64 3a 3c 2f 62 3e 0a 20 20 20 20 7d  ified:</b>.    }
1ac0: 65 6c 73 65 20 69 66 28 20 66 69 64 20 29 7b 0a  else if( fid ){.
1ad0: 20 20 20 20 20 20 40 20 3c 62 3e 41 64 64 65 64        @ <b>Added
1ae0: 3a 3c 2f 62 3e 0a 20 20 20 20 7d 65 6c 73 65 7b  :</b>.    }else{
1af0: 0a 20 20 20 20 20 20 40 20 3c 62 3e 44 65 6c 65  .      @ <b>Dele
1b00: 74 65 64 3a 3c 2f 62 3e 0a 20 20 20 20 7d 0a 20  ted:</b>.    }. 
1b10: 20 20 20 40 20 3c 61 20 68 72 65 66 3d 22 25 73     @ <a href="%s
1b20: 28 67 2e 7a 42 61 73 65 55 52 4c 29 2f 66 69 6e  (g.zBaseURL)/fin
1b30: 66 6f 2f 25 54 28 7a 4e 61 6d 65 29 22 3e 25 68  fo/%T(zName)">%h
1b40: 28 7a 4e 61 6d 65 29 3c 2f 61 3e 3c 2f 6c 69 3e  (zName)</a></li>
1b50: 0a 20 20 7d 0a 20 20 40 20 3c 2f 75 6c 3e 0a 20  .  }.  @ </ul>. 
1b60: 20 73 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b   style_footer();
1b70: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 45 42 50 41 47  .}../*.** WEBPAG
1b80: 45 3a 20 66 69 6e 66 6f 0a 2a 2a 0a 2a 2a 20 53  E: finfo.**.** S
1b90: 68 6f 77 20 74 68 65 20 63 6f 6d 70 6c 65 74 65  how the complete
1ba0: 20 63 68 61 6e 67 65 20 68 69 73 74 6f 72 79 20   change history 
1bb0: 66 6f 72 20 61 20 73 69 6e 67 6c 65 20 66 69 6c  for a single fil
1bc0: 65 2e 20 20 54 68 65 20 6e 61 6d 65 0a 2a 2a 20  e.  The name.** 
1bd0: 6f 66 20 74 68 65 20 66 69 6c 65 20 69 73 20 69  of the file is i
1be0: 6e 20 67 2e 7a 45 78 74 72 61 0a 2a 2f 0a 76 6f  n g.zExtra.*/.vo
1bf0: 69 64 20 66 69 6e 66 6f 5f 70 61 67 65 28 76 6f  id finfo_page(vo
1c00: 69 64 29 7b 0a 20 20 53 74 6d 74 20 71 3b 0a 20  id){.  Stmt q;. 
1c10: 20 63 68 61 72 20 7a 50 72 65 76 44 61 74 65 5b   char zPrevDate[
1c20: 32 30 5d 3b 0a 20 20 6c 6f 67 69 6e 5f 63 68 65  20];.  login_che
1c30: 63 6b 5f 63 72 65 64 65 6e 74 69 61 6c 73 28 29  ck_credentials()
1c40: 3b 0a 20 20 69 66 28 20 21 67 2e 6f 6b 48 69 73  ;.  if( !g.okHis
1c50: 74 6f 72 79 20 29 7b 20 6c 6f 67 69 6e 5f 6e 65  tory ){ login_ne
1c60: 65 64 65 64 28 29 3b 20 72 65 74 75 72 6e 3b 20  eded(); return; 
1c70: 7d 0a 20 20 73 74 79 6c 65 5f 68 65 61 64 65 72  }.  style_header
1c80: 28 22 46 69 6c 65 20 48 69 73 74 6f 72 79 22 29  ("File History")
1c90: 3b 0a 0a 20 20 7a 50 72 65 76 44 61 74 65 5b 30  ;..  zPrevDate[0
1ca0: 5d 20 3d 20 30 3b 0a 20 20 64 62 5f 70 72 65 70  ] = 0;.  db_prep
1cb0: 61 72 65 28 26 71 2c 0a 20 20 20 20 22 53 45 4c  are(&q,.    "SEL
1cc0: 45 43 54 20 62 6c 6f 62 2e 75 75 69 64 2c 20 64  ECT blob.uuid, d
1cd0: 61 74 65 74 69 6d 65 28 65 76 65 6e 74 2e 6d 74  atetime(event.mt
1ce0: 69 6d 65 2c 27 6c 6f 63 61 6c 74 69 6d 65 27 29  ime,'localtime')
1cf0: 2c 22 0a 20 20 20 20 22 20 20 20 20 20 20 20 65  ,".    "       e
1d00: 76 65 6e 74 2e 63 6f 6d 6d 65 6e 74 2c 20 65 76  vent.comment, ev
1d10: 65 6e 74 2e 75 73 65 72 22 0a 20 20 20 20 22 20  ent.user".    " 
1d20: 20 46 52 4f 4d 20 6d 6c 69 6e 6b 2c 20 62 6c 6f   FROM mlink, blo
1d30: 62 2c 20 65 76 65 6e 74 22 0a 20 20 20 20 22 20  b, event".    " 
1d40: 57 48 45 52 45 20 6d 6c 69 6e 6b 2e 66 6e 69 64  WHERE mlink.fnid
1d50: 3d 28 53 45 4c 45 43 54 20 66 6e 69 64 20 46 52  =(SELECT fnid FR
1d60: 4f 4d 20 66 69 6c 65 6e 61 6d 65 20 57 48 45 52  OM filename WHER
1d70: 45 20 6e 61 6d 65 3d 25 51 29 22 0a 20 20 20 20  E name=%Q)".    
1d80: 22 20 20 20 41 4e 44 20 62 6c 6f 62 2e 72 69 64  "   AND blob.rid
1d90: 3d 6d 6c 69 6e 6b 2e 6d 69 64 22 0a 20 20 20 20  =mlink.mid".    
1da0: 22 20 20 20 41 4e 44 20 65 76 65 6e 74 2e 6f 62  "   AND event.ob
1db0: 6a 69 64 3d 6d 6c 69 6e 6b 2e 6d 69 64 22 0a 20  jid=mlink.mid". 
1dc0: 20 20 20 22 20 4f 52 44 45 52 20 42 59 20 65 76     " ORDER BY ev
1dd0: 65 6e 74 2e 6d 74 69 6d 65 20 44 45 53 43 22 2c  ent.mtime DESC",
1de0: 0a 20 20 20 20 67 2e 7a 45 78 74 72 61 0a 20 20  .    g.zExtra.  
1df0: 29 3b 0a 20 20 40 20 3c 68 32 3e 48 69 73 74 6f  );.  @ <h2>Histo
1e00: 72 79 20 6f 66 20 25 68 28 67 2e 7a 45 78 74 72  ry of %h(g.zExtr
1e10: 61 29 3c 2f 68 32 3e 0a 20 20 40 20 3c 74 61 62  a)</h2>.  @ <tab
1e20: 6c 65 20 63 65 6c 6c 73 70 61 63 69 6e 67 3d 30  le cellspacing=0
1e30: 20 62 6f 72 64 65 72 3d 30 20 63 65 6c 6c 70 61   border=0 cellpa
1e40: 64 64 69 6e 67 3d 30 3e 0a 20 20 77 68 69 6c 65  dding=0>.  while
1e50: 28 20 64 62 5f 73 74 65 70 28 26 71 29 3d 3d 53  ( db_step(&q)==S
1e60: 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20  QLITE_ROW ){.   
1e70: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44 61   const char *zDa
1e80: 74 65 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74  te = db_column_t
1e90: 65 78 74 28 26 71 2c 20 31 29 3b 0a 20 20 20 20  ext(&q, 1);.    
1ea0: 69 66 28 20 6d 65 6d 63 6d 70 28 7a 44 61 74 65  if( memcmp(zDate
1eb0: 2c 20 7a 50 72 65 76 44 61 74 65 2c 20 31 30 29  , zPrevDate, 10)
1ec0: 20 29 7b 0a 20 20 20 20 20 20 73 70 72 69 6e 74   ){.      sprint
1ed0: 66 28 7a 50 72 65 76 44 61 74 65 2c 20 22 25 2e  f(zPrevDate, "%.
1ee0: 31 30 73 22 2c 20 7a 44 61 74 65 29 3b 0a 20 20  10s", zDate);.  
1ef0: 20 20 20 20 40 20 3c 74 72 3e 3c 74 64 20 63 6f      @ <tr><td co
1f00: 6c 73 70 61 6e 3d 33 3e 0a 20 20 20 20 20 20 40  lspan=3>.      @
1f10: 20 3c 74 61 62 6c 65 20 63 65 6c 6c 70 61 64 64   <table cellpadd
1f20: 69 6e 67 3d 32 20 62 6f 72 64 65 72 3d 30 3e 0a  ing=2 border=0>.
1f30: 20 20 20 20 20 20 40 20 3c 74 72 3e 3c 74 64 20        @ <tr><td 
1f40: 62 67 63 6f 6c 6f 72 3d 22 23 61 30 62 35 66 34  bgcolor="#a0b5f4
1f50: 22 20 63 6c 61 73 73 3d 22 62 6f 72 64 65 72 31  " class="border1
1f60: 22 3e 0a 20 20 20 20 20 20 40 20 3c 74 61 62 6c  ">.      @ <tabl
1f70: 65 20 63 65 6c 6c 70 61 64 64 69 6e 67 3d 32 20  e cellpadding=2 
1f80: 63 65 6c 6c 73 70 61 63 69 6e 67 3d 30 20 62 6f  cellspacing=0 bo
1f90: 72 64 65 72 3d 30 3e 3c 74 72 3e 0a 20 20 20 20  rder=0><tr>.    
1fa0: 20 20 40 20 3c 74 64 20 62 67 63 6f 6c 6f 72 3d    @ <td bgcolor=
1fb0: 22 23 64 30 64 39 66 34 22 20 63 6c 61 73 73 3d  "#d0d9f4" class=
1fc0: 22 62 6b 67 6e 64 31 22 3e 25 73 28 7a 50 72 65  "bkgnd1">%s(zPre
1fd0: 76 44 61 74 65 29 3c 2f 74 64 3e 0a 20 20 20 20  vDate)</td>.    
1fe0: 20 20 40 20 3c 2f 74 72 3e 3c 2f 74 61 62 6c 65    @ </tr></table
1ff0: 3e 0a 20 20 20 20 20 20 40 20 3c 2f 74 64 3e 3c  >.      @ </td><
2000: 2f 74 72 3e 3c 2f 74 61 62 6c 65 3e 0a 20 20 20  /tr></table>.   
2010: 20 20 20 40 20 3c 2f 74 64 3e 3c 2f 74 72 3e 0a     @ </td></tr>.
2020: 20 20 20 20 7d 0a 20 20 20 20 40 20 3c 74 72 3e      }.    @ <tr>
2030: 3c 74 64 20 76 61 6c 69 67 6e 3d 22 74 6f 70 22  <td valign="top"
2040: 3e 25 73 28 26 7a 44 61 74 65 5b 31 31 5d 29 3c  >%s(&zDate[11])<
2050: 2f 74 64 3e 0a 20 20 20 20 40 20 3c 74 64 20 77  /td>.    @ <td w
2060: 69 64 74 68 3d 22 32 30 22 3e 3c 2f 74 64 3e 0a  idth="20"></td>.
2070: 20 20 20 20 40 20 3c 74 64 20 76 61 6c 69 67 6e      @ <td valign
2080: 3d 22 74 6f 70 22 20 61 6c 69 67 6e 3d 22 6c 65  ="top" align="le
2090: 66 74 22 3e 0a 20 20 20 20 68 79 70 65 72 6c 69  ft">.    hyperli
20a0: 6e 6b 5f 74 6f 5f 75 75 69 64 28 64 62 5f 63 6f  nk_to_uuid(db_co
20b0: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 30 29 29  lumn_text(&q,0))
20c0: 3b 0a 20 20 20 20 40 20 25 68 28 64 62 5f 63 6f  ;.    @ %h(db_co
20d0: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 32 29 29  lumn_text(&q,2))
20e0: 20 28 62 79 20 25 68 28 64 62 5f 63 6f 6c 75 6d   (by %h(db_colum
20f0: 6e 5f 74 65 78 74 28 26 71 2c 33 29 29 29 3c 2f  n_text(&q,3)))</
2100: 74 64 3e 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e  td>.  }.  db_fin
2110: 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20 40 20 3c  alize(&q);.  @ <
2120: 2f 74 61 62 6c 65 3e 0a 20 20 73 74 79 6c 65 5f  /table>.  style_
2130: 66 6f 6f 74 65 72 28 29 3b 0a 7d 0a 0a 0a 0a 23  footer();.}....#
2140: 69 66 20 30 0a 2f 2a 0a 2a 2a 20 57 45 42 20 50  if 0./*.** WEB P
2150: 41 47 45 3a 20 64 69 66 66 0a 2a 2a 0a 2a 2a 20  AGE: diff.**.** 
2160: 44 69 73 70 6c 61 79 20 74 68 65 20 64 69 66 66  Display the diff
2170: 65 72 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74  erence between t
2180: 77 6f 20 66 69 6c 65 73 20 64 65 74 65 72 6d 69  wo files determi
2190: 6e 65 64 20 62 79 20 74 68 65 20 76 31 20 61 6e  ned by the v1 an
21a0: 64 20 76 32 0a 2a 2a 20 71 75 65 72 79 20 70 61  d v2.** query pa
21b0: 72 61 6d 65 74 65 72 73 2e 20 20 49 66 20 6f 6e  rameters.  If on
21c0: 6c 79 20 76 32 20 69 73 20 67 69 76 65 6e 20 63  ly v2 is given c
21d0: 6f 6d 70 75 74 65 20 76 31 20 61 73 20 74 68 65  ompute v1 as the
21e0: 20 70 61 72 65 6e 74 20 6f 66 20 76 32 2e 0a 2a   parent of v2..*
21f0: 2a 20 49 66 20 76 32 20 68 61 73 20 6e 6f 20 70  * If v2 has no p
2200: 61 72 65 6e 74 2c 20 74 68 65 6e 20 73 68 6f 77  arent, then show
2210: 20 74 68 65 20 63 6f 6d 70 6c 65 74 65 20 74 65   the complete te
2220: 78 74 20 6f 66 20 76 32 2e 0a 2a 2f 0a 76 6f 69  xt of v2..*/.voi
2230: 64 20 64 69 66 66 5f 70 61 67 65 28 76 6f 69 64  d diff_page(void
2240: 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  ){.  const char 
2250: 2a 7a 56 31 20 3d 20 50 28 22 76 31 22 29 3b 0a  *zV1 = P("v1");.
2260: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56    const char *zV
2270: 32 20 3d 20 50 28 22 76 32 22 29 3b 0a 20 20 69  2 = P("v2");.  i
2280: 6e 74 20 76 69 64 31 2c 20 76 69 64 32 3b 0a 20  nt vid1, vid2;. 
2290: 20 42 6c 6f 62 20 6f 75 74 3b 0a 20 20 52 65 63   Blob out;.  Rec
22a0: 6f 72 64 20 2a 70 31 2c 20 2a 70 32 3b 0a 0a 20  ord *p1, *p2;.. 
22b0: 20 69 66 28 20 7a 56 32 3d 3d 30 20 29 7b 0a 20   if( zV2==0 ){. 
22c0: 20 20 20 63 67 69 5f 72 65 64 69 72 65 63 74 28     cgi_redirect(
22d0: 22 69 6e 64 65 78 22 29 3b 0a 20 20 7d 0a 20 20  "index");.  }.  
22e0: 76 69 64 32 20 3d 20 75 75 69 64 5f 74 6f 5f 72  vid2 = uuid_to_r
22f0: 69 64 28 7a 56 32 2c 20 30 29 3b 0a 20 20 70 32  id(zV2, 0);.  p2
2300: 20 3d 20 72 65 63 6f 72 64 5f 66 72 6f 6d 5f 72   = record_from_r
2310: 69 64 28 76 69 64 32 29 3b 0a 20 20 73 74 79 6c  id(vid2);.  styl
2320: 65 5f 68 65 61 64 65 72 28 22 46 69 6c 65 20 44  e_header("File D
2330: 69 66 66 22 29 3b 0a 20 20 69 66 28 20 7a 56 31  iff");.  if( zV1
2340: 3d 3d 30 20 29 7b 0a 20 20 20 20 7a 56 31 20 3d  ==0 ){.    zV1 =
2350: 20 64 62 5f 74 65 78 74 28 30 2c 20 0a 20 20 20   db_text(0, .   
2360: 20 20 20 20 22 53 45 4c 45 43 54 20 75 75 69 64      "SELECT uuid
2370: 20 46 52 4f 4d 20 72 65 63 6f 72 64 20 57 48 45   FROM record WHE
2380: 52 45 20 72 69 64 3d 22 0a 20 20 20 20 20 20 20  RE rid=".       
2390: 22 20 20 28 53 45 4c 45 43 54 20 61 20 46 52 4f  "  (SELECT a FRO
23a0: 4d 20 6c 69 6e 6b 20 57 48 45 52 45 20 74 79 70  M link WHERE typ
23b0: 65 63 6f 64 65 3d 27 50 27 20 41 4e 44 20 62 3d  ecode='P' AND b=
23c0: 25 64 29 22 2c 20 76 69 64 32 29 3b 0a 20 20 7d  %d)", vid2);.  }
23d0: 0a 20 20 69 66 28 20 7a 56 31 3d 3d 30 20 29 7b  .  if( zV1==0 ){
23e0: 0a 20 20 20 20 40 20 3c 70 3e 43 6f 6e 74 65 6e  .    @ <p>Conten
23f0: 74 20 6f 66 0a 20 20 20 20 68 79 70 65 72 6c 69  t of.    hyperli
2400: 6e 6b 5f 74 6f 5f 75 75 69 64 28 7a 56 32 29 3b  nk_to_uuid(zV2);
2410: 0a 20 20 20 20 40 20 3c 2f 70 3e 0a 20 20 20 20  .    @ </p>.    
2420: 40 20 3c 70 72 65 3e 0a 20 20 20 20 40 20 25 68  @ <pre>.    @ %h
2430: 28 62 6c 6f 62 5f 73 74 72 28 72 65 63 6f 72 64  (blob_str(record
2440: 5f 67 65 74 5f 63 6f 6e 74 65 6e 74 28 70 32 29  _get_content(p2)
2450: 29 29 0a 20 20 20 20 40 20 3c 2f 70 72 65 3e 0a  )).    @ </pre>.
2460: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 76 69 64    }else{.    vid
2470: 31 20 3d 20 75 75 69 64 5f 74 6f 5f 72 69 64 28  1 = uuid_to_rid(
2480: 7a 56 31 2c 20 30 29 3b 0a 20 20 20 20 70 31 20  zV1, 0);.    p1 
2490: 3d 20 72 65 63 6f 72 64 5f 66 72 6f 6d 5f 72 69  = record_from_ri
24a0: 64 28 76 69 64 31 29 3b 0a 20 20 20 20 62 6c 6f  d(vid1);.    blo
24b0: 62 5f 7a 65 72 6f 28 26 6f 75 74 29 3b 0a 20 20  b_zero(&out);.  
24c0: 20 20 75 6e 69 66 69 65 64 5f 64 69 66 66 28 72    unified_diff(r
24d0: 65 63 6f 72 64 5f 67 65 74 5f 63 6f 6e 74 65 6e  ecord_get_conten
24e0: 74 28 70 31 29 2c 20 72 65 63 6f 72 64 5f 67 65  t(p1), record_ge
24f0: 74 5f 63 6f 6e 74 65 6e 74 28 70 32 29 2c 20 34  t_content(p2), 4
2500: 2c 20 26 6f 75 74 29 3b 0a 20 20 20 20 40 20 3c  , &out);.    @ <
2510: 70 3e 44 69 66 66 65 72 65 6e 63 65 73 20 62 65  p>Differences be
2520: 74 77 65 65 6e 0a 20 20 20 20 68 79 70 65 72 6c  tween.    hyperl
2530: 69 6e 6b 5f 74 6f 5f 75 75 69 64 28 7a 56 31 29  ink_to_uuid(zV1)
2540: 3b 0a 20 20 20 20 40 20 61 6e 64 0a 20 20 20 20  ;.    @ and.    
2550: 68 79 70 65 72 6c 69 6e 6b 5f 74 6f 5f 75 75 69  hyperlink_to_uui
2560: 64 28 7a 56 32 29 3b 0a 20 20 20 20 40 20 3c 2f  d(zV2);.    @ </
2570: 70 3e 0a 20 20 20 20 40 20 3c 70 72 65 3e 0a 20  p>.    @ <pre>. 
2580: 20 20 20 40 20 25 68 28 62 6c 6f 62 5f 73 74 72     @ %h(blob_str
2590: 28 26 6f 75 74 29 29 0a 20 20 20 20 40 20 3c 2f  (&out)).    @ </
25a0: 70 72 65 3e 0a 20 20 20 20 72 65 63 6f 72 64 5f  pre>.    record_
25b0: 64 65 73 74 72 6f 79 28 70 31 29 3b 0a 20 20 20  destroy(p1);.   
25c0: 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 6f 75 74   blob_reset(&out
25d0: 29 3b 0a 20 20 7d 0a 20 20 72 65 63 6f 72 64 5f  );.  }.  record_
25e0: 64 65 73 74 72 6f 79 28 70 32 29 3b 0a 20 20 73  destroy(p2);.  s
25f0: 74 79 6c 65 5f 66 6f 6f 74 65 72 28 29 3b 0a 7d  tyle_footer();.}
2600: 0a 23 65 6e 64 69 66 0a                          .#endif.