cups/testlang.c - platform/external/libcups - Git at Google

 /*
  * Localization test program for CUPS.
  *
  * Usage:
  *
  *   ./testlang [-l locale] [-p ppd] ["String to localize"]
  *
  * Copyright 2007-2017 by Apple Inc.
  * Copyright 1997-2006 by Easy Software Products.
  *
  * Licensed under Apache License v2.0.  See the file "LICENSE" for more information.
  */

 /*
  * Include necessary headers...
  */

 #include "cups-private.h"
 #include "ppd-private.h"
 #ifdef __APPLE__
 #  include <CoreFoundation/CoreFoundation.h>
 #endif /* __APPLE__ */


 /*
  * Local functions...
  */

 static int	show_ppd(const char *filename);
 static int	test_string(cups_lang_t *language, const char *msgid);
 static void	usage(void);


 /*
  * 'main()' - Load the specified language and show the strings for yes and no.
  */

 int					/* O - Exit status */
 main(int  argc,				/* I - Number of command-line arguments */
      char *argv[])			/* I - Command-line arguments */
 {
   int			i;		/* Looping var */
   const char		*opt;		/* Current option */
   int			errors = 0;	/* Number of errors */
   int			dotests = 1;	/* Do standard tests? */
   cups_lang_t		*language = NULL;/* Message catalog */
   cups_lang_t		*language2 = NULL;
 					/* Message catalog (second time) */
   struct lconv		*loc;		/* Locale data */
   char			buffer[1024];	/* String buffer */
   double		number;		/* Number */
   static const char * const tests[] =	/* Test strings */
   {
     "1",
     "-1",
     "3",
     "5.125"
   };


  /*
   * Parse command-line...
   */

   _cupsSetLocale(argv);

   for (i = 1; i < argc; i ++)
   {
     if (argv[i][0] == '-')
     {
       if (!strcmp(argv[i], "--help"))
       {
         usage();
       }
       else
       {
         for (opt = argv[i] + 1; *opt; opt ++)
         {
           switch (*opt)
           {
             case 'l' :
                 i ++;
                 if (i >= argc)
                 {
                   usage();
                   return (1);
                 }

 		language  = cupsLangGet(argv[i]);
 		language2 = cupsLangGet(argv[i]);

 		setenv("LANG", argv[i], 1);
 		setenv("SOFTWARE", "CUPS/" CUPS_SVERSION, 1);
 		break;

 	    case 'p' :
                 i ++;
                 if (i >= argc)
                 {
                   usage();
                   return (1);
                 }

                 if (!language)
                 {
 		  language  = cupsLangDefault();
 		  language2 = cupsLangDefault();
 		}

 		dotests = 0;
 		errors += show_ppd(argv[i]);
                 break;

             default :
                 usage();
                 return (1);
 	  }
         }
       }
     }
     else
     {
       if (!language)
       {
 	language  = cupsLangDefault();
 	language2 = cupsLangDefault();
       }

       dotests = 0;
       errors += test_string(language, argv[i]);
     }
   }

   if (!language)
   {
     language  = cupsLangDefault();
     language2 = cupsLangDefault();
   }

   if (language != language2)
   {
     errors ++;

     puts("**** ERROR: Language cache did not work! ****");
     puts("First result from cupsLangGet:");
   }

   printf("Language = \"%s\"\n", language->language);
   printf("Encoding = \"%s\"\n", _cupsEncodingName(language->encoding));

   if (dotests)
   {
     errors += test_string(language, "No");
     errors += test_string(language, "Yes");

     if (language != language2)
     {
       puts("Second result from cupsLangGet:");

       printf("Language = \"%s\"\n", language2->language);
       printf("Encoding = \"%s\"\n", _cupsEncodingName(language2->encoding));
       printf("No       = \"%s\"\n", _cupsLangString(language2, "No"));
       printf("Yes      = \"%s\"\n", _cupsLangString(language2, "Yes"));
     }

     loc = localeconv();

     for (i = 0; i < (int)(sizeof(tests) / sizeof(tests[0])); i ++)
     {
       number = _cupsStrScand(tests[i], NULL, loc);

       printf("_cupsStrScand(\"%s\") number=%f\n", tests[i], number);

       _cupsStrFormatd(buffer, buffer + sizeof(buffer), number, loc);

       printf("_cupsStrFormatd(%f) buffer=\"%s\"\n", number, buffer);

       if (strcmp(buffer, tests[i]))
       {
 	errors ++;
 	puts("**** ERROR: Bad formatted number! ****");
       }
     }

 #ifdef __APPLE__
    /*
     * Test all possible language IDs for compatibility with _cupsAppleLocale...
     */

     CFIndex     j,                      /* Looping var */
                 num_locales;            /* Number of locales */
     CFArrayRef  locales;                /* Locales */
     CFStringRef locale_id,              /* Current locale ID */
                 language_id;            /* Current language ID */
     char        locale_str[256],        /* Locale ID C string */
                 language_str[256],      /* Language ID C string */
                 *bufptr;                /* Pointer to ".UTF-8" in POSIX locale */
     size_t      buflen;                 /* Length of POSIX locale */
 #  if TEST_COUNTRY_CODES
     CFIndex     k,                      /* Looping var */
                 num_country_codes;      /* Number of country codes */
     CFArrayRef  country_codes;          /* Country codes */
     CFStringRef country_code,           /* Current country code */
                 temp_id;                /* Temporary language ID */
     char        country_str[256];       /* Country code C string */
 #  endif /* TEST_COUNTRY_CODES */

     locales     = CFLocaleCopyAvailableLocaleIdentifiers();
     num_locales = CFArrayGetCount(locales);

 #  if TEST_COUNTRY_CODES
     country_codes     = CFLocaleCopyISOCountryCodes();
     num_country_codes = CFArrayGetCount(country_codes);
 #  endif /* TEST_COUNTRY_CODES */

     printf("%d locales are available:\n", (int)num_locales);

     for (j = 0; j < num_locales; j ++)
     {
       locale_id   = CFArrayGetValueAtIndex(locales, j);
       language_id = CFLocaleCreateCanonicalLanguageIdentifierFromString(kCFAllocatorDefault, locale_id);

       if (!locale_id || !CFStringGetCString(locale_id, locale_str, (CFIndex)sizeof(locale_str), kCFStringEncodingASCII))
       {
         printf("%d: FAIL (unable to get locale ID string)\n", (int)j + 1);
         errors ++;
         continue;
       }

       if (!language_id || !CFStringGetCString(language_id, language_str, (CFIndex)sizeof(language_str), kCFStringEncodingASCII))
       {
         printf("%d %s: FAIL (unable to get language ID string)\n", (int)j + 1, locale_str);
         errors ++;
         continue;
       }

       if (!_cupsAppleLocale(language_id, buffer, sizeof(buffer)))
       {
         printf("%d %s(%s): FAIL (unable to convert language ID string to POSIX locale)\n", (int)j + 1, locale_str, language_str);
         errors ++;
         continue;
       }

       if ((bufptr = strstr(buffer, ".UTF-8")) != NULL)
         buflen = (size_t)(bufptr - buffer);
       else
         buflen = strlen(buffer);

       if ((language = cupsLangGet(buffer)) == NULL)
       {
         printf("%d %s(%s): FAIL (unable to load POSIX locale \"%s\")\n", (int)j + 1, locale_str, language_str, buffer);
         errors ++;
         continue;
       }

       if (strncasecmp(language->language, buffer, buflen))
       {
         printf("%d %s(%s): FAIL (unable to load POSIX locale \"%s\", got \"%s\")\n", (int)j + 1, locale_str, language_str, buffer, language->language);
         errors ++;
         continue;
       }

       printf("%d %s(%s): PASS (POSIX locale is \"%s\")\n", (int)j + 1, locale_str, language_str, buffer);
     }

     CFRelease(locales);

 #  if TEST_COUNTRY_CODES
     CFRelease(country_codes);
 #  endif /* TEST_COUNTRY_CODES */
 #endif /* __APPLE__ */
   }

   if (errors == 0 && dotests)
     puts("ALL TESTS PASSED");

   return (errors > 0);
 }


 /*
  * 'show_ppd()' - Show localized strings in a PPD file.
  */

 static int				/* O - Number of errors */
 show_ppd(const char *filename)		/* I - Filename */
 {
   ppd_file_t	*ppd;			/* PPD file */
   ppd_option_t	*option;		/* PageSize option */
   ppd_choice_t	*choice;		/* PageSize/Letter choice */
   char		buffer[1024];		/* String buffer */


   if ((ppd = ppdOpenFile(filename)) == NULL)
   {
     printf("Unable to open PPD file \"%s\".\n", filename);
     return (1);
   }

   ppdLocalize(ppd);

   if ((option = ppdFindOption(ppd, "PageSize")) == NULL)
   {
     puts("No PageSize option.");
     return (1);
   }
   else
   {
     printf("PageSize: %s\n", option->text);

     if ((choice = ppdFindChoice(option, "Letter")) == NULL)
     {
       puts("No Letter PageSize choice.");
       return (1);
     }
     else
     {
       printf("Letter: %s\n", choice->text);
     }
   }

   printf("media-empty: %s\n", ppdLocalizeIPPReason(ppd, "media-empty", NULL, buffer, sizeof(buffer)));

   ppdClose(ppd);

   return (0);
 }


 /*
  * 'test_string()' - Test the localization of a string.
  */

 static int                            /* O - 1 on failure, 0 on success */
 test_string(cups_lang_t *language,    /* I - Language */
             const char  *msgid)       /* I - Message */
 {
   const char  *msgstr;                /* Localized string */


  /*
   * Get the localized string and then see if we got what we expected.
   *
   * For the POSIX locale, the string pointers should be the same.
   * For any other locale, the string pointers should be different.
   */

   msgstr = _cupsLangString(language, msgid);
   if (strcmp(language->language, "C") && msgid == msgstr)
   {
     printf("%-8s = \"%s\" (FAIL - no message catalog loaded)\n", msgid, msgstr);
     return (1);
   }
   else if (!strcmp(language->language, "C") && msgid != msgstr)
   {
     printf("%-8s = \"%s\" (FAIL - POSIX locale is localized)\n", msgid, msgstr);
     return (1);
   }

   printf("%-8s = \"%s\" (PASS)\n", msgid, msgstr);

   return (0);
 }


 /*
  * 'usage()' - Show program usage.
  */

 static void
 usage(void)
 {
   puts("./testlang [-l locale] [-p ppd] [\"String to localize\"]");
 }
	/*
	* Localization test program for CUPS.
	*
	* Usage:
	*
	* ./testlang [-l locale] [-p ppd] ["String to localize"]
	*
	* Copyright 2007-2017 by Apple Inc.
	* Copyright 1997-2006 by Easy Software Products.
	*
	* Licensed under Apache License v2.0. See the file "LICENSE" for more information.
	*/

	/*
	* Include necessary headers...
	*/

	#include "cups-private.h"
	#include "ppd-private.h"
	#ifdef __APPLE__
	# include <CoreFoundation/CoreFoundation.h>
	#endif /* __APPLE__ */


	/*
	* Local functions...
	*/

	static int show_ppd(const char *filename);
	static int test_string(cups_lang_t language, const char msgid);
	static void usage(void);


	/*
	* 'main()' - Load the specified language and show the strings for yes and no.
	*/

	int /* O - Exit status */
	main(int argc, /* I - Number of command-line arguments */
	char argv[]) / I - Command-line arguments */
	{
	int i; /* Looping var */
	const char opt; / Current option */
	int errors = 0; /* Number of errors */
	int dotests = 1; /* Do standard tests? */
	cups_lang_t language = NULL;/ Message catalog */
	cups_lang_t *language2 = NULL;
	/* Message catalog (second time) */
	struct lconv loc; / Locale data */
	char buffer[1024]; /* String buffer */
	double number; /* Number */
	static const char * const tests[] = /* Test strings */
	{
	"1",
	"-1",
	"3",
	"5.125"
	};


	/*
	* Parse command-line...
	*/

	_cupsSetLocale(argv);

	for (i = 1; i < argc; i ++)
	{
	if (argv[i][0] == '-')
	{
	if (!strcmp(argv[i], "--help"))
	{
	usage();
	}
	else
	{
	for (opt = argv[i] + 1; *opt; opt ++)
	{
	switch (*opt)
	{
	case 'l' :
	i ++;
	if (i >= argc)
	{
	usage();
	return (1);
	}

	language = cupsLangGet(argv[i]);
	language2 = cupsLangGet(argv[i]);

	setenv("LANG", argv[i], 1);
	setenv("SOFTWARE", "CUPS/" CUPS_SVERSION, 1);
	break;

	case 'p' :
	i ++;
	if (i >= argc)
	{
	usage();
	return (1);
	}

	if (!language)
	{
	language = cupsLangDefault();
	language2 = cupsLangDefault();
	}

	dotests = 0;
	errors += show_ppd(argv[i]);
	break;

	default :
	usage();
	return (1);
	}
	}
	}
	}
	else
	{
	if (!language)
	{
	language = cupsLangDefault();
	language2 = cupsLangDefault();
	}

	dotests = 0;
	errors += test_string(language, argv[i]);
	}
	}

	if (!language)
	{
	language = cupsLangDefault();
	language2 = cupsLangDefault();
	}

	if (language != language2)
	{
	errors ++;

	puts("** ERROR: Language cache did not work! **");
	puts("First result from cupsLangGet:");
	}

	printf("Language = \"%s\"\n", language->language);
	printf("Encoding = \"%s\"\n", _cupsEncodingName(language->encoding));

	if (dotests)
	{
	errors += test_string(language, "No");
	errors += test_string(language, "Yes");

	if (language != language2)
	{
	puts("Second result from cupsLangGet:");

	printf("Language = \"%s\"\n", language2->language);
	printf("Encoding = \"%s\"\n", _cupsEncodingName(language2->encoding));
	printf("No = \"%s\"\n", _cupsLangString(language2, "No"));
	printf("Yes = \"%s\"\n", _cupsLangString(language2, "Yes"));
	}

	loc = localeconv();

	for (i = 0; i < (int)(sizeof(tests) / sizeof(tests[0])); i ++)
	{
	number = _cupsStrScand(tests[i], NULL, loc);

	printf("_cupsStrScand(\"%s\") number=%f\n", tests[i], number);

	_cupsStrFormatd(buffer, buffer + sizeof(buffer), number, loc);

	printf("_cupsStrFormatd(%f) buffer=\"%s\"\n", number, buffer);

	if (strcmp(buffer, tests[i]))
	{
	errors ++;
	puts("** ERROR: Bad formatted number! **");
	}
	}

	#ifdef __APPLE__
	/*
	* Test all possible language IDs for compatibility with _cupsAppleLocale...
	*/

	CFIndex j, /* Looping var */
	num_locales; /* Number of locales */
	CFArrayRef locales; /* Locales */
	CFStringRef locale_id, /* Current locale ID */
	language_id; /* Current language ID */
	char locale_str[256], /* Locale ID C string */
	language_str[256], /* Language ID C string */
	bufptr; / Pointer to ".UTF-8" in POSIX locale */
	size_t buflen; /* Length of POSIX locale */
	# if TEST_COUNTRY_CODES
	CFIndex k, /* Looping var */
	num_country_codes; /* Number of country codes */
	CFArrayRef country_codes; /* Country codes */
	CFStringRef country_code, /* Current country code */
	temp_id; /* Temporary language ID */
	char country_str[256]; /* Country code C string */
	# endif /* TEST_COUNTRY_CODES */

	locales = CFLocaleCopyAvailableLocaleIdentifiers();
	num_locales = CFArrayGetCount(locales);

	# if TEST_COUNTRY_CODES
	country_codes = CFLocaleCopyISOCountryCodes();
	num_country_codes = CFArrayGetCount(country_codes);
	# endif /* TEST_COUNTRY_CODES */

	printf("%d locales are available:\n", (int)num_locales);

	for (j = 0; j < num_locales; j ++)
	{
	locale_id = CFArrayGetValueAtIndex(locales, j);
	language_id = CFLocaleCreateCanonicalLanguageIdentifierFromString(kCFAllocatorDefault, locale_id);

	if (!locale_id \|\| !CFStringGetCString(locale_id, locale_str, (CFIndex)sizeof(locale_str), kCFStringEncodingASCII))
	{
	printf("%d: FAIL (unable to get locale ID string)\n", (int)j + 1);
	errors ++;
	continue;
	}

	if (!language_id \|\| !CFStringGetCString(language_id, language_str, (CFIndex)sizeof(language_str), kCFStringEncodingASCII))
	{
	printf("%d %s: FAIL (unable to get language ID string)\n", (int)j + 1, locale_str);
	errors ++;
	continue;
	}

	if (!_cupsAppleLocale(language_id, buffer, sizeof(buffer)))
	{
	printf("%d %s(%s): FAIL (unable to convert language ID string to POSIX locale)\n", (int)j + 1, locale_str, language_str);
	errors ++;
	continue;
	}

	if ((bufptr = strstr(buffer, ".UTF-8")) != NULL)
	buflen = (size_t)(bufptr - buffer);
	else
	buflen = strlen(buffer);

	if ((language = cupsLangGet(buffer)) == NULL)
	{
	printf("%d %s(%s): FAIL (unable to load POSIX locale \"%s\")\n", (int)j + 1, locale_str, language_str, buffer);
	errors ++;
	continue;
	}

	if (strncasecmp(language->language, buffer, buflen))
	{
	printf("%d %s(%s): FAIL (unable to load POSIX locale \"%s\", got \"%s\")\n", (int)j + 1, locale_str, language_str, buffer, language->language);
	errors ++;
	continue;
	}

	printf("%d %s(%s): PASS (POSIX locale is \"%s\")\n", (int)j + 1, locale_str, language_str, buffer);
	}

	CFRelease(locales);

	# if TEST_COUNTRY_CODES
	CFRelease(country_codes);
	# endif /* TEST_COUNTRY_CODES */
	#endif /* __APPLE__ */
	}

	if (errors == 0 && dotests)
	puts("ALL TESTS PASSED");

	return (errors > 0);
	}


	/*
	* 'show_ppd()' - Show localized strings in a PPD file.
	*/

	static int /* O - Number of errors */
	show_ppd(const char filename) / I - Filename */
	{
	ppd_file_t ppd; / PPD file */
	ppd_option_t option; / PageSize option */
	ppd_choice_t choice; / PageSize/Letter choice */
	char buffer[1024]; /* String buffer */


	if ((ppd = ppdOpenFile(filename)) == NULL)
	{
	printf("Unable to open PPD file \"%s\".\n", filename);
	return (1);
	}

	ppdLocalize(ppd);

	if ((option = ppdFindOption(ppd, "PageSize")) == NULL)
	{
	puts("No PageSize option.");
	return (1);
	}
	else
	{
	printf("PageSize: %s\n", option->text);

	if ((choice = ppdFindChoice(option, "Letter")) == NULL)
	{
	puts("No Letter PageSize choice.");
	return (1);
	}
	else
	{
	printf("Letter: %s\n", choice->text);
	}
	}

	printf("media-empty: %s\n", ppdLocalizeIPPReason(ppd, "media-empty", NULL, buffer, sizeof(buffer)));

	ppdClose(ppd);

	return (0);
	}


	/*
	* 'test_string()' - Test the localization of a string.
	*/

	static int /* O - 1 on failure, 0 on success */
	test_string(cups_lang_t language, / I - Language */
	const char msgid) / I - Message */
	{
	const char msgstr; / Localized string */


	/*
	* Get the localized string and then see if we got what we expected.
	*
	* For the POSIX locale, the string pointers should be the same.
	* For any other locale, the string pointers should be different.
	*/

	msgstr = _cupsLangString(language, msgid);
	if (strcmp(language->language, "C") && msgid == msgstr)
	{
	printf("%-8s = \"%s\" (FAIL - no message catalog loaded)\n", msgid, msgstr);
	return (1);
	}
	else if (!strcmp(language->language, "C") && msgid != msgstr)
	{
	printf("%-8s = \"%s\" (FAIL - POSIX locale is localized)\n", msgid, msgstr);
	return (1);
	}

	printf("%-8s = \"%s\" (PASS)\n", msgid, msgstr);

	return (0);
	}


	/*
	* 'usage()' - Show program usage.
	*/

	static void
	usage(void)
	{
	puts("./testlang [-l locale] [-p ppd] [\"String to localize\"]");
	}