/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c

Bug Summary

File:	tools/clang/tools/c-index-test/c-index-test.c
Warning:	line 2465, column 5 Potential leak of memory pointed to by 'unsaved_files'
Annotated Source Code

Press '?' to see keyboard shortcuts
Show analyzer invocation
clang -cc1 -triple x86_64-pc-linux-gnu -analyze -disable-free -disable-llvm-verifier -discard-value-names -main-file-name c-index-test.c -analyzer-store=region -analyzer-opt-analyze-nested-blocks -analyzer-eagerly-assume -analyzer-checker=core -analyzer-checker=apiModeling -analyzer-checker=unix -analyzer-checker=deadcode -analyzer-checker=security.insecureAPI.UncheckedReturn -analyzer-checker=security.insecureAPI.getpw -analyzer-checker=security.insecureAPI.gets -analyzer-checker=security.insecureAPI.mktemp -analyzer-checker=security.insecureAPI.mkstemp -analyzer-checker=security.insecureAPI.vfork -analyzer-checker=nullability.NullPassedToNonnull -analyzer-checker=nullability.NullReturnedFromNonnull -analyzer-output plist -w -mrelocation-model pic -pic-level 2 -mthread-model posix -fmath-errno -masm-verbose -mconstructor-aliases -munwind-tables -fuse-init-array -target-cpu x86-64 -dwarf-column-info -debugger-tuning=gdb -momit-leaf-frame-pointer -ffunction-sections -fdata-sections -resource-dir /usr/lib/llvm-7/lib/clang/7.0.0 -D _DEBUG -D _GNU_SOURCE -D __STDC_CONSTANT_MACROS -D __STDC_FORMAT_MACROS -D __STDC_LIMIT_MACROS -I /build/llvm-toolchain-snapshot-7~svn329677/build-llvm/tools/clang/tools/c-index-test -I /build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test -I /build/llvm-toolchain-snapshot-7~svn329677/tools/clang/include -I /build/llvm-toolchain-snapshot-7~svn329677/build-llvm/tools/clang/include -I /build/llvm-toolchain-snapshot-7~svn329677/build-llvm/include -I /build/llvm-toolchain-snapshot-7~svn329677/include -U NDEBUG -internal-isystem /usr/local/include -internal-isystem /usr/lib/llvm-7/lib/clang/7.0.0/include -internal-externc-isystem /usr/include/x86_64-linux-gnu -internal-externc-isystem /include -internal-externc-isystem /usr/include -O2 -Wno-unused-parameter -Wwrite-strings -Wno-missing-field-initializers -Wno-long-long -Wno-comment -std=gnu89 -fconst-strings -fdebug-compilation-dir /build/llvm-toolchain-snapshot-7~svn329677/build-llvm/tools/clang/tools/c-index-test -fdebug-prefix-map=/build/llvm-toolchain-snapshot-7~svn329677=. -ferror-limit 19 -fmessage-length 0 -stack-protector 2 -fobjc-runtime=gcc -fdiagnostics-show-option -vectorize-loops -vectorize-slp -analyzer-checker optin.performance.Padding -analyzer-output=html -analyzer-config stable-report-filename=true -o /tmp/scan-build-2018-04-11-031539-24776-1 -x c /build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c
1/* c-index-test.c */

3#include "clang/Config/config.h"
4#include "clang-c/Index.h"
5#include "clang-c/CXCompilationDatabase.h"
6#include "clang-c/BuildSystem.h"
7#include "clang-c/Documentation.h"
8#include <ctype.h>
9#include <stdlib.h>
10#include <stdio.h>
11#include <string.h>
12#include <assert.h>

14#ifdef CLANG_HAVE_LIBXML
15#include <libxml/parser.h>
16#include <libxml/relaxng.h>
17#include <libxml/xmlerror.h>
18#endif

20#ifdef _WIN32
21#  include <direct.h>
22#else
23#  include <unistd.h>
24#endif

26extern int indextest_core_main(int argc, const char **argv);

28/******************************************************************************/
29/* Utility functions.                                                         */
30/******************************************************************************/

32#ifdef _MSC_VER
33char *basename(const char* path)
34{
  char* base1 = (char*)strrchr(path, '/');
  char* base2 = (char*)strrchr(path, '\\');
  if (base1 && base2)
      return((base1 > base2) ? base1 + 1 : base2 + 1);
  else if (base1)
      return(base1 + 1);
  else if (base2)
      return(base2 + 1);

  return((char*)path);
45}
46char *dirname(char* path)
47{
  char* base1 = (char*)strrchr(path, '/');
  char* base2 = (char*)strrchr(path, '\\');
  if (base1 && base2)
      if (base1 > base2)
        *base1 = 0;
      else
        *base2 = 0;
  else if (base1)
      *base1 = 0;
  else if (base2)
      *base2 = 0;

  return path;
61}
62#else
63extern char *basename(const char *);
64extern char *dirname(char *);
65#endif

67/** \brief Return the default parsing options. */
68static unsigned getDefaultParsingOptions() {
unsigned options = CXTranslationUnit_DetailedPreprocessingRecord;

if (getenv("CINDEXTEST_EDITING"))
  options |= clang_defaultEditingTranslationUnitOptions();
if (getenv("CINDEXTEST_COMPLETION_CACHING"))
  options |= CXTranslationUnit_CacheCompletionResults;
if (getenv("CINDEXTEST_COMPLETION_NO_CACHING"))
  options &= ~CXTranslationUnit_CacheCompletionResults;
if (getenv("CINDEXTEST_SKIP_FUNCTION_BODIES"))
  options |= CXTranslationUnit_SkipFunctionBodies;
if (getenv("CINDEXTEST_COMPLETION_BRIEF_COMMENTS"))
  options |= CXTranslationUnit_IncludeBriefCommentsInCodeCompletion;
if (getenv("CINDEXTEST_CREATE_PREAMBLE_ON_FIRST_PARSE"))
  options |= CXTranslationUnit_CreatePreambleOnFirstParse;
if (getenv("CINDEXTEST_KEEP_GOING"))
  options |= CXTranslationUnit_KeepGoing;

return options;
87}

89static void ModifyPrintingPolicyAccordingToEnv(CXPrintingPolicy Policy) {
struct Mapping {
  const char *name;
  enum CXPrintingPolicyProperty property;
};
struct Mapping mappings[] = {
    {"CINDEXTEST_PRINTINGPOLICY_INDENTATION", CXPrintingPolicy_Indentation},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSSPECIFIERS",
     CXPrintingPolicy_SuppressSpecifiers},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSTAGKEYWORD",
     CXPrintingPolicy_SuppressTagKeyword},
    {"CINDEXTEST_PRINTINGPOLICY_INCLUDETAGDEFINITION",
     CXPrintingPolicy_IncludeTagDefinition},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSSCOPE",
     CXPrintingPolicy_SuppressScope},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSUNWRITTENSCOPE",
     CXPrintingPolicy_SuppressUnwrittenScope},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSINITIALIZERS",
     CXPrintingPolicy_SuppressInitializers},
    {"CINDEXTEST_PRINTINGPOLICY_CONSTANTARRAYSIZEASWRITTEN",
     CXPrintingPolicy_ConstantArraySizeAsWritten},
    {"CINDEXTEST_PRINTINGPOLICY_ANONYMOUSTAGLOCATIONS",
     CXPrintingPolicy_AnonymousTagLocations},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSSTRONGLIFETIME",
     CXPrintingPolicy_SuppressStrongLifetime},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSLIFETIMEQUALIFIERS",
     CXPrintingPolicy_SuppressLifetimeQualifiers},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSTEMPLATEARGSINCXXCONSTRUCTORS",
     CXPrintingPolicy_SuppressTemplateArgsInCXXConstructors},
    {"CINDEXTEST_PRINTINGPOLICY_BOOL", CXPrintingPolicy_Bool},
    {"CINDEXTEST_PRINTINGPOLICY_RESTRICT", CXPrintingPolicy_Restrict},
    {"CINDEXTEST_PRINTINGPOLICY_ALIGNOF", CXPrintingPolicy_Alignof},
    {"CINDEXTEST_PRINTINGPOLICY_UNDERSCOREALIGNOF",
     CXPrintingPolicy_UnderscoreAlignof},
    {"CINDEXTEST_PRINTINGPOLICY_USEVOIDFORZEROPARAMS",
     CXPrintingPolicy_UseVoidForZeroParams},
    {"CINDEXTEST_PRINTINGPOLICY_TERSEOUTPUT", CXPrintingPolicy_TerseOutput},
    {"CINDEXTEST_PRINTINGPOLICY_POLISHFORDECLARATION",
     CXPrintingPolicy_PolishForDeclaration},
    {"CINDEXTEST_PRINTINGPOLICY_HALF", CXPrintingPolicy_Half},
    {"CINDEXTEST_PRINTINGPOLICY_MSWCHAR", CXPrintingPolicy_MSWChar},
    {"CINDEXTEST_PRINTINGPOLICY_INCLUDENEWLINES",
     CXPrintingPolicy_IncludeNewlines},
    {"CINDEXTEST_PRINTINGPOLICY_MSVCFORMATTING",
     CXPrintingPolicy_MSVCFormatting},
    {"CINDEXTEST_PRINTINGPOLICY_CONSTANTSASWRITTEN",
     CXPrintingPolicy_ConstantsAsWritten},
    {"CINDEXTEST_PRINTINGPOLICY_SUPPRESSIMPLICITBASE",
     CXPrintingPolicy_SuppressImplicitBase},
    {"CINDEXTEST_PRINTINGPOLICY_FULLYQUALIFIEDNAME",
     CXPrintingPolicy_FullyQualifiedName},
};

unsigned i;
for (i = 0; i < sizeof(mappings) / sizeof(struct Mapping); i++) {
  char *value = getenv(mappings[i].name);
  if (value) {
    clang_PrintingPolicy_setProperty(Policy, mappings[i].property,
                                     (unsigned)strtoul(value, 0L, 10));
  }
}
150}

152/** \brief Returns 0 in case of success, non-zero in case of a failure. */
153static int checkForErrors(CXTranslationUnit TU);

155static void describeLibclangFailure(enum CXErrorCode Err) {
switch (Err) {
case CXError_Success:
  fprintf(stderrstderr, "Success\n");
  return;

case CXError_Failure:
  fprintf(stderrstderr, "Failure (no details available)\n");
  return;

case CXError_Crashed:
  fprintf(stderrstderr, "Failure: libclang crashed\n");
  return;

case CXError_InvalidArguments:
  fprintf(stderrstderr, "Failure: invalid arguments passed to a libclang routine\n");
  return;

case CXError_ASTReadError:
  fprintf(stderrstderr, "Failure: AST deserialization error occurred\n");
  return;
}
177}

179static void PrintExtent(FILE *out, unsigned begin_line, unsigned begin_column,
                      unsigned end_line, unsigned end_column) {
fprintf(out, "[%d:%d - %d:%d]", begin_line, begin_column,
        end_line, end_column);
183}

185static unsigned CreateTranslationUnit(CXIndex Idx, const char *file,
                                    CXTranslationUnit *TU) {
enum CXErrorCode Err = clang_createTranslationUnit2(Idx, file, TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "Unable to load translation unit from '%s'!\n", file);
  describeLibclangFailure(Err);
  *TU = 0;
  return 0;
}
return 1;
195}

197void free_remapped_files(struct CXUnsavedFile *unsaved_files,
                       int num_unsaved_files) {
int i;
for (i = 0; i != num_unsaved_files; ++i) {
  free((char *)unsaved_files[i].Filename);
  free((char *)unsaved_files[i].Contents);
}
free(unsaved_files);
205}

207static int parse_remapped_files_with_opt(const char *opt_name,
                                       int argc, const char **argv,
                                       int start_arg,
                                       struct CXUnsavedFile **unsaved_files,
                                       int *num_unsaved_files) {
int i;
int arg;
int prefix_len = strlen(opt_name);
int arg_indices[20];
*unsaved_files = 0;
*num_unsaved_files = 0;

/* Count the number of remapped files. */
for (arg = start_arg; arg < argc; ++arg) {
19
←
Loop condition is true.  Entering loop body→
22
←
Assuming 'arg' is >= 'argc'→
23
←
Loop condition is false. Execution continues on line 229→
  if (strncmp(argv[arg], opt_name, prefix_len))
20
←
Assuming the condition is false→
21
←
Taking false branch→
    continue;

  assert(*num_unsaved_files < (int)(sizeof(arg_indices)/sizeof(int)))((void) sizeof ((*num_unsaved_files < (int)(sizeof(arg_indices
)/sizeof(int))) ? 1 : 0), __extension__ ({ if (*num_unsaved_files
 < (int)(sizeof(arg_indices)/sizeof(int))) ; else __assert_fail
 ("*num_unsaved_files < (int)(sizeof(arg_indices)/sizeof(int))"
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 224, __extension__ __PRETTY_FUNCTION__); }));
  arg_indices[*num_unsaved_files] = arg;
  ++*num_unsaved_files;
}

if (*num_unsaved_files == 0)
24
←
Taking false branch→
  return 0;

*unsaved_files
  = (struct CXUnsavedFile *)malloc(sizeof(struct CXUnsavedFile) *
25
←
Memory is allocated→
                                   *num_unsaved_files);
assert(*unsaved_files)((void) sizeof ((*unsaved_files) ? 1 : 0), __extension__ ({ if
 (*unsaved_files) ; else __assert_fail ("*unsaved_files", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 235, __extension__ __PRETTY_FUNCTION__); }));
for (i = 0; i != *num_unsaved_files; ++i) {
26
←
Loop condition is true.  Entering loop body→
32
←
Loop condition is false. Execution continues on line 297→
  struct CXUnsavedFile *unsaved = *unsaved_files + i;
  const char *arg_string = argv[arg_indices[i]] + prefix_len;
  int filename_len;
  char *filename;
  char *contents;
  FILE *to_file;
  const char *sep = strchr(arg_string, ',');
  if (!sep) {
27
←
Assuming 'sep' is non-null→
28
←
Taking false branch→
    fprintf(stderrstderr,
            "error: %sfrom:to argument is missing comma\n", opt_name);
    free_remapped_files(*unsaved_files, i);
    *unsaved_files = 0;
    *num_unsaved_files = 0;
    return -1;
  }

  /* Open the file that we're remapping to. */
  to_file = fopen(sep + 1, "rb");
  if (!to_file) {
29
←
Assuming 'to_file' is non-null→
30
←
Taking false branch→
    fprintf(stderrstderr, "error: cannot open file %s that we are remapping to\n",
            sep + 1);
    free_remapped_files(*unsaved_files, i);
    *unsaved_files = 0;
    *num_unsaved_files = 0;
    return -1;
  }

  /* Determine the length of the file we're remapping to. */
  fseek(to_file, 0, SEEK_END2);
  unsaved->Length = ftell(to_file);
  fseek(to_file, 0, SEEK_SET0);

  /* Read the contents of the file we're remapping to. */
  contents = (char *)malloc(unsaved->Length + 1);
  assert(contents)((void) sizeof ((contents) ? 1 : 0), __extension__ ({ if (contents
) ; else __assert_fail ("contents", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 271, __extension__ __PRETTY_FUNCTION__); }));
  if (fread(contents, 1, unsaved->Length, to_file) != unsaved->Length) {
31
←
Taking false branch→
    fprintf(stderrstderr, "error: unexpected %s reading 'to' file %s\n",
            (feof(to_file) ? "EOF" : "error"), sep + 1);
    fclose(to_file);
    free_remapped_files(*unsaved_files, i);
    free(contents);
    *unsaved_files = 0;
    *num_unsaved_files = 0;
    return -1;
  }
  contents[unsaved->Length] = 0;
  unsaved->Contents = contents;

  /* Close the file. */
  fclose(to_file);

  /* Copy the file name that we're remapping from. */
  filename_len = sep - arg_string;
  filename = (char *)malloc(filename_len + 1);
  assert(filename)((void) sizeof ((filename) ? 1 : 0), __extension__ ({ if (filename
) ; else __assert_fail ("filename", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 291, __extension__ __PRETTY_FUNCTION__); }));
  memcpy(filename, arg_string, filename_len);
  filename[filename_len] = 0;
  unsaved->Filename = filename;
}

return 0;
298}

300static int parse_remapped_files(int argc, const char **argv, int start_arg,
                              struct CXUnsavedFile **unsaved_files,
                              int *num_unsaved_files) {
return parse_remapped_files_with_opt("-remap-file=", argc, argv, start_arg,
18
←
Calling 'parse_remapped_files_with_opt'→
33
←
Returned allocated memory via 5th parameter→
    unsaved_files, num_unsaved_files);
305}

307static int parse_remapped_files_with_try(int try_idx,
                                       int argc, const char **argv,
                                       int start_arg,
                                       struct CXUnsavedFile **unsaved_files,
                                       int *num_unsaved_files) {
struct CXUnsavedFile *unsaved_files_no_try_idx;
int num_unsaved_files_no_try_idx;
struct CXUnsavedFile *unsaved_files_try_idx;
int num_unsaved_files_try_idx;
int ret;
char opt_name[32];

ret = parse_remapped_files(argc, argv, start_arg,
    &unsaved_files_no_try_idx, &num_unsaved_files_no_try_idx);
if (ret)
  return ret;

sprintf(opt_name, "-remap-file-%d=", try_idx);
ret = parse_remapped_files_with_opt(opt_name, argc, argv, start_arg,
    &unsaved_files_try_idx, &num_unsaved_files_try_idx);
if (ret)
  return ret;

if (num_unsaved_files_no_try_idx == 0) {
  *unsaved_files = unsaved_files_try_idx;
  *num_unsaved_files = num_unsaved_files_try_idx;
  return 0;
}
if (num_unsaved_files_try_idx == 0) {
  *unsaved_files = unsaved_files_no_try_idx;
  *num_unsaved_files = num_unsaved_files_no_try_idx;
  return 0;
}

*num_unsaved_files = num_unsaved_files_no_try_idx + num_unsaved_files_try_idx;
*unsaved_files
  = (struct CXUnsavedFile *)realloc(unsaved_files_no_try_idx,
                                    sizeof(struct CXUnsavedFile) *
                                      *num_unsaved_files);
assert(*unsaved_files)((void) sizeof ((*unsaved_files) ? 1 : 0), __extension__ ({ if
 (*unsaved_files) ; else __assert_fail ("*unsaved_files", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 346, __extension__ __PRETTY_FUNCTION__); }));
memcpy(*unsaved_files + num_unsaved_files_no_try_idx,
       unsaved_files_try_idx, sizeof(struct CXUnsavedFile) *
          num_unsaved_files_try_idx);
free(unsaved_files_try_idx);
return 0;
352}

354static const char *parse_comments_schema(int argc, const char **argv) {
const char *CommentsSchemaArg = "-comments-xml-schema=";
const char *CommentSchemaFile = NULL((void*)0);

if (argc == 0)
  return CommentSchemaFile;

if (!strncmp(argv[0], CommentsSchemaArg, strlen(CommentsSchemaArg)))
  CommentSchemaFile = argv[0] + strlen(CommentsSchemaArg);

return CommentSchemaFile;
365}

367/******************************************************************************/
368/* Pretty-printing.                                                           */
369/******************************************************************************/

371static const char *FileCheckPrefix = "CHECK";

373static void PrintCString(const char *CStr) {
if (CStr != NULL((void*)0) && CStr[0] != '\0') {
  for ( ; *CStr; ++CStr) {
    const char C = *CStr;
    switch (C) {
      case '\n': printf("\\n"); break;
      case '\r': printf("\\r"); break;
      case '\t': printf("\\t"); break;
      case '\v': printf("\\v"); break;
      case '\f': printf("\\f"); break;
      default:   putchar(C);    break;
    }
  }
}
387}

389static void PrintCStringWithPrefix(const char *Prefix, const char *CStr) {
printf(" %s=[", Prefix);
PrintCString(CStr);
printf("]");
393}

395static void PrintCXStringAndDispose(CXString Str) {
PrintCString(clang_getCString(Str));
clang_disposeString(Str);
398}

400static void PrintCXStringWithPrefix(const char *Prefix, CXString Str) {
PrintCStringWithPrefix(Prefix, clang_getCString(Str));
402}

404static void PrintCXStringWithPrefixAndDispose(const char *Prefix,
                                            CXString Str) {
PrintCStringWithPrefix(Prefix, clang_getCString(Str));
clang_disposeString(Str);
408}

410static void PrintRange(CXSourceRange R, const char *str) {
CXFile begin_file, end_file;
unsigned begin_line, begin_column, end_line, end_column;

clang_getSpellingLocation(clang_getRangeStart(R),
                          &begin_file, &begin_line, &begin_column, 0);
clang_getSpellingLocation(clang_getRangeEnd(R),
                          &end_file, &end_line, &end_column, 0);
if (!begin_file || !end_file)
  return;

if (str)
  printf(" %s=", str);
PrintExtent(stdoutstdout, begin_line, begin_column, end_line, end_column);
424}

426static enum DisplayType {
  DisplayType_Spelling,
  DisplayType_DisplayName,
  DisplayType_Pretty
430} wanted_display_type = DisplayType_Spelling;

432static void printVersion(const char *Prefix, CXVersion Version) {
if (Version.Major < 0)
  return;
printf("%s%d", Prefix, Version.Major);

if (Version.Minor < 0)
  return;
printf(".%d", Version.Minor);

if (Version.Subminor < 0)
  return;
printf(".%d", Version.Subminor);
444}

446struct CommentASTDumpingContext {
int IndentLevel;
448};

