]> jfr.im git - irc/quakenet/snircd-patchqueue.git/blobdiff - welcome.patch
Remove topic_reveal.patch. This has been fixed in IRCU and ircu patch is correct...
[irc/quakenet/snircd-patchqueue.git] / welcome.patch
index 705d37912b9bc44b4c18ab0ea6cad7ffd4bf69d9..f665b4d4575c98e1cfb2e9cba11f3a685b805b2e 100644 (file)
@@ -1,7 +1,161 @@
-diff -r a662d02e9a76 include/handlers.h
---- a/include/handlers.h       Sat Jan 24 21:39:56 2009 +0100
-+++ b/include/handlers.h       Sat Jan 24 22:38:10 2009 +0100
-@@ -151,6 +151,7 @@
+Add welcome message functionality.
+
+To inform our users about events we currently have 3 means at our disposal.
+
+Outside of IRC like our website and other external/3rd party means such as facebook/twitter/whatever.
+I never visit the website, and I cannot imagine many people do just so they wont miss that lonely newspost every couple of months.
+(If it were an RSS newsfeed, then maybe it would reach more people..., but that's a different topic altogether.)
+
+Within the IRC world there are two ways to mass relay information to users.
+
+The first is the MOTD (Message of the Day).
+This is a misleading name, it simply is a text file played to connecting clients, and in practice never changes
+(our MOTDs display outdated information, and done so for years..., but again, that's a different topic altogether).
+The MOTD cannot be altered from IRC, so it cannot be used to inform users about upcoming events or news.
+
+The second are message on IRC sent to many recipients,
+broadcasts to all users on the network/server/country/host,
+and WALLUSERS to all users with mode +w set.
+They are not suitable to inform users about upcoming events or news:
+
+They only reach users which are connected at that time, and not everyone is connected to IRC all the time.
+Doing a broadcast one time a few days in advance and again a few minutes in advance, simply does not reach all of our users.
+Doing multiple broadcasts to make up of this, is annoying for users
+(as seen in the past when several broadcasts were made for a tutorial session) and thus not an option.
+
+Broadcasts are rather intrusive, and sending many of them probably wont be appreciated,
+leading to people adding the service(s) to ignore or filtering them.
+
+WALLUSERS is only received by a very small portion of our userbase, 1 to 2% of users on the network have set mode +w.
+We could make +w a default usermode (opt-out instead of opt-in), but we are left with the same problem as with broadcasts.
+
+
+We need a way to be able to announce news to all users,
+in a timely manner straight from IRC (so not the website, not the MOTD),
+in a non-intrusive way with a message on connect, and when people want to see it by command (so not broadcasts or wallusers).
+
+This is where WELCOME comes in.
+Messages set on IRC.
+Messages set per server (mostly for maintenance) or global (for news/pr/and such).
+Messages announced to connecting clients, and shown when users use /welcome.
+
+
+Why not use a service for this?
+Implemented in the IRCd it only uses local traffic, that is from server to client,
+instead of traffic over server links from service to server, and then server to client.
+Implemented in the IRCd it is not affected by netsplits as it would when done by a service.
+
+
+(But even if this patch is accepted, it will not be on quakenet any time soon.
+So it may still be worth it to create service for this in the mean time.)
+
+
+
+
+
+client commands:
+user:
+/WELCOME [<server>]
+shows welcome messages set, same is shown on connect
+feature HIS_REMOTE controls whether ordinary users can request a listing from a remote server
+
+operator:
+/WELCOME [<server>] [[$][!][+|-]<N> :<message>]
+to view welcome messages from a remote server
+to set a local welcome message on this server or a remote server
+set a global welcome message (server *)
+the $ prefix makes the server annouce the welcome message to its clients when setting
+the ! prefix forces the change, bypassing lastmod checks
+the + prefix moves message in N and all after that one spot down, and inserts the new message
+in spot N, if there is no room, the last entry is deleted
+the - prefix is used when an entry is cleared (no text), then all entries after it are moved on place up, so all empty
+spots are at the end (this prefix is always used when an oper clears the text)
+
+server:
+:<source> WE <target> [[$][!][+|-]<N> <timestamp> <lastmod> <who> :<text>]
+who is who set the message, the server puts in the opername when a client sets it.
+:<N> is a number 1 to WELCOME_MAX_ENTRIES - currently set at 10 (should be more than we ever need)
+that means there is room for 10 local and 10 global entries
+
+STATS W/welcome (/STATS w/userload made case sensitive)
+:server 227 nick W # Target Who Timestamp LastMod :Text
+:server 227 nick W 1 * opername 1233072583 1233072583 :Latest news: testing this welcome patch :)
+:server 227 nick W 2 * opername 1233072583 1233072583 :
+:server 227 nick W 1 servername opername 1233072590 1233072590 :This is a test server, expect restarts.
+:server 219 nick W :End of /STATS report
+
+listing welcomes or on connect:
+:server NOTICE nick :[QuakeNet] Latest news: testing this welcome patch :)
+:server NOTICE nick :[server] This is a test server, expect restarts.
+
+announcement is done by a notice by the local server to $* ($servername for local) with the same message
+format as for listing welcome messages.
+:server NOTICE $* :[QuakeNet] Latest news: testing this welcome patch :)
+:server NOTICE $server :[server] This is a test server, expect restarts.
+
+
+
+Files:
+
+include/handlers.h
+add m_welcome mo_welcome ms_welcome functions
+
+include/features.h
+ircd/features.c
+add features FEAT_WELCOME and FEAT_HIS_STATS_W
+
+include/msg.h
+add MSG_WELCOME TOK_WELCOME CMD_WELCOME
+
+ircd/parse.c
+add welcome message functions
+
+include/numeric.h
+ircd/s_err.c
+add RPL_STATSWELCOME ERR_NOSUCHWELCOME
+
+include/welcome.h
+ircd/welcome.c
+ircd/m_welcome.c
+new
+
+ircd/Makefile.in
+add welcome.c and m_welcome.c files
+
+ircd/s_serv.c
+add burst welcome message
+
+ircd/s_stats.c
+add /STATS W/welcome
+
+ircd/s_user.c
+add showing of welcome messages on connect
+
+ircd/s_debug.c
+add count and memusage of welcome messages
+
+include/client.h
+ircd/client.c
+ircd/ircd_lexer.l
+ircd/ircd_parser.y
+add PRIV_LOCAL_WELCOME PRIV_WELCOME
+
+diff -r 530975e1fd87 include/client.h
+--- a/include/client.h Sat Jul 20 15:39:54 2013 +0100
++++ b/include/client.h Sat Jul 20 15:40:27 2013 +0100
+@@ -142,6 +142,8 @@
+     PRIV_USER_PRIVACY,  /* oper can bypass user privacy +x etc gives i.e. see real ip's */
+     PRIV_CHANNEL_PRIVACY, /* oper can bypass channel privacy i.e. can see modes on channels they are not on and channel keys */
+     PRIV_SERVERINFO,     /* oper can use /get, /stats, /hash, retrieve remote information */
++    PRIV_WELCOME,        /* oper can WELCOME */
++    PRIV_LOCAL_WELCOME,  /* oper can local WELCOME */
+     PRIV_LAST_PRIV /**< number of privileges */
+   };
+diff -r 530975e1fd87 include/handlers.h
+--- a/include/handlers.h       Sat Jul 20 15:39:54 2013 +0100
++++ b/include/handlers.h       Sat Jul 20 15:40:27 2013 +0100
+@@ -139,6 +139,7 @@
  extern int m_version(struct Client*, struct Client*, int, char*[]);
  extern int m_wallchops(struct Client*, struct Client*, int, char*[]);
  extern int m_wallvoices(struct Client*, struct Client*, int, char*[]);
@@ -9,40 +163,79 @@ diff -r a662d02e9a76 include/handlers.h
  extern int m_who(struct Client*, struct Client*, int, char*[]);
  extern int m_whois(struct Client*, struct Client*, int, char*[]);
  extern int m_whowas(struct Client*, struct Client*, int, char*[]);
-@@ -185,6 +186,7 @@
+@@ -173,6 +174,7 @@
  extern int mo_version(struct Client*, struct Client*, int, char*[]);
  extern int mo_wallops(struct Client*, struct Client*, int, char*[]);
  extern int mo_wallusers(struct Client*, struct Client*, int, char*[]);
 +extern int mo_welcome(struct Client*, struct Client*, int, char*[]);
+ extern int mo_xquery(struct Client*, struct Client*, int, char*[]);
  extern int mr_error(struct Client*, struct Client*, int, char*[]);
  extern int mr_error(struct Client*, struct Client*, int, char*[]);
- extern int mr_pong(struct Client*, struct Client*, int, char*[]);
-@@ -242,6 +244,7 @@
+@@ -232,6 +234,7 @@
  extern int ms_wallops(struct Client*, struct Client*, int, char*[]);
  extern int ms_wallusers(struct Client*, struct Client*, int, char*[]);
  extern int ms_wallvoices(struct Client*, struct Client*, int, char*[]);
 +extern int ms_welcome(struct Client*, struct Client*, int, char*[]);
  extern int ms_whois(struct Client*, struct Client*, int, char*[]);
+ extern int ms_xquery(struct Client*, struct Client*, int, char*[]);
+ extern int ms_xreply(struct Client*, struct Client*, int, char*[]);
+diff -r 530975e1fd87 include/ircd_features.h
+--- a/include/ircd_features.h  Sat Jul 20 15:39:54 2013 +0100
++++ b/include/ircd_features.h  Sat Jul 20 15:40:27 2013 +0100
+@@ -101,6 +101,7 @@
+   FEAT_IRCD_RES_TIMEOUT,
+   FEAT_AUTH_TIMEOUT,
+   FEAT_ANNOUNCE_INVITES,
++  FEAT_WELCOME,
  
- #endif /* INCLUDED_handlers_h */
-diff -r a662d02e9a76 include/msg.h
---- a/include/msg.h    Sat Jan 24 21:39:56 2009 +0100
-+++ b/include/msg.h    Sat Jan 24 22:38:10 2009 +0100
-@@ -195,6 +195,10 @@
- #define MSG_NOTICE              "NOTICE"        /* NOTI */
+   /* features that affect all operators */
+   FEAT_EXTENDED_CHECKCMD,
+@@ -142,6 +143,7 @@
+   FEAT_HIS_STATS_u,
+   FEAT_HIS_STATS_U,
+   FEAT_HIS_STATS_v,
++  FEAT_HIS_STATS_W,
+   FEAT_HIS_STATS_w,
+   FEAT_HIS_STATS_x,
+   FEAT_HIS_STATS_y,
+diff -r 530975e1fd87 include/msg.h
+--- a/include/msg.h    Sat Jul 20 15:39:54 2013 +0100
++++ b/include/msg.h    Sat Jul 20 15:40:27 2013 +0100
+@@ -201,6 +201,10 @@
  #define TOK_NOTICE              "O"
  #define CMD_NOTICE            MSG_NOTICE, TOK_NOTICE
-+
 +#define MSG_WELCOME             "WELCOME"       /* WELC */
 +#define TOK_WELCOME             "WE"
 +#define CMD_WELCOME           MSG_WELCOME, TOK_WELCOME
++
  #define MSG_WALLCHOPS           "WALLCHOPS"     /* WC */
  #define TOK_WALLCHOPS           "WC"
