[ViewVC] Diff of: cvs/deliantra/server/server/skill

Comparing deliantra/server/server/skill_util.C (file contents):
Revision 1.97 by root, Thu Apr 15 00:36:51 2010 UTC vs.
Revision 1.109 by root, Sat Nov 17 23:40:04 2018 UTC

 /*
  * This file is part of Deliantra, the Roguelike Realtime MMORPG.
  *
+ * Copyright (©) 2017,2018 Marc Alexander Lehmann / the Deliantra team
- * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
+ * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
  * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
  * Copyright (©) 1992 Frank Tore Johansen
  *
  * Deliantra is free software: you can redistribute it and/or modify it under
  * the terms of the Affero 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 Affero GNU General Public License
  * and the GNU General Public License along with this program. If not, see
  * <http://www.gnu.org/licenses/>.
  *
  * The authors can be reached via e-mail to <support@deliantra.net>
  */
 /* Created July 95 to separate skill utilities from actual skills -b.t. */
 }
 void
 add_skill_archetype (object *o)
 {
-  printf ("<%s><%s>\n", &o->name, &o->skill);//D
   assert (("skill name must equal skill skill", o->name == o->skill));
   for (vector<object_ptr>::iterator i = skillvec.begin (); i != skillvec.end (); ++i)
     if ((*i)->name == o->name)
       {
   skillvec.push_back (o);
 }
 /* This function goes through the player inventory and sets
  * up the last_skills[] array in the player object.
  * the last_skills[] is used to more quickly lookup skills -
  * mostly used for sending exp.
  */
 void
 player::link_skills ()
 {
  * one that accumulates exp, has the level, etc).
  *
  * It is presumed that the player will be needing to actually
  * use the skill, so thus if use of the skill requires a skill
  * tool, this code will equip it.
  *
  * This code is basically the same as find_skill_by_name() above,
  * but instead a skill name, we search by matching number.
  * this replaces find_skill.
  *
  * MUST NOT BE USED IN NEW CODE! (schmorp)
     skill->flag [FLAG_CAN_USE_SKILL] = true;
   return skill;
 }
 /* do_skill() - Main skills use function-similar in scope to cast_spell().
  * We handle all requests for skill use outside of some combat here.
  * We require a separate routine outside of fire() so as to allow monsters
  * to utilize skills.  Returns 1 on use of skill, otherwise 0.
  * This is changed (2002-11-30) from the old method that returned
  * exp - no caller needed that info, but it also prevented the callers
  * from know if a skill was actually used, as many skills don't
  * give any exp for their direct use (eg, throwing).
       case SK_ALCHEMY:
       case SK_THAUMATURGY:
       case SK_LITERACY:
       case SK_WOODSMAN:
         /* first, we try to find a cauldron, and do the alchemy thing.
          * failing that, we go and identify stuff.
          */
         {
           bool found_cauldron = false;
           for (object *next, *tmp = GET_MAP_OB (op->map, op->x, op->y); tmp; tmp = next)
       default:
         LOG (llevDebug, "%s attempted to use unknown skill: %d\n", query_name (op), op->chosen_skill->stats.sp);
         break;
     }
   /* For players we now update the speed_left from using the skill.
    * Monsters have no skill use time because of the random nature in
    * which use_monster_skill is called already simulates this.
    * If certain skills should take more/less time, that should be
    * in the code for the skill itself.
    */
   if (op->type == PLAYER)
    * non-living magic obj, runes and everything else.
    *
    * If an object is not alive and magical we set the base exp higher to
    * help out exp awards for skill_ident skills. Also, if
    * an item is type RUNE, we give out exp based on stats.Cha
    * and level (this was the old system) -b.t.
    */
   if (!op)
     {                           /* no item/creature */
       op_lvl = max (1, who->map->difficulty);
       op_exp = 0;
 }
 /* Learn skill. This inserts the requested skill in the player's
  * inventory. The skill field of the scroll should have the
  * exact name of the requested skill.
  * This one actually teaches the player the skill as something
  * they can equip.
  * Return 0 if the player knows the skill, 1 if the
  * player learns the skill, 2 otherwise.
  */
 int
     return 100;
   return rv;
 }
+static int
+cmp_skillp (const void *sk1, const void *sk2)
+{
+  return strcmp (&((*(const object **) sk1)->name),
+                 &((*(const object **) sk2)->name));
+}
 /* show_skills() - Meant to allow players to examine
  * their current skill list.
  * This shows the amount of exp they have in the skills.
  * we also include some other non skill related info (god,
  * max weapon improvments, item power).
- * Note this function is a bit more complicated becauase we
+ * Note this function is a bit more complicated because we
- * we want ot sort the skills before printing them.  If we
+ * we want to sort the skills before printing them. If we
  * just dumped this as we found it, this would be a bit
  * simpler.
  */