450static void DumpCXCommentInternal(struct CommentASTDumpingContext *Ctx,
                                CXComment Comment) {
unsigned i;
unsigned e;
enum CXCommentKind Kind = clang_Comment_getKind(Comment);

Ctx->IndentLevel++;
for (i = 0, e = Ctx->IndentLevel; i != e; ++i)
  printf("  ");

printf("(");
switch (Kind) {
case CXComment_Null:
  printf("CXComment_Null");
  break;
case CXComment_Text:
  printf("CXComment_Text");
  PrintCXStringWithPrefixAndDispose("Text",
                                    clang_TextComment_getText(Comment));
  if (clang_Comment_isWhitespace(Comment))
    printf(" IsWhitespace");
  if (clang_InlineContentComment_hasTrailingNewline(Comment))
    printf(" HasTrailingNewline");
  break;
case CXComment_InlineCommand:
  printf("CXComment_InlineCommand");
  PrintCXStringWithPrefixAndDispose(
      "CommandName",
      clang_InlineCommandComment_getCommandName(Comment));
  switch (clang_InlineCommandComment_getRenderKind(Comment)) {
  case CXCommentInlineCommandRenderKind_Normal:
    printf(" RenderNormal");
    break;
  case CXCommentInlineCommandRenderKind_Bold:
    printf(" RenderBold");
    break;
  case CXCommentInlineCommandRenderKind_Monospaced:
    printf(" RenderMonospaced");
    break;
  case CXCommentInlineCommandRenderKind_Emphasized:
    printf(" RenderEmphasized");
    break;
  }
  for (i = 0, e = clang_InlineCommandComment_getNumArgs(Comment);
       i != e; ++i) {
    printf(" Arg[%u]=", i);
    PrintCXStringAndDispose(
        clang_InlineCommandComment_getArgText(Comment, i));
  }
  if (clang_InlineContentComment_hasTrailingNewline(Comment))
    printf(" HasTrailingNewline");
  break;
case CXComment_HTMLStartTag: {
  unsigned NumAttrs;
  printf("CXComment_HTMLStartTag");
  PrintCXStringWithPrefixAndDispose(
      "Name",
      clang_HTMLTagComment_getTagName(Comment));
  NumAttrs = clang_HTMLStartTag_getNumAttrs(Comment);
  if (NumAttrs != 0) {
    printf(" Attrs:");
    for (i = 0; i != NumAttrs; ++i) {
      printf(" ");
      PrintCXStringAndDispose(clang_HTMLStartTag_getAttrName(Comment, i));
      printf("=");
      PrintCXStringAndDispose(clang_HTMLStartTag_getAttrValue(Comment, i));
    }
  }
  if (clang_HTMLStartTagComment_isSelfClosing(Comment))
    printf(" SelfClosing");
  if (clang_InlineContentComment_hasTrailingNewline(Comment))
    printf(" HasTrailingNewline");
  break;
}
case CXComment_HTMLEndTag:
  printf("CXComment_HTMLEndTag");
  PrintCXStringWithPrefixAndDispose(
      "Name",
      clang_HTMLTagComment_getTagName(Comment));
  if (clang_InlineContentComment_hasTrailingNewline(Comment))
    printf(" HasTrailingNewline");
  break;
case CXComment_Paragraph:
  printf("CXComment_Paragraph");
  if (clang_Comment_isWhitespace(Comment))
    printf(" IsWhitespace");
  break;
case CXComment_BlockCommand:
  printf("CXComment_BlockCommand");
  PrintCXStringWithPrefixAndDispose(
      "CommandName",
      clang_BlockCommandComment_getCommandName(Comment));
  for (i = 0, e = clang_BlockCommandComment_getNumArgs(Comment);
       i != e; ++i) {
    printf(" Arg[%u]=", i);
    PrintCXStringAndDispose(
        clang_BlockCommandComment_getArgText(Comment, i));
  }
  break;
case CXComment_ParamCommand:
  printf("CXComment_ParamCommand");
  switch (clang_ParamCommandComment_getDirection(Comment)) {
  case CXCommentParamPassDirection_In:
    printf(" in");
    break;
  case CXCommentParamPassDirection_Out:
    printf(" out");
    break;
  case CXCommentParamPassDirection_InOut:
    printf(" in,out");
    break;
  }
  if (clang_ParamCommandComment_isDirectionExplicit(Comment))
    printf(" explicitly");
  else
    printf(" implicitly");
  PrintCXStringWithPrefixAndDispose(
      "ParamName",
      clang_ParamCommandComment_getParamName(Comment));
  if (clang_ParamCommandComment_isParamIndexValid(Comment))
    printf(" ParamIndex=%u", clang_ParamCommandComment_getParamIndex(Comment));
  else
    printf(" ParamIndex=Invalid");
  break;
case CXComment_TParamCommand:
  printf("CXComment_TParamCommand");
  PrintCXStringWithPrefixAndDispose(
      "ParamName",
      clang_TParamCommandComment_getParamName(Comment));
  if (clang_TParamCommandComment_isParamPositionValid(Comment)) {
    printf(" ParamPosition={");
    for (i = 0, e = clang_TParamCommandComment_getDepth(Comment);
         i != e; ++i) {
      printf("%u", clang_TParamCommandComment_getIndex(Comment, i));
      if (i != e - 1)
        printf(", ");
    }
    printf("}");
  } else
    printf(" ParamPosition=Invalid");
  break;
case CXComment_VerbatimBlockCommand:
  printf("CXComment_VerbatimBlockCommand");
  PrintCXStringWithPrefixAndDispose(
      "CommandName",
      clang_BlockCommandComment_getCommandName(Comment));
  break;
case CXComment_VerbatimBlockLine:
  printf("CXComment_VerbatimBlockLine");
  PrintCXStringWithPrefixAndDispose(
      "Text",
      clang_VerbatimBlockLineComment_getText(Comment));
  break;
case CXComment_VerbatimLine:
  printf("CXComment_VerbatimLine");
  PrintCXStringWithPrefixAndDispose(
      "Text",
      clang_VerbatimLineComment_getText(Comment));
  break;
case CXComment_FullComment:
  printf("CXComment_FullComment");
  break;
}
if (Kind != CXComment_Null) {
  const unsigned NumChildren = clang_Comment_getNumChildren(Comment);
  unsigned i;
  for (i = 0; i != NumChildren; ++i) {
    printf("\n// %s: ", FileCheckPrefix);
    DumpCXCommentInternal(Ctx, clang_Comment_getChild(Comment, i));
  }
}
printf(")");
Ctx->IndentLevel--;
623}

625static void DumpCXComment(CXComment Comment) {
struct CommentASTDumpingContext Ctx;
Ctx.IndentLevel = 1;
printf("\n// %s:  CommentAST=[\n// %s:", FileCheckPrefix, FileCheckPrefix);
DumpCXCommentInternal(&Ctx, Comment);
printf("]");
631}

633static void ValidateCommentXML(const char *Str, const char *CommentSchemaFile) {
634#ifdef CLANG_HAVE_LIBXML
xmlRelaxNGParserCtxtPtr RNGParser;
xmlRelaxNGPtr Schema;
xmlDocPtr Doc;
xmlRelaxNGValidCtxtPtr ValidationCtxt;
int status;

if (!CommentSchemaFile)
  return;

RNGParser = xmlRelaxNGNewParserCtxt(CommentSchemaFile);
if (!RNGParser) {
  printf(" libXMLError");
  return;
}
Schema = xmlRelaxNGParse(RNGParser);

Doc = xmlParseDoc((const xmlChar *) Str);

if (!Doc) {
  xmlErrorPtr Error = xmlGetLastError();
  printf(" CommentXMLInvalid [not well-formed XML: %s]", Error->message);
  return;
}

ValidationCtxt = xmlRelaxNGNewValidCtxt(Schema);
status = xmlRelaxNGValidateDoc(ValidationCtxt, Doc);
if (!status)
  printf(" CommentXMLValid");
else if (status > 0) {
  xmlErrorPtr Error = xmlGetLastError();
  printf(" CommentXMLInvalid [not valid XML: %s]", Error->message);
} else
  printf(" libXMLError");

xmlRelaxNGFreeValidCtxt(ValidationCtxt);
xmlFreeDoc(Doc);
xmlRelaxNGFree(Schema);
xmlRelaxNGFreeParserCtxt(RNGParser);
673#endif
674}

676static void PrintCursorComments(CXCursor Cursor,
                              const char *CommentSchemaFile) {
{
  CXString RawComment;
  const char *RawCommentCString;
  CXString BriefComment;
  const char *BriefCommentCString;

  RawComment = clang_Cursor_getRawCommentText(Cursor);
  RawCommentCString = clang_getCString(RawComment);
  if (RawCommentCString != NULL((void*)0) && RawCommentCString[0] != '\0') {
    PrintCStringWithPrefix("RawComment", RawCommentCString);
    PrintRange(clang_Cursor_getCommentRange(Cursor), "RawCommentRange");

    BriefComment = clang_Cursor_getBriefCommentText(Cursor);
    BriefCommentCString = clang_getCString(BriefComment);
    if (BriefCommentCString != NULL((void*)0) && BriefCommentCString[0] != '\0')
      PrintCStringWithPrefix("BriefComment", BriefCommentCString);
    clang_disposeString(BriefComment);
  }
  clang_disposeString(RawComment);
}

{
  CXComment Comment = clang_Cursor_getParsedComment(Cursor);
  if (clang_Comment_getKind(Comment) != CXComment_Null) {
    PrintCXStringWithPrefixAndDispose("FullCommentAsHTML",
                                      clang_FullComment_getAsHTML(Comment));
    {
      CXString XML;
      XML = clang_FullComment_getAsXML(Comment);
      PrintCXStringWithPrefix("FullCommentAsXML", XML);
      ValidateCommentXML(clang_getCString(XML), CommentSchemaFile);
      clang_disposeString(XML);
    }

    DumpCXComment(Comment);
  }
}
715}

717typedef struct {
unsigned line;
unsigned col;
720} LineCol;

722static int lineCol_cmp(const void *p1, const void *p2) {
const LineCol *lhs = p1;
const LineCol *rhs = p2;
if (lhs->line != rhs->line)
  return (int)lhs->line - (int)rhs->line;
return (int)lhs->col - (int)rhs->col;
728}

