/home/daniel/Projects/java/jdk/src/hotspot/share/adlc/main.cpp

Bug Summary

File:	jdk/src/hotspot/share/adlc/main.cpp
Warning:	line 151, column 37 Potential leak of memory pointed to by 'AD._CPP_FORMAT_file._name'

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 main.cpp -analyzer-store=region -analyzer-opt-analyze-nested-blocks -analyzer-checker=core -analyzer-checker=apiModeling -analyzer-checker=unix -analyzer-checker=deadcode -analyzer-checker=cplusplus -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 -setup-static-analyzer -mrelocation-model static -mthread-model posix -mframe-pointer=all -fmath-errno -fno-rounding-math -masm-verbose -mconstructor-aliases -munwind-tables -target-cpu x86-64 -dwarf-column-info -fno-split-dwarf-inlining -debugger-tuning=gdb -resource-dir /usr/lib/llvm-10/lib/clang/10.0.0 -D LINUX -D ASSERT -D AMD64 -I /home/daniel/Projects/java/jdk/src/hotspot/share -internal-isystem /usr/lib/gcc/x86_64-linux-gnu/7.5.0/../../../../include/c++/7.5.0 -internal-isystem /usr/lib/gcc/x86_64-linux-gnu/7.5.0/../../../../include/x86_64-linux-gnu/c++/7.5.0 -internal-isystem /usr/lib/gcc/x86_64-linux-gnu/7.5.0/../../../../include/x86_64-linux-gnu/c++/7.5.0 -internal-isystem /usr/lib/gcc/x86_64-linux-gnu/7.5.0/../../../../include/c++/7.5.0/backward -internal-isystem /usr/local/include -internal-isystem /usr/lib/llvm-10/lib/clang/10.0.0/include -internal-externc-isystem /usr/include/x86_64-linux-gnu -internal-externc-isystem /include -internal-externc-isystem /usr/include -Wno-unused-parameter -Wno-unused -fdeprecated-macro -fdebug-compilation-dir /home/daniel/Projects/java/jdk/make/hotspot -ferror-limit 19 -fmessage-length 0 -fgnuc-version=4.2.1 -fobjc-runtime=gcc -fdiagnostics-show-option -analyzer-output=html -faddrsig -o /home/daniel/Projects/java/scan/2021-12-21-193737-8510-1 -x c++ /home/daniel/Projects/java/jdk/src/hotspot/share/adlc/main.cpp

1/*
* Copyright (c) 1997, 2021, Oracle and/or its affiliates. All rights reserved.
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* This code is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License version 2 only, as
* published by the Free Software Foundation.
*
* This code is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
* version 2 for more details (a copy is included in the LICENSE file that
* accompanied this code).
*
* You should have received a copy of the GNU General Public License version
* 2 along with this work; if not, write to the Free Software Foundation,
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
*
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
* or visit www.oracle.com if you need additional information or have any
* questions.
*
*/

25// MAIN.CPP - Entry point for the Architecture Description Language Compiler
26#include "adlc.hpp"

28//------------------------------Prototypes-------------------------------------
29static void  usage(ArchDesc& AD);          // Print usage message and exit
30static char *strip_ext(char *fname);       // Strip off name extension
31static char *base_plus_suffix(const char* base, const char *suffix);// New concatenated string
32static int get_legal_text(FileBuff &fbuf, char **legal_text); // Get pointer to legal text

34ArchDesc* globalAD = NULL__null;      // global reference to Architecture Description object

36const char* get_basename(const char* filename) {
const char *basename = filename;
const char *cp;
for (cp = basename; *cp; cp++) {
  if (*cp == '/' || *cp == '\\') {
    basename = cp+1;
  }
}
return basename;
45}