-//TODO: egad, do it in perl, do not suffer from the big buffer on stack, make it one single drawinfo.
 void
 show_skills (object *pl, const char *search)
 {
   const char *cp;
   int i, num_skills_found = 0;
-  const char *const periods = ".............................."; // 30
+  object *skills[CS_NUM_SKILLS];
-  /* Need to have a pointer and use strdup for qsort to work properly */
-  char skills[NUM_SKILLS][128]; // d'oh
   object *op = pl->contr->ob;
+  /* find the skills */
   for (object *tmp = op->inv; tmp; tmp = tmp->below)
     {
       if (tmp->type == SKILL)
         {
           if (search && !tmp->name.contains (search))
             continue;
-          char buf[30];
+          skills[num_skills_found++] = tmp;
-          /* Basically want to fill this out to 30 spaces with periods */
-          snprintf (buf, sizeof (buf), "%s%s", &tmp->name, periods);
-          if (settings.permanent_exp_ratio)
-            snprintf (skills[num_skills_found++], sizeof (skills [0]), "%slvl:%3d (xp:%" PRId64 "/%" PRId64 "/%d%%)",
-                      buf, tmp->level, tmp->stats.exp,
-                      level_exp (tmp->level + 1, op->expmul), clipped_percent (tmp->perm_exp, tmp->stats.exp));
-          else
-            snprintf (skills[num_skills_found++], sizeof (skills [0]), "%slvl:%3d (xp:%" PRId64 "/%" PRId64 ")",
-                      buf, tmp->level, tmp->stats.exp, level_exp (tmp->level + 1, op->expmul));
           /* I don't know why some characters get a bunch of skills, but
            * it sometimes happens (maybe a leftover from bugier earlier code
            * and those character are still about).  In any case, lets handle
            * it so it doesn't crash the server - otherwise, one character may
            * crash the server numerous times.
            */
-          if (num_skills_found >= NUM_SKILLS)
+          if (num_skills_found >= CS_NUM_SKILLS)
             {
               new_draw_info (NDI_RED | NDI_REPLY, 0, op, "Your character has too many skills.");
               new_draw_info (NDI_RED | NDI_REPLY, 0, op, "Something isn't right - contact the server admin");
               break;
             }
   dynbuf_text &msg = msg_dynbuf; msg.clear ();
   msg << "T<Player skills:>\n\n";
   if (num_skills_found > 1)
-    qsort (skills, num_skills_found, sizeof (skills [0]), (int (*)(const void *, const void *)) std::strcmp);
+    qsort (skills, num_skills_found, sizeof (skills [0]), cmp_skillp);
+  char buf[31]; /* +1 for '\0' */
+  const char *const periods = ".............................."; // 30
-  for (i = 0; i < num_skills_found; i++)
+  for (i = 0; i < num_skills_found; i++) {
-    msg << " C<" << skills [i] << ">\n";
+    object *tmp = skills[i];
+    /* Basically want to fill this out to 30 spaces with periods */
+    snprintf (buf, sizeof (buf), "%s%s", &tmp->name, periods);
+    msg << " C<";
+    if (settings.permanent_exp_ratio)
+      msg.printf ("%slvl:%3d (xp:%" PRId64 "/%" PRId64 "/%d%%)",
+                  buf, tmp->level, tmp->stats.exp, level_exp (tmp->level + 1, op->expmul),
+		  clipped_percent (tmp->perm_exp, tmp->stats.exp));
+    else
+      msg.printf ("%slvl:%3d (xp:%" PRId64 "/%" PRId64 ")",
+                  buf, tmp->level, tmp->stats.exp, level_exp (tmp->level + 1, op->expmul));
+    msg << ">\n";
+  }
   msg << "\nYou can handle " << op->level / 5 + 5 << " weapon improvements.\r";
   cp = determine_god (op);
   msg << "You worship " << (cp ? cp : "no god at current time") << ".\r";
       << ".\n";
   pl->contr->infobox (MSG_CHANNEL ("skills"), msg);
 }
 /* use_skill() - similar to invoke command, it executes the skill in the
  * direction that the user is facing. Returns false if we are unable to
  * change to the requested skill, or were unable to use the skill properly.
  * This is tricky because skills can have spaces.  We basically roll
  * our own find_skill_by_name so we can try to do better string matching.
  */
 int
 use_skill (object *op, const char *string)
 {
                 }
             }
           if (!op->apply (pl->combat_ob))
             return 0;
+          if (!op->chosen_skill)
+            {
+              LOG (llevError, "do_skill_attack: weapon has no skill (%s)", pl->combat_ob->debug_desc ());
+              new_draw_info (NDI_RED | NDI_REPLY, 0, op, "You hit a bug in the server, please contact an admin!");
+              return 0;
+            }
         }
       /* lose invisiblity/hiding status for running attacks */
       if (pl->tmp_invis)
         {
   int mflags;
   if (!dir)
     dir = pl->facing;
-  tx = freearr_x[dir];
+  tx = DIRX (dir);
-  ty = freearr_y[dir];
+  ty = DIRY (dir);
   /* If we don't yet have an opponent, find if one exists, and attack.
    * Legal opponents are the same as outlined in move_player_attack()
    */
   if (!tmp)
     {
       m = pl->map;
-      tx = pl->x + freearr_x[dir];
+      tx = pl->x + DIRX (dir);
-      ty = pl->y + freearr_y[dir];
+      ty = pl->y + DIRY (dir);
       mflags = get_map_flags (m, &m, tx, ty, &tx, &ty);
       if (mflags & P_OUT_OF_MAP)
         return 0;

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/server/server/skill_util.C (file contents): Revision 1.97 by root, Thu Apr 15 00:36:51 2010 UTC vs. Revision 1.109 by root, Sat Nov 17 23:40:04 2018 UTC

Diff Legend

Comparing deliantra/server/server/skill_util.C (file contents):
Revision 1.97 by root, Thu Apr 15 00:36:51 2010 UTC vs.
Revision 1.109 by root, Sat Nov 17 23:40:04 2018 UTC