/**
* Returns the nth geometry of a geometry collection, or the geometry if the input is not a
* collection.
*
* @param node xml element containing gml object(s)
* @param number integer number as the index of nth geometry
* @return geometry as a gml element
* @throws QueryException query exception
*/
@Deterministic
public ANode geometryN(final ANode node, final Int number) throws QueryException {
final Geometry geo = checkGeo(node);
final long n = number.itr();
if (n < 1 || n > geo.getNumGeometries()) throw GeoErrors.outOfRangeIdx(number);
return gmlWriter(geo.getGeometryN((int) n - 1));
}
/**
* Runs a query with an external variable declaration.
*
* @throws IOException I/O exception
*/
@Test
public void queryBindSequence() throws IOException {
Query query = session.query("declare variable $a external; $a");
query.bind("a", "1\u00012", "xs:integer");
assertEqual("1", query.next());
assertEqual("2", query.next());
query.close();
query = session.query("declare variable $a external; $a");
query.bind("a", "09\u0002xs:hexBinary\u00012", "xs:integer");
assertEqual("09", query.next());
assertEqual("2", query.next());
query.close();
query = session.query("declare variable $a external; $a");
query.bind("a", Seq.get(new Item[] {Int.get(1), Str.get("X")}, 2));
assertEqual("1", query.next());
assertEqual("X", query.next());
query.close();
query = session.query("declare variable $a external; $a");
query.bind("a", IntSeq.get(new long[] {1, 2}, AtomType.INT));
assertEqual("1", query.next());
assertEqual("2", query.next());
query.close();
query = session.query("declare variable $a external; $a");
query.bind("a", IntSeq.get(new long[] {1, 2}, AtomType.INT), "xs:integer");
assertEqual("1", query.next());
assertEqual("2", query.next());
query.close();
}
/**
* Returns the number of interior rings in a polygon.
*
* @param node xml element containing gml object(s)
* @return integer number of interior rings
* @throws QueryException query exception
*/
@Deterministic
public Int numInteriorRing(final ANode node) throws QueryException {
final Geometry geo = geo(node, Q_GML_POLYGON);
if (geo == null && checkGeo(node) != null)
throw GeoErrors.geoType(node.qname().local(), "Polygon");
return Int.get(((Polygon) geo).getNumInteriorRing());
}
/**
* Returns the nth geometry of a geometry collection.
*
* @param node xml element containing gml object(s)
* @param number index of i-th interior ring
* @return n-th interior ring geometry (LineString) as a gml element
* @throws QueryException query exception
*/
@Deterministic
public ANode interiorRingN(final ANode node, final Int number) throws QueryException {
final Geometry geo = geo(node, Q_GML_POLYGON);
if (geo == null && checkGeo(node) != null)
throw GeoErrors.geoType(node.qname().local(), "Polygon");
final long n = number.itr();
final int max = ((Polygon) geo).getNumInteriorRing();
if (n < 1 || n > max) throw GeoErrors.outOfRangeIdx(number);
return gmlWriter(((Polygon) geo).getInteriorRingN((int) n - 1));
}
/**
* Returns the nth point of a line.
*
* @param node xml element containing gml object(s)
* @param number index of i-th point
* @return n-th point as a gml element
* @throws QueryException query exception
*/
@Deterministic
public ANode pointN(final ANode node, final Int number) throws QueryException {
final Geometry geo = geo(node, Q_GML_LINEARRING, Q_GML_LINESTRING);
if (geo == null && checkGeo(node) != null)
throw GeoErrors.geoType(node.qname().local(), "Line");
final int max = geo.getNumPoints();
final long n = number.itr();
if (n < 1 || n > max) throw GeoErrors.outOfRangeIdx(number);
return gmlWriter(((LineString) geo).getPointN((int) n - 1));
}
/**
* Runs a query with an external variable declaration.
*
* @throws IOException I/O exception
*/
@Test
public void queryBindInt() throws IOException {
Query query = session.query("declare variable $a as xs:integer external; $a");
query.bind("a", "5", "xs:integer");
assertEqual("5", query.next());
query.close();
query = session.query("declare variable $a external; $a");
query.bind("a", Int.get(1), "xs:integer");
assertEqual("1", query.next());
query.close();
}
@Override
public Item item(final QueryContext qc, final InputInfo ii) throws QueryException {
checkCreate(qc);
// URL to relational database
final String url = string(toToken(exprs[0], qc));
final JDBCConnections jdbc = jdbc(qc);
try {
if (exprs.length > 2) {
// credentials
final String user = string(toToken(exprs[1], qc));
final String pass = string(toToken(exprs[2], qc));
if (exprs.length == 4) {
// connection options
final Options opts = toOptions(3, Q_OPTIONS, new Options(), qc);
// extract auto-commit mode from options
boolean ac = true;
final HashMap<String, String> options = opts.free();
final String commit = options.get(AUTO_COMM);
if (commit != null) {
ac = Strings.yes(commit);
options.remove(AUTO_COMM);
}
// connection properties
final Properties props = connProps(options);
props.setProperty(USER, user);
props.setProperty(PASS, pass);
// open connection
final Connection conn = getConnection(url, props);
// set auto/commit mode
conn.setAutoCommit(ac);
return Int.get(jdbc.add(conn));
}
return Int.get(jdbc.add(getConnection(url, user, pass)));
}
return Int.get(jdbc.add(getConnection(url)));
} catch (final SQLException ex) {
throw BXSQ_ERROR_X.get(info, ex);
}
}
/**
* Returns the dimension of an item.
*
* @param node xml element containing gml object(s)
* @return dimension
* @throws QueryException query exception
*/
@Deterministic
public Int dimension(final ANode node) throws QueryException {
return Int.get(checkGeo(node).getDimension());
}
/**
* Returns the number of points in a geometry.
*
* @param node xml element containing gml object(s)
* @return number of points int value
* @throws QueryException query exception
*/
@Deterministic
public Int numPoints(final ANode node) throws QueryException {
return Int.get(checkGeo(node).getNumPoints());
}
/**
* Formats the specified number and returns a string representation.
*
* @param item item
* @param pics pictures
* @param ii input info
* @return picture variables
* @throws QueryException query exception
*/
private byte[] format(final ANum item, final Picture[] pics, final InputInfo ii)
throws QueryException {
// Rule 1: return results for NaN
final double d = item.dbl(ii);
if (Double.isNaN(d)) return nan;
// Rule 2: check if value if negative (smaller than zero or -0)
final boolean neg = d < 0 || d == 0 && Double.doubleToLongBits(d) == Long.MIN_VALUE;
final Picture pic = pics[neg && pics.length == 2 ? 1 : 0];
final IntList res = new IntList(), intgr = new IntList(), fract = new IntList();
int exp = 0;
// Rule 3: percent/permille
ANum num = item;
if (pic.pc) num = (ANum) Calc.MULT.ev(num, Int.get(100), ii);
if (pic.pm) num = (ANum) Calc.MULT.ev(num, Int.get(1000), ii);
if (Double.isInfinite(num.dbl(ii))) {
// Rule 4: infinity
intgr.add(new TokenParser(inf).toArray());
} else {
// Rule 5: exponent
if (pic.minExp != 0 && d != 0) {
BigDecimal dec = num.dec(ii).abs().stripTrailingZeros();
int scl = 0;
if (dec.compareTo(BigDecimal.ONE) >= 0) {
scl = dec.setScale(0, RoundingMode.HALF_DOWN).precision();
} else {
while (dec.compareTo(BigDecimal.ONE) < 0) {
dec = dec.multiply(BigDecimal.TEN);
scl--;
}
scl++;
}
exp = scl - pic.min[0];
if (exp != 0) {
final BigDecimal n = BigDecimal.TEN.pow(Math.abs(exp));
num = (ANum) Calc.MULT.ev(num, Dec.get(exp > 0 ? BigDecimal.ONE.divide(n) : n), ii);
}
}
num = num.round(pic.maxFrac, true).abs();
// convert positive number to string
final String s =
(num instanceof Dbl || num instanceof Flt
? Dec.get(BigDecimal.valueOf(num.dbl(ii)))
: num)
.toString();
// integer/fractional separator
final int sep = s.indexOf('.');
// create integer part
final int sl = s.length();
final int il = sep == -1 ? sl : sep;
for (int i = il; i < pic.min[0]; ++i) intgr.add(zero);
// fractional number: skip leading 0
if (!s.startsWith("0.") || pic.min[0] > 0) {
for (int i = 0; i < il; i++) intgr.add(zero + s.charAt(i) - '0');
}
// squeeze in grouping separators
if (pic.group[0].length == 1 && pic.group[0][0] > 0) {
// regular pattern with repeating separators
for (int p = intgr.size() - (neg ? 2 : 1); p > 0; --p) {
if (p % pic.group[0][0] == 0) intgr.insert(intgr.size() - p, grouping);
}
} else {
// irregular pattern, or no separators at all
final int gl = pic.group[0].length;
for (int g = 0; g < gl; ++g) {
final int pos = intgr.size() - pic.group[0][g];
if (pos > 0) intgr.insert(pos, grouping);
}
}
// create fractional part
final int fl = sep == -1 ? 0 : sl - il - 1;
if (fl != 0) for (int i = sep + 1; i < sl; i++) fract.add(zero + s.charAt(i) - '0');
for (int i = fl; i < pic.min[1]; ++i) fract.add(zero);
// squeeze in grouping separators in a reverse manner
final int ul = fract.size();
for (int p = pic.group[1].length - 1; p >= 0; p--) {
final int pos = pic.group[1][p];
if (pos < ul) fract.insert(pos, grouping);
}
}
// add minus sign
if (neg && pics.length != 2) res.add(minus);
// add prefix and integer part
res.add(pic.prefSuf[0].toArray()).add(intgr.finish());
// add fractional part
if (!fract.isEmpty()) res.add(decimal).add(fract.finish());
// add exponent
if (pic.minExp != 0) {
res.add(exponent);
if (exp < 0) res.add(minus);
final String s = Integer.toString(Math.abs(exp));
final int sl = s.length();
for (int i = sl; i < pic.minExp; i++) res.add(zero);
for (int i = 0; i < sl; i++) res.add(zero + s.charAt(i) - '0');
}
// add suffix
res.add(pic.prefSuf[1].toArray());
return new TokenBuilder(res.finish()).finish();
}