Command.h

//===-- Command.cpp -- generate command line runtime API calls ------------===//
//
// 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
//
//===----------------------------------------------------------------------===//
 
#ifndef FORTRAN_OPTIMIZER_BUILDER_RUNTIME_COMMAND_H
#define FORTRAN_OPTIMIZER_BUILDER_RUNTIME_COMMAND_H
 
namespace mlir {
class Value;
class Location;
} // namespace mlir
 
namespace fir {
class FirOpBuilder;
} // namespace fir
 
namespace fir::runtime {

mlir::Value genCommandArgumentCount(fir::FirOpBuilder &, mlir::Location);

mlir::Value genGetCommand(fir::FirOpBuilder &, mlir::Location,
                          mlir::Value command, mlir::Value length,
                          mlir::Value errmsg);

mlir::Value genGetPID(fir::FirOpBuilder &, mlir::Location);

mlir::Value genGetCommandArgument(fir::FirOpBuilder &, mlir::Location,
                                  mlir::Value number, mlir::Value value,
                                  mlir::Value length, mlir::Value errmsg);

mlir::Value genGetEnvVariable(fir::FirOpBuilder &, mlir::Location,
                              mlir::Value name, mlir::Value value,
                              mlir::Value length, mlir::Value trimName,
                              mlir::Value errmsg);

mlir::Value genGetCwd(fir::FirOpBuilder &builder, mlir::Location loc,
                      mlir::Value c);

mlir::Value genHostnm(fir::FirOpBuilder &builder, mlir::Location loc,
                      mlir::Value res);

void genPerror(fir::FirOpBuilder &builder, mlir::Location loc,
               mlir::Value string);

mlir::Value genPutEnv(fir::FirOpBuilder &builder, mlir::Location loc,
                      mlir::Value str, mlir::Value strLength);

mlir::Value genUnlink(fir::FirOpBuilder &builder, mlir::Location loc,
                      mlir::Value path, mlir::Value pathLength);
 
} // namespace fir::runtime
#endif // FORTRAN_OPTIMIZER_BUILDER_RUNTIME_COMMAND_H