[thirdparty/bash.git] / tests / posixpat.tests

# A test suite for the POSIX.2 (BRE) pattern matching code
LC_ALL=C
LANG=C

# First, test POSIX.2 character classes

case e in
[[:xdigit:]])	echo ok 1;;
esac

case a in
[[:alpha:]123])	echo ok 2;;
esac

case 1 in
[[:alpha:]123])	echo ok 3;;
esac

case 9 in
[![:alpha:]])	echo ok 4;;
esac

# invalid character class expressions are just characters to be matched
case a in
[:al:])		echo ok 5;;
esac

case a in
[[:al:])	echo ok 6;;
esac

case '!' in
[abc[:punct:][0-9])	echo ok 7;;
esac

# let's try to match the start of a valid sh identifier
case 'PATH' in
[_[:alpha:]]*)	echo ok 8;;
esac

# let's try to match the first two characters of a valid sh identifier
case PATH in
[_[:alpha:]][_[:alnum:]]*)	echo ok 9;;
esac

# is ^C a cntrl character?
case $'\003' in
[[:cntrl:]])	echo ok 10;;
esac

# how about A?
case A in
[[:cntrl:]])	echo oops -- cntrl ;;
*)		echo ok 11;;
esac

case 9 in
[[:digit:]])	echo ok 12;;
esac

case X in
[[:digit:]])	echo oops -- digit;;
*)		echo ok 13;;
esac

case $'\033' in
[[:graph:]])	echo oops -- graph;;
*)		echo ok 14;;
esac

case $'\040' in
[[:graph:]])	echo oops -- graph 2;;
*)		echo ok 15;;
esac

case ' ' in
[[:graph:]])	echo oops -- graph 3;;
*)		echo ok 16;;
esac

case 'aB' in
[[:lower:]][[:upper:]])	echo ok 17;;
esac

case $'\040' in
[[:print:]])	echo ok 18;;
*)		echo oops -- print;;
esac

case PS3 in
[_[:alpha:]][_[:alnum:]][_[:alnum:]]*)	echo ok 19;;
esac

case a in
[[:alpha:][:digit:]])	echo ok 20;;
*)			echo oops - skip brackpat ;;
esac

case a in
[[:alpha:]\])	echo oops -- dangling backslash in brackpat ;;
*)		echo ok 21 ;;
esac

# what's a newline?  is it a blank? a space?
case $'\n' in
[[:blank:]])	echo ok -- blank ;;
[[:space:]])	echo ok -- space ;;
*)		echo oops newline ;;
esac

# OK, what's a tab?  is it a blank? a space?
case $'\t' in
[[:blank:]])	echo ok -- blank ;;
[[:space:]])	echo ok -- space ;;
*)		echo oops newline ;;
esac

# let's check out characters in the ASCII range
case $'\377' in
[[:ascii:]])	echo oops -- ascii\?;;
esac

case 9 in
[1[:alpha:]123]) echo oops 1;;
esac

# however, an unterminated brace expression containing a valid char class
# that matches had better fail
case a in
[[:alpha:])	echo oops 2;;
esac

case $'\b' in
[[:graph:]])	echo oops 3;;
esac

case $'\b' in
[[:print:]])	echo oops 4;;
esac

case $' ' in
[[:punct:]])	echo oops 5;;
esac

# Next, test POSIX.2 collating symbols

case 'a' in
[[.a.]])	echo ok 1;;
esac

case '-' in
[[.hyphen.]-9])	echo ok 2;;
esac

case 'p' in
[[.a.]-[.z.]])	echo ok 3;;
esac

case '-' in
[[.-.]])	echo ok 4;;
esac

case ' ' in
[[.space.]])	echo ok 5;;
esac

case ' ' in
[[.grave-accent.]])	echo oops - grave;;
*)		echo ok 6;;
esac

case '4' in
[[.-.]-9])	echo ok 7;;
esac

# an invalid collating symbol cannot be the first part of a range
case 'c' in
[[.yyz.]-[.z.]])	echo oops - yyz;;
*)		echo ok 8;;
esac