47//------------------------------main-------------------------------------------
48int main(int argc, char *argv[])
49{
ArchDesc      AD;             // Architecture Description object
globalAD = &AD;

// ResourceMark  mark;
ADLParser    *ADL_Parse;      // ADL Parser object to parse AD file

// Check for proper arguments
if( argc == 1 ) usage(AD);    // No arguments?  Then print usage
1
Assuming 'argc' is not equal to 1→
2
←
Taking false branch→

// Read command line arguments and file names
for( int i = 1; i2.1
'i' is < 'argc'
 < argc; i++ ) { // For all arguments
3
←
Loop condition is true.  Entering loop body→
9
←
Assuming 'i' is < 'argc'→
10
←
Loop condition is true.  Entering loop body→
  char *s = argv[i];          // Get option/filename

  if( *s++ == '-' ) {         // It's a flag? (not a filename)
4
←
Assuming the condition is false→
5
←
Taking false branch→
11
←
Assuming the condition is false→
12
←
Taking false branch→
    if( !*s ) {               // Stand-alone `-' means stdin
      //********** INSERT CODE HERE **********
    } else while (*s != '\0') { // While have flags on option
      switch (*s++) {         // Handle flag
      case 'd':               // Debug flag
        AD._dfa_debug += 1;   // Set Debug Flag
        break;
      case 'g':               // Debug ad location flag
        AD._adlocation_debug += 1;       // Set Debug ad location Flag
        break;
      case 'o':               // No Output Flag
        AD._no_output ^= 1;   // Toggle no_output flag
        break;
      case 'q':               // Quiet Mode Flag
        AD._quiet_mode ^= 1;  // Toggle quiet_mode flag
        break;
      case 'w':               // Disable Warnings Flag
        AD._disable_warnings ^= 1; // Toggle disable_warnings flag
        break;
      case 'T':               // Option to make DFA as many subroutine calls.
        AD._dfa_small += 1;   // Set Mode Flag
        break;
      case 'c': {             // Set C++ Output file name
        AD._CPP_file._name = s;
        const char *base = strip_ext(strdup(s));
        AD._CPP_CLONE_file._name    = base_plus_suffix(base,"_clone.cpp");
        AD._CPP_EXPAND_file._name   = base_plus_suffix(base,"_expand.cpp");
        AD._CPP_FORMAT_file._name   = base_plus_suffix(base,"_format.cpp");
        AD._CPP_GEN_file._name      = base_plus_suffix(base,"_gen.cpp");
        AD._CPP_MISC_file._name     = base_plus_suffix(base,"_misc.cpp");
        AD._CPP_PEEPHOLE_file._name = base_plus_suffix(base,"_peephole.cpp");
        AD._CPP_PIPELINE_file._name = base_plus_suffix(base,"_pipeline.cpp");
        s += strlen(s);
        break;
      }
      case 'h':               // Set C++ Output file name
        AD._HPP_file._name = s; s += strlen(s);
        break;
      case 'v':               // Set C++ Output file name
        AD._VM_file._name = s; s += strlen(s);
        break;
      case 'a':               // Set C++ Output file name
        AD._DFA_file._name = s;
        AD._bug_file._name = s;
        s += strlen(s);
        break;
      case '#':               // Special internal debug flag
        AD._adl_debug++;      // Increment internal debug level
        break;
      case 's':               // Output which instructions are cisc-spillable
        AD._cisc_spill_debug = true;
        break;
      case 'D':               // Flag Definition
        {
          char* flag = s;
          s += strlen(s);
          char* def = strchr(flag, '=');
          if (def == NULL__null)  def = (char*)"1";
          else              *def++ = '\0';
          AD.set_preproc_def(flag, def);
        }
        break;
      case 'U':               // Flag Un-Definition
        {
          char* flag = s;
          s += strlen(s);
          AD.set_preproc_def(flag, NULL__null);
        }
        break;
      default:                // Unknown option
        usage(AD);            // So print usage and exit
      }                       // End of switch on options...
    }                         // End of while have options...

  } else {                    // Not an option; must be a filename
    AD._ADL_file._name = argv[i]; // Set the input filename

    // // Files for storage, based on input file name
    const char *base = strip_ext(strdup(argv[i]));
    char       *temp = base_plus_suffix("dfa_",base);
    AD._DFA_file._name = base_plus_suffix(temp,".cpp");
    delete[] temp;
    temp = base_plus_suffix("ad_",base);
    AD._CPP_file._name          = base_plus_suffix(temp,".cpp");
    AD._CPP_CLONE_file._name    = base_plus_suffix(temp,"_clone.cpp");
    AD._CPP_EXPAND_file._name   = base_plus_suffix(temp,"_expand.cpp");
    AD._CPP_FORMAT_file._name   = base_plus_suffix(temp,"_format.cpp");
6
←
Calling 'base_plus_suffix'→
8
←
Returned allocated memory→
    AD._CPP_GEN_file._name      = base_plus_suffix(temp,"_gen.cpp");
13
←
Potential leak of memory pointed to by 'AD._CPP_FORMAT_file._name'
    AD._CPP_MISC_file._name     = base_plus_suffix(temp,"_misc.cpp");
    AD._CPP_PEEPHOLE_file._name = base_plus_suffix(temp,"_peephole.cpp");
    AD._CPP_PIPELINE_file._name = base_plus_suffix(temp,"_pipeline.cpp");
    AD._HPP_file._name = base_plus_suffix(temp,".hpp");
    delete[] temp;
    temp = base_plus_suffix("adGlobals_",base);
    AD._VM_file._name = base_plus_suffix(temp,".hpp");
    delete[] temp;
    temp = base_plus_suffix("bugs_",base);
    AD._bug_file._name = base_plus_suffix(temp,".out");
    delete[] temp;
  }                           // End of files vs options...
}                             // End of while have command line arguments

// Open files used to store the matcher and its components
if (AD.open_files() == 0) return 1; // Open all input/output files

// Build the File Buffer, Parse the input, & Generate Code
FileBuff  ADL_Buf(&AD._ADL_file, AD); // Create a file buffer for input file

// Get pointer to legal text at the beginning of AD file.
// It will be used in generated ad files.
char* legal_text;
int legal_sz = get_legal_text(ADL_Buf, &legal_text);

ADL_Parse = new ADLParser(ADL_Buf, AD); // Create a parser to parse the buffer
ADL_Parse->parse();           // Parse buffer & build description lists

if( AD._dfa_debug >= 1 ) {    // For higher debug settings, print dump
  AD.dump();
}

delete ADL_Parse;             // Delete parser

// Verify that the results of the parse are consistent
AD.verify();

// Prepare to generate the result files:
AD.generateMatchLists();
AD.identify_unique_operands();
AD.identify_cisc_spill_instructions();
AD.identify_short_branches();
// Make sure every file starts with a copyright:
AD.addSunCopyright(legal_text, legal_sz, AD._HPP_file._fp);           // .hpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_file._fp);           // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_CLONE_file._fp);     // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_EXPAND_file._fp);    // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_FORMAT_file._fp);    // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_GEN_file._fp);       // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_MISC_file._fp);      // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_PEEPHOLE_file._fp);  // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._CPP_PIPELINE_file._fp);  // .cpp
AD.addSunCopyright(legal_text, legal_sz, AD._VM_file._fp);            // .hpp
AD.addSunCopyright(legal_text, legal_sz, AD._DFA_file._fp);           // .cpp
// Add include guards for all .hpp files
AD.addIncludeGuardStart(AD._HPP_file, "GENERATED_ADFILES_AD_HPP");        // .hpp
AD.addIncludeGuardStart(AD._VM_file, "GENERATED_ADFILES_ADGLOBALS_HPP");  // .hpp
// Add includes
AD.addInclude(AD._CPP_file, "precompiled.hpp");
AD.addInclude(AD._CPP_file, "adfiles", get_basename(AD._VM_file._name));
AD.addInclude(AD._CPP_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_file, "memory/allocation.inline.hpp");
AD.addInclude(AD._CPP_file, "code/codeCache.hpp");
AD.addInclude(AD._CPP_file, "code/compiledIC.hpp");
AD.addInclude(AD._CPP_file, "code/nativeInst.hpp");
AD.addInclude(AD._CPP_file, "code/vmreg.inline.hpp");
AD.addInclude(AD._CPP_file, "gc/shared/collectedHeap.inline.hpp");
AD.addInclude(AD._CPP_file, "oops/compiledICHolder.hpp");
AD.addInclude(AD._CPP_file, "oops/compressedOops.hpp");
AD.addInclude(AD._CPP_file, "oops/markWord.hpp");
AD.addInclude(AD._CPP_file, "oops/method.hpp");
AD.addInclude(AD._CPP_file, "oops/oop.inline.hpp");
AD.addInclude(AD._CPP_file, "opto/c2_MacroAssembler.hpp");
AD.addInclude(AD._CPP_file, "opto/cfgnode.hpp");
AD.addInclude(AD._CPP_file, "opto/intrinsicnode.hpp");
AD.addInclude(AD._CPP_file, "opto/locknode.hpp");
AD.addInclude(AD._CPP_file, "opto/opcodes.hpp");
AD.addInclude(AD._CPP_file, "opto/regalloc.hpp");
AD.addInclude(AD._CPP_file, "opto/regmask.hpp");
AD.addInclude(AD._CPP_file, "opto/runtime.hpp");
AD.addInclude(AD._CPP_file, "runtime/safepointMechanism.hpp");
AD.addInclude(AD._CPP_file, "runtime/sharedRuntime.hpp");
AD.addInclude(AD._CPP_file, "runtime/stubRoutines.hpp");
AD.addInclude(AD._CPP_file, "utilities/growableArray.hpp");
AD.addInclude(AD._CPP_file, "utilities/powerOfTwo.hpp");
AD.addInclude(AD._HPP_file, "memory/allocation.hpp");
AD.addInclude(AD._HPP_file, "oops/compressedOops.hpp");
AD.addInclude(AD._HPP_file, "code/nativeInst.hpp");
AD.addInclude(AD._HPP_file, "opto/output.hpp");
AD.addInclude(AD._HPP_file, "opto/machnode.hpp");
AD.addInclude(AD._HPP_file, "opto/node.hpp");
AD.addInclude(AD._HPP_file, "opto/regalloc.hpp");
AD.addInclude(AD._HPP_file, "opto/subnode.hpp");
AD.addInclude(AD._HPP_file, "opto/vectornode.hpp");
AD.addInclude(AD._CPP_CLONE_file, "precompiled.hpp");
AD.addInclude(AD._CPP_CLONE_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_EXPAND_file, "precompiled.hpp");
AD.addInclude(AD._CPP_EXPAND_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_EXPAND_file, "oops/compressedOops.hpp");
AD.addInclude(AD._CPP_FORMAT_file, "precompiled.hpp");
AD.addInclude(AD._CPP_FORMAT_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_FORMAT_file, "compiler/oopMap.hpp");
AD.addInclude(AD._CPP_GEN_file, "precompiled.hpp");
AD.addInclude(AD._CPP_GEN_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_GEN_file, "opto/cfgnode.hpp");
AD.addInclude(AD._CPP_GEN_file, "opto/locknode.hpp");
AD.addInclude(AD._CPP_GEN_file, "opto/rootnode.hpp");
AD.addInclude(AD._CPP_MISC_file, "precompiled.hpp");
AD.addInclude(AD._CPP_MISC_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_PEEPHOLE_file, "precompiled.hpp");
AD.addInclude(AD._CPP_PEEPHOLE_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._CPP_PIPELINE_file, "precompiled.hpp");
AD.addInclude(AD._CPP_PIPELINE_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._DFA_file, "precompiled.hpp");
AD.addInclude(AD._DFA_file, "adfiles", get_basename(AD._HPP_file._name));
AD.addInclude(AD._DFA_file, "oops/compressedOops.hpp");
AD.addInclude(AD._DFA_file, "opto/cfgnode.hpp");  // Use PROB_MAX in predicate.
AD.addInclude(AD._DFA_file, "opto/intrinsicnode.hpp");
AD.addInclude(AD._DFA_file, "opto/matcher.hpp");
AD.addInclude(AD._DFA_file, "opto/narrowptrnode.hpp");
AD.addInclude(AD._DFA_file, "opto/opcodes.hpp");
AD.addInclude(AD._DFA_file, "opto/convertnode.hpp");
AD.addInclude(AD._DFA_file, "utilities/powerOfTwo.hpp");

// Make sure each .cpp file starts with include lines:
// files declaring and defining generators for Mach* Objects (hpp,cpp)
// Generate the result files:
// enumerations, class definitions, object generators, and the DFA
// file containing enumeration of machine operands & instructions (hpp)
AD.addPreHeaderBlocks(AD._HPP_file._fp);        // .hpp
AD.buildMachOperEnum(AD._HPP_file._fp);         // .hpp
AD.buildMachOpcodesEnum(AD._HPP_file._fp);      // .hpp
AD.buildMachRegisterNumbers(AD._VM_file._fp);   // VM file
AD.buildMachRegisterEncodes(AD._HPP_file._fp);  // .hpp file
AD.declareRegSizes(AD._HPP_file._fp);           // .hpp
AD.build_pipeline_enums(AD._HPP_file._fp);      // .hpp
// output definition of class "State"
AD.defineStateClass(AD._HPP_file._fp);          // .hpp
// file declaring the Mach* classes derived from MachOper and MachNode
AD.declareClasses(AD._HPP_file._fp);
// declare and define maps: in the .hpp and .cpp files respectively
AD.addSourceBlocks(AD._CPP_file._fp);           // .cpp
AD.addHeaderBlocks(AD._HPP_file._fp);           // .hpp
AD.buildReduceMaps(AD._HPP_file._fp, AD._CPP_file._fp);
AD.buildMustCloneMap(AD._HPP_file._fp, AD._CPP_file._fp);
// build CISC_spilling oracle and MachNode::cisc_spill() methods
AD.build_cisc_spill_instructions(AD._HPP_file._fp, AD._CPP_file._fp);
// define methods for machine dependent State, MachOper, and MachNode classes
AD.defineClasses(AD._CPP_file._fp);
AD.buildMachOperGenerator(AD._CPP_GEN_file._fp);// .cpp
AD.buildMachNodeGenerator(AD._CPP_GEN_file._fp);// .cpp
// define methods for machine dependent instruction matching
AD.buildInstructMatchCheck(AD._CPP_file._fp);  // .cpp
// define methods for machine dependent frame management
AD.buildFrameMethods(AD._CPP_file._fp);         // .cpp
AD.generate_needs_deep_clone_jvms(AD._CPP_file._fp);

// do this last:
AD.addPreprocessorChecks(AD._CPP_file._fp);     // .cpp
AD.addPreprocessorChecks(AD._CPP_CLONE_file._fp);     // .cpp
AD.addPreprocessorChecks(AD._CPP_EXPAND_file._fp);    // .cpp
AD.addPreprocessorChecks(AD._CPP_FORMAT_file._fp);    // .cpp
AD.addPreprocessorChecks(AD._CPP_GEN_file._fp);       // .cpp
AD.addPreprocessorChecks(AD._CPP_MISC_file._fp);      // .cpp
AD.addPreprocessorChecks(AD._CPP_PEEPHOLE_file._fp);  // .cpp
AD.addPreprocessorChecks(AD._CPP_PIPELINE_file._fp);  // .cpp

// define the finite automata that selects lowest cost production
AD.buildDFA(AD._DFA_file._fp);
// Add include guards for all .hpp files
AD.addIncludeGuardEnd(AD._HPP_file, "GENERATED_ADFILES_AD_HPP");        // .hpp
AD.addIncludeGuardEnd(AD._VM_file, "GENERATED_ADFILES_ADGLOBALS_HPP");  // .hpp

AD.close_files(0);               // Close all input/output files

// Final printout and statistics
// cout << program;

if( AD._dfa_debug & 2 ) {    // For higher debug settings, print timing info
  //    Timer t_stop;
  //    Timer t_total = t_stop - t_start; // Total running time
  //    cerr << "\n---Architecture Description Totals---\n";
  //    cerr << ", Total lines: " << TotalLines;
  //    float l = TotalLines;
  //    cerr << "\nTotal Compilation Time: " << t_total << "\n";
  //    float ft = (float)t_total;
  //    if( ft > 0.0 ) fprintf(stderr,"Lines/sec: %#5.2f\n", l/ft);
}
return (AD._syntax_errs + AD._semantic_errs + AD._internal_errs); // Bye Bye!!
341}

