/**
* Constructor.
*
* @param value value
* @param type item type
* @param ii input info
* @throws QueryException query exception
*/
private Dur(final byte[] value, final Type type, final InputInfo ii) throws QueryException {
this(type);
final String val = Token.string(value).trim();
final Matcher mt = DUR.matcher(val);
if (!mt.matches() || val.endsWith("P") || val.endsWith("T")) throw dateError(value, XDURR, ii);
yearMonth(value, mt, ii);
dayTime(value, mt, 6, ii);
}
/**
* Initializes the yearMonth component.
*
* @param vl value
* @param mt matcher
* @param ii input info
* @throws QueryException query exception
*/
void yearMonth(final byte[] vl, final Matcher mt, final InputInfo ii) throws QueryException {
final long y = mt.group(2) != null ? toLong(mt.group(3), true, ii) : 0;
final long m = mt.group(4) != null ? toLong(mt.group(5), true, ii) : 0;
mon = y * 12 + m;
double v = y * 12d + m;
if (!mt.group(1).isEmpty()) {
mon = -mon;
v = -v;
}
if (v <= Long.MIN_VALUE || v >= Long.MAX_VALUE) throw DURRANGE_X_X.get(ii, type, vl);
}
/**
* Evaluates the analyze-string function.
*
* @param val input value
* @param ctx query context
* @return function result
* @throws QueryException query exception
*/
private Item analyzeString(final byte[] val, final QueryContext ctx) throws QueryException {
final Pattern p = pattern(expr[1], expr.length == 3 ? expr[2] : null, ctx);
if (p.matcher("").matches()) REGROUP.thrw(info);
final String str = string(val);
final Matcher m = p.matcher(str);
final FElem root = new FElem(Q_ANALYZE, new Atts(FN, FNURI));
int s = 0;
while (m.find()) {
if (s != m.start()) nonmatch(str.substring(s, m.start()), root);
match(m, str, root, 0);
s = m.end();
}
if (s != str.length()) nonmatch(str.substring(s), root);
return root;
}
/**
* Evaluates the tokenize function.
*
* @param ctx query context
* @return function result
* @throws QueryException query exception
*/
private Value tokenize(final QueryContext ctx) throws QueryException {
final byte[] val = checkEStr(expr[0], ctx);
final Pattern p = pattern(expr[1], expr.length == 3 ? expr[2] : null, ctx);
if (p.matcher("").matches()) REGROUP.thrw(info);
final TokenList tl = new TokenList();
final String str = string(val);
if (!str.isEmpty()) {
final Matcher m = p.matcher(str);
int s = 0;
while (m.find()) {
tl.add(str.substring(s, m.start()));
s = m.end();
}
tl.add(str.substring(s, str.length()));
}
return StrSeq.get(tl);
}
/**
* Processes a match.
*
* @param m matcher
* @param str string
* @param par parent
* @param g group number
* @return next group number and position in string
*/
private static int[] match(final Matcher m, final String str, final FElem par, final int g) {
final FElem nd = new FElem(g == 0 ? Q_MATCH : Q_MGROUP, new Atts(FN, FNURI));
if (g > 0) nd.add(Q_NR, token(g));
final int start = m.start(g), end = m.end(g), gc = m.groupCount();
int[] pos = {g + 1, start}; // group and position in string
while (pos[0] <= gc && m.end(pos[0]) <= end) {
final int st = m.start(pos[0]);
if (st >= 0) { // group matched
if (pos[1] < st) nd.add(str.substring(pos[1], st));
pos = match(m, str, nd, pos[0]);
} else pos[0]++; // skip it
}
if (pos[1] < end) {
nd.add(str.substring(pos[1], end));
pos[1] = end;
}
par.add(nd);
return pos;
}
/**
* Initializes the dayTime component.
*
* @param vl value
* @param mt matcher
* @param p first matching position
* @param ii input info
* @throws QueryException query exception
*/
void dayTime(final byte[] vl, final Matcher mt, final int p, final InputInfo ii)
throws QueryException {
final long d = mt.group(p) != null ? toLong(mt.group(p + 1), true, ii) : 0;
final long h = mt.group(p + 3) != null ? toLong(mt.group(p + 4), true, ii) : 0;
final long m = mt.group(p + 5) != null ? toLong(mt.group(p + 6), true, ii) : 0;
final BigDecimal s =
mt.group(p + 7) != null ? toDecimal(mt.group(p + 8), true, ii) : BigDecimal.ZERO;
sec =
s.add(BigDecimal.valueOf(d).multiply(DAYSECONDS))
.add(BigDecimal.valueOf(h).multiply(BD3600))
.add(BigDecimal.valueOf(m).multiply(BD60));
if (!mt.group(1).isEmpty()) sec = sec.negate();
final double v = sec.doubleValue();
if (v <= Long.MIN_VALUE || v >= Long.MAX_VALUE) throw DURRANGE_X_X.get(ii, type, vl);
}
