http://eressea.upb.de/mantis/bug_view_page.php?bug_id=0000194

- zauber sind mehrfach in der zauberliste

src/common/kernel/magic.c

@@ -202,7 +202,6 @@ read_mage(attrib * a, FILE * F)
 {
   int i, mtype;
   sc_mage * mage = (sc_mage*)a->data.v;
-  spell_ptr ** sp = &mage->spellptr;
 
   fscanf(F, "%d %d %d", &mtype, &mage->spellpoints, &mage->spchange);
   mage->magietyp = (magic_t)mtype;
@@ -213,15 +212,16 @@ read_mage(attrib * a, FILE * F)
     mage->combatspell[i] = (spellid_t)spid;
   }
   for (;;) {
-    int spid;
+    int i;
 
-    fscanf (F, "%d", &spid);
+    fscanf (F, "%d", &i);
-    if (spid < 0) break;
+    if (i < 0) break;
-    if (find_spellbyid((spellid_t)spid)==NULL) continue;
+    else {
+      spellid_t spid = (spellid_t)i;
 
-    *sp = calloc (sizeof(spell_ptr), 1);
+      if (find_spellbyid(spid)==NULL) continue;
-    (*sp)->spellid = (spellid_t)spid;
+      add_spell(mage, spid);
-    sp = &(*sp)->next;
+    }
   }
   return AT_READ_OK;
 }
@@ -302,7 +302,7 @@ createspelllist(unit *u, magic_t mtyp)
     spell * sp = slist->data;
     if (sp->magietyp == mtyp && sp->level <= sk) {
       if (!has_spell(u, sp)) {
-        addspell(u, sp->id);
+        add_spell(get_mage(u), sp->id);
       }
     }
   }
@@ -366,19 +366,20 @@ updatespelllist(unit * u)
   int sk = eff_skill(u, SK_MAGIC, u->region);
   spell_list * slist;
   spell * sp;
+  struct sc_mage * mage = get_mage(u);
   magic_t gebiet = find_magetype(u);
   boolean ismonster = u->faction->no==MONSTER_FACTION;
 
   /* Nur Orkmagier bekommen den Keuschheitsamulettzauber */
   sp = find_spellbyid(SPL_ARTEFAKT_CHASTITYBELT);
   if (old_race(u->race)==RC_ORC && !has_spell(u, sp) && sp->level<=sk) {
-    addspell(u, SPL_ARTEFAKT_CHASTITYBELT);
+    add_spell(mage, SPL_ARTEFAKT_CHASTITYBELT);
   }
 
   /* Nur Wyrm-Magier bekommen den Wyrmtransformationszauber */
   sp = find_spellbyid(SPL_BECOMEWYRM);
   if (fspecial(u->faction, FS_WYRM) && !has_spell(u, sp) && sp->level<=sk) {
-    addspell(u, SPL_BECOMEWYRM);
+    add_spell(mage, SPL_BECOMEWYRM);
   }
 
   /* Transformierte Wyrm-Magier bekommen Drachenodem */
@@ -389,17 +390,17 @@ updatespelllist(unit * u)
     case RC_WYRM:
       sp = find_spellbyid(SPL_WYRMODEM);
       if (sp!=NULL && !has_spell(u, sp) && sp->level<=sk) {
-        addspell(u, sp->id);
+        add_spell(mage, sp->id);
       }
     case RC_DRAGON:
       sp = find_spellbyid(SPL_DRAGONODEM);
       if (sp!=NULL && !has_spell(u, sp) && sp->level<=sk) {
-        addspell(u, sp->id);
+        add_spell(mage, sp->id);
       }
     case RC_FIREDRAGON:
       sp = find_spellbyid(SPL_FIREDRAGONODEM);
       if (sp!=NULL && has_spell(u, sp) && sp->level<=sk) {
-        addspell(u, sp->id);
+        add_spell(mage, sp->id);
       }
       break;
     }
