text: /*********************************************************
  
      msvcrtmodule.c
  
      A Python interface to the Microsoft Visual C Runtime
      Library, providing access to those non-portable, but
      still useful routines.
  
      Only ever compiled with an MS compiler, so no attempt
      has been made to avoid MS language extensions, etc...
  
      This may only work on NT or 95...
  
      Author: Mark Hammond and Guido van Rossum.
      Maintenance: Guido van Rossum.
  
  ***********************************************************/
  
  #include "Python.h"
  #include "malloc.h"
  #include <io.h>
  #include <conio.h>
  #include <sys/locking.h>
  #include <crtdbg.h>
  #include <windows.h>
  
  #ifdef _MSC_VER
  #if _MSC_VER >= 1500 && _MSC_VER < 1600
  #include <crtassem.h>
  #elif _MSC_VER >= 1600
  #include <crtversion.h>
  #endif
  #endif
  
  /*[python input]
  class HANDLE_converter(CConverter):
      type = 'void *'
      format_unit = '"_Py_PARSE_UINTPTR"'
  
  class HANDLE_return_converter(CReturnConverter):
      type = 'void *'
  
      def render(self, function, data):
          self.declare(data)
          self.err_occurred_if(
              "_return_value == NULL || _return_value == INVALID_HANDLE_VALUE",
              data)
          data.return_conversion.append(
              'return_value = PyLong_FromVoidPtr(_return_value);\n')
  
  class byte_char_return_converter(CReturnConverter):
      type = 'int'
  
      def render(self, function, data):
          data.declarations.append('char s[1];')
          data.return_value = 's[0]'
          data.return_conversion.append(
              'return_value = PyBytes_FromStringAndSize(s, 1);\n')
  
  class wchar_t_return_converter(CReturnConverter):
      type = 'wchar_t'
  
      def render(self, function, data):
          self.declare(data)
          data.return_conversion.append(
              'return_value = PyUnicode_FromOrdinal(_return_value);\n')
  [python start generated code]*/
  /*[python end generated code: output=da39a3ee5e6b4b0d input=d102511df3cda2eb]*/
  
  /*[clinic input]
  module msvcrt
  [clinic start generated code]*/
  /*[clinic end generated code: output=da39a3ee5e6b4b0d input=f31a87a783d036cd]*/
  
  #include "clinic/msvcrtmodule.c.h"
  
  /*[clinic input]
  msvcrt.heapmin
  
  Minimize the malloc() heap.
  
  Force the malloc() heap to clean itself up and return unused blocks
  to the operating system. On failure, this raises OSError.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_heapmin_impl(PyObject *module)
  /*[clinic end generated code: output=1ba00f344782dc19 input=82e1771d21bde2d8]*/
  {
      if (_heapmin() != 0)
          return PyErr_SetFromErrno(PyExc_OSError);
  
      Py_RETURN_NONE;
  }
  /*[clinic input]
  msvcrt.locking
  
      fd: int
      mode: int
      nbytes: long
      /
  
  Lock part of a file based on file descriptor fd from the C runtime.
  
  Raises OSError on failure. The locked region of the file extends from
  the current file position for nbytes bytes, and may continue beyond
  the end of the file. mode must be one of the LK_* constants listed
  below. Multiple regions in a file may be locked at the same time, but
  may not overlap. Adjacent regions are not merged; they must be unlocked
  individually.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_locking_impl(PyObject *module, int fd, int mode, long nbytes)
  /*[clinic end generated code: output=a4a90deca9785a03 input=e97bd15fc4a04fef]*/
  {
      int err;
  
      if (PySys_Audit("msvcrt.locking", "iil", fd, mode, nbytes) < 0) {
          return NULL;
      }
  
      Py_BEGIN_ALLOW_THREADS
      _Py_BEGIN_SUPPRESS_IPH
      err = _locking(fd, mode, nbytes);
      _Py_END_SUPPRESS_IPH
      Py_END_ALLOW_THREADS
      if (err != 0)
          return PyErr_SetFromErrno(PyExc_OSError);
  
      Py_RETURN_NONE;
  }
  
  /*[clinic input]
  msvcrt.setmode -> long
  
      fd: int
      mode as flags: int
      /
  
  Set the line-end translation mode for the file descriptor fd.
  
  To set it to text mode, flags should be os.O_TEXT; for binary, it
  should be os.O_BINARY.
  
  Return value is the previous mode.
  [clinic start generated code]*/
  
  static long
  msvcrt_setmode_impl(PyObject *module, int fd, int flags)
  /*[clinic end generated code: output=24a9be5ea07ccb9b input=76e7c01f6b137f75]*/
  {
      _Py_BEGIN_SUPPRESS_IPH
      flags = _setmode(fd, flags);
      _Py_END_SUPPRESS_IPH
      if (flags == -1)
          PyErr_SetFromErrno(PyExc_OSError);
  
      return flags;
  }
  
  /*[clinic input]
  msvcrt.open_osfhandle -> long
  
      handle: HANDLE
      flags: int
      /
  
  Create a C runtime file descriptor from the file handle handle.
  
  The flags parameter should be a bitwise OR of os.O_APPEND, os.O_RDONLY,
  and os.O_TEXT. The returned file descriptor may be used as a parameter
  to os.fdopen() to create a file object.
  [clinic start generated code]*/
  
  static long
  msvcrt_open_osfhandle_impl(PyObject *module, void *handle, int flags)
  /*[clinic end generated code: output=b2fb97c4b515e4e6 input=d5db190a307cf4bb]*/
  {
      int fd;
  
      if (PySys_Audit("msvcrt.open_osfhandle", "Ki", handle, flags) < 0) {
          return -1;
      }
  
      _Py_BEGIN_SUPPRESS_IPH
      fd = _open_osfhandle((intptr_t)handle, flags);
      _Py_END_SUPPRESS_IPH
      if (fd == -1)
          PyErr_SetFromErrno(PyExc_OSError);
  
      return fd;
  }
  
  /*[clinic input]
  msvcrt.get_osfhandle -> HANDLE
  
      fd: int
      /
  
  Return the file handle for the file descriptor fd.
  
  Raises OSError if fd is not recognized.
  [clinic start generated code]*/
  
  static void *
  msvcrt_get_osfhandle_impl(PyObject *module, int fd)
  /*[clinic end generated code: output=aca01dfe24637374 input=5fcfde9b17136aa2]*/
  {
      intptr_t handle = -1;
  
      if (PySys_Audit("msvcrt.get_osfhandle", "(i)", fd) < 0) {
          return NULL;
      }
  
      _Py_BEGIN_SUPPRESS_IPH
      handle = _get_osfhandle(fd);
      _Py_END_SUPPRESS_IPH
      if (handle == -1)
          PyErr_SetFromErrno(PyExc_OSError);
  
      return (HANDLE)handle;
  }
  
  /* Console I/O */
  /*[clinic input]
  msvcrt.kbhit -> long
  
  Return true if a keypress is waiting to be read.
  [clinic start generated code]*/
  
  static long
  msvcrt_kbhit_impl(PyObject *module)
  /*[clinic end generated code: output=940dfce6587c1890 input=e70d678a5c2f6acc]*/
  {
      return _kbhit();
  }
  
  /*[clinic input]
  msvcrt.getch -> byte_char
  
  Read a keypress and return the resulting character as a byte string.
  
  Nothing is echoed to the console. This call will block if a keypress is
  not already available, but will not wait for Enter to be pressed. If the
  pressed key was a special function key, this will return '\000' or
  '\xe0'; the next call will return the keycode. The Control-C keypress
  cannot be read with this function.
  [clinic start generated code]*/
  
  static int
  msvcrt_getch_impl(PyObject *module)
  /*[clinic end generated code: output=a4e51f0565064a7d input=37a40cf0ed0d1153]*/
  {
      int ch;
  
      Py_BEGIN_ALLOW_THREADS
      ch = _getch();
      Py_END_ALLOW_THREADS
      return ch;
  }
  
  /*[clinic input]
  msvcrt.getwch -> wchar_t
  
  Wide char variant of getch(), returning a Unicode value.
  [clinic start generated code]*/
  
  static wchar_t
  msvcrt_getwch_impl(PyObject *module)
  /*[clinic end generated code: output=be9937494e22f007 input=27b3dec8ad823d7c]*/
  {
      wchar_t ch;
  
      Py_BEGIN_ALLOW_THREADS
      ch = _getwch();
      Py_END_ALLOW_THREADS
      return ch;
  }
  
  /*[clinic input]
  msvcrt.getche -> byte_char
  
  Similar to getch(), but the keypress will be echoed if possible.
  [clinic start generated code]*/
  
  static int
  msvcrt_getche_impl(PyObject *module)
  /*[clinic end generated code: output=d8f7db4fd2990401 input=43311ade9ed4a9c0]*/
  {
      int ch;
  
      Py_BEGIN_ALLOW_THREADS
      ch = _getche();
      Py_END_ALLOW_THREADS
      return ch;
  }
  
  /*[clinic input]
  msvcrt.getwche -> wchar_t
  
  Wide char variant of getche(), returning a Unicode value.
  [clinic start generated code]*/
  
  static wchar_t
  msvcrt_getwche_impl(PyObject *module)
  /*[clinic end generated code: output=d0dae5ba3829d596 input=49337d59d1a591f8]*/
  {
      wchar_t ch;
  
      Py_BEGIN_ALLOW_THREADS
      ch = _getwche();
      Py_END_ALLOW_THREADS
      return ch;
  }
  
  /*[clinic input]
  msvcrt.putch
  
      char: char
      /
  
  Print the byte string char to the console without buffering.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_putch_impl(PyObject *module, char char_value)
  /*[clinic end generated code: output=92ec9b81012d8f60 input=ec078dd10cb054d6]*/
  {
      _Py_BEGIN_SUPPRESS_IPH
      _putch(char_value);
      _Py_END_SUPPRESS_IPH
      Py_RETURN_NONE;
  }
  
  /*[clinic input]
  msvcrt.putwch
  
      unicode_char: int(accept={str})
      /
  
  Wide char variant of putch(), accepting a Unicode value.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_putwch_impl(PyObject *module, int unicode_char)
  /*[clinic end generated code: output=a3bd1a8951d28eee input=996ccd0bbcbac4c3]*/
  {
      _Py_BEGIN_SUPPRESS_IPH
      _putwch(unicode_char);
      _Py_END_SUPPRESS_IPH
      Py_RETURN_NONE;
  
  }
  
  /*[clinic input]
  msvcrt.ungetch
  
      char: char
      /
  
  Opposite of getch.
  
  Cause the byte string char to be "pushed back" into the
  console buffer; it will be the next character read by
  getch() or getche().
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_ungetch_impl(PyObject *module, char char_value)
  /*[clinic end generated code: output=c6942a0efa119000 input=22f07ee9001bbf0f]*/
  {
      int res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = _ungetch(char_value);
      _Py_END_SUPPRESS_IPH
  
      if (res == EOF)
          return PyErr_SetFromErrno(PyExc_OSError);
      Py_RETURN_NONE;
  }
  
  /*[clinic input]
  msvcrt.ungetwch
  
      unicode_char: int(accept={str})
      /
  
  Wide char variant of ungetch(), accepting a Unicode value.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_ungetwch_impl(PyObject *module, int unicode_char)
  /*[clinic end generated code: output=e63af05438b8ba3d input=83ec0492be04d564]*/
  {
      int res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = _ungetwch(unicode_char);
      _Py_END_SUPPRESS_IPH
  
      if (res == WEOF)
          return PyErr_SetFromErrno(PyExc_OSError);
      Py_RETURN_NONE;
  }
  
  #ifdef _DEBUG
  /*[clinic input]
  msvcrt.CrtSetReportFile -> HANDLE
  
      type: int
      file: HANDLE
      /
  
  Wrapper around _CrtSetReportFile.
  
  Only available on Debug builds.
  [clinic start generated code]*/
  
  static void *
  msvcrt_CrtSetReportFile_impl(PyObject *module, int type, void *file)
  /*[clinic end generated code: output=9393e8c77088bbe9 input=290809b5f19e65b9]*/
  {
      HANDLE res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = _CrtSetReportFile(type, file);
      _Py_END_SUPPRESS_IPH
  
      return res;
  }
  
  /*[clinic input]
  msvcrt.CrtSetReportMode -> long
  
      type: int
      mode: int
      /
  
  Wrapper around _CrtSetReportMode.
  
  Only available on Debug builds.
  [clinic start generated code]*/
  
  static long
  msvcrt_CrtSetReportMode_impl(PyObject *module, int type, int mode)
  /*[clinic end generated code: output=b2863761523de317 input=9319d29b4319426b]*/
  {
      int res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = _CrtSetReportMode(type, mode);
      _Py_END_SUPPRESS_IPH
      if (res == -1)
          PyErr_SetFromErrno(PyExc_OSError);
      return res;
  }
  
  /*[clinic input]
  msvcrt.set_error_mode -> long
  
      mode: int
      /
  
  Wrapper around _set_error_mode.
  
  Only available on Debug builds.
  [clinic start generated code]*/
  
  static long
  msvcrt_set_error_mode_impl(PyObject *module, int mode)
  /*[clinic end generated code: output=ac4a09040d8ac4e3 input=046fca59c0f20872]*/
  {
      long res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = _set_error_mode(mode);
      _Py_END_SUPPRESS_IPH
  
      return res;
  }
  #endif /* _DEBUG */
  
  /*[clinic input]
  msvcrt.GetErrorMode
  
  Wrapper around GetErrorMode.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_GetErrorMode_impl(PyObject *module)
  /*[clinic end generated code: output=3103fc6145913591 input=5a7fb083b6dd71fd]*/
  {
      unsigned int res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = GetErrorMode();
      _Py_END_SUPPRESS_IPH
  
      return PyLong_FromUnsignedLong(res);
  }
  
  /*[clinic input]
  msvcrt.SetErrorMode
  
      mode: unsigned_int(bitwise=True)
      /
  
  Wrapper around SetErrorMode.
  [clinic start generated code]*/
  
  static PyObject *
  msvcrt_SetErrorMode_impl(PyObject *module, unsigned int mode)
  /*[clinic end generated code: output=01d529293f00da8f input=d8b167258d32d907]*/
  {
      unsigned int res;
  
      _Py_BEGIN_SUPPRESS_IPH
      res = SetErrorMode(mode);
      _Py_END_SUPPRESS_IPH
  
      return PyLong_FromUnsignedLong(res);
  }
  
  /*[clinic input]
  [clinic start generated code]*/
  /*[clinic end generated code: output=da39a3ee5e6b4b0d input=da39a3ee5e6b4b0d]*/
  
  /* List of functions exported by this module */
  static struct PyMethodDef msvcrt_functions[] = {
      MSVCRT_HEAPMIN_METHODDEF
      MSVCRT_LOCKING_METHODDEF
      MSVCRT_SETMODE_METHODDEF
      MSVCRT_OPEN_OSFHANDLE_METHODDEF
      MSVCRT_GET_OSFHANDLE_METHODDEF
      MSVCRT_KBHIT_METHODDEF
      MSVCRT_GETCH_METHODDEF
      MSVCRT_GETCHE_METHODDEF
      MSVCRT_PUTCH_METHODDEF
      MSVCRT_UNGETCH_METHODDEF
      MSVCRT_GETERRORMODE_METHODDEF
      MSVCRT_SETERRORMODE_METHODDEF
      MSVCRT_CRTSETREPORTFILE_METHODDEF
      MSVCRT_CRTSETREPORTMODE_METHODDEF
      MSVCRT_SET_ERROR_MODE_METHODDEF
      MSVCRT_GETWCH_METHODDEF
      MSVCRT_GETWCHE_METHODDEF
      MSVCRT_PUTWCH_METHODDEF
      MSVCRT_UNGETWCH_METHODDEF
      {NULL,                      NULL}
  };
  
  
  static struct PyModuleDef msvcrtmodule = {
      PyModuleDef_HEAD_INIT,
      "msvcrt",
      NULL,
      -1,
      msvcrt_functions,
      NULL,
      NULL,
      NULL,
      NULL
  };
  
  static void
  insertint(PyObject *d, char *name, int value)
  {
      PyObject *v = PyLong_FromLong((long) value);
      if (v == NULL) {
          /* Don't bother reporting this error */
          PyErr_Clear();
      }
      else {
          PyDict_SetItemString(d, name, v);
          Py_DECREF(v);
      }
  }
  
  static void
  insertptr(PyObject *d, char *name, void *value)
  {
      PyObject *v = PyLong_FromVoidPtr(value);
      if (v == NULL) {
          /* Don't bother reporting this error */
          PyErr_Clear();
      }
      else {
          PyDict_SetItemString(d, name, v);
          Py_DECREF(v);
      }
  }
  
  PyMODINIT_FUNC
  PyInit_msvcrt(void)
  {
      int st;
      PyObject *d, *version;
      PyObject *m = PyModule_Create(&msvcrtmodule);
      if (m == NULL)
          return NULL;
      d = PyModule_GetDict(m);
  
      /* constants for the locking() function's mode argument */
      insertint(d, "LK_LOCK", _LK_LOCK);
      insertint(d, "LK_NBLCK", _LK_NBLCK);
      insertint(d, "LK_NBRLCK", _LK_NBRLCK);
      insertint(d, "LK_RLCK", _LK_RLCK);
      insertint(d, "LK_UNLCK", _LK_UNLCK);
      insertint(d, "SEM_FAILCRITICALERRORS", SEM_FAILCRITICALERRORS);
      insertint(d, "SEM_NOALIGNMENTFAULTEXCEPT", SEM_NOALIGNMENTFAULTEXCEPT);
      insertint(d, "SEM_NOGPFAULTERRORBOX", SEM_NOGPFAULTERRORBOX);
      insertint(d, "SEM_NOOPENFILEERRORBOX", SEM_NOOPENFILEERRORBOX);
  #ifdef _DEBUG
      insertint(d, "CRT_WARN", _CRT_WARN);
      insertint(d, "CRT_ERROR", _CRT_ERROR);
      insertint(d, "CRT_ASSERT", _CRT_ASSERT);
      insertint(d, "CRTDBG_MODE_DEBUG", _CRTDBG_MODE_DEBUG);
      insertint(d, "CRTDBG_MODE_FILE", _CRTDBG_MODE_FILE);
      insertint(d, "CRTDBG_MODE_WNDW", _CRTDBG_MODE_WNDW);
      insertint(d, "CRTDBG_REPORT_MODE", _CRTDBG_REPORT_MODE);
      insertptr(d, "CRTDBG_FILE_STDERR", _CRTDBG_FILE_STDERR);
      insertptr(d, "CRTDBG_FILE_STDOUT", _CRTDBG_FILE_STDOUT);
      insertptr(d, "CRTDBG_REPORT_FILE", _CRTDBG_REPORT_FILE);
  #endif
  
      /* constants for the crt versions */
  #ifdef _VC_ASSEMBLY_PUBLICKEYTOKEN
      st = PyModule_AddStringConstant(m, "VC_ASSEMBLY_PUBLICKEYTOKEN",
                                      _VC_ASSEMBLY_PUBLICKEYTOKEN);
      if (st < 0) return NULL;
  #endif
  #ifdef _CRT_ASSEMBLY_VERSION
      st = PyModule_AddStringConstant(m, "CRT_ASSEMBLY_VERSION",
                                      _CRT_ASSEMBLY_VERSION);
      if (st < 0) return NULL;
  #endif
  #ifdef __LIBRARIES_ASSEMBLY_NAME_PREFIX
      st = PyModule_AddStringConstant(m, "LIBRARIES_ASSEMBLY_NAME_PREFIX",
                                      __LIBRARIES_ASSEMBLY_NAME_PREFIX);
      if (st < 0) return NULL;
  #endif
  
      /* constants for the 2010 crt versions */
  #if defined(_VC_CRT_MAJOR_VERSION) && defined (_VC_CRT_MINOR_VERSION) && defined(_VC_CRT_BUILD_VERSION) && defined(_VC_CRT_RBUILD_VERSION)
      version = PyUnicode_FromFormat("%d.%d.%d.%d", _VC_CRT_MAJOR_VERSION,
                                                    _VC_CRT_MINOR_VERSION,
                                                    _VC_CRT_BUILD_VERSION,
                                                    _VC_CRT_RBUILD_VERSION);
      st = PyModule_AddObject(m, "CRT_ASSEMBLY_VERSION", version);
      if (st < 0) return NULL;
  #endif
      /* make compiler warning quiet if st is unused */
      (void)st;
  
      return m;
  }
  