730static CXString CursorToText(CXCursor Cursor) {
CXString text;
switch (wanted_display_type) {
case DisplayType_Spelling:
  return clang_getCursorSpelling(Cursor);
case DisplayType_DisplayName:
  return clang_getCursorDisplayName(Cursor);
case DisplayType_Pretty: {
  CXPrintingPolicy Policy = clang_getCursorPrintingPolicy(Cursor);
  ModifyPrintingPolicyAccordingToEnv(Policy);
  text = clang_getCursorPrettyPrinted(Cursor, Policy);
  clang_PrintingPolicy_dispose(Policy);
  return text;
}
}
assert(0 && "unknown display type")((void) sizeof ((0 && "unknown display type") ? 1 : 0
), __extension__ ({ if (0 && "unknown display type") ;
 else __assert_fail ("0 && \"unknown display type\"",
 "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 745, __extension__ __PRETTY_FUNCTION__); })); /* no llvm_unreachable in C. */
/* Set to NULL to prevent uninitialized variable warnings. */
text.data = NULL((void*)0);
text.private_flags = 0;
return text;
750}

752static void PrintCursor(CXCursor Cursor, const char *CommentSchemaFile) {
CXTranslationUnit TU = clang_Cursor_getTranslationUnit(Cursor);
if (clang_isInvalid(Cursor.kind)) {
  CXString ks = clang_getCursorKindSpelling(Cursor.kind);
  printf("Invalid Cursor => %s", clang_getCString(ks));
  clang_disposeString(ks);
}
else {
  CXString string, ks;
  CXCursor Referenced;
  unsigned line, column;
  CXCursor SpecializationOf;
  CXCursor *overridden;
  unsigned num_overridden;
  unsigned RefNameRangeNr;
  CXSourceRange CursorExtent;
  CXSourceRange RefNameRange;
  int AlwaysUnavailable;
  int AlwaysDeprecated;
  CXString UnavailableMessage;
  CXString DeprecatedMessage;
  CXPlatformAvailability PlatformAvailability[2];
  int NumPlatformAvailability;
  int I;

  ks = clang_getCursorKindSpelling(Cursor.kind);
  string = CursorToText(Cursor);
  printf("%s=%s", clang_getCString(ks),
                  clang_getCString(string));
  clang_disposeString(ks);
  clang_disposeString(string);

  Referenced = clang_getCursorReferenced(Cursor);
  if (!clang_equalCursors(Referenced, clang_getNullCursor())) {
    if (clang_getCursorKind(Referenced) == CXCursor_OverloadedDeclRef) {
      unsigned I, N = clang_getNumOverloadedDecls(Referenced);
      printf("[");
      for (I = 0; I != N; ++I) {
        CXCursor Ovl = clang_getOverloadedDecl(Referenced, I);
        CXSourceLocation Loc;
        if (I)
          printf(", ");
        
        Loc = clang_getCursorLocation(Ovl);
        clang_getSpellingLocation(Loc, 0, &line, &column, 0);
        printf("%d:%d", line, column);          
      }
      printf("]");
    } else {
      CXSourceLocation Loc = clang_getCursorLocation(Referenced);
      clang_getSpellingLocation(Loc, 0, &line, &column, 0);
      printf(":%d:%d", line, column);
    }

    if (clang_getCursorKind(Referenced) == CXCursor_TypedefDecl) {
      CXType T = clang_getCursorType(Referenced);
      if (clang_Type_isTransparentTagTypedef(T)) {
        CXType Underlying = clang_getTypedefDeclUnderlyingType(Referenced);
        CXString S = clang_getTypeSpelling(Underlying);
        printf(" (Transparent: %s)", clang_getCString(S));
        clang_disposeString(S);
      }
    }
  }

  if (clang_isCursorDefinition(Cursor))
    printf(" (Definition)");
  
  switch (clang_getCursorAvailability(Cursor)) {
    case CXAvailability_Available:
      break;
      
    case CXAvailability_Deprecated:
      printf(" (deprecated)");
      break;
      
    case CXAvailability_NotAvailable:
      printf(" (unavailable)");
      break;

    case CXAvailability_NotAccessible:
      printf(" (inaccessible)");
      break;
  }
  
  NumPlatformAvailability
    = clang_getCursorPlatformAvailability(Cursor,
                                          &AlwaysDeprecated,
                                          &DeprecatedMessage,
                                          &AlwaysUnavailable,
                                          &UnavailableMessage,
                                          PlatformAvailability, 2);
  if (AlwaysUnavailable) {
    printf("  (always unavailable: \"%s\")",
           clang_getCString(UnavailableMessage));
  } else if (AlwaysDeprecated) {
    printf("  (always deprecated: \"%s\")",
           clang_getCString(DeprecatedMessage));
  } else {
    for (I = 0; I != NumPlatformAvailability; ++I) {
      if (I >= 2)
        break;
      
      printf("  (%s", clang_getCString(PlatformAvailability[I].Platform));
      if (PlatformAvailability[I].Unavailable)
        printf(", unavailable");
      else {
        printVersion(", introduced=", PlatformAvailability[I].Introduced);
        printVersion(", deprecated=", PlatformAvailability[I].Deprecated);
        printVersion(", obsoleted=", PlatformAvailability[I].Obsoleted);
      }
      if (clang_getCString(PlatformAvailability[I].Message)[0])
        printf(", message=\"%s\"",
               clang_getCString(PlatformAvailability[I].Message));
      printf(")");
    }
  }
  for (I = 0; I != NumPlatformAvailability; ++I) {
    if (I >= 2)
      break;
    clang_disposeCXPlatformAvailability(PlatformAvailability + I);
  }
  
  clang_disposeString(DeprecatedMessage);
  clang_disposeString(UnavailableMessage);

  if (clang_CXXConstructor_isDefaultConstructor(Cursor))
    printf(" (default constructor)");

  if (clang_CXXConstructor_isMoveConstructor(Cursor))
    printf(" (move constructor)");
  if (clang_CXXConstructor_isCopyConstructor(Cursor))
    printf(" (copy constructor)");
  if (clang_CXXConstructor_isConvertingConstructor(Cursor))
    printf(" (converting constructor)");
  if (clang_CXXField_isMutable(Cursor))
    printf(" (mutable)");
  if (clang_CXXMethod_isDefaulted(Cursor))
    printf(" (defaulted)");
  if (clang_CXXMethod_isStatic(Cursor))
    printf(" (static)");
  if (clang_CXXMethod_isVirtual(Cursor))
    printf(" (virtual)");
  if (clang_CXXMethod_isConst(Cursor))
    printf(" (const)");
  if (clang_CXXMethod_isPureVirtual(Cursor))
    printf(" (pure)");
  if (clang_CXXRecord_isAbstract(Cursor))
    printf(" (abstract)");
  if (clang_EnumDecl_isScoped(Cursor))
    printf(" (scoped)");
  if (clang_Cursor_isVariadic(Cursor))
    printf(" (variadic)");
  if (clang_Cursor_isObjCOptional(Cursor))
    printf(" (@optional)");
  if (clang_isInvalidDeclaration(Cursor))
    printf(" (invalid)");

  switch (clang_getCursorExceptionSpecificationType(Cursor))
  {
    case CXCursor_ExceptionSpecificationKind_None:
      break;

    case CXCursor_ExceptionSpecificationKind_DynamicNone:
      printf(" (noexcept dynamic none)");
      break;

    case CXCursor_ExceptionSpecificationKind_Dynamic:
      printf(" (noexcept dynamic)");
      break;

    case CXCursor_ExceptionSpecificationKind_MSAny:
      printf(" (noexcept dynamic any)");
      break;

    case CXCursor_ExceptionSpecificationKind_BasicNoexcept:
      printf(" (noexcept)");
      break;

    case CXCursor_ExceptionSpecificationKind_ComputedNoexcept:
      printf(" (computed-noexcept)");
      break;

    case CXCursor_ExceptionSpecificationKind_Unevaluated:
    case CXCursor_ExceptionSpecificationKind_Uninstantiated:
    case CXCursor_ExceptionSpecificationKind_Unparsed:
      break;
  }

  {
    CXString language;
    CXString definedIn;
    unsigned generated;
    if (clang_Cursor_isExternalSymbol(Cursor, &language, &definedIn,
                                      &generated)) {
      printf(" (external lang: %s, defined: %s, gen: %d)",
          clang_getCString(language), clang_getCString(definedIn), generated);
      clang_disposeString(language);
      clang_disposeString(definedIn);
    }
  }

  if (Cursor.kind == CXCursor_IBOutletCollectionAttr) {
    CXType T =
      clang_getCanonicalType(clang_getIBOutletCollectionType(Cursor));
    CXString S = clang_getTypeKindSpelling(T.kind);
    printf(" [IBOutletCollection=%s]", clang_getCString(S));
    clang_disposeString(S);
  }
  
  if (Cursor.kind == CXCursor_CXXBaseSpecifier) {
    enum CX_CXXAccessSpecifier access = clang_getCXXAccessSpecifier(Cursor);
    unsigned isVirtual = clang_isVirtualBase(Cursor);
    const char *accessStr = 0;

    switch (access) {
      case CX_CXXInvalidAccessSpecifier:
        accessStr = "invalid"; break;
      case CX_CXXPublic:
        accessStr = "public"; break;
      case CX_CXXProtected:
        accessStr = "protected"; break;
      case CX_CXXPrivate:
        accessStr = "private"; break;
    }      
    
    printf(" [access=%s isVirtual=%s]", accessStr,
           isVirtual ? "true" : "false");
  }

  SpecializationOf = clang_getSpecializedCursorTemplate(Cursor);
  if (!clang_equalCursors(SpecializationOf, clang_getNullCursor())) {
    CXSourceLocation Loc = clang_getCursorLocation(SpecializationOf);
    CXString Name = clang_getCursorSpelling(SpecializationOf);
    clang_getSpellingLocation(Loc, 0, &line, &column, 0);
    printf(" [Specialization of %s:%d:%d]",
           clang_getCString(Name), line, column);
    clang_disposeString(Name);

    if (Cursor.kind == CXCursor_FunctionDecl) {
      /* Collect the template parameter kinds from the base template. */
      int NumTemplateArgs = clang_Cursor_getNumTemplateArguments(Cursor);
      int I;
      if (NumTemplateArgs < 0) {
        printf(" [no template arg info]");
      }
      for (I = 0; I < NumTemplateArgs; I++) {
        enum CXTemplateArgumentKind TAK =
            clang_Cursor_getTemplateArgumentKind(Cursor, I);
        switch(TAK) {
          case CXTemplateArgumentKind_Type:
            {
              CXType T = clang_Cursor_getTemplateArgumentType(Cursor, I);
              CXString S = clang_getTypeSpelling(T);
              printf(" [Template arg %d: kind: %d, type: %s]",
                     I, TAK, clang_getCString(S));
              clang_disposeString(S);
            }
            break;
          case CXTemplateArgumentKind_Integral:
            printf(" [Template arg %d: kind: %d, intval: %lld]",
                   I, TAK, clang_Cursor_getTemplateArgumentValue(Cursor, I));
            break;
          default:
            printf(" [Template arg %d: kind: %d]\n", I, TAK);
        }
      }
    }
  }

  clang_getOverriddenCursors(Cursor, &overridden, &num_overridden);
  if (num_overridden) {      
    unsigned I;
    LineCol lineCols[50];
    assert(num_overridden <= 50)((void) sizeof ((num_overridden <= 50) ? 1 : 0), __extension__
 ({ if (num_overridden <= 50) ; else __assert_fail ("num_overridden <= 50"
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 1026, __extension__ __PRETTY_FUNCTION__); }));
    printf(" [Overrides ");
    for (I = 0; I != num_overridden; ++I) {
      CXSourceLocation Loc = clang_getCursorLocation(overridden[I]);
      clang_getSpellingLocation(Loc, 0, &line, &column, 0);
      lineCols[I].line = line;
      lineCols[I].col = column;
    }
    /* Make the order of the override list deterministic. */
    qsort(lineCols, num_overridden, sizeof(LineCol), lineCol_cmp);
    for (I = 0; I != num_overridden; ++I) {
      if (I)
        printf(", ");
      printf("@%d:%d", lineCols[I].line, lineCols[I].col);
    }
    printf("]");
    clang_disposeOverriddenCursors(overridden);
  }
  
  if (Cursor.kind == CXCursor_InclusionDirective) {
    CXFile File = clang_getIncludedFile(Cursor);
    CXString Included = clang_getFileName(File);
    printf(" (%s)", clang_getCString(Included));
    clang_disposeString(Included);
    
    if (clang_isFileMultipleIncludeGuarded(TU, File))
      printf("  [multi-include guarded]");
  }
  
  CursorExtent = clang_getCursorExtent(Cursor);
  RefNameRange = clang_getCursorReferenceNameRange(Cursor, 
                                                 CXNameRange_WantQualifier
                                               | CXNameRange_WantSinglePiece
                                               | CXNameRange_WantTemplateArgs,
                                                   0);
  if (!clang_equalRanges(CursorExtent, RefNameRange))
    PrintRange(RefNameRange, "SingleRefName");
  
  for (RefNameRangeNr = 0; 1; RefNameRangeNr++) {
    RefNameRange = clang_getCursorReferenceNameRange(Cursor, 
                                                 CXNameRange_WantQualifier
                                               | CXNameRange_WantTemplateArgs,
                                                     RefNameRangeNr);
    if (clang_equalRanges(clang_getNullRange(), RefNameRange))
      break;
    if (!clang_equalRanges(CursorExtent, RefNameRange))
      PrintRange(RefNameRange, "RefName");
  }

  PrintCursorComments(Cursor, CommentSchemaFile);

  {
    unsigned PropAttrs = clang_Cursor_getObjCPropertyAttributes(Cursor, 0);
    if (PropAttrs != CXObjCPropertyAttr_noattr) {
      printf(" [");
      #define PRINT_PROP_ATTR(A)if (PropAttrs & CXObjCPropertyAttr_A) printf("A" ",") \
        if (PropAttrs & CXObjCPropertyAttr_##A) printf(#A ",")
      PRINT_PROP_ATTR(readonly)if (PropAttrs & CXObjCPropertyAttr_readonly) printf("readonly"
 ",");
      PRINT_PROP_ATTR(getter)if (PropAttrs & CXObjCPropertyAttr_getter) printf("getter"
 ",");
      PRINT_PROP_ATTR(assign)if (PropAttrs & CXObjCPropertyAttr_assign) printf("assign"
 ",");
      PRINT_PROP_ATTR(readwrite)if (PropAttrs & CXObjCPropertyAttr_readwrite) printf("readwrite"
 ",");
      PRINT_PROP_ATTR(retain)if (PropAttrs & CXObjCPropertyAttr_retain) printf("retain"
 ",");
      PRINT_PROP_ATTR(copy)if (PropAttrs & CXObjCPropertyAttr_copy) printf("copy" ","
);
      PRINT_PROP_ATTR(nonatomic)if (PropAttrs & CXObjCPropertyAttr_nonatomic) printf("nonatomic"
 ",");
      PRINT_PROP_ATTR(setter)if (PropAttrs & CXObjCPropertyAttr_setter) printf("setter"
 ",");
      PRINT_PROP_ATTR(atomic)if (PropAttrs & CXObjCPropertyAttr_atomic) printf("atomic"
 ",");
      PRINT_PROP_ATTR(weak)if (PropAttrs & CXObjCPropertyAttr_weak) printf("weak" ","
);
      PRINT_PROP_ATTR(strong)if (PropAttrs & CXObjCPropertyAttr_strong) printf("strong"
 ",");
      PRINT_PROP_ATTR(unsafe_unretained)if (PropAttrs & CXObjCPropertyAttr_unsafe_unretained) printf
("unsafe_unretained" ",");
      PRINT_PROP_ATTR(class)if (PropAttrs & CXObjCPropertyAttr_class) printf("class" ","
);
      printf("]");
    }
  }

  {
    unsigned QT = clang_Cursor_getObjCDeclQualifiers(Cursor);
    if (QT != CXObjCDeclQualifier_None) {
      printf(" [");
      #define PRINT_OBJC_QUAL(A)if (QT & CXObjCDeclQualifier_A) printf("A" ",") \
        if (QT & CXObjCDeclQualifier_##A) printf(#A ",")
      PRINT_OBJC_QUAL(In)if (QT & CXObjCDeclQualifier_In) printf("In" ",");
      PRINT_OBJC_QUAL(Inout)if (QT & CXObjCDeclQualifier_Inout) printf("Inout" ",");
      PRINT_OBJC_QUAL(Out)if (QT & CXObjCDeclQualifier_Out) printf("Out" ",");
      PRINT_OBJC_QUAL(Bycopy)if (QT & CXObjCDeclQualifier_Bycopy) printf("Bycopy" ",");
      PRINT_OBJC_QUAL(Byref)if (QT & CXObjCDeclQualifier_Byref) printf("Byref" ",");
      PRINT_OBJC_QUAL(Oneway)if (QT & CXObjCDeclQualifier_Oneway) printf("Oneway" ",");
      printf("]");
    }
  }
}
1116}

1118static const char* GetCursorSource(CXCursor Cursor) {
CXSourceLocation Loc = clang_getCursorLocation(Cursor);
CXString source;
CXFile file;
clang_getExpansionLocation(Loc, &file, 0, 0, 0);
source = clang_getFileName(file);
if (!clang_getCString(source)) {
  clang_disposeString(source);
  return "<invalid loc>";
}
else {
  const char *b = basename(clang_getCString(source));
  clang_disposeString(source);
  return b;
}
1133}

1135static CXString createCXString(const char *CS) {
CXString Str;
Str.data = (const void *) CS;
Str.private_flags = 0;
return Str;
1140}

1142/******************************************************************************/
1143/* Callbacks.                                                                 */
1144/******************************************************************************/

1146typedef void (*PostVisitTU)(CXTranslationUnit);

1148void PrintDiagnostic(CXDiagnostic Diagnostic) {
FILE *out = stderrstderr;
CXFile file;
CXString Msg;
unsigned display_opts = CXDiagnostic_DisplaySourceLocation
  | CXDiagnostic_DisplayColumn | CXDiagnostic_DisplaySourceRanges
  | CXDiagnostic_DisplayOption;
unsigned i, num_fixits;

if (clang_getDiagnosticSeverity(Diagnostic) == CXDiagnostic_Ignored)
  return;

Msg = clang_formatDiagnostic(Diagnostic, display_opts);
fprintf(stderrstderr, "%s\n", clang_getCString(Msg));
clang_disposeString(Msg);

clang_getSpellingLocation(clang_getDiagnosticLocation(Diagnostic),
                          &file, 0, 0, 0);
if (!file)
  return;

num_fixits = clang_getDiagnosticNumFixIts(Diagnostic);
fprintf(stderrstderr, "Number FIX-ITs = %d\n", num_fixits);
for (i = 0; i != num_fixits; ++i) {
  CXSourceRange range;
  CXString insertion_text = clang_getDiagnosticFixIt(Diagnostic, i, &range);
  CXSourceLocation start = clang_getRangeStart(range);
  CXSourceLocation end = clang_getRangeEnd(range);
  unsigned start_line, start_column, end_line, end_column;
  CXFile start_file, end_file;
  clang_getSpellingLocation(start, &start_file, &start_line,
                            &start_column, 0);
  clang_getSpellingLocation(end, &end_file, &end_line, &end_column, 0);
  if (clang_equalLocations(start, end)) {
    /* Insertion. */
    if (start_file == file)
      fprintf(out, "FIX-IT: Insert \"%s\" at %d:%d\n",
              clang_getCString(insertion_text), start_line, start_column);
  } else if (strcmp(clang_getCString(insertion_text), "") == 0) {
    /* Removal. */
    if (start_file == file && end_file == file) {
      fprintf(out, "FIX-IT: Remove ");
      PrintExtent(out, start_line, start_column, end_line, end_column);
      fprintf(out, "\n");
    }
  } else {
    /* Replacement. */
    if (start_file == end_file) {
      fprintf(out, "FIX-IT: Replace ");
      PrintExtent(out, start_line, start_column, end_line, end_column);
      fprintf(out, " with \"%s\"\n", clang_getCString(insertion_text));
    }
  }
  clang_disposeString(insertion_text);
}
1203}

1205void PrintDiagnosticSet(CXDiagnosticSet Set) {
int i = 0, n = clang_getNumDiagnosticsInSet(Set);
for ( ; i != n ; ++i) {
  CXDiagnostic Diag = clang_getDiagnosticInSet(Set, i);
  CXDiagnosticSet ChildDiags = clang_getChildDiagnostics(Diag);
  PrintDiagnostic(Diag);
  if (ChildDiags)
    PrintDiagnosticSet(ChildDiags);
}  
1214}

1216void PrintDiagnostics(CXTranslationUnit TU) {
CXDiagnosticSet TUSet = clang_getDiagnosticSetFromTU(TU);
PrintDiagnosticSet(TUSet);
clang_disposeDiagnosticSet(TUSet);
1220}

1222void PrintMemoryUsage(CXTranslationUnit TU) {
unsigned long total = 0;
unsigned i = 0;
CXTUResourceUsage usage = clang_getCXTUResourceUsage(TU);
fprintf(stderrstderr, "Memory usage:\n");
for (i = 0 ; i != usage.numEntries; ++i) {
  const char *name = clang_getTUResourceUsageName(usage.entries[i].kind);
  unsigned long amount = usage.entries[i].amount;
  total += amount;
  fprintf(stderrstderr, "  %s : %ld bytes (%f MBytes)\n", name, amount,
          ((double) amount)/(1024*1024));
}
fprintf(stderrstderr, "  TOTAL = %ld bytes (%f MBytes)\n", total,
        ((double) total)/(1024*1024));
clang_disposeCXTUResourceUsage(usage);  
1237}

1239/******************************************************************************/
1240/* Logic for testing traversal.                                               */
1241/******************************************************************************/

1243static void PrintCursorExtent(CXCursor C) {
CXSourceRange extent = clang_getCursorExtent(C);
PrintRange(extent, "Extent");
1246}

1248/* Data used by the visitors. */
1249typedef struct {
CXTranslationUnit TU;
enum CXCursorKind *Filter;
const char *CommentSchemaFile;
1253} VisitorData;


1256enum CXChildVisitResult FilteredPrintingVisitor(CXCursor Cursor,
                                              CXCursor Parent,
                                              CXClientData ClientData) {
VisitorData *Data = (VisitorData *)ClientData;
if (!Data->Filter || (Cursor.kind == *(enum CXCursorKind *)Data->Filter)) {
  CXSourceLocation Loc = clang_getCursorLocation(Cursor);
  unsigned line, column;
  clang_getSpellingLocation(Loc, 0, &line, &column, 0);
  printf("// %s: %s:%d:%d: ", FileCheckPrefix,
         GetCursorSource(Cursor), line, column);
  PrintCursor(Cursor, Data->CommentSchemaFile);
  PrintCursorExtent(Cursor);
  if (clang_isDeclaration(Cursor.kind)) {
    enum CX_CXXAccessSpecifier access = clang_getCXXAccessSpecifier(Cursor);
    const char *accessStr = 0;

    switch (access) {
      case CX_CXXInvalidAccessSpecifier: break;
      case CX_CXXPublic:
        accessStr = "public"; break;
      case CX_CXXProtected:
        accessStr = "protected"; break;
      case CX_CXXPrivate:
        accessStr = "private"; break;
    }

    if (accessStr)
      printf(" [access=%s]", accessStr);
  }
  printf("\n");
  return CXChildVisit_Recurse;
}

return CXChildVisit_Continue;
1290}

1292static enum CXChildVisitResult FunctionScanVisitor(CXCursor Cursor,
                                                 CXCursor Parent,
                                                 CXClientData ClientData) {
const char *startBuf, *endBuf;
unsigned startLine, startColumn, endLine, endColumn, curLine, curColumn;
CXCursor Ref;
VisitorData *Data = (VisitorData *)ClientData;

if (Cursor.kind != CXCursor_FunctionDecl ||
    !clang_isCursorDefinition(Cursor))
  return CXChildVisit_Continue;

clang_getDefinitionSpellingAndExtent(Cursor, &startBuf, &endBuf,
                                     &startLine, &startColumn,
                                     &endLine, &endColumn);
/* Probe the entire body, looking for both decls and refs. */
curLine = startLine;
curColumn = startColumn;

while (startBuf < endBuf) {
  CXSourceLocation Loc;
  CXFile file;
  CXString source;

  if (*startBuf == '\n') {
    startBuf++;
    curLine++;
    curColumn = 1;
  } else if (*startBuf != '\t')
    curColumn++;

  Loc = clang_getCursorLocation(Cursor);
  clang_getSpellingLocation(Loc, &file, 0, 0, 0);

  source = clang_getFileName(file);
  if (clang_getCString(source)) {
    CXSourceLocation RefLoc
      = clang_getLocation(Data->TU, file, curLine, curColumn);
    Ref = clang_getCursor(Data->TU, RefLoc);
    if (Ref.kind == CXCursor_NoDeclFound) {
      /* Nothing found here; that's fine. */
    } else if (Ref.kind != CXCursor_FunctionDecl) {
      printf("// %s: %s:%d:%d: ", FileCheckPrefix, GetCursorSource(Ref),
             curLine, curColumn);
      PrintCursor(Ref, Data->CommentSchemaFile);
      printf("\n");
    }
  }
  clang_disposeString(source);
  startBuf++;
}

return CXChildVisit_Continue;
1345}

1347/******************************************************************************/
1348/* USR testing.                                                               */
1349/******************************************************************************/

1351enum CXChildVisitResult USRVisitor(CXCursor C, CXCursor parent,
                                 CXClientData ClientData) {
VisitorData *Data = (VisitorData *)ClientData;
if (!Data->Filter || (C.kind == *(enum CXCursorKind *)Data->Filter)) {
  CXString USR = clang_getCursorUSR(C);
  const char *cstr = clang_getCString(USR);
  if (!cstr || cstr[0] == '\0') {
    clang_disposeString(USR);
    return CXChildVisit_Recurse;
  }
  printf("// %s: %s %s", FileCheckPrefix, GetCursorSource(C), cstr);

  PrintCursorExtent(C);
  printf("\n");
  clang_disposeString(USR);

  return CXChildVisit_Recurse;
}

return CXChildVisit_Continue;
1371}

1373/******************************************************************************/
1374/* Inclusion stack testing.                                                   */
1375/******************************************************************************/

1377void InclusionVisitor(CXFile includedFile, CXSourceLocation *includeStack,
                    unsigned includeStackLen, CXClientData data) {

unsigned i;
CXString fname;

fname = clang_getFileName(includedFile);
printf("file: %s\nincluded by:\n", clang_getCString(fname));
clang_disposeString(fname);

for (i = 0; i < includeStackLen; ++i) {
  CXFile includingFile;
  unsigned line, column;
  clang_getSpellingLocation(includeStack[i], &includingFile, &line,
                            &column, 0);
  fname = clang_getFileName(includingFile);
  printf("  %s:%d:%d\n", clang_getCString(fname), line, column);
  clang_disposeString(fname);
}
printf("\n");
1397}

1399void PrintInclusionStack(CXTranslationUnit TU) {
clang_getInclusions(TU, InclusionVisitor, NULL((void*)0));
1401}

1403/******************************************************************************/
1404/* Linkage testing.                                                           */
1405/******************************************************************************/

1407static enum CXChildVisitResult PrintLinkage(CXCursor cursor, CXCursor p,
                                          CXClientData d) {
const char *linkage = 0;

if (clang_isInvalid(clang_getCursorKind(cursor)))
  return CXChildVisit_Recurse;

switch (clang_getCursorLinkage(cursor)) {
  case CXLinkage_Invalid: break;
  case CXLinkage_NoLinkage: linkage = "NoLinkage"; break;
  case CXLinkage_Internal: linkage = "Internal"; break;
  case CXLinkage_UniqueExternal: linkage = "UniqueExternal"; break;
  case CXLinkage_External: linkage = "External"; break;
}

if (linkage) {
  PrintCursor(cursor, NULL((void*)0));
  printf("linkage=%s\n", linkage);
}

return CXChildVisit_Recurse;
1428}

1430/******************************************************************************/
1431/* Visibility testing.                                                        */
1432/******************************************************************************/

1434static enum CXChildVisitResult PrintVisibility(CXCursor cursor, CXCursor p,
                                             CXClientData d) {
const char *visibility = 0;

if (clang_isInvalid(clang_getCursorKind(cursor)))
  return CXChildVisit_Recurse;

switch (clang_getCursorVisibility(cursor)) {
  case CXVisibility_Invalid: break;
  case CXVisibility_Hidden: visibility = "Hidden"; break;
  case CXVisibility_Protected: visibility = "Protected"; break;
  case CXVisibility_Default: visibility = "Default"; break;
}

if (visibility) {
  PrintCursor(cursor, NULL((void*)0));
  printf("visibility=%s\n", visibility);
}

return CXChildVisit_Recurse;
1454}

1456/******************************************************************************/
1457/* Typekind testing.                                                          */
1458/******************************************************************************/

1460static void PrintTypeAndTypeKind(CXType T, const char *Format) {
CXString TypeSpelling, TypeKindSpelling;

TypeSpelling = clang_getTypeSpelling(T);
TypeKindSpelling = clang_getTypeKindSpelling(T.kind);
printf(Format,
       clang_getCString(TypeSpelling),
       clang_getCString(TypeKindSpelling));
clang_disposeString(TypeSpelling);
clang_disposeString(TypeKindSpelling);
1470}

1472static enum CXVisitorResult FieldVisitor(CXCursor C,
                                       CXClientData client_data) {
  (*(int *) client_data)+=1;
  return CXVisit_Continue;
1476}

1478static void PrintTypeTemplateArgs(CXType T, const char *Format) {
int NumTArgs = clang_Type_getNumTemplateArguments(T);
if (NumTArgs != -1 && NumTArgs != 0) {
  int i;
  CXType TArg;
  printf(Format, NumTArgs);
  for (i = 0; i < NumTArgs; ++i) {
    TArg = clang_Type_getTemplateArgumentAsType(T, i);
    if (TArg.kind != CXType_Invalid) {
      PrintTypeAndTypeKind(TArg, " [type=%s] [typekind=%s]");
    }
  }
  /* Ensure that the returned type is invalid when indexing off-by-one. */
  TArg = clang_Type_getTemplateArgumentAsType(T, i);
  assert(TArg.kind == CXType_Invalid)((void) sizeof ((TArg.kind == CXType_Invalid) ? 1 : 0), __extension__
 ({ if (TArg.kind == CXType_Invalid) ; else __assert_fail ("TArg.kind == CXType_Invalid"
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 1492, __extension__ __PRETTY_FUNCTION__); }));
  printf("]");
}
1495}

1497static enum CXChildVisitResult PrintType(CXCursor cursor, CXCursor p,
                                       CXClientData d) {
if (!clang_isInvalid(clang_getCursorKind(cursor))) {
  CXType T = clang_getCursorType(cursor);
  enum CXRefQualifierKind RQ = clang_Type_getCXXRefQualifier(T);
  PrintCursor(cursor, NULL((void*)0));
  PrintTypeAndTypeKind(T, " [type=%s] [typekind=%s]");
  if (clang_isConstQualifiedType(T))
    printf(" const");
  if (clang_isVolatileQualifiedType(T))
    printf(" volatile");
  if (clang_isRestrictQualifiedType(T))
    printf(" restrict");
  if (RQ == CXRefQualifier_LValue)
    printf(" lvalue-ref-qualifier");
  if (RQ == CXRefQualifier_RValue)
    printf(" rvalue-ref-qualifier");
  /* Print the template argument types if they exist. */
  PrintTypeTemplateArgs(T, " [templateargs/%d=");
  /* Print the canonical type if it is different. */
  {
    CXType CT = clang_getCanonicalType(T);
    if (!clang_equalTypes(T, CT)) {
      PrintTypeAndTypeKind(CT, " [canonicaltype=%s] [canonicaltypekind=%s]");
      PrintTypeTemplateArgs(CT, " [canonicaltemplateargs/%d=");
    }
  }
  /* Print the return type if it exists. */
  {
    CXType RT = clang_getCursorResultType(cursor);
    if (RT.kind != CXType_Invalid) {
      PrintTypeAndTypeKind(RT, " [resulttype=%s] [resulttypekind=%s]");
    }
  }
  /* Print the argument types if they exist. */
  {
    int NumArgs = clang_Cursor_getNumArguments(cursor);
    if (NumArgs != -1 && NumArgs != 0) {
      int i;
      printf(" [args=");
      for (i = 0; i < NumArgs; ++i) {
        CXType T = clang_getCursorType(clang_Cursor_getArgument(cursor, i));
        if (T.kind != CXType_Invalid) {
          PrintTypeAndTypeKind(T, " [%s] [%s]");
        }
      }
      printf("]");
    }
  }
  /* Print if this is a non-POD type. */
  printf(" [isPOD=%d]", clang_isPODType(T));
  /* Print the pointee type. */
  {
    CXType PT = clang_getPointeeType(T);
    if (PT.kind != CXType_Invalid) {
      PrintTypeAndTypeKind(PT, " [pointeetype=%s] [pointeekind=%s]");
    }
  }
  /* Print the number of fields if they exist. */
  {
    int numFields = 0;
    if (clang_Type_visitFields(T, FieldVisitor, &numFields)){
      if (numFields != 0) {
        printf(" [nbFields=%d]", numFields);
      }
      /* Print if it is an anonymous record. */
      {
        unsigned isAnon = clang_Cursor_isAnonymous(cursor);
        if (isAnon != 0) {
          printf(" [isAnon=%d]", isAnon);
        }
      }
    }
  }

  printf("\n");
}
return CXChildVisit_Recurse;
1575}

1577static enum CXChildVisitResult PrintTypeSize(CXCursor cursor, CXCursor p,
                                           CXClientData d) {
CXType T;
enum CXCursorKind K = clang_getCursorKind(cursor);
if (clang_isInvalid(K))
  return CXChildVisit_Recurse;
T = clang_getCursorType(cursor);
PrintCursor(cursor, NULL((void*)0));
PrintTypeAndTypeKind(T, " [type=%s] [typekind=%s]");
/* Print the type sizeof if applicable. */
{
  long long Size = clang_Type_getSizeOf(T);
  if (Size >= 0 || Size < -1 ) {
    printf(" [sizeof=%lld]", Size);
  }
}
/* Print the type alignof if applicable. */
{
  long long Align = clang_Type_getAlignOf(T);
  if (Align >= 0 || Align < -1) {
    printf(" [alignof=%lld]", Align);
  }
}
/* Print the record field offset if applicable. */
{
  CXString FieldSpelling = clang_getCursorSpelling(cursor);
  const char *FieldName = clang_getCString(FieldSpelling);
  /* recurse to get the first parent record that is not anonymous. */
  unsigned RecordIsAnonymous = 0;
  if (clang_getCursorKind(cursor) == CXCursor_FieldDecl) {
    CXCursor Record;
    CXCursor Parent = p;
    do {
      Record = Parent;
      Parent = clang_getCursorSemanticParent(Record);
      RecordIsAnonymous = clang_Cursor_isAnonymous(Record);
      /* Recurse as long as the parent is a CXType_Record and the Record
         is anonymous */
    } while ( clang_getCursorType(Parent).kind == CXType_Record &&
              RecordIsAnonymous > 0);
    {
      long long Offset = clang_Type_getOffsetOf(clang_getCursorType(Record),
                                                FieldName);
      long long Offset2 = clang_Cursor_getOffsetOfField(cursor);
      if (Offset == Offset2){
          printf(" [offsetof=%lld]", Offset);
      } else {
          /* Offsets will be different in anonymous records. */
          printf(" [offsetof=%lld/%lld]", Offset, Offset2);
      }
    }
  }
  clang_disposeString(FieldSpelling);
}
/* Print if its a bitfield */
{
  int IsBitfield = clang_Cursor_isBitField(cursor);
  if (IsBitfield)
    printf(" [BitFieldSize=%d]", clang_getFieldDeclBitWidth(cursor));
}
printf("\n");
return CXChildVisit_Recurse;
1639}

1641/******************************************************************************/
1642/* Mangling testing.                                                          */
1643/******************************************************************************/

1645static enum CXChildVisitResult PrintMangledName(CXCursor cursor, CXCursor p,
                                              CXClientData d) {
CXString MangledName;
if (clang_isUnexposed(clang_getCursorKind(cursor)))
  return CXChildVisit_Recurse;
PrintCursor(cursor, NULL((void*)0));
MangledName = clang_Cursor_getMangling(cursor);
printf(" [mangled=%s]\n", clang_getCString(MangledName));
clang_disposeString(MangledName);
return CXChildVisit_Continue;
1655}

1657static enum CXChildVisitResult PrintManglings(CXCursor cursor, CXCursor p,
                                            CXClientData d) {
unsigned I, E;
CXStringSet *Manglings = NULL((void*)0);
if (clang_isUnexposed(clang_getCursorKind(cursor)))
  return CXChildVisit_Recurse;
if (!clang_isDeclaration(clang_getCursorKind(cursor)))
  return CXChildVisit_Recurse;
if (clang_getCursorKind(cursor) == CXCursor_ParmDecl)
  return CXChildVisit_Continue;
PrintCursor(cursor, NULL((void*)0));
Manglings = clang_Cursor_getCXXManglings(cursor);
if (Manglings) {
  for (I = 0, E = Manglings->Count; I < E; ++I)
    printf(" [mangled=%s]", clang_getCString(Manglings->Strings[I]));
  clang_disposeStringSet(Manglings);
  printf("\n");
}
Manglings = clang_Cursor_getObjCManglings(cursor);
if (Manglings) {
  for (I = 0, E = Manglings->Count; I < E; ++I)
    printf(" [mangled=%s]", clang_getCString(Manglings->Strings[I]));
  clang_disposeStringSet(Manglings);
  printf("\n");
}
return CXChildVisit_Recurse;
1683}

1685/******************************************************************************/
1686/* Bitwidth testing.                                                          */
1687/******************************************************************************/

1689static enum CXChildVisitResult PrintBitWidth(CXCursor cursor, CXCursor p,
                                           CXClientData d) {
int Bitwidth;
if (clang_getCursorKind(cursor) != CXCursor_FieldDecl)
  return CXChildVisit_Recurse;

Bitwidth = clang_getFieldDeclBitWidth(cursor);
if (Bitwidth >= 0) {
  PrintCursor(cursor, NULL((void*)0));
  printf(" bitwidth=%d\n", Bitwidth);
}

return CXChildVisit_Recurse;
1702}

1704/******************************************************************************/
1705/* Type declaration testing                                                   */
1706/******************************************************************************/

1708static enum CXChildVisitResult PrintTypeDeclaration(CXCursor cursor, CXCursor p,
                                           CXClientData d) {
CXCursor typeDeclaration = clang_getTypeDeclaration(clang_getCursorType(cursor));

if (clang_isDeclaration(typeDeclaration.kind)) {
  PrintCursor(cursor, NULL((void*)0));
  PrintTypeAndTypeKind(clang_getCursorType(typeDeclaration), " [typedeclaration=%s] [typekind=%s]\n");
}

return CXChildVisit_Recurse;
1718}

1720/******************************************************************************/
1721/* Target information testing.                                                */
1722/******************************************************************************/

1724static int print_target_info(int argc, const char **argv) {
CXIndex Idx;
CXTranslationUnit TU;
CXTargetInfo TargetInfo;
CXString Triple;
const char *FileName;
enum CXErrorCode Err;
int PointerWidth;

if (argc == 0) {
  fprintf(stderrstderr, "No filename specified\n");
  return 1;
}

FileName = argv[1];

Idx = clang_createIndex(0, 1);
Err = clang_parseTranslationUnit2(Idx, FileName, argv, argc, NULL((void*)0), 0,
                                  getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "Couldn't parse translation unit!\n");
  describeLibclangFailure(Err);
  clang_disposeIndex(Idx);
  return 1;
}

TargetInfo = clang_getTranslationUnitTargetInfo(TU);

Triple = clang_TargetInfo_getTriple(TargetInfo);
printf("TargetTriple: %s\n", clang_getCString(Triple));
clang_disposeString(Triple);

PointerWidth = clang_TargetInfo_getPointerWidth(TargetInfo);
printf("PointerWidth: %d\n", PointerWidth);

clang_TargetInfo_dispose(TargetInfo);
clang_disposeTranslationUnit(TU);
clang_disposeIndex(Idx);
return 0;
1763}

1765/******************************************************************************/
1766/* Loading ASTs/source.                                                       */
1767/******************************************************************************/

1769static int perform_test_load(CXIndex Idx, CXTranslationUnit TU,
                           const char *filter, const char *prefix,
                           CXCursorVisitor Visitor,
                           PostVisitTU PV,
                           const char *CommentSchemaFile) {

if (prefix)
  FileCheckPrefix = prefix;

if (Visitor) {
  enum CXCursorKind K = CXCursor_NotImplemented;
  enum CXCursorKind *ck = &K;
  VisitorData Data;

  /* Perform some simple filtering. */
  if (!strcmp(filter, "all") || !strcmp(filter, "local")) ck = NULL((void*)0);
  else if (!strcmp(filter, "all-display") || 
           !strcmp(filter, "local-display")) {
    ck = NULL((void*)0);
    wanted_display_type = DisplayType_DisplayName;
  }
  else if (!strcmp(filter, "all-pretty") ||
           !strcmp(filter, "local-pretty")) {
    ck = NULL((void*)0);
    wanted_display_type = DisplayType_Pretty;
  }
  else if (!strcmp(filter, "none")) K = (enum CXCursorKind) ~0;
  else if (!strcmp(filter, "category")) K = CXCursor_ObjCCategoryDecl;
  else if (!strcmp(filter, "interface")) K = CXCursor_ObjCInterfaceDecl;
  else if (!strcmp(filter, "protocol")) K = CXCursor_ObjCProtocolDecl;
  else if (!strcmp(filter, "function")) K = CXCursor_FunctionDecl;
  else if (!strcmp(filter, "typedef")) K = CXCursor_TypedefDecl;
  else if (!strcmp(filter, "scan-function")) Visitor = FunctionScanVisitor;
  else {
    fprintf(stderrstderr, "Unknown filter for -test-load-tu: %s\n", filter);
    return 1;
  }

  Data.TU = TU;
  Data.Filter = ck;
  Data.CommentSchemaFile = CommentSchemaFile;
  clang_visitChildren(clang_getTranslationUnitCursor(TU), Visitor, &Data);
}

if (PV)
  PV(TU);

PrintDiagnostics(TU);
if (checkForErrors(TU) != 0) {
  clang_disposeTranslationUnit(TU);
  return -1;
}

clang_disposeTranslationUnit(TU);
return 0;
1824}

1826int perform_test_load_tu(const char *file, const char *filter,
                       const char *prefix, CXCursorVisitor Visitor,
                       PostVisitTU PV) {
CXIndex Idx;
CXTranslationUnit TU;
int result;
Idx = clang_createIndex(/* excludeDeclsFromPCH */
                        !strcmp(filter, "local") ? 1 : 0,
                        /* displayDiagnostics=*/1);

if (!CreateTranslationUnit(Idx, file, &TU)) {
  clang_disposeIndex(Idx);
  return 1;
}

result = perform_test_load(Idx, TU, filter, prefix, Visitor, PV, NULL((void*)0));
clang_disposeIndex(Idx);
return result;
1844}

1846int perform_test_load_source(int argc, const char **argv,
                           const char *filter, CXCursorVisitor Visitor,
                           PostVisitTU PV) {
CXIndex Idx;
CXTranslationUnit TU;
const char *CommentSchemaFile;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
enum CXErrorCode Err;
int result;
unsigned Repeats = 0;
unsigned I;
const char *InvocationPath;

Idx = clang_createIndex(/* excludeDeclsFromPCH */
                        (!strcmp(filter, "local") ||
                         !strcmp(filter, "local-display") ||
                         !strcmp(filter, "local-pretty"))
                            ? 1
                            : 0,
                        /* displayDiagnostics=*/1);
InvocationPath = getenv("CINDEXTEST_INVOCATION_EMISSION_PATH");
if (InvocationPath)
  clang_CXIndex_setInvocationEmissionPathOption(Idx, InvocationPath);

if ((CommentSchemaFile = parse_comments_schema(argc, argv))) {
  argc--;
  argv++;
}

if (parse_remapped_files(argc, argv, 0, &unsaved_files, &num_unsaved_files)) {
  clang_disposeIndex(Idx);
  return -1;
}

if (getenv("CINDEXTEST_EDITING"))
  Repeats = 5;

Err = clang_parseTranslationUnit2(Idx, 0,
                                  argv + num_unsaved_files,
                                  argc - num_unsaved_files,
                                  unsaved_files, num_unsaved_files,
                                  getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "Unable to load translation unit!\n");
  describeLibclangFailure(Err);
  free_remapped_files(unsaved_files, num_unsaved_files);
  clang_disposeIndex(Idx);
  return 1;
}

for (I = 0; I != Repeats; ++I) {
  if (checkForErrors(TU) != 0)
    return -1;

  if (Repeats > 1) {
    clang_suspendTranslationUnit(TU);

    Err = clang_reparseTranslationUnit(TU, num_unsaved_files, unsaved_files,
                                       clang_defaultReparseOptions(TU));
    if (Err != CXError_Success) {
      describeLibclangFailure(Err);
      free_remapped_files(unsaved_files, num_unsaved_files);
      clang_disposeIndex(Idx);
      return 1;
    }
  }
}

result = perform_test_load(Idx, TU, filter, NULL((void*)0), Visitor, PV,
                           CommentSchemaFile);
free_remapped_files(unsaved_files, num_unsaved_files);
clang_disposeIndex(Idx);
return result;
1920}

1922int perform_test_reparse_source(int argc, const char **argv, int trials,
                              const char *filter, CXCursorVisitor Visitor,
                              PostVisitTU PV) {
CXIndex Idx;
CXTranslationUnit TU;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
int compiler_arg_idx = 0;
enum CXErrorCode Err;
int result, i;
int trial;
int remap_after_trial = 0;
char *endptr = 0;

Idx = clang_createIndex(/* excludeDeclsFromPCH */
                        !strcmp(filter, "local") ? 1 : 0,
                        /* displayDiagnostics=*/1);

if (parse_remapped_files(argc, argv, 0, &unsaved_files, &num_unsaved_files)) {
  clang_disposeIndex(Idx);
  return -1;
}

for (i = 0; i < argc; ++i) {
  if (strcmp(argv[i], "--") == 0)
    break;
}
if (i < argc)
  compiler_arg_idx = i+1;
if (num_unsaved_files > compiler_arg_idx)
  compiler_arg_idx = num_unsaved_files;

/* Load the initial translation unit -- we do this without honoring remapped
 * files, so that we have a way to test results after changing the source. */
Err = clang_parseTranslationUnit2(Idx, 0,
                                  argv + compiler_arg_idx,
                                  argc - compiler_arg_idx,
                                  0, 0, getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "Unable to load translation unit!\n");
  describeLibclangFailure(Err);
  free_remapped_files(unsaved_files, num_unsaved_files);
  clang_disposeIndex(Idx);
  return 1;
}

if (checkForErrors(TU) != 0)
  return -1;

if (getenv("CINDEXTEST_REMAP_AFTER_TRIAL")) {
  remap_after_trial =
      strtol(getenv("CINDEXTEST_REMAP_AFTER_TRIAL"), &endptr, 10);
}

for (trial = 0; trial < trials; ++trial) {
  free_remapped_files(unsaved_files, num_unsaved_files);
  if (parse_remapped_files_with_try(trial, argc, argv, 0,
                                    &unsaved_files, &num_unsaved_files)) {
    clang_disposeTranslationUnit(TU);
    clang_disposeIndex(Idx);
    return -1;
  }

  Err = clang_reparseTranslationUnit(
      TU,
      trial >= remap_after_trial ? num_unsaved_files : 0,
      trial >= remap_after_trial ? unsaved_files : 0,
      clang_defaultReparseOptions(TU));
  if (Err != CXError_Success) {
    fprintf(stderrstderr, "Unable to reparse translation unit!\n");
    describeLibclangFailure(Err);
    clang_disposeTranslationUnit(TU);
    free_remapped_files(unsaved_files, num_unsaved_files);
    clang_disposeIndex(Idx);
    return -1;      
  }

  if (checkForErrors(TU) != 0)
    return -1;
}

result = perform_test_load(Idx, TU, filter, NULL((void*)0), Visitor, PV, NULL((void*)0));

free_remapped_files(unsaved_files, num_unsaved_files);
clang_disposeIndex(Idx);
return result;
2008}

2010static int perform_single_file_parse(const char *filename) {
CXIndex Idx;
CXTranslationUnit TU;
enum CXErrorCode Err;
int result;

Idx = clang_createIndex(/* excludeDeclsFromPCH */1,
                        /* displayDiagnostics=*/1);

Err = clang_parseTranslationUnit2(Idx, filename,
                                  /*command_line_args=*/NULL((void*)0),
                                  /*num_command_line_args=*/0,
                                  /*unsaved_files=*/NULL((void*)0),
                                  /*num_unsaved_files=*/0,
                                  CXTranslationUnit_SingleFileParse, &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "Unable to load translation unit!\n");
  describeLibclangFailure(Err);
  clang_disposeIndex(Idx);
  return 1;
}

result = perform_test_load(Idx, TU, /*filter=*/"all", /*prefix=*/NULL((void*)0), FilteredPrintingVisitor, /*PostVisit=*/NULL((void*)0),
                           /*CommentSchemaFile=*/NULL((void*)0));
clang_disposeIndex(Idx);
return result;
2036}

2038/******************************************************************************/
2039/* Logic for testing clang_getCursor().                                       */
2040/******************************************************************************/

2042static void print_cursor_file_scan(CXTranslationUnit TU, CXCursor cursor,
                                 unsigned start_line, unsigned start_col,
                                 unsigned end_line, unsigned end_col,
                                 const char *prefix) {
printf("// %s: ", FileCheckPrefix);
if (prefix)
  printf("-%s", prefix);
PrintExtent(stdoutstdout, start_line, start_col, end_line, end_col);
printf(" ");
PrintCursor(cursor, NULL((void*)0));
printf("\n");
2053}

2055static int perform_file_scan(const char *ast_file, const char *source_file,
                           const char *prefix) {
CXIndex Idx;
CXTranslationUnit TU;
FILE *fp;
CXCursor prevCursor = clang_getNullCursor();
CXFile file;
unsigned line = 1, col = 1;
unsigned start_line = 1, start_col = 1;

if (!(Idx = clang_createIndex(/* excludeDeclsFromPCH */ 1,
                              /* displayDiagnostics=*/1))) {
  fprintf(stderrstderr, "Could not create Index\n");
  return 1;
}

if (!CreateTranslationUnit(Idx, ast_file, &TU))
  return 1;

if ((fp = fopen(source_file, "r")) == NULL((void*)0)) {
  fprintf(stderrstderr, "Could not open '%s'\n", source_file);
  clang_disposeTranslationUnit(TU);
  return 1;
}

file = clang_getFile(TU, source_file);
for (;;) {
  CXCursor cursor;
  int c = fgetc(fp);

  if (c == '\n') {
    ++line;
    col = 1;
  } else
    ++col;

  /* Check the cursor at this position, and dump the previous one if we have
   * found something new.
   */
  cursor = clang_getCursor(TU, clang_getLocation(TU, file, line, col));
  if ((c == EOF(-1) || !clang_equalCursors(cursor, prevCursor)) &&
      prevCursor.kind != CXCursor_InvalidFile) {
    print_cursor_file_scan(TU, prevCursor, start_line, start_col,
                           line, col, prefix);
    start_line = line;
    start_col = col;
  }
  if (c == EOF(-1))
    break;

  prevCursor = cursor;
}

fclose(fp);
clang_disposeTranslationUnit(TU);
clang_disposeIndex(Idx);
return 0;
2112}

2114/******************************************************************************/
2115/* Logic for testing clang code completion.                                   */
2116/******************************************************************************/

2118/* Parse file:line:column from the input string. Returns 0 on success, non-zero
 on failure. If successful, the pointer *filename will contain newly-allocated
 memory (that will be owned by the caller) to store the file name. */
2121int parse_file_line_column(const char *input, char **filename, unsigned *line,
                         unsigned *column, unsigned *second_line,
                         unsigned *second_column) {
/* Find the second colon. */
const char *last_colon = strrchr(input, ':');
unsigned values[4], i;
unsigned num_values = (second_line && second_column)? 4 : 2;

char *endptr = 0;
if (!last_colon || last_colon == input) {
  if (num_values == 4)
    fprintf(stderrstderr, "could not parse filename:line:column:line:column in "
            "'%s'\n", input);
  else
    fprintf(stderrstderr, "could not parse filename:line:column in '%s'\n", input);
  return 1;
}

for (i = 0; i != num_values; ++i) {
  const char *prev_colon;

  /* Parse the next line or column. */
  values[num_values - i - 1] = strtol(last_colon + 1, &endptr, 10);
  if (*endptr != 0 && *endptr != ':') {
    fprintf(stderrstderr, "could not parse %s in '%s'\n",
            (i % 2 ? "column" : "line"), input);
    return 1;
  }

  if (i + 1 == num_values)
    break;

  /* Find the previous colon. */
  prev_colon = last_colon - 1;
  while (prev_colon != input && *prev_colon != ':')
    --prev_colon;
  if (prev_colon == input) {
    fprintf(stderrstderr, "could not parse %s in '%s'\n",
            (i % 2 == 0? "column" : "line"), input);
    return 1;
  }

  last_colon = prev_colon;
}

*line = values[0];
*column = values[1];

if (second_line && second_column) {
  *second_line = values[2];
  *second_column = values[3];
}

/* Copy the file name. */
*filename = (char*)malloc(last_colon - input + 1);
assert(*filename)((void) sizeof ((*filename) ? 1 : 0), __extension__ ({ if (*filename
) ; else __assert_fail ("*filename", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2176, __extension__ __PRETTY_FUNCTION__); }));
memcpy(*filename, input, last_colon - input);
(*filename)[last_colon - input] = 0;
return 0;
2180}

2182const char *
2183clang_getCompletionChunkKindSpelling(enum CXCompletionChunkKind Kind) {
switch (Kind) {
case CXCompletionChunk_Optional: return "Optional";
case CXCompletionChunk_TypedText: return "TypedText";
case CXCompletionChunk_Text: return "Text";
case CXCompletionChunk_Placeholder: return "Placeholder";
case CXCompletionChunk_Informative: return "Informative";
case CXCompletionChunk_CurrentParameter: return "CurrentParameter";
case CXCompletionChunk_LeftParen: return "LeftParen";
case CXCompletionChunk_RightParen: return "RightParen";
case CXCompletionChunk_LeftBracket: return "LeftBracket";
case CXCompletionChunk_RightBracket: return "RightBracket";
case CXCompletionChunk_LeftBrace: return "LeftBrace";
case CXCompletionChunk_RightBrace: return "RightBrace";
case CXCompletionChunk_LeftAngle: return "LeftAngle";
case CXCompletionChunk_RightAngle: return "RightAngle";
case CXCompletionChunk_Comma: return "Comma";
case CXCompletionChunk_ResultType: return "ResultType";
case CXCompletionChunk_Colon: return "Colon";
case CXCompletionChunk_SemiColon: return "SemiColon";
case CXCompletionChunk_Equal: return "Equal";
case CXCompletionChunk_HorizontalSpace: return "HorizontalSpace";
case CXCompletionChunk_VerticalSpace: return "VerticalSpace";
}

return "Unknown";
2209}

2211static int checkForErrors(CXTranslationUnit TU) {
unsigned Num, i;
CXDiagnostic Diag;
CXString DiagStr;

if (!getenv("CINDEXTEST_FAILONERROR"))
  return 0;

Num = clang_getNumDiagnostics(TU);
for (i = 0; i != Num; ++i) {
  Diag = clang_getDiagnostic(TU, i);
  if (clang_getDiagnosticSeverity(Diag) >= CXDiagnostic_Error) {
    DiagStr = clang_formatDiagnostic(Diag,
                                     clang_defaultDiagnosticDisplayOptions());
    fprintf(stderrstderr, "%s\n", clang_getCString(DiagStr));
    clang_disposeString(DiagStr);
    clang_disposeDiagnostic(Diag);
    return -1;
  }
  clang_disposeDiagnostic(Diag);
}

return 0;
2234}

2236static void print_completion_string(CXCompletionString completion_string,
                                  FILE *file) {
int I, N;

N = clang_getNumCompletionChunks(completion_string);
for (I = 0; I != N; ++I) {
  CXString text;
  const char *cstr;
  enum CXCompletionChunkKind Kind
    = clang_getCompletionChunkKind(completion_string, I);

  if (Kind == CXCompletionChunk_Optional) {
    fprintf(file, "{Optional ");
    print_completion_string(
              clang_getCompletionChunkCompletionString(completion_string, I),
                            file);
    fprintf(file, "}");
    continue;
  } 

  if (Kind == CXCompletionChunk_VerticalSpace) {
    fprintf(file, "{VerticalSpace  }");
    continue;
  }

  text = clang_getCompletionChunkText(completion_string, I);
  cstr = clang_getCString(text);
  fprintf(file, "{%s %s}",
          clang_getCompletionChunkKindSpelling(Kind),
          cstr ? cstr : "");
  clang_disposeString(text);
}

2269}

2271static void print_completion_result(CXCompletionResult *completion_result,
                                  FILE *file) {
CXString ks = clang_getCursorKindSpelling(completion_result->CursorKind);
unsigned annotationCount;
enum CXCursorKind ParentKind;
CXString ParentName;
CXString BriefComment;
CXString Annotation;
const char *BriefCommentCString;

fprintf(file, "%s:", clang_getCString(ks));
clang_disposeString(ks);

print_completion_string(completion_result->CompletionString, file);
fprintf(file, " (%u)", 
        clang_getCompletionPriority(completion_result->CompletionString));
switch (clang_getCompletionAvailability(completion_result->CompletionString)){
case CXAvailability_Available:
  break;
  
case CXAvailability_Deprecated:
  fprintf(file, " (deprecated)");
  break;
  
case CXAvailability_NotAvailable:
  fprintf(file, " (unavailable)");
  break;

case CXAvailability_NotAccessible:
  fprintf(file, " (inaccessible)");
  break;
}

annotationCount = clang_getCompletionNumAnnotations(
      completion_result->CompletionString);
if (annotationCount) {
  unsigned i;
  fprintf(file, " (");
  for (i = 0; i < annotationCount; ++i) {
    if (i != 0)
      fprintf(file, ", ");
    Annotation =
        clang_getCompletionAnnotation(completion_result->CompletionString, i);
    fprintf(file, "\"%s\"", clang_getCString(Annotation));
    clang_disposeString(Annotation);
  }
  fprintf(file, ")");
}

if (!getenv("CINDEXTEST_NO_COMPLETION_PARENTS")) {
  ParentName = clang_getCompletionParent(completion_result->CompletionString,
                                         &ParentKind);
  if (ParentKind != CXCursor_NotImplemented) {
    CXString KindSpelling = clang_getCursorKindSpelling(ParentKind);
    fprintf(file, " (parent: %s '%s')",
            clang_getCString(KindSpelling),
            clang_getCString(ParentName));
    clang_disposeString(KindSpelling);
  }
  clang_disposeString(ParentName);
}

BriefComment = clang_getCompletionBriefComment(
                                      completion_result->CompletionString);
BriefCommentCString = clang_getCString(BriefComment);
if (BriefCommentCString && *BriefCommentCString != '\0') {
  fprintf(file, "(brief comment: %s)", BriefCommentCString);
}
clang_disposeString(BriefComment);

fprintf(file, "\n");
2342}

2344void print_completion_contexts(unsigned long long contexts, FILE *file) {
fprintf(file, "Completion contexts:\n");
if (contexts == CXCompletionContext_Unknown) {
  fprintf(file, "Unknown\n");
}
if (contexts & CXCompletionContext_AnyType) {
  fprintf(file, "Any type\n");
}
if (contexts & CXCompletionContext_AnyValue) {
  fprintf(file, "Any value\n");
}
if (contexts & CXCompletionContext_ObjCObjectValue) {
  fprintf(file, "Objective-C object value\n");
}
if (contexts & CXCompletionContext_ObjCSelectorValue) {
  fprintf(file, "Objective-C selector value\n");
}
if (contexts & CXCompletionContext_CXXClassTypeValue) {
  fprintf(file, "C++ class type value\n");
}
if (contexts & CXCompletionContext_DotMemberAccess) {
  fprintf(file, "Dot member access\n");
}
if (contexts & CXCompletionContext_ArrowMemberAccess) {
  fprintf(file, "Arrow member access\n");
}
if (contexts & CXCompletionContext_ObjCPropertyAccess) {
  fprintf(file, "Objective-C property access\n");
}
if (contexts & CXCompletionContext_EnumTag) {
  fprintf(file, "Enum tag\n");
}
if (contexts & CXCompletionContext_UnionTag) {
  fprintf(file, "Union tag\n");
}
if (contexts & CXCompletionContext_StructTag) {
  fprintf(file, "Struct tag\n");
}
if (contexts & CXCompletionContext_ClassTag) {
  fprintf(file, "Class name\n");
}
if (contexts & CXCompletionContext_Namespace) {
  fprintf(file, "Namespace or namespace alias\n");
}
if (contexts & CXCompletionContext_NestedNameSpecifier) {
  fprintf(file, "Nested name specifier\n");
}
if (contexts & CXCompletionContext_ObjCInterface) {
  fprintf(file, "Objective-C interface\n");
}
if (contexts & CXCompletionContext_ObjCProtocol) {
  fprintf(file, "Objective-C protocol\n");
}
if (contexts & CXCompletionContext_ObjCCategory) {
  fprintf(file, "Objective-C category\n");
}
if (contexts & CXCompletionContext_ObjCInstanceMessage) {
  fprintf(file, "Objective-C instance method\n");
}
if (contexts & CXCompletionContext_ObjCClassMessage) {
  fprintf(file, "Objective-C class method\n");
}
if (contexts & CXCompletionContext_ObjCSelectorName) {
  fprintf(file, "Objective-C selector name\n");
}
if (contexts & CXCompletionContext_MacroName) {
  fprintf(file, "Macro name\n");
}
if (contexts & CXCompletionContext_NaturalLanguage) {
  fprintf(file, "Natural language\n");
}
2415}

2417int perform_code_completion(int argc, const char **argv, int timing_only) {
const char *input = argv[1];
char *filename = 0;
unsigned line;
unsigned column;
CXIndex CIdx;
int errorCode;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
CXCodeCompleteResults *results = 0;
enum CXErrorCode Err;
CXTranslationUnit TU;
unsigned I, Repeats = 1;
unsigned completionOptions = clang_defaultCodeCompleteOptions();
const char *InvocationPath;

if (getenv("CINDEXTEST_CODE_COMPLETE_PATTERNS"))
9
←
Assuming the condition is false→
10
←
Taking false branch→
  completionOptions |= CXCodeComplete_IncludeCodePatterns;
if (getenv("CINDEXTEST_COMPLETION_BRIEF_COMMENTS"))
11
←
Assuming the condition is false→
12
←
Taking false branch→
  completionOptions |= CXCodeComplete_IncludeBriefComments;
if (getenv("CINDEXTEST_COMPLETION_SKIP_PREAMBLE"))
13
←
Assuming the condition is false→
14
←
Taking false branch→
  completionOptions |= CXCodeComplete_SkipPreamble;

if (timing_only)
15
←
Taking true branch→
  input += strlen("-code-completion-timing=");
else
  input += strlen("-code-completion-at=");

if ((errorCode = parse_file_line_column(input, &filename, &line, &column,
16
←
Taking false branch→
                                        0, 0)))
  return errorCode;

if (parse_remapped_files(argc, argv, 2, &unsaved_files, &num_unsaved_files))
17
←
Calling 'parse_remapped_files'→
34
←
Returned allocated memory via 4th parameter→
35
←
Taking false branch→
  return -1;

CIdx = clang_createIndex(0, 0);
InvocationPath = getenv("CINDEXTEST_INVOCATION_EMISSION_PATH");
if (InvocationPath)
36
←
Assuming 'InvocationPath' is null→
37
←
Taking false branch→
  clang_CXIndex_setInvocationEmissionPathOption(CIdx, InvocationPath);

if (getenv("CINDEXTEST_EDITING"))
38
←
Assuming the condition is false→
39
←
Taking false branch→
  Repeats = 5;

Err = clang_parseTranslationUnit2(CIdx, 0,
                                  argv + num_unsaved_files + 2,
                                  argc - num_unsaved_files - 2,
                                  0, 0, getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
40
←
Assuming 'Err' is not equal to CXError_Success→
41
←
Taking true branch→
  fprintf(stderrstderr, "Unable to load translation unit!\n");
42
←
Potential leak of memory pointed to by 'unsaved_files'
  describeLibclangFailure(Err);
  return 1;
}

Err = clang_reparseTranslationUnit(TU, 0, 0,
                                   clang_defaultReparseOptions(TU));

if (Err != CXError_Success) {
  fprintf(stderrstderr, "Unable to reparse translation unit!\n");
  describeLibclangFailure(Err);
  clang_disposeTranslationUnit(TU);
  return 1;
}

for (I = 0; I != Repeats; ++I) {
  results = clang_codeCompleteAt(TU, filename, line, column,
                                 unsaved_files, num_unsaved_files,
                                 completionOptions);
  if (!results) {
    fprintf(stderrstderr, "Unable to perform code completion!\n");
    return 1;
  }
  if (I != Repeats-1)
    clang_disposeCodeCompleteResults(results);
}

if (results) {
  unsigned i, n = results->NumResults, containerIsIncomplete = 0;
  unsigned long long contexts;
  enum CXCursorKind containerKind;
  CXString objCSelector;
  const char *selectorString;
  if (!timing_only) {      
    /* Sort the code-completion results based on the typed text. */
    clang_sortCodeCompletionResults(results->Results, results->NumResults);

    for (i = 0; i != n; ++i)
      print_completion_result(results->Results + i, stdoutstdout);
  }
  n = clang_codeCompleteGetNumDiagnostics(results);
  for (i = 0; i != n; ++i) {
    CXDiagnostic diag = clang_codeCompleteGetDiagnostic(results, i);
    PrintDiagnostic(diag);
    clang_disposeDiagnostic(diag);
  }
  
  contexts = clang_codeCompleteGetContexts(results);
  print_completion_contexts(contexts, stdoutstdout);
  
  containerKind = clang_codeCompleteGetContainerKind(results,
                                                     &containerIsIncomplete);
  
  if (containerKind != CXCursor_InvalidCode) {
    /* We have found a container */
    CXString containerUSR, containerKindSpelling;
    containerKindSpelling = clang_getCursorKindSpelling(containerKind);
    printf("Container Kind: %s\n", clang_getCString(containerKindSpelling));
    clang_disposeString(containerKindSpelling);
    
    if (containerIsIncomplete) {
      printf("Container is incomplete\n");
    }
    else {
      printf("Container is complete\n");
    }
    
    containerUSR = clang_codeCompleteGetContainerUSR(results);
    printf("Container USR: %s\n", clang_getCString(containerUSR));
    clang_disposeString(containerUSR);
  }
  
  objCSelector = clang_codeCompleteGetObjCSelector(results);
  selectorString = clang_getCString(objCSelector);
  if (selectorString && strlen(selectorString) > 0) {
    printf("Objective-C selector: %s\n", selectorString);
  }
  clang_disposeString(objCSelector);
  
  clang_disposeCodeCompleteResults(results);
}
clang_disposeTranslationUnit(TU);
clang_disposeIndex(CIdx);
free(filename);

free_remapped_files(unsaved_files, num_unsaved_files);

return 0;
2553}

2555typedef struct {
char *filename;
unsigned line;
unsigned column;
2559} CursorSourceLocation;

2561typedef void (*cursor_handler_t)(CXCursor cursor);

2563static int inspect_cursor_at(int argc, const char **argv,
                           const char *locations_flag,
                           cursor_handler_t handler) {
CXIndex CIdx;
int errorCode;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
enum CXErrorCode Err;
CXTranslationUnit TU;
CXCursor Cursor;
CursorSourceLocation *Locations = 0;
unsigned NumLocations = 0, Loc;
unsigned Repeats = 1;
unsigned I;

/* Count the number of locations. */
while (strstr(argv[NumLocations+1], locations_flag) == argv[NumLocations+1])
  ++NumLocations;

/* Parse the locations. */
assert(NumLocations > 0 && "Unable to count locations?")((void) sizeof ((NumLocations > 0 && "Unable to count locations?"
) ? 1 : 0), __extension__ ({ if (NumLocations > 0 &&
 "Unable to count locations?") ; else __assert_fail ("NumLocations > 0 && \"Unable to count locations?\""
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2583, __extension__ __PRETTY_FUNCTION__); }));
Locations = (CursorSourceLocation *)malloc(
                                NumLocations * sizeof(CursorSourceLocation));
assert(Locations)((void) sizeof ((Locations) ? 1 : 0), __extension__ ({ if (Locations
) ; else __assert_fail ("Locations", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2586, __extension__ __PRETTY_FUNCTION__); }));
for (Loc = 0; Loc < NumLocations; ++Loc) {
  const char *input = argv[Loc + 1] + strlen(locations_flag);
  if ((errorCode = parse_file_line_column(input, &Locations[Loc].filename,
                                          &Locations[Loc].line,
                                          &Locations[Loc].column, 0, 0)))
    return errorCode;
}

if (parse_remapped_files(argc, argv, NumLocations + 1, &unsaved_files,
                         &num_unsaved_files))
  return -1;

if (getenv("CINDEXTEST_EDITING"))
  Repeats = 5;

/* Parse the translation unit. When we're testing clang_getCursor() after
   reparsing, don't remap unsaved files until the second parse. */
CIdx = clang_createIndex(1, 1);
Err = clang_parseTranslationUnit2(CIdx, argv[argc - 1],
                                 argv + num_unsaved_files + 1 + NumLocations,
                                 argc - num_unsaved_files - 2 - NumLocations,
                                 unsaved_files,
                                 Repeats > 1? 0 : num_unsaved_files,
                                 getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "unable to parse input\n");
  describeLibclangFailure(Err);
  return -1;
}

if (checkForErrors(TU) != 0)
  return -1;

for (I = 0; I != Repeats; ++I) {
  if (Repeats > 1) {
    Err = clang_reparseTranslationUnit(TU, num_unsaved_files, unsaved_files,
                                       clang_defaultReparseOptions(TU));
    if (Err != CXError_Success) {
      describeLibclangFailure(Err);
      clang_disposeTranslationUnit(TU);
      return 1;
    }
  }

  if (checkForErrors(TU) != 0)
    return -1;
  
  for (Loc = 0; Loc < NumLocations; ++Loc) {
    CXFile file = clang_getFile(TU, Locations[Loc].filename);
    if (!file)
      continue;

    Cursor = clang_getCursor(TU,
                             clang_getLocation(TU, file, Locations[Loc].line,
                                               Locations[Loc].column));

    if (checkForErrors(TU) != 0)
      return -1;

    if (I + 1 == Repeats) {
      handler(Cursor);
      free(Locations[Loc].filename);
    }
  }
}

PrintDiagnostics(TU);
clang_disposeTranslationUnit(TU);
clang_disposeIndex(CIdx);
free(Locations);
free_remapped_files(unsaved_files, num_unsaved_files);
return 0;
2659}

2661static void inspect_print_cursor(CXCursor Cursor) {
CXTranslationUnit TU = clang_Cursor_getTranslationUnit(Cursor);
CXCompletionString completionString = clang_getCursorCompletionString(
                                                                Cursor);
CXSourceLocation CursorLoc = clang_getCursorLocation(Cursor);
CXString Spelling;
const char *cspell;
unsigned line, column;
clang_getSpellingLocation(CursorLoc, 0, &line, &column, 0);
printf("%d:%d ", line, column);
PrintCursor(Cursor, NULL((void*)0));
PrintCursorExtent(Cursor);
Spelling = clang_getCursorSpelling(Cursor);
cspell = clang_getCString(Spelling);
if (cspell && strlen(cspell) != 0) {
  unsigned pieceIndex;
  printf(" Spelling=%s (", cspell);
  for (pieceIndex = 0; ; ++pieceIndex) {
    CXSourceRange range =
      clang_Cursor_getSpellingNameRange(Cursor, pieceIndex, 0);
    if (clang_Range_isNull(range))
      break;
    PrintRange(range, 0);
  }
  printf(")");
}
clang_disposeString(Spelling);
if (clang_Cursor_getObjCSelectorIndex(Cursor) != -1)
  printf(" Selector index=%d",
         clang_Cursor_getObjCSelectorIndex(Cursor));
if (clang_Cursor_isDynamicCall(Cursor))
  printf(" Dynamic-call");
if (Cursor.kind == CXCursor_ObjCMessageExpr ||
    Cursor.kind == CXCursor_MemberRefExpr) {
  CXType T = clang_Cursor_getReceiverType(Cursor);
  if (T.kind != CXType_Invalid) {
    CXString S = clang_getTypeKindSpelling(T.kind);
    printf(" Receiver-type=%s", clang_getCString(S));
    clang_disposeString(S);
  }
}

{
  CXModule mod = clang_Cursor_getModule(Cursor);
  CXFile astFile;
  CXString name, astFilename;
  unsigned i, numHeaders;
  if (mod) {
    astFile = clang_Module_getASTFile(mod);
    astFilename = clang_getFileName(astFile);
    name = clang_Module_getFullName(mod);
    numHeaders = clang_Module_getNumTopLevelHeaders(TU, mod);
    printf(" ModuleName=%s (%s) system=%d Headers(%d):",
           clang_getCString(name), clang_getCString(astFilename),
           clang_Module_isSystem(mod), numHeaders);
    clang_disposeString(name);
    clang_disposeString(astFilename);
    for (i = 0; i < numHeaders; ++i) {
      CXFile file = clang_Module_getTopLevelHeader(TU, mod, i);
      CXString filename = clang_getFileName(file);
      printf("\n%s", clang_getCString(filename));
      clang_disposeString(filename);
    }
  }
}

if (completionString != NULL((void*)0)) {
  printf("\nCompletion string: ");
  print_completion_string(completionString, stdoutstdout);
}
printf("\n");
2732}

2734static void display_evaluate_results(CXEvalResult result) {
switch (clang_EvalResult_getKind(result)) {
  case CXEval_Int:
  {
    printf("Kind: Int, ");
    if (clang_EvalResult_isUnsignedInt(result)) {
      unsigned long long val = clang_EvalResult_getAsUnsigned(result);
      printf("unsigned, Value: %llu", val);
    } else {
      long long val = clang_EvalResult_getAsLongLong(result);
      printf("Value: %lld", val);
    }
    break;
  }
  case CXEval_Float:
  {
    double val = clang_EvalResult_getAsDouble(result);
    printf("Kind: Float , Value: %f", val);
    break;
  }
  case CXEval_ObjCStrLiteral:
  {
    const char* str = clang_EvalResult_getAsStr(result);
    printf("Kind: ObjCString , Value: %s", str);
    break;
  }
  case CXEval_StrLiteral:
  {
    const char* str = clang_EvalResult_getAsStr(result);
    printf("Kind: CString , Value: %s", str);
    break;
  }
  case CXEval_CFStr:
  {
    const char* str = clang_EvalResult_getAsStr(result);
    printf("Kind: CFString , Value: %s", str);
    break;
  }
  default:
    printf("Unexposed");
    break;
  }
2776}

2778static void inspect_evaluate_cursor(CXCursor Cursor) {
CXSourceLocation CursorLoc = clang_getCursorLocation(Cursor);
CXString Spelling;
const char *cspell;
unsigned line, column;
CXEvalResult ER;

clang_getSpellingLocation(CursorLoc, 0, &line, &column, 0);
printf("%d:%d ", line, column);
PrintCursor(Cursor, NULL((void*)0));
PrintCursorExtent(Cursor);
Spelling = clang_getCursorSpelling(Cursor);
cspell = clang_getCString(Spelling);
if (cspell && strlen(cspell) != 0) {
  unsigned pieceIndex;
  printf(" Spelling=%s (", cspell);
  for (pieceIndex = 0; ; ++pieceIndex) {
    CXSourceRange range =
       clang_Cursor_getSpellingNameRange(Cursor, pieceIndex, 0);
    if (clang_Range_isNull(range))
      break;
    PrintRange(range, 0);
  }
  printf(")");
}
clang_disposeString(Spelling);

ER = clang_Cursor_Evaluate(Cursor);
if (!ER) {
  printf("Not Evaluatable");
} else {
  display_evaluate_results(ER);
  clang_EvalResult_dispose(ER);
}
printf("\n");
2813}

2815static void inspect_macroinfo_cursor(CXCursor Cursor) {
CXSourceLocation CursorLoc = clang_getCursorLocation(Cursor);
CXString Spelling;
const char *cspell;
unsigned line, column;
clang_getSpellingLocation(CursorLoc, 0, &line, &column, 0);
printf("%d:%d ", line, column);
PrintCursor(Cursor, NULL((void*)0));
PrintCursorExtent(Cursor);
Spelling = clang_getCursorSpelling(Cursor);
cspell = clang_getCString(Spelling);
if (cspell && strlen(cspell) != 0) {
  unsigned pieceIndex;
  printf(" Spelling=%s (", cspell);
  for (pieceIndex = 0; ; ++pieceIndex) {
    CXSourceRange range =
       clang_Cursor_getSpellingNameRange(Cursor, pieceIndex, 0);
    if (clang_Range_isNull(range))
      break;
    PrintRange(range, 0);
  }
  printf(")");
}
clang_disposeString(Spelling);

if (clang_Cursor_isMacroBuiltin(Cursor)) {
  printf("[builtin macro]");
} else if (clang_Cursor_isMacroFunctionLike(Cursor)) {
  printf("[function macro]");
}
printf("\n");
2846}

2848static enum CXVisitorResult findFileRefsVisit(void *context,
                                       CXCursor cursor, CXSourceRange range) {
if (clang_Range_isNull(range))
  return CXVisit_Continue;

PrintCursor(cursor, NULL((void*)0));
PrintRange(range, "");
printf("\n");
return CXVisit_Continue;
2857}

2859static int find_file_refs_at(int argc, const char **argv) {
CXIndex CIdx;
int errorCode;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
enum CXErrorCode Err;
CXTranslationUnit TU;
CXCursor Cursor;
CursorSourceLocation *Locations = 0;
unsigned NumLocations = 0, Loc;
unsigned Repeats = 1;
unsigned I;

/* Count the number of locations. */
while (strstr(argv[NumLocations+1], "-file-refs-at=") == argv[NumLocations+1])
  ++NumLocations;

/* Parse the locations. */
assert(NumLocations > 0 && "Unable to count locations?")((void) sizeof ((NumLocations > 0 && "Unable to count locations?"
) ? 1 : 0), __extension__ ({ if (NumLocations > 0 &&
 "Unable to count locations?") ; else __assert_fail ("NumLocations > 0 && \"Unable to count locations?\""
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2877, __extension__ __PRETTY_FUNCTION__); }));
Locations = (CursorSourceLocation *)malloc(
                                NumLocations * sizeof(CursorSourceLocation));
assert(Locations)((void) sizeof ((Locations) ? 1 : 0), __extension__ ({ if (Locations
) ; else __assert_fail ("Locations", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2880, __extension__ __PRETTY_FUNCTION__); }));
for (Loc = 0; Loc < NumLocations; ++Loc) {
  const char *input = argv[Loc + 1] + strlen("-file-refs-at=");
  if ((errorCode = parse_file_line_column(input, &Locations[Loc].filename,
                                          &Locations[Loc].line,
                                          &Locations[Loc].column, 0, 0)))
    return errorCode;
}

if (parse_remapped_files(argc, argv, NumLocations + 1, &unsaved_files,
                         &num_unsaved_files))
  return -1;

if (getenv("CINDEXTEST_EDITING"))
  Repeats = 5;

/* Parse the translation unit. When we're testing clang_getCursor() after
   reparsing, don't remap unsaved files until the second parse. */
CIdx = clang_createIndex(1, 1);
Err = clang_parseTranslationUnit2(CIdx, argv[argc - 1],
                                  argv + num_unsaved_files + 1 + NumLocations,
                                  argc - num_unsaved_files - 2 - NumLocations,
                                  unsaved_files,
                                  Repeats > 1? 0 : num_unsaved_files,
                                  getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "unable to parse input\n");
  describeLibclangFailure(Err);
  clang_disposeTranslationUnit(TU);
  return -1;
}

if (checkForErrors(TU) != 0)
  return -1;

for (I = 0; I != Repeats; ++I) {
  if (Repeats > 1) {
    Err = clang_reparseTranslationUnit(TU, num_unsaved_files, unsaved_files,
                                       clang_defaultReparseOptions(TU));
    if (Err != CXError_Success) {
      describeLibclangFailure(Err);
      clang_disposeTranslationUnit(TU);
      return 1;
    }
  }

  if (checkForErrors(TU) != 0)
    return -1;
  
  for (Loc = 0; Loc < NumLocations; ++Loc) {
    CXFile file = clang_getFile(TU, Locations[Loc].filename);
    if (!file)
      continue;

    Cursor = clang_getCursor(TU,
                             clang_getLocation(TU, file, Locations[Loc].line,
                                               Locations[Loc].column));

    if (checkForErrors(TU) != 0)
      return -1;

    if (I + 1 == Repeats) {
      CXCursorAndRangeVisitor visitor = { 0, findFileRefsVisit };
      PrintCursor(Cursor, NULL((void*)0));
      printf("\n");
      clang_findReferencesInFile(Cursor, file, visitor);
      free(Locations[Loc].filename);

      if (checkForErrors(TU) != 0)
        return -1;
    }
  }
}

PrintDiagnostics(TU);
clang_disposeTranslationUnit(TU);
clang_disposeIndex(CIdx);
free(Locations);
free_remapped_files(unsaved_files, num_unsaved_files);
return 0;
2960}

