aboutsummaryrefslogblamecommitdiffstats
path: root/islang.c
blob: 2d0c16419580893a25a1eccd629e32f2f63ba170 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13



                                           
                                                







                   



                           
                 

                                 
                                        





                                                                
     










                                        
 
/*
 * Copyright (c) 2000, NBG01720@nifty.ne.jp
 *
 * To compile this program:
 *      gcc -Zomf -Zcrtdll -O2 -Wall -s islang.c
 */
#define INCL_DOSNLS
#include <os2.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>

int
main(int argc, char **argv)
{
    if (argc <= 1)
	return 1;

    if (isdigit((int)*argv[1])) {
	unsigned long CpList[8], CpSize;
	APIRET rc = DosQueryCp(sizeof(CpList), CpList, &CpSize);
	if (rc)
	    return rc;
	while (--argc > 0)
	    if (*CpList == atoi(argv[argc]))
		return 0;
    }
    else {
	char *lang = getenv("LANG");
	if (!lang || !*lang) {
	    lang = getenv("LANGUAGE");
	    if (!lang || !*lang)
		return 1;
	}
	if (!strnicmp(lang, argv[1], 2))
	    return 0;
    }
    return 1;
}