BasicScanAlgorithm.java

/* Copyright 2013-2022 CS GROUP
 * Licensed to CS GROUP (CS) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * CS licenses this file to You under the Apache License, Version 2.0
 * (the "License"); you may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *   http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
package org.orekit.rugged.intersection;

import java.util.ArrayList;
import java.util.List;

import org.hipparchus.geometry.euclidean.threed.Vector3D;
import org.hipparchus.util.FastMath;
import org.orekit.bodies.GeodeticPoint;
import org.orekit.rugged.api.AlgorithmId;
import org.orekit.rugged.errors.DumpManager;
import org.orekit.rugged.raster.SimpleTile;
import org.orekit.rugged.raster.SimpleTileFactory;
import org.orekit.rugged.raster.Tile;
import org.orekit.rugged.raster.TileUpdater;
import org.orekit.rugged.raster.TilesCache;
import org.orekit.rugged.utils.ExtendedEllipsoid;
import org.orekit.rugged.utils.NormalizedGeodeticPoint;

/** Intersection computation using a basic algorithm based on exhaustive scan.
 * <p>
 * The algorithm simply computes entry and exit points at high and low altitudes,
 * and scans all Digital Elevation Models in the sub-tiles defined by these two
 * corner points. It is not designed for operational use.
 * </p>
 * @author Luc Maisonobe
 * @author Guylaine Prat
 */
public class BasicScanAlgorithm implements IntersectionAlgorithm {

    /** Cache for DEM tiles. */
    private final TilesCache<SimpleTile> cache;

    /** Minimum altitude encountered. */
    private double hMin;

    /** Maximum altitude encountered. */
    private double hMax;

    /** Algorithm Id.
     * @since 2.2 */
    private final AlgorithmId algorithmId;

    /** Simple constructor.
     * @param updater updater used to load Digital Elevation Model tiles
     * @param maxCachedTiles maximum number of tiles stored in the cache
     */
    public BasicScanAlgorithm(final TileUpdater updater, final int maxCachedTiles) {
        this.cache = new TilesCache<>(new SimpleTileFactory(), updater, maxCachedTiles);
        this.hMin  = Double.POSITIVE_INFINITY;
        this.hMax  = Double.NEGATIVE_INFINITY;
        this.algorithmId = AlgorithmId.BASIC_SLOW_EXHAUSTIVE_SCAN_FOR_TESTS_ONLY;
    }

    /** {@inheritDoc} */
    @Override
    public NormalizedGeodeticPoint intersection(final ExtendedEllipsoid ellipsoid,
            final Vector3D position, final Vector3D los) {

        DumpManager.dumpAlgorithm(this.algorithmId);

        // find the tiles between the entry and exit point in the Digital Elevation Model
        NormalizedGeodeticPoint entryPoint = null;
        NormalizedGeodeticPoint exitPoint  = null;
        double minLatitude  = Double.NaN;
        double maxLatitude  = Double.NaN;
        double minLongitude = Double.NaN;
        double maxLongitude = Double.NaN;
        final List<SimpleTile> scannedTiles = new ArrayList<>();
        double centralLongitude = Double.NaN;
        for (boolean changedMinMax = true; changedMinMax; changedMinMax = checkMinMax(scannedTiles)) {

            scannedTiles.clear();
            // compute entry and exit points
            entryPoint = ellipsoid.transform(ellipsoid.pointAtAltitude(position, los, Double.isInfinite(hMax) ? 0.0 : hMax),
                    ellipsoid.getBodyFrame(), null,
                    Double.isNaN(centralLongitude) ? 0.0 : centralLongitude);
            final SimpleTile entryTile = cache.getTile(entryPoint.getLatitude(), entryPoint.getLongitude());
            if (Double.isNaN(centralLongitude)) {
                centralLongitude = entryTile.getMinimumLongitude();
                entryPoint = new NormalizedGeodeticPoint(entryPoint.getLatitude(), entryPoint.getLongitude(),
                        entryPoint.getAltitude(), centralLongitude);
            }
            addIfNotPresent(scannedTiles, entryTile);

            exitPoint = ellipsoid.transform(ellipsoid.pointAtAltitude(position, los, Double.isInfinite(hMin) ? 0.0 : hMin),
                    ellipsoid.getBodyFrame(), null, centralLongitude);
            final SimpleTile exitTile = cache.getTile(exitPoint.getLatitude(), exitPoint.getLongitude());
            addIfNotPresent(scannedTiles, exitTile);

            minLatitude  = FastMath.min(entryPoint.getLatitude(),  exitPoint.getLatitude());
            maxLatitude  = FastMath.max(entryPoint.getLatitude(),  exitPoint.getLatitude());
            minLongitude = FastMath.min(entryPoint.getLongitude(), exitPoint.getLongitude());
            maxLongitude = FastMath.max(entryPoint.getLongitude(), exitPoint.getLongitude());

            if (scannedTiles.size() > 1) {
                // the entry and exit tiles are different, maybe other tiles should be added on the way
                // in the spirit of simple and exhaustive, we add all tiles in a rectangular area
                final double latStep = 0.5 * FastMath.min(entryTile.getLatitudeStep()  * entryTile.getLatitudeRows(),
                        exitTile.getLatitudeStep()   * exitTile.getLatitudeRows());
                final double lonStep = 0.5 * FastMath.min(entryTile.getLongitudeStep() * entryTile.getLongitudeColumns(),
                        exitTile.getLongitudeStep()  * exitTile.getLongitudeColumns());
                for (double latitude = minLatitude; latitude <= maxLatitude; latitude += latStep) {
                    for (double longitude = minLongitude; longitude < maxLongitude; longitude += lonStep) {
                        addIfNotPresent(scannedTiles, cache.getTile(latitude, longitude));
                    }
                }
            }

        }

        // scan the tiles
        NormalizedGeodeticPoint intersectionGP = null;
        double intersectionDot = Double.POSITIVE_INFINITY;
        for (final SimpleTile tile : scannedTiles) {
            for (int i = latitudeIndex(tile, minLatitude); i <= latitudeIndex(tile, maxLatitude); ++i) {
                for (int j = longitudeIndex(tile, minLongitude); j <= longitudeIndex(tile, maxLongitude); ++j) {
                    final NormalizedGeodeticPoint gp = tile.cellIntersection(entryPoint, ellipsoid.convertLos(entryPoint, los), i, j);
                    if (gp != null) {

                        // improve the point, by projecting it back on the 3D line, fixing the small body curvature at cell level
                        final Vector3D      delta     = ellipsoid.transform(gp).subtract(position);
                        final double        s         = Vector3D.dotProduct(delta, los) / los.getNormSq();
                        final GeodeticPoint projected = ellipsoid.transform(new Vector3D(1, position, s, los),
                                ellipsoid.getBodyFrame(), null);
                        final NormalizedGeodeticPoint normalizedProjected = new NormalizedGeodeticPoint(projected.getLatitude(),
                                projected.getLongitude(),
                                projected.getAltitude(),
                                gp.getLongitude());
                        final NormalizedGeodeticPoint gpImproved = tile.cellIntersection(normalizedProjected,
                                ellipsoid.convertLos(normalizedProjected, los),
                                i, j);

                        if (gpImproved != null) {
                            final Vector3D point = ellipsoid.transform(gpImproved);
                            final double dot = Vector3D.dotProduct(point.subtract(position), los);
                            if (dot < intersectionDot) {
                                intersectionGP  = gpImproved;
                                intersectionDot = dot;
                            }
                        }

                    }
                }
            }
        }

        return intersectionGP;
    }

