/*
* Copyright 1998-2009 University Corporation for Atmospheric Research/Unidata
*
* Portions of this software were developed by the Unidata Program at the
* University Corporation for Atmospheric Research.
*
* Access and use of this software shall impose the following obligations
* and understandings on the user. The user is granted the right, without
* any fee or cost, to use, copy, modify, alter, enhance and distribute
* this software, and any derivative works thereof, and its supporting
* documentation for any purpose whatsoever, provided that this entire
* notice appears in all copies of the software, derivative works and
* supporting documentation. Further, UCAR requests that the user credit
* UCAR/Unidata in any publications that result from the use of this
* software or in any product that includes this software. The names UCAR
* and/or Unidata, however, may not be used in any advertising or publicity
* to endorse or promote any products or commercial entity unless specific
* written permission is obtained from UCAR/Unidata. The user also
* understands that UCAR/Unidata is not obligated to provide the user with
* any support, consulting, training or assistance of any kind with regard
* to the use, operation and performance of this software nor to provide
* the user with any updates, revisions, new versions or "bug fixes."
*
* THIS SOFTWARE IS PROVIDED BY UCAR/UNIDATA "AS IS" AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL UCAR/UNIDATA BE LIABLE FOR ANY SPECIAL,
* INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
* FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
* NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
* WITH THE ACCESS, USE OR PERFORMANCE OF THIS SOFTWARE.
*/
package ucar.nc2.ncml;
import ucar.nc2.dataset.*;
import ucar.nc2.util.CancelTask;
import ucar.nc2.*;
import ucar.nc2.units.DateUnit;
import ucar.nc2.units.DateFromString;
import ucar.ma2.*;
import java.io.IOException;
import java.util.*;
import java.util.concurrent.*;
import thredds.inventory.MFile;
/**
* Superclass for Aggregations on the outer dimension: joinNew, joinExisting, Fmrc, FmrcSingle
*
* @author caron
* @since Aug 10, 2007
*/
public abstract class AggregationOuterDimension extends Aggregation implements ProxyReader {
static protected boolean debugCache = false, debugInvocation = false, debugStride = false;
static public int invocation = 0; // debugging
protected List<String> aggVarNames = new ArrayList<String>(); // explicitly specified in the NcML
protected List<VariableDS> aggVars = new ArrayList<VariableDS>(); // actual vars that will be aggregated
private int totalCoords = 0; // the aggregation dimension size
protected List<CacheVar> cacheList = new ArrayList<CacheVar>(); // promote global attribute to variable
protected boolean timeUnitsChange = false;
/**
* Create an Aggregation for the given NetcdfDataset.
* The following addXXXX methods are called, then finish(), before the object is ready for use.
*
* @param ncd Aggregation belongs to this NetcdfDataset
* @param dimName the aggregation dimension name
* @param type the Aggregation.Type
* @param recheckS how often to check if files have changes
*/
protected AggregationOuterDimension(NetcdfDataset ncd, String dimName, Type type, String recheckS) {
super(ncd, dimName, type, recheckS);
}
/**
* Set if time units can change. Implies isDate
*
* @param timeUnitsChange true if time units can change
*/
void setTimeUnitsChange(boolean timeUnitsChange) {
this.timeUnitsChange = timeUnitsChange;
if (timeUnitsChange) isDate = true;
}
/**
* Add a name for a variableAgg element
*
* @param varName name of agg variable
*/
public void addVariable(String varName) {
aggVarNames.add(varName);
}
/**
* Promote a global attribute to a variable
*
* @param varName name of agg variable
* @param orgName name of global attribute, may be different from the variable name
*/
void addVariableFromGlobalAttribute(String varName, String orgName) {
cacheList.add(new PromoteVar(varName, orgName));
}
/**
* Promote a global attribute to a variable
*
* @param varName name of agg variable
* @param format java.util.Format string
* @param gattNames space delimited list of global attribute names
*/
void addVariableFromGlobalAttributeCompose(String varName, String format, String gattNames) {
cacheList.add(new PromoteVarCompose(varName, format, gattNames));
}
/**
* Cache a variable (for efficiency).
* Useful for Variables that are used a lot, and not too large, like coordinate variables.
*
* @param varName name of variable to cache. must exist.
* @param dtype datatype of variable
*/
void addCacheVariable(String varName, DataType dtype) {
if (findCacheVariable(varName) != null) return; // no duplicates
cacheList.add(new CacheVar(varName, dtype));
}
CacheVar findCacheVariable(String varName) {
for (CacheVar cv : cacheList)
if (cv.varName.equals(varName)) return cv;
return null;
}
/**
* Get the list of aggregation variable names: variables whose data spans multiple files.
* For type joinNew only.
*
* @return the list of aggregation variable names
*/
List<String> getAggVariableNames() {
return aggVarNames;
}
protected void buildCoords(CancelTask cancelTask) throws IOException {
List<Dataset> nestedDatasets = getDatasets();
if (type == Type.forecastModelRunCollection) {
for (Dataset nested : nestedDatasets) {
DatasetOuterDimension dod = (DatasetOuterDimension) nested;
dod.ncoord = 1;
}
}
totalCoords = 0;
for (Dataset nested : nestedDatasets) {
DatasetOuterDimension dod = (DatasetOuterDimension) nested;
totalCoords += dod.setStartEnd(totalCoords, cancelTask);
}
}
protected int getTotalCoords() {
return totalCoords;
}
protected void promoteGlobalAttributes(DatasetOuterDimension typicalDataset) throws IOException {
for (CacheVar cv : cacheList) {
if (!(cv instanceof PromoteVar)) continue;
PromoteVar pv = (PromoteVar) cv;
Array data = pv.read(typicalDataset);
pv.dtype = DataType.getType(data.getElementType());
VariableDS promotedVar = new VariableDS(ncDataset, null, null, pv.varName, pv.dtype, dimName, null, null);
/* if (data.getSize() > 1) { // LOOK case of non-scalar global attribute not delat with
Dimension outer = ncDataset.getRootGroup().findDimension(dimName);
Dimension inner = new Dimension("", (int) data.getSize(), false); //anonymous
List<Dimension> dims = new ArrayList<Dimension>(2);
dims.add(outer);
dims.add(inner);
promotedVar.setDimensions(dims);
} */
ncDataset.addVariable(null, promotedVar);
promotedVar.setProxyReader( this);
promotedVar.setSPobject(pv);
}
}
protected void rebuildDataset() throws IOException {
buildCoords(null);
// reset dimension length
Dimension aggDim = ncDataset.findDimension(dimName); // LOOK use group
aggDim.setLength(getTotalCoords());
// reset coordinate var
VariableDS joinAggCoord = (VariableDS) ncDataset.getRootGroup().findVariable(dimName);
joinAggCoord.setDimensions(dimName); // reset its dimension
joinAggCoord.invalidateCache(); // get rid of any cached data, since its now wrong
// reset agg variables
for (Variable aggVar : aggVars) {
//aggVar.setDimensions(dimName); // reset its dimension
aggVar.resetDimensions(); // reset its dimensions
aggVar.invalidateCache(); // get rid of any cached data, since its now wrong
}
// reset the typical dataset, where non-agg variables live
Dataset typicalDataset = getTypicalDataset();
for (Variable var : ncDataset.getRootGroup().getVariables()) {
VariableDS varDS = (VariableDS) var;
if (aggVars.contains(varDS) || dimName.equals(var.getShortName()))
continue;
DatasetProxyReader proxy = new DatasetProxyReader(typicalDataset);
var.setProxyReader(proxy);
}
// reset cacheVars
for (CacheVar cv : cacheList) {
cv.reset();
}
}
/////////////////////////////////////////////////////////////////////////////////////
/**
* Read a section of an aggregation variable.
*
* @param section read just this section of the data, array of Range
* @return the data array section
* @throws IOException
*/
@Override
public Array reallyRead(Variable mainv, Section section, CancelTask cancelTask) throws IOException, InvalidRangeException {
// public Array reallyRead(Section section, CancelTask cancelTask) throws IOException, InvalidRangeException {
if (debugConvert && mainv instanceof VariableDS) {
DataType dtype = ((VariableDS) mainv).getOriginalDataType();
if ((dtype != null) && (dtype != mainv.getDataType())) {
System.out.printf("Original type = %s mainv type= %s%n", dtype, mainv.getDataType());
}
}
// If its full sized, then use full read, so that data gets cached.
long size = section.computeSize();
if (size == mainv.getSize())
return reallyRead(mainv, cancelTask);
// read the original type - if its been promoted to a new type, the conversion happens after this read
DataType dtype = (mainv instanceof VariableDS) ? ((VariableDS) mainv).getOriginalDataType() : mainv.getDataType();
// check if its cached
Object spObj = mainv.getSPobject();
if (spObj != null && spObj instanceof CacheVar) {
CacheVar pv = (CacheVar) spObj;
Array cacheArray = pv.read(section, cancelTask);
return MAMath.convert(cacheArray, dtype); // // cache may keep data as different type
}
// the case of the agg coordinate var
//if (mainv.getShortName().equals(dimName))
// return readAggCoord(mainv, section, cancelTask);
Array sectionData = Array.factory(dtype, section.getShape());
int destPos = 0;
List<Range> ranges = section.getRanges();
Range joinRange = section.getRange(0);
List<Range> nestedSection = new ArrayList<Range>(ranges); // get copy
List<Range> innerSection = ranges.subList(1, ranges.size());
if (debug) System.out.println(" agg wants range=" + mainv.getFullName() + "(" + joinRange + ")");
// LOOK: could multithread here
List<Dataset> nestedDatasets = getDatasets();
for (Dataset nested : nestedDatasets) {
DatasetOuterDimension dod = (DatasetOuterDimension) nested;
Range nestedJoinRange = dod.getNestedJoinRange(joinRange);
if (nestedJoinRange == null)
continue;
//if (debug)
// System.out.println(" agg use " + nested.aggStart + ":" + nested.aggEnd + " range= " + nestedJoinRange + " file " + nested.getLocation());
Array varData;
if ((type == Type.joinNew) || (type == Type.forecastModelRunCollection)) {
varData = dod.read(mainv, cancelTask, innerSection);
} else {
nestedSection.set(0, nestedJoinRange);
varData = dod.read(mainv, cancelTask, nestedSection);
}
if ((cancelTask != null) && cancelTask.isCancel())
return null;
varData = MAMath.convert(varData, dtype); // just in case it need to be converted
Array.arraycopy(varData, 0, sectionData, destPos, (int) varData.getSize());
destPos += varData.getSize();
}
return sectionData;
}
/**
* Read an aggregation variable: A variable whose data spans multiple files.
* This is an implementation of ProxyReader, so must fulfill that contract.
*
* @param mainv the aggregation variable
* @throws IOException
*/
@Override
public Array reallyRead(Variable mainv, CancelTask cancelTask) throws IOException {
if (debugConvert && mainv instanceof VariableDS) {
DataType dtype = ((VariableDS) mainv).getOriginalDataType();
if ((dtype != null) && (dtype != mainv.getDataType())) {
System.out.printf("Original type = %s mainv type= %s%n", dtype, mainv.getDataType());
}
}
// read the original type - if its been promoted to a new type, the conversion happens after this read
DataType dtype = (mainv instanceof VariableDS) ? ((VariableDS) mainv).getOriginalDataType() : mainv.getDataType();
Object spObj = mainv.getSPobject();
if (spObj != null && spObj instanceof CacheVar) {
CacheVar pv = (CacheVar) spObj;
try {
Array cacheArray = pv.read(mainv.getShapeAsSection(), cancelTask);
return MAMath.convert(cacheArray, dtype); // // cache may keep data as different type
} catch (InvalidRangeException e) {
logger.error("readAgg " + getLocation(), e);
throw new IllegalArgumentException("readAgg " + getLocation(), e);
}
}
// the case of the agg coordinate var
//if (mainv.getShortName().equals(dimName))
// return readAggCoord(mainv, cancelTask);
Array allData = Array.factory(dtype, mainv.getShape());
int destPos = 0;
List<Dataset> nestedDatasets = getDatasets();
if (executor != null) {
CompletionService<Result> completionService = new ExecutorCompletionService<Result>(executor);
int count = 0;
for (Dataset vnested : nestedDatasets)
completionService.submit(new ReaderTask(vnested, mainv, cancelTask, count++));
try {
int n = nestedDatasets.size();
for (int i = 0; i < n; ++i) {
Result r = completionService.take().get();
r.data = MAMath.convert(r.data, dtype); // just in case it need to be converted
if (r != null) {
int size = (int) r.data.getSize();
Array.arraycopy(r.data, 0, allData, size * r.index, size);
}
}
} catch (InterruptedException e) {
Thread.currentThread().interrupt();
} catch (ExecutionException e) {
throw new IOException(e.getMessage());
}
} else {
for (Dataset vnested : nestedDatasets) {
Array varData = vnested.read(mainv, cancelTask);
if ((cancelTask != null) && cancelTask.isCancel())
return null;
varData = MAMath.convert(varData, dtype); // just in case it need to be converted
Array.arraycopy(varData, 0, allData, destPos, (int) varData.getSize());
destPos += varData.getSize();
}
}
return allData;
}
private class ReaderTask implements Callable<Result> {
Dataset ds;
Variable mainv;
CancelTask cancelTask;
int index;
ReaderTask(Dataset ds, Variable mainv, CancelTask cancelTask, int index) {
this.ds = ds;
this.mainv = mainv;
this.cancelTask = cancelTask;
this.index = index;
}
public Result call() throws Exception {
Array data = ds.read(mainv, cancelTask);
return new Result(data, index);
}
}
private class Result {
Array data;
int index;
Result(Array data, int index) {
this.data = data;
this.index = index;
}
}
/* protected Array readAggCoord(Variable aggCoord, Section section, CancelTask cancelTask) throws IOException, InvalidRangeException {
DataType dtype = aggCoord.getDataType();
Array allData = Array.factory(dtype, section.getShape());
IndexIterator result = allData.getIndexIterator();
List<Range> ranges = section.getRanges();
Range joinRange = section.getRange(0);
List<Range> nestedSection = new ArrayList<Range>(ranges); // get copy
List<Range> innerSection = ranges.subList(1, ranges.size());
List<Dataset> nestedDatasets = getDatasets();
for (Dataset vnested : nestedDatasets) {
DatasetOuterDimension dod = (DatasetOuterDimension) vnested;
Range nestedJoinRange = dod.getNestedJoinRange(joinRange);
if (nestedJoinRange == null)
continue;
//if (debug)
// System.out.println(" agg use " + vnested.aggStart + ":" + vnested.aggEnd + " range= " + nestedJoinRange + " file " + vnested.getLocation());
readAggCoord(aggCoord, cancelTask, dod, dtype, result, nestedJoinRange, nestedSection, innerSection);
if ((cancelTask != null) && cancelTask.isCancel())
return null;
}
return allData;
}
// handle the case of cached agg coordinate variables
private void readAggCoord(Variable aggCoord, CancelTask cancelTask, DatasetOuterDimension vnested, DataType dtype, IndexIterator result,
Range nestedJoinRange, List<Range> nestedSection, List<Range> innerSection) throws IOException, InvalidRangeException {
// we have the coordinates as a String
if (vnested.coordValue != null) {
// if theres only one coord
if (vnested.ncoord == 1) {
if (dtype == DataType.STRING) {
result.setObjectNext(vnested.coordValue);
} else {
double val = Double.parseDouble(vnested.coordValue);
result.setDoubleNext(val);
}
} else {
// joinExisting can have multiple coords
int count = 0;
StringTokenizer stoker = new StringTokenizer(vnested.coordValue, " ,");
while (stoker.hasMoreTokens()) {
String toke = stoker.nextToken();
if ((nestedJoinRange != null) && !nestedJoinRange.contains(count))
continue;
if (dtype == DataType.STRING) {
result.setObjectNext(toke);
} else {
double val = Double.parseDouble(toke);
result.setDoubleNext(val);
}
count++;
}
if (count != vnested.ncoord)
logger.error("readAggCoord incorrect number of coordinates dataset=" + vnested.getLocation());
}
} else { // we gotta read it
Array varData;
if (nestedJoinRange == null) { // all data
varData = vnested.read(aggCoord, cancelTask);
} else if ((type == Type.JOIN_NEW) || (type == Type.FORECAST_MODEL_COLLECTION)) {
varData = vnested.read(aggCoord, cancelTask, innerSection);
} else {
nestedSection.set(0, nestedJoinRange);
varData = vnested.read(aggCoord, cancelTask, nestedSection);
}
// copy it to the result
MAMath.copy(dtype, varData.getIndexIterator(), result);
}
} */
@Override
protected Dataset makeDataset(String cacheName, String location, String id, String ncoordS, String coordValueS, String sectionSpec,
EnumSet<NetcdfDataset.Enhance> enhance, ucar.nc2.util.cache.FileFactory reader) {
return new DatasetOuterDimension(cacheName, location, id, ncoordS, coordValueS, enhance, reader);
}
@Override
protected Dataset makeDataset(MFile dset) {
return new DatasetOuterDimension(dset);
}
/**
* Encapsolates a NetcdfFile that is a component of the aggregation.
*/
class DatasetOuterDimension extends Dataset {
protected int ncoord; // number of coordinates in outer dimension for this dataset
protected String coordValue; // if theres a coordValue on the netcdf element - may be multiple, blank seperated
protected Date coordValueDate; // if its a date
protected boolean isStringValued = false;
private int aggStart = 0, aggEnd = 0; // index in aggregated dataset; aggStart <= i < aggEnd
protected DatasetOuterDimension(String location) {
super(location);
}
/**
* Dataset constructor.
* With this constructor, the actual opening of the dataset is deferred, and done by the reader.
* Used with explicit netcdf elements, and scanned files.
*
* @param cacheName a unique name to use for caching
* @param location attribute "location" on the netcdf element
* @param id attribute "id" on the netcdf element
* @param ncoordS attribute "ncoords" on the netcdf element
* @param coordValueS attribute "coordValue" on the netcdf element
* @param enhance open dataset in enhance mode NOT USED
* @param reader factory for reading this netcdf dataset; if null, use NetcdfDataset.open( location)
*/
protected DatasetOuterDimension(String cacheName, String location, String id, String ncoordS, String coordValueS,
EnumSet<NetcdfDataset.Enhance> enhance, ucar.nc2.util.cache.FileFactory reader) {
super(cacheName, location, id, enhance, reader);
this.coordValue = coordValueS;
if ((type == Type.joinNew) || (type == Type.joinExistingOne)) {
this.ncoord = 1;
} else if (ncoordS != null) {
try {
this.ncoord = Integer.parseInt(ncoordS);
} catch (NumberFormatException e) {
logger.error("bad ncoord attribute on dataset=" + location);
}
}
if ((type == Type.joinNew) || (type == Type.joinExistingOne) || (type == Type.forecastModelRunCollection)) {
if (coordValueS == null) {
int pos = this.location.lastIndexOf('/');
this.coordValue = (pos < 0) ? this.location : this.location.substring(pos + 1);
this.isStringValued = true;
} else {
try {
Double.parseDouble(coordValueS);
} catch (NumberFormatException e) {
this.isStringValued = true;
}
}
}
// allow coordValue attribute on JOIN_EXISTING, may be multiple values seperated by blanks or commas
if ((type == Type.joinExisting) && (coordValueS != null)) {
StringTokenizer stoker = new StringTokenizer(coordValueS, " ,");
this.ncoord = stoker.countTokens();
}
}
DatasetOuterDimension(MFile cd) {
super(cd);
if ((type == Type.joinNew) || (type == Type.joinExistingOne)) {
this.ncoord = 1;
}
// default is that the coordinates are just the filenames
// this can be overriden by an explicit declaration, which will replace the variable afte ther agg is processed in NcMLReader
if ((type == Type.joinNew) || (type == Type.joinExistingOne) || (type == Type.forecastModelRunCollection)) {
int pos = this.location.lastIndexOf('/');
this.coordValue = (pos < 0) ? this.location : this.location.substring(pos + 1);
this.isStringValued = true;
}
if (null != dateFormatMark) {
String filename = cd.getName(); // LOOK operates on name, not path
coordValueDate = DateFromString.getDateUsingDemarkatedCount(filename, dateFormatMark, '#');
coordValue = dateFormatter.toDateTimeStringISO(coordValueDate);
if (debugDateParse) System.out.println(" adding " + cd.getPath() + " date= " + coordValue);
} else {
if (debugDateParse) System.out.println(" adding " + cd.getPath());
}
if ((coordValue == null) && (type == Type.joinNew)) // use filename as coord value
coordValue = cd.getName();
}
/**
* Get the coordinate value(s) as a String for this Dataset
*
* @return the coordinate value(s) as a String
*/
public String getCoordValueString() {
return coordValue;
}
/**
* Get the coordinate value as a Date for this Dataset; may be null
*
* @return the coordinate value as a Date, or null
*/
public Date getCoordValueDate() {
return coordValueDate;
}
public void show(Formatter f) {
f.format(" %s", location);
if (coordValue != null)
f.format(" coordValue='%s'", coordValue);
if (coordValueDate != null)
f.format(" coordValueDate='%s'", dateFormatter.toDateTimeString(coordValueDate));
f.format(" range=[%d:%d) (%d)%n", aggStart, aggEnd, ncoord);
}
/**
* Get number of coordinates in this Dataset.
* If not already set, open the file and get it from the aggregation dimension.
*
* @param cancelTask allow cancellation
* @return number of coordinates in this Dataset.
* @throws java.io.IOException if io error
*/
public int getNcoords(CancelTask cancelTask) throws IOException {
if (ncoord <= 0) {
NetcdfFile ncd = null;
try {
ncd = acquireFile(cancelTask);
if ((cancelTask != null) && cancelTask.isCancel()) return 0;
Dimension d = ncd.findDimension(dimName); // long name of dimension
if (d != null)
ncoord = d.getLength();
else
throw new IllegalArgumentException("Dimension not found= " + dimName);
} finally {
close(ncd);
}
}
return ncoord;
}
/**
* Set the starting and ending index into the aggregation dimension
*
* @param aggStart starting index
* @param cancelTask allow to bail out
* @return number of coordinates in this dataset
* @throws IOException if io error
*/
protected int setStartEnd(int aggStart, CancelTask cancelTask) throws IOException {
this.aggStart = aggStart;
this.aggEnd = aggStart + getNcoords(cancelTask);
return ncoord;
}
/**
* Get the desired Range, reletive to this Dataset, if no overlap, return null.
* <p> wantStart, wantStop are the indices in the aggregated dataset, wantStart <= i < wantEnd.
* if this overlaps, set the Range required for the nested dataset.
* note this should handle strides ok.
*
* @param totalRange desired range, reletive to aggregated dimension.
* @return desired Range or null if theres nothing wanted from this datase.
* @throws InvalidRangeException if invalid range request
*/
protected Range getNestedJoinRange(Range totalRange) throws InvalidRangeException {
int wantStart = totalRange.first();
int wantStop = totalRange.last() + 1; // Range has last inclusive, we use last exclusive
// see if this dataset is needed
if (!isNeeded(wantStart, wantStop))
return null;
int firstInInterval = totalRange.getFirstInInterval(aggStart);
if ((firstInInterval < 0) || (firstInInterval >= aggEnd))
return null;
int start = Math.max(firstInInterval, wantStart) - aggStart;
int stop = Math.min(aggEnd, wantStop) - aggStart;
return new Range(start, stop - 1, totalRange.stride()); // Range has last inclusive
}
protected boolean isNeeded(Range totalRange) {
int wantStart = totalRange.first();
int wantStop = totalRange.last() + 1; // Range has last inclusive, we use last exclusive
return isNeeded(wantStart, wantStop);
}
// wantStart, wantStop are the indices in the aggregated dataset, wantStart <= i < wantEnd
// find out if this overlaps this nested Dataset indices
private boolean isNeeded(int wantStart, int wantStop) {
if (wantStart >= wantStop)
return false;
if ((wantStart >= aggEnd) || (wantStop <= aggStart))
return false;
return true;
}
/* @Override
protected void cacheCoordValues(NetcdfFile ncfile) throws IOException {
if (coordValue != null) return;
Variable coordVar = ncfile.findVariable(dimName);
if (coordVar != null) {
Array data = coordVar.read();
coordValue = data.toString();
}
} */
// read any cached variables that need it
@Override
protected void cacheVariables(NetcdfFile ncfile) throws IOException {
for (CacheVar pv : cacheList) {
pv.read(this, ncfile);
}
}
@Override
protected Array read(Variable mainv, CancelTask cancelTask, List<Range> section) throws IOException, InvalidRangeException {
NetcdfFile ncd = null;
try {
ncd = acquireFile(cancelTask);
if ((cancelTask != null) && cancelTask.isCancel())
return null;
Variable v = findVariable(ncd, mainv);
if (v == null) {
logger.error("AggOuterDimension cant find " + mainv.getFullName() + " in " + ncd.getLocation() + "; return all zeroes!!!");
return Array.factory(mainv.getDataType(), new Section(section).getShape()); // all zeros LOOK need missing value
}
if (debugRead) {
Section want = new Section(section);
System.out.printf("AggOuter.read(%s) %s from %s in %s%n", want, mainv.getNameAndDimensions(), v.getNameAndDimensions(), getLocation());
}
// its possible that we are asking for more of the time coordinate than actually exists (fmrc ragged time)
// so we need to read only what is there
Range fullRange = v.getRanges().get(0);
Range want = section.get(0);
if (fullRange.last() < want.last()) {
Range limitRange = new Range(want.first(), fullRange.last(), want.stride());
section = new ArrayList<Range>(section); // make a copy
section.set(0, limitRange);
}
return v.read(section);
} finally {
close(ncd);
}
}
public int compareTo(Object o) {
if (coordValueDate == null)
return super.compareTo(o);
else {
DatasetOuterDimension other = (DatasetOuterDimension) o;
return coordValueDate.compareTo(other.coordValueDate);
}
}
}
/////////////////////////////////////////////
// vars that should be cached across the agg for efficiency
class CacheVar {
String varName;
DataType dtype;
private Map<String, Array> dataMap = new HashMap<String, Array>();
CacheVar(String varName, DataType dtype) {
this.varName = varName;
this.dtype = dtype;
if (varName == null)
throw new IllegalArgumentException("Missing variable name on cache var");
}
public String toString() {
return varName + " (" + getClass().getName() + ")";
}
// clear out old stuff from the Hash, so it doesnt grow forever
void reset() {
Map<String, Array> newMap = new HashMap<String, Array>();
for (Dataset ds : datasets) {
String id = ds.getId();
Array data = dataMap.get(id);
if (data != null)
newMap.put(id, data);
}
dataMap = newMap;
}
// public access to the data
Array read(Section section, CancelTask cancelTask) throws IOException, InvalidRangeException {
if (debugCache) System.out.println("caching " + varName + " section= " + section);
Array allData = null;
List<Range> ranges = section.getRanges();
Range joinRange = section.getRange(0);
Section innerSection = null;
if (section.getRank() > 1) {
innerSection = new Section(ranges.subList(1, ranges.size()));
}
// LOOK could make concurrent
int resultPos = 0;
List<Dataset> nestedDatasets = getDatasets();
for (Dataset vnested : nestedDatasets) {
DatasetOuterDimension dod = (DatasetOuterDimension) vnested;
// can we skip ?
Range nestedJoinRange = dod.getNestedJoinRange(joinRange);
if (nestedJoinRange == null) {
// if (debugStride) System.out.printf(" skip [%d,%d) (%d) %f for %s%n", dod.aggStart, dod.aggEnd, dod.ncoord, dod.aggStart / 8.0, vnested.getLocation());
continue;
}
if (debugStride) System.out.printf("%d: %s [%d,%d) (%d) %f for %s%n",
resultPos, nestedJoinRange, dod.aggStart, dod.aggEnd, dod.ncoord, dod.aggStart / 8.0, vnested.getLocation());
Array varData = read(dod);
// which subset do we want?
// bit tricky - assume returned array's rank depends on type LOOK is this true?
if (((type == Type.joinNew) || (type == Type.forecastModelRunCollection)) &&
((innerSection != null) && (varData.getSize() != innerSection.computeSize()))) {
varData = varData.section(innerSection.getRanges());
} else if ((innerSection == null) && (varData.getSize() != nestedJoinRange.length())) {
List<Range> nestedSection = new ArrayList<Range>(ranges); // make copy
nestedSection.set(0, nestedJoinRange);
varData = varData.section(nestedSection);
}
// may not know the data type until now
if (dtype == null)
dtype = DataType.getType(varData.getElementType());
if (allData == null) {
allData = Array.factory(dtype, section.getShape());
if (debugStride) System.out.printf("total result section = %s (%d)%n", section, Index.computeSize(section.getShape()));
}
// copy to result array
int nelems = (int) varData.getSize();
Array.arraycopy(varData, 0, allData, resultPos, nelems);
resultPos += nelems;
if ((cancelTask != null) && cancelTask.isCancel())
return null;
}
return allData;
}
protected void putData(String id, Array data) {
dataMap.put(id, data);
}
protected Array getData(String id) {
return dataMap.get(id);
}
// get the Array of data for this var in this dataset, use cache else acquire file and read
protected Array read(DatasetOuterDimension dset) throws IOException {
Array data = getData(dset.getId());
if (data != null) return data;
if (type == Type.joinNew) return null; // ??
NetcdfFile ncfile = null;
try {
ncfile = dset.acquireFile(null);
return read(dset, ncfile);
} finally {
if (ncfile != null) ncfile.close();
}
}
// get the Array of data for this var in this dataset and open ncfile
protected Array read(DatasetOuterDimension dset, NetcdfFile ncfile) throws IOException {
invocation++;
Array data = getData(dset.getId());
if (data != null) return data;
if (type == Type.joinNew) return null;
Variable v = ncfile.findVariable(varName);
data = v.read();
putData(dset.getId(), data);
if (debugCache) System.out.println("caching " + varName + " complete data");
return data;
}
}
/////////////////////////////////////////////
// data values might be specified by Dataset.coordValue
class CoordValueVar extends CacheVar {
String units;
DateUnit du;
CoordValueVar(String varName, DataType dtype, String units) {
super(varName, dtype);
this.units = units;
try {
du = new DateUnit(units);
} catch (Exception e) {
// ok to fail - may not be a time coordinate
}
}
// these deal with possible setting of the coord values in the NcML
protected Array read(DatasetOuterDimension dset) throws IOException {
Array data = readCached(dset);
if (data != null) return data;
return super.read(dset);
}
protected Array read(DatasetOuterDimension dset, NetcdfFile ncfile) throws IOException {
Array data = readCached(dset);
if (data != null) return data;
return super.read(dset, ncfile);
}
// only deals with possible setting of the coord values in the NcML
private Array readCached(DatasetOuterDimension dset) throws IOException {
Array data = getData(dset.getId());
if (data != null) return data;
data = Array.factory(dtype, new int[]{dset.ncoord});
IndexIterator ii = data.getIndexIterator();
if (dset.coordValueDate != null) { // its a date, typicallly parsed from the filename
// we have the coordinates as a Date
if (dtype == DataType.STRING) {
ii.setObjectNext(dset.coordValue); // coordValueDate as a String, see setInfo()
} else if (du != null) {
double val = du.makeValue(dset.coordValueDate);
ii.setDoubleNext(val);
}
putData(dset.getId(), data);
return data;
} else if (dset.coordValue != null) {
// we have the coordinates as a String, typicallly entered in the ncML
// if theres only one coord
if (dset.ncoord == 1) {
if (dtype == DataType.STRING) {
ii.setObjectNext(dset.coordValue);
} else {
double val = Double.parseDouble(dset.coordValue);
ii.setDoubleNext(val);
}
} else {
// multiple coords
int count = 0;
StringTokenizer stoker = new StringTokenizer(dset.coordValue, " ,");
while (stoker.hasMoreTokens()) {
String toke = stoker.nextToken();
// LOOK how come you dont have to check if this coordinate is contained ?
// if (!nestedJoinRange.contains(count))
if (dtype == DataType.STRING) {
ii.setObjectNext(toke);
} else {
double val = Double.parseDouble(toke);
ii.setDoubleNext(val);
}
count++;
}
if (count != dset.ncoord) {
logger.error("readAggCoord incorrect number of coordinates dataset=" + dset.getLocation());
throw new IllegalArgumentException("readAggCoord incorrect number of coordinates dataset=" + dset.getLocation());
}
}
putData(dset.getId(), data);
return data;
}
return null;
} // readCached
}
/////////////////////////////////////////////
// global attributes promoted to variables
class PromoteVar extends CacheVar {
String gattName;
protected PromoteVar(String varName, DataType dtype) {
super(varName, dtype);
}
PromoteVar(String varName, String gattName) {
super(varName, null);
this.gattName = (gattName != null) ? gattName : varName;
}
@Override
protected Array read(DatasetOuterDimension dset, NetcdfFile ncfile) throws IOException {
Array data = getData(dset.getId());
if (data != null) return data;
Attribute att = ncfile.findGlobalAttribute(gattName);
if (att == null)
throw new IllegalArgumentException("Unknown attribute name= " + gattName);
data = att.getValues();
if (dtype == null)
dtype = DataType.getType(data.getElementType());
if (dset.ncoord == 1) // LOOK ??
putData(dset.getId(), data);
else {
// duplicate the value to each of the coordinates
Array allData = Array.factory(dtype, new int[]{dset.ncoord});
for (int i = 0; i < dset.ncoord; i++)
Array.arraycopy(data, 0, allData, i, 1); // LOOK generalize to vectors ??
putData(dset.getId(), allData);
data = allData;
}
return data;
}
}
/////////////////////////////////////////////
// global attributes promoted to variables
class PromoteVarCompose extends PromoteVar {
String varName;
String format;
String[] gattNames;
/**
* @param varName name of agg variable
* @param format java.util.Format string
* @param gattNames space delimited list of global attribute names
*/
PromoteVarCompose(String varName, String format, String gattNames) {
super(varName, DataType.STRING);
this.format = format;
this.gattNames = gattNames.split(" ");
if (format == null)
throw new IllegalArgumentException("Missing format string (java.util.Formatter)");
}
@Override
protected Array read(DatasetOuterDimension dset, NetcdfFile ncfile) throws IOException {
Array data = getData(dset.getId());
if (data != null) return data;
List<Object> vals = new ArrayList<Object>();
for (String gattName : gattNames) {
Attribute att = ncfile.findGlobalAttribute(gattName);
if (att == null)
throw new IllegalArgumentException("Unknown attribute name= " + gattName);
vals.add(att.getValue(0));
}
Formatter f = new Formatter();
f.format(format, vals.toArray());
String result = f.toString();
Array allData = Array.factory(dtype, new int[]{dset.ncoord});
for (int i = 0; i < dset.ncoord; i++)
allData.setObject(i, result);
putData(dset.getId(), allData);
return allData;
}
}
@Override
public void getDetailInfo(Formatter f) {
super.getDetailInfo(f);
f.format(" timeUnitsChange=%s%n", timeUnitsChange);
f.format(" totalCoords=%d%n", totalCoords);
if (aggVarNames.size() > 0) {
f.format(" Aggregation Variables specified in NcML%n");
for (String vname : aggVarNames)
f.format(" %s%n", vname);
}
f.format("%nAggregation Variables%n");
for (VariableDS vds : aggVars) {
f.format(" ");
vds.getNameAndDimensions(f, true, false);
f.format("%n");
}
if (cacheList.size() > 0) {
f.format("%nCache Variables%n");
for (CacheVar cv : cacheList)
f.format(" %s%n", cv);
}
f.format("%nVariable Proxies%n");
for (Variable v : ncDataset.getVariables()) {
if (v.hasCachedData()) {
f.format(" %20s cached%n", v.getShortName());
} else {
f.format(" %20s proxy %s%n", v.getShortName(), v.getProxyReader().getClass().getName());
}
}
}
public static void main(String args[]) throws IOException {
String format = "%04d-%02d-%02dT%02d:%02d:%02.0f";
Formatter f = new Formatter();
Object[] vals = new Object[6];
vals[0] = new Integer(2002);
vals[1] = new Integer(10);
vals[2] = new Integer(20);
vals[3] = new Integer(23);
vals[4] = new Integer(0);
vals[5] = new Float(2.1);
f.format(format, vals);
System.out.println(f);
}
}