1/* ***** BEGIN LICENSE BLOCK *****
2* Version: NPL 1.1/GPL 2.0/LGPL 2.1
3*
4* The contents of this file are subject to the Netscape Public License
5* Version 1.1 (the "License"); you may not use this file except in
6* compliance with the License. You may obtain a copy of the License at
7* http://www.mozilla.org/NPL/
8*
9* Software distributed under the License is distributed on an "AS IS" basis,
10* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
11* for the specific language governing rights and limitations under the
12* License.
13*
14* The Original Code is JavaScript Engine testing utilities.
15*
16* The Initial Developer of the Original Code is Netscape Communications Corp.
17* Portions created by the Initial Developer are Copyright (C) 2003
18* the Initial Developer. All Rights Reserved.
19*
20* Contributor(s): ji_bo@yahoo.com, pschwartau@netscape.com
21*
22* Alternatively, the contents of this file may be used under the terms of
23* either the GNU General Public License Version 2 or later (the "GPL"), or
24* the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
25* in which case the provisions of the GPL or the LGPL are applicable instead
26* of those above. If you wish to allow use of your version of this file only
27* under the terms of either the GPL or the LGPL, and not to allow others to
28* use your version of this file under the terms of the NPL, indicate your
29* decision by deleting the provisions above and replace them with the notice
30* and other provisions required by the GPL or the LGPL. If you do not delete
31* the provisions above, a recipient may use your version of this file under
32* the terms of any one of the NPL, the GPL or the LGPL.
33*
34* ***** END LICENSE BLOCK *****
35*
36*
37* Date:    06 January 2003
38* SUMMARY: RegExp conformance test
39* See http://bugzilla.mozilla.org/show_bug.cgi?id=187133
40*
41* The tests here employ the regular expression construct:
42*
43*                   (?!pattern)
44*
45* This is a "zero-width lookahead negative assertion".
46* From the Perl documentation:
47*
48*   For example, /foo(?!bar)/ matches any occurrence
49*   of 'foo' that isn't followed by 'bar'.
50*
51* It is "zero-width" means that it does not consume any characters and that
52* the parens are non-capturing. A non-null match array in the example above
53* will have only have length 1, not 2.
54*
55*/
56//-----------------------------------------------------------------------------
57var i = 0;
58var bug = 187133;
59var summary = 'RegExp conformance test';
60var status = '';
61var statusmessages = new Array();
62var pattern = '';
63var patterns = new Array();
64var string = '';
65var strings = new Array();
66var actualmatch = '';
67var actualmatches = new Array();
68var expectedmatch = '';
69var expectedmatches = new Array();
70
71
72pattern = /(\.(?!com|org)|\/)/;
73  status = inSection(1);
74  string = 'ah.info';
75  actualmatch = string.match(pattern);
76  expectedmatch = ['.', '.'];
77  addThis();
78
79  status = inSection(2);
80  string = 'ah/info';
81  actualmatch = string.match(pattern);
82  expectedmatch = ['/', '/'];
83  addThis();
84
85  status = inSection(3);
86  string = 'ah.com';
87  actualmatch = string.match(pattern);
88  expectedmatch = null;
89  addThis();
90
91
92pattern = /(?!a|b)|c/;
93  status = inSection(4);
94  string = '';
95  actualmatch = string.match(pattern);
96  expectedmatch = [''];
97  addThis();
98
99  status = inSection(5);
100  string = 'bc';
101  actualmatch = string.match(pattern);
102  expectedmatch = [''];
103  addThis();
104
105  status = inSection(6);
106  string = 'd';
107  actualmatch = string.match(pattern);
108  expectedmatch = [''];
109  addThis();
110
111
112
113
114//-------------------------------------------------------------------------------------------------
115test();
116//-------------------------------------------------------------------------------------------------
117
118
119function addThis()
120{
121  statusmessages[i] = status;
122  patterns[i] = pattern;
123  strings[i] = string;
124  actualmatches[i] = actualmatch;
125  expectedmatches[i] = expectedmatch;
126  i++;
127}
128
129
130function test()
131{
132  enterFunc ('test');
133  printBugNumber (bug);
134  printStatus (summary);
135  testRegExp(statusmessages, patterns, strings, actualmatches, expectedmatches);
136  exitFunc ('test');
137}
138