case 'c' in
[[.yyz.][.a.]-z])   echo ok 9;;
esac

# but when not part of a range is not an error
case 'c' in
[[.yyz.][.a.]-[.z.]])   echo ok 10 ;;
esac

case 'p' in
[[.a.]-[.Z.]])		echo oops -- bad range ;; 
*)			echo ok 11;;
esac

case p in
[[.a.]-[.zz.]p])	echo ok 12;;
*)			echo oops -- bad range 2;;
esac

case p in
[[.aa.]-[.z.]p])	echo ok 13;;
*)			echo oops -- bad range 3;;
esac

case c in
[[.yyz.]cde])		echo ok 14;;
esac

case abc in
[[.cb.]a-Za]*)		echo ok 15;;
esac

case $'\t' in
[[.space.][.tab.][.newline.]])	echo ok 16;;
esac

# and finally, test POSIX.2 equivalence classes

case "abc" in
[[:alpha:]][[=b=]][[:ascii:]])	echo ok 1;;
esac

case "abc" in
[[:alpha:]][[=B=]][[:ascii:]])	echo oops -- =B=;;
*)	echo ok 2 ;;
esac

case a in
[[=b=])		echo oops;;	# an incomplete equiv class is just a string
*)		echo ok 3;;
esac
Commit	Line	Data
cce855bc JA	1	# A test suite for the POSIX.2 (BRE) pattern matching code
	2	LC_ALL=C
	3	LANG=C
	4
	5	# First, test POSIX.2 character classes
	6
	7	case e in
	8	[[:xdigit:]]) echo ok 1;;
	9	esac
	10
	11	case a in
	12	[[:alpha:]123]) echo ok 2;;
	13	esac
	14
	15	case 1 in
	16	[[:alpha:]123]) echo ok 3;;
	17	esac
	18
	19	case 9 in
	20	[![:alpha:]]) echo ok 4;;
	21	esac
	22
	23	# invalid character class expressions are just characters to be matched
	24	case a in
	25	[:al:]) echo ok 5;;
	26	esac
	27
	28	case a in
	29	[[:al:]) echo ok 6;;
	30	esac
	31
	32	case '!' in
	33	[abc[:punct:][0-9]) echo ok 7;;
	34	esac
	35
	36	# let's try to match the start of a valid sh identifier
	37	case 'PATH' in
	38	[_[:alpha:]]*) echo ok 8;;
	39	esac
	40
	41	# let's try to match the first two characters of a valid sh identifier
	42	case PATH in
	43	[_[:alpha:]][_[:alnum:]]*) echo ok 9;;
	44	esac
	45
	46	# is ^C a cntrl character?
	47	case $'\003' in
	48	[[:cntrl:]]) echo ok 10;;
	49	esac
	50
	51	# how about A?
	52	case A in
	53	[[:cntrl:]]) echo oops -- cntrl ;;
	54	*) echo ok 11;;
	55	esac
	56
	57	case 9 in
	58	[[:digit:]]) echo ok 12;;
	59	esac
	60
	61	case X in
	62	[[:digit:]]) echo oops -- digit;;
	63	*) echo ok 13;;
	64	esac
