Fix SF#1696437 by prohibiting not-all-alphabetic pseudo commands.

git-svn-id: file:///home/klmitch/undernet-ircu/undernet-ircu-svn/ircu2/branches/u2_10_12_branch@1805 c9e4aea6-c8fd-4c43-8297-357d70d61c8c

diff --git a/ChangeLog b/ChangeLog
index 0490238241f32c685cc27843dea6d77aeda63159..d48d09584df3c450ce26a7eb97ec3e6f9357bf65 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-05-20  Michael Poole <mdpoole@troilus.org>
+
+       * ircd/ircd_parser.y (pseudoblock): Forbid pseudo commands that
+       are not all alphabetic characters.
+
 2007-05-20  Michael Poole <mdpoole@troilus.org>
 
        * configure.in (maxcon): Check that maximum connections is

diff --git a/ircd/ircd_parser.y b/ircd/ircd_parser.y
index ccef4a76b058a36dcccfd1b4729975bb9795a770..e3dd3297ea92fdf9fe9e7af1b00ebe9515425cae 100644 (file)
--- a/ircd/ircd_parser.y
+++ b/ircd/ircd_parser.y
@@ -1090,6 +1090,8 @@ pseudoitems '}' ';'
     parse_error("Missing name in pseudo %s block", smap->command);
   else if (!smap->services)
     parse_error("Missing nick in pseudo %s block", smap->command);
+  else if (!strIsAlpha(smap->command))
+    parse_error("Pseudo command %s invalid: must all be letters", smap->command);
   else
     valid = 1;
   if (valid && register_mapping(smap))