2962static enum CXVisitorResult findFileIncludesVisit(void *context,
                                       CXCursor cursor, CXSourceRange range) {
PrintCursor(cursor, NULL((void*)0));
PrintRange(range, "");
printf("\n");
return CXVisit_Continue;
2968}

2970static int find_file_includes_in(int argc, const char **argv) {
CXIndex CIdx;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
enum CXErrorCode Err;
CXTranslationUnit TU;
const char **Filenames = 0;
unsigned NumFilenames = 0;
unsigned Repeats = 1;
unsigned I, FI;

/* Count the number of locations. */
while (strstr(argv[NumFilenames+1], "-file-includes-in=") == argv[NumFilenames+1])
  ++NumFilenames;

/* Parse the locations. */
assert(NumFilenames > 0 && "Unable to count filenames?")((void) sizeof ((NumFilenames > 0 && "Unable to count filenames?"
) ? 1 : 0), __extension__ ({ if (NumFilenames > 0 &&
 "Unable to count filenames?") ; else __assert_fail ("NumFilenames > 0 && \"Unable to count filenames?\""
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2986, __extension__ __PRETTY_FUNCTION__); }));
Filenames = (const char **)malloc(NumFilenames * sizeof(const char *));
assert(Filenames)((void) sizeof ((Filenames) ? 1 : 0), __extension__ ({ if (Filenames
) ; else __assert_fail ("Filenames", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 2988, __extension__ __PRETTY_FUNCTION__); }));
for (I = 0; I < NumFilenames; ++I) {
  const char *input = argv[I + 1] + strlen("-file-includes-in=");
  /* Copy the file name. */
  Filenames[I] = input;
}

if (parse_remapped_files(argc, argv, NumFilenames + 1, &unsaved_files,
                         &num_unsaved_files))
  return -1;

if (getenv("CINDEXTEST_EDITING"))
  Repeats = 2;

/* Parse the translation unit. When we're testing clang_getCursor() after
   reparsing, don't remap unsaved files until the second parse. */
CIdx = clang_createIndex(1, 1);
Err = clang_parseTranslationUnit2(
    CIdx, argv[argc - 1],
    argv + num_unsaved_files + 1 + NumFilenames,
    argc - num_unsaved_files - 2 - NumFilenames,
    unsaved_files,
    Repeats > 1 ? 0 : num_unsaved_files, getDefaultParsingOptions(), &TU);

if (Err != CXError_Success) {
  fprintf(stderrstderr, "unable to parse input\n");
  describeLibclangFailure(Err);
  clang_disposeTranslationUnit(TU);
  return -1;
}

if (checkForErrors(TU) != 0)
  return -1;

for (I = 0; I != Repeats; ++I) {
  if (Repeats > 1) {
    Err = clang_reparseTranslationUnit(TU, num_unsaved_files, unsaved_files,
                                       clang_defaultReparseOptions(TU));
    if (Err != CXError_Success) {
      describeLibclangFailure(Err);
      clang_disposeTranslationUnit(TU);
      return 1;
    }
  }

  if (checkForErrors(TU) != 0)
    return -1;

  for (FI = 0; FI < NumFilenames; ++FI) {
    CXFile file = clang_getFile(TU, Filenames[FI]);
    if (!file)
      continue;

    if (checkForErrors(TU) != 0)
      return -1;

    if (I + 1 == Repeats) {
      CXCursorAndRangeVisitor visitor = { 0, findFileIncludesVisit };
      clang_findIncludesInFile(TU, file, visitor);

      if (checkForErrors(TU) != 0)
        return -1;
    }
  }
}

PrintDiagnostics(TU);
clang_disposeTranslationUnit(TU);
clang_disposeIndex(CIdx);
free((void *)Filenames);
free_remapped_files(unsaved_files, num_unsaved_files);
return 0;
3060}