-diff -r a662d02e9a76 include/welcome.h
+ #define CMD_WALLCHOPS         MSG_WALLCHOPS, TOK_WALLCHOPS
+diff -r 530975e1fd87 include/numeric.h
+--- a/include/numeric.h        Sat Jul 20 15:39:54 2013 +0100
++++ b/include/numeric.h        Sat Jul 20 15:40:27 2013 +0100
+@@ -116,6 +116,7 @@
+       RPL_STATSGLINE       227           Dalnet 
+       RPL_STATSVLINE       227           unreal */
+ #define RPL_STATSALINE       226        /* Hybrid, Undernet */
++#define RPL_STATSWELCOME     227        /* QuakeNet extension */
+ #define RPL_STATSQLINE       228        /* Undernet extension */
+ /*      RPL_SERVICEINFO      231      unused */
+@@ -440,6 +441,8 @@
+ /*      ERR_GHOSTEDCLIENT    503           efnet */
+ /*    ERR_VWORLDWARN       503           austnet */
++#define ERR_NOSUCHWELCOME    509        /* QuakeNet extension */
++
+ #define ERR_SILELISTFULL     511        /* Undernet extension */
+ /*      ERR_NOTIFYFULL       512           aircd */
+ /*    ERR_TOOMANYWATCH     512           Numeric List: Dalnet */
+diff -r 530975e1fd87 include/welcome.h
 --- /dev/null  Thu Jan 01 00:00:00 1970 +0000
-+++ b/include/welcome.h        Sat Jan 24 22:38:10 2009 +0100
-@@ -0,0 +1,43 @@
++++ b/include/welcome.h        Sat Jul 20 15:40:27 2013 +0100
+@@ -0,0 +1,86 @@
 +#ifndef INCLUDED_welcome_h
 +#define INCLUDED_welcome_h
 +/*
@@ -66,31 +259,197 @@ diff -r a662d02e9a76 include/welcome.h
 + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 + */
 +/** @file
-+ * @brief  Interface and declarations for welcome server handling.
-+ * @version $Id: jupe.h 1208 2004-10-03 14:12:35Z entrope $
++ * @brief  Interface and declarations for welcome message handling.
 + */
-+#ifndef INCLUDED_sys_types_h
-+#include <sys/types.h>
-+#define INCLUDED_sys_types_h
-+#endif
 +
-+
-+
-+
-+
-+extern int welcome_set(struct Client *cptr, struct Client *sptr,
-+  char *reason, time_t lastmod);
++struct Client;
++struct StatDesc;
++
++/* Maximum number of welcome entries (per type; X global, X local) */
++#define WELCOME_MAX_ENTRIES  10
++/* Maximum length of a welcome message
++ *   the maximum value for this is 300
++ *   when set larger, this could lead to truncation when announcing
++ *     ":server.name NOTICE $server.name :[server.name] text"
++ *     510 - (1+63+1+6+1+1+63+1+1+1+63+1+1) = 306 for text
++ *   max length of a servername is 63 HOSTLEN
++ */
++#define WELCOMELEN 300
++
++
++/* Test if a welcome entry is in a valid range */
++#define WelcomeArrayIsValid(x)   ((unsigned) (x) <= 2 * WELCOME_MAX_ENTRIES -1)
++/* Test if a welcome name is in a valid range */
++#define WelcomeNameIsValid(x)    ((unsigned) (x) <= WELCOME_MAX_ENTRIES)
++/* Test if a welcome entry is set */
++#define WelcomeIsSet(x)          (WelcomeArray[(x)].lastmod > 0)
++/* Test if a welcome entry is empty */
++#define WelcomeIsEmpty(x)        (*WelcomeArray[(x)].text == 0)
++
++/* Get welcome create timestamp */
++#define WelcomeCreate(x)         (WelcomeArray[(x)].create)
++/* Get welcome lastmod timestamp */
++#define WelcomeLastMod(x)        (WelcomeArray[(x)].lastmod)
++/* Get welcome who info */
++#define WelcomeWho(x)            (WelcomeArray[(x)].who)
++/* Get welcome text */
++#define WelcomeText(x)           (WelcomeArray[(x)].text)
++
++
++/* Describes a Welcome message entry. */
++struct Welcome {
++  time_t             create;               /**< When it was set */
++  time_t             lastmod;              /**< Last modification timestamp (used for resolving conflicts in burst) */
++  char               text[WELCOMELEN + 1]; /**< Message */
++  char               who[ACCOUNTLEN + 1];  /**< Who set it */
++};
++
++/** Welcome type flags */
++#define WELCOME_LOCAL      0x01 /**< welcome is local */
++/** Welcome action flags */
++#define WELCOME_ANNOUNCE   0x02 /**< announce new welcome to users */
++#define WELCOME_UNSET      0x04 /**< unset welcome */
++#define WELCOME_INSERT     0x08 /**< insert welcome message, move down all others one place */
++#define WELCOME_DELETE     0x10 /**< delete welcome message, move up all others one place */
++#define WELCOME_INCLASTMOD 0x20 /**< increase lastmod if needed */
++#define WELCOME_FORCE      0x40 /**< force change, bypass lastmod check */
++
++extern int welcome_do(struct Client *cptr, struct Client *sptr, char *name,
++  time_t create, time_t lastmod, char *who, char *text, unsigned int flags);
 +extern void welcome_burst(struct Client *cptr);
-+extern int welcome_resend(struct Client *cptr);
-+extern int welcome_list(struct Client *sptr);
-+extern int welcome_memory_count(size_t *ju_size);
++extern int welcome_list(struct Client *sptr, int connect);
++extern void welcome_stats(struct Client *sptr, const struct StatDesc *sd, char *param);
++extern int welcome_memory_count(size_t *we_size);
 +
 +#endif /* INCLUDED_welcome_h */
-\ No newline at end of file
-diff -r a662d02e9a76 ircd/m_welcome.c
+diff -r 530975e1fd87 ircd/Makefile.in
+--- a/ircd/Makefile.in Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/Makefile.in Sat Jul 20 15:40:27 2013 +0100
+@@ -188,6 +188,7 @@
+       m_wallusers.c \
+       m_wallvoices.c \
+       m_webirc.c \
++        m_welcome.c \
+       m_who.c \
+       m_whois.c \
+       m_whowas.c \
+@@ -217,6 +218,7 @@
+       send.c \
+       uping.c \
+       userload.c \
++      welcome.c \
+       whocmds.c \
+       whowas.c \
+       y.tab.c
+@@ -1163,6 +1165,11 @@
+   ../include/ircd_reply.h ../include/ircd_string.h \
+   ../include/ircd_chattr.h ../include/msg.h ../include/numeric.h \
+   ../include/numnicks.h ../include/s_user.h ../include/send.h
++m_welcome.o: m_welcome.c ../config.h ../include/channel.h \
++  ../include/client.h ../include/hash.h ../include/ircd.h ../include/ircd_log.h \
++  ../include/ircd_reply.h ../include/ircd_string.h ../include/msg.h \
++  ../include/numeric.h ../include/numnicks.h ../include/s_user.h \
++  ../include/send.h ../include/welcome.h
+ m_who.o: m_who.c ../config.h ../include/channel.h ../include/ircd_defs.h \
+   ../include/res.h ../config.h ../include/client.h ../include/dbuf.h \
+   ../include/msgq.h ../include/ircd_events.h ../include/ircd_handler.h \
+@@ -1424,6 +1431,13 @@
+   ../include/numnicks.h ../include/querycmds.h ../include/ircd_features.h \
+   ../include/s_misc.h ../include/s_stats.h ../include/send.h \
+   ../include/struct.h ../include/sys.h
++welcome.o: welcome.c ../config.h ../include/client.h \
++  ../include/hash.h ../include/ircd.h ../include/ircd_alloc.h \
++  ../include/ircd_features.h ../include/ircd_log.h ../include/ircd_reply.h \
++  ../include/match.h ../include/msg.h ../include/numeric.h \
++  ../include/numnicks.h ../include/s_debug.h ../include/s_bsd.h \
++  ../include/s_misc.h ../include/send.h ../include/struct.h \
++  ../include/sys.h ../include/welcome.h
+ whocmds.o: whocmds.c ../config.h ../include/whocmds.h \
+   ../include/channel.h ../include/ircd_defs.h ../include/res.h \
+   ../config.h ../include/client.h ../include/dbuf.h ../include/msgq.h \
+diff -r 530975e1fd87 ircd/client.c
+--- a/ircd/client.c    Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/client.c    Sat Jul 20 15:40:27 2013 +0100
+@@ -177,6 +177,7 @@
+     FlagSet(&privs_local, PRIV_WHOX);
+     FlagSet(&privs_local, PRIV_DISPLAY);
+     FlagSet(&privs_local, PRIV_FORCE_LOCAL_OPMODE);
++    FlagSet(&privs_local, PRIV_LOCAL_WELCOME);
+     privs_defaults_set = 1;
+   }
+@@ -223,6 +224,7 @@
+     ClrPriv(client, PRIV_JUPE);
+     ClrPriv(client, PRIV_OPMODE);
+     ClrPriv(client, PRIV_BADCHAN);
++    ClrPriv(client, PRIV_WELCOME);
+   }
+ }
+@@ -244,7 +246,7 @@
+   P(CHANSERV),       P(XTRA_OPER),      P(NOIDLE),        P(FREEFORM),
+   P(PARANOID),       P(CHECK),          P(WALL),          P(CLOSE),
+   P(ROUTE),          P(ROUTEINFO),      P(SERVERINFO),    P(CHANNEL_PRIVACY),
+-  P(USER_PRIVACY),
++  P(USER_PRIVACY),   P(WELCOME),        P(LOCAL_WELCOME),
+ #undef P
+   { 0, 0 }
+ };
+diff -r 530975e1fd87 ircd/ircd_features.c
+--- a/ircd/ircd_features.c     Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/ircd_features.c     Sat Jul 20 15:40:27 2013 +0100
+@@ -366,6 +366,7 @@
+   F_I(IRCD_RES_TIMEOUT, 0, 4, 0),
+   F_I(AUTH_TIMEOUT, 0, 9, 0),
+   F_B(ANNOUNCE_INVITES, 0, 0, 0),
++  F_B(WELCOME, 0, 1, 0),
+   /* features that affect all operators */
+   F_B(EXTENDED_CHECKCMD, 0, 0, 0),
+@@ -407,6 +408,7 @@
+   F_B(HIS_STATS_u, 0, 1, 0),
+   F_B(HIS_STATS_U, 0, 1, 0),
+   F_B(HIS_STATS_v, 0, 1, 0),
++  F_B(HIS_STATS_W, 0, 1, 0),
+   F_B(HIS_STATS_w, 0, 1, 0),
+   F_B(HIS_STATS_x, 0, 1, 0),
+   F_B(HIS_STATS_y, 0, 1, 0),
+diff -r 530975e1fd87 ircd/ircd_lexer.l
+--- a/ircd/ircd_lexer.l        Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/ircd_lexer.l        Sat Jul 20 15:40:27 2013 +0100
+@@ -166,6 +166,8 @@
+   { "serverinfo", TPRIV_SERVERINFO },
+   { "user_privacy", TPRIV_USER_PRIVACY },
+   { "channel_privacy", TPRIV_CHANNEL_PRIVACY },
++  { "local_welcome", TPRIV_LOCAL_WELCOME },
++  { "welcome", TPRIV_WELCOME },
+   { NULL, 0 }
+ };
+ static int ntokens;
+diff -r 530975e1fd87 ircd/ircd_parser.y
+--- a/ircd/ircd_parser.y       Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/ircd_parser.y       Sat Jul 20 15:40:27 2013 +0100
+@@ -189,6 +189,7 @@
+ %token TPRIV_CHANSERV TPRIV_XTRA_OPER TPRIV_NOIDLE TPRIV_FREEFORM TPRIV_PARANOID
+ %token TPRIV_CHECK TPRIV_WALL TPRIV_CLOSE TPRIV_ROUTE TPRIV_ROUTEINFO TPRIV_SERVERINFO
+ %token TPRIV_CHANNEL_PRIVACY TPRIV_USER_PRIVACY TPRIV_LIST_CHAN 
++%token TPRIV_LOCAL_WELCOME TPRIV_WELCOME
+ /* and some types... */
+ %type <num> sizespec
+ %type <num> timespec timefactor factoredtimes factoredtime
+@@ -703,6 +704,8 @@
+           TPRIV_SERVERINFO { $$ = PRIV_SERVERINFO ; } |
+           TPRIV_CHANNEL_PRIVACY { $$ = PRIV_CHANNEL_PRIVACY ; } |
+           TPRIV_USER_PRIVACY { $$ = PRIV_USER_PRIVACY ; } |
++          TPRIV_LOCAL_WELCOME { $$ = PRIV_LOCAL_WELCOME; } |
++          TPRIV_WELCOME { $$ = PRIV_WELCOME; } |
+           TPRIV_PARANOID { $$ = PRIV_PARANOID; } ;
+ yesorno: YES { $$ = 1; } | NO { $$ = 0; };
+diff -r 530975e1fd87 ircd/m_welcome.c
 --- /dev/null  Thu Jan 01 00:00:00 1970 +0000
