//
// HRITCoordinateSystem.java
//
/*
The software in this file is Copyright(C) 2017 by Tommy Jasmin.
It is designed to be used with the VisAD system for interactive
analysis and visualization of numerical data.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 1, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License in file NOTICE for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
package visad.data.hrit;
import edu.wisc.ssec.mcidas.AREAnav;
import edu.wisc.ssec.mcidas.GEOSnav;
import java.awt.geom.Rectangle2D;
import visad.CoordinateSystemException;
import visad.QuickSort;
import visad.RealTupleType;
import visad.Unit;
import visad.VisADException;
/**
* HRITCoordinateSystem is a VisAD CoordinateSystem class used by HRITAdapter
* for conversions to/from (Latitude, Longitude) and Cartesian (element,line),
* and with Latitude and Longitude in degrees. It is currently modeled mostly
* after AREACoordinateSystem, so there are strong similarities between the two.
* In fact, for now this class does navigation exclusively through the McIDAS
* GEOS nav class.
*/
public class HRITCoordinateSystem
extends visad.georef.MapProjection
{
private static final long serialVersionUID = 1L;
protected AREAnav anav = null;
private int lines;
private int elements;
private int[] dirBlock;
private int[] navBlock;
private int[] auxBlock;
private boolean useSpline = true;
private static Unit[] coordinate_system_units = {null, null};
/** create an HRIT coordinate system with nothing initialized.
* This allows for derived classes to do a lazy initialization
* of the coordinate system. To do this they must override getAreaNav
* in order to create the nav.
*/
protected HRITCoordinateSystem() throws VisADException {
super(RealTupleType.LatitudeLongitudeTuple,coordinate_system_units);
}
/** create an HRIT coordinate system from the provided array
* of navigation parameters, and partially filled AREA directory.
*
* This routine uses a flipped Y axis (first line of
* the image file is number 0)
*
* @param iparms init params?
* @param dir is the AREA file directory block
* @param useSpline use a spline approximation for speed
*
*/
public HRITCoordinateSystem(int[] iparms, int[] dir, boolean useSpline)
throws VisADException {
super(RealTupleType.LatitudeLongitudeTuple, coordinate_system_units);
init(iparms, dir, useSpline);
}
/**
* This is used by the methods that do the work and can be overridden
* by a derived class to do a lazy instantiation of the coordinate system.
*
* @return The area nav
*/
protected AREAnav getAreaNav() {
return anav;
}
/**
* Create and initialize the areanav.
* This used to be in the constructor is snow its own method to enable
* derived classes to lazily create the areanav
*
* @param iparms init params?
* @param dir is the AREA file directory block
* @param useSpline use a spline approximation for speed
*/
protected void init(int[]iparms, int[]dir, boolean useSpline) throws VisADException {
try {
anav = new GEOSnav(iparms);
} catch (IllegalArgumentException iae) {
throw new CoordinateSystemException(
"HRITCoordinateSystem: problem creating navigation" + iae);
}
dirBlock = null;
navBlock = null;
auxBlock = null;
this.useSpline = !useSpline
? false // user overrode
: anav.canApproximateWithSpline(); // let nav decide
anav.setImageStart(dir[5], dir[6]);
anav.setRes(dir[11], dir[12]);
anav.setStart(0,0);
anav.setMag(1,1);
lines = dir[8];
elements = dir[9];
anav.setFlipLineCoordinates(dir[8]); // invert Y axis coordinates
}
/** Get the directory block used to initialize this HRITCoordinateSystem */
public int[] getDirBlock() {
getAreaNav();
return dirBlock;
}
/** Get the navigation block used to initialize this HRITCoordinateSystem */
public int[] getNavBlock() {
getAreaNav();
return navBlock;
}
/** Get the navigation block used to initialize this HRITCoordinateSystem */
public int[] getAuxBlock() {
getAreaNav();
return auxBlock;
}
/** get the subpoint if available
*/
public double[] getSubpoint() {
return getAreaNav().getSubpoint();
}
/**
* Get whether we are using a spline or not
*/
public boolean getUseSpline() {
return useSpline;
}
/** convert from image element,line to latitude,longitude
*
* @param tuples contains the element,line pairs to convert
*
*/
public double[][] toReference(double[][] tuples) throws VisADException {
if (tuples == null || tuples.length != 2) {
throw new CoordinateSystemException("HRITCoordinateSystem." +
"toReference: tuples wrong dimension");
}
AREAnav anav = getAreaNav();
if (anav == null) {
throw new CoordinateSystemException("HRIT O & A data not available");
}
int[] nums = new int[2];
double[] mins = new double[2];
double[] maxs = new double[2];
double[][] newval = makeSpline(tuples, mins, maxs, nums);
if (newval != null) {
double[][] newtrans = anav.toLatLon(newval);
int len = tuples[0].length;
double[][] misstrans = new double[2][len];
int[][] miss_to_trans = new int[1][len];
double[][] val = applySpline(tuples, mins, maxs, nums, newtrans,
misstrans, miss_to_trans);
if (miss_to_trans[0] != null) {
double[][] newmiss = anav.toLatLon(misstrans);
for (int i=0; i maxs[0]) maxs[0] = val[0][i];
}
if (val[1][i] == val[1][i]) {
if (val[1][i] < mins[1]) mins[1] = val[1][i];
if (val[1][i] > maxs[1]) maxs[1] = val[1][i];
}
}
// compute typical spacing between points
float[] norm = new float[len-1];
int k = 0;
// WLH 2 March 2000
// for (int i=0; k<3 && i (len / 4)) return null;
// test to see if the product is greater than an int
if ((nums[0] * nums[1]) < 0) return null;
double spacing0 = (maxs[0] - mins[0]) / (nums[0] - 1);
double spacing1 = (maxs[1] - mins[1]) / (nums[1] - 1);
double[][] newval = new double[2][nums[0] * nums[1]];
k = 0;
for (int i=0; i max_trans[0]) max_trans[0] = newtrans[0][i];
}
if (newtrans[1][i] == newtrans[1][i]) {
if (newtrans[1][i] < min_trans[1]) min_trans[1] = newtrans[1][i];
if (newtrans[1][i] > max_trans[1]) max_trans[1] = newtrans[1][i];
}
lon_flags[i] = false;
}
double minn0n1 = Math.min(n0, n1);
double mean0 = (max_trans[0] - min_trans[0]) / minn0n1;
double mean1 = (max_trans[1] - min_trans[1]) / minn0n1;
for (int i0=0; i0 3.0 * mean0 ||
Math.abs(newtrans[0][ii + 1] - newtrans[0][ii]) > 3.0 * mean0 ||
Math.abs(newtrans[0][ii + n1 + 1] - newtrans[0][ii + 1]) > 3.0 * mean0 ||
Math.abs(newtrans[0][ii + n1 + 1] - newtrans[0][ii + n1]) > 3.0 * mean0 ||
Math.abs(newtrans[1][ii + n1] - newtrans[1][ii]) > 3.0 * mean1 ||
Math.abs(newtrans[1][ii + 1] - newtrans[1][ii]) > 3.0 * mean1 ||
Math.abs(newtrans[1][ii + n1 + 1] - newtrans[1][ii + 1]) > 3.0 * mean1 ||
Math.abs(newtrans[1][ii + n1 + 1] - newtrans[1][ii + n1]) > 3.0 * mean1) {
lon_flags[ii] = true;
}
}
}
int nmiss = 0;
for (int i=0; i (n0 - 2)) i0 = n0 - 2;
a0 -= i0;
double a1 = (val[1][i] - mins[1]) / spacing1;
int i1 = (int) a1;
if (i1 < 0) i1 = 0;
if (i1 > (n1 - 2)) i1 = n1 - 2;
a1 -= i1;
int ii = i1 + i0 * n1;
if (lon_flags[ii]) {
misstrans[0][nmiss] = val[0][i];
misstrans[1][nmiss] = val[1][i];
miss_to_trans[0][nmiss] = i;
nmiss++;
}
else {
trans[0][i] =
(1.0 - a0) * ((1.0 - a1) * newtrans[0][ii] + a1 * newtrans[0][ii+1]) +
a0 * ((1.0 - a1) * newtrans[0][ii+n1] + a1 * newtrans[0][ii+n1+1]);
trans[1][i] =
(1.0 - a0) * ((1.0 - a1) * newtrans[1][ii] + a1 * newtrans[1][ii+1]) +
a0 * ((1.0 - a1) * newtrans[1][ii+n1] + a1 * newtrans[1][ii+n1+1]);
if (trans[0][i] != trans[0][i] || trans[1][i] != trans[1][i]) {
misstrans[0][nmiss] = val[0][i];
misstrans[1][nmiss] = val[1][i];
miss_to_trans[0][nmiss] = i;
nmiss++;
}
}
}
if (nmiss == 0) {
miss_to_trans[0] = null;
misstrans[0] = null;
misstrans[1] = null;
}
else {
double[] xmisstrans = new double[nmiss];
System.arraycopy(misstrans[0], 0, xmisstrans, 0, nmiss);
misstrans[0] = xmisstrans;
xmisstrans = new double[nmiss];
System.arraycopy(misstrans[1], 0, xmisstrans, 0, nmiss);
misstrans[1] = xmisstrans;
int[] xmiss_to_trans = new int[nmiss];
System.arraycopy(miss_to_trans[0], 0, xmiss_to_trans, 0, nmiss);
miss_to_trans[0] = xmiss_to_trans;
}
return trans;
}
// return reduced array for approximation by splines
private float[][] makeSpline(float[][] val, float[] mins,
float[] maxs, int[] nums)
throws VisADException {
int len = val[0].length;
if (len < 1000) return null;
float reduction = 10.0f;
if (len < 10000) reduction = 2.0f;
else if (len < 100000) reduction = 5.0f;
// compute ranges
mins[0] = Float.MAX_VALUE;
maxs[0] = -Float.MAX_VALUE;
mins[1] = Float.MAX_VALUE;
maxs[1] = -Float.MAX_VALUE;
for (int i=0; i maxs[0]) maxs[0] = val[0][i];
}
if (val[1][i] == val[1][i]) {
if (val[1][i] < mins[1]) mins[1] = val[1][i];
if (val[1][i] > maxs[1]) maxs[1] = val[1][i];
}
}
// compute typical spacing between points
float[] norm = new float[len-1];
int k = 0;
// WLH 2 March 2000
// for (int i=0; k<3 && i (len / 4)) return null;
// test to see if the product is greater than an int
if ((nums[0] * nums[1]) < 0) return null;
float spacing0 = (maxs[0] - mins[0]) / (nums[0] - 1);
float spacing1 = (maxs[1] - mins[1]) / (nums[1] - 1);
float[][] newval = new float[2][nums[0] * nums[1]];
k = 0;
for (int i=0; i max_trans[0]) max_trans[0] = newtrans[0][i];
}
if (newtrans[1][i] == newtrans[1][i]) {
if (newtrans[1][i] < min_trans[1]) min_trans[1] = newtrans[1][i];
if (newtrans[1][i] > max_trans[1]) max_trans[1] = newtrans[1][i];
}
lon_flags[i] = false;
}
float minn0n1 = Math.min(n0, n1);
float mean0 = (max_trans[0] - min_trans[0]) / minn0n1;
float mean1 = (max_trans[1] - min_trans[1]) / minn0n1;
for (int i0=0; i0 3.0 * mean0 ||
Math.abs(newtrans[0][ii + 1] - newtrans[0][ii]) > 3.0 * mean0 ||
Math.abs(newtrans[0][ii + n1 + 1] - newtrans[0][ii + 1]) > 3.0 * mean0 ||
Math.abs(newtrans[0][ii + n1 + 1] - newtrans[0][ii + n1]) > 3.0 * mean0 ||
Math.abs(newtrans[1][ii + n1] - newtrans[1][ii]) > 3.0 * mean1 ||
Math.abs(newtrans[1][ii + 1] - newtrans[1][ii]) > 3.0 * mean1 ||
Math.abs(newtrans[1][ii + n1 + 1] - newtrans[1][ii + 1]) > 3.0 * mean1 ||
Math.abs(newtrans[1][ii + n1 + 1] - newtrans[1][ii + n1]) > 3.0 * mean1) {
lon_flags[ii] = true;
}
}
}
int nmiss = 0;
for (int i=0; i (n0 - 2)) i0 = n0 - 2;
a0 -= i0;
float a1 = (val[1][i] - mins[1]) / spacing1;
int i1 = (int) a1;
if (i1 < 0) i1 = 0;
if (i1 > (n1 - 2)) i1 = n1 - 2;
a1 -= i1;
int ii = i1 + i0 * n1;
if (lon_flags[ii]) {
misstrans[0][nmiss] = val[0][i];
misstrans[1][nmiss] = val[1][i];
miss_to_trans[0][nmiss] = i;
nmiss++;
}
else {
trans[0][i] =
(1.0f - a0) * ((1.0f - a1) * newtrans[0][ii] + a1 * newtrans[0][ii+1]) +
a0 * ((1.0f - a1) * newtrans[0][ii+n1] + a1 * newtrans[0][ii+n1+1]);
trans[1][i] =
(1.0f - a0) * ((1.0f - a1) * newtrans[1][ii] + a1 * newtrans[1][ii+1]) +
a0 * ((1.0f - a1) * newtrans[1][ii+n1] + a1 * newtrans[1][ii+n1+1]);
if (trans[0][i] != trans[0][i] || trans[1][i] != trans[1][i]) {
misstrans[0][nmiss] = val[0][i];
misstrans[1][nmiss] = val[1][i];
miss_to_trans[0][nmiss] = i;
nmiss++;
}
}
}
if (nmiss == 0) {
miss_to_trans[0] = null;
misstrans[0] = null;
misstrans[1] = null;
}
else {
float[] xmisstrans = new float[nmiss];
System.arraycopy(misstrans[0], 0, xmisstrans, 0, nmiss);
misstrans[0] = xmisstrans;
xmisstrans = new float[nmiss];
System.arraycopy(misstrans[1], 0, xmisstrans, 0, nmiss);
misstrans[1] = xmisstrans;
int[] xmiss_to_trans = new int[nmiss];
System.arraycopy(miss_to_trans[0], 0, xmiss_to_trans, 0, nmiss);
miss_to_trans[0] = xmiss_to_trans;
}
return trans;
}
/**
* Get the bounds for this image
*/
public Rectangle2D getDefaultMapArea()
{
return new Rectangle2D.Float(0, 0, elements, lines);
}
/**
* Determines whether or not the Object in question is
* the same as this HRITCoordinateSystem. The specified
* Object is equal to this HRITCoordinateSystem
* if it is an instance of HRITCoordinateSystem and it has
* the same navigation module and default map area as this one.
*
* @param obj the Object in question
*/
public boolean equals(Object obj)
{
if (!(obj instanceof HRITCoordinateSystem))
return false;
HRITCoordinateSystem that = (HRITCoordinateSystem) obj;
AREAnav anav = getAreaNav();
return this == that ||
(anav.equals(that.getAreaNav()) &&
this.lines == that.lines &&
this.elements == that.elements);
}
/**
* Return a String which tells some info about this navigation
* @return wordy String
*/
public String toString() {
if (anav == null) {
return "Image Projection";
}
return "Image (" + anav.toString() + ") Projection";
}
}
Ads help maintain this website.