3062#define MAX_IMPORTED_ASTFILES200 200

3064typedef struct {
char **filenames;
unsigned num_files;
3067} ImportedASTFilesData;

3069static ImportedASTFilesData *importedASTs_create() {
ImportedASTFilesData *p;
p = malloc(sizeof(ImportedASTFilesData));
assert(p)((void) sizeof ((p) ? 1 : 0), __extension__ ({ if (p) ; else __assert_fail
 ("p", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3072, __extension__ __PRETTY_FUNCTION__); }));
p->filenames = malloc(MAX_IMPORTED_ASTFILES200 * sizeof(const char *));
assert(p->filenames)((void) sizeof ((p->filenames) ? 1 : 0), __extension__ ({ if
 (p->filenames) ; else __assert_fail ("p->filenames", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3074, __extension__ __PRETTY_FUNCTION__); }));
p->num_files = 0;
return p;
3077}

3079static void importedASTs_dispose(ImportedASTFilesData *p) {
unsigned i;
if (!p)
  return;

for (i = 0; i < p->num_files; ++i)
  free(p->filenames[i]);
free(p->filenames);
free(p);
3088}

3090static void importedASTS_insert(ImportedASTFilesData *p, const char *file) {
unsigned i;
assert(p && file)((void) sizeof ((p && file) ? 1 : 0), __extension__ (
{ if (p && file) ; else __assert_fail ("p && file"
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3092, __extension__ __PRETTY_FUNCTION__); }));
for (i = 0; i < p->num_files; ++i)
  if (strcmp(file, p->filenames[i]) == 0)
    return;
assert(p->num_files + 1 < MAX_IMPORTED_ASTFILES)((void) sizeof ((p->num_files + 1 < 200) ? 1 : 0), __extension__
 ({ if (p->num_files + 1 < 200) ; else __assert_fail ("p->num_files + 1 < MAX_IMPORTED_ASTFILES"
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3096, __extension__ __PRETTY_FUNCTION__); }));
p->filenames[p->num_files++] = strdup(file);
3098}

