From 698b0de25a035c5450e6fe48f642a0ed66862104 Mon Sep 17 00:00:00 2001 From: Alexander Shiryaev Date: Wed, 16 Nov 2016 00:19:34 +0300 Subject: [PATCH] BlackBox @ OpenBSD: 1.6 -> 1.7 --- BlackBox/_OpenBSD_/Lin/Mod/LibW.txt | 59 +++++++++++++++++++++++++++++ 1 file changed, 59 insertions(+) create mode 100644 BlackBox/_OpenBSD_/Lin/Mod/LibW.txt diff --git a/BlackBox/_OpenBSD_/Lin/Mod/LibW.txt b/BlackBox/_OpenBSD_/Lin/Mod/LibW.txt new file mode 100644 index 0000000..577acce --- /dev/null +++ b/BlackBox/_OpenBSD_/Lin/Mod/LibW.txt @@ -0,0 +1,59 @@ +MODULE LinLibW ["libc.so.89.2"]; + + (* + OpenBSD 6.0 + i386 + *) + + IMPORT Libc := LinLibc; + + CONST + LC_ALL* = 0; + LC_COLLATE* = 1; + LC_CTYPE* = 2; + LC_MONETARY* = 3; + LC_NUMERIC* = 4; + LC_TIME* = 5; + LC_MESSAGES* = 6; + + TYPE + (* int, wchar_t, wint_t, size_t, mbstate_t *) + int* = INTEGER; + wchar_t* = INTEGER; + wint_t* = INTEGER; + size_t* = INTEGER; + mbstate_t* = ARRAY [untagged] 32 OF INTEGER; + + PtrWSTR* = POINTER [untagged] TO ARRAY [untagged] OF wchar_t; + + PROCEDURE [ccall] setlocale* (category: int; locale: Libc.PtrSTR): Libc.PtrSTR; + + PROCEDURE [ccall] mbsinit* (VAR [nil] ps: mbstate_t): int; + + PROCEDURE [ccall] wctomb* (s: Libc.PtrSTR; wchar: wchar_t): int; + PROCEDURE [ccall] wcstombs* (s: Libc.PtrSTR; pwcs: PtrWSTR; n: size_t): size_t; + + PROCEDURE [ccall] wcrtomb* (s: Libc.PtrSTR; wc: wchar_t; VAR [nil] ps: mbstate_t): size_t; + PROCEDURE [ccall] wcsrtombs* (dst: Libc.PtrSTR; VAR src: PtrWSTR; len: size_t; VAR [nil] ps: mbstate_t): size_t; + PROCEDURE [ccall] wcsnrtombs* (dst: Libc.PtrSTR; VAR src: PtrWSTR; nwc: size_t; len: size_t; VAR [nil] ps: mbstate_t): size_t; + + PROCEDURE [ccall] mbtowc* (pwc: PtrWSTR; s: Libc.PtrSTR; n: size_t): int; + PROCEDURE [ccall] mbstowcs* (pwcs: PtrWSTR; s: Libc.PtrSTR; n: size_t): size_t; + PROCEDURE [ccall] mblen* (s: Libc.PtrSTR; n: size_t): int; + + PROCEDURE [ccall] mbrtowc* (wc: PtrWSTR; s: Libc.PtrSTR; n: size_t; VAR [nil] mbs: mbstate_t): size_t; + PROCEDURE [ccall] mbsrtowcs* (dst: PtrWSTR; VAR src: Libc.PtrSTR; len: size_t; VAR [nil] ps: mbstate_t): size_t; + PROCEDURE [ccall] mbsnrtowcs* (dst: PtrWSTR; VAR src: Libc.PtrSTR; nmc: size_t; len: size_t; VAR [nil] ps: mbstate_t): size_t; + PROCEDURE [ccall] mbrlen* (s: Libc.PtrSTR; n: size_t; VAR [nil] ps: mbstate_t): size_t; + + PROCEDURE [ccall] iswalpha* (wc: wint_t): int; + PROCEDURE [ccall] iswlower* (wc: wint_t): int; + PROCEDURE [ccall] iswupper* (wc: wint_t): int; + PROCEDURE [ccall] towlower* (wc: wint_t): wint_t; + PROCEDURE [ccall] towupper* (wc: wint_t): wint_t; + + PROCEDURE [ccall] wprintf* (fmt: PtrWSTR): int; + PROCEDURE [ccall] fputws* (ws: PtrWSTR; fp: Libc.PtrFILE): int; + PROCEDURE [ccall] fgetws* (ws: PtrWSTR; n: int; fp: Libc.PtrFILE): PtrWSTR; + +END LinLibW. \ No newline at end of file -- 2.29.2