--- deliantra/server/socket/sounds.C	2006/08/13 17:16:06	1.1
+++ deliantra/server/socket/sounds.C	2007/07/28 00:45:05	1.18
@@ -1,6 +1,24 @@
 /*
- * static char *rcsid_sound_c =
- *   "$Id: sounds.C,v 1.1 2006/08/13 17:16:06 elmex Exp $";
+ * This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
+ * 
+ * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
+ * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
+ * Copyright (©) 1992,2007 Frank Tore Johansen
+ * 
+ * Crossfire TRT 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/>.
+ * 
+ * The authors can be reached via e-mail to <crossfire@schmorp.de>
  */
 
 /* Send bug reports to Raphael Quinet (quinet@montefiore.ulg.ac.be) */
@@ -16,6 +34,8 @@
 #include <sproto.h>
 #include <sounds.h>
 
+#include <tr1/unordered_map>
+
 /**
  * Maximum distance a player may hear a sound from.
  * This is only used for new client/server sound.  If the sound source
@@ -23,52 +43,99 @@
  */
 #define MAX_SOUND_DISTANCE 10
 
-/**
- * Plays a sound for specified player only
- */
-void play_sound_player_only(player *pl, short soundnum,  sint8 x, sint8 y)
+// the hashtable
+typedef std::tr1::unordered_map
+  <
+    const char *,
+    faceidx,
+    str_hash,
+    str_equal,
+    slice_allocator< std::pair<const char *const, faceidx> >
+  > HT;
+
+static HT ht;
+
+faceidx
+sound_find (const char *str)
 {
-    char soundtype;
-    SockList sl;
+  auto (i, ht.find (str));
 
-    if (!pl->socket.sound) return;
-    /* Do some quick conversion to the sound type we want. */
-    if (soundnum>=SOUND_CAST_SPELL_0) {
-	soundtype=SOUND_SPELL;
-	soundnum -=SOUND_CAST_SPELL_0;
-    }
-    else soundtype=SOUND_NORMAL;
+  return i == ht.end ()
+    ? 0
+    : i->second;
+}
 
-    sl.buf=(unsigned char*)malloc(MAXSOCKBUF);
-    strcpy((char*)sl.buf, "sound ");
-    sl.len=strlen((char*)sl.buf);
-    SockList_AddChar(&sl, x);
-    SockList_AddChar(&sl, y);
-    SockList_AddShort(&sl, soundnum);
-    SockList_AddChar(&sl, soundtype);
-    Send_With_Handling(&pl->socket, &sl);
-    free(sl.buf);
+void
+sound_set (const char *str, faceidx face)
+{
+  auto (i, ht.find (str));
+
+  if (i != ht.end ())
+    i->second = face;
+  else
+    ht.insert (std::make_pair (strdup (str), face));
 }
 
-#define POW2(x) ((x) * (x))
+//TODO: remove
+// for gcfclient-compatibility, to vanish at some point
+faceidx old_sound_index [SOUND_CAST_SPELL_0];
 
-/** Plays some sound on map at x,y.  */
-void play_sound_map(mapstruct *map, int x, int y, short sound_num)
+/*
+ * Plays a sound for specified player only
+ */
+void
+client::play_sound (faceidx sound, int dx, int dy)
 {
-    player *pl;
+  if (!sound)
+    return;
+
+  if (fx_want [FT_SOUND])
+    {
+      // cfplus
+      send_face (sound);
+      flush_fx ();
+
+      sint8 vol = idistance (dx, dy) * -80 / 10;
+
+      // cut off volume here
+      if (vol < -80)
+        return;
+
+      packet sl ("sc");
 
-    if (sound_num >= NROF_SOUNDS) {
-	LOG(llevError,"Tried to play an invalid sound num: %d\n", sound_num);
-	return;
+      uint8 *len = sl.cur;
+
+      sl << uint8 (0) // group length
+         << uint8 (0) // type == one-time effect
+         << ber32 (sound)
+         << sint8 (dx)
+         << sint8 (dy)
+         << sint8 (vol); // -128 == silent, 0 normal, 127 twice the amplitude
+
+      *len = sl.cur - len; // patch in group length
+
+      send_packet (sl);
     }
+  else if (this->sound)
+    {
+      //TODO: remove, or make bearable
+      // gcfclient compatibility
+
+      int gcfclient_sound;
+      for (gcfclient_sound = SOUND_CAST_SPELL_0; gcfclient_sound--; )
+        if (old_sound_index [gcfclient_sound] == sound)
+          {
+            packet sl ("sound");
+
+            sl << uint8  (dx)
+               << uint8  (dy)
+               << uint16 (gcfclient_sound)
+               << uint8  (SOUND_NORMAL);
 
-    for (pl = first_player; pl; pl = pl->next) {
-	if (pl->ob->map == map) {
-	    int distance=isqrt(POW2(pl->ob->x - x) + POW2(pl->ob->y - y));
-
-	    if (distance<=MAX_SOUND_DISTANCE) {
-		play_sound_player_only(pl, sound_num, ( sint8 )( x-pl->ob->x ), ( sint8 )( y-pl->ob->y ));
-	    }
-	}
+            send_packet (sl);
+
+            break;
+          }
     }
 }
+