current_map.h

/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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 3 of the License, 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 for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 */

#ifndef ULTIMA8_WORLD_CURRENTMAP_H
#define ULTIMA8_WORLD_CURRENTMAP_H

#include "common/list.h"
#include "ultima/ultima8/misc/common_types.h"
#include "ultima/ultima8/misc/direction.h"
#include "ultima/ultima8/misc/point3.h"
#include "ultima/ultima8/usecode/intrinsics.h"
#include "ultima/ultima8/world/position_info.h"

namespace Ultima {
namespace Ultima8 {

struct Box;
class Map;
class Item;
class UCList;
class TeleportEgg;
class EggHatcherProcess;

#define MAP_NUM_CHUNKS  64
#define MAP_NUM_TARGET_ITEMS 200

class CurrentMap {
    friend class World;
public:
    CurrentMap();
    ~CurrentMap();

    void clear();
    void writeback();
    void loadMap(Map *map);

    void setMap(Map *map) {
        _currentMap = map;
    }

    uint32 getNum() const;

    unsigned int getChunkSize() const {
        return _mapChunkSize;
    }

    void addItem(Item *item);

    void addItemToEnd(Item *item);

    void removeItemFromList(Item *item, int32 oldx, int32 oldy);
    void removeItem(Item *item);

    void addTargetItem(const Item *item);
    void removeTargetItem(const Item *item);
    Item *findBestTargetItem(int32 x, int32 y, int32 z, Direction dir, DirectionMode dirmode);

    void updateFastArea(const Point3 &from, const Point3 &to);

    void areaSearch(UCList *itemlist, const uint8 *loopscript,
                    uint32 scriptsize, const Item *item, uint16 range,
                    bool recurse, int32 x = 0, int32 y = 0) const;

    // Surface search: Search above and below an item.
    void surfaceSearch(UCList *itemlist, const uint8 *loopscript,
                       uint32 scriptsize, const Item *item, bool above,
                       bool below, bool recurse = false) const;

    // Collision detection. Returns position information with valid being true
    // when the target box does not collide with any solid items.
    // Ignores collisions when overlapping with the start box.
    PositionInfo getPositionInfo(const Box &target, const Box &start, uint32 shapeflags, ObjId id) const;

    // Note that this version of getPositionInfo can not take 'flipped' into account!
    PositionInfo getPositionInfo(int32 x, int32 y, int32 z, uint32 shape, ObjId id) const;

    bool scanForValidPosition(int32 x, int32 y, int32 z, const Item *item,
                              Direction movedir, bool wantsupport,
                              int32 &tx, int32 &ty, int32 &tz);

    struct SweepItem {
        SweepItem(ObjId it, int32 ht, int32 et, bool touch,
                  bool touchfloor, bool block, uint8 dir)
            : _item(it), _hitTime(ht), _endTime(et), _touching(touch),
              _touchingFloor(touchfloor), _blocking(block), _dirs(dir) { }

        ObjId   _item;       // Item that was hit

        //
        // The time values here are 'normalized' fixed point values
        // They range from 0 for the start of the move to 0x4000 for the end of
        // The move.
        //
        // Linear interpolate between the start and end positions using
        // hit_time to find where the moving item was when the hit occurs
        //

        int32   _hitTime;   // if -1, already hitting when sweep started.
        int32   _endTime;   // if 0x4000, still hitting when sweep finished

        bool    _touching;   // We are only touching (don't actually overlap)
        bool    _touchingFloor; // touching and directly below the moving item

        bool    _blocking;   // This item blocks the moving item

        uint8   _dirs; // Directions in which the item is being hit.
        // Bitmask. Bit 0 is x, 1 is y, 2 is z.

        // Use this func to get the interpolated location of the hit
        Point3 GetInterpolatedCoords(const Point3 &start, const Point3 &end) const {
            Point3 pt;
            pt.x = start.x + ((end.x - start.x) * (_hitTime >= 0 ? _hitTime : 0) + (end.x > start.x ? 0x2000 : -0x2000)) / 0x4000;
            pt.y = start.y + ((end.y - start.y) * (_hitTime >= 0 ? _hitTime : 0) + (end.y > start.y ? 0x2000 : -0x2000)) / 0x4000;
            pt.z = start.z + ((end.z - start.z) * (_hitTime >= 0 ? _hitTime : 0) + (end.z > start.z ? 0x2000 : -0x2000)) / 0x4000;
            return pt;
        }
    };

    bool sweepTest(const Point3 &start, const Point3 &end,
                   const int32 dims[3], uint32 shapeflags,
                   ObjId item, bool solid_only, Common::List<SweepItem> *hit) const;

    TeleportEgg *findDestination(uint16 id);

    // Not allowed to modify the list. Remember to use const_iterator
    const Common::List<Item *> *getItemList(int32 gx, int32 gy) const;

    bool isChunkFast(int32 cx, int32 cy) const {
        // CONSTANTS!
        if (cx < 0 || cy < 0 || cx >= MAP_NUM_CHUNKS || cy >= MAP_NUM_CHUNKS)
            return false;
        return (_fast[cy][cx / 32] & (1 << (cx & 31))) != 0;
    }

    void setFastAtPoint(const Point3 &pt);

    // Set the entire map as being 'fast'
    void setWholeMapFast();

    void save(Common::WriteStream *ws);
    bool load(Common::ReadStream *rs, uint32 version);

    INTRINSIC(I_canExistAt);
    INTRINSIC(I_canExistAtPoint);

private:
    void loadItems(const Common::List<Item *> &itemlist, bool callCacheIn);
    void createEggHatcher();

    static void clipMapChunks(int &minx, int &maxx, int &miny, int &maxy);

    Map *_currentMap;

    // item lists. Lots of them :-)
    // items[x][y]
    Common::List<Item *> _items[MAP_NUM_CHUNKS][MAP_NUM_CHUNKS];

    ProcId _eggHatcher;

    // Fast area bit masks -> fast[ry][rx/32]&(1<<(rx&31));
    uint32 _fast[MAP_NUM_CHUNKS][MAP_NUM_CHUNKS / 32];
    int32 _fastXMin, _fastYMin, _fastXMax, _fastYMax;

    int _mapChunkSize;

    ObjId _targets[MAP_NUM_TARGET_ITEMS];

    void setChunkFast(int32 cx, int32 cy);
    void unsetChunkFast(int32 cx, int32 cy);
};

} // End of namespace Ultima8
} // End of namespace Ultima

#endif