65
66	case $'\033' in
67	[[:graph:]]) echo oops -- graph;;
68	*) echo ok 14;;
69	esac
70
71	case $'\040' in
72	[[:graph:]]) echo oops -- graph 2;;
73	*) echo ok 15;;
74	esac
75
76	case ' ' in
77	[[:graph:]]) echo oops -- graph 3;;
78	*) echo ok 16;;
79	esac
80
81	case 'aB' in
82	[[:lower:]][[:upper:]]) echo ok 17;;
83	esac
84
85	case $'\040' in
86	[[:print:]]) echo ok 18;;
87	*) echo oops -- print;;
88	esac
89
90	case PS3 in
91	[_[:alpha:]][_[:alnum:]][_[:alnum:]]*) echo ok 19;;
92	esac
93
94	case a in
95	[[:alpha:][:digit:]]) echo ok 20;;
96	*) echo oops - skip brackpat ;;
97	esac
98
99	case a in
100	[[:alpha:]\]) echo oops -- dangling backslash in brackpat ;;
101	*) echo ok 21 ;;
102	esac
103
104	# what's a newline? is it a blank? a space?
105	case $'\n' in
106	[[:blank:]]) echo ok -- blank ;;
107	[[:space:]]) echo ok -- space ;;
108	*) echo oops newline ;;
109	esac
110
111	# OK, what's a tab? is it a blank? a space?
112	case $'\t' in
113	[[:blank:]]) echo ok -- blank ;;
114	[[:space:]]) echo ok -- space ;;
115	*) echo oops newline ;;
116	esac
117
118	# let's check out characters in the ASCII range
119	case $'\377' in
120	[[:ascii:]]) echo oops -- ascii\?;;
121	esac
122
123	case 9 in
124	[1[:alpha:]123]) echo oops 1;;
125	esac
126
127	# however, an unterminated brace expression containing a valid char class
128	# that matches had better fail
129	case a in
130	[[:alpha:]) echo oops 2;;
131	esac
132
133	case $'\b' in
134	[[:graph:]]) echo oops 3;;
135	esac
136
137	case $'\b' in
138	[[:print:]]) echo oops 4;;
139	esac
140
141	case $' ' in
142	[[:punct:]]) echo oops 5;;
143	esac
144
145	# Next, test POSIX.2 collating symbols
146
147	case 'a' in
148	[[.a.]]) echo ok 1;;
149	esac
150
151	case '-' in
152	[[.hyphen.]-9]) echo ok 2;;
153	esac
154
155	case 'p' in
156	[[.a.]-[.z.]]) echo ok 3;;
157	esac
158
159	case '-' in
160	[[.-.]]) echo ok 4;;
161	esac
162
163	case ' ' in
164	[[.space.]]) echo ok 5;;
165	esac
166
167	case ' ' in
168	[[.grave-accent.]]) echo oops - grave;;
169	*) echo ok 6;;
170	esac
171
172	case '4' in
173	[[.-.]-9]) echo ok 7;;
174	esac
175
176	# an invalid collating symbol cannot be the first part of a range
177	case 'c' in
178	[[.yyz.]-[.z.]]) echo oops - yyz;;
179	*) echo ok 8;;
180	esac
181
182	case 'c' in
183	[[.yyz.][.a.]-z]) echo ok 9;;
184	esac
185
186	# but when not part of a range is not an error
187	case 'c' in
188	[[.yyz.][.a.]-[.z.]]) echo ok 10 ;;
189	esac
190
191	case 'p' in
192	[[.a.]-[.Z.]]) echo oops -- bad range ;;
193	*) echo ok 11;;
194	esac
195
196	case p in
197	[[.a.]-[.zz.]p]) echo ok 12;;
198	*) echo oops -- bad range 2;;
199	esac
200
201	case p in
202	[[.aa.]-[.z.]p]) echo ok 13;;
203	*) echo oops -- bad range 3;;
204	esac
205
206	case c in
207	[[.yyz.]cde]) echo ok 14;;
208	esac
209
210	case abc in
211	[[.cb.]a-Za]*) echo ok 15;;
212	esac
213
214	case $'\t' in
215	[[.space.][.tab.][.newline.]]) echo ok 16;;
216	esac
217
218	# and finally, test POSIX.2 equivalence classes
219
220	case "abc" in
221	[[:alpha:]][[=b=]][[:ascii:]]) echo ok 1;;
222	esac
223
224	case "abc" in
225	[[:alpha:]][[=B=]][[:ascii:]]) echo oops -- =B=;;
226	*) echo ok 2 ;;
227	esac
228
229	case a in
230	[[=b=]) echo oops;; # an incomplete equiv class is just a string
231	*) echo ok 3;;
232	esac
233