343//------------------------------usage------------------------------------------
344static void usage(ArchDesc& AD)
345{
printf("Architecture Description Language Compiler\n\n");
printf("Usage: adlc [-doqwTs] [-#]* [-D<FLAG>[=<DEF>]] [-U<FLAG>] [-c<CPP_FILE_NAME>] [-h<HPP_FILE_NAME>] [-a<DFA_FILE_NAME>] [-v<GLOBALS_FILE_NAME>] <ADL_FILE_NAME>\n");
printf(" d  produce DFA debugging info\n");
printf(" o  no output produced, syntax and semantic checking only\n");
printf(" q  quiet mode, supresses all non-essential messages\n");
printf(" w  suppress warning messages\n");
printf(" T  make DFA as many subroutine calls\n");
printf(" s  output which instructions are cisc-spillable\n");
printf(" D  define preprocessor symbol\n");
printf(" U  undefine preprocessor symbol\n");
printf(" c  specify CPP file name (default: %s)\n", AD._CPP_file._name);
printf(" h  specify HPP file name (default: %s)\n", AD._HPP_file._name);
printf(" a  specify DFA output file name\n");
printf(" v  specify adGlobals output file name\n");
printf(" #  increment ADL debug level\n");
printf("\n");
362}

364//------------------------------open_file------------------------------------
365int ArchDesc::open_file(bool required, ADLFILE & ADF, const char *action)
366{
if (required &&
    (ADF._fp = fopen(ADF._name, action)) == NULL__null) {
  printf("ERROR: Cannot open file for %s: %s\n", action, ADF._name);
  close_files(1);
  return 0;
}
return 1;
374}