-+++ b/ircd/m_welcome.c Sat Jan 24 22:38:10 2009 +0100
-@@ -0,0 +1,142 @@
++++ b/ircd/m_welcome.c Sat Jul 20 15:40:27 2013 +0100
+@@ -0,0 +1,360 @@
 +/*
 + * IRC - Internet Relay Chat, ircd/m_welcome.c
 + * Copyright (C) 1990 Jarkko Oikarinen and
@@ -113,7 +472,6 @@ diff -r a662d02e9a76 ircd/m_welcome.c
 + * along with this program; if not, write to the Free Software
 + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 + *
-+ * $Id: m_welcome.c 1903 2009-01-13 03:54:45Z entrope $
 + */
 +
 +/*
@@ -172,73 +530,292 @@ diff -r a662d02e9a76 ircd/m_welcome.c
 + *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
 + *                    non-NULL pointers.
 + */
-+#include "config.h"
 +
-+#include "channel.h"
 +#include "client.h"
-+#include "hash.h"
 +#include "ircd.h"
-+#include "ircd_log.h"
-+#include "ircd_reply.h"
-+#include "ircd_string.h"
++#include "ircd_features.h"
 +#include "msg.h"
 +#include "numeric.h"
-+#include "numnicks.h"
 +#include "s_user.h"
-+#include "send.h"
++#include "welcome.h"
 +
