Add lwhop() function

diff --git a/game/txt/changes/0.73p4 b/game/txt/changes/0.73p4
index b4d1714eac0550bde1fb22a04baf880f5b41b286..fc7362d2ac5c02f2daf39727f393e2261be336d1 100644 (file)
--- a/game/txt/changes/0.73p4
+++ b/game/txt/changes/0.73p4
@@ -9,6 +9,7 @@ CobraMUSH Version 0.73p4
 
   Improvements:
     * lports() [AEJ]
+    * lwhop() [AEJ]
 
   Fixes:
     * Compiler warning when RPMODE_SYS enabled [AEJ]

diff --git a/game/txt/hlp/cobra_func.hlp b/game/txt/hlp/cobra_func.hlp
index be7e0457be0e1c0084d254062550b225aa23ad43..0437fb36e018ed2467c79a7bc8cd6ffc2812b2d1 100644 (file)
--- a/game/txt/hlp/cobra_func.hlp
+++ b/game/txt/hlp/cobra_func.hlp
@@ -2267,6 +2267,7 @@ for an object named "Test", preferring a thing over other types.
   lwho()
   lwho(<viewer>)
   lwhoid(<viewer>)
+  lwhop(<viewer>)
 
   lwho() returns a list of the dbref numbers for all currently-connected
   players. When mortals use this function, the dbref numbers of DARK
@@ -2278,7 +2279,9 @@ for an object named "Test", preferring a thing over other types.
 
   lwohid() returns a list of objid's instead.
 
-See also: mwho(), xwho()
+  lwhop() returns a list of dbrefs and ports separated by colons.
+
+See also: mwho(), xwho(), lports()
 
 & MAP()
   map([<object>/]<attribute>,<list>[,<delim>][, <osep>])

diff --git a/src/bsd.c b/src/bsd.c
index 53a4f39eeee947184b3278673214db81af655437..49ea6a418c858145b913f320b6cb28456976efa5 100644 (file)
--- a/src/bsd.c
+++ b/src/bsd.c
@@ -4137,6 +4137,7 @@ FUNCTION(fun_lwho)
   int powered = !(strchr(called_as, 'M') != NULL) && Priv_Who(executor);
   int xwho = *called_as == 'X';
   int objid = strchr(called_as, 'D') != NULL;
+  int port = strchr(called_as, 'P') != NULL;
 
   first = 1;
   if(!xwho && nargs && args[0] && *args[0]) {
@@ -4190,6 +4191,9 @@ FUNCTION(fun_lwho)
       if(objid) {
        safe_chr(':', buff, bp);
        safe_integer(CreTime(d->player), buff, bp);
+      } else if (port) {
+        safe_chr(':', buff, bp);
+        safe_integer(d->descriptor, buff, bp);
       }
     }
   }

diff --git a/src/function.c b/src/function.c
index e5db4edd9b08e9f01a83d4a7d2e9b62b03fccb81..eb4d8e081d4e7c5785106215a366b813b013889d 100644 (file)
--- a/src/function.c
+++ b/src/function.c
@@ -475,6 +475,7 @@ FUNTAB flist[] = {
   {"LVTHINGS", fun_dbwalker, 1, 1, FN_REG},
   {"LWHO", fun_lwho, 0, 1, FN_REG},
   {"LWHOID", fun_lwho, 0, 1, FN_REG},
+  {"LWHOP", fun_lwho, 0, 1, FN_REG},
 #ifdef USE_MAILER
   {"MAIL", fun_mail, 0, 2, FN_REG},
   {"MAILFROM", fun_mailfrom, 1, 2, FN_REG},