@@ -417,7 +418,7 @@ updatespelllist(unit * u)
       if (know || (gebiet!=M_GRAU && sp->magietyp == gebiet)) {
         faction * f = u->faction;
 
-        if (!know) addspell(u, sp->id);
+        if (!know) add_spell(mage, sp->id);
         if (!ismonster && !already_seen(u->faction, sp->id)) {
           a_add(&f->attribs, a_new(&at_reportspell))->data.i = sp->id;
           a_add(&f->attribs, a_new(&at_seenspell))->data.i = sp->id;
@@ -431,19 +432,24 @@ updatespelllist(unit * u)
 /* Funktionen für die Bearbeitung der List-of-known-spells */
 
 void
-addspell(unit *u, spellid_t spellid)
+add_spell(sc_mage* m, spellid_t spellid)
 {
-	sc_mage *m;
+  if (m==NULL) {
+    log_error(("add_spell: unit is not a mage.\n"));
+  } else {
     spell_ptr *newsp;
-
+    spell_ptr **spinsert = &m->spellptr;
-	m = get_mage(u);
+    while (*spinsert && (*spinsert)->spellid<spellid) spinsert=&(*spinsert)->next;
-	if (!m) {
+    newsp = *spinsert;
+    if (newsp && newsp->spellid==spellid) {
+      log_error(("add_spell: unit already has spell %d.\n", spellid));
       return;
     }
     newsp = calloc(1, sizeof(spell_ptr));
     newsp->spellid = spellid;
-
+    newsp->next = *spinsert;
-	addlist(&m->spellptr, newsp);
+    *spinsert = newsp;
+  }
   return;
 }
 
@@ -455,9 +461,9 @@ has_spell(const unit *u, const spell * sp)
 
   if (m==NULL) return false;
 
-  for (spt = m->spellptr; spt; spt = spt->next) {
+  spt = m->spellptr;
-    if (spt->spellid == sp->id) return true;
+  while (spt && spt->spellid<sp->id) spt = spt->next;
-  }
+  if (spt && spt->spellid==sp->id) return true;
   return false;
 }
 

src/common/kernel/magic.h

@@ -279,7 +279,7 @@ void set_combatspell(struct unit *u, spell *sp, struct order * ord, int level);
 	/* 	setzt Kampfzauber */
 void unset_combatspell(struct unit *u, spell *sp);
 	/* 	löscht Kampfzauber */
-void addspell(struct unit *u, spellid_t spellid);
+void add_spell(struct sc_mage *mage, spellid_t spellid);
 	/* fügt den Spruch mit der Id spellid der Spruchliste der Einheit hinzu. */
 boolean has_spell(const struct unit *u, const struct spell * sp);
 	/* prüft, ob der Spruch in der Spruchliste der Einheit steht. */

src/common/kernel/race.c

@@ -494,7 +494,7 @@ oldfamiliars(unit * familiar)
   if (m!=NULL) {
     spell_list * fspells = familiarspells(familiar->race);
     while (fspells!=NULL) {
-      addspell(familiar, fspells->data->id);
+      add_spell(m, fspells->data->id);
       fspells=fspells->next;
     }
   }

src/common/kernel/save.c

@@ -1160,7 +1160,7 @@ readunit(FILE * F)
 				csp++;
 			}
 			while ((i = ri(F)) != -1) {
-				addspell(u, (spellid_t) i);
+				add_spell(mage, (spellid_t) i);
 			}
 			mage->spellcount = 0;
 			a = a_add(&u->attribs, a_new(&at_mage));

src/common/kernel/spell.c

@@ -7219,31 +7219,31 @@ sp_destroy_curse(castorder *co)
 int
 sp_becomewyrm(castorder *co)
 {
-	unit *mage = (unit *)co->magician;
+  unit *u = (unit *)co->magician;
   int wyrms_already_created = 0;
   int wyrms_allowed;
   attrib *a;
 
-	wyrms_allowed = fspecial(mage->faction, FS_WYRM);
+  wyrms_allowed = fspecial(u->faction, FS_WYRM);
-	a = a_find(mage->faction->attribs, &at_wyrm);
+  a = a_find(u->faction->attribs, &at_wyrm);
   if(a) wyrms_already_created = a->data.i;
 
   if(wyrms_already_created >= wyrms_allowed) {
-		cmistake(mage, co->order, 262, MSG_MAGIC);
+    cmistake(u, co->order, 262, MSG_MAGIC);
     return 0;
   }
 
   if(!a) {
-		a_add(&mage->faction->attribs, a_new(&at_wyrm));
+    a_add(&u->faction->attribs, a_new(&at_wyrm));
     a->data.i = 1;
   } else {
     a->data.i++;
   }
 
-	mage->race = new_race[RC_WYRM];
+  u->race = new_race[RC_WYRM];
-	addspell(mage, SPL_WYRMODEM);
+  add_spell(get_mage(u), SPL_WYRMODEM);
 
-	ADDMSG(&mage->faction->msgs, msg_message("becomewyrm", "mage", mage));
+  ADDMSG(&u->faction->msgs, msg_message("becomewyrm", "u", u));
 
   return co->level;
 }

src/eressea/lua/unit.cpp

@@ -199,8 +199,9 @@ unit_addspell(unit& u, const char * name)
   while (slist!=NULL) {
     spell * sp = slist->data;
     if (strcmp(name, sp->sname)==0) {
+      struct sc_mage * mage = get_mage(&u);
       if (add) log_error(("two spells are called %s.\n", name));
-      addspell(&u, sp->id);
+      add_spell(mage, sp->id);
       add = true;
     }
     slist=slist->next;