Subversion Repositories SvarDOS

Rev

Rev 1277 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1277 Rev 1301
Line 20... Line 20...
20 
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
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
21 
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22 
 * DEALINGS IN THE SOFTWARE.
22 
 * DEALINGS IN THE SOFTWARE.
23 
 */
 23 
 */
24 
 
 24 
 
25 
#include <stdlib.h>
 25 
#include <stdlib.h>  /* getenv(), NULL */
26 
#include <string.h>
 - 
 
27 
 
 - 
 
28 
#include "svarlang.h"
 26 
#include "svarlang.h"
29 
 
 27 
 
30 
 
 28 
 
31 
int svarlang_autoload_nlspath(const char *progname) {
 29 
int svarlang_autoload_nlspath(const char *progname) {
32 
  const char *lang;
 30 
  const char *lang;
33 
  const char *nlspath;
 31 
  const char *nlspath;
34 
  char buff[128];
 32 
  char buff[128];
35 
  unsigned short i;
 33 
  unsigned short i, ii;
36 
 
 34 
 
37 
  /* read and validate LANG */
 35 
  /* read and validate LANG */
38 
  lang = getenv("LANG");
 36 
  lang = getenv("LANG");
39 
  if ((lang == NULL) || (lang[0] == 0) || (lang[1] == 0)) return(-1);
 37 
  if ((lang == NULL) || (lang[0] == 0)) return(-1);
40 
 
 38 
 
41 
  /* read and validate NLSPATH */
 39 
  /* read and validate NLSPATH */
42 
  nlspath = getenv("NLSPATH");
 40 
  nlspath = getenv("NLSPATH");
43 
  if (nlspath == NULL) return(-2);
 41 
  if (nlspath == NULL) return(-2);
44 
 
 42 
 
Line 55... Line 53...
55 
    nlspath += i;
 53 
    nlspath += i;
56 
 
 54 
 
57 
    /* add a trailing backslash if there is none (non-empty paths empty) */
 55 
    /* add a trailing backslash if there is none (non-empty paths empty) */
58 
    if ((i > 0) && (buff[i - 1] != '\\')) buff[i++] = '\\';
 56 
    if ((i > 0) && (buff[i - 1] != '\\')) buff[i++] = '\\';
59 
 
 57 
 
- 
 
 58 
    /* append progname + ".LNG" to the path */
- 
 
 59 
    for (ii = 0; progname[ii] != 0; ii++) buff[i++] = progname[ii];
- 
 
 60 
    buff[i++] = '.';
60 
    strcpy(buff + i, progname);
 61 
    buff[i++] = 'L';
- 
 
 62 
    buff[i++] = 'N';
61 
    strcat(buff + i, ".lng");
 63 
    buff[i++] = 'G';
- 
 
 64 
    buff[i] = 0;
62 
 
 65 
 
63 
    if (svarlang_load(buff, lang) == 0) return(0);
 66 
    if (svarlang_load(buff, lang) == 0) return(0);
64 
  }
 67 
  }
65 
  /* failed to load anything */
 68 
  /* failed to load anything */
66 
  return(-4);
 69 
  return(-4);