11527a5e4SAbhina Sreeskantharajan //===- AutoConvert.cpp - Auto conversion between ASCII/EBCDIC -------------===//
21527a5e4SAbhina Sreeskantharajan //
31527a5e4SAbhina Sreeskantharajan // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
41527a5e4SAbhina Sreeskantharajan // See https://llvm.org/LICENSE.txt for license information.
51527a5e4SAbhina Sreeskantharajan // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
61527a5e4SAbhina Sreeskantharajan //
71527a5e4SAbhina Sreeskantharajan //===----------------------------------------------------------------------===//
81527a5e4SAbhina Sreeskantharajan //
91527a5e4SAbhina Sreeskantharajan // This file contains functions used for auto conversion between
101527a5e4SAbhina Sreeskantharajan // ASCII/EBCDIC codepages specific to z/OS.
111527a5e4SAbhina Sreeskantharajan //
121527a5e4SAbhina Sreeskantharajan //===----------------------------------------------------------------------===//
131527a5e4SAbhina Sreeskantharajan
141527a5e4SAbhina Sreeskantharajan #ifdef __MVS__
151527a5e4SAbhina Sreeskantharajan
161527a5e4SAbhina Sreeskantharajan #include "llvm/Support/AutoConvert.h"
171527a5e4SAbhina Sreeskantharajan #include <fcntl.h>
181527a5e4SAbhina Sreeskantharajan #include <sys/stat.h>
191527a5e4SAbhina Sreeskantharajan
disableAutoConversion(int FD)201527a5e4SAbhina Sreeskantharajan std::error_code llvm::disableAutoConversion(int FD) {
211527a5e4SAbhina Sreeskantharajan static const struct f_cnvrt Convert = {
221527a5e4SAbhina Sreeskantharajan SETCVTOFF, // cvtcmd
231527a5e4SAbhina Sreeskantharajan 0, // pccsid
241527a5e4SAbhina Sreeskantharajan (short)FT_BINARY, // fccsid
251527a5e4SAbhina Sreeskantharajan };
26*6a128750SAbhina Sreeskantharajan if (fcntl(FD, F_CONTROL_CVT, &Convert) == -1)
27*6a128750SAbhina Sreeskantharajan return std::error_code(errno, std::generic_category());
28*6a128750SAbhina Sreeskantharajan return std::error_code();
291527a5e4SAbhina Sreeskantharajan }
301527a5e4SAbhina Sreeskantharajan
enableAutoConversion(int FD)311527a5e4SAbhina Sreeskantharajan std::error_code llvm::enableAutoConversion(int FD) {
321527a5e4SAbhina Sreeskantharajan struct f_cnvrt Query = {
331527a5e4SAbhina Sreeskantharajan QUERYCVT, // cvtcmd
341527a5e4SAbhina Sreeskantharajan 0, // pccsid
351527a5e4SAbhina Sreeskantharajan 0, // fccsid
361527a5e4SAbhina Sreeskantharajan };
371527a5e4SAbhina Sreeskantharajan
381527a5e4SAbhina Sreeskantharajan if (fcntl(FD, F_CONTROL_CVT, &Query) == -1)
39*6a128750SAbhina Sreeskantharajan return std::error_code(errno, std::generic_category());
401527a5e4SAbhina Sreeskantharajan
411527a5e4SAbhina Sreeskantharajan Query.cvtcmd = SETCVTALL;
421527a5e4SAbhina Sreeskantharajan Query.pccsid =
431527a5e4SAbhina Sreeskantharajan (FD == STDIN_FILENO || FD == STDOUT_FILENO || FD == STDERR_FILENO)
441527a5e4SAbhina Sreeskantharajan ? 0
451527a5e4SAbhina Sreeskantharajan : CCSID_UTF_8;
461527a5e4SAbhina Sreeskantharajan // Assume untagged files to be IBM-1047 encoded.
471527a5e4SAbhina Sreeskantharajan Query.fccsid = (Query.fccsid == FT_UNTAGGED) ? CCSID_IBM_1047 : Query.fccsid;
48*6a128750SAbhina Sreeskantharajan if (fcntl(FD, F_CONTROL_CVT, &Query) == -1)
49*6a128750SAbhina Sreeskantharajan return std::error_code(errno, std::generic_category());
50*6a128750SAbhina Sreeskantharajan return std::error_code();
511527a5e4SAbhina Sreeskantharajan }
521527a5e4SAbhina Sreeskantharajan
setFileTag(int FD,int CCSID,bool Text)531527a5e4SAbhina Sreeskantharajan std::error_code llvm::setFileTag(int FD, int CCSID, bool Text) {
541527a5e4SAbhina Sreeskantharajan assert((!Text || (CCSID != FT_UNTAGGED && CCSID != FT_BINARY)) &&
551527a5e4SAbhina Sreeskantharajan "FT_UNTAGGED and FT_BINARY are not allowed for text files");
561527a5e4SAbhina Sreeskantharajan struct file_tag Tag;
571527a5e4SAbhina Sreeskantharajan Tag.ft_ccsid = CCSID;
581527a5e4SAbhina Sreeskantharajan Tag.ft_txtflag = Text;
591527a5e4SAbhina Sreeskantharajan Tag.ft_deferred = 0;
601527a5e4SAbhina Sreeskantharajan Tag.ft_rsvflags = 0;
611527a5e4SAbhina Sreeskantharajan
62*6a128750SAbhina Sreeskantharajan if (fcntl(FD, F_SETTAG, &Tag) == -1)
63*6a128750SAbhina Sreeskantharajan return std::error_code(errno, std::generic_category());
64*6a128750SAbhina Sreeskantharajan return std::error_code();
651527a5e4SAbhina Sreeskantharajan }
661527a5e4SAbhina Sreeskantharajan
671527a5e4SAbhina Sreeskantharajan #endif // __MVS__
68