1/*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License").  You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22/*	Copyright (c) 1988 AT&T	*/
23/*	  All Rights Reserved  	*/
24
25
26/*
27 *      Copyright (c) 1997, by Sun Microsystems, Inc.
28 *      All rights reserved.
29 */
30
31#pragma ident	"%Z%%M%	%I%	%E% SMI" /* SVr4.0 1.1 */
32
33/*LINTLIBRARY*/
34
35#include <sys/types.h>
36#include <stdlib.h>
37#include "utility.h"
38
39/*
40 *	TYPE_ALPHA standard type
41 *
42 *	usage:
43 *		set_field_type(f, TYPE_ALPHA, width);
44 *
45 *		int width;	minimum token width
46 */
47static char *make_alpha(va_list *);
48static char *copy_alpha(char *);
49static void free_alpha(char *);
50static int fcheck_alpha(FIELD *, char *);
51static int ccheck_alpha(int, char *);
52
53static FIELDTYPE typeALPHA =
54{
55				ARGS,			/* status	*/
56				1,			/* ref		*/
57				(FIELDTYPE *) 0,	/* left		*/
58				(FIELDTYPE *) 0,	/* right	*/
59				make_alpha,		/* makearg	*/
60				copy_alpha,		/* copyarg	*/
61				free_alpha,		/* freearg	*/
62				fcheck_alpha,		/* fcheck	*/
63				ccheck_alpha,		/* ccheck	*/
64				(PTF_int) 0,		/* next		*/
65				(PTF_int) 0,		/* prev		*/
66};
67
68FIELDTYPE * TYPE_ALPHA = &typeALPHA;
69
70static char *
71make_alpha(va_list *ap)
72{
73	int * width;
74
75	if (Alloc(width, int))
76		*width = va_arg(*ap, int);
77	return ((char *) width);
78}
79
80static char *
81copy_alpha(char *arg)
82{
83	int * width;
84
85	if (Alloc(width, int))
86		*width = *((int *) arg);
87	return ((char *) width);
88}
89
90static void
91free_alpha(char *arg)
92{
93	Free(arg);
94}
95
96static int
97fcheck_alpha(FIELD *f, char *arg)
98{
99	int	width	= *((int *) arg);
100	int	n	= 0;
101	char *	v	= field_buffer(f, 0);
102
103	while (*v && *v == ' ')
104		++v;
105	if (*v) {
106		char * vbeg = v;
107		while (*v && isalpha(*v))
108			++v;
109		n = v - vbeg;
110		while (*v && *v == ' ')
111			++v;
112	}
113	return (*v || n < width ? FALSE : TRUE);
114}
115
116/*ARGSUSED*/
117
118static int
119ccheck_alpha(int c, char *arg)
120{
121	return (isalpha(c));
122}
123