-+/* #include <assert.h> -- Now using assert in ircd_log.h */
 +
 +/*
 + * m_welcome - local generic message handler
 + *
-+ * parv[0] = Send prefix
++ *
++ * WELCOME
++ *
++ * listing:
++ *   parv[0] = Send prefix
++ *
++ *
++ * WELCOME [<server>]
++ *
++ * remote listing:
++ *   parv[0] = Send prefix
++ *   parv[1] = Target
++ *
 + */
 +int m_welcome(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 +{
-+  return 0;
++  /* feature disabled */
++  if (!feature_bool(FEAT_WELCOME))
++    return send_reply(sptr, ERR_DISABLED, "WELCOME");
++
++  /* only opers can set the welcome messages */
++  if (parc > 2)
++    return send_reply(sptr, ERR_NOPRIVILEGES);
++
++  /* remote listing request, see if it is for me or a remote server
++   *  check FEAT_HIS_REMOTE to decide if an ordinary user can do this
++   */
++  if ((parc > 1) && (hunt_server_cmd(sptr, CMD_WELCOME, cptr, feature_int(FEAT_HIS_REMOTE),
++        "%C", 1, parc, parv) != HUNTED_ISME))
++    return 0;
++
++  /* local listing */
++  return welcome_list(sptr, 0);
 +}
 +
 +
 +/*
 + * mo_welcome - oper message handler
 + *
++ *
++ * WELCOME
++ *
 + * listing:
-+ * parv[0] = Send prefix
++ *   parv[0] = Send prefix
++ *
++ *
++ * WELCOME <server>
 + *
 + * remote listing:
-+ * parv[0] = Send prefix
-+ * parv[1] = Target
++ *   parv[0] = Send prefix
++ *   parv[1] = Target
++ *
++ *
++ * WELCOME <server> <name> :<text>
 + *
 + * set global or on remote server:
-+ * parv[0] = Send prefix
-+ * parv[1] = Target: server or * for global
-+ * parv[2] = Text
++ *   parv[0] = Send prefix
++ *   parv[1] = Target: server or * for global (or left out for this server)
++ *   parv[2] = Name
++ *   parv[parc - 1] = Text
++ *
 + */
 +int mo_welcome(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 +{
-+  return 0;
++  char *target, *name, *who, *text, pattern[BUFSIZE];
++  time_t create, lastmod;
++  unsigned int flags = 0;
++  int local = 0;
++
++  /* feature disabled */
++  if (!feature_bool(FEAT_WELCOME))
++    return send_reply(sptr, ERR_DISABLED, "WELCOME");
++
++  /* TODO: move feature check here? */
++  /* remote listing request, see if it is for me or a remote server */
++  if ((parc == 2) && (hunt_server_cmd(sptr, CMD_WELCOME, cptr, 0, "%C", 1, parc, parv) != HUNTED_ISME))
++    return 0;
++
++  /* local listing */
++  if (parc <= 2)
++    return welcome_list(sptr, 0);
++
++  /* check PRIVS */
++  /* local - need PRIV LOCAL_WELCOME or WELCOME */
++  if (parc == 3 && !HasPriv(sptr,PRIV_LOCAL_WELCOME) && !HasPriv(sptr,PRIV_WELCOME))
++    return send_reply(sptr, ERR_NOPRIVILEGES);
++
++  /* global or remote - need PRIV WELCOME */
++  if (parc >= 4 && !HasPriv(sptr,PRIV_WELCOME))
++    return send_reply(sptr, ERR_NOPRIVILEGES);
++
++  /* set the parameters */
++
++  /* target not given, only name - setting local welcome */
++  if (parc < 4) {
++    local++;
++    target = cli_name(&me);
++    name = parv[1];
++    flags |= WELCOME_LOCAL;
++
++  /* target and name given */
++  } else {
++    target = parv[1];
++    name = parv[2];
++  }
++  create = TStime();
++  lastmod = TStime();
++  who = cli_user(sptr)->opername;
++  text = parv[parc - 1];
++
++  /* target is not global */
++  if (!(target[0] == '*' && target[1] == '\0') && !local) {
++
++    /* build a pattern for hunt_server_cmd since we do not have all we need in parv */
++    ircd_snprintf(0, pattern, sizeof(pattern), "%s %s %Tu %Tu %s :%s", "%C", name, create, lastmod, who, text);
++    if (hunt_server_cmd(sptr, CMD_WELCOME, cptr, 0, pattern, 1, 2, parv) != HUNTED_ISME)
++      return 0;
++
++   /* else it is a local welcome, for me */
++    flags |= WELCOME_LOCAL; 
++  }
++
++  /* check for anounce prefix */
++  if (*name == '$') {
++     name++;
++     /* only allow announce by oper for local welcome */
++     if (flags & WELCOME_LOCAL)
++       flags |= WELCOME_ANNOUNCE;
++  }
++
++  /* check for force prefix */
++  if (*name == '!') {
++     name++;
++     flags |= WELCOME_FORCE;
++  }
++
++  /* check for insert prefix */
++  if (*name == '+') {
++     name++;
++     flags |= WELCOME_INSERT;
++  }
++
++  /* check for delete prefix */
++  else if (*name == '-') {
++     name++;
++     flags |= WELCOME_DELETE;
++  }
++
++  /* empty text, set unset and delete flag */
++  if (*text == 0) {
++    flags |= WELCOME_UNSET;
++    flags |= WELCOME_DELETE;
++  }
++
++  /* and do it */
++  return welcome_do(cptr, sptr, name, create, lastmod, who, text, flags);
 +}
 +
 +
 +/*
 + * ms_welcome - server message handler
 + *
-+ * parv[0] = Send prefix
-+ * parv[1] = Target: server numeric or * for global
-+ * parv[2] = Timestamp
-+ * parv[3] = Text
++ *
++ * <source> WE <target>
++ *
++ * remote listing:
++ *   parv[0] = Send prefix
++ *   parv[1] = Target: server numeric or * for global
++ *
++ *
++ * <source> WE <target> <name> <create> <lastmod> <who> :<text>
++ *
++ * set global or on remote server:
++ *   parv[0] = Send prefix
++ *   parv[1] = Target: server numeric or * for global
++ *   parv[2] = Name
++ *   parv[3] = Create
++ *   parv[4] = LastMod
++ *   parv[5] = Who
++ *   parv[parc - 1] = Text
++ *
 + */
 +int ms_welcome(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 +{
-+  return 0;
++  char *target, *name, *who, *text;
++  time_t create, lastmod;
++  unsigned int flags = 0;
++  
++  /* not enough - complain */
++  if (parc < 2) {
++    protocol_violation(cptr, "Received too few parameters for WELCOME from %C (got %d - need 2)", sptr, parc);
++    return need_more_params(sptr, "WELCOME");
++  }
++
++  /* remote listing request, see if it is for me or a remote server */
++  if (parc == 2) {
++    if (IsServer(sptr))
++      return protocol_violation(cptr, "Received WELCOME listing request from server %C", sptr);
++    if (hunt_server_cmd(sptr, CMD_WELCOME, cptr, 0, "%C", 1, parc, parv) != HUNTED_ISME)
++      return 0;
++    return welcome_list(sptr, 0);
++  }
++
++  /* we need at least 7 parameters to continue - complain */  
++  if (parc < 7) {
++    protocol_violation(cptr, "Received too few parameters for WELCOME from %C (got %d - need 7)", sptr, parc);
++    return need_more_params(sptr, "WELCOME");
++  }
++
++  /* set the parameters */
++  target = parv[1];
++  name = parv[2];
++  create = atoi(parv[3]);
++  lastmod = atoi(parv[4]);
++  who = parv[5];
++  text = parv[parc - 1]; /* parse reason as last parameter */
++
++  /* check if create is valid - create is 0 but parv[3] is not */
++  if (create == 0 && !(parv[3][0] == '0' && parv[3][1] == '\0'))
++    return protocol_violation(cptr, "Received WELCOME with invalid create timestamp %s from %C", parv[3], sptr);
++
++  /* check if lastmod is valid - lastmod is 0 but parv[4] is not */
++  if (lastmod == 0 && !(parv[4][0] == '0' && parv[4][1] == '\0'))
++    return protocol_violation(cptr, "Received WELCOME with invalid lastmod timestamp %s from %C", parv[4], sptr);
++
++  /* target is not global */
++  if (!(target[0] == '*' && target[1] == '\0')) {
++
++    /* not for me, and forward it */
++    if (hunt_server_cmd(sptr, CMD_WELCOME, cptr, 0, "%C %s %s %s %s :%s", 1, parc, parv) != HUNTED_ISME)
++      return 0;
++
++    /* local welcome for me */
++    flags |= WELCOME_LOCAL; 
++  }
++
++  /* check for anounce prefix */
++  if (*name == '$') {
++     name++;
++     flags |= WELCOME_ANNOUNCE;
++  }
++
++  /* check for force prefix */
++  if (*name == '!') {
++     name++;
++     flags |= WELCOME_FORCE;
++  }
++
++  /* check for insert prefix */
++  if (*name == '+') {
++     name++;
++     flags |= WELCOME_INSERT;
++  }
++
++  /* check for delete prefix */
++  else if (*name == '-') {
++     name++;
++     flags |= WELCOME_DELETE;
++  }
++
++  /* empty text, set unset flag */
++  if (*text == 0)
++    flags |= WELCOME_UNSET;
++
++  /* and do it */
++  return welcome_do(cptr, sptr, name, create, lastmod, who, text, flags);
 +}
-diff -r a662d02e9a76 ircd/parse.c
---- a/ircd/parse.c     Sat Jan 24 21:39:56 2009 +0100
-+++ b/ircd/parse.c     Sat Jan 24 22:38:10 2009 +0100
-@@ -668,6 +668,15 @@
+diff -r 530975e1fd87 ircd/parse.c
+--- a/ircd/parse.c     Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/parse.c     Sat Jul 20 15:40:27 2013 +0100
+@@ -675,6 +675,15 @@
      /* UNREG, CLIENT, SERVER, OPER, SERVICE */
-     { m_unregistered, m_not_oper, ms_opkick, mo_opkick, m_ignore }
+     { m_unregistered, m_not_oper, ms_check, mo_check, m_ignore }
    },
 +  
 +  /* add command for WELCOME */
@@ -246,18 +823,145 @@ diff -r a662d02e9a76 ircd/parse.c
 +    MSG_WELCOME,
 +    TOK_WELCOME,
 +    0, MAXPARA, MFLG_SLOW, 0, NULL,
-+    /* UNREG, CLIENT, SERVER, OPER, SERVICE */
++    /* UNREG, CLIENT, SERVER, OPER, SERVICE, HELP */
 +    { m_unregistered, m_welcome, ms_welcome, mo_welcome, m_ignore }
 +  },
  
    /* This command is an alias for QUIT during the unregistered part of
     * of the server.  This is because someone jumping via a broken web
-diff -r a662d02e9a76 ircd/welcome.c
+diff -r 530975e1fd87 ircd/s_debug.c
+--- a/ircd/s_debug.c   Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/s_debug.c   Sat Jul 20 15:40:27 2013 +0100
+@@ -50,6 +50,7 @@
+ #include "send.h"
+ #include "struct.h"
+ #include "sys.h"
++#include "welcome.h"
+ #include "whowas.h"
+ /* #include <assert.h> -- Now using assert in ircd_log.h */
+@@ -231,7 +232,8 @@
+       aw = 0,                   /* aways set */
+       wwa = 0,                  /* whowas aways */
+       gl = 0,                   /* glines */
+-      ju = 0;                   /* jupes */
++      ju = 0,                   /* jupes */
++      we = 0;                   /* welcomes */
+   size_t chm = 0,               /* memory used by channels */
+       chbm = 0,                 /* memory used by channel bans */
+@@ -244,6 +246,7 @@
+       wwm = 0,                  /* whowas array memory used */
+       glm = 0,                  /* memory used by glines */
+       jum = 0,                  /* memory used by jupes */
++      wem = 0,                  /* memory used by welcomes */
+       com = 0,                  /* memory used by conf lines */
+       dbufs_allocated = 0,      /* memory used by dbufs */
+       dbufs_used = 0,           /* memory used by dbufs */
+@@ -351,6 +354,10 @@
+   send_reply(cptr, SND_EXPLICIT | RPL_STATSDEBUG,
+            ":Glines %d(%zu) Jupes %d(%zu)", gl, glm, ju, jum);
++  we = welcome_memory_count(&wem);
++  send_reply(cptr, SND_EXPLICIT | RPL_STATSDEBUG,
++           ":Welcomes %d(%zu)", we, wem);
++
+   send_reply(cptr, SND_EXPLICIT | RPL_STATSDEBUG,
+            ":Hash: client %d(%zu), chan is the same", HASHSIZE,
+            sizeof(void *) * HASHSIZE);
+diff -r 530975e1fd87 ircd/s_err.c
+--- a/ircd/s_err.c     Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/s_err.c     Sat Jul 20 15:40:27 2013 +0100
+@@ -486,7 +486,7 @@
+ /* 226 */
+   { RPL_STATSALINE, "%s", "226" },
+ /* 227 */
+-  { 0 },
++  { RPL_STATSWELCOME, "W %d %s %s %Tu %Tu :%s", "227" },
+ /* 228 */
+   { RPL_STATSQLINE, "Q %s :%s", "228" },
+ /* 229 */
+@@ -1050,7 +1050,7 @@
+ /* 508 */
+   { 0 },
+ /* 509 */
+-  { 0 },
++  { ERR_NOSUCHWELCOME, "%s :No such welcome", "509" },
+ /* 510 */
+   { 0 },
+ /* 511 */
+diff -r 530975e1fd87 ircd/s_serv.c
+--- a/ircd/s_serv.c    Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/s_serv.c    Sat Jul 20 15:40:27 2013 +0100
+@@ -57,6 +57,7 @@
+ #include "struct.h"
+ #include "sys.h"
+ #include "userload.h"
++#include "welcome.h"
+ /* #include <assert.h> -- Now using assert in ircd_log.h */
+ #include <stdlib.h>
+@@ -196,6 +197,7 @@
+    */
+   gline_burst(cptr);
+   jupe_burst(cptr);
++  welcome_burst(cptr);
+   /*
+    * Pass on my client information to the new server
+diff -r 530975e1fd87 ircd/s_stats.c
+--- a/ircd/s_stats.c   Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/s_stats.c   Sat Jul 20 15:40:27 2013 +0100
+@@ -54,6 +54,7 @@
+ #include "send.h"
+ #include "struct.h"
+ #include "userload.h"
++#include "welcome.h"
+ #include <stdio.h>
+ #include <stdlib.h>
+@@ -650,9 +651,12 @@
+   { 'V', "vserversmach", (STAT_FLAG_OPERFEAT | STAT_FLAG_VARPARAM | STAT_FLAG_CASESENS), FEAT_HIS_STATS_v,
+     stats_servers_verbose, 0,
+     "Verbose server information." },
+-  { 'w', "userload", STAT_FLAG_OPERFEAT, FEAT_HIS_STATS_w,
++  { 'w', "userload", STAT_FLAG_OPERFEAT | STAT_FLAG_CASESENS, FEAT_HIS_STATS_w,
+     calc_load, 0,
+     "Userload statistics." },
++  { 'W', "welcome", STAT_FLAG_OPERFEAT | STAT_FLAG_CASESENS, FEAT_HIS_STATS_W,
++    welcome_stats, 0,
++    "Welcome messages." },
+   { 'x', "memusage", STAT_FLAG_OPERFEAT, FEAT_HIS_STATS_x,
+     stats_meminfo, 0,
+     "List usage information." },
+diff -r 530975e1fd87 ircd/s_user.c
+--- a/ircd/s_user.c    Sat Jul 20 15:39:54 2013 +0100
++++ b/ircd/s_user.c    Sat Jul 20 15:40:27 2013 +0100
+@@ -63,6 +63,7 @@
+ #include "userload.h"
+ #include "version.h"
+ #include "whowas.h"
++#include "welcome.h"
+ #include "handlers.h" /* m_motd and m_lusers */
+@@ -402,6 +403,10 @@
+     IPcheck_connect_succeeded(sptr);
++    /* send welcome */
++    if (feature_bool(FEAT_WELCOME))
++      welcome_list(sptr, 1);
++
+     /* TODO: */
+     /* apply auto sethost if needed */
+     apply_spoofblock(sptr);
+diff -r 530975e1fd87 ircd/welcome.c
 --- /dev/null  Thu Jan 01 00:00:00 1970 +0000
-+++ b/ircd/welcome.c   Sat Jan 24 22:38:10 2009 +0100
-@@ -0,0 +1,430 @@
++++ b/ircd/welcome.c   Sat Jul 20 15:40:27 2013 +0100
+@@ -0,0 +1,877 @@
 +/*
-+ * IRC - Internet Relay Chat, ircd/jupe.c
++ * IRC - Internet Relay Chat, ircd/welcome.c
 + * Copyright (C) 1990 Jarkko Oikarinen and
 + *                    University of Oulu, Finland
 + * Copyright (C) 2000 Kevin L. Mitchell <klmitch@mit.edu>
@@ -277,413 +981,859 @@ diff -r a662d02e9a76 ircd/welcome.c
 + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 + */
 +/** @file
-+ * @brief Implementation of juped server handling functions.
-+ * @version $Id: jupe.c 1633 2006-03-25 03:46:56Z entrope $
++ * @brief Implementation of welcome message handling functions.
 + */
-+#include "config.h"
 +
 +#include "client.h"
-+#include "hash.h"
 +#include "ircd.h"
-+#include "ircd_alloc.h"
 +#include "ircd_features.h"
 +#include "ircd_log.h"
 +#include "ircd_reply.h"
 +#include "ircd_string.h"
-+#include "match.h"
 +#include "msg.h"
 +#include "numeric.h"
-+#include "numnicks.h"
 +#include "s_bsd.h"
-+#include "s_misc.h"
++#include "s_debug.h"
 +#include "send.h"
-+#include "struct.h"
-+#include "sys.h"    /* FALSE bleah */
 +#include "welcome.h"
 +
-+/* #include <assert.h> -- Now using assert in ircd_log.h */
-+#include <string.h>
 +
-+/** List of jupes. */
-+static struct Jupe *GlobalJupeList = 0;
++/** List of welcome messages - first MAX for global, second MAX for local */
++static struct Welcome WelcomeArray[WELCOME_MAX_ENTRIES * 2] = { { 0 } };
 +
-+/** Allocate a new jupe with the given parameters.
-+ * @param[in] server Server name to jupe.
-+ * @param[in] reason Reason for jupe.
-+ * @param[in] expire Expiration time for jupe.
-+ * @param[in] lastmod Last modification time for jupe.
-+ * @param[in] flags Flags to set for the jupe.
++
++/** Allocate a new welcome with the given parameters.
++ * @param[in] name Name of the welcome message.
++ * @param[in] text The welcome message.
++ * @param[in] who Who set it.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @return name Array number of the welcome set.
 + */
-+static struct Jupe *
-+make_jupe(char *server, char *reason, time_t expire, time_t lastmod,
-+        unsigned int flags)
++static int 
++welcome_make(int name, char *text, char *who, time_t create, time_t lastmod, unsigned int flags)
 +{
-+  struct Jupe *ajupe;
 +
-+  ajupe = (struct Jupe*) MyMalloc(sizeof(struct Jupe)); /* alloc memory */
-+  assert(0 != ajupe);
++  /* assert */
++  assert(WelcomeArrayIsValid(name));
++  assert(NULL != text);
++  assert(NULL != who);
++  assert(flags & WELCOME_FORCE || lastmod > 0);   /* lastmod must not be 0 unless forced */
++  assert(flags & WELCOME_LOCAL ||
++           flags & WELCOME_FORCE ||
++             lastmod >= WelcomeLastMod(name));   /* lastmod may not decrease for global welcome unless forced */
++
++  /* debug */
++  Debug((DEBUG_DEBUG, "welcome_make(name=%d, text=\"%s\", who=%s, create=%Tu, lastmod=%Tu, "
++                      "FLAGS(0x%04x): local=%s announce=%s force=%s unset=%s insert=%s delete=%s inclastmod=%s)",
++    name, text, who, create, lastmod, flags,
++      (flags & WELCOME_LOCAL) ? "yes" : "no",
++      (flags & WELCOME_ANNOUNCE) ? "yes" : "no",
++      (flags & WELCOME_FORCE) ? "yes" : "no",
++      (flags & WELCOME_UNSET) ? "yes" : "no",
++      (flags & WELCOME_INSERT) ? "yes" : "no",
++      (flags & WELCOME_DELETE) ? "yes" : "no",
++      (flags & WELCOME_INCLASTMOD) ? "yes" : "no"));
++
++  /* forced and lastmod is zero, clear text and who */
++  if (flags & WELCOME_FORCE && lastmod == 0) {
++    text = "";
++    who = "";
++  }
++
++  /* store it */
++  ircd_strncpy(WelcomeArray[name].text, text, WELCOMELEN);
++  ircd_strncpy(WelcomeArray[name].who, who, ACCOUNTLEN);
 +
-+  memset(ajupe, 0, sizeof(*ajupe));
-+  DupString(ajupe->ju_server, server); /* copy vital information */
-+  DupString(ajupe->ju_reason, reason);
-+  ajupe->ju_expire = expire;
-+  ajupe->ju_lastmod = lastmod;
-+  ajupe->ju_flags = flags & JUPE_MASK; /* set jupe flags */
++  if (flags & WELCOME_INCLASTMOD &&        /* take current lastmod+1 if needed */
++       !(flags & WELCOME_FORCE) &&         /* not forced */
++         WelcomeLastMod(name) >= lastmod)  /* current lastmod greater or equal than lastmod */
++    WelcomeArray[name].lastmod = WelcomeLastMod(name) +1;
++  else
++    WelcomeArray[name].lastmod = lastmod;
 +
-+  ajupe->ju_next = GlobalJupeList; /* link it into the list */
-+  ajupe->ju_prev_p = &GlobalJupeList;
-+  if (GlobalJupeList)
-+    GlobalJupeList->ju_prev_p = &ajupe->ju_next;
-+  GlobalJupeList = ajupe;
++  WelcomeArray[name].create = create;
 +
-+  return ajupe;
++  return name;
 +}
 +
-+/** Apply a jupe.
-+ * @param[in] cptr Local client that sent us the jupe.
-+ * @param[in] sptr Originator of the jupe.
-+ * @param[in] jupe Jupe to check.
++
++/** Propagate a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] nameint Name of the message.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @param[in] who Who set this message.
++ * @param[in] text The welcome message.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
 + */
-+static int
-+do_jupe(struct Client *cptr, struct Client *sptr, struct Jupe *jupe)
++int
++welcome_propagate(struct Client *cptr, struct Client *sptr, int nameint,
++  time_t create, time_t lastmod, char *who, char *text, unsigned int flags)
 +{
-+  struct Client *acptr;
++  /* assert */
++  assert(NULL != sptr);
++  assert(NULL != cptr);
++  assert(WelcomeNameIsValid(nameint));
++  assert(lastmod > 0 || flags & WELCOME_FORCE);   /* lastmod must not be 0 unless forced */
++  assert(!(flags & WELCOME_LOCAL));  /* must not be local */
++
++  sendcmdto_serv_butone(sptr, CMD_WELCOME, cptr, "* %s%s%s%s%d %Tu %Tu %s :%s",
++    (flags & WELCOME_ANNOUNCE) ? "$" : "",
++    (flags & WELCOME_FORCE) ? "!" : "",
++    (flags & WELCOME_INSERT) ? "+" : "",
++    (flags & WELCOME_DELETE) ? "-" : "",
++    nameint, create, lastmod, who, text);
 +
-+  if (!JupeIsActive(jupe)) /* no action to be taken on inactive jupes */
-+    return 0;
++  return 0;
++}
 +
-+  acptr = FindServer(jupe->ju_server);
 +
-+  /* server isn't online or isn't local or is me */
-+  if (!acptr || !MyConnect(acptr) || IsMe(acptr))
++/** Resend a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] nameint Name of the message.
++ * @param[in] namearray Name of the array item.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
++ */
++int
++welcome_resend(struct Client *cptr, int nameint, int namearray, unsigned int flags)
++{
++
++  int name;                 /* loop variable */
++
++  /* assert */
++  assert(NULL != cptr);
++  assert(IsServer(cptr));
++  assert(WelcomeNameIsValid(nameint));
++  assert(WelcomeArrayIsValid(namearray));
++  assert(nameint - 1 == namearray);
++  assert(!(flags & WELCOME_LOCAL));   /* must not be local */
++  assert(!(flags & WELCOME_FORCE));   /* must not be forced */
++
++  /* send our version */
++  sendcmdto_one(&me, CMD_WELCOME, cptr, "* %d %Tu %Tu %s :%s",
++    nameint,
++    WelcomeCreate(namearray), WelcomeLastMod(namearray),
++    WelcomeWho(namearray), WelcomeText(namearray));
++
++  /* bad welcome did not have insert or delete prefix */
++  if (!(flags & (WELCOME_INSERT|WELCOME_DELETE)))
 +    return 0;
 +
-+  return exit_client_msg(cptr, acptr, &me, "Juped: %s", jupe->ju_reason);
-+}
++  /* loop over global entries - namearray +1 to max - 1 */
++  for (name = namearray +1; name <= WELCOME_MAX_ENTRIES - 1; name++) {
 +
-+/** Forward a jupe to another server.
-+ * @param[in] cptr Local client that sent us the jupe.
-+ * @param[in] sptr Originator of the jupe.
-+ * @param[in] jupe Jupe to forward.
-+ */
-+static void
-+propagate_jupe(struct Client *cptr, struct Client *sptr, struct Jupe *jupe)
-+{
-+  if (JupeIsLocal(jupe)) /* don't propagate local jupes */
-+    return;
++    /* not set, force it to be unset on the other end */
++    if (!WelcomeIsSet(name))
++      sendcmdto_one(&me, CMD_WELCOME, cptr, "* !%d 0 0 0 :", name +1);
 +
-+  sendcmdto_serv_butone(sptr, CMD_JUPE, cptr, "* %c%s %Tu %Tu :%s",
-+                      JupeIsRemActive(jupe) ? '+' : '-', jupe->ju_server,
-+                      jupe->ju_expire - CurrentTime, jupe->ju_lastmod,
-+                      jupe->ju_reason);
++    /* set, force change here too
++     *  other side may have this lastmod+1, without force it would be ignored
++     */
++    else
++      sendcmdto_one(&me, CMD_WELCOME, cptr, "* !%d %Tu %Tu %s :%s",
++        name +1,
++        WelcomeCreate(name), WelcomeLastMod(name),
++        WelcomeWho(name), WelcomeText(name));
++  }
++
++  return 0;
 +}
 +
-+/** Add a new server jupe.
-+ * @param[in] cptr Local client that sent us the jupe.
-+ * @param[in] sptr Originator of the jupe.
-+ * @param[in] server Server name to jupe.
-+ * @param[in] reason Reason for the jupe.
-+ * @param[in] expire Jupe duration in seconds.
-+ * @param[in] lastmod Last modification timestamp (or NULL).
-+ * @param[in] flags Flags to set on jupe.
-+ * @return Zero, unless the jupe causes \a cptr to be SQUIT, in which
-+ * case CPTR_KILLED.
++
++/** Log a welcome message.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] msg The message to show.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
 + */
 +int
-+jupe_add(struct Client *cptr, struct Client *sptr, char *server, char *reason,
-+       time_t expire, time_t lastmod, unsigned int flags)
++welcome_log(struct Client *sptr, char *msg, unsigned int flags)
 +{
-+  struct Jupe *ajupe;
-+
-+  assert(0 != server);
-+  assert(0 != reason);
-+
-+  /*
-+   * You cannot set a negative (or zero) expire time, nor can you set an
-+   * expiration time for greater than JUPE_MAX_EXPIRE.
-+   */
-+  if (expire <= 0 || expire > JUPE_MAX_EXPIRE) {
-+    if (!IsServer(cptr) && MyConnect(cptr))
-+      send_reply(cptr, ERR_BADEXPIRE, expire);
-+    return 0;
++  /* assert */
++  assert(NULL != sptr);
++  assert(NULL != msg);
++
++  /* inform ops */
++  sendto_opmask_butone(0, SNO_OLDSNO, "%s %s",
++    (feature_bool(FEAT_HIS_SNOTICES) || IsServer(sptr)) ?
++    get_client_name_and_opername(sptr) : cli_name((cli_user(sptr))->server), msg);
++
++  /* log it */
++  log_write(LS_NETWORK, L_INFO, LOG_NOSNOTICE, "%s %s", get_client_name_and_opername(sptr), msg);
++
++  /* welcome by remote oper, inform of success */
++  if ((flags & WELCOME_LOCAL) && IsUser(sptr) && !MyConnect(sptr)) {
++    sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :%s %s",
++      sptr, get_client_name_and_opername(sptr), msg);
++
++    /* TODO: wallops all local changes, by both local and remote opers? */
++    /* tell all opers about the local message being set remotely */
++    sendwallto_group_butone(&me, WALL_WALLOPS, 0, "%s %s", get_client_name_and_opername(sptr), msg);
 +  }
 +
-+  expire += CurrentTime; /* convert from lifetime to timestamp */
-+
-+  /* Inform ops and log it */
-+  sendto_opmask_butone(0, SNO_NETWORK, "%s adding %sJUPE for %s, expiring at "
-+                       "%Tu: %s",
-+                       (feature_bool(FEAT_HIS_SNOTICES) || IsServer(sptr)) ?
-+                         get_client_name_and_opername(sptr) :
-+                         cli_name((cli_user(sptr))->server),
-+                     flags & JUPE_LOCAL ? "local " : "", server,
-+                     expire + TSoffset, reason);
++  return 0;
++}
 +
-+  log_write(LS_JUPE, L_INFO, LOG_NOSNOTICE,
-+          "%#C adding %sJUPE for %s, expiring at %Tu: %s", sptr,
-+          flags & JUPE_LOCAL ? "local " : "", server, expire + TSoffset,
-+          reason);
 +
-+  /* local jupe set by remote user, inform oper of success */
-+  if ((flags & JUPE_LOCAL) && IsUser(sptr) && !MyUser(sptr))
-+    sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :%s adding local JUPE for %s, expiring at %Tu: %s",
-+      sptr, cli_name(sptr), server, expire + TSoffset, reason);
++/** Announce a welcome message to local clients.
++ * @param[in] name Welcome message to announce.
++ * @param[in] flags Flags to set on welcome.
++ */
++void
++welcome_announce(int name, unsigned int flags)
++{
++  struct Client *acptr;                 /* local user */
++  struct MsgBuf *msgbuf;                /* message to send */
++  int i;                                /* loop variable */
++
++  /* assert */
++  assert(flags & WELCOME_ANNOUNCE);
++  assert(WelcomeArrayIsValid(name));
++  assert(WelcomeIsSet(name));
++  assert(!WelcomeIsEmpty(name));  
++
++  /* build msgbuf */
++  msgbuf = msgq_make(0, ":%C %s $%s :[%s] %s", &me, MSG_NOTICE,
++    (flags & WELCOME_LOCAL) ? cli_name(&me) : "*",
++    (flags & WELCOME_LOCAL) ? cli_name(&me) : feature_str(FEAT_NETWORK),
++    WelcomeText(name));
++
++  /* go over local clients */
++  for (i = HighestFd; i > 0; --i) {
++
++    /* skip unregistered clients, skip servers */
++    if (!(acptr = LocalClientArray[i]) || !IsRegistered(acptr) || IsServer(acptr))
++      continue;
++
++    /* send it away */ 
++    send_buffer(acptr, msgbuf, 0);
++  }
++}
 +
