maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity
llvm-project/flang/runtime/internal-unit.h

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

56 lines
1.9 KiB
C
Raw Normal View History

[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
//===-- runtime/internal-unit.h ---------------------------------*- C++ -*-===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
// Fortran internal I/O "units"
#ifndef FORTRAN_RUNTIME_IO_INTERNAL_UNIT_H_
#define FORTRAN_RUNTIME_IO_INTERNAL_UNIT_H_
#include "connection.h"
[flang] Move runtime API headers to flang/include/flang/Runtime Move the closure of the subset of flang/runtime/*.h header files that are referenced by source files outside flang/runtime (apart from unit tests) into a new directory (flang/include/flang/Runtime) so that relative include paths into ../runtime need not be used. flang/runtime/pgmath.h.inc is moved to flang/include/flang/Evaluate; it's not used by the runtime. Differential Revision: https://reviews.llvm.org/D109107
2021-09-02 07:00:53 +08:00
#include "flang/Runtime/descriptor.h"
[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
#include <cinttypes>
#include <type_traits>
namespace Fortran::runtime::io {
class IoErrorHandler;
// Points to (but does not own) a CHARACTER scalar or array for internal I/O.
// Does not buffer.
[flang] Reformat with latest clang-format and .clang-format Original-commit: flang-compiler/f18@9fe84f45d7fd685051004678d6b5775dcc4c6f8f Reviewed-on: https://github.com/flang-compiler/f18/pull/1094
2020-03-29 12:00:16 +08:00
template <Direction DIR> class InternalDescriptorUnit : public ConnectionState {
[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
public:
[flang] Use hash table for UnitMap, avoid C++ STL binary dependence Scan FORMAT strings locally to avoid C++ binary runtime dependence when computing deepest parenthesis nesting Remove a dependency on ostream from runtime Remove remaining direct external references from runtime to C++ library binaries Remove runtime dependences on lib/common SetPos() and SetRec() Instantiate templates for input Begin input; rearrange locking, deal with CLOSE races View() Update error message in test to agree with compiler change First cut at real input More robust I/O runtime error handling Debugging of REAL input Add iostat.{h,cpp} Rename runtime/numeric-* to runtime/edit-* Move templates around, templatize integer output editing Move LOGICAL and CHARACTER output from io-api.cpp to edit-output.cpp Change pointer argument to reference More list-directed input Complex list-directed input Use enum class Direction rather than bool for templates Catch up with changes to master Undo reformatting of Lower code Use record number instead of subscripts for internal unit Unformatted sequential backspace Testing and debugging Dodge bogus GCC warning Add <cstddef> for std::size_t to fix CI build Address review comments Original-commit: flang-compiler/f18@50406b349609efdde76e48bf2caa039d031dd1c4 Reviewed-on: https://github.com/flang-compiler/f18/pull/1053
2020-02-14 06:41:56 +08:00
using Scalar =
std::conditional_t<DIR == Direction::Input, const char *, char *>;
[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
InternalDescriptorUnit(Scalar, std::size_t);
InternalDescriptorUnit(const Descriptor &, const Terminator &);
void EndIoStatement();
[flang] Use hash table for UnitMap, avoid C++ STL binary dependence Scan FORMAT strings locally to avoid C++ binary runtime dependence when computing deepest parenthesis nesting Remove a dependency on ostream from runtime Remove remaining direct external references from runtime to C++ library binaries Remove runtime dependences on lib/common SetPos() and SetRec() Instantiate templates for input Begin input; rearrange locking, deal with CLOSE races View() Update error message in test to agree with compiler change First cut at real input More robust I/O runtime error handling Debugging of REAL input Add iostat.{h,cpp} Rename runtime/numeric-* to runtime/edit-* Move templates around, templatize integer output editing Move LOGICAL and CHARACTER output from io-api.cpp to edit-output.cpp Change pointer argument to reference More list-directed input Complex list-directed input Use enum class Direction rather than bool for templates Catch up with changes to master Undo reformatting of Lower code Use record number instead of subscripts for internal unit Unformatted sequential backspace Testing and debugging Dodge bogus GCC warning Add <cstddef> for std::size_t to fix CI build Address review comments Original-commit: flang-compiler/f18@50406b349609efdde76e48bf2caa039d031dd1c4 Reviewed-on: https://github.com/flang-compiler/f18/pull/1053
2020-02-14 06:41:56 +08:00
bool Emit(const char *, std::size_t, IoErrorHandler &);
[flang] Runtime performance improvements to real formatted input Profiling a basic internal real input read benchmark shows some hot spots in the code used to prepare input for decimal-to-binary conversion, which is of course where the time should be spent. The library that implements decimal to/from binary conversions has been optimized, but not the code in the Fortran runtime that calls it, and there are some obvious light changes worth making here. Move some member functions from *.cpp files into the class definitions of Descriptor and IoStatementState to enable inlining and specialization. Make GetNextInputBytes() the new basic input API within the runtime, replacing GetCurrentChar() -- which is rewritten in terms of GetNextInputBytes -- so that input routines can have the ability to acquire more than one input character at a time and amortize overhead. These changes speed up the time to read 1M random reals using internal I/O from a character array from 1.29s to 0.54s on my machine, which on par with Intel Fortran and much faster than GNU Fortran. Differential Revision: https://reviews.llvm.org/D113697
2021-11-03 04:01:38 +08:00
std::size_t GetNextInputBytes(const char *&, IoErrorHandler &);
[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
bool AdvanceRecord(IoErrorHandler &);
[flang] Use hash table for UnitMap, avoid C++ STL binary dependence Scan FORMAT strings locally to avoid C++ binary runtime dependence when computing deepest parenthesis nesting Remove a dependency on ostream from runtime Remove remaining direct external references from runtime to C++ library binaries Remove runtime dependences on lib/common SetPos() and SetRec() Instantiate templates for input Begin input; rearrange locking, deal with CLOSE races View() Update error message in test to agree with compiler change First cut at real input More robust I/O runtime error handling Debugging of REAL input Add iostat.{h,cpp} Rename runtime/numeric-* to runtime/edit-* Move templates around, templatize integer output editing Move LOGICAL and CHARACTER output from io-api.cpp to edit-output.cpp Change pointer argument to reference More list-directed input Complex list-directed input Use enum class Direction rather than bool for templates Catch up with changes to master Undo reformatting of Lower code Use record number instead of subscripts for internal unit Unformatted sequential backspace Testing and debugging Dodge bogus GCC warning Add <cstddef> for std::size_t to fix CI build Address review comments Original-commit: flang-compiler/f18@50406b349609efdde76e48bf2caa039d031dd1c4 Reviewed-on: https://github.com/flang-compiler/f18/pull/1053
2020-02-14 06:41:56 +08:00
void BackspaceRecord(IoErrorHandler &);
[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
private:
Descriptor &descriptor() { return staticDescriptor_.descriptor(); }
[flang] Use hash table for UnitMap, avoid C++ STL binary dependence Scan FORMAT strings locally to avoid C++ binary runtime dependence when computing deepest parenthesis nesting Remove a dependency on ostream from runtime Remove remaining direct external references from runtime to C++ library binaries Remove runtime dependences on lib/common SetPos() and SetRec() Instantiate templates for input Begin input; rearrange locking, deal with CLOSE races View() Update error message in test to agree with compiler change First cut at real input More robust I/O runtime error handling Debugging of REAL input Add iostat.{h,cpp} Rename runtime/numeric-* to runtime/edit-* Move templates around, templatize integer output editing Move LOGICAL and CHARACTER output from io-api.cpp to edit-output.cpp Change pointer argument to reference More list-directed input Complex list-directed input Use enum class Direction rather than bool for templates Catch up with changes to master Undo reformatting of Lower code Use record number instead of subscripts for internal unit Unformatted sequential backspace Testing and debugging Dodge bogus GCC warning Add <cstddef> for std::size_t to fix CI build Address review comments Original-commit: flang-compiler/f18@50406b349609efdde76e48bf2caa039d031dd1c4 Reviewed-on: https://github.com/flang-compiler/f18/pull/1053
2020-02-14 06:41:56 +08:00
const Descriptor &descriptor() const {
return staticDescriptor_.descriptor();
}
Scalar CurrentRecord() const {
return descriptor().template ZeroBasedIndexedElement<char>(
currentRecordNumber - 1);
}
[flang] Don't blank-fill remaining lines in internal output Internal writes to character arrays should not blank-fill records (elements) past the last one that was written to. Differential Revision: https://reviews.llvm.org/D117342
2022-01-06 03:42:18 +08:00
void BlankFillOutputRecord();
[flang] Progress on Fortran I/O runtime Use internal units for internal I/O state Replace use of virtual functions reference_wrapper Internal formatted output to array descriptor Delete dead code Begin list-directed internal output Refactorings and renamings for clarity List-directed external I/O (character) COMPLEX list-directed output Control list items First cut at unformatted I/O More OPEN statement work; rename class to ExternalFileUnit Complete OPEN (exc. for POSITION=), add CLOSE() OPEN(POSITION=) Flush buffers on crash and for terminal output; clean up Documentation Fix backquote in documentation Fix typo in comment Begin implementation of input Refactor binary floating-point properties to a new header, simplify numeric output editing Dodge spurious GCC 7.2 build warning Address review comments Original-commit: flang-compiler/f18@9c4bba11cf2329575ea9ee446f69e9caa797135c Reviewed-on: https://github.com/flang-compiler/f18/pull/982
2020-02-05 08:55:45 +08:00
StaticDescriptor<maxRank, true /*addendum*/> staticDescriptor_;
};
[flang] Use hash table for UnitMap, avoid C++ STL binary dependence Scan FORMAT strings locally to avoid C++ binary runtime dependence when computing deepest parenthesis nesting Remove a dependency on ostream from runtime Remove remaining direct external references from runtime to C++ library binaries Remove runtime dependences on lib/common SetPos() and SetRec() Instantiate templates for input Begin input; rearrange locking, deal with CLOSE races View() Update error message in test to agree with compiler change First cut at real input More robust I/O runtime error handling Debugging of REAL input Add iostat.{h,cpp} Rename runtime/numeric-* to runtime/edit-* Move templates around, templatize integer output editing Move LOGICAL and CHARACTER output from io-api.cpp to edit-output.cpp Change pointer argument to reference More list-directed input Complex list-directed input Use enum class Direction rather than bool for templates Catch up with changes to master Undo reformatting of Lower code Use record number instead of subscripts for internal unit Unformatted sequential backspace Testing and debugging Dodge bogus GCC warning Add <cstddef> for std::size_t to fix CI build Address review comments Original-commit: flang-compiler/f18@50406b349609efdde76e48bf2caa039d031dd1c4 Reviewed-on: https://github.com/flang-compiler/f18/pull/1053
2020-02-14 06:41:56 +08:00
extern template class InternalDescriptorUnit<Direction::Output>;
extern template class InternalDescriptorUnit<Direction::Input>;
[flang] Reformat with latest clang-format and .clang-format Original-commit: flang-compiler/f18@9fe84f45d7fd685051004678d6b5775dcc4c6f8f Reviewed-on: https://github.com/flang-compiler/f18/pull/1094
2020-03-29 12:00:16 +08:00
} // namespace Fortran::runtime::io
#endif // FORTRAN_RUNTIME_IO_INTERNAL_UNIT_H_