From 07d2af338e237889ff453a3a774522b9b0021439 Mon Sep 17 00:00:00 2001
From: rubidium <rubidium@openttd.org>
Date: Tue, 1 Sep 2009 10:07:22 +0000
Subject: (svn r17339) -Codechange: move thread related files to their own
 directory (like done for video, music, sound, etc)

---
 src/thread/thread_os2.cpp | 123 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 123 insertions(+)
 create mode 100644 src/thread/thread_os2.cpp

(limited to 'src/thread/thread_os2.cpp')

diff --git a/src/thread/thread_os2.cpp b/src/thread/thread_os2.cpp
new file mode 100644
index 000000000..1145e8e41
--- /dev/null
+++ b/src/thread/thread_os2.cpp
@@ -0,0 +1,123 @@
+/* $Id$ */
+
+/*
+ * This file is part of OpenTTD.
+ * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
+ * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** @file thread_os2.cpp OS/2 implementation of Threads. */
+
+#include "../stdafx.h"
+#include "thread.h"
+
+#define INCL_DOS
+#include <os2.h>
+#include <process.h>
+
+/**
+ * OS/2 version for ThreadObject.
+ */
+class ThreadObject_OS2 : public ThreadObject {
+private:
+	TID thread;          ///< System thread identifier.
+	OTTDThreadFunc proc; ///< External thread procedure.
+	void *param;         ///< Parameter for the external thread procedure.
+	bool self_destruct;  ///< Free ourselves when done?
+
+public:
+	/**
+	 * Create a thread and start it, calling proc(param).
+	 */
+	ThreadObject_OS2(OTTDThreadFunc proc, void *param, bool self_destruct) :
+		thread(0),
+		proc(proc),
+		param(param),
+		self_destruct(self_destruct)
+	{
+		thread = _beginthread(stThreadProc, NULL, 32768, this);
+	}
+
+	/* virtual */ bool Exit()
+	{
+		_endthread();
+		return true;
+	}
+
+	/* virtual */ void Join()
+	{
+		DosWaitThread(&this->thread, DCWW_WAIT);
+		this->thread = 0;
+	}
+private:
+	/**
+	 * On thread creation, this function is called, which calls the real startup
+	 *  function. This to get back into the correct instance again.
+	 */
+	static void stThreadProc(void *thr)
+	{
+		((ThreadObject_OS2 *)thr)->ThreadProc();
+	}
+
+	/**
+	 * A new thread is created, and this function is called. Call the custom
+	 *  function of the creator of the thread.
+	 */
+	void ThreadProc()
+	{
+		/* Call the proc of the creator to continue this thread */
+		try {
+			this->proc(this->param);
+		} catch (OTTDThreadExitSignal e) {
+		} catch (...) {
+			NOT_REACHED();
+		}
+
+		if (self_destruct) {
+			this->Exit();
+			delete this;
+		}
+	}
+};
+
+/* static */ bool ThreadObject::New(OTTDThreadFunc proc, void *param, ThreadObject **thread)
+{
+	ThreadObject *to = new ThreadObject_OS2(proc, param, thread == NULL);
+	if (thread != NULL) *thread = to;
+	return true;
+}
+
+/**
+ * OS/2 version of ThreadMutex.
+ */
+class ThreadMutex_OS2 : public ThreadMutex {
+private:
+	HMTX mutex;
+
+public:
+	ThreadMutex_OS2()
+	{
+		DosCreateMutexSem(NULL, &mutex, 0, FALSE);
+	}
+
+	/* virtual */ ~ThreadMutex_OS2()
+	{
+		DosCloseMutexSem(mutex);
+	}
+
+	/* virtual */ void BeginCritical()
+	{
+		DosRequestMutexSem(mutex, (unsigned long) SEM_INDEFINITE_WAIT);
+	}
+
+	/* virtual */ void EndCritical()
+	{
+		DosReleaseMutexSem(mutex);
+	}
+};
+
+/* static */ ThreadMutex *ThreadMutex::New()
+{
+	return new ThreadMutex_OS2();
+}
-- 
cgit v1.2.3-54-g00ecf