    /** {@inheritDoc} */
    @Override
    public NormalizedGeodeticPoint refineIntersection(final ExtendedEllipsoid ellipsoid,
                                                      final Vector3D position, final Vector3D los,
                                                      final NormalizedGeodeticPoint closeGuess) {
        DumpManager.dumpAlgorithm(this.algorithmId);
        final Vector3D      delta     = ellipsoid.transform(closeGuess).subtract(position);
        final double        s         = Vector3D.dotProduct(delta, los) / los.getNormSq();
        final GeodeticPoint projected = ellipsoid.transform(new Vector3D(1, position, s, los),
                ellipsoid.getBodyFrame(), null);
        final NormalizedGeodeticPoint normalizedProjected = new NormalizedGeodeticPoint(projected.getLatitude(),
                projected.getLongitude(),
                projected.getAltitude(),
                closeGuess.getLongitude());
        final Tile          tile      = cache.getTile(normalizedProjected.getLatitude(),
                normalizedProjected.getLongitude());
        return tile.cellIntersection(normalizedProjected,
                ellipsoid.convertLos(normalizedProjected, los),
                tile.getFloorLatitudeIndex(normalizedProjected.getLatitude()),
                tile.getFloorLongitudeIndex(normalizedProjected.getLongitude()));
    }

    /** {@inheritDoc} */
    @Override
    public double getElevation(final double latitude, final double longitude) {
        DumpManager.dumpAlgorithm(this.algorithmId);
        final Tile tile = cache.getTile(latitude, longitude);
        return tile.interpolateElevation(latitude, longitude);
    }

    /** {@inheritDoc} */
    @Override
    public AlgorithmId getAlgorithmId() {
        return this.algorithmId;
    }

    /** Check the overall min and max altitudes.
     * @param tiles tiles to check
     * @return true if the tile changed either min or max altitude
     */
    private boolean checkMinMax(final List<SimpleTile> tiles) {

        boolean changedMinMax = false;

        for (final SimpleTile tile : tiles) {

            // check minimum altitude
            if (tile.getMinElevation() < hMin) {
                hMin          = tile.getMinElevation();
                changedMinMax = true;
            }

            // check maximum altitude
            if (tile.getMaxElevation() > hMax) {
                hMax          = tile.getMaxElevation();
                changedMinMax = true;
            }

        }

        return changedMinMax;

    }

    /** Add a tile to a list if not already present.
     * @param list tiles list
     * @param tile new tile to consider
     */
    private void addIfNotPresent(final List<SimpleTile> list, final SimpleTile tile) {

        // look for existing tiles in the list
        for (final SimpleTile existing : list) {
            if (existing == tile) {
                return;
            }
        }

        // the tile was not there, add it
        list.add(tile);

    }

    /** Get latitude index.
     * @param tile current tile
     * @param latitude current latitude
     * @return index of latitude, truncated at tiles limits
     */
    private int latitudeIndex(final SimpleTile tile, final double latitude) {
        final int rawIndex = tile.getFloorLatitudeIndex(latitude);
        return FastMath.min(FastMath.max(0, rawIndex), tile.getLatitudeRows());
    }

    /** Get longitude index.
     * @param tile current tile
     * @param longitude current longitude
     * @return index of longitude, truncated at tiles limits
     */
    private int longitudeIndex(final SimpleTile tile, final double longitude) {
        final int rawIndex = tile.getFloorLongitudeIndex(longitude);
        return FastMath.min(FastMath.max(0, rawIndex), tile.getLongitudeColumns());
    }
}