summaryrefslogtreecommitdiff
path: root/support/dktools/dk4exepw.ctr
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /support/dktools/dk4exepw.ctr
Initial commit
Diffstat (limited to 'support/dktools/dk4exepw.ctr')
-rw-r--r--support/dktools/dk4exepw.ctr187
1 files changed, 187 insertions, 0 deletions
diff --git a/support/dktools/dk4exepw.ctr b/support/dktools/dk4exepw.ctr
new file mode 100644
index 0000000000..fab30cc3ca
--- /dev/null
+++ b/support/dktools/dk4exepw.ctr
@@ -0,0 +1,187 @@
+%% options
+
+copyright owner = Dirk Krause
+copyright year = 2015-xxxx
+license = bsd
+
+
+
+%% header
+
+/** @file
+ Find name of executed file.
+*/
+
+#ifndef DK4CONF_H_INCLUDED
+#include "dk4conf.h"
+#endif
+
+#ifndef DK4TYPES_H_INCLUDED
+#include "dk4types.h"
+#endif
+
+#ifndef DK4ERROR_H_INCLUDED
+#include "dk4error.h"
+#endif
+
+#if DK4_HAVE_WCHAR_H
+#ifndef WCHAR_H_INCLUDED
+#include <wchar.h>
+#define WCHAR_H_INCLUDED 1
+#endif
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/** Retrieve path to executable file.
+ CRT on Windows: Not used.
+ @param buffer Buffer to store the file name.
+ @param sz Buffer size (number of wchar_t).
+ @param argv0 First command line word.
+ @param erp Error report, may be NULL.
+ @return 1 on success, 0 on error.
+*/
+int
+dk4execpath_wc(wchar_t *buffer, size_t sz, const wchar_t *argv0, dk4_er_t *erp);
+
+#ifdef __cplusplus
+}
+#endif
+
+%% module
+
+#include "dk4exepw.h"
+
+#ifndef DK4STRW_H_INCLUDED
+#include "dk4strw.h"
+#endif
+
+#ifndef DK4MEM_H_INCLUDED
+#include "dk4mem.h"
+#endif
+
+#ifndef DK4PATHW_H_INCLUDED
+#include "dk4pathw.h"
+#endif
+
+#ifndef DK4STATW_H_INCLUDED
+#include "dk4statw.h"
+#endif
+
+#ifndef DK4STAT_H_INCLUDED
+#include "dk4stat.h"
+#endif
+
+#if DK4_ON_WINDOWS
+#ifndef WINDOWS_H_INCLUDED
+#include <windows.h>
+#define WINDOWS_H_INCLUDED 1
+#endif
+#ifndef WINBASE_H_INCLUDED
+#include <winbase.h>
+#define WINBASE_H_INCLUDED 1
+#endif
+#endif
+
+#if DK4_HAVE_SYS_TYPES_H
+#ifndef SYS_TYPES_H_INCLUDED
+#include <sys/types.h>
+#define SYS_TYPES_H_INCLUDED 1
+#endif
+#endif
+
+#if DK4_HAVE_SYS_STAT_H
+#ifndef SYS_STAT_H_INCLUDED
+#include <sys/stat.h>
+#define SYS_STAT_H_INCLUDED 1
+#endif
+#endif
+
+#ifndef STDLIB_H_INCLUDED
+#include <stdlib.h>
+#define STDLIB_H_INCLUDED 1
+#endif
+
+#if DK4_HAVE_UNISTD_H
+#ifndef UNISTD_H_INCLUDED
+#include <unistd.h>
+#define UNISTD_H_INCLUDED 1
+#endif
+#endif
+
+#if DK4_HAVE_STRING_H
+#ifndef STRING_H_INCLUDED
+#include <string.h>
+#define STRING_H_INCLUDED 1
+#endif
+#endif
+
+
+
+$!trace-include
+
+
+
+#if 0
+static const wchar_t * const dk4execpath_wc_kw[] = {
+/* 0 */ L"PATH",
+#if DK4_HAVE_BACKSLASH_AS_SEP
+/* 1 */ L"\\",
+#else
+/* 1 */ L"/",
+#endif
+NULL
+};
+#endif
+
+
+
+#if DK4_ON_WINDOWS
+#pragma warning (disable:4100)
+#endif
+
+int
+dk4execpath_wc(wchar_t *buffer, size_t sz, const wchar_t *argv0, dk4_er_t *erp)
+{
+#if DK4_ON_WINDOWS
+ DWORD res;
+ DWORD dwsz;
+#endif
+ int back = 0;
+#if DK4_ON_WINDOWS
+ $? "+ dk4execpath_wc"
+ if ((NULL != buffer) && (0 < sz)) {
+ if ((dk4_um_t)0xFFFFFFFFUL >= (dk4_um_t)sz) {
+ dwsz = (DWORD)sz;
+ } else {
+ dwsz = (DWORD)0xFFFFFFFFUL;
+ }
+ res = GetModuleFileNameW(GetModuleHandle(NULL), buffer, dwsz);
+ if (0 < res) {
+ if ((dk4_um_t)res < (dk4_um_t)sz) {
+ back = 1; $? ". success"
+ buffer[res] = L'\0';
+ } else { $? "! buffer too small"
+ dk4error_set_simple_error_code(erp, DK4_E_BUFFER_TOO_SMALL);
+ }
+ } else { $? "! GetModuleFileNameW"
+ /* ERROR: Not found */
+ dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND);
+ }
+ } else { $? "! invalid arguments"
+ dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
+ }
+#else
+ $? "! not supported"
+ dk4error_set_simple_error_code(erp, DK4_E_NOT_SUPPORTED);
+#endif
+ $? "- dk4execpath_wc %d", back
+ return back;
+}
+
+#if DK4_ON_WINDOWS
+#pragma warning (default:4100)
+#endif
+