Function getenv_array

freebsd/kern/kern_environment.c:671–805

* Return an array of integers at the given type size and signedness. */

 * Return an array of integers at the given type size and signedness.
 */
int
getenv_array(const char *name, void *pdata, int size, int *psize,
    int type_size, bool allow_signed)
{
	uint8_t shift;
	int64_t value;
	int64_t old;
	const char *buf;
	char *end;
	const char *ptr;
	int n;
	int rc;

	rc = 0;			  /* assume failure */

	buf = kenv_acquire(name);
	if (buf == NULL)
		goto error;

	/* get maximum number of elements */
	size /= type_size;

	n = 0;

	for (ptr = buf; *ptr != 0; ) {
		value = strtoq(ptr, &end, 0);

		/* check if signed numbers are allowed */
		if (value < 0 && !allow_signed)
			goto error;

		/* check for invalid value */
		if (ptr == end)
			goto error;
		
		/* check for valid suffix */
		switch (*end) {
		case 't':
		case 'T':
			shift = 40;
			end++;
			break;
		case 'g':
		case 'G':
			shift = 30;
			end++;
			break;
		case 'm':
		case 'M':
			shift = 20;
			end++;
			break;
		case 'k':
		case 'K':
			shift = 10;
			end++;
			break;
		case ' ':