+static int
+ms_sjoin(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
+{
+ static char buf_uid[BUFSIZE];
+ static const char empty_modes[] = "0";
+ struct Channel *chptr;
+ struct Client *target_p, *fakesource_p;
+ time_t newts;
+ time_t oldts;
+ static struct Mode mode, *oldmode;
+ const char *modes;
+ int args = 0;
+ int keep_our_modes = 1;
+ int keep_new_modes = 1;
+ int fl;
+ int isnew;
+ int mlen_uid;
+ int len_nick;
+ int len_uid;
+ int len;
+ int joins = 0;
+ const char *s;
+ char *ptr_uid;
+ char *p;
+ int i, joinc = 0, timeslice = 0;
+ static char empty[] = "";
+ rb_dlink_node *ptr, *next_ptr;
+
+ if(!IsChannelName(parv[2]) || !check_channel_name(parv[2]))
+ return 0;
+
+ /* SJOIN's for local channels can't happen. */
+ if(*parv[2] == '&')
+ return 0;
+
+ modebuf[0] = parabuf[0] = mode.key[0] = mode.forward[0] = '\0';
+ pargs = mode.mode = mode.limit = mode.join_num = mode.join_time = 0;
+
+ /* Hide connecting server on netburst -- jilles */
+ if (ConfigServerHide.flatten_links && !HasSentEob(source_p))
+ fakesource_p = &me;
+ else
+ fakesource_p = source_p;
+
+ mbuf = modebuf;
+ newts = atol(parv[1]);
+
+ s = parv[3];
+ while (*s)
+ {
+ switch (*(s++))
+ {
+ case 'f':
+ rb_strlcpy(mode.forward, parv[4 + args], sizeof(mode.forward));
+ args++;
+ if(parc < 5 + args)
+ return 0;
+ break;
+ case 'j':
+ sscanf(parv[4 + args], "%d:%d", &joinc, ×lice);
+ args++;
+ mode.join_num = joinc;
+ mode.join_time = timeslice;
+ if(parc < 5 + args)
+ return 0;
+ break;
+ case 'k':
+ rb_strlcpy(mode.key, parv[4 + args], sizeof(mode.key));
+ args++;
+ if(parc < 5 + args)
+ return 0;
+ break;
+ case 'l':
+ mode.limit = atoi(parv[4 + args]);
+ args++;
+ if(parc < 5 + args)
+ return 0;
+ break;
+ default:
+ if(chmode_flags[(int) *s] != 0)
+ {
+ mode.mode |= chmode_flags[(int) *s];
+ }
+ }
+ }
+
+ if(parv[args + 4])
+ {
+ s = parv[args + 4];
+
+ /* remove any leading spaces */
+ while (*s == ' ')
+ s++;
+ }
+ else
+ s = "";
+
+ if((chptr = get_or_create_channel(source_p, parv[2], &isnew)) == NULL)
+ return 0; /* channel name too long? */
+
+
+ oldts = chptr->channelts;
+ oldmode = &chptr->mode;
+
+#ifdef IGNORE_BOGUS_TS
+ if(newts < 800000000)
+ {
+ sendto_realops_snomask(SNO_DEBUG, L_ALL,
+ "*** Bogus TS %ld on %s ignored from %s",
+ (long) newts, chptr->chname, client_p->name);
+
+ newts = (oldts == 0) ? oldts : 800000000;
+ }
+#else
+ if(!isnew && !newts && oldts)
+ {
+ sendto_channel_local(ALL_MEMBERS, chptr,
+ ":%s NOTICE %s :*** Notice -- TS for %s "
+ "changed from %ld to 0",
+ me.name, chptr->chname, chptr->chname, (long) oldts);
+ sendto_realops_snomask(SNO_GENERAL, L_ALL,
+ "Server %s changing TS on %s from %ld to 0",
+ source_p->name, chptr->chname, (long) oldts);
+ }
+#endif
+
+ if(isnew)
+ chptr->channelts = newts;
+
+ else if(newts == 0 || oldts == 0)
+ chptr->channelts = 0;
+ else if(newts == oldts)
+ ;
+ else if(newts < oldts)
+ {
+ /* If configured, kick people trying to join +i/+k
+ * channels by recreating them on split servers.
+ * Don't kick if the source has sent EOB (services
+ * deopping everyone by TS-1 SJOIN).
+ * -- jilles */
+ if (ConfigChannel.kick_on_split_riding &&
+ !HasSentEob(source_p) &&
+ ((mode.mode & MODE_INVITEONLY) ||
+ (mode.key[0] != 0 && irccmp(mode.key, oldmode->key) != 0)))
+ {
+ struct membership *msptr;
+ struct Client *who;
+ int l = rb_dlink_list_length(&chptr->members);
+
+ RB_DLINK_FOREACH_SAFE(ptr, next_ptr, chptr->locmembers.head)
+ {
+ msptr = ptr->data;
+ who = msptr->client_p;
+ sendto_one(who, ":%s KICK %s %s :Net Rider",
+ me.name, chptr->chname, who->name);
+
+ sendto_server(NULL, chptr, CAP_TS6, NOCAPS,
+ ":%s KICK %s %s :Net Rider",
+ me.id, chptr->chname,
+ who->id);
+ remove_user_from_channel(msptr);
+ if (--l == 0)
+ break;
+ }
+ if (l == 0)
+ {
+ /* Channel was emptied, create a new one */
+ if((chptr = get_or_create_channel(source_p, parv[2], &isnew)) == NULL)
+ return 0; /* oops! */
+
+ oldmode = &chptr->mode;
+ }
+ }
+ keep_our_modes = NO;
+ chptr->channelts = newts;
+ }
+ else
+ keep_new_modes = NO;
+
+ if(!keep_new_modes)
+ mode = *oldmode;
+ else if(keep_our_modes)
+ {
+ mode.mode |= oldmode->mode;
+ if(oldmode->limit > mode.limit)
+ mode.limit = oldmode->limit;
+ if(strcmp(mode.key, oldmode->key) < 0)
+ strcpy(mode.key, oldmode->key);
+ if(oldmode->join_num > mode.join_num ||
+ (oldmode->join_num == mode.join_num &&
+ oldmode->join_time > mode.join_time))
+ {
+ mode.join_num = oldmode->join_num;
+ mode.join_time = oldmode->join_time;
+ }
+ if(irccmp(mode.forward, oldmode->forward) < 0)
+ strcpy(mode.forward, oldmode->forward);
+ }
+ else
+ {
+ /* If setting -j, clear join throttle state -- jilles */
+ if (!mode.join_num)
+ chptr->join_count = chptr->join_delta = 0;
+ }
+
+ set_final_mode(&mode, oldmode);
+ chptr->mode = mode;
+
+ /* Lost the TS, other side wins, so remove modes on this side */
+ if(!keep_our_modes)
+ {
+ remove_our_modes(chptr, fakesource_p);
+ RB_DLINK_FOREACH_SAFE(ptr, next_ptr, chptr->invites.head)
+ {
+ del_invite(chptr, ptr->data);
+ }
+
+ if(rb_dlink_list_length(&chptr->banlist) > 0)
+ remove_ban_list(chptr, fakesource_p, &chptr->banlist, 'b', ALL_MEMBERS);
+ if(rb_dlink_list_length(&chptr->exceptlist) > 0)
+ remove_ban_list(chptr, fakesource_p, &chptr->exceptlist,
+ 'e', ONLY_CHANOPS);
+ if(rb_dlink_list_length(&chptr->invexlist) > 0)
+ remove_ban_list(chptr, fakesource_p, &chptr->invexlist,
+ 'I', ONLY_CHANOPS);
+ if(rb_dlink_list_length(&chptr->quietlist) > 0)
+ remove_ban_list(chptr, fakesource_p, &chptr->quietlist,
+ 'q', ALL_MEMBERS);
+ chptr->bants++;
+
+ sendto_channel_local(ALL_MEMBERS, chptr,
+ ":%s NOTICE %s :*** Notice -- TS for %s changed from %ld to %ld",
+ me.name, chptr->chname, chptr->chname,
+ (long) oldts, (long) newts);
+ /* Update capitalization in channel name, this makes the
+ * capitalization timestamped like modes are -- jilles */
+ strcpy(chptr->chname, parv[2]);
+ }
+
+ if(*modebuf != '\0')
+ sendto_channel_local(ALL_MEMBERS, chptr, ":%s MODE %s %s %s",
+ fakesource_p->name, chptr->chname, modebuf, parabuf);
+
+ *modebuf = *parabuf = '\0';
+
+ if(parv[3][0] != '0' && keep_new_modes)
+ modes = channel_modes(chptr, source_p);
+ else
+ modes = empty_modes;
+
+ mlen_uid = rb_sprintf(buf_uid, ":%s SJOIN %ld %s %s :",
+ use_id(source_p), (long) chptr->channelts, parv[2], modes);
+ ptr_uid = buf_uid + mlen_uid;
+
+ mbuf = modebuf;
+ para[0] = para[1] = para[2] = para[3] = empty;
+ pargs = 0;
+ len_nick = len_uid = 0;
+
+ /* if theres a space, theres going to be more than one nick, change the
+ * first space to \0, so s is just the first nick, and point p to the
+ * second nick
+ */
+ if((p = strchr(s, ' ')) != NULL)
+ {
+ *p++ = '\0';
+ }
+
+ *mbuf++ = '+';
+
+ while (s)
+ {
+ fl = 0;
+
+ for (i = 0; i < 2; i++)
+ {
+ if(*s == '@')
+ {
+ fl |= CHFL_CHANOP;
+ s++;
+ }
+ else if(*s == '+')
+ {
+ fl |= CHFL_VOICE;
+ s++;
+ }
+ }
+
+ /* if the client doesnt exist or is fake direction, skip. */
+ if(!(target_p = find_client(s)) ||
+ (target_p->from != client_p) || !IsPerson(target_p))
+ goto nextnick;
+
+ /* we assume for these we can fit at least one nick/uid in.. */
+
+ /* check we can fit another status+nick+space into a buffer */
+ if((mlen_uid + len_uid + IDLEN + 3) > (BUFSIZE - 3))
+ {
+ *(ptr_uid - 1) = '\0';
+ sendto_server(client_p->from, NULL, CAP_TS6, NOCAPS, "%s", buf_uid);
+ ptr_uid = buf_uid + mlen_uid;
+ len_uid = 0;
+ }
+
+ if(keep_new_modes)
+ {
+ if(fl & CHFL_CHANOP)
+ {
+ *ptr_uid++ = '@';
+ len_nick++;
+ len_uid++;
+ }
+ if(fl & CHFL_VOICE)
+ {
+ *ptr_uid++ = '+';
+ len_nick++;
+ len_uid++;
+ }
+ }
+
+ /* copy the nick to the two buffers */
+ len = rb_sprintf(ptr_uid, "%s ", use_id(target_p));
+ ptr_uid += len;
+ len_uid += len;
+
+ if(!keep_new_modes)
+ fl = 0;
+
+ if(!IsMember(target_p, chptr))
+ {
+ add_user_to_channel(chptr, target_p, fl);
+ sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@%s JOIN :%s",
+ target_p->name,
+ target_p->username, target_p->host, parv[2]);
+ joins++;
+ }
+
+ if(fl & CHFL_CHANOP)
+ {
+ *mbuf++ = 'o';
+ para[pargs++] = target_p->name;
+
+ /* a +ov user.. bleh */
+ if(fl & CHFL_VOICE)
+ {
+ /* its possible the +o has filled up MAXMODEPARAMS, if so, start
+ * a new buffer
+ */
+ if(pargs >= MAXMODEPARAMS)
+ {
+ *mbuf = '\0';
+ sendto_channel_local(ALL_MEMBERS, chptr,
+ ":%s MODE %s %s %s %s %s %s",
+ fakesource_p->name, chptr->chname,
+ modebuf,
+ para[0], para[1], para[2], para[3]);
+ mbuf = modebuf;
+ *mbuf++ = '+';
+ para[0] = para[1] = para[2] = para[3] = NULL;
+ pargs = 0;
+ }
+
+ *mbuf++ = 'v';
+ para[pargs++] = target_p->name;
+ }
+ }
+ else if(fl & CHFL_VOICE)
+ {
+ *mbuf++ = 'v';
+ para[pargs++] = target_p->name;
+ }
+
+ if(pargs >= MAXMODEPARAMS)
+ {
+ *mbuf = '\0';
+ sendto_channel_local(ALL_MEMBERS, chptr,
+ ":%s MODE %s %s %s %s %s %s",
+ fakesource_p->name,
+ chptr->chname,
+ modebuf, para[0], para[1], para[2], para[3]);
+ mbuf = modebuf;
+ *mbuf++ = '+';
+ para[0] = para[1] = para[2] = para[3] = NULL;
+ pargs = 0;
+ }
+
+ nextnick:
+ /* p points to the next nick */
+ s = p;
+
+ /* if there was a trailing space and p was pointing to it, then we
+ * need to exit.. this has the side effect of breaking double spaces
+ * in an sjoin.. but that shouldnt happen anyway
+ */
+ if(s && (*s == '\0'))
+ s = p = NULL;
+
+ /* if p was NULL due to no spaces, s wont exist due to the above, so
+ * we cant check it for spaces.. if there are no spaces, then when
+ * we next get here, s will be NULL
+ */
+ if(s && ((p = strchr(s, ' ')) != NULL))
+ {
+ *p++ = '\0';
+ }
+ }
+
+ *mbuf = '\0';
+ if(pargs)
+ {
+ sendto_channel_local(ALL_MEMBERS, chptr,
+ ":%s MODE %s %s %s %s %s %s",
+ fakesource_p->name, chptr->chname, modebuf,
+ para[0], CheckEmpty(para[1]),
+ CheckEmpty(para[2]), CheckEmpty(para[3]));
+ }
+
+ if(!joins && !(chptr->mode.mode & MODE_PERMANENT) && isnew)
+ {
+ destroy_channel(chptr);
+
+ return 0;
+ }
+
+ /* Keep the colon if we're sending an SJOIN without nicks -- jilles */
+ if (joins)
+ {
+ *(ptr_uid - 1) = '\0';
+ }
+
+ sendto_server(client_p->from, NULL, CAP_TS6, NOCAPS, "%s", buf_uid);
+
+ return 0;
+}
+
+/*
+ * do_join_0
+ *
+ * inputs - pointer to client doing join 0
+ * output - NONE
+ * side effects - Use has decided to join 0. This is legacy
+ * from the days when channels were numbers not names. *sigh*
+ * There is a bunch of evilness necessary here due to
+ * anti spambot code.
+ */
+static void
+do_join_0(struct Client *client_p, struct Client *source_p)
+{
+ struct membership *msptr;
+ struct Channel *chptr = NULL;
+ rb_dlink_node *ptr;
+
+ /* Finish the flood grace period... */
+ if(MyClient(source_p) && !IsFloodDone(source_p))
+ flood_endgrace(source_p);
+
+ sendto_server(client_p, NULL, CAP_TS6, NOCAPS, ":%s JOIN 0", use_id(source_p));
+
+ if(source_p->user->channel.head && MyConnect(source_p) &&
+ !IsOper(source_p) && !IsExemptSpambot(source_p))
+ check_spambot_warning(source_p, NULL);
+
+ while((ptr = source_p->user->channel.head))
+ {
+ msptr = ptr->data;
+ chptr = msptr->chptr;
+ sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@%s PART %s",
+ source_p->name,
+ source_p->username, source_p->host, chptr->chname);
+ remove_user_from_channel(msptr);
+ }
+}
+