-+  /* make the jupe */
-+  ajupe = make_jupe(server, reason, expire, lastmod, flags);
 +
-+  propagate_jupe(cptr, sptr, ajupe);
++/** Set a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] nameint Name of the message.
++ * @param[in] namearray Array entry.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @param[in] who Who set this message.
++ * @param[in] text The message.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
++ */
++int
++welcome_set(struct Client *cptr, struct Client *sptr, int nameint,
++  int namearray, time_t create, time_t lastmod, char *who, char *text, unsigned int flags)
++{
++  char msg[BUFSIZE];                    /* msg for logging */
++  int new = 0;                          /* welcome is new - not set yet */
++
++  /* assert */
++  assert(NULL != cptr);
++  assert(NULL != sptr);
++  assert(WelcomeNameIsValid(nameint));
++  assert(WelcomeArrayIsValid(namearray));
++  assert(lastmod > 0 || flags & WELCOME_FORCE);   /* lastmod must not be 0 unless forced */
++  assert(NULL != who);
++  assert(NULL != text);
++  assert(!(flags & WELCOME_UNSET));   /* must not be unset */
++
++  /* debug */
++  Debug((DEBUG_DEBUG, "welcome_set(cptr=%s, sptr=%s, nameint=%d, namearray=%d, "
++                      "create=%Tu, lastmod=%Tu, who=%s, text=\"%s\", "
++                      "FLAGS(0x%04x): local=%s announce=%s force=%s unset=%s insert=%s delete=%s)",
++    cli_name(cptr), cli_name(sptr), nameint, namearray, create, lastmod, who, text, flags,
++      (flags & WELCOME_LOCAL) ? "yes" : "no",
++      (flags & WELCOME_ANNOUNCE) ? "yes" : "no",
++      (flags & WELCOME_FORCE) ? "yes" : "no",
++      (flags & WELCOME_UNSET) ? "yes" : "no",
++      (flags & WELCOME_INSERT) ? "yes" : "no",
++      (flags & WELCOME_DELETE) ? "yes" : "no"));
++
++  /* not set */
++  if (WelcomeIsEmpty(namearray))
++    new = 1;
++
++  /* update */
++  welcome_make(namearray, text, who, create, lastmod, flags);
++
++  /* create msg for log */
++  ircd_snprintf(0, msg, 0, "%s%s%s%s WELCOME %d \"%s\" %s [%Tu]",
++    (flags & WELCOME_FORCE) ? "force " : "",
++    new ? "setting" : "changing",
++    (flags & WELCOME_ANNOUNCE) ? " and announcing " : " ",
++    (flags & WELCOME_LOCAL) ? "local" : "global",
++    nameint, WelcomeText(namearray), WelcomeWho(namearray), create);
++
++  /* log it */
++  welcome_log(sptr, msg, flags);
++
++  /* propagate it */
++  if (!(flags & WELCOME_LOCAL))
++    welcome_propagate(cptr, sptr, nameint, create, lastmod, who, text, flags);
++
++  /* announce it */
++  if (flags & WELCOME_ANNOUNCE)
++    welcome_announce(namearray, flags);
 +
-+  return do_jupe(cptr, sptr, ajupe); /* remove server if necessary */
++  return 0;
 +}
 +
