1 files changed, 116 insertions, 0 deletions
diff --git a/private/crt32/stdio/rmtmp.c b/private/crt32/stdio/rmtmp.c
new file mode 100644
index 000000000..5dca9e723
--- /dev/null
+++ b/private/crt32/stdio/rmtmp.c
@@ -0,0 +1,116 @@
+/***
+*rmtmp.c - remove temporary files created by tmpfile.
+*
+*	Copyright (c) 1985-1992, Microsoft Corporation. All rights reserved.
+*
+*Purpose:
+*
+*Revision History:
+*	09-15-83  TC	initial version
+*	11-02-87  JCR	Multi-thread support
+*	12-11-87  JCR	Added "_LOAD_DS" to declaration
+*	05-27-88  PHG	Merged normal and DLL versions
+*	06-10-88  JCR	Use near pointer to reference _iob[] entries
+*	08-18-89  GJF	Clean up, now specific to OS/2 2.0 (i.e., 386 flat
+*			model). Also fixed copyright and indents.
+*	02-15-90  GJF	Fixed copyright
+*	03-19-90  GJF	Made calling type _CALLTYPE1, added #include
+*			<cruntime.h> and removed #include <register.h>.
+*	10-03-90  GJF	New-style function declarator.
+*	01-21-91  GJF	ANSI naming.
+*	07-30-91  GJF	Added support for termination scheme used on
+*			non-Cruiser targets [_WIN32_].
+*	03-11-92  GJF	Replaced _tmpnum(stream) with stream->_tmpfname for
+*			Win32.
+*	03-17-92  GJF	Got rid of definition of _tmpoff.
+*	03-31-92  GJF	Merged with Stevesa's changes.
+*	04-16-92  GJF	Merged with Darekm's changes.
+*
+*******************************************************************************/
+
+#include <cruntime.h>
+#include <stdio.h>
+#include <file2.h>
+#include <internal.h>
+#include <os2dll.h>
+
+
+#if defined(_MSC_VER) && defined(_WIN32)
+
+#pragma data_seg(".CRT$XPX")
+static void (__cdecl *pterm)(void) = _rmtmp;
+#pragma data_seg()
+
+#endif	/* _MSC_VER */
+
+#ifdef	_WIN32
+
+/*
+ * Definitions for _tmpoff, _tempoff and _old_pfxlen. These will cause this
+ * module to be linked in whenever the termination code needs it.
+ */
+unsigned _tmpoff = 1;
+unsigned _tempoff = 1;
+unsigned _old_pfxlen = 0;
+#else	/* ndef _WIN32 */
+/*
+ * Definitions for _tmpoff, _tempoff and _old_pfxlen. These will cause this
+ * module to be linked in whenever the termination code needs it.
+ */
+extern unsigned _tmpoff;	/* = 1 */
+extern unsigned _tempoff;	/* = 1 */
+extern unsigned _old_pfxlen;	/* = 0 */
+
+#endif
+
+/***
+*int _rmtmp() - closes and removes temp files created by tmpfile
+*
+*Purpose:
+*	closes and deletes all open files that were created by tmpfile.
+*
+*Entry:
+*	None.
+*
+*Exit:
+*	returns number of streams closed
+*
+*Exceptions:
+*
+*******************************************************************************/
+
+int _CALLTYPE1 _rmtmp (
+	void
+	)
+{
+	REG1 FILE *stream = _iob;
+	REG2 int count = 0;
+#ifdef MTHREAD
+	int index;
+#endif
+
+	_mlock(_IOB_SCAN_LOCK);
+
+	for (; stream <= _lastiob; stream++) {
+
+#ifdef MTHREAD
+		index = _iob_index(stream);
+#endif
+		_lock_str(index);
+
+#ifdef	_CRUISER_
+		if (inuse(stream) && _tmpnum(stream) ) {
+#else	/* ndef _CRUISER_ */
+		if (inuse(stream) && (stream->_tmpfname != NULL) ) {
+#endif	/* _CRUISER_ */
+			_fclose_lk(stream);
+			count++;
+		}
+
+		_unlock_str(index);
+	}
+
+	_munlock(_IOB_SCAN_LOCK);
+
+	return(count);
+}