3100typedef struct IndexDataStringList_ {
struct IndexDataStringList_ *next;
char data[1]; /* Dynamically sized. */
3103} IndexDataStringList;

3105typedef struct {
const char *check_prefix;
int first_check_printed;
int fail_for_error;
int abort;
CXString main_filename;
ImportedASTFilesData *importedASTs;
IndexDataStringList *strings;
CXTranslationUnit TU;
3114} IndexData;

3116static void free_client_data(IndexData *index_data) {
IndexDataStringList *node = index_data->strings;
while (node) {
  IndexDataStringList *next = node->next;
  free(node);
  node = next;
}
index_data->strings = NULL((void*)0);
3124}

3126static void printCheck(IndexData *data) {
if (data->check_prefix) {
  if (data->first_check_printed) {
    printf("// %s-NEXT: ", data->check_prefix);
  } else {
    printf("// %s     : ", data->check_prefix);
    data->first_check_printed = 1;
  }
}
3135}

3137static void printCXIndexFile(CXIdxClientFile file) {
CXString filename = clang_getFileName((CXFile)file);
printf("%s", clang_getCString(filename));
clang_disposeString(filename);
3141}

3143static void printCXIndexLoc(CXIdxLoc loc, CXClientData client_data) {
IndexData *index_data;
CXString filename;
const char *cname;
CXIdxClientFile file;
unsigned line, column;
const char *main_filename;
int isMainFile;

index_data = (IndexData *)client_data;
clang_indexLoc_getFileLocation(loc, &file, 0, &line, &column, 0);
if (line == 0) {
  printf("<invalid>");
  return;
}
if (!file) {
  printf("<no idxfile>");
  return;
}
filename = clang_getFileName((CXFile)file);
cname = clang_getCString(filename);
main_filename = clang_getCString(index_data->main_filename);
if (strcmp(cname, main_filename) == 0)
  isMainFile = 1;
else
  isMainFile = 0;
clang_disposeString(filename);

if (!isMainFile) {
  printCXIndexFile(file);
  printf(":");
}
printf("%d:%d", line, column);
3176}

3178static unsigned digitCount(unsigned val) {
unsigned c = 1;
while (1) {
  if (val < 10)
    return c;
  ++c;
  val /= 10;
}
3186}

3188static CXIdxClientContainer makeClientContainer(CXClientData *client_data,
                                              const CXIdxEntityInfo *info,
                                              CXIdxLoc loc) {
IndexData *index_data;
IndexDataStringList *node;
const char *name;
char *newStr;
CXIdxClientFile file;
unsigned line, column;

name = info->name;
if (!name)
  name = "<anon-tag>";

clang_indexLoc_getFileLocation(loc, &file, 0, &line, &column, 0);

node =
    (IndexDataStringList *)malloc(sizeof(IndexDataStringList) + strlen(name) +
                                  digitCount(line) + digitCount(column) + 2);
assert(node)((void) sizeof ((node) ? 1 : 0), __extension__ ({ if (node) ;
 else __assert_fail ("node", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3207, __extension__ __PRETTY_FUNCTION__); }));
newStr = node->data;
sprintf(newStr, "%s:%d:%d", name, line, column);

/* Remember string so it can be freed later. */
index_data = (IndexData *)client_data;
node->next = index_data->strings;
index_data->strings = node;

return (CXIdxClientContainer)newStr;
3217}

3219static void printCXIndexContainer(const CXIdxContainerInfo *info) {
CXIdxClientContainer container;
container = clang_index_getClientContainer(info);
if (!container)
  printf("[<<NULL>>]");
else
  printf("[%s]", (const char *)container);
3226}

3228static const char *getEntityKindString(CXIdxEntityKind kind) {
switch (kind) {
case CXIdxEntity_Unexposed: return "<<UNEXPOSED>>";
case CXIdxEntity_Typedef: return "typedef";
case CXIdxEntity_Function: return "function";
case CXIdxEntity_Variable: return "variable";
case CXIdxEntity_Field: return "field";
case CXIdxEntity_EnumConstant: return "enumerator";
case CXIdxEntity_ObjCClass: return "objc-class";
case CXIdxEntity_ObjCProtocol: return "objc-protocol";
case CXIdxEntity_ObjCCategory: return "objc-category";
case CXIdxEntity_ObjCInstanceMethod: return "objc-instance-method";
case CXIdxEntity_ObjCClassMethod: return "objc-class-method";
case CXIdxEntity_ObjCProperty: return "objc-property";
case CXIdxEntity_ObjCIvar: return "objc-ivar";
case CXIdxEntity_Enum: return "enum";
case CXIdxEntity_Struct: return "struct";
case CXIdxEntity_Union: return "union";
case CXIdxEntity_CXXClass: return "c++-class";
case CXIdxEntity_CXXNamespace: return "namespace";
case CXIdxEntity_CXXNamespaceAlias: return "namespace-alias";
case CXIdxEntity_CXXStaticVariable: return "c++-static-var";
case CXIdxEntity_CXXStaticMethod: return "c++-static-method";
case CXIdxEntity_CXXInstanceMethod: return "c++-instance-method";
case CXIdxEntity_CXXConstructor: return "constructor";
case CXIdxEntity_CXXDestructor: return "destructor";
case CXIdxEntity_CXXConversionFunction: return "conversion-func";
case CXIdxEntity_CXXTypeAlias: return "type-alias";
case CXIdxEntity_CXXInterface: return "c++-__interface";
}
assert(0 && "Garbage entity kind")((void) sizeof ((0 && "Garbage entity kind") ? 1 : 0)
, __extension__ ({ if (0 && "Garbage entity kind") ; else
 __assert_fail ("0 && \"Garbage entity kind\"", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3258, __extension__ __PRETTY_FUNCTION__); }));
return 0;
3260}

3262static const char *getEntityTemplateKindString(CXIdxEntityCXXTemplateKind kind) {
switch (kind) {
case CXIdxEntity_NonTemplate: return "";
case CXIdxEntity_Template: return "-template";
case CXIdxEntity_TemplatePartialSpecialization:
  return "-template-partial-spec";
case CXIdxEntity_TemplateSpecialization: return "-template-spec";
}
assert(0 && "Garbage entity kind")((void) sizeof ((0 && "Garbage entity kind") ? 1 : 0)
, __extension__ ({ if (0 && "Garbage entity kind") ; else
 __assert_fail ("0 && \"Garbage entity kind\"", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3270, __extension__ __PRETTY_FUNCTION__); }));
return 0;
3272}

3274static const char *getEntityLanguageString(CXIdxEntityLanguage kind) {
switch (kind) {
case CXIdxEntityLang_None: return "<none>";
case CXIdxEntityLang_C: return "C";
case CXIdxEntityLang_ObjC: return "ObjC";
case CXIdxEntityLang_CXX: return "C++";
case CXIdxEntityLang_Swift: return "Swift";
}
assert(0 && "Garbage language kind")((void) sizeof ((0 && "Garbage language kind") ? 1 : 0
), __extension__ ({ if (0 && "Garbage language kind")
 ; else __assert_fail ("0 && \"Garbage language kind\""
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3282, __extension__ __PRETTY_FUNCTION__); }));
return 0;
3284}

3286static void printEntityInfo(const char *cb,
                          CXClientData client_data,
                          const CXIdxEntityInfo *info) {
const char *name;
IndexData *index_data;
unsigned i;
index_data = (IndexData *)client_data;
printCheck(index_data);

if (!info) {
  printf("%s: <<NULL>>", cb);
  return;
}

name = info->name;
if (!name)
  name = "<anon-tag>";

printf("%s: kind: %s%s", cb, getEntityKindString(info->kind),
       getEntityTemplateKindString(info->templateKind));
printf(" | name: %s", name);
printf(" | USR: %s", info->USR);
printf(" | lang: %s", getEntityLanguageString(info->lang));

for (i = 0; i != info->numAttributes; ++i) {
  const CXIdxAttrInfo *Attr = info->attributes[i];
  printf("     <attribute>: ");
  PrintCursor(Attr->cursor, NULL((void*)0));
}
3315}

3317static void printBaseClassInfo(CXClientData client_data,
                             const CXIdxBaseClassInfo *info) {
printEntityInfo("     <base>", client_data, info->base);
printf(" | cursor: ");
PrintCursor(info->cursor, NULL((void*)0));
printf(" | loc: ");
printCXIndexLoc(info->loc, client_data);
3324}

3326static void printProtocolList(const CXIdxObjCProtocolRefListInfo *ProtoInfo,
                            CXClientData client_data) {
unsigned i;
for (i = 0; i < ProtoInfo->numProtocols; ++i) {
  printEntityInfo("     <protocol>", client_data,
                  ProtoInfo->protocols[i]->protocol);
  printf(" | cursor: ");
  PrintCursor(ProtoInfo->protocols[i]->cursor, NULL((void*)0));
  printf(" | loc: ");
  printCXIndexLoc(ProtoInfo->protocols[i]->loc, client_data);
  printf("\n");
}
3338}

3340static void printSymbolRole(CXSymbolRole role) {
if (role & CXSymbolRole_Declaration)
  printf(" decl");
if (role & CXSymbolRole_Definition)
  printf(" def");
if (role & CXSymbolRole_Reference)
  printf(" ref");
if (role & CXSymbolRole_Read)
  printf(" read");
if (role & CXSymbolRole_Write)
  printf(" write");
if (role & CXSymbolRole_Call)
  printf(" call");
if (role & CXSymbolRole_Dynamic)
  printf(" dyn");
if (role & CXSymbolRole_AddressOf)
  printf(" addr");
if (role & CXSymbolRole_Implicit)
  printf(" implicit");
3359}

3361static void index_diagnostic(CXClientData client_data,
                           CXDiagnosticSet diagSet, void *reserved) {
CXString str;
const char *cstr;
unsigned numDiags, i;
CXDiagnostic diag;
IndexData *index_data;
index_data = (IndexData *)client_data;
printCheck(index_data);

numDiags = clang_getNumDiagnosticsInSet(diagSet);
for (i = 0; i != numDiags; ++i) {
  diag = clang_getDiagnosticInSet(diagSet, i);
  str = clang_formatDiagnostic(diag, clang_defaultDiagnosticDisplayOptions());
  cstr = clang_getCString(str);
  printf("[diagnostic]: %s\n", cstr);
  clang_disposeString(str);  

  if (getenv("CINDEXTEST_FAILONERROR") &&
      clang_getDiagnosticSeverity(diag) >= CXDiagnostic_Error) {
    index_data->fail_for_error = 1;
  }
}
3384}

3386static CXIdxClientFile index_enteredMainFile(CXClientData client_data,
                                     CXFile file, void *reserved) {
IndexData *index_data;

index_data = (IndexData *)client_data;
printCheck(index_data);

index_data->main_filename = clang_getFileName(file);

printf("[enteredMainFile]: ");
printCXIndexFile((CXIdxClientFile)file);
printf("\n");

return (CXIdxClientFile)file;
3400}

3402static CXIdxClientFile index_ppIncludedFile(CXClientData client_data,
                                          const CXIdxIncludedFileInfo *info) {
IndexData *index_data;
CXModule Mod;
index_data = (IndexData *)client_data;
printCheck(index_data);

printf("[ppIncludedFile]: ");
printCXIndexFile((CXIdxClientFile)info->file);
printf(" | name: \"%s\"", info->filename);
printf(" | hash loc: ");
printCXIndexLoc(info->hashLoc, client_data);
printf(" | isImport: %d | isAngled: %d | isModule: %d",
       info->isImport, info->isAngled, info->isModuleImport);

Mod = clang_getModuleForFile(index_data->TU, (CXFile)info->file);
if (Mod) {
  CXString str = clang_Module_getFullName(Mod);
  const char *cstr = clang_getCString(str);
  printf(" | module: %s", cstr);
  clang_disposeString(str);
}

printf("\n");

return (CXIdxClientFile)info->file;
3428}

3430static CXIdxClientFile index_importedASTFile(CXClientData client_data,
                                       const CXIdxImportedASTFileInfo *info) {
IndexData *index_data;
index_data = (IndexData *)client_data;
printCheck(index_data);

if (index_data->importedASTs) {
  CXString filename = clang_getFileName(info->file);
  importedASTS_insert(index_data->importedASTs, clang_getCString(filename));
  clang_disposeString(filename);
}

printf("[importedASTFile]: ");
printCXIndexFile((CXIdxClientFile)info->file);
if (info->module) {
  CXString name = clang_Module_getFullName(info->module);
  printf(" | loc: ");
  printCXIndexLoc(info->loc, client_data);
  printf(" | name: \"%s\"", clang_getCString(name));
  printf(" | isImplicit: %d\n", info->isImplicit);
  clang_disposeString(name);
} else {
  /* PCH file, the rest are not relevant. */
  printf("\n");
}

return (CXIdxClientFile)info->file;
3457}

3459static CXIdxClientContainer
3460index_startedTranslationUnit(CXClientData client_data, void *reserved) {
IndexData *index_data;
index_data = (IndexData *)client_data;
printCheck(index_data);

printf("[startedTranslationUnit]\n");
return (CXIdxClientContainer)"TU";
3467}

