WildcardMatcher.java

package org.eclipse.dltk.validators.internal.externalchecker.core;

import java.util.ArrayList;
import java.util.List;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

import org.eclipse.dltk.validators.core.IValidatorProblem;
import org.eclipse.dltk.validators.core.ValidatorProblem;

public class WildcardMatcher {

	private List tokenList = new ArrayList();
	private List wcards;

	public WildcardMatcher(List wcards) {
		this.wcards = wcards;
	}

	public IValidatorProblem match(Rule pattern, String input)
			throws WildcardException {
		tokenList = parseWildcard(pattern.getDescription());
		String bigpattern = makeBigPattern(pattern.getDescription(), wcards);
		Pattern pat = Pattern.compile(bigpattern);
		Matcher matcher = pat.matcher(input);

		if (matcher.matches()) {
			String fileName = null;
			int lineNumber = -1;
			String message = null;
			Pattern lPattern = Pattern.compile(getPattern('n', wcards));
			Pattern mPattern = Pattern.compile(getPattern('m', wcards));
			Pattern fPattern = Pattern.compile(getPattern('f', wcards));
			for (int i = 1; i <= matcher.groupCount(); i++) {
				if (matcher.group(i) != null) {
					String group = matcher.group(i);
					Matcher lMatch = lPattern.matcher(group);
					if (lMatch.find()) {
						lineNumber = new Integer(lMatch.group()).intValue();
						continue;
					}

					Matcher fMatch = fPattern.matcher(group);
					if (fMatch.find()) {
						if (fileName == null) {
							fileName = fMatch.group();
							continue;
						}
					}

					Matcher mMatch = mPattern.matcher(group);
					if (mMatch.find()) {
						message = mMatch.group();
						continue;
					}
				}
			}
			if (message == null) {
				message = input;
			}

			return new ValidatorProblem(fileName, message, lineNumber, pattern
					.getProblemType());
		}
		return null;
	}

	public ArrayList parseWildcard(String wildcard) {
		ArrayList list = new ArrayList();

		StringBuffer sb = new StringBuffer();
		final int CLEAN = 0;
		final int FULL = 1;
		int sbstatus = CLEAN;

		for (int j = 0; j < wildcard.length(); j++) {
			if (wildcard.charAt(j) == '%') {
				if (sbstatus == FULL) {
					list.add(new WildcardToken("string", sb.toString())); //$NON-NLS-1$
					sbstatus = CLEAN;
					sb.delete(0, sb.length());
				}
				list.add(new WildcardToken("wcard", recognizeWildcard(wildcard //$NON-NLS-1$
						.charAt(j + 1))));

				j = j + 1;
				continue;
			} else {
				sbstatus = FULL;
				sb.append(wildcard.charAt(j));
			}
		}
		if (sbstatus == FULL) {
			list.add(new WildcardToken("string", sb.toString())); //$NON-NLS-1$
			sbstatus = CLEAN;
			sb.delete(0, sb.length());
		}
		return list;
	}

	public String recognizeWildcard(char symbol) {
		for (int i = 0; i < wcards.size(); i++) {
			CustomWildcard card = (CustomWildcard) wcards.get(i);
			if (card.getLetter().indexOf(symbol) != -1) {
				return card.getLetter();
			}
		}
		return null;
	}

	private static String makeBigPattern(String input, List wcards) {
		int status;
		final int UNDEFINED = 0;
		final int IN_STRING = 1;

		status = UNDEFINED;
		StringBuffer sb = new StringBuffer();
		// sb.append(".*");
		for (int i = 0; i < input.length(); i++) {
			char c = input.charAt(i);
			if (c != '%') {
				if (status == UNDEFINED) {
					status = IN_STRING;
					// sb.append("(");
				}
				if (Character.isWhitespace(c)) {
					sb.append("[\\s]+"); //$NON-NLS-1$
				} else {
					sb.append(c);
				}
			} else {
				if (status == IN_STRING) {
					// sb.append(")");

				}

				String pattern = getPattern(input.charAt(i + 1), wcards);
				if (pattern == null) {
					pattern = ""; //$NON-NLS-1$
				}
				sb.append("("); //$NON-NLS-1$
				sb.append(pattern);
				sb.append(")"); //$NON-NLS-1$
				i = i + 1;
				status = UNDEFINED;
			}
		}
		if (status == IN_STRING) {
			sb.append(")"); //$NON-NLS-1$
		}
		sb.append(".*"); //$NON-NLS-1$
		return sb.toString();
	}

	private static String getPattern(char c, List wcards) {
		String s = null;
		for (int i = 0; i < wcards.size(); i++) {
			CustomWildcard cwcard = (CustomWildcard) wcards.get(i);
			if (cwcard.getLetter().indexOf(c) != -1) {
				s = cwcard.getSpattern();
			}
		}
		return s;
	}

	private int getIndexOfLineNumber() {
		for (int i = 0; i < tokenList.size(); i++) {
			WildcardToken tok = (WildcardToken) tokenList.get(i);
			String value = (String) tok.getValue();
			if (value.equals("n")) { //$NON-NLS-1$
				return i;
			}
		}
		return -1;
	}
}