Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	lib/libc/locale/_get_locname.c	Lines:	21	23	91.3 %
Date:	2017-11-07	Branches:	16	24	66.7 %


/*	$OpenBSD: _get_locname.c,v 1.1 2017/09/05 03:16:13 schwarze Exp $ */
/*
 * Copyright (c) 2017 Ingo Schwarze <schwarze@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <errno.h>
#include <locale.h>
#include <paths.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "rune.h"
#include "rune_local.h"

/*
 * Supplement the input with locale(1) variables from the
 * environment, validate it, and initialize UTF-8 when needed.
 * Return NULL on error, "" if unset (for LC_ALL only),
 * or the name of the locale that takes effect.
 */
const char *
_get_locname(int category, const char *locname)
{
	static const char *const catname[_LC_LAST - 1] = {
		"LC_COLLATE",	"LC_CTYPE",	"LC_MONETARY",
		"LC_NUMERIC",	"LC_TIME",	"LC_MESSAGES"
	};

	FILE		*fp;
	const char	*cp;
	int		 save_errno;

	/* For empty input, inspect the environment. */
	if (*locname == '\0')
		locname = getenv("LC_ALL");

	if (category != LC_ALL) {
		if (locname == NULL || *locname == '\0')
			locname = getenv(catname[category - 1]);
		if (locname == NULL || *locname == '\0')
			locname = getenv("LANG");
	}

	/*
	 * If still empty, treat LC_ALL as unset, but
	 * fall back to the default locale for other categories.
	 */
	if (locname == NULL || *locname == '\0')
		locname = category == LC_ALL ? "" : "C";

	/* Accept and ignore all language and territory prefixes. */
	if ((cp = strrchr(locname, '.')) == NULL)
		return locname;

	/* Reject all encodings except ASCII and UTF-8. */
	if (strcmp(cp + 1, "UTF-8") != 0)
		return NULL;

	/* Initialize the UTF-8 character encoding locale, if needed. */
	if (_Utf8RuneLocale != NULL)
		return locname;
	save_errno = errno;
	if ((fp = fopen(_PATH_LOCALE "/UTF-8/LC_CTYPE", "re")) != NULL) {
		_Utf8RuneLocale = _Read_RuneMagi(fp);
		fclose(fp);
	}
	errno = save_errno;
	return _Utf8RuneLocale == NULL ? NULL : locname;
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: _get_locname.c,v 1.1 2017/09/05 03:16:13 schwarze Exp $ */
2			/*
3			* Copyright (c) 2017 Ingo Schwarze <schwarze@openbsd.org>
4			*
5			* Permission to use, copy, modify, and distribute this software for any
6			* purpose with or without fee is hereby granted, provided that the above
7			* copyright notice and this permission notice appear in all copies.
8			*
9			* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10			* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11			* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12			* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13			* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14			* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15			* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16			*/
17
18			#include <errno.h>
19			#include <locale.h>
20			#include <paths.h>
21			#include <stdio.h>
22			#include <stdlib.h>
23			#include <string.h>
24
25			#include "rune.h"
26			#include "rune_local.h"
27
28			/*
29			* Supplement the input with locale(1) variables from the
30			* environment, validate it, and initialize UTF-8 when needed.
31			* Return NULL on error, "" if unset (for LC_ALL only),
32			* or the name of the locale that takes effect.
33			*/
34			const char *
35			_get_locname(int category, const char *locname)
36			{
37			static const char *const catname[_LC_LAST - 1] = {
38			"LC_COLLATE", "LC_CTYPE", "LC_MONETARY",
39			"LC_NUMERIC", "LC_TIME", "LC_MESSAGES"
40			};
41
42			FILE *fp;
43			const char *cp;
44			int save_errno;
45
46			/* For empty input, inspect the environment. */
47	✓✗	7452	if (*locname == '\0')
48		3726	locname = getenv("LC_ALL");
49
50	✓✗	3726	if (category != LC_ALL) {
51	✓✓✗✓	3732	if (locname == NULL \|\| *locname == '\0')
52		3720	locname = getenv(catname[category - 1]);
53	✓✓✗✓	3812	if (locname == NULL \|\| *locname == '\0')
54		3640	locname = getenv("LANG");
55			}
56
57			/*
58			* If still empty, treat LC_ALL as unset, but
59			* fall back to the default locale for other categories.
60			*/
61	✓✓✗✓	3812	if (locname == NULL \|\| *locname == '\0')
62		3640	locname = category == LC_ALL ? "" : "C";
63
64			/* Accept and ignore all language and territory prefixes. */
65	✓✓	3726	if ((cp = strrchr(locname, '.')) == NULL)
66		3686	return locname;
67
68			/* Reject all encodings except ASCII and UTF-8. */
69	✗✓	40	if (strcmp(cp + 1, "UTF-8") != 0)
70			return NULL;
71
72			/* Initialize the UTF-8 character encoding locale, if needed. */
73	✗✓	40	if (_Utf8RuneLocale != NULL)
74			return locname;
75		40	save_errno = errno;
76	✓✗	40	if ((fp = fopen(_PATH_LOCALE "/UTF-8/LC_CTYPE", "re")) != NULL) {
77		40	_Utf8RuneLocale = _Read_RuneMagi(fp);
78		40	fclose(fp);
79		40	}
80		40	errno = save_errno;
81		40	return _Utf8RuneLocale == NULL ? NULL : locname;
82		3726	}