Copyright test
[jalview.git] / src / com / stevesoft / pat / Group.java
1 /*******************************************************************************
2  * Jalview - A Sequence Alignment Editor and Viewer ($$Version-Rel$$)
3  * Copyright (C) $(date) The Jalview Authors
4  *
5  * This file is part of Jalview.
6  *  
7  * Jalview is free software: you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License 
9  * as published by the Free Software Foundation, either version 3
10  * of the License, or (at your option) any later version.
11  *   
12  * Jalview is distributed in the hope that it will be useful, but 
13  * WITHOUT ANY WARRANTY; without even the implied warranty 
14  * of MERCHANTABILITY or FITNESS FOR A PARTICULAR 
15  * PURPOSE.  See the GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with Jalview.  If not, see <http://www.gnu.org/licenses/>.
19  * The Jalview Authors are detailed in the 'AUTHORS' file.
20  *******************************************************************************/
21 //
22 // This software is now distributed according to
23 // the Lesser Gnu Public License.  Please see
24 // http://www.gnu.org/copyleft/lesser.txt for
25 // the details.
26 //    -- Happy Computing!
27 //
28 package com.stevesoft.pat;
29
30 import java.util.Hashtable;
31
32 /**
33  * This class implements the (?@<>) syntax that matches a balanced parenthesis.
34  * Not in perl 5.
35  */
36 class Group extends Pattern
37 {
38   char op, cl;
39
40   Group(char opi, char cli)
41   {
42     op = opi;
43     cl = cli;
44   }
45
46   public int matchInternal(int pos, Pthings pt)
47   {
48     int i, count = 1;
49     if (pos < pt.src.length())
50     {
51       if (!Masked(pos, pt) && pt.src.charAt(pos) != op)
52       {
53         return -1;
54       }
55     }
56     for (i = pos + 1; i < pt.src.length(); i++)
57     {
58       char c = pt.src.charAt(i);
59       boolean b = !Masked(i, pt);
60       if (b && c == ESC)
61       {
62         i++;
63       }
64       else
65       {
66         if (b && c == cl)
67         {
68           count--;
69         }
70         if (count == 0)
71         {
72           return nextMatch(i + 1, pt);
73         }
74         if (b && c == op)
75         {
76           count++;
77         }
78       }
79     }
80     return -1;
81   }
82
83   public String toString()
84   {
85     return "(?@" + op + cl + ")" + nextString();
86   }
87
88   public patInt minChars()
89   {
90     return new patInt(2);
91   }
92
93   Pattern clone1(Hashtable h)
94   {
95     return new Group(op, cl);
96   }
97 };