navit/intl/os2compat.c

/* OS/2 compatibility functions.
   Copyright (C) 2001-2002 Free Software Foundation, Inc.

   This program is free software; you can redistribute it and/or modify it
   under the terms of the GNU Library General Public License as published
   by the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program 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
   Library General Public License for more details.

   You should have received a copy of the GNU Library General Public
   License along with this program; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
   USA.  */

#define OS2_AWARE
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <stdlib.h>
#include <string.h>
#include <sys/param.h>

/* A version of getenv() that works from DLLs */
extern unsigned long DosScanEnv (const unsigned char *pszName, unsigned char **ppszValue);

char *
_nl_getenv (const char *name)
{
  unsigned char *value;
  if (DosScanEnv (name, &value))
    return NULL;
  else
    return value;
}

/* A fixed size buffer.  */
char libintl_nl_default_dirname[MAXPATHLEN+1];

char *_nlos2_libdir = NULL;
char *_nlos2_localealiaspath = NULL;
char *_nlos2_localedir = NULL;

static __attribute__((constructor)) void
nlos2_initialize ()
{
  char *root = getenv ("UNIXROOT");
  char *gnulocaledir = getenv ("GNULOCALEDIR");

  _nlos2_libdir = gnulocaledir;
  if (!_nlos2_libdir)
    {
      if (root)
        {
          size_t sl = strlen (root);
          _nlos2_libdir = (char *) malloc (sl + strlen (LIBDIR) + 1);
          memcpy (_nlos2_libdir, root, sl);
          memcpy (_nlos2_libdir + sl, LIBDIR, strlen (LIBDIR) + 1);
        }
      else
        _nlos2_libdir = LIBDIR;
    }

  _nlos2_localealiaspath = gnulocaledir;
  if (!_nlos2_localealiaspath)
    {
      if (root)
        {
          size_t sl = strlen (root);
          _nlos2_localealiaspath = (char *) malloc (sl + strlen (LOCALE_ALIAS_PATH) + 1);
          memcpy (_nlos2_localealiaspath, root, sl);
          memcpy (_nlos2_localealiaspath + sl, LOCALE_ALIAS_PATH, strlen (LOCALE_ALIAS_PATH) + 1);
        }
     else
        _nlos2_localealiaspath = LOCALE_ALIAS_PATH;
    }

  _nlos2_localedir = gnulocaledir;
  if (!_nlos2_localedir)
    {
      if (root)
        {
          size_t sl = strlen (root);
          _nlos2_localedir = (char *) malloc (sl + strlen (LOCALEDIR) + 1);
          memcpy (_nlos2_localedir, root, sl);
          memcpy (_nlos2_localedir + sl, LOCALEDIR, strlen (LOCALEDIR) + 1);
        }
      else
        _nlos2_localedir = LOCALEDIR;
    }

  if (strlen (_nlos2_localedir) <= MAXPATHLEN)
    strcpy (libintl_nl_default_dirname, _nlos2_localedir);
}
1	zoff99	2	/* OS/2 compatibility functions.
2			Copyright (C) 2001-2002 Free Software Foundation, Inc.
3
4			This program is free software; you can redistribute it and/or modify it
5			under the terms of the GNU Library General Public License as published
6			by the Free Software Foundation; either version 2, or (at your option)
7			any later version.
8
9			This program is distributed in the hope that it will be useful,
10			but WITHOUT ANY WARRANTY; without even the implied warranty of
11			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12			Library General Public License for more details.
13
14			You should have received a copy of the GNU Library General Public
15			License along with this program; if not, write to the Free Software
16			Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
17			USA. */
18
19			#define OS2_AWARE
20			#ifdef HAVE_CONFIG_H
21			#include <config.h>
22			#endif
23
24			#include <stdlib.h>
25			#include <string.h>
26			#include <sys/param.h>
27
28			/* A version of getenv() that works from DLLs */
29			extern unsigned long DosScanEnv (const unsigned char pszName, unsigned char *ppszValue);
30
31			char *
32			_nl_getenv (const char *name)
33			{
34			unsigned char *value;
35			if (DosScanEnv (name, &value))
36			return NULL;
37			else
38			return value;
39			}
40
41			/* A fixed size buffer. */
42			char libintl_nl_default_dirname[MAXPATHLEN+1];
43
44			char *_nlos2_libdir = NULL;
45			char *_nlos2_localealiaspath = NULL;
46			char *_nlos2_localedir = NULL;
47
48			static __attribute__((constructor)) void
49			nlos2_initialize ()
50			{
51			char *root = getenv ("UNIXROOT");
52			char *gnulocaledir = getenv ("GNULOCALEDIR");
53
54			_nlos2_libdir = gnulocaledir;
55			if (!_nlos2_libdir)
56			{
57			if (root)
58			{
59			size_t sl = strlen (root);
60			_nlos2_libdir = (char *) malloc (sl + strlen (LIBDIR) + 1);
61			memcpy (_nlos2_libdir, root, sl);
62			memcpy (_nlos2_libdir + sl, LIBDIR, strlen (LIBDIR) + 1);
63			}
64			else
65			_nlos2_libdir = LIBDIR;
66			}
67
68			_nlos2_localealiaspath = gnulocaledir;
69			if (!_nlos2_localealiaspath)
70			{
71			if (root)
72			{
73			size_t sl = strlen (root);
74			_nlos2_localealiaspath = (char *) malloc (sl + strlen (LOCALE_ALIAS_PATH) + 1);
75			memcpy (_nlos2_localealiaspath, root, sl);
76			memcpy (_nlos2_localealiaspath + sl, LOCALE_ALIAS_PATH, strlen (LOCALE_ALIAS_PATH) + 1);
77			}
78			else
79			_nlos2_localealiaspath = LOCALE_ALIAS_PATH;
80			}
81
82			_nlos2_localedir = gnulocaledir;
83			if (!_nlos2_localedir)
84			{
85			if (root)
86			{
87			size_t sl = strlen (root);
88			_nlos2_localedir = (char *) malloc (sl + strlen (LOCALEDIR) + 1);
89			memcpy (_nlos2_localedir, root, sl);
90			memcpy (_nlos2_localedir + sl, LOCALEDIR, strlen (LOCALEDIR) + 1);
91			}
92			else
93			_nlos2_localedir = LOCALEDIR;
94			}
95
96			if (strlen (_nlos2_localedir) <= MAXPATHLEN)
97			strcpy (libintl_nl_default_dirname, _nlos2_localedir);
98			}