Subversion Repositories SvarDOS

Rev

Rev 1247 | Rev 1273 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
597 mateuszvis 1
/* This file is part of the svarlang project and is published under the terms
2
 * of the MIT license.
3
 *
1247 mateusz.vi 4
 * Copyright (C) 2021-2023 Mateusz Viste
597 mateuszvis 5
 *
6
 * Permission is hereby granted, free of charge, to any person obtaining a
7
 * copy of this software and associated documentation files (the "Software"),
8
 * to deal in the Software without restriction, including without limitation
9
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
10
 * and/or sell copies of the Software, and to permit persons to whom the
11
 * Software is furnished to do so, subject to the following conditions:
12
 *
13
 * The above copyright notice and this permission notice shall be included in
14
 * all copies or substantial portions of the Software.
15
 *
16
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
21
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22
 * DEALINGS IN THE SOFTWARE.
23
 */
24
 
25
#ifndef SVARLANG_H
26
#define SVARLANG_H
27
 
1247 mateusz.vi 28
/* library version */
1251 mateusz.vi 29
#define SVARLANGVER "20230629"
1247 mateusz.vi 30
 
31
/* returns a pointer to a string with the SvarLANG's library version,
32
 * independently of the SVARLANGVER string above. */
33
const char *svarlang_getver(void);
34
 
814 mateusz.vi 35
/* loads translations for program progname, language lang, in paths.
36
 *
37
 * only the two first letters of the lang strings are meaningful and they are
38
 * case insensitive.
39
 *
40
 * paths can be either a directory path (like "C:\DATA") or a list of paths
41
 * separated by a semicolon (example: "C:\DATA;.\LANGS;."). It may also be
42
 * NULL, in which case only the current directory will be searched.
43
 *
44
 * a typical call would be this: svarlang_load("myprog", "PL", NULL);
45
 *
46
 * this function returns 0 on success, non-zero otherwise. It is still possible
47
 * to call svarlang_strid() after a load failure, the previously loaded
48
 * language will be used then, or the default language if no loading has been
49
 * done yet. */
50
int svarlang_load(const char *progname, const char *lang, const char *paths);
597 mateuszvis 51
 
1247 mateusz.vi 52
 
814 mateusz.vi 53
/* same as svarlang_load(), but relies on getenv() to pull LANG and NLSPATH.
54
 * this call should be used only by "CORE" SvarDOS programs. */
599 mateuszvis 55
int svarlang_autoload(const char *progname);
56
 
1247 mateusz.vi 57
 
599 mateuszvis 58
/* Returns a pointer to the string "id". Does not require svalang_load() to be
59
 * executed, but then it will only return the reference language strings.
60
 * a string id is the concatenation of the CATS-style identifiers, for example
623 mateuszvis 61
 * string 1,0 becomes 0x0100, string 2.10 is 0x020A, etc.
62
 * It NEVER returns NULL, if id not found then an empty string is returned */
597 mateuszvis 63
const char *svarlang_strid(unsigned short id);
64
 
1247 mateusz.vi 65
 
599 mateuszvis 66
/* a convenience definition to fetch strings by their CATS-style pairs instead
67
 * of the 16-bit id. */
597 mateuszvis 68
#define svarlang_str(x, y) svarlang_strid((x << 8) | y)
69
 
1247 mateusz.vi 70
 
597 mateuszvis 71
#endif