scummvm/engines/fullpipe/anihandler.cpp
2017-12-03 23:04:58 +01:00

752 lines
19 KiB
C++

/* 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 2
* 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, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*
*/
#include "fullpipe/fullpipe.h"
#include "fullpipe/utils.h"
#include "fullpipe/statics.h"
#include "fullpipe/motion.h"
#include "fullpipe/messages.h"
namespace Fullpipe {
void AniHandler::detachAllObjects() {
_items.clear();
}
MessageQueue *AniHandler::makeQueue(StaticANIObject *ani, int staticsIndex, int, int *, Common::Point **) {
debugC(4, kDebugPathfinding, "AniHandler::makeQueue(*%d, %d, id, res, point)", ani->_id, staticsIndex);
int idx = getIndex(ani->_id);
if (idx == -1)
return 0;
#if 0
int stid = staticsId;
if (!staticsId) {
#else
int stid;
#endif
if (ani->_movement) {
stid = ani->_movement->_staticsObj2->_staticsId;
} else {
if (!ani->_statics)
return 0;
stid = ani->_statics->_staticsId;
}
#if 0
}
#endif
if (stid == staticsIndex)
return new MessageQueue(g_fp->_globalMessageQueueList->compact());
int startidx = getStaticsIndexById(idx, stid);
int endidx = getStaticsIndexById(idx, staticsIndex);
int subidx = startidx + endidx * _items[idx].statics.size();
if (!_items[idx].subItems[subidx].movement) {
clearVisitsList(idx);
seekWay(idx, startidx, endidx, 0, 1);
}
if (!_items[idx].subItems[subidx].movement)
return 0;
MessageQueue *mq = new MessageQueue(g_fp->_globalMessageQueueList->compact());
Common::Point point;
ExCommand *ex;
int i = 0;
do {
subidx = startidx + endidx * _items[idx].statics.size();
point = _items[idx].subItems[subidx].movement->calcSomeXY(0, -1);
#if 0
if (pointArr) {
int sz;
if (_items[idx].subItems[subidx].movement->_currMovement)
sz = _items[idx].subItems[subidx].movement->_currMovement->_dynamicPhases.size();
else
sz = _items[idx].subItems[subidx].movement->_dynamicPhases.size();
ex = new ExCommand2(20, ani->_id, &pointArr[i], sz);
ex->_messageNum = _items[idx].subItems[subidx].movement->_id;
} else {
#endif
ex = new ExCommand(ani->_id, 1, _items[idx].subItems[subidx].movement->_id, 0, 0, 0, 1, 0, 0, 0);
#if 0
}
#endif
ex->_param = ani->_odelay;
ex->_field_3C = 1;
ex->_field_24 = 1;
mq->addExCommandToEnd(ex);
#if 0
if (resStatId)
*resStatId = _items[idx].subItems[subidx].movement->_id;
#endif
startidx = _items[idx].subItems[subidx].staticsIndex;
uint step;
if (_items[idx].subItems[subidx].movement->_currMovement)
step = _items[idx].subItems[subidx].movement->_currMovement->_dynamicPhases.size();
else
step = _items[idx].subItems[subidx].movement->_dynamicPhases.size();
i += step;
} while (startidx != endidx);
return mq;
}
MGMItem::MGMItem() {
objId = 0;
}
MGMSubItem::MGMSubItem() {
movement = 0;
staticsIndex = 0;
field_8 = 0;
field_C = 0;
x = 0;
y = 0;
}
void AniHandler::attachObject(int objId) {
debugC(4, kDebugPathfinding, "AniHandler::addItem(%d)", objId);
if (getIndex(objId) == -1) {
_items.push_back(MGMItem());
_items.back().objId = objId;
}
resetData(objId);
}
void AniHandler::resetData(int objId) {
int idx = getIndex(objId);
if (idx == -1)
return;
debugC(3, kDebugPathfinding, "AniHandler::resetData. (1) movements1 sz: %d movements2 sz: %d", _items[idx].movements1.size(), _items[idx].movements2.size());
_items[idx].subItems.clear();
_items[idx].statics.clear();
_items[idx].movements1.clear();
_items[idx].movements2.clear();
StaticANIObject *obj = g_fp->_currentScene->getStaticANIObject1ById(objId, -1);
if (!obj)
return;
debugC(1, kDebugPathfinding, "WWW rebuild. idx: %d, size: %d", idx, obj->_staticsList.size() * obj->_staticsList.size());
for (uint i = 0; i < obj->_staticsList.size(); i++) {
_items[idx].statics.push_back(obj->_staticsList[i]);
for (uint j = 0; j < obj->_staticsList.size(); j++) // Yes, square
_items[idx].subItems.push_back(MGMSubItem());
}
for (uint i = 0; i < obj->_movements.size(); i++) {
_items[idx].movements1.push_back(obj->_movements[i]);
_items[idx].movements2.push_back(0);
}
debugC(3, kDebugPathfinding, "AniHandler::resetData. (2) movements1 sz: %d movements2 sz: %d", _items[idx].movements1.size(), _items[idx].movements2.size());
}
int AniHandler::getIndex(int objId) {
for (uint i = 0; i < _items.size(); i++)
if (_items[i].objId == objId)
return i;
return -1;
}
MessageQueue *AniHandler::makeRunQueue(MakeQueueStruct *mkQueue) {
debugC(4, kDebugPathfinding, "AniHandler::makeRunQueue(*%d)", mkQueue->ani ? mkQueue->ani->_id : -1);
if (!mkQueue->ani)
return 0;
Movement *mov = mkQueue->ani->_movement;
if (!mov && !mkQueue->ani->_statics)
return 0;
if (!(mkQueue->flags & 1)) {
if (mov)
mkQueue->staticsId1 = mov->_staticsObj2->_staticsId;
else
mkQueue->staticsId1 = mkQueue->ani->_statics->_staticsId;
}
Common::Point point;
if (!(mkQueue->flags & 0x10) || !(mkQueue->flags & 0x20)) {
int nx = mkQueue->ani->_ox;
int ny = mkQueue->ani->_oy;
if (mkQueue->ani->_movement) {
mkQueue->ani->calcNextStep(&point);
nx += point.x;
ny += point.y;
}
if (!(mkQueue->flags & 0x10))
mkQueue->x2 = nx;
if (!(mkQueue->flags & 0x20))
mkQueue->y2 = ny;
}
mov = mkQueue->ani->getMovementById(mkQueue->movementId);
if (!mov)
return 0;
int itemIdx = getIndex(mkQueue->ani->_id);
int subIdx = getStaticsIndexById(itemIdx, mkQueue->staticsId1);
int st2idx = getStaticsIndexById(itemIdx, mov->_staticsObj1->_staticsId);
int st1idx = getStaticsIndexById(itemIdx, mov->_staticsObj2->_staticsId);
int subOffset = getStaticsIndexById(itemIdx, mkQueue->staticsId2);
debugC(3, kDebugPathfinding, "AniHandler::genMovement. (1) movements1 sz: %d movements2 sz: %d", _items[itemIdx].movements1.size(), _items[itemIdx].movements2.size());
clearVisitsList(itemIdx);
seekWay(itemIdx, subIdx, st2idx, 0, 1);
clearVisitsList(itemIdx);
seekWay(itemIdx, st1idx, subOffset, 0, 1);
const MGMSubItem &sub1 = _items[itemIdx].subItems[subIdx + st2idx * _items[itemIdx].statics.size()];
const MGMSubItem &sub2 = _items[itemIdx].subItems[st1idx + subOffset * _items[itemIdx].statics.size()];
if (subIdx != st2idx && !sub1.movement)
return 0;
if (st1idx != subOffset && !sub2.movement)
return 0;
int n1x = mkQueue->x1 - mkQueue->x2 - sub1.x - sub2.x;
int n1y = mkQueue->y1 - mkQueue->y2 - sub1.y - sub2.y;
const Common::Point point1 = mov->calcSomeXY(0, -1);
int n2x = point1.x;
int n2y = point1.y;
int mult;
int len = -1;
if (mkQueue->flags & 0x40) {
mult = mkQueue->field_10;
len = -1;
n2x *= mult;
n2y *= mult;
} else {
point = getNumCycles(mov, n1x, n1y, &mult, &len, 1);
n2x = point.x;
n2y = point.y;
}
if (!(mkQueue->flags & 2)) {
len = -1;
n2x = mult * point1.x;
n1x = mult * point1.x;
mkQueue->x1 = mkQueue->x2 + mult * point1.x + sub1.x + sub2.x;
}
if (!(mkQueue->flags & 4)) {
n2y = mult * point1.y;
n1y = mult * point1.y;
len = -1;
mkQueue->y1 = mkQueue->y2 + mult * point1.y + sub1.y + sub2.y;
}
int px = 0;
int py = 0;
if (sub1.movement) {
px = getFramesCount(itemIdx, subIdx, st2idx, 1);
py = getFramesCount(itemIdx, subIdx, st2idx, 2);
}
if (mult > 1) {
px += (mult - 1) * mov->countPhasesWithFlag(-1, 1);
py += (mult - 1) * mov->countPhasesWithFlag(-1, 2);
}
if (mult > 0) {
px += mov->countPhasesWithFlag(len, 1);
py += mov->countPhasesWithFlag(len, 2);
}
if (sub2.movement) {
px += getFramesCount(itemIdx, st1idx, subOffset, 1);
py += getFramesCount(itemIdx, st1idx, subOffset, 2);
}
int dx1 = n1x - n2x;
int dy1 = n1y - n2y;
int x1, y1;
if (px) {
x1 = (int)((double)dx1 / (double)px);
} else {
x1 = 0;
}
if (py) {
y1 = (int)((double)dy1 / (double)py);
} else {
y1 = 0;
}
Common::Point x2, y2;
y2.x = dx1 - px * x1;
y2.y = dy1 - py * y1;
if (n1x - n2x == px * x1)
x2.x = 0;
else
x2.x = (dx1 - px * x1) / abs(dx1 - px * x1);
if (dy1 == py * y1)
x2.y = 0;
else
x2.y = (dy1 - py * y1) / abs(dy1 - py * y1);
MessageQueue *mq = new MessageQueue(g_fp->_globalMessageQueueList->compact());
ExCommand2 *ex2;
for (int i = subIdx; i != st2idx;) {
const MGMSubItem &s = _items[itemIdx].subItems[i + st2idx * _items[itemIdx].statics.size()];
ex2 = createCommand(s.movement, mkQueue->ani->_id, x1, y1, x2, y2, -1);
ex2->_parId = mq->_id;
ex2->_param = mkQueue->ani->_odelay;
mq->addExCommandToEnd(ex2);
i = s.staticsIndex;
}
for (int i = 0; i < mult; ++i) {
int plen;
if (i == mult - 1)
plen = len;
else
plen = -1;
ex2 = createCommand(mov, mkQueue->ani->_id, x1, y1, x2, y2, plen);
ex2->_parId = mq->_id;
ex2->_param = mkQueue->ani->_odelay;
mq->addExCommandToEnd(ex2);
}
for (int j = st1idx; j != subOffset;) {
const MGMSubItem &s = _items[itemIdx].subItems[j + subOffset * _items[itemIdx].statics.size()];
ex2 = createCommand(s.movement, mkQueue->ani->_id, x1, y1, x2, y2, -1);
ex2->_parId = mq->_id;
ex2->_param = mkQueue->ani->_odelay;
mq->addExCommandToEnd(ex2);
j = s.staticsIndex;
}
ExCommand *ex = new ExCommand(mkQueue->ani->_id, 5, -1, mkQueue->x1, mkQueue->y1, 0, 1, 0, 0, 0);
ex->_z = mkQueue->field_1C;
ex->_param = mkQueue->ani->_odelay;
ex->_field_24 = 0;
ex->_excFlags |= 3;
mq->addExCommandToEnd(ex);
debugC(3, kDebugPathfinding, "AniHandler::genMovement. (2) movements1 sz: %d movements2 sz: %d", _items[itemIdx].movements1.size(), _items[itemIdx].movements2.size());
return mq;
}
int AniHandler::getFramesCount(int idx, int subIdx, int endIdx, int flag) {
int res = 0;
if (endIdx < 0)
return 0;
while (subIdx != endIdx) {
if (subIdx < 0)
break;
res += _items[idx].subItems[subIdx + endIdx * _items[idx].statics.size()].movement->countPhasesWithFlag(0xffffffff, flag);
subIdx = _items[idx].subItems[subIdx + endIdx * _items[idx].statics.size()].staticsIndex;
}
return res;
}
void AniHandler::putObjectToStatics(StaticANIObject *ani, int staticsId) {
debugC(4, kDebugPathfinding, "AniHandler::putObjectToStatics(*%d, %d)", ani->_id, staticsId);
if (getIndex(ani->_id) == -1)
return;
if (ani->_movement) {
ani->queueMessageQueue(0);
ani->_movement->gotoLastFrame();
ani->_statics = ani->_movement->_staticsObj2;
int x = ani->_movement->_ox;
int y = ani->_movement->_oy;
ani->_movement = 0;
ani->setOXY(x, y);
}
if (ani->_statics) {
const Common::Point point = getTransitionSize(ani->_id, ani->_statics->_staticsId, staticsId);
ani->setOXY(ani->_ox + point.x, ani->_oy + point.y);
ani->_statics = ani->getStaticsById(staticsId);
}
}
Common::Point AniHandler::getTransitionSize(int objectId, int staticsId1, int staticsId2) {
debugC(4, kDebugPathfinding, "AniHandler::getTransitionSize(%d, %d, %d)", objectId, staticsId1, staticsId2);
int idx = getIndex(objectId);
if (idx == -1) {
return Common::Point(-1, -1);
}
int st1idx = getStaticsIndexById(idx, staticsId1);
int st2idx = getStaticsIndexById(idx, staticsId2);
if (st1idx == st2idx) {
return Common::Point(0, 0);
}
int subidx = st1idx + st2idx * _items[idx].statics.size();
if (!_items[idx].subItems[subidx].movement) {
clearVisitsList(idx);
seekWay(idx, st1idx, st2idx, false, true);
if (!_items[idx].subItems[subidx].movement) {
clearVisitsList(idx);
seekWay(idx, st1idx, st2idx, true, false);
}
}
const MGMSubItem &sub = _items[idx].subItems[subidx];
if (!sub.movement) {
return Common::Point(0, 0);
}
return Common::Point(sub.x, sub.y);
}
int AniHandler::getStaticsIndexById(int idx, int16 id) {
if (!_items[idx].statics.size())
return -1;
for (uint i = 0; i < _items[idx].statics.size(); i++) {
if (_items[idx].statics[i]->_staticsId == id)
return i;
}
return -1;
}
int AniHandler::getStaticsIndex(int idx, Statics *st) {
if (!_items[idx].statics.size())
return -1;
for (uint i = 0; i < _items[idx].statics.size(); i++) {
if (_items[idx].statics[i] == st)
return i;
}
return -1;
}
void AniHandler::clearVisitsList(int idx) {
debugC(2, kDebugPathfinding, "AniHandler::clearVisitsList(%d)", idx);
for (uint i = 0; i < _items[idx].movements2.size(); i++)
_items[idx].movements2[i] = 0;
debugC(3, kDebugPathfinding, "AniHandler::clearVisitsList. movements1 sz: %d movements2 sz: %d", _items[idx].movements1.size(), _items[idx].movements2.size());
}
int AniHandler::seekWay(int idx, int st1idx, int st2idx, bool flip, bool flop) {
MGMItem &item = _items[idx];
int subIdx = st1idx + st2idx * item.statics.size();
debugC(2, kDebugPathfinding, "AniHandler::seekWay(%d, %d, %d, %d, %d)", idx, st1idx, st2idx, flip, flop);
if (st1idx == st2idx) {
memset(&item.subItems[subIdx], 0, sizeof(item.subItems[subIdx]));
return 0;
}
if (item.subItems[subIdx].movement)
return item.subItems[subIdx].field_8;
Common::Point point;
debugC(3, kDebugPathfinding, "AniHandler::seekWay. movements1 sz: %d movements2 sz: %d", item.movements1.size(), item.movements2.size());
for (uint i = 0; i < item.movements1.size(); i++) {
Movement *mov = item.movements1[i];
if (mov->_staticsObj1 == item.statics[st1idx]) {
if (item.movements2[i] || (flop && !mov->_field_50))
continue;
item.movements2[i] = 1;
int stidx = getStaticsIndex(idx, mov->_staticsObj2);
int recalc = seekWay(idx, stidx, st2idx, flip, flop);
int sz = mov->_currMovement ? mov->_currMovement->_dynamicPhases.size() : mov->_dynamicPhases.size();
debugC(1, kDebugPathfinding, "AniHandler::seekWay, want idx: %d, off: %d (%d + %d), sz: %d", idx, stidx + st2idx * _items[idx].statics.size(), stidx, st2idx, item.subItems.size());
int newsz = sz + item.subItems[stidx + st2idx * _items[idx].statics.size()].field_C;
if (recalc < 0)
continue;
if (!item.subItems[subIdx].movement || item.subItems[subIdx].field_8 > recalc + 1 ||
(item.subItems[subIdx].field_8 == recalc + 1 && item.subItems[subIdx].field_C > newsz)) {
item.subItems[subIdx].movement = mov;
item.subItems[subIdx].staticsIndex = stidx;
item.subItems[subIdx].field_8 = recalc + 1;
item.subItems[subIdx].field_C = newsz;
point = mov->calcSomeXY(0, -1);
item.subItems[subIdx].x = item.subItems[stidx + st2idx * _items[idx].statics.size()].x + point.x;
item.subItems[subIdx].y = item.subItems[stidx + st2idx * _items[idx].statics.size()].y + point.y;
}
} else if (flip) {
if (mov->_staticsObj2 != item.statics[st1idx])
continue;
if (item.movements2[i] || (flop && !mov->_field_50))
continue;
item.movements2[i] = 1;
int stidx = getStaticsIndex(idx, mov->_staticsObj1);
int recalc = seekWay(idx, stidx, st2idx, flip, flop);
if (recalc < 0)
continue;
if (!item.subItems[subIdx].movement || item.subItems[subIdx].field_8 > recalc + 1) {
item.subItems[subIdx].movement = mov;
item.subItems[subIdx].staticsIndex = stidx;
item.subItems[subIdx].field_8 = recalc + 1;
int sz = mov->_currMovement ? mov->_currMovement->_dynamicPhases.size() : mov->_dynamicPhases.size();
item.subItems[subIdx].field_C = sz + item.subItems[stidx + st2idx * _items[idx].statics.size()].field_C;
point = mov->calcSomeXY(0, -1);
item.subItems[subIdx].x = item.subItems[stidx + st2idx * _items[idx].statics.size()].x - point.x;
item.subItems[subIdx].y = item.subItems[stidx + st2idx * _items[idx].statics.size()].y - point.y;
}
}
}
if (item.subItems[subIdx].movement)
return item.subItems[subIdx].field_8;
return -1;
}
int AniHandler::getNumMovements(int objectId, int idx1, int idx2) {
debugC(4, kDebugPathfinding, "AniHandler::getNumMovements(%d, %d, %d)", objectId, idx1, idx2);
int idx = getIndex(objectId);
if (idx != -1) {
int from = getStaticsIndexById(idx, idx1);
int to = getStaticsIndexById(idx, idx2);
debugC(1, kDebugPathfinding, "WWW 6, want idx: %d, off: %d", idx, from + to * _items[idx].statics.size());
const MGMSubItem &sub = _items[idx].subItems[from + to * _items[idx].statics.size()];
if (sub.movement) {
idx = sub.field_8;
} else {
clearVisitsList(idx);
idx = seekWay(idx, from, to, 0, 1);
}
}
return idx;
}
Common::Point AniHandler::getNumCycles(Movement *mov, int x, int y, int *mult, int *len, int flag) {
Common::Point point = mov->calcSomeXY(0, -1);
int p1x = point.x;
int p1y = point.y;
int newmult = 0;
if (abs(p1y) > abs(p1x)) {
if (mov->calcSomeXY(0, -1).y)
newmult = (int)((double)y / mov->calcSomeXY(0, -1).y);
} else if (mov->calcSomeXY(0, -1).x) {
newmult = (int)((double)x / mov->calcSomeXY(0, -1).x);
}
if (newmult < 0)
newmult = 0;
*mult = newmult;
int phase = 1;
int sz;
if (flag) {
if (abs(p1y) > abs(p1x)) {
while (abs(p1y * newmult + mov->calcSomeXY(0, phase).y) < abs(y)) {
sz = mov->_currMovement ? mov->_currMovement->_dynamicPhases.size() : mov->_dynamicPhases.size();
if (phase > sz)
break;
phase++;
}
} else {
while (abs(p1x * newmult + mov->calcSomeXY(0, phase).x) < abs(x)) {
sz = mov->_currMovement ? mov->_currMovement->_dynamicPhases.size() : mov->_dynamicPhases.size();
if (phase >= sz)
break;
phase++;
}
}
*len = phase - 1;
} else {
*len = -1;
}
int p2x = 0;
int p2y = 0;
if (!*len)
*len = -1;
if (*len > 0) {
++*mult;
point = mov->calcSomeXY(0, *len);
p2x = point.x;
p2y = point.y;
if (abs(p1y) > abs(p1x))
p2x = p1x;
else
p2y = p1y;
}
return Common::Point(p2x + p1x * newmult, p2y + p1y * newmult);
}
ExCommand2 *AniHandler::createCommand(Movement *mov, int objId, int x1, int y1, Common::Point &x2, Common::Point &y2, int len) {
debugC(2, kDebugPathfinding, "AniHandler::createCommand(mov, %d, %d, %d, [%d, %d], [%d, %d], %d)", objId, x1, y1, x2.x, x2.y, y2.x, y2.y, len);
uint cnt;
if (mov->_currMovement)
cnt = mov->_currMovement->_dynamicPhases.size();
else
cnt = mov->_dynamicPhases.size();
if (len > 0 && cnt > (uint)len)
cnt = len;
PointList points(cnt);
for (uint i = 0; i < cnt; i++) {
int flags = mov->getDynamicPhaseByIndex(i)->getDynFlags();
if (flags & 1) {
points[i].x = x1 + x2.x;
y2.x -= x2.x;
if (!y2.x)
x2.x = 0;
}
if (flags & 2) {
points[i].y = y1 + x2.y;
y2.y -= x2.y;
if (!y2.y)
x2.y = 0;
}
}
ExCommand2 *ex = new ExCommand2(20, objId, points);
ex->_excFlags = 2;
ex->_messageNum = mov->_id;
ex->_z = len;
ex->_field_24 = 1;
ex->_param = -1;
return ex;
}
} // End of namespace Fullpipe