Fossil

      }
      db_set(pSetting->name/*works-like:""*/, g.argv[4], isGlobal);
      g.argc = 3;
    }
    pSetting = setting_info(&nSetting);
    for(; nSetting>0; nSetting--, pSetting++ ){
      if( strncmp(pSetting->name,"email-",6)!=0 ) continue;
      print_setting(pSetting, 0, 0);
    }
  }else
  if( strncmp(zCmd, "status", nCmd)==0 ){
    Stmt q;
    int iCutoff;
    int nSetting, n;
    static const char *zFmt = "%-29s %d\n";
    const Setting *pSetting = setting_info(&nSetting);
    db_open_config(1, 0);
    verify_all_options();
    if( g.argc!=3 ) usage("status");
    pSetting = setting_info(&nSetting);
    for(; nSetting>0; nSetting--, pSetting++ ){
      if( strncmp(pSetting->name,"email-",6)!=0 ) continue;
      print_setting(pSetting, 0, 0);
    }
    n = db_int(0,"SELECT count(*) FROM pending_alert WHERE NOT sentSep");
    fossil_print(zFmt/*works-like:"%s%d"*/, "pending-alerts", n);
    n = db_int(0,"SELECT count(*) FROM pending_alert WHERE NOT sentDigest");
    fossil_print(zFmt/*works-like:"%s%d"*/, "pending-digest-alerts", n);
    db_prepare(&q,
       "SELECT"

*/
static int tagCmp(const void *a, const void *b){
  char **pA = (char**)a;
  char **pB = (char**)b;
  return fossil_strcmp(pA[0], pB[0]);
}

/*
** SETTING: verify-comments            boolean default=on show-only-if-changed
**
** If enabled (the default) then the "fossil commit" command does sanity
** checking on the checkin comment.  The sanity checks can be overridden
** on a case by case basis using the --allow-suspect-comment option to
** the "fossil commit" command.  If disabled, this setting makes every
** "fossil commit" behave as if the --allow-suspect-comment option were
** provided.
*/

/*
** Check for possible formatting errors in the comment string pComment.
** If found, write a description of the problem(s) into pSus and return
** true.  If everything looks ok, return false.
*/
static int suspicious_comment(Blob *pComment, Blob *pSus){
  char *zStart = blob_str(pComment);
  char *z;
  char *zEnd, *zEnd2;
  char *zSep;
  char cSave1;
  int nIssue = 0;

  if( !db_get_boolean("verify-comments",1) ) return 0;
  z = zStart;
  blob_init(pSus, 0, 0);
  while( (z = strchr(z,'['))!=0 ){
    zEnd = strchr(z,']');
    if( zEnd==0 ){
      blob_appendf(pSus,"\n (%d) ", ++nIssue);
      blob_appendf(pSus, "Unterminated hyperlink \"%.12s...\"", z);

  info_cmd();
}

/*
** Print the current value of a setting identified by the pSetting
** pointer.
*/
void print_setting(const Setting *pSetting, int valueOnly, int bAlways){
  Stmt q;
  int versioned = 0;
  if( !pSetting->bIfChng ) bAlways = 1;
  if( pSetting->versionable && g.localOpen ){
    /* Check to see if this is overridden by a versionable settings file */
    Blob versionedPathname;
    blob_zero(&versionedPathname);
    blob_appendf(&versionedPathname, "%s.fossil-settings/%s",
                 g.zLocalRoot, pSetting->name);
    if( file_size(blob_str(&versionedPathname), ExtFILE)>=0 ){
      versioned = 1;
    }
    blob_reset(&versionedPathname);
  }
  if( valueOnly && versioned ){
    const char *zVal = db_get_versioned(pSetting->name, NULL, NULL);
    if( bAlways || (zVal!=0 && fossil_strcmp(zVal, pSetting->def)!=0) ){
      fossil_print("%s\n", db_get_versioned(pSetting->name, NULL, NULL));
    }else{
      versioned = 0;
    }
    return;
  }
  if( g.repositoryOpen ){
    db_prepare(&q,
       "SELECT '(local)', value FROM config WHERE name=%Q"
       " UNION ALL "
       "SELECT '(global)', value FROM global_config WHERE name=%Q",
       pSetting->name, pSetting->name
    );
  }else{
    db_prepare(&q,
      "SELECT '(global)', value FROM global_config WHERE name=%Q",
      pSetting->name
    );
  }
  if( db_step(&q)==SQLITE_ROW ){
    const char *zVal = db_column_text(&q,1);
    if( !bAlways && (zVal==0 || fossil_strcmp(zVal, pSetting->def)==0) ){
      /* Don't display because the value is equal to the default */
    }else if( valueOnly ){
      fossil_print("%s\n", db_column_text(&q, 1));
    }else{
      fossil_print("%-20s %-8s %s\n", pSetting->name, db_column_text(&q, 0),
          db_column_text(&q, 1));
    }
  }else if( !bAlways ){
    /* Display nothing */
  }else if( valueOnly ){
    fossil_print("\n");
  }else{
    fossil_print("%-20s\n", pSetting->name);
  }
  if( versioned ){
    fossil_print("  (overridden by contents of file .fossil-settings/%s)\n",

  const char *var;      /* Internal variable name used by db_set() */
  int width;            /* Width of display.  0 for boolean values and
                        ** negative for values which should not appear
                        ** on the /setup_settings page. */
  char versionable;     /* Is this setting versionable? */
  char forceTextArea;   /* Force using a text area for display? */
  char sensitive;       /* True if this a security-sensitive setting */
  char bIfChng;         /* Only display if value differs from default */
  const char *def;      /* Default value */
};

#endif /* INTERFACE */

/*
** SETTING: access-log      boolean default=off
**
** When the access-log setting is enabled, all login attempts (successful
** and unsuccessful) on the web interface are recorded in the "access" table

** that applies to all repositories.  The local values are stored in the
** "config" table of the repository and the global values are stored in the
** configuration database.  If both a local and a global value exists for a
** setting, the local value takes precedence.  This command normally operates
** on the local settings.  Use the --global option to change global settings.
**
** Options:
**   --exact    Only consider exact name matches
**   --extra    When listing settings, show them all, even those that are
**              normally only shown if there values are different from default
**   --global   Set or unset the given property globally instead of
**              setting or unsetting it for the open repository only

**   --value    Only show the value of a given property (implies --exact)
**
** See also: [[configuration]]
*/
void setting_cmd(void){
  int i;
  int globalFlag = find_option("global","g",0)!=0;
  int exactFlag = find_option("exact",0,0)!=0;
  int extraFlag = find_option("extra",0,0)!=0;
  int valueFlag = find_option("value",0,0)!=0;
  /* Undocumented "--test-for-subsystem SUBSYS" option used to test
  ** the db_get_for_subsystem() interface: */
  const char *zSubsys = find_option("test-for-subsystem",0,1);
  int unsetFlag = g.argv[1][0]=='u';
  int nSetting;
  const Setting *aSetting = setting_info(&nSetting);

      fossil_fatal("--value is only supported when qurying a given property");
    }
    exactFlag = 1;
  }

  if( g.argc==2 ){
    for(i=0; i<nSetting; i++){
      print_setting(&aSetting[i], 0, extraFlag);
    }
  }else if( g.argc==3 || g.argc==4 ){
    const char *zName = g.argv[2];
    int n = (int)strlen(zName);
    const Setting *pSetting = db_find_setting(zName, !exactFlag);
    if( pSetting==0 ){
      fossil_fatal("no such setting: %s", zName);

          fossil_print("%s (subsystem %s) ->",  pSetting->name, zSubsys);
          if( zValue ){
            fossil_print(" [%s]", zValue);
            fossil_free(zValue);
          }
          fossil_print("\n");
        }else{
          print_setting(pSetting, valueFlag, extraFlag);
        }
        pSetting++;
      }
    }
  }else{
    usage("?PROPERTY? ?VALUE? ?-global?");
  }

#include <assert.h>
#include <string.h>

/***************************************************************************
** These macros must match similar macros in dispatch.c.
**
** Allowed values for CmdOrPage.eCmdFlags. */
#define CMDFLAG_1ST_TIER     0x00001    /* Most important commands */
#define CMDFLAG_2ND_TIER     0x00002    /* Obscure and seldom used commands */
#define CMDFLAG_TEST         0x00004    /* Commands for testing only */
#define CMDFLAG_WEBPAGE      0x00008    /* Web pages */
#define CMDFLAG_COMMAND      0x00010    /* A command */
#define CMDFLAG_SETTING      0x00020    /* A setting */
#define CMDFLAG_VERSIONABLE  0x00040    /* A versionable setting */
#define CMDFLAG_BLOCKTEXT    0x00080    /* Multi-line text setting */
#define CMDFLAG_BOOLEAN      0x00100    /* A boolean setting */
#define CMDFLAG_RAWCONTENT   0x00200    /* Do not interpret webpage content */
#define CMDFLAG_SENSITIVE    0x00400    /* Security-sensitive setting */
#define CMDFLAG_HIDDEN       0x00800    /* Elide from most listings */
#define CMDFLAG_LDAVG_EXEMPT 0x01000    /* Exempt from load_control() */
#define CMDFLAG_ALIAS        0x02000    /* Command aliases */
#define CMDFLAG_KEEPEMPTY    0x04000    /* Do not unset empty settings */
#define CMDFLAG_ABBREVSUBCMD 0x08000    /* Abbreviated subcmd in help text */
#define CMDFLAG_IFCHNG       0x10000    /* Show settting only if not default */ 
/**************************************************************************/

/*
** Each entry looks like this:
*/
typedef struct Entry {
  int eType;        /* CMDFLAG_* values */

      aEntry[nUsed].zVar = string_dup(&zLine[i+9], j-9);
    }else if( j==6 && strncmp(&zLine[i], "hidden", 6)==0 ){
      aEntry[nUsed].eType |= CMDFLAG_HIDDEN;
    }else if( j==14 && strncmp(&zLine[i], "loadavg-exempt", 14)==0 ){
      aEntry[nUsed].eType |= CMDFLAG_LDAVG_EXEMPT;
    }else if( j==23 && strncmp(&zLine[i], "abbreviated-subcommands", 23)==0 ){
      aEntry[nUsed].eType |= CMDFLAG_ABBREVSUBCMD;
    }else if( j==20 && strncmp(&zLine[i], "show-only-if-changed", 20)==0 ){
      aEntry[nUsed].eType |= CMDFLAG_IFCHNG;
    }else{
      fprintf(stderr, "%s:%d: unknown option: '%.*s'\n",
              zFile, nLine, j, &zLine[i]);
      nErr++;
    }
  }

    }
    printf("  { \"%s\",%*s", z, (int)(20-strlen(z)), "");
    if( zVar ){
      printf(" \"%s\",%*s", zVar, (int)(15-strlen(zVar)), "");
    }else{
      printf(" 0,%*s", 16, "");
    }
    printf(" %3d, %d, %d, %d, %d, \"%s\"%*s },\n",
      aEntry[i].iWidth,
      (aEntry[i].eType & CMDFLAG_VERSIONABLE)!=0,
      (aEntry[i].eType & CMDFLAG_BLOCKTEXT)!=0,
      (aEntry[i].eType & CMDFLAG_SENSITIVE)!=0,
      (aEntry[i].eType & CMDFLAG_IFCHNG)!=0,
      zDef, (int)(10-strlen(zDef)), ""
    );
    if( aEntry[i].zIf ){
      printf("#endif\n");
    }
  }
  printf("{0,0,0,0,0,0,0,0}};\n");

}

/*
** Process a single file of input
*/
void process_file(void){