3469static void index_indexDeclaration(CXClientData client_data,
                                 const CXIdxDeclInfo *info) {
IndexData *index_data;
const CXIdxObjCCategoryDeclInfo *CatInfo;
const CXIdxObjCInterfaceDeclInfo *InterInfo;
const CXIdxObjCProtocolRefListInfo *ProtoInfo;
const CXIdxObjCPropertyDeclInfo *PropInfo;
const CXIdxCXXClassDeclInfo *CXXClassInfo;
unsigned i;
index_data = (IndexData *)client_data;

printEntityInfo("[indexDeclaration]", client_data, info->entityInfo);
printf(" | cursor: ");
PrintCursor(info->cursor, NULL((void*)0));
printf(" | loc: ");
printCXIndexLoc(info->loc, client_data);
printf(" | semantic-container: ");
printCXIndexContainer(info->semanticContainer);
printf(" | lexical-container: ");
printCXIndexContainer(info->lexicalContainer);
printf(" | isRedecl: %d", info->isRedeclaration);
printf(" | isDef: %d", info->isDefinition);
if (info->flags & CXIdxDeclFlag_Skipped) {
  assert(!info->isContainer)((void) sizeof ((!info->isContainer) ? 1 : 0), __extension__
 ({ if (!info->isContainer) ; else __assert_fail ("!info->isContainer"
, "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3492, __extension__ __PRETTY_FUNCTION__); }));
  printf(" | isContainer: skipped");
} else {
  printf(" | isContainer: %d", info->isContainer);
}
printf(" | isImplicit: %d\n", info->isImplicit);

for (i = 0; i != info->numAttributes; ++i) {
  const CXIdxAttrInfo *Attr = info->attributes[i];
  printf("     <attribute>: ");
  PrintCursor(Attr->cursor, NULL((void*)0));
  printf("\n");
}

if (clang_index_isEntityObjCContainerKind(info->entityInfo->kind)) {
  const char *kindName = 0;
  CXIdxObjCContainerKind K = clang_index_getObjCContainerDeclInfo(info)->kind;
  switch (K) {
  case CXIdxObjCContainer_ForwardRef:
    kindName = "forward-ref"; break;
  case CXIdxObjCContainer_Interface:
    kindName = "interface"; break;
  case CXIdxObjCContainer_Implementation:
    kindName = "implementation"; break;
  }
  printCheck(index_data);
  printf("     <ObjCContainerInfo>: kind: %s\n", kindName);
}

if ((CatInfo = clang_index_getObjCCategoryDeclInfo(info))) {
  printEntityInfo("     <ObjCCategoryInfo>: class", client_data,
                  CatInfo->objcClass);
  printf(" | cursor: ");
  PrintCursor(CatInfo->classCursor, NULL((void*)0));
  printf(" | loc: ");
  printCXIndexLoc(CatInfo->classLoc, client_data);
  printf("\n");
}

if ((InterInfo = clang_index_getObjCInterfaceDeclInfo(info))) {
  if (InterInfo->superInfo) {
    printBaseClassInfo(client_data, InterInfo->superInfo);
    printf("\n");
  }
}

if ((ProtoInfo = clang_index_getObjCProtocolRefListInfo(info))) {
  printProtocolList(ProtoInfo, client_data);
}

if ((PropInfo = clang_index_getObjCPropertyDeclInfo(info))) {
  if (PropInfo->getter) {
    printEntityInfo("     <getter>", client_data, PropInfo->getter);
    printf("\n");
  }
  if (PropInfo->setter) {
    printEntityInfo("     <setter>", client_data, PropInfo->setter);
    printf("\n");
  }
}

if ((CXXClassInfo = clang_index_getCXXClassDeclInfo(info))) {
  for (i = 0; i != CXXClassInfo->numBases; ++i) {
    printBaseClassInfo(client_data, CXXClassInfo->bases[i]);
    printf("\n");
  }
}

if (info->declAsContainer)
  clang_index_setClientContainer(
      info->declAsContainer,
      makeClientContainer(client_data, info->entityInfo, info->loc));
3564}

3566static void index_indexEntityReference(CXClientData client_data,
                                     const CXIdxEntityRefInfo *info) {
printEntityInfo("[indexEntityReference]", client_data,
                info->referencedEntity);
printf(" | cursor: ");
PrintCursor(info->cursor, NULL((void*)0));
printf(" | loc: ");
printCXIndexLoc(info->loc, client_data);
printEntityInfo(" | <parent>:", client_data, info->parentEntity);
printf(" | container: ");
printCXIndexContainer(info->container);
printf(" | refkind: ");
switch (info->kind) {
  case CXIdxEntityRef_Direct: printf("direct"); break;
  case CXIdxEntityRef_Implicit: printf("implicit"); break;
}
printf(" | role:");
printSymbolRole(info->role);
printf("\n");
3585}

3587static int index_abortQuery(CXClientData client_data, void *reserved) {
IndexData *index_data;
index_data = (IndexData *)client_data;
return index_data->abort;
3591}

3593static IndexerCallbacks IndexCB = {
index_abortQuery,
index_diagnostic,
index_enteredMainFile,
index_ppIncludedFile,
index_importedASTFile,
index_startedTranslationUnit,
index_indexDeclaration,
index_indexEntityReference
3602};

3604static unsigned getIndexOptions(void) {
unsigned index_opts;
index_opts = 0;
if (getenv("CINDEXTEST_SUPPRESSREFS"))
  index_opts |= CXIndexOpt_SuppressRedundantRefs;
if (getenv("CINDEXTEST_INDEXLOCALSYMBOLS"))
  index_opts |= CXIndexOpt_IndexFunctionLocalSymbols;
if (!getenv("CINDEXTEST_DISABLE_SKIPPARSEDBODIES"))
  index_opts |= CXIndexOpt_SkipParsedBodiesInSession;

return index_opts;
3615}

3617static int index_compile_args(int num_args, const char **args,
                            CXIndexAction idxAction,
                            ImportedASTFilesData *importedASTs,
                            const char *check_prefix) {
IndexData index_data;
unsigned index_opts;
int result;

if (num_args == 0) {
  fprintf(stderrstderr, "no compiler arguments\n");
  return -1;
}

index_data.check_prefix = check_prefix;
index_data.first_check_printed = 0;
index_data.fail_for_error = 0;
index_data.abort = 0;
index_data.main_filename = createCXString("");
index_data.importedASTs = importedASTs;
index_data.strings = NULL((void*)0);
index_data.TU = NULL((void*)0);

index_opts = getIndexOptions();
result = clang_indexSourceFile(idxAction, &index_data,
                               &IndexCB,sizeof(IndexCB), index_opts,
                               0, args, num_args, 0, 0, 0,
                               getDefaultParsingOptions());
if (result != CXError_Success)
  describeLibclangFailure(result);

if (index_data.fail_for_error)
  result = -1;

clang_disposeString(index_data.main_filename);
free_client_data(&index_data);
return result;
3653}

3655static int index_ast_file(const char *ast_file,
                        CXIndex Idx,
                        CXIndexAction idxAction,
                        ImportedASTFilesData *importedASTs,
                        const char *check_prefix) {
CXTranslationUnit TU;
IndexData index_data;
unsigned index_opts;
int result;

if (!CreateTranslationUnit(Idx, ast_file, &TU))
  return -1;

index_data.check_prefix = check_prefix;
index_data.first_check_printed = 0;
index_data.fail_for_error = 0;
index_data.abort = 0;
index_data.main_filename = createCXString("");
index_data.importedASTs = importedASTs;
index_data.strings = NULL((void*)0);
index_data.TU = TU;

index_opts = getIndexOptions();
result = clang_indexTranslationUnit(idxAction, &index_data,
                                    &IndexCB,sizeof(IndexCB),
                                    index_opts, TU);
if (index_data.fail_for_error)
  result = -1;

clang_disposeTranslationUnit(TU);
clang_disposeString(index_data.main_filename);
free_client_data(&index_data);
return result;
3688}

3690static int index_file(int argc, const char **argv, int full) {
const char *check_prefix;
CXIndex Idx;
CXIndexAction idxAction;
ImportedASTFilesData *importedASTs;
int result;

check_prefix = 0;
if (argc > 0) {
  if (strstr(argv[0], "-check-prefix=") == argv[0]) {
    check_prefix = argv[0] + strlen("-check-prefix=");
    ++argv;
    --argc;
  }
}

if (!(Idx = clang_createIndex(/* excludeDeclsFromPCH */ 1,
                              /* displayDiagnostics=*/1))) {
  fprintf(stderrstderr, "Could not create Index\n");
  return 1;
}
idxAction = clang_IndexAction_create(Idx);
importedASTs = 0;
if (full)
  importedASTs = importedASTs_create();

result = index_compile_args(argc, argv, idxAction, importedASTs, check_prefix);
if (result != 0)
  goto finished;

if (full) {
  unsigned i;
  for (i = 0; i < importedASTs->num_files && result == 0; ++i) {
    result = index_ast_file(importedASTs->filenames[i], Idx, idxAction,
                            importedASTs, check_prefix);
  }
}

3728finished:
importedASTs_dispose(importedASTs);
clang_IndexAction_dispose(idxAction);
clang_disposeIndex(Idx);
return result;
3733}

3735static int index_tu(int argc, const char **argv) {
const char *check_prefix;
CXIndex Idx;
CXIndexAction idxAction;
int result;

check_prefix = 0;
if (argc > 0) {
  if (strstr(argv[0], "-check-prefix=") == argv[0]) {
    check_prefix = argv[0] + strlen("-check-prefix=");
    ++argv;
    --argc;
  }
}

if (!(Idx = clang_createIndex(/* excludeDeclsFromPCH */ 1,
                              /* displayDiagnostics=*/1))) {
  fprintf(stderrstderr, "Could not create Index\n");
  return 1;
}
idxAction = clang_IndexAction_create(Idx);

result = index_ast_file(argv[0], Idx, idxAction,
                        /*importedASTs=*/0, check_prefix);

clang_IndexAction_dispose(idxAction);
clang_disposeIndex(Idx);
return result;
3763}

3765static int index_compile_db(int argc, const char **argv) {
const char *check_prefix;
CXIndex Idx;
CXIndexAction idxAction;
int errorCode = 0;

check_prefix = 0;
if (argc > 0) {
  if (strstr(argv[0], "-check-prefix=") == argv[0]) {
    check_prefix = argv[0] + strlen("-check-prefix=");
    ++argv;
    --argc;
  }
}

if (argc == 0) {
  fprintf(stderrstderr, "no compilation database\n");
  return -1;
}

if (!(Idx = clang_createIndex(/* excludeDeclsFromPCH */ 1,
                              /* displayDiagnostics=*/1))) {
  fprintf(stderrstderr, "Could not create Index\n");
  return 1;
}
idxAction = clang_IndexAction_create(Idx);

{
  const char *database = argv[0];
  CXCompilationDatabase db = 0;
  CXCompileCommands CCmds = 0;
  CXCompileCommand CCmd;
  CXCompilationDatabase_Error ec;
  CXString wd;
3799#define MAX_COMPILE_ARGS512 512
  CXString cxargs[MAX_COMPILE_ARGS512];
  const char *args[MAX_COMPILE_ARGS512];
  char *tmp;
  unsigned len;
  char *buildDir;
  int i, a, numCmds, numArgs;

  len = strlen(database);
  tmp = (char *) malloc(len+1);
  assert(tmp)((void) sizeof ((tmp) ? 1 : 0), __extension__ ({ if (tmp) ; else
 __assert_fail ("tmp", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3809, __extension__ __PRETTY_FUNCTION__); }));
  memcpy(tmp, database, len+1);
  buildDir = dirname(tmp);

  db = clang_CompilationDatabase_fromDirectory(buildDir, &ec);

  if (db) {

    if (ec!=CXCompilationDatabase_NoError) {
      printf("unexpected error %d code while loading compilation database\n", ec);
      errorCode = -1;
      goto cdb_end;
    }

    if (chdir(buildDir) != 0) {
      printf("Could not chdir to %s\n", buildDir);
      errorCode = -1;
      goto cdb_end;
    }

    CCmds = clang_CompilationDatabase_getAllCompileCommands(db);
    if (!CCmds) {
      printf("compilation db is empty\n");
      errorCode = -1;
      goto cdb_end;
    }

    numCmds = clang_CompileCommands_getSize(CCmds);

    if (numCmds==0) {
      fprintf(stderrstderr, "should not get an empty compileCommand set\n");
      errorCode = -1;
      goto cdb_end;
    }

    for (i=0; i<numCmds && errorCode == 0; ++i) {
      CCmd = clang_CompileCommands_getCommand(CCmds, i);

      wd = clang_CompileCommand_getDirectory(CCmd);
      if (chdir(clang_getCString(wd)) != 0) {
        printf("Could not chdir to %s\n", clang_getCString(wd));
        errorCode = -1;
        goto cdb_end;
      }
      clang_disposeString(wd);

      numArgs = clang_CompileCommand_getNumArgs(CCmd);
      if (numArgs > MAX_COMPILE_ARGS512){
        fprintf(stderrstderr, "got more compile arguments than maximum\n");
        errorCode = -1;
        goto cdb_end;
      }
      for (a=0; a<numArgs; ++a) {
        cxargs[a] = clang_CompileCommand_getArg(CCmd, a);
        args[a] = clang_getCString(cxargs[a]);
      }

      errorCode = index_compile_args(numArgs, args, idxAction,
                                     /*importedASTs=*/0, check_prefix);

      for (a=0; a<numArgs; ++a)
        clang_disposeString(cxargs[a]);
    }
  } else {
    printf("database loading failed with error code %d.\n", ec);
    errorCode = -1;
  }

cdb_end:
  clang_CompileCommands_dispose(CCmds);
  clang_CompilationDatabase_dispose(db);
  free(tmp);

}

clang_IndexAction_dispose(idxAction);
clang_disposeIndex(Idx);
return errorCode;
3887}

3889int perform_token_annotation(int argc, const char **argv) {
const char *input = argv[1];
char *filename = 0;
unsigned line, second_line;
unsigned column, second_column;
CXIndex CIdx;
CXTranslationUnit TU = 0;
int errorCode;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
CXToken *tokens;
unsigned num_tokens;
CXSourceRange range;
CXSourceLocation startLoc, endLoc;
CXFile file = 0;
CXCursor *cursors = 0;
CXSourceRangeList *skipped_ranges = 0;
enum CXErrorCode Err;
unsigned i;

input += strlen("-test-annotate-tokens=");
if ((errorCode = parse_file_line_column(input, &filename, &line, &column,
                                        &second_line, &second_column)))
  return errorCode;

if (parse_remapped_files(argc, argv, 2, &unsaved_files, &num_unsaved_files)) {
  free(filename);
  return -1;
}

CIdx = clang_createIndex(0, 1);
Err = clang_parseTranslationUnit2(CIdx, argv[argc - 1],
                                  argv + num_unsaved_files + 2,
                                  argc - num_unsaved_files - 3,
                                  unsaved_files,
                                  num_unsaved_files,
                                  getDefaultParsingOptions(), &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "unable to parse input\n");
  describeLibclangFailure(Err);
  clang_disposeIndex(CIdx);
  free(filename);
  free_remapped_files(unsaved_files, num_unsaved_files);
  return -1;
}
errorCode = 0;

if (checkForErrors(TU) != 0) {
  errorCode = -1;
  goto teardown;
}

if (getenv("CINDEXTEST_EDITING")) {
  for (i = 0; i < 5; ++i) {
    Err = clang_reparseTranslationUnit(TU, num_unsaved_files, unsaved_files,
                                       clang_defaultReparseOptions(TU));
    if (Err != CXError_Success) {
      fprintf(stderrstderr, "Unable to reparse translation unit!\n");
      describeLibclangFailure(Err);
      errorCode = -1;
      goto teardown;
    }
  }
}

if (checkForErrors(TU) != 0) {
  errorCode = -1;
  goto teardown;
}

file = clang_getFile(TU, filename);
if (!file) {
  fprintf(stderrstderr, "file %s is not in this translation unit\n", filename);
  errorCode = -1;
  goto teardown;
}

startLoc = clang_getLocation(TU, file, line, column);
if (clang_equalLocations(clang_getNullLocation(), startLoc)) {
  fprintf(stderrstderr, "invalid source location %s:%d:%d\n", filename, line,
          column);
  errorCode = -1;
  goto teardown;
}

endLoc = clang_getLocation(TU, file, second_line, second_column);
if (clang_equalLocations(clang_getNullLocation(), endLoc)) {
  fprintf(stderrstderr, "invalid source location %s:%d:%d\n", filename,
          second_line, second_column);
  errorCode = -1;
  goto teardown;
}

range = clang_getRange(startLoc, endLoc);
clang_tokenize(TU, range, &tokens, &num_tokens);

if (checkForErrors(TU) != 0) {
  errorCode = -1;
  goto teardown;
}

cursors = (CXCursor *)malloc(num_tokens * sizeof(CXCursor));
assert(cursors)((void) sizeof ((cursors) ? 1 : 0), __extension__ ({ if (cursors
) ; else __assert_fail ("cursors", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 3991, __extension__ __PRETTY_FUNCTION__); }));
clang_annotateTokens(TU, tokens, num_tokens, cursors);

if (checkForErrors(TU) != 0) {
  errorCode = -1;
  goto teardown;
}

skipped_ranges = clang_getSkippedRanges(TU, file);
for (i = 0; i != skipped_ranges->count; ++i) {
  unsigned start_line, start_column, end_line, end_column;
  clang_getSpellingLocation(clang_getRangeStart(skipped_ranges->ranges[i]),
                            0, &start_line, &start_column, 0);
  clang_getSpellingLocation(clang_getRangeEnd(skipped_ranges->ranges[i]),
                            0, &end_line, &end_column, 0);
  printf("Skipping: ");
  PrintExtent(stdoutstdout, start_line, start_column, end_line, end_column);
  printf("\n");
}
clang_disposeSourceRangeList(skipped_ranges);

for (i = 0; i != num_tokens; ++i) {
  const char *kind = "<unknown>";
  CXString spelling = clang_getTokenSpelling(TU, tokens[i]);
  CXSourceRange extent = clang_getTokenExtent(TU, tokens[i]);
  unsigned start_line, start_column, end_line, end_column;

  switch (clang_getTokenKind(tokens[i])) {
  case CXToken_Punctuation: kind = "Punctuation"; break;
  case CXToken_Keyword: kind = "Keyword"; break;
  case CXToken_Identifier: kind = "Identifier"; break;
  case CXToken_Literal: kind = "Literal"; break;
  case CXToken_Comment: kind = "Comment"; break;
  }
  clang_getSpellingLocation(clang_getRangeStart(extent),
                            0, &start_line, &start_column, 0);
  clang_getSpellingLocation(clang_getRangeEnd(extent),
                            0, &end_line, &end_column, 0);
  printf("%s: \"%s\" ", kind, clang_getCString(spelling));
  clang_disposeString(spelling);
  PrintExtent(stdoutstdout, start_line, start_column, end_line, end_column);
  if (!clang_isInvalid(cursors[i].kind)) {
    printf(" ");
    PrintCursor(cursors[i], NULL((void*)0));
  }
  printf("\n");
}
free(cursors);
clang_disposeTokens(TU, tokens, num_tokens);

teardown:
PrintDiagnostics(TU);
clang_disposeTranslationUnit(TU);
clang_disposeIndex(CIdx);
free(filename);
free_remapped_files(unsaved_files, num_unsaved_files);
return errorCode;
4048}

4050static int
4051perform_test_compilation_db(const char *database, int argc, const char **argv) {
CXCompilationDatabase db;
CXCompileCommands CCmds;
CXCompileCommand CCmd;
CXCompilationDatabase_Error ec;
CXString wd;
CXString arg;
int errorCode = 0;
char *tmp;
unsigned len;
char *buildDir;
int i, j, a, numCmds, numArgs;

len = strlen(database);
tmp = (char *) malloc(len+1);
assert(tmp)((void) sizeof ((tmp) ? 1 : 0), __extension__ ({ if (tmp) ; else
 __assert_fail ("tmp", "/build/llvm-toolchain-snapshot-7~svn329677/tools/clang/tools/c-index-test/c-index-test.c"
, 4066, __extension__ __PRETTY_FUNCTION__); }));
memcpy(tmp, database, len+1);
buildDir = dirname(tmp);

db = clang_CompilationDatabase_fromDirectory(buildDir, &ec);

if (db) {

  if (ec!=CXCompilationDatabase_NoError) {
    printf("unexpected error %d code while loading compilation database\n", ec);
    errorCode = -1;
    goto cdb_end;
  }

  for (i=0; i<argc && errorCode==0; ) {
    if (strcmp(argv[i],"lookup")==0){
      CCmds = clang_CompilationDatabase_getCompileCommands(db, argv[i+1]);

      if (!CCmds) {
        printf("file %s not found in compilation db\n", argv[i+1]);
        errorCode = -1;
        break;
      }

      numCmds = clang_CompileCommands_getSize(CCmds);

      if (numCmds==0) {
        fprintf(stderrstderr, "should not get an empty compileCommand set for file"
                        " '%s'\n", argv[i+1]);
        errorCode = -1;
        break;
      }

      for (j=0; j<numCmds; ++j) {
        CCmd = clang_CompileCommands_getCommand(CCmds, j);

        wd = clang_CompileCommand_getDirectory(CCmd);
        printf("workdir:'%s'", clang_getCString(wd));
        clang_disposeString(wd);

        printf(" cmdline:'");
        numArgs = clang_CompileCommand_getNumArgs(CCmd);
        for (a=0; a<numArgs; ++a) {
          if (a) printf(" ");
          arg = clang_CompileCommand_getArg(CCmd, a);
          printf("%s", clang_getCString(arg));
          clang_disposeString(arg);
        }
        printf("'\n");
      }

      clang_CompileCommands_dispose(CCmds);

      i += 2;
    }
  }
  clang_CompilationDatabase_dispose(db);
} else {
  printf("database loading failed with error code %d.\n", ec);
  errorCode = -1;
}

4128cdb_end:
free(tmp);

return errorCode;
4132}

4134/******************************************************************************/
4135/* USR printing.                                                              */
4136/******************************************************************************/

4138static int insufficient_usr(const char *kind, const char *usage) {
fprintf(stderrstderr, "USR for '%s' requires: %s\n", kind, usage);
return 1;
4141}

4143static unsigned isUSR(const char *s) {
return s[0] == 'c' && s[1] == ':';
4145}

4147static int not_usr(const char *s, const char *arg) {
fprintf(stderrstderr, "'%s' argument ('%s') is not a USR\n", s, arg);
return 1;
4150}

4152static void print_usr(CXString usr) {
const char *s = clang_getCString(usr);
printf("%s\n", s);
clang_disposeString(usr);
4156}

4158static void display_usrs() {
fprintf(stderrstderr, "-print-usrs options:\n"
      " ObjCCategory <class name> <category name>\n"
      " ObjCClass <class name>\n"
      " ObjCIvar <ivar name> <class USR>\n"
      " ObjCMethod <selector> [0=class method|1=instance method] "
          "<class USR>\n"
        " ObjCProperty <property name> <class USR>\n"
        " ObjCProtocol <protocol name>\n");
4167}

4169int print_usrs(const char **I, const char **E) {
while (I != E) {
  const char *kind = *I;
  unsigned len = strlen(kind);
  switch (len) {
    case 8:
      if (memcmp(kind, "ObjCIvar", 8) == 0) {
        if (I + 2 >= E)
          return insufficient_usr(kind, "<ivar name> <class USR>");
        if (!isUSR(I[2]))
          return not_usr("<class USR>", I[2]);
        else {
          CXString x = createCXString(I[2]);
          print_usr(clang_constructUSR_ObjCIvar(I[1], x));
        }

        I += 3;
        continue;
      }
      break;
    case 9:
      if (memcmp(kind, "ObjCClass", 9) == 0) {
        if (I + 1 >= E)
          return insufficient_usr(kind, "<class name>");
        print_usr(clang_constructUSR_ObjCClass(I[1]));
        I += 2;
        continue;
      }
      break;
    case 10:
      if (memcmp(kind, "ObjCMethod", 10) == 0) {
        if (I + 3 >= E)
          return insufficient_usr(kind, "<method selector> "
              "[0=class method|1=instance method] <class USR>");
        if (!isUSR(I[3]))
          return not_usr("<class USR>", I[3]);
        else {
          CXString x = createCXString(I[3]);
          print_usr(clang_constructUSR_ObjCMethod(I[1], atoi(I[2]), x));
        }
        I += 4;
        continue;
      }
      break;
    case 12:
      if (memcmp(kind, "ObjCCategory", 12) == 0) {
        if (I + 2 >= E)
          return insufficient_usr(kind, "<class name> <category name>");
        print_usr(clang_constructUSR_ObjCCategory(I[1], I[2]));
        I += 3;
        continue;
      }
      if (memcmp(kind, "ObjCProtocol", 12) == 0) {
        if (I + 1 >= E)
          return insufficient_usr(kind, "<protocol name>");
        print_usr(clang_constructUSR_ObjCProtocol(I[1]));
        I += 2;
        continue;
      }
      if (memcmp(kind, "ObjCProperty", 12) == 0) {
        if (I + 2 >= E)
          return insufficient_usr(kind, "<property name> <class USR>");
        if (!isUSR(I[2]))
          return not_usr("<class USR>", I[2]);
        else {
          CXString x = createCXString(I[2]);
          print_usr(clang_constructUSR_ObjCProperty(I[1], x));
        }
        I += 3;
        continue;
      }
      break;
    default:
      break;
  }
  break;
}

if (I != E) {
  fprintf(stderrstderr, "Invalid USR kind: %s\n", *I);
  display_usrs();
  return 1;
}
return 0;
4253}

4255int print_usrs_file(const char *file_name) {
char line[2048];
const char *args[128];
unsigned numChars = 0;

FILE *fp = fopen(file_name, "r");
if (!fp) {
  fprintf(stderrstderr, "error: cannot open '%s'\n", file_name);
  return 1;
}

/* This code is not really all that safe, but it works fine for testing. */
while (!feof(fp)) {
  char c = fgetc(fp);
  if (c == '\n') {
    unsigned i = 0;
    const char *s = 0;

    if (numChars == 0)
      continue;

    line[numChars] = '\0';
    numChars = 0;

    if (line[0] == '/' && line[1] == '/')
      continue;

    s = strtok(line, " ");
    while (s) {
      args[i] = s;
      ++i;
      s = strtok(0, " ");
    }
    if (print_usrs(&args[0], &args[i]))
      return 1;
  }
  else
    line[numChars++] = c;
}

fclose(fp);
return 0;
4297}

4299/******************************************************************************/
4300/* Command line processing.                                                   */
4301/******************************************************************************/
4302int write_pch_file(const char *filename, int argc, const char *argv[]) {
CXIndex Idx;
CXTranslationUnit TU;
struct CXUnsavedFile *unsaved_files = 0;
int num_unsaved_files = 0;
enum CXErrorCode Err;
int result = 0;

Idx = clang_createIndex(/* excludeDeclsFromPCH */1, /* displayDiagnostics=*/1);

if (parse_remapped_files(argc, argv, 0, &unsaved_files, &num_unsaved_files)) {
  clang_disposeIndex(Idx);
  return -1;
}

Err = clang_parseTranslationUnit2(
    Idx, 0, argv + num_unsaved_files, argc - num_unsaved_files,
    unsaved_files, num_unsaved_files,
    CXTranslationUnit_Incomplete |
        CXTranslationUnit_DetailedPreprocessingRecord |
        CXTranslationUnit_ForSerialization,
    &TU);
if (Err != CXError_Success) {
  fprintf(stderrstderr, "Unable to load translation unit!\n");
  describeLibclangFailure(Err);
  free_remapped_files(unsaved_files, num_unsaved_files);
  clang_disposeTranslationUnit(TU);
  clang_disposeIndex(Idx);
  return 1;
}

switch (clang_saveTranslationUnit(TU, filename, 
                                  clang_defaultSaveOptions(TU))) {
case CXSaveError_None:
  break;

case CXSaveError_TranslationErrors:
  fprintf(stderrstderr, "Unable to write PCH file %s: translation errors\n", 
          filename);
  result = 2;    
  break;

case CXSaveError_InvalidTU:
  fprintf(stderrstderr, "Unable to write PCH file %s: invalid translation unit\n", 
          filename);
  result = 3;    
  break;

case CXSaveError_Unknown:
default:
  fprintf(stderrstderr, "Unable to write PCH file %s: unknown error \n", filename);
  result = 1;
  break;
}

clang_disposeTranslationUnit(TU);
free_remapped_files(unsaved_files, num_unsaved_files);
clang_disposeIndex(Idx);
return result;
4361}

4363/******************************************************************************/
4364/* Serialized diagnostics.                                                    */
4365/******************************************************************************/

4367static const char *getDiagnosticCodeStr(enum CXLoadDiag_Error error) {
switch (error) {
  case CXLoadDiag_CannotLoad: return "Cannot Load File";
  case CXLoadDiag_None: break;
  case CXLoadDiag_Unknown: return "Unknown";
  case CXLoadDiag_InvalidFile: return "Invalid File";
}
return "None";
4375}

4377static const char *getSeverityString(enum CXDiagnosticSeverity severity) {
switch (severity) {
  case CXDiagnostic_Note: return "note";
  case CXDiagnostic_Error: return "error";
  case CXDiagnostic_Fatal: return "fatal";
  case CXDiagnostic_Ignored: return "ignored";
  case CXDiagnostic_Warning: return "warning";
}
return "unknown";
4386}

4388static void printIndent(unsigned indent) {
if (indent == 0)
  return;
fprintf(stderrstderr, "+");
--indent;
while (indent > 0) {
  fprintf(stderrstderr, "-");
  --indent;
}
4397}

4399static void printLocation(CXSourceLocation L) {
CXFile File;
CXString FileName;
unsigned line, column, offset;

clang_getExpansionLocation(L, &File, &line, &column, &offset);
FileName = clang_getFileName(File);

fprintf(stderrstderr, "%s:%d:%d", clang_getCString(FileName), line, column);
clang_disposeString(FileName);
4409}

4411static void printRanges(CXDiagnostic D, unsigned indent) {
unsigned i, n = clang_getDiagnosticNumRanges(D);

for (i = 0; i < n; ++i) {
  CXSourceLocation Start, End;
  CXSourceRange SR = clang_getDiagnosticRange(D, i);
  Start = clang_getRangeStart(SR);
  End = clang_getRangeEnd(SR);
  
  printIndent(indent);
  fprintf(stderrstderr, "Range: ");
  printLocation(Start);
  fprintf(stderrstderr, " ");
  printLocation(End);
  fprintf(stderrstderr, "\n");
}
4427}

4429static void printFixIts(CXDiagnostic D, unsigned indent) {
unsigned i, n = clang_getDiagnosticNumFixIts(D);
fprintf(stderrstderr, "Number FIXITs = %d\n", n);
for (i = 0 ; i < n; ++i) {
  CXSourceRange ReplacementRange;
  CXString text;
  text = clang_getDiagnosticFixIt(D, i, &ReplacementRange);
  
  printIndent(indent);
  fprintf(stderrstderr, "FIXIT: (");
  printLocation(clang_getRangeStart(ReplacementRange));
  fprintf(stderrstderr, " - ");
  printLocation(clang_getRangeEnd(ReplacementRange));
  fprintf(stderrstderr, "): \"%s\"\n", clang_getCString(text));
  clang_disposeString(text);
}  
4445}

4447static void printDiagnosticSet(CXDiagnosticSet Diags, unsigned indent) {
unsigned i, n;

if (!Diags)
  return;

n = clang_getNumDiagnosticsInSet(Diags);
for (i = 0; i < n; ++i) {
  CXSourceLocation DiagLoc;
  CXDiagnostic D;
  CXFile File;
  CXString FileName, DiagSpelling, DiagOption, DiagCat;
  unsigned line, column, offset;
  const char *DiagOptionStr = 0, *DiagCatStr = 0;
  
  D = clang_getDiagnosticInSet(Diags, i);
  DiagLoc = clang_getDiagnosticLocation(D);
  clang_getExpansionLocation(DiagLoc, &File, &line, &column, &offset);
  FileName = clang_getFileName(File);
  DiagSpelling = clang_getDiagnosticSpelling(D);
  
  printIndent(indent);
  
  fprintf(stderrstderr, "%s:%d:%d: %s: %s",
          clang_getCString(FileName),
          line,
          column,
          getSeverityString(clang_getDiagnosticSeverity(D)),
          clang_getCString(DiagSpelling));

  DiagOption = clang_getDiagnosticOption(D, 0);
  DiagOptionStr = clang_getCString(DiagOption);
  if (DiagOptionStr) {
    fprintf(stderrstderr, " [%s]", DiagOptionStr);
  }
  
  DiagCat = clang_getDiagnosticCategoryText(D);
  DiagCatStr = clang_getCString(DiagCat);
  if (DiagCatStr) {
    fprintf(stderrstderr, " [%s]", DiagCatStr);
  }
  
  fprintf(stderrstderr, "\n");
  
  printRanges(D, indent);
  printFixIts(D, indent);
  
  /* Print subdiagnostics. */
  printDiagnosticSet(clang_getChildDiagnostics(D), indent+2);

  clang_disposeString(FileName);
  clang_disposeString(DiagSpelling);
  clang_disposeString(DiagOption);
  clang_disposeString(DiagCat);
}  
4502}

4504static int read_diagnostics(const char *filename) {
enum CXLoadDiag_Error error;
CXString errorString;
CXDiagnosticSet Diags = 0;

Diags = clang_loadDiagnostics(filename, &error, &errorString);
if (!Diags) {
  fprintf(stderrstderr, "Trouble deserializing file (%s): %s\n",
          getDiagnosticCodeStr(error),
          clang_getCString(errorString));
  clang_disposeString(errorString);
  return 1;
}

printDiagnosticSet(Diags, 0);
fprintf(stderrstderr, "Number of diagnostics: %d\n",
        clang_getNumDiagnosticsInSet(Diags));
clang_disposeDiagnosticSet(Diags);
return 0;
4523}

4525static int perform_print_build_session_timestamp(void) {
printf("%lld\n", clang_getBuildSessionTimestamp());
return 0;
4528}

4530/******************************************************************************/
4531/* Command line processing.                                                   */
4532/******************************************************************************/

4534static CXCursorVisitor GetVisitor(const char *s) {
if (s[0] == '\0')
  return FilteredPrintingVisitor;
if (strcmp(s, "-usrs") == 0)
  return USRVisitor;
if (strncmp(s, "-memory-usage", 13) == 0)
  return GetVisitor(s + 13);
return NULL((void*)0);
4542}

4544static void print_usage(void) {
fprintf(stderrstderr,
  "usage: c-index-test -code-completion-at=<site> <compiler arguments>\n"
  "       c-index-test -code-completion-timing=<site> <compiler arguments>\n"
  "       c-index-test -cursor-at=<site> <compiler arguments>\n"
  "       c-index-test -evaluate-cursor-at=<site> <compiler arguments>\n"
  "       c-index-test -get-macro-info-cursor-at=<site> <compiler arguments>\n"
  "       c-index-test -file-refs-at=<site> <compiler arguments>\n"
  "       c-index-test -file-includes-in=<filename> <compiler arguments>\n");
fprintf(stderrstderr,
  "       c-index-test -index-file [-check-prefix=<FileCheck prefix>] <compiler arguments>\n"
  "       c-index-test -index-file-full [-check-prefix=<FileCheck prefix>] <compiler arguments>\n"
  "       c-index-test -index-tu [-check-prefix=<FileCheck prefix>] <AST file>\n"
  "       c-index-test -index-compile-db [-check-prefix=<FileCheck prefix>] <compilation database>\n"
  "       c-index-test -test-file-scan <AST file> <source file> "
        "[FileCheck prefix]\n");
fprintf(stderrstderr,
  "       c-index-test -test-load-tu <AST file> <symbol filter> "
        "[FileCheck prefix]\n"
  "       c-index-test -test-load-tu-usrs <AST file> <symbol filter> "
         "[FileCheck prefix]\n"
  "       c-index-test -test-load-source <symbol filter> {<args>}*\n");
fprintf(stderrstderr,
  "       c-index-test -test-load-source-memory-usage "
  "<symbol filter> {<args>}*\n"
  "       c-index-test -test-load-source-reparse <trials> <symbol filter> "
  "          {<args>}*\n"
  "       c-index-test -test-load-source-usrs <symbol filter> {<args>}*\n"
  "       c-index-test -test-load-source-usrs-memory-usage "
        "<symbol filter> {<args>}*\n"
  "       c-index-test -test-annotate-tokens=<range> {<args>}*\n"
  "       c-index-test -test-inclusion-stack-source {<args>}*\n"
  "       c-index-test -test-inclusion-stack-tu <AST file>\n");
fprintf(stderrstderr,
  "       c-index-test -test-print-linkage-source {<args>}*\n"
  "       c-index-test -test-print-visibility {<args>}*\n"
  "       c-index-test -test-print-type {<args>}*\n"
  "       c-index-test -test-print-type-size {<args>}*\n"
  "       c-index-test -test-print-bitwidth {<args>}*\n"
  "       c-index-test -test-print-target-info {<args>}*\n"
  "       c-index-test -test-print-type-declaration {<args>}*\n"
  "       c-index-test -print-usr [<CursorKind> {<args>}]*\n"
  "       c-index-test -print-usr-file <file>\n");
fprintf(stderrstderr,
  "       c-index-test -write-pch <file> <compiler arguments>\n"
  "       c-index-test -compilation-db [lookup <filename>] database\n");
fprintf(stderrstderr,
  "       c-index-test -print-build-session-timestamp\n");
fprintf(stderrstderr,
  "       c-index-test -read-diagnostics <file>\n\n");
fprintf(stderrstderr,
  " <symbol filter> values:\n%s",
  "   all - load all symbols, including those from PCH\n"
  "   local - load all symbols except those in PCH\n"
  "   category - only load ObjC categories (non-PCH)\n"
  "   interface - only load ObjC interfaces (non-PCH)\n"
  "   protocol - only load ObjC protocols (non-PCH)\n"
  "   function - only load functions (non-PCH)\n"
  "   typedef - only load typdefs (non-PCH)\n"
  "   scan-function - scan function bodies (non-PCH)\n\n");
4604}

4606/***/

4608int cindextest_main(int argc, const char **argv) {
clang_enableStackTraces();
if (argc > 2 && strcmp(argv[1], "-read-diagnostics") == 0)
1
Assuming 'argc' is > 2→
2
←
Assuming the condition is false→
3
←
Taking false branch→
    return read_diagnostics(argv[2]);
if (argc > 2 && strstr(argv[1], "-code-completion-at=") == argv[1])
4
←
Assuming the condition is false→
5
←
Taking false branch→
  return perform_code_completion(argc, argv, 0);
if (argc > 2 && strstr(argv[1], "-code-completion-timing=") == argv[1])
6
←
Assuming the condition is true→
7
←
Taking true branch→
  return perform_code_completion(argc, argv, 1);
8
←
Calling 'perform_code_completion'→
if (argc > 2 && strstr(argv[1], "-cursor-at=") == argv[1])
  return inspect_cursor_at(argc, argv, "-cursor-at=", inspect_print_cursor);
if (argc > 2 && strstr(argv[1], "-evaluate-cursor-at=") == argv[1])
  return inspect_cursor_at(argc, argv, "-evaluate-cursor-at=",
                           inspect_evaluate_cursor);
if (argc > 2 && strstr(argv[1], "-get-macro-info-cursor-at=") == argv[1])
  return inspect_cursor_at(argc, argv, "-get-macro-info-cursor-at=",
                           inspect_macroinfo_cursor);
if (argc > 2 && strstr(argv[1], "-file-refs-at=") == argv[1])
  return find_file_refs_at(argc, argv);
if (argc > 2 && strstr(argv[1], "-file-includes-in=") == argv[1])
  return find_file_includes_in(argc, argv);
if (argc > 2 && strcmp(argv[1], "-index-file") == 0)
  return index_file(argc - 2, argv + 2, /*full=*/0);
if (argc > 2 && strcmp(argv[1], "-index-file-full") == 0)
  return index_file(argc - 2, argv + 2, /*full=*/1);
if (argc > 2 && strcmp(argv[1], "-index-tu") == 0)
  return index_tu(argc - 2, argv + 2);
if (argc > 2 && strcmp(argv[1], "-index-compile-db") == 0)
  return index_compile_db(argc - 2, argv + 2);
else if (argc >= 4 && strncmp(argv[1], "-test-load-tu", 13) == 0) {
  CXCursorVisitor I = GetVisitor(argv[1] + 13);
  if (I)
    return perform_test_load_tu(argv[2], argv[3], argc >= 5 ? argv[4] : 0, I,
                                NULL((void*)0));
}
else if (argc >= 5 && strncmp(argv[1], "-test-load-source-reparse", 25) == 0){
  CXCursorVisitor I = GetVisitor(argv[1] + 25);
  if (I) {
    int trials = atoi(argv[2]);
    return perform_test_reparse_source(argc - 4, argv + 4, trials, argv[3], I, 
                                       NULL((void*)0));
  }
}
else if (argc >= 4 && strncmp(argv[1], "-test-load-source", 17) == 0) {
  CXCursorVisitor I = GetVisitor(argv[1] + 17);
  
  PostVisitTU postVisit = 0;
  if (strstr(argv[1], "-memory-usage"))
    postVisit = PrintMemoryUsage;
  
  if (I)
    return perform_test_load_source(argc - 3, argv + 3, argv[2], I,
                                    postVisit);
}
else if (argc >= 3 && strcmp(argv[1], "-single-file-parse") == 0)
  return perform_single_file_parse(argv[2]);
else if (argc >= 4 && strcmp(argv[1], "-test-file-scan") == 0)
  return perform_file_scan(argv[2], argv[3],
                           argc >= 5 ? argv[4] : 0);
else if (argc > 2 && strstr(argv[1], "-test-annotate-tokens=") == argv[1])
  return perform_token_annotation(argc, argv);
else if (argc > 2 && strcmp(argv[1], "-test-inclusion-stack-source") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all", NULL((void*)0),
                                  PrintInclusionStack);
else if (argc > 2 && strcmp(argv[1], "-test-inclusion-stack-tu") == 0)
  return perform_test_load_tu(argv[2], "all", NULL((void*)0), NULL((void*)0),
                              PrintInclusionStack);
else if (argc > 2 && strcmp(argv[1], "-test-print-linkage-source") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all", PrintLinkage,
                                  NULL((void*)0));
else if (argc > 2 && strcmp(argv[1], "-test-print-visibility") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all", PrintVisibility,
                                  NULL((void*)0));
else if (argc > 2 && strcmp(argv[1], "-test-print-type") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all",
                                  PrintType, 0);
else if (argc > 2 && strcmp(argv[1], "-test-print-type-size") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all",
                                  PrintTypeSize, 0);
else if (argc > 2 && strcmp(argv[1], "-test-print-type-declaration") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all",
                                  PrintTypeDeclaration, 0);
else if (argc > 2 && strcmp(argv[1], "-test-print-bitwidth") == 0)
  return perform_test_load_source(argc - 2, argv + 2, "all",
                                  PrintBitWidth, 0);
else if (argc > 2 && strcmp(argv[1], "-test-print-mangle") == 0)
  return perform_test_load_tu(argv[2], "all", NULL((void*)0), PrintMangledName, NULL((void*)0));
else if (argc > 2 && strcmp(argv[1], "-test-print-manglings") == 0)
  return perform_test_load_tu(argv[2], "all", NULL((void*)0), PrintManglings, NULL((void*)0));
else if (argc > 2 && strcmp(argv[1], "-test-print-target-info") == 0)
  return print_target_info(argc - 2, argv + 2);
else if (argc > 1 && strcmp(argv[1], "-print-usr") == 0) {
  if (argc > 2)
    return print_usrs(argv + 2, argv + argc);
  else {
    display_usrs();
    return 1;
  }
}
else if (argc > 2 && strcmp(argv[1], "-print-usr-file") == 0)
  return print_usrs_file(argv[2]);
else if (argc > 2 && strcmp(argv[1], "-write-pch") == 0)
  return write_pch_file(argv[2], argc - 3, argv + 3);
else if (argc > 2 && strcmp(argv[1], "-compilation-db") == 0)
  return perform_test_compilation_db(argv[argc-1], argc - 3, argv + 2);
else if (argc == 2 && strcmp(argv[1], "-print-build-session-timestamp") == 0)
  return perform_print_build_session_timestamp();

print_usage();
return 1;
4717}

4719/***/

4721/* We intentionally run in a separate thread to ensure we at least minimal
* testing of a multithreaded environment (for example, having a reduced stack
* size). */

4725typedef struct thread_info {
int (*main_func)(int argc, const char **argv);
int argc;
const char **argv;
int result;
4730} thread_info;
4731void thread_runner(void *client_data_v) {
thread_info *client_data = client_data_v;
client_data->result = client_data->main_func(client_data->argc,
                                             client_data->argv);
4735}

4737static void flush_atexit(void) {
/* stdout, and surprisingly even stderr, are not always flushed on process
 * and thread exit, particularly when the system is under heavy load. */
fflush(stdoutstdout);
fflush(stderrstderr);
4742}

4744int main(int argc, const char **argv) {
thread_info client_data;

atexit(flush_atexit);

4749#ifdef CLANG_HAVE_LIBXML
LIBXML_TEST_VERSION
4751#endif

if (argc > 1 && strcmp(argv[1], "core") == 0)
  return indextest_core_main(argc, argv);

client_data.main_func = cindextest_main;
client_data.argc = argc;
client_data.argv = argv;

if (getenv("CINDEXTEST_NOTHREADS"))
  return client_data.main_func(client_data.argc, client_data.argv);

clang_executeOnThread(thread_runner, &client_data, 0);
return client_data.result;
4765}