-+/** Activate a jupe, optionally changing its lastmod and flags.
-+ * @param[in] cptr Local client that sent us the jupe.
-+ * @param[in] sptr Originator of the jupe.
-+ * @param[in] jupe Jupe to activate.
-+ * @param[in] lastmod New timestamp for last modification of the jupe.
-+ * @param[in] flags Flags to set on the jupe.
-+ * @return Zero, unless the jupe causes \a cptr to be SQUIT, in which
-+ * case CPTR_KILLED.
++
++/** Unset a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] nameint Name of the message.
++ * @param[in] namearray Array entry.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @param[in] who Who set this message.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
 + */
 +int
-+jupe_activate(struct Client *cptr, struct Client *sptr, struct Jupe *jupe,
-+            time_t lastmod, unsigned int flags)
++welcome_unset(struct Client *cptr, struct Client *sptr, int nameint,
++  int namearray, time_t create, time_t lastmod, char *who, unsigned int flags)
 +{
-+  unsigned int saveflags = 0;
++  char msg[BUFSIZE];                    /* msg for logging */
++
++  /* assert */
++  assert(NULL != cptr);
++  assert(NULL != sptr);
++  assert(WelcomeNameIsValid(nameint));
++  assert(WelcomeArrayIsValid(namearray));
++  assert(lastmod > 0 || flags & WELCOME_FORCE);   /* lastmod must not be 0 unless forced */
++  assert(NULL != who);
++  assert(flags & (WELCOME_UNSET|WELCOME_INSERT|WELCOME_DELETE));   /* must be unset, insert or delete */
++
++  /* debug */
++  Debug((DEBUG_DEBUG, "welcome_unset(cptr=%s, sptr=%s, nameint=%d, namearray=%d, "
++                      "create=%Tu, lastmod=%Tu, who=%s, "
++                      "FLAGS(0x%04x): local=%s announce=%s force=%s unset=%s insert=%s delete=%s)",
++    cli_name(cptr), cli_name(sptr), nameint, namearray, create, lastmod, who, flags,
++      (flags & WELCOME_LOCAL) ? "yes" : "no",
++      (flags & WELCOME_ANNOUNCE) ? "yes" : "no",
++      (flags & WELCOME_FORCE) ? "yes" : "no",
++      (flags & WELCOME_UNSET) ? "yes" : "no",
++      (flags & WELCOME_INSERT) ? "yes" : "no",
++      (flags & WELCOME_DELETE) ? "yes" : "no"));
++
++  /* create msg for log */
++  ircd_snprintf(0, msg, 0, "%sunsetting %s WELCOME %d \"%s\" %s [%Tu]",
++    (flags & WELCOME_FORCE) ? "force " : "",
++    (flags & WELCOME_LOCAL) ? "local" : "global",
++    nameint, WelcomeText(namearray), WelcomeWho(namearray), create);
++
++  /* log it but only if it was set
++   *  welcome unset could have crossed with another welcome unset,
++   *    still need to update lastmod
++   *  can be a forced unset on a welcome that is not set
++   */
++  if (!WelcomeIsEmpty(namearray))
++    welcome_log(sptr, msg, flags);
 +
-+  assert(0 != jupe);
++  /* update, 
++   *   not when inserting, welcome_insert() handles that by calling welcome_set()
++   *   not when deleting, welcome_delete() handles that
++   */
++  if (!(flags & (WELCOME_INSERT|WELCOME_DELETE)))
++    welcome_make(namearray, "", who, create, lastmod, flags);
 +
-+  saveflags = jupe->ju_flags;
++  /* propagate it, but not when inserting */
++  if (!(flags & (WELCOME_LOCAL|WELCOME_INSERT)))
++    welcome_propagate(cptr, sptr, nameint, create, lastmod, who, "", flags);
 +
-+  if (flags & JUPE_LOCAL)
-+    jupe->ju_flags &= ~JUPE_LDEACT;
-+  else {
-+    jupe->ju_flags |= JUPE_ACTIVE;
++  return 0;
++}
 +
-+    if (jupe->ju_lastmod >= lastmod) /* force lastmod to increase */
-+      jupe->ju_lastmod++;
-+    else
-+      jupe->ju_lastmod = lastmod;
++
++/** Insert a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] nameint Name of the message.
++ * @param[in] namearray Array entry.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @param[in] who Who set this message.
++ * @param[in] text The welcome message.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
++ */
++int
++welcome_insert(struct Client *cptr, struct Client *sptr, int nameint,
++  int namearray, time_t create, time_t lastmod, char *who, char *text, unsigned int flags)
++{
++  char msg[BUFSIZE];                    /* msg for logging */
++  int i;                                /* loop variable */
++  int empty = -1;                       /* first empty spot in array after namearray */
++  int end = WELCOME_MAX_ENTRIES -1;     /* last element to check in array */
++  int last = end;                       /* last welcome message to feed to welcome_unset */
++
++  /* assert */
++  assert(NULL != cptr);
++  assert(NULL != sptr);
++  assert(WelcomeNameIsValid(nameint));
++  assert(WelcomeArrayIsValid(namearray));
++  assert(lastmod > 0 || flags & WELCOME_FORCE);   /* lastmod must not be 0 unless forced */
++  assert(NULL != who);
++  assert(NULL != text);
++  assert(flags & WELCOME_INSERT);   /* must be insert */
++
++  /* debug */
++  Debug((DEBUG_DEBUG, "welcome_insert(cptr=%s, sptr=%s, nameint=%d, namearray=%d, "
++                      "create=%Tu, lastmod=%Tu, who=%s, text=\"%s\", "
++                      "FLAGS(0x%04x): local=%s announce=%s force=%s unset=%s insert=%s delete=%s)",
++    cli_name(cptr), cli_name(sptr), nameint, namearray, create, lastmod, who, text, flags,
++      (flags & WELCOME_LOCAL) ? "yes" : "no",
++      (flags & WELCOME_ANNOUNCE) ? "yes" : "no",
++      (flags & WELCOME_FORCE) ? "yes" : "no",
++      (flags & WELCOME_UNSET) ? "yes" : "no",
++      (flags & WELCOME_INSERT) ? "yes" : "no",
++      (flags & WELCOME_DELETE) ? "yes" : "no"));
++
++  /* correct end for local offset */
++  if (flags & WELCOME_LOCAL)
++    end += WELCOME_MAX_ENTRIES;
++
++  /* find first empty spot */
++  for (i = namearray; i <= end; i++) {
++    if (WelcomeIsEmpty(i)) {
++      empty = i;
++      break;
++    }
 +  }
 +
-+  if ((saveflags & JUPE_ACTMASK) == JUPE_ACTIVE)
-+    return 0; /* was active to begin with */
++  /* no empty spot, need to unset last */
++  if (empty == -1) {
++    welcome_unset(cptr, sptr, end +1, end, create, lastmod, who, flags);
++    empty = end;
++  }
++
++  /* move entries down, update lastmod */
++  for (i = empty; i > namearray; i--)
++    welcome_make(i, WelcomeText(i-1), WelcomeWho(i-1), WelcomeCreate(i-1),
++      lastmod, flags | WELCOME_INCLASTMOD);
++
++  /* correct empty for local offset */
++  if (flags & WELCOME_LOCAL)
++    empty -= WELCOME_MAX_ENTRIES;
 +
-+  /* Inform ops and log it */
-+  sendto_opmask_butone(0, SNO_NETWORK, "%s activating JUPE for %s, expiring "
-+                     "at %Tu: %s",
-+                       (feature_bool(FEAT_HIS_SNOTICES) || IsServer(sptr)) ?
-+                         get_client_name_and_opername(sptr) :
-+                         cli_name((cli_user(sptr))->server),
-+                     jupe->ju_server, jupe->ju_expire + TSoffset,
-+                     jupe->ju_reason);
++  /* create msg for log */
++  if (nameint == empty)
++    ircd_snprintf(0, msg, 0, "moving %s WELCOME message %d one place down",
++      (flags & WELCOME_LOCAL) ? "local" : "global", nameint);  
++  else 
++    ircd_snprintf(0, msg, 0, "moving %s WELCOME message %d %s %d one place down",
++      (flags & WELCOME_LOCAL) ? "local" : "global", nameint, (empty - nameint > 1) ? "to" : "and" , empty);
 +
-+  log_write(LS_JUPE, L_INFO, LOG_NOSNOTICE,
-+          "%#C activating JUPE for %s, expiring at %Tu: %s",sptr,
-+          jupe->ju_server, jupe->ju_expire + TSoffset, jupe->ju_reason);
++  /* log it */
++  welcome_log(sptr, msg, flags);
 +
-+  if (!(flags & JUPE_LOCAL)) /* don't propagate local changes */
-+    propagate_jupe(cptr, sptr, jupe);
++  /* set it */
++  welcome_set(cptr, sptr, nameint, namearray, create, lastmod, who, text, flags);
 +
-+  return do_jupe(cptr, sptr, jupe);
++  return 0;
 +}
 +
-+/** Deactivate a jupe.
-+ * @param[in] cptr Local client that sent us the jupe.
-+ * @param[in] sptr Originator of the jupe.
-+ * @param[in] jupe Jupe to deactivate.
-+ * @param[in] lastmod New timestamp for last modification of the jupe.
-+ * @param[in] flags Flags to set on the jupe.
-+ * @return Zero.
++
++/** Delete a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] nameint Name of the message.
++ * @param[in] namearray Array entry.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @param[in] who Who set this message.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
 + */
 +int
-+jupe_deactivate(struct Client *cptr, struct Client *sptr, struct Jupe *jupe,
-+              time_t lastmod, unsigned int flags)
++welcome_delete(struct Client *cptr, struct Client *sptr, int nameint,
++  int namearray, time_t create, time_t lastmod, char *who, unsigned int flags)
 +{
-+  unsigned int saveflags = 0;
++  int i;                                /* loop variable */
++  int empty = namearray;                /* first empty spot in array after namearray */
++  int end = WELCOME_MAX_ENTRIES -1;     /* last element to check in array */ 
++
++  /* assert */
++  assert(NULL != cptr);
++  assert(NULL != sptr);
++  assert(WelcomeNameIsValid(nameint));
++  assert(WelcomeArrayIsValid(namearray));
++  assert(lastmod > 0 || flags & WELCOME_FORCE);   /* lastmod must not be 0 unless forced */
++  assert(NULL != who);
++  assert(flags & WELCOME_UNSET);    /* must be unset */
++  assert(flags & WELCOME_DELETE);   /* must be delete */
++
++  /* debug */
++  Debug((DEBUG_DEBUG, "welcome_delete(cptr=%s, sptr=%s, nameint=%d, namearray=%d, "
++                      "create=%Tu, lastmod=%Tu, who=%s, "
++                      "FLAGS(0x%04x): local=%s announce=%s force=%s unset=%s insert=%s delete=%s)",
++    cli_name(cptr), cli_name(sptr), nameint, namearray, create, lastmod, who, flags,
++      (flags & WELCOME_LOCAL) ? "yes" : "no",
++      (flags & WELCOME_ANNOUNCE) ? "yes" : "no",
++      (flags & WELCOME_FORCE) ? "yes" : "no",
++      (flags & WELCOME_UNSET) ? "yes" : "no",
++      (flags & WELCOME_INSERT) ? "yes" : "no",
++      (flags & WELCOME_DELETE) ? "yes" : "no"));
++
++  /* unset it */
++  welcome_unset(cptr, sptr, nameint, namearray, create, lastmod, who, flags);
++
++  /* correct end for local offset */
++  if (flags & WELCOME_LOCAL)
++    end += WELCOME_MAX_ENTRIES;
++
++  /* move entries up, update lastmod */
++  for (i = namearray; i < end; i++) {
++    if (!WelcomeIsSet(i+1))
++      break;
++    welcome_make(i, WelcomeText(i+1), WelcomeWho(i+1), WelcomeCreate(i+1),
++      lastmod, flags | WELCOME_INCLASTMOD);
++  }
 +
-+  assert(0 != jupe);
++  /* clear last entry */
++  if (i == end)
++    welcome_make(i, "", who, create, lastmod, flags | WELCOME_INCLASTMOD);
 +
-+  saveflags = jupe->ju_flags;
++  /* nothing was moved, clear entry */
++  if (i == namearray)
++    welcome_make(i, "", who, create, lastmod, flags);
 +
-+  if (!JupeIsLocal(jupe)) {
-+    if (flags & JUPE_LOCAL)
-+      jupe->ju_flags |= JUPE_LDEACT;
-+    else {
-+      jupe->ju_flags &= ~JUPE_ACTIVE;
++  return 0;
++}
 +
-+      if (jupe->ju_lastmod >= lastmod) /* force lastmod to increase */
-+      jupe->ju_lastmod++;
-+      else
-+      jupe->ju_lastmod = lastmod;
-+    }
 +
-+    if ((saveflags & JUPE_ACTMASK) != JUPE_ACTIVE)
-+      return 0; /* was inactive to begin with */
++/** Change a welcome message.
++ * @param[in] cptr Local client that sent us the welcome.
++ * @param[in] sptr Originator of the welcome.
++ * @param[in] name Name of the message.
++ * @param[in] create When it was set.
++ * @param[in] lastmod Last modification timestamp.
++ * @param[in] who Who set this message.
++ * @param[in] text The welcome message.
++ * @param[in] flags Flags to set on welcome.
++ * @return Zero
++ */
++int
++welcome_do(struct Client *cptr, struct Client *sptr, char *name,
++  time_t create, time_t lastmod, char *who, char *text, unsigned int flags)
++{
++  int nameint = atoi(name);                /* transform to int */
++  int namearray = nameint - 1;             /* used to test the array element */
++  int start = 0;                           /* this is the first server setting this welcome message from a user */
++
++  /* assert */
++  assert(NULL != cptr);
++  assert(NULL != sptr);
++  assert(NULL != name);
++  assert(NULL != text);
++  assert(NULL != who);
++
++  /* debug */
++  Debug((DEBUG_DEBUG, "welcome_do(cptr=%s, sptr=%s, name=%s, "
++                      "create=%Tu, lastmod=%Tu, who=%s, text=\"%s\", "
++                      "FLAGS(0x%04x): local=%s announce=%s force=%s unset=%s insert=%s delete=%s)",
++    cli_name(cptr), cli_name(sptr), name, create, lastmod, who, text, flags,
++      (flags & WELCOME_LOCAL) ? "yes" : "no",
++      (flags & WELCOME_ANNOUNCE) ? "yes" : "no",
++      (flags & WELCOME_FORCE) ? "yes" : "no",
++      (flags & WELCOME_UNSET) ? "yes" : "no",
++      (flags & WELCOME_INSERT) ? "yes" : "no",
++      (flags & WELCOME_DELETE) ? "yes" : "no"));
++
++  /* welcome from my user, or a local welcome from a local/remote user */
++  start = (IsUser(sptr) && (MyConnect(sptr) || flags & WELCOME_LOCAL));
++
++  /* name empty after taking off the prefixes? */
++  if (*name == 0) {
++    if (start)
++      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :Welcome: No message number given", sptr);
++    else 
++      protocol_violation(cptr, "Received WELCOME with no message number from %C", sptr);
++    return 0;
 +  }
 +
-+  /* Inform ops and log it */
-+  sendto_opmask_butone(0, SNO_NETWORK, "%s %s JUPE for %s, expiring at %Tu: "
-+                     "%s",
-+                       (feature_bool(FEAT_HIS_SNOTICES) || IsServer(sptr)) ?
-+                         get_client_name_and_opername(sptr) :
-+                         cli_name((cli_user(sptr))->server),
-+                     JupeIsLocal(jupe) ? "removing local" : "deactivating",
-+                     jupe->ju_server, jupe->ju_expire + TSoffset,
-+                     jupe->ju_reason);
++  /* check name */
++  if (!WelcomeArrayIsValid(namearray)) {
++    if (start)
++      sendcmdto_one(&me, CMD_NOTICE, sptr,
++        "%C :Welcome: Invalid message number %s - should between 1 and %d",
++        sptr, name, WELCOME_MAX_ENTRIES);
++    else
++      protocol_violation(cptr,
++        "Received WELCOME with invalid message number %s from %C - should be between 1 and %d",
++        name, sptr, WELCOME_MAX_ENTRIES);
++    return 0;
++  }
 +
-+  log_write(LS_JUPE, L_INFO, LOG_NOSNOTICE,
-+          "%#C %s JUPE for %s, expiring at %Tu: %s", sptr,
-+          JupeIsLocal(jupe) ? "removing local" : "deactivating",
-+          jupe->ju_server, jupe->ju_expire + TSoffset, jupe->ju_reason);
++  /* invalid lastmod */
++  if (lastmod <= 0) {
++    /* from my user - must be a glitch,
++     *   someone set (my) network time to 0 ?
++     */
++    if (MyUser(sptr))
++      lastmod = 1;
++    /* not forced or negative, it is a protocol violation */
++    else if (!(flags & WELCOME_FORCE) || lastmod < 0)
++      return protocol_violation(cptr, "Received WELCOME with invalid lastmod timestamp %Tu from %C", lastmod, sptr);
++  }
 +
-+  /* local jupe removed by remote user, inform oper of success */
-+  if ((flags & JUPE_LOCAL) && IsUser(sptr) && !MyUser(sptr))
-+    sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :%s removing local JUPE for %s, expiring at %Tu: %s",
-+      sptr, cli_name(sptr), jupe->ju_server, jupe->ju_expire + TSoffset, jupe->ju_reason);
++  /* source is user, and is myuser or welcome is local, check length of the message */
++  if (start && strlen(text) > WELCOMELEN) {
++    sendcmdto_one(&me, CMD_NOTICE, sptr,
++      "%C :Welcome: The message is too long with %d chars - max is %d chars",
++      sptr, strlen(text), WELCOMELEN);
++    ircd_strncpy(text, text, WELCOMELEN);
++    sendcmdto_one(&me, CMD_NOTICE, sptr,
++      "%C :Welcome: Change or truncate the message to: \"%s\"", sptr, text);
++    return 0;
++  }
 +
-+  if (JupeIsLocal(jupe))
-+    jupe_free(jupe);
-+  else if (!(flags & JUPE_LOCAL)) /* don't propagate local changes */
-+    propagate_jupe(cptr, sptr, jupe);
++  /* correct namearray for local offset */
++  if (flags & WELCOME_LOCAL)
++    namearray += WELCOME_MAX_ENTRIES;
 +
-+  return 0;
-+}
++  /* must be true by now */
++  assert(WelcomeArrayIsValid(namearray));
++  assert(WelcomeNameIsValid(nameint));
 +
-+/** Find a jupe by name.
-+ * @param[in] server %Jupe name to search for.
-+ * @return Matching jupe (or NULL if none match).
-+ */
-+struct Jupe *
-+jupe_find(char *server)
-+{
-+  struct Jupe* jupe;
-+  struct Jupe* sjupe;
++  /* cannot unset welcome that is not set */
++  if (!WelcomeIsSet(namearray) && flags & WELCOME_UNSET) {
 +
-+  for (jupe = GlobalJupeList; jupe; jupe = sjupe) { /* go through jupes */
-+    sjupe = jupe->ju_next;
++    /* from user, throw error */
++    if (start)
++      return send_reply(sptr, ERR_NOSUCHWELCOME, name);
 +
-+    if (jupe->ju_expire <= CurrentTime) /* expire any that need expiring */
-+      jupe_free(jupe);
-+    else if (0 == ircd_strcmp(server, jupe->ju_server)) /* found it yet? */
-+      return jupe;
++     /* new local welcome from server, but empty - ignore
++      * we do accept a new global welcome message that is empty 
++      */
++    if (flags & WELCOME_LOCAL)
++      return 0;
 +  }
 +
-+  return 0;
-+}
++  /* check if there is something to change */
++  /* we got a record for it */
++  if (WelcomeIsSet(namearray)) {
++
++    /* global and not forced */
++    if (!(flags & (WELCOME_LOCAL|WELCOME_FORCE))) {
++
++      /* myuser changes it,
++       *   WelcomeLastMod greater than or equal to lastmod, take WelcomeLastMod+1 as lastmod
++       *   else the change is not accepted upstream because of the older TS
++       */
++      if (MyUser(sptr)) {
++        if (WelcomeLastMod(namearray) >= lastmod)
++          lastmod = WelcomeLastMod(namearray) +1;
++      }
++
++      /* compare lastmod, ignore welcome when:
++       *   we got a newer one
++       *   or when lastmod is the same and our text is 'smaller'
++       */
++      else if (lastmod < WelcomeLastMod(namearray) ||             /* we got a newer one */
++                (lastmod == WelcomeLastMod(namearray) &&          /* same lastmod */
++                   strcmp(WelcomeText(namearray), text) < 0)) {   /* our text is 'smaller' */
++        /* burst or burst ack, cptr gets our version from the burst */
++        if (IsBurstOrBurstAck(cptr))
++          return 0;
++        /* sync server */
++        return welcome_resend(cptr, nameint, namearray, flags);
++      }
++
++    /* local welcome - we use our idea of the time */
++    } else if (flags & WELCOME_LOCAL) {
++      create = TStime();
++      lastmod = TStime();
++    }
 +
-+/** Unlink and free an unused jupe.
-+ * @param[in] jupe Server jupe to free.
-+ */
-+void
-+jupe_free(struct Jupe* jupe)
-+{
-+  assert(0 != jupe);
++    /* welcome from my user or local welcome from local/remote user
++     *   compare new message with old message
++     *   use strcmp instead of ircd_strcmp - oper may wish to change case
++     */
++    if (start && strcmp(text, WelcomeText(namearray)) == 0) {
++      sendcmdto_one(&me, CMD_NOTICE, sptr,
++        "%C :Welcome: Cannot change %s message for %s - nothing to change",
++        sptr, (flags & WELCOME_LOCAL) ? "local" : "global", name); 
++      return 0;
++    }
++  }
++
++  /* welcome from my user, or local welcome from local/remote user
++   *  forcing and unsetting, set create and lastmod to 0
++   *  clear delete flag
++   */
++  if (start && (flags & WELCOME_FORCE) && (flags & WELCOME_UNSET)) {
++    flags &= ~WELCOME_DELETE;
++    create = 0;
++    lastmod = 0;
++  }
++
++  /* clear insert flag 
++   *   when this flag is set, welcome_unset() assumes it is being called from welcome_insert()
++   *     and does not propagate the change - welcome_delete() also calls welcome_unset()
++   *   do not insert last global/local welcome
++   *   do not insert when entry is not set
++   *
++   */
++  if (flags & WELCOME_INSERT &&
++       (flags & WELCOME_UNSET || !WelcomeIsSet(namearray) || nameint == WELCOME_MAX_ENTRIES))
++    flags &= ~WELCOME_INSERT;
++
++  /* clear delete flag when not unsetting so we do not propagate the - delete prefix */
++  if (flags & WELCOME_DELETE && !(flags & WELCOME_UNSET))
++    flags &= ~WELCOME_DELETE;
++
++  /* unset */
++  if (flags & WELCOME_UNSET) {
 +
-+  *jupe->ju_prev_p = jupe->ju_next; /* squeeze this jupe out */
-+  if (jupe->ju_next)
-+    jupe->ju_next->ju_prev_p = jupe->ju_prev_p;
++    /* delete */
++    if (flags & WELCOME_DELETE)
++      return welcome_delete(cptr, sptr, nameint, namearray, create, lastmod, who, flags);
 +
-+  MyFree(jupe->ju_server);  /* and free up the memory */
-+  MyFree(jupe->ju_reason);
-+  MyFree(jupe);
++    /* unset */
++    return welcome_unset(cptr, sptr, nameint, namearray, create, lastmod, who, flags);
++  }
++
++  /* insert */
++  if (flags & WELCOME_INSERT)
++    return welcome_insert(cptr, sptr, nameint, namearray, create, lastmod, who, text, flags);
++
++  /* new or change */
++  return welcome_set(cptr, sptr, nameint, namearray, create, lastmod, who, text, flags);
 +}
 +
-+/** Send the full list of active global jupes to \a cptr.
-+ * @param[in] cptr Local server to send jupes to.
++
++/** Send the full list of welcome message to \a cptr.
++ * @param[in] cptr Local server to send welcomes to.
 + */
 +void
-+jupe_burst(struct Client *cptr)
++welcome_burst(struct Client *cptr)
 +{
-+  struct Jupe *jupe;
-+  struct Jupe *sjupe;
-+
-+  for (jupe = GlobalJupeList; jupe; jupe = sjupe) { /* go through jupes */
-+    sjupe = jupe->ju_next;
-+
-+    if (jupe->ju_expire <= CurrentTime) /* expire any that need expiring */
-+      jupe_free(jupe);
-+    else if (!JupeIsLocal(jupe)) /* forward global jupes */
-+      sendcmdto_one(&me, CMD_JUPE, cptr, "* %c%s %Tu %Tu :%s",
-+                  JupeIsRemActive(jupe) ? '+' : '-', jupe->ju_server,
-+                  jupe->ju_expire - CurrentTime, jupe->ju_lastmod,
-+                  jupe->ju_reason);
++  int name;                 /* loop variable */
++
++  /* assert */
++  assert(NULL != cptr);
++
++  /* loop over global entries - 0 to max - 1 */
++  for (name = 0; name <= WELCOME_MAX_ENTRIES - 1; name++) {
++    if (WelcomeIsSet(name))
++      sendcmdto_one(&me, CMD_WELCOME, cptr, "* %d %Tu %Tu %s :%s",
++        name + 1,
++        WelcomeCreate(name), WelcomeLastMod(name),
++        WelcomeWho(name), WelcomeText(name));
 +  }
 +}
 +
-+/** Forward a jupe to another server.
-+ * @param[in] cptr %Server to send jupe to.
-+ * @param[in] jupe Jupe to forward.
++
++/** List welcome messages.
++ * @param[in] sptr Client requesting the listing.
++ * @param[in] connect When non zero do not report no welcome is set
++ * @return Zero.
 + */
 +int
-+jupe_resend(struct Client *cptr, struct Jupe *jupe)
++welcome_list(struct Client *sptr, int connect)
 +{
-+  if (JupeIsLocal(jupe)) /* don't propagate local jupes */
-+    return 0;
++  int name;                 /* loop variable */
++  int found = 0;            /* number of welcome messages set */
++  int local = 0;            /* welcome is local or global */
++
++  /* assert */
++  assert(NULL != sptr);
++
++  /* loop over all entries - range 0 to 2 * max - 1 */
++  for (name = 0; name <= 2 * WELCOME_MAX_ENTRIES - 1; name++) {
 +
-+  sendcmdto_one(&me, CMD_JUPE, cptr, "* %c%s %Tu %Tu :%s",
-+              JupeIsRemActive(jupe) ? '+' : '-', jupe->ju_server,
-+              jupe->ju_expire - CurrentTime, jupe->ju_lastmod,
-+              jupe->ju_reason);
++    /* local entries now */
++    if (name == WELCOME_MAX_ENTRIES)
++      local = 1;
++
++    /* not set or empty - skip */
++    if (!WelcomeIsSet(name) || WelcomeIsEmpty(name))
++      continue;
++
++    /* got one */
++    found++;
++    sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :[%s] %s",
++      sptr, local ? cli_name(&me) : feature_str(FEAT_NETWORK), WelcomeText(name));
++  }
 +
++  /* nothing set */
++  if (!found && !connect)
++    sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :No welcome message set.", sptr);
++  
 +  return 0;
 +}
 +
-+/** Send a jupe (or a list of jupes) to a server.
-+ * @param[in] sptr Client searching for jupes.
-+ * @param[in] server Name of jupe to search for (if NULL, list all).
-+ * @return Zero.
++
++/** Statistics callback to list Welcome messages.
++ * @param[in] sptr Client requesting statistics.
++ * @param[in] sd Stats descriptor for request (ignored).
++ * @param[in] param Extra parameter from user (ignored).
 + */
-+int
-+jupe_list(struct Client *sptr, char *server)
++void
++welcome_stats(struct Client *sptr, const struct StatDesc *sd, char *param)
 +{
-+  struct Jupe *jupe;
-+  struct Jupe *sjupe;
-+
-+  if (server) {
-+    if (!(jupe = jupe_find(server))) /* no such jupe */
-+      return send_reply(sptr, ERR_NOSUCHJUPE, server);
-+
-+    /* send jupe information along */
-+    send_reply(sptr, RPL_JUPELIST, jupe->ju_server, jupe->ju_expire + TSoffset,
-+             JupeIsLocal(jupe) ? cli_name(&me) : "*",
-+             JupeIsActive(jupe) ? '+' : '-', jupe->ju_reason);
-+  } else {
-+    for (jupe = GlobalJupeList; jupe; jupe = sjupe) { /* go through jupes */
-+      sjupe = jupe->ju_next;
-+
-+      if (jupe->ju_expire <= CurrentTime) /* expire any that need expiring */
-+      jupe_free(jupe);
-+      else /* send jupe information along */
-+      send_reply(sptr, RPL_JUPELIST, jupe->ju_server,
-+                 jupe->ju_expire + TSoffset,
-+                 JupeIsLocal(jupe) ? cli_name(&me) : "*",
-+                 JupeIsActive(jupe) ? '+' : '-', jupe->ju_reason);
-+    }
++  int name;                 /* loop variable */
++  int local = 0;            /* welcome is local or global */
++
++  /* assert */
++  assert(NULL != sptr);
++
++  /* stats header */
++  send_reply(sptr, SND_EXPLICIT | RPL_STATSWELCOME,
++    "W # Target Who Timestamp LastMod :Text");
++
++  /* loop over all entries - range 0 to 2 * max - 1 */
++  for (name = 0; name <= 2 * WELCOME_MAX_ENTRIES - 1; name++) {
++
++    /* local entries now */
++    if (name == WELCOME_MAX_ENTRIES)
++      local = 1;
++
++    /* not set */
++    if (!WelcomeIsSet(name))
++      continue;
++
++    /* send it */
++    send_reply(sptr, RPL_STATSWELCOME,
++      local ? name + 1 - WELCOME_MAX_ENTRIES : name + 1,
++      local ? cli_name(&me) : "*",
++      WelcomeWho(name),
++      WelcomeCreate(name), WelcomeLastMod(name),
++      WelcomeIsEmpty(name) ? "<Empty>" : WelcomeText(name));
 +  }
-+
-+  /* end of jupe information */
-+  return send_reply(sptr, RPL_ENDOFJUPELIST);
 +}
 +
-+/** Count welcome and memory used by it.
-+ * @param[out] we_size Receives total number of bytes allocated for welcome.
-+ * @return Number of welcomes currently allocated.
++
++/** Count welcome messages and memory used by them.
++ * @param[out] we_size Receives total number of bytes allocated for welcomes.
++ * @return Number of welcome messages currently allocated.
 + */
 +int
 +welcome_memory_count(size_t *we_size)
 +{
-+  struct Jupe *jupe;
-+  unsigned int ju = 0;
++  int name;                 /* loop variable */
++  unsigned int we = 0;      /* number of welcome messages set */
 +
-+  for (jupe = GlobalJupeList; jupe; jupe = jupe->ju_next)
-+  {
-+    ju++;
-+    *ju_size += sizeof(struct Jupe);
-+    *ju_size += jupe->ju_server ? (strlen(jupe->ju_server) + 1) : 0;
-+    *ju_size += jupe->ju_reason ? (strlen(jupe->ju_reason) + 1) : 0;
++  /* loop over all entries - range 0 to 2 * max - 1 */
++  for (name = 0; name <= 2 * WELCOME_MAX_ENTRIES - 1; name++) {
++
++    /* not set */
++    if (!WelcomeIsSet(name))
++      continue;
++
++    /* count */
++    we++;
++    *we_size += WelcomeText(name) ? (strlen(WelcomeText(name)) + 1) : 0;
++    *we_size += WelcomeWho(name) ? (strlen(WelcomeWho(name)) + 1) : 0;
 +  }
-+  return ju;
++  return we;
 +}
-\ No newline at end of file