376//------------------------------open_files-------------------------------------
377int ArchDesc::open_files(void)
378{
if (_ADL_file._name == NULL__null)
{ printf("ERROR: No ADL input file specified\n"); return 0; }

if (!open_file(true       , _ADL_file, "r"))          { return 0; }
if (!open_file(!_no_output, _DFA_file, "w"))          { return 0; }
if (!open_file(!_no_output, _HPP_file, "w"))          { return 0; }
if (!open_file(!_no_output, _CPP_file, "w"))          { return 0; }
if (!open_file(!_no_output, _CPP_CLONE_file, "w"))    { return 0; }
if (!open_file(!_no_output, _CPP_EXPAND_file, "w"))   { return 0; }
if (!open_file(!_no_output, _CPP_FORMAT_file, "w"))   { return 0; }
if (!open_file(!_no_output, _CPP_GEN_file, "w"))      { return 0; }
if (!open_file(!_no_output, _CPP_MISC_file, "w"))     { return 0; }
if (!open_file(!_no_output, _CPP_PEEPHOLE_file, "w")) { return 0; }
if (!open_file(!_no_output, _CPP_PIPELINE_file, "w")) { return 0; }
if (!open_file(!_no_output, _VM_file , "w"))          { return 0; }
if (!open_file(_dfa_debug != 0, _bug_file, "w"))    { return 0; }

return 1;
397}

