3 Copyright (C) 2010-2013 celeron55, Perttu Ahola <celeron55@gmail.com>
4 Copyright (C) 2013-2020 Minetest core developers & community
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU Lesser General Public License as published by
8 the Free Software Foundation; either version 2.1 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License along
17 with this program; if not, write to the Free Software Foundation, Inc.,
18 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21 #include "luaentity_sao.h"
22 #include "collision.h"
23 #include "constants.h"
24 #include "player_sao.h"
25 #include "scripting_server.h"
27 #include "serverenvironment.h"
29 LuaEntitySAO::LuaEntitySAO(ServerEnvironment *env, v3f pos, const std::string &data)
38 while (!data.empty()) { // breakable, run for one iteration
39 std::istringstream is(data, std::ios::binary);
40 // 'version' does not allow to incrementally extend the parameter list thus
41 // we need another variable to build on top of 'version=1'. Ugly hack but works™
43 u8 version = readU8(is);
45 name = deSerializeString(is);
46 state = deSerializeLongString(is);
52 velocity = readV3F1000(is);
53 // yaw must be yaw to be backwards-compatible
54 rotation.Y = readF1000(is);
56 if (is.good()) // EOF for old formats
57 version2 = readU8(is);
59 if (version2 < 1) // PROTOCOL_VERSION < 37
63 rotation.X = readF1000(is);
64 rotation.Z = readF1000(is);
72 infostream << "LuaEntitySAO::create(name=\"" << name << "\" state=\""
73 << state << "\")" << std::endl;
78 m_velocity = velocity;
79 m_rotation = rotation;
82 LuaEntitySAO::~LuaEntitySAO()
85 m_env->getScriptIface()->luaentity_Remove(m_id);
88 for (u32 attached_particle_spawner : m_attached_particle_spawners) {
89 m_env->deleteParticleSpawner(attached_particle_spawner, false);
93 void LuaEntitySAO::addedToEnvironment(u32 dtime_s)
95 ServerActiveObject::addedToEnvironment(dtime_s);
97 // Create entity from name
98 m_registered = m_env->getScriptIface()->
99 luaentity_Add(m_id, m_init_name.c_str());
103 m_env->getScriptIface()->
104 luaentity_GetProperties(m_id, this, &m_prop);
105 // Initialize HP from properties
106 m_hp = m_prop.hp_max;
107 // Activate entity, supplying serialized state
108 m_env->getScriptIface()->
109 luaentity_Activate(m_id, m_init_state, dtime_s);
111 m_prop.infotext = m_init_name;
115 void LuaEntitySAO::step(float dtime, bool send_recommended)
117 if(!m_properties_sent)
119 m_properties_sent = true;
120 std::string str = getPropertyPacket();
121 // create message and add to list
122 ActiveObjectMessage aom(getId(), true, str);
123 m_messages_out.push(aom);
126 // If attached, check that our parent is still there. If it isn't, detach.
127 if(m_attachment_parent_id && !isAttached())
129 m_attachment_parent_id = 0;
130 m_attachment_bone = "";
131 m_attachment_position = v3f(0,0,0);
132 m_attachment_rotation = v3f(0,0,0);
133 sendPosition(false, true);
136 m_last_sent_position_timer += dtime;
138 // Each frame, parent position is copied if the object is attached, otherwise it's calculated normally
139 // If the object gets detached this comes into effect automatically from the last known origin
142 v3f pos = m_env->getActiveObject(m_attachment_parent_id)->getBasePosition();
143 m_base_position = pos;
144 m_velocity = v3f(0,0,0);
145 m_acceleration = v3f(0,0,0);
150 aabb3f box = m_prop.collisionbox;
153 collisionMoveResult moveresult;
154 f32 pos_max_d = BS*0.25; // Distance per iteration
155 v3f p_pos = m_base_position;
156 v3f p_velocity = m_velocity;
157 v3f p_acceleration = m_acceleration;
158 moveresult = collisionMoveSimple(m_env, m_env->getGameDef(),
159 pos_max_d, box, m_prop.stepheight, dtime,
160 &p_pos, &p_velocity, p_acceleration,
161 this, m_prop.collideWithObjects);
164 m_base_position = p_pos;
165 m_velocity = p_velocity;
166 m_acceleration = p_acceleration;
168 m_base_position += dtime * m_velocity + 0.5 * dtime
169 * dtime * m_acceleration;
170 m_velocity += dtime * m_acceleration;
173 if (m_prop.automatic_face_movement_dir &&
174 (fabs(m_velocity.Z) > 0.001 || fabs(m_velocity.X) > 0.001)) {
175 float target_yaw = atan2(m_velocity.Z, m_velocity.X) * 180 / M_PI
176 + m_prop.automatic_face_movement_dir_offset;
177 float max_rotation_per_sec =
178 m_prop.automatic_face_movement_max_rotation_per_sec;
180 if (max_rotation_per_sec > 0) {
181 m_rotation.Y = wrapDegrees_0_360(m_rotation.Y);
182 wrappedApproachShortest(m_rotation.Y, target_yaw,
183 dtime * max_rotation_per_sec, 360.f);
185 // Negative values of max_rotation_per_sec mean disabled.
186 m_rotation.Y = target_yaw;
192 m_env->getScriptIface()->luaentity_Step(m_id, dtime);
195 if (!send_recommended)
200 // TODO: force send when acceleration changes enough?
201 float minchange = 0.2*BS;
202 if(m_last_sent_position_timer > 1.0){
204 } else if(m_last_sent_position_timer > 0.2){
207 float move_d = m_base_position.getDistanceFrom(m_last_sent_position);
208 move_d += m_last_sent_move_precision;
209 float vel_d = m_velocity.getDistanceFrom(m_last_sent_velocity);
210 if (move_d > minchange || vel_d > minchange ||
211 std::fabs(m_rotation.X - m_last_sent_rotation.X) > 1.0f ||
212 std::fabs(m_rotation.Y - m_last_sent_rotation.Y) > 1.0f ||
213 std::fabs(m_rotation.Z - m_last_sent_rotation.Z) > 1.0f) {
215 sendPosition(true, false);
219 if (!m_armor_groups_sent) {
220 m_armor_groups_sent = true;
221 // create message and add to list
222 m_messages_out.emplace(getId(), true, generateUpdateArmorGroupsCommand());
225 if (!m_animation_sent) {
226 m_animation_sent = true;
227 std::string str = generateUpdateAnimationCommand();
228 // create message and add to list
229 ActiveObjectMessage aom(getId(), true, str);
230 m_messages_out.push(aom);
233 if (!m_animation_speed_sent) {
234 m_animation_speed_sent = true;
235 std::string str = generateUpdateAnimationSpeedCommand();
236 // create message and add to list
237 ActiveObjectMessage aom(getId(), true, str);
238 m_messages_out.push(aom);
241 if (!m_bone_position_sent) {
242 m_bone_position_sent = true;
243 for (std::unordered_map<std::string, core::vector2d<v3f>>::const_iterator
244 ii = m_bone_position.begin(); ii != m_bone_position.end(); ++ii){
245 std::string str = generateUpdateBonePositionCommand((*ii).first,
246 (*ii).second.X, (*ii).second.Y);
247 // create message and add to list
248 ActiveObjectMessage aom(getId(), true, str);
249 m_messages_out.push(aom);
253 if (!m_attachment_sent) {
254 m_attachment_sent = true;
255 std::string str = generateUpdateAttachmentCommand();
256 // create message and add to list
257 ActiveObjectMessage aom(getId(), true, str);
258 m_messages_out.push(aom);
262 std::string LuaEntitySAO::getClientInitializationData(u16 protocol_version)
264 std::ostringstream os(std::ios::binary);
266 // PROTOCOL_VERSION >= 37
267 writeU8(os, 1); // version
268 os << serializeString(""); // name
269 writeU8(os, 0); // is_player
270 writeU16(os, getId()); //id
271 writeV3F32(os, m_base_position);
272 writeV3F32(os, m_rotation);
275 std::ostringstream msg_os(std::ios::binary);
276 msg_os << serializeLongString(getPropertyPacket()); // message 1
277 msg_os << serializeLongString(generateUpdateArmorGroupsCommand()); // 2
278 msg_os << serializeLongString(generateUpdateAnimationCommand()); // 3
279 for (std::unordered_map<std::string, core::vector2d<v3f>>::const_iterator
280 ii = m_bone_position.begin(); ii != m_bone_position.end(); ++ii) {
281 msg_os << serializeLongString(generateUpdateBonePositionCommand((*ii).first,
282 (*ii).second.X, (*ii).second.Y)); // m_bone_position.size
284 msg_os << serializeLongString(generateUpdateAttachmentCommand()); // 4
285 int message_count = 4 + m_bone_position.size();
286 for (std::unordered_set<int>::const_iterator ii = m_attachment_child_ids.begin();
287 (ii != m_attachment_child_ids.end()); ++ii) {
288 if (ServerActiveObject *obj = m_env->getActiveObject(*ii)) {
290 // TODO after a protocol bump: only send the object initialization data
291 // to older clients (superfluous since this message exists)
292 msg_os << serializeLongString(obj->generateUpdateInfantCommand(*ii, protocol_version));
296 msg_os << serializeLongString(generateSetTextureModCommand());
299 writeU8(os, message_count);
300 os.write(msg_os.str().c_str(), msg_os.str().size());
306 void LuaEntitySAO::getStaticData(std::string *result) const
308 verbosestream<<FUNCTION_NAME<<std::endl;
309 std::ostringstream os(std::ios::binary);
310 // version must be 1 to keep backwards-compatibility. See version2
313 os<<serializeString(m_init_name);
316 std::string state = m_env->getScriptIface()->
317 luaentity_GetStaticdata(m_id);
318 os<<serializeLongString(state);
320 os<<serializeLongString(m_init_state);
323 writeV3F1000(os, m_velocity);
325 writeF1000(os, m_rotation.Y);
327 // version2. Increase this variable for new values
328 writeU8(os, 1); // PROTOCOL_VERSION >= 37
330 writeF1000(os, m_rotation.X);
331 writeF1000(os, m_rotation.Z);
333 // <write new values>
338 u16 LuaEntitySAO::punch(v3f dir,
339 const ToolCapabilities *toolcap,
340 ServerActiveObject *puncher,
341 float time_from_last_punch)
344 // Delete unknown LuaEntities when punched
345 m_pending_removal = true;
349 FATAL_ERROR_IF(!puncher, "Punch action called without SAO");
351 s32 old_hp = getHP();
352 ItemStack selected_item, hand_item;
353 ItemStack tool_item = puncher->getWieldedItem(&selected_item, &hand_item);
355 PunchDamageResult result = getPunchDamage(
359 time_from_last_punch);
361 bool damage_handled = m_env->getScriptIface()->luaentity_Punch(m_id, puncher,
362 time_from_last_punch, toolcap, dir, result.did_punch ? result.damage : 0);
364 if (!damage_handled) {
365 if (result.did_punch) {
366 setHP((s32)getHP() - result.damage,
367 PlayerHPChangeReason(PlayerHPChangeReason::PLAYER_PUNCH, puncher));
369 // create message and add to list
374 if (getHP() == 0 && !isGone()) {
375 clearParentAttachment();
376 clearChildAttachments();
377 m_env->getScriptIface()->luaentity_on_death(m_id, puncher);
378 m_pending_removal = true;
381 actionstream << puncher->getDescription() << " (id=" << puncher->getId() <<
382 ", hp=" << puncher->getHP() << ") punched " <<
383 getDescription() << " (id=" << m_id << ", hp=" << m_hp <<
384 "), damage=" << (old_hp - (s32)getHP()) <<
385 (damage_handled ? " (handled by Lua)" : "") << std::endl;
387 // TODO: give Lua control over wear
391 void LuaEntitySAO::rightClick(ServerActiveObject *clicker)
396 m_env->getScriptIface()->luaentity_Rightclick(m_id, clicker);
399 void LuaEntitySAO::setPos(const v3f &pos)
403 m_base_position = pos;
404 sendPosition(false, true);
407 void LuaEntitySAO::moveTo(v3f pos, bool continuous)
411 m_base_position = pos;
413 sendPosition(true, true);
416 float LuaEntitySAO::getMinimumSavedMovement()
421 std::string LuaEntitySAO::getDescription()
423 std::ostringstream oss;
424 oss << "LuaEntitySAO \"" << m_init_name << "\" ";
425 auto pos = floatToInt(m_base_position, BS);
426 oss << "at " << PP(pos);
430 void LuaEntitySAO::setHP(s32 hp, const PlayerHPChangeReason &reason)
432 m_hp = rangelim(hp, 0, U16_MAX);
435 u16 LuaEntitySAO::getHP() const
440 void LuaEntitySAO::setVelocity(v3f velocity)
442 m_velocity = velocity;
445 v3f LuaEntitySAO::getVelocity()
450 void LuaEntitySAO::setAcceleration(v3f acceleration)
452 m_acceleration = acceleration;
455 v3f LuaEntitySAO::getAcceleration()
457 return m_acceleration;
460 void LuaEntitySAO::setTextureMod(const std::string &mod)
462 m_current_texture_modifier = mod;
463 // create message and add to list
464 m_messages_out.emplace(getId(), true, generateSetTextureModCommand());
467 std::string LuaEntitySAO::getTextureMod() const
469 return m_current_texture_modifier;
473 std::string LuaEntitySAO::generateSetTextureModCommand() const
475 std::ostringstream os(std::ios::binary);
477 writeU8(os, AO_CMD_SET_TEXTURE_MOD);
479 os << serializeString(m_current_texture_modifier);
483 std::string LuaEntitySAO::generateSetSpriteCommand(v2s16 p, u16 num_frames,
484 f32 framelength, bool select_horiz_by_yawpitch)
486 std::ostringstream os(std::ios::binary);
488 writeU8(os, AO_CMD_SET_SPRITE);
491 writeU16(os, num_frames);
492 writeF32(os, framelength);
493 writeU8(os, select_horiz_by_yawpitch);
497 void LuaEntitySAO::setSprite(v2s16 p, int num_frames, float framelength,
498 bool select_horiz_by_yawpitch)
500 std::string str = generateSetSpriteCommand(
504 select_horiz_by_yawpitch
506 // create message and add to list
507 m_messages_out.emplace(getId(), true, str);
510 std::string LuaEntitySAO::getName()
515 std::string LuaEntitySAO::getPropertyPacket()
517 return generateSetPropertiesCommand(m_prop);
520 void LuaEntitySAO::sendPosition(bool do_interpolate, bool is_movement_end)
522 // If the object is attached client-side, don't waste bandwidth sending its position to clients
526 m_last_sent_move_precision = m_base_position.getDistanceFrom(
527 m_last_sent_position);
528 m_last_sent_position_timer = 0;
529 m_last_sent_position = m_base_position;
530 m_last_sent_velocity = m_velocity;
531 //m_last_sent_acceleration = m_acceleration;
532 m_last_sent_rotation = m_rotation;
534 float update_interval = m_env->getSendRecommendedInterval();
536 std::string str = generateUpdatePositionCommand(
545 // create message and add to list
546 m_messages_out.emplace(getId(), false, str);
549 bool LuaEntitySAO::getCollisionBox(aabb3f *toset) const
553 //update collision box
554 toset->MinEdge = m_prop.collisionbox.MinEdge * BS;
555 toset->MaxEdge = m_prop.collisionbox.MaxEdge * BS;
557 toset->MinEdge += m_base_position;
558 toset->MaxEdge += m_base_position;
566 bool LuaEntitySAO::getSelectionBox(aabb3f *toset) const
568 if (!m_prop.is_visible || !m_prop.pointable) {
572 toset->MinEdge = m_prop.selectionbox.MinEdge * BS;
573 toset->MaxEdge = m_prop.selectionbox.MaxEdge * BS;
578 bool LuaEntitySAO::collideWithObjects() const
580 return m_prop.collideWithObjects;