Fossil

  int quiet = 0;
  int dryRunFlag = 0;
  int showFile = find_option("showfile",0,0)!=0;
  int stopOnError = find_option("dontstop",0,0)==0;
  int rc;
  int rowCount, i = 0;
  char **azFilename = 0;
  i64 *aiRowid = 0;
  Bag outOfDate;
  
  int nToDel = 0;
  int showLabel = 0;

  dryRunFlag = find_option("dry-run","n",0)!=0;
  if( !dryRunFlag ){
    dryRunFlag = find_option("test",0,0)!=0; /* deprecated */
  }

       "INSERT INTO repolist "
       "SELECT DISTINCT substr(name, 6), name COLLATE nocase"
       "  FROM global_config"
       " WHERE substr(name, 1, 5)=='repo:'"
       " ORDER BY 1"
    );
  }

  rowCount = db_all_column_text_and_int64(&q, 0, &azFilename, 1, &aiRowid);
  db_finalize(&q);
  bag_init(&outOfDate);
  db_multi_exec("CREATE TEMP TABLE todel(x TEXT)");
  db_prepare(&q, "SELECT name, tag FROM repolist ORDER BY 1");
  while( i<rowCount ){
    const char *zFilename = azFilename[i];
    int rowid = (int)aiRowid[i];
    if( file_access(zFilename, F_OK)
     || !file_is_canonical(zFilename)
     || (useCheckouts && file_isdir(zFilename)!=1)
    ){
      db_multi_exec("INSERT INTO todel VALUES(%Q)", zFilename);
      nToDel++;
      i++; continue;
    }
    if( zCmd[0]=='l' ){
      fossil_print("%s\n", zFilename);
      i++; continue;
    }else if( showFile ){

    free(zSyscmd);
    free(zQFilename);
    if( stopOnError && rc ){
      break;
    }
    i++;
  }
  db_all_column_free(rowCount, &azFilename, &aiRowid);

  assert( !azFilename );
  assert( !aiRowid );

  /* If any repositories whose names appear in the ~/.fossil file could not
  ** be found, remove those names from the ~/.fossil file.
  */
  if( nToDel>0 ){
    const char *zSql = "DELETE FROM global_config WHERE name IN toDel";
    if( dryRunFlag ){
      fossil_print("%s\n", zSql);
    }else{
      db_multi_exec("%s", zSql /*safe-for-%s*/ );
    }
  }
}

}

/*
** Steps the SQL statement until there are no more rows.  Returns the
** total number of rows processed by this function.  If the pazValue1
** parameter is non-zero, captures the iCol1'th column value from each
** row (as text) and stores the resulting final array pointer into it.
** If the paiValue2 parameter is non-zero, captures the iCol2'th column
** value from each row (as int64) and stores the resulting final array
** pointer into it.  The caller of this function is responsible for
** calling the db_all_column_free() function later, passing it the
** result of this function along with the values for both the pazValue1
** and paiValue2 paramters.
*/
int db_all_column_text_and_int64(
  Stmt *pStmt,       /* The statement handle. */
  int iCol1,         /* The first column number to fetch from the results. */
  char ***pazValue1, /* Array of iCol1'th column values from query. */
  int iCol2,         /* The second column number to fetch from the results. */
  i64 **paiValue2    /* Array of iCol2'th column values from query. */
){
  int count = 0;
  char **azValue = 0;
  i64 *aiValue = 0;
  while( db_step(pStmt)==SQLITE_ROW ){
    count++;
    if( pazValue1 ){
      azValue = fossil_realloc(azValue, count * sizeof(char*));
      azValue[count - 1] = fossil_strdup(db_column_text(pStmt, iCol1));
    }
    if( paiValue2 ){
      aiValue = fossil_realloc(aiValue, count * sizeof(i64));
      aiValue[count - 1] = db_column_int64(pStmt, iCol2);
    }
  }
  if( pazValue1 ){
    *pazValue1 = azValue;
  }
  if( paiValue2 ){
    *paiValue2 = aiValue;
  }
  return count;
}

/*
** This function frees all the storage that was allocated by the
** db_all_column_text() function.
*/
void db_all_column_free(
  int count,         /* Number of string elements in the array. */
  char ***pazValue1, /* Array of iCol1'th column values from query. */
  i64 **paiValue2    /* Array of iCol2'th column values from query. */
){
  if( pazValue1 ){
    char **azValue = *pazValue1;
    int i;
    for(i=0; i<count; i++){

      fossil_free(azValue[i]);
      azValue[i] = 0;
    }

    fossil_free(azValue);

    *pazValue1 = 0;
  }
  if( paiValue2 ){
    fossil_free(*paiValue2);
    *paiValue2 = 0;
  }
}

/*
** Print warnings if a query is inefficient.
*/
static void db_stats(Stmt *pStmt){