399//------------------------------close_file------------------------------------
400void ArchDesc::close_file(int delete_out, ADLFILE& ADF)
401{
if (ADF._fp) {
  fclose(ADF._fp);
  if (delete_out) remove(ADF._name);
}
406}

408//------------------------------close_files------------------------------------
409void ArchDesc::close_files(int delete_out)
410{
if (_ADL_file._fp) fclose(_ADL_file._fp);

close_file(delete_out, _CPP_file);
close_file(delete_out, _CPP_CLONE_file);
close_file(delete_out, _CPP_EXPAND_file);
close_file(delete_out, _CPP_FORMAT_file);
close_file(delete_out, _CPP_GEN_file);
close_file(delete_out, _CPP_MISC_file);
close_file(delete_out, _CPP_PEEPHOLE_file);
close_file(delete_out, _CPP_PIPELINE_file);
close_file(delete_out, _HPP_file);
close_file(delete_out, _DFA_file);
close_file(delete_out, _bug_file);

if (!_quiet_mode) {
  printf("\n");
  if (_no_output || delete_out) {
    if (_ADL_file._name) printf("%s: ", _ADL_file._name);
    printf("No output produced");
  }
  else {
    if (_ADL_file._name) printf("%s --> ", _ADL_file._name);
    printf("%s, %s, %s, %s, %s, %s, %s, %s, %s, %s",
           _CPP_file._name,
           _CPP_CLONE_file._name,
           _CPP_EXPAND_file._name,
           _CPP_FORMAT_file._name,
           _CPP_GEN_file._name,
           _CPP_MISC_file._name,
           _CPP_PEEPHOLE_file._name,
           _CPP_PIPELINE_file._name,
           _HPP_file._name,
           _DFA_file._name);
  }
  printf("\n");
}
447}

449//------------------------------strip_ext--------------------------------------
450static char *strip_ext(char *fname)
451{
char *ep;

if (fname) {
  ep = fname + strlen(fname) - 1; // start at last character and look for '.'
  while (ep >= fname && *ep != '.') --ep;
  if (*ep == '.')     *ep = '\0'; // truncate string at '.'
}
return fname;
460}

462//------------------------------base_plus_suffix-------------------------------
463// New concatenated string
464static char *base_plus_suffix(const char* base, const char *suffix)
465{
int len = (int)strlen(base) + (int)strlen(suffix) + 1;

char* fname = new char[len];
7
←
Memory is allocated→
sprintf(fname,"%s%s",base,suffix);
return fname;
471}

473//------------------------------get_legal_text---------------------------------
474// Get pointer to legal text at the beginning of AD file.
475// This code assumes that a legal text starts at the beginning of .ad files,
476// is commented by "//" at each line and ends with empty line.
477//
478int get_legal_text(FileBuff &fbuf, char **legal_text)
479{
char* legal_start = fbuf.get_line();
assert(legal_start[0] == '/' && legal_start[1] == '/', "Incorrect header of AD file"){ if (!(legal_start[0] == '/' && legal_start[1] == '/'
)) { fprintf(stderr, "assert fails %s %d: %s\n", "/home/daniel/Projects/java/jdk/src/hotspot/share/adlc/main.cpp"
, 481, "Incorrect header of AD file"); abort(); }};
char* legal_end = fbuf.get_line();
assert(strncmp(legal_end, "// Copyright", 12) == 0, "Incorrect header of AD file"){ if (!(strncmp(legal_end, "// Copyright", 12) == 0)) { fprintf
(stderr, "assert fails %s %d: %s\n", "/home/daniel/Projects/java/jdk/src/hotspot/share/adlc/main.cpp"
, 483, "Incorrect header of AD file"); abort(); }};
while(legal_end[0] == '/' && legal_end[1] == '/') {
  legal_end = fbuf.get_line();
}
*legal_text = legal_start;
return (int) (legal_end - legal_start);
489}

491// VS2005 has its own definition, identical to this one.
492#if !defined(_WIN32) || defined(_WIN64) || _MSC_VER < 1400
493void *operator new( size_t size, int, const char *, int ) throw() {
return ::operator new( size );
495}
496#endif