static char * detect_scalar_type(const char * val, size_t length) { bool has_point = false; if (length == 0) { return "tag:yaml.org,2002:null"; } else if (*val == ':') { return "tag:ruby.yaml.org,2002:symbol"; } else if (is_numeric(val, &has_point)) { return has_point ? "tag:yaml.org,2002:float" : "tag:yaml.org,2002:int"; } else if (strcmp(val, "true") == 0) { return "tag:yaml.org,2002:true"; } else if (strcmp(val, "false") == 0) { return "tag:yaml.org,2002:false"; } else if (is_timestamp(val, length)) { return "tag:yaml.org,2002:timestamp"; } else { return NULL; } }
char *log_strntok_r(char *s, size_t *len, char **last, size_t *sublen) { *sublen = 0; if (!*len) { return NULL; } if (!s) { if (!(s = *last)) { return NULL; } // fixup for log signature split <, // LESS_THAN_SIG + <digit> if ((*s & SIGNATURE_MASK) == LESS_THAN_SIG) { *s = (*s & ~SIGNATURE_MASK) + '0'; *--s = '<'; ++*len; } // fixup for log signature split [, // OPEN_BRACKET_SPACE is space, OPEN_BRACKET_SIG + <digit> if ((*s & SIGNATURE_MASK) == OPEN_BRACKET_SIG) { if (*s == OPEN_BRACKET_SPACE) { *s = ' '; } else { *s = (*s & ~SIGNATURE_MASK) + '0'; } *--s = '['; ++*len; } } while (*len && ((*s == '\r') || (*s == '\n'))) { ++s; --*len; } if (!*len) { *last = NULL; return NULL; } char *peek, *tok = s; for (;;) { if (*len == 0) { *last = NULL; return tok; } char c = *s++; --*len; size_t adjust; switch (c) { case '\r': case '\n': s[-1] = '\0'; *last = s; return tok; case '<': peek = is_prio(s, *len); if (!peek) { break; } if (s != (tok + 1)) { // not first? s[-1] = '\0'; *s &= ~SIGNATURE_MASK; *s |= LESS_THAN_SIG; // signature for '<' *last = s; return tok; } adjust = peek - s; if (adjust > *len) { adjust = *len; } *sublen += adjust; *len -= adjust; s = peek; if ((*s == '[') && ((peek = is_timestamp(s + 1, *len - 1)))) { adjust = peek - s; if (adjust > *len) { adjust = *len; } *sublen += adjust; *len -= adjust; s = peek; } break; case '[': peek = is_timestamp(s, *len); if (!peek) { break; } if (s != (tok + 1)) { // not first? s[-1] = '\0'; if (*s == ' ') { *s = OPEN_BRACKET_SPACE; } else { *s &= ~SIGNATURE_MASK; *s |= OPEN_BRACKET_SIG; // signature for '[' } *last = s; return tok; } adjust = peek - s; if (adjust > *len) { adjust = *len; } *sublen += adjust; *len -= adjust; s = peek; break; } ++*sublen; } // NOTREACHED }
/* * mo_zline - oper message handler * * parv[0] = Sender prefix * parv[1] = [[+|-]<Z-line mask>] * * For other parameters, see doc/readme.zline. */ int mo_zline(struct Client *cptr, struct Client *sptr, int parc, char *parv[]) { struct Client *acptr = 0; struct Zline *azline = 0; unsigned int flags = 0; enum ZlineAction action = ZLINE_MODIFY; time_t expire = 0; char *mask = parv[1], *target = 0, *reason = 0, *end; if (parc < 2) return zline_list(sptr, 0); if (*mask == '!') { mask++; if (HasPriv(sptr, PRIV_WIDE_ZLINE)) flags |= ZLINE_OPERFORCE; } switch (*mask) { /* handle +, -, <, and > */ case '+': /* activate the Z-line */ action = ZLINE_ACTIVATE; mask++; break; case '-': /* deactivate the Z-line */ action = ZLINE_DEACTIVATE; mask++; break; case '>': /* locally activate the Z-line */ action = ZLINE_LOCAL_ACTIVATE; mask++; break; case '<': /* locally deactivate the Z-line */ action = ZLINE_LOCAL_DEACTIVATE; mask++; break; } /* OK, let's figure out the parameters... */ switch (action) { case ZLINE_MODIFY: /* no specific action on the Z-line... */ if (parc == 2) /* user wants a listing of a specific Z-line */ return zline_list(sptr, mask); else if (parc < 4) /* must have target and expire, minimum */ return need_more_params(sptr, "ZLINE"); target = parv[2]; /* get the target... */ if (is_timestamp(parv[3])) { expire = strtol(parv[3], &end, 10) + TStime(); /* and the expiration */ if (*end != '\0') return send_reply(sptr, SND_EXPLICIT | ERR_BADEXPIRE, "%s :Bad expire time", parv[3]); } else expire = ParseInterval(parv[3]) + TStime(); flags |= ZLINE_EXPIRE; /* remember that we got an expire time */ if (parc > 4) { /* also got a reason... */ reason = parv[parc - 1]; flags |= ZLINE_REASON; } /* target is not global, interpolate action and require reason */ if (target[0] != '*' || target[1] != '\0') { if (!reason) /* have to have a reason for this */ return need_more_params(sptr, "ZLINE"); action = ZLINE_ACTIVATE; } break; case ZLINE_LOCAL_ACTIVATE: /* locally activate a Z-line */ case ZLINE_LOCAL_DEACTIVATE: /* locally deactivate a Z-line */ if (parc > 2) { /* if target is available, pick it */ target = parv[2]; if (target[0] == '*' && target[1] == '\0') return send_reply(sptr, ERR_NOSUCHSERVER, target); } break; case ZLINE_ACTIVATE: /* activating/adding a Z-line */ case ZLINE_DEACTIVATE: /* deactivating/removing a Z-line */ if (parc < 3) return need_more_params(sptr, "ZLINE"); if (parc > 3) { /* get expiration and target */ reason = parv[parc - 1]; if (is_timestamp(parv[parc - 2])) { expire = strtol(parv[parc - 2], &end, 10) + TStime(); if (*end != '\0') return send_reply(sptr, SND_EXPLICIT | ERR_BADEXPIRE, "%s :Bad expire time", parv[parc - 2]); } else expire = ParseInterval(parv[parc - 2]) + TStime(); flags |= ZLINE_EXPIRE | ZLINE_REASON; /* remember that we got 'em */ if (parc > 4) /* also have a target! */ target = parv[2]; } else { target = parv[2]; /* target has to be present, and has to be '*' */ if (target[0] != '*' || target[1] != '\0') return need_more_params(sptr, "ZLINE"); } break; } /* Is there no mask left? */ if (mask[0] == '\0') return need_more_params(sptr, "ZLINE"); /* Now let's figure out which is the target server */ if (!target) /* no target, has to be me... */ acptr = &me; /* if it's not '*', look up the server */ else if ((target[0] != '*' || target[1] != '\0') && !(acptr = find_match_server(target))) return send_reply(sptr, ERR_NOSUCHSERVER, target); /* Z-line deprecation notice */ sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :Use of Z-line is deprecated. " " Please use G-line instead.", sptr); /* Now, is the Z-line local or global? */ if (action == ZLINE_LOCAL_ACTIVATE || action == ZLINE_LOCAL_DEACTIVATE || !acptr) flags |= ZLINE_GLOBAL; else /* it's some form of local Z-line */ flags |= ZLINE_LOCAL; /* If it's a local activate/deactivate and server isn't me, propagate it */ if ((action == ZLINE_LOCAL_ACTIVATE || action == ZLINE_LOCAL_DEACTIVATE) && !IsMe(acptr)) { /* check for permissions... */ if (!feature_bool(FEAT_CONFIG_OPERCMDS)) return send_reply(sptr, ERR_DISABLED, "ZLINE"); else if (!HasPriv(sptr, PRIV_ZLINE)) return send_reply(sptr, ERR_NOPRIVILEGES); Debug((DEBUG_DEBUG, "I am forwarding a local change to a global zline " "to a remote server; target %s, mask %s, operforce %s, action %c", cli_name(acptr), mask, flags & ZLINE_OPERFORCE ? "YES" : "NO", action == ZLINE_LOCAL_ACTIVATE ? '>' : '<')); sendcmdto_one(sptr, CMD_ZLINE, acptr, "%C %s%c%s", acptr, flags & ZLINE_OPERFORCE ? "!" : "", action == ZLINE_LOCAL_ACTIVATE ? '>' : '<', mask); return 0; /* all done */ } /* Next, try to find the Z-line... */ if ((flags & ZLINE_GLOBAL) || IsMe(acptr)) /* don't bother if it's not me! */ azline = zline_find(mask, flags | ZLINE_ANY | ZLINE_EXACT); /* We now have all the pieces to tell us what we've got; let's put * it all together and convert the rest of the arguments. */ /* Handle the local Z-lines first... */ if (flags & ZLINE_LOCAL) { assert(acptr); /* normalize the action, first */ if (action == ZLINE_LOCAL_ACTIVATE || action == ZLINE_MODIFY) action = ZLINE_ACTIVATE; else if (action == ZLINE_LOCAL_DEACTIVATE) action = ZLINE_DEACTIVATE; /* If it's not for us, forward */ /* UPDATE NOTE: Once all servers are updated to u2.10.12.11, the * format string in this sendcmdto_one() may be updated to omit * <lastmod> for ZLINE_ACTIVATE and to omit <expire>, <lastmod>, * and <reason> for ZLINE_DEACTIVATE. */ if (!IsMe(acptr)) { /* check for permissions... */ if (!feature_bool(FEAT_CONFIG_OPERCMDS)) return send_reply(sptr, ERR_DISABLED, "ZLINE"); else if (!HasPriv(sptr, PRIV_ZLINE)) return send_reply(sptr, ERR_NOPRIVILEGES); Debug((DEBUG_DEBUG, "I am forwarding a local Z-line to a remote " "server; target %s, mask %s, operforce %s, action %c, " "expire %Tu, reason %s", target, mask, flags & ZLINE_OPERFORCE ? "YES" : "NO", action == ZLINE_ACTIVATE ? '+' : '-', expire, reason)); sendcmdto_one(sptr, CMD_ZLINE, acptr, "%C %s%c%s %Tu %Tu :%s", acptr, flags & ZLINE_OPERFORCE ? "!" : "", action == ZLINE_ACTIVATE ? '+' : '-', mask, expire - TStime(), TStime(), reason); return 0; /* all done */ } /* check local Z-line permissions... */ if (!HasPriv(sptr, PRIV_LOCAL_ZLINE)) return send_reply(sptr, ERR_NOPRIVILEGES); /* let's handle activation... */ if (action == ZLINE_ACTIVATE) { if (azline) /* Z-line already exists, so let's ignore it... */ return 0; /* OK, create the local Z-line */ Debug((DEBUG_DEBUG, "I am creating a local Z-line here; target %s, " "mask %s, operforce %s, action %s, expire %Tu, reason: %s", target, mask, flags & ZLINE_OPERFORCE ? "YES" : "NO", action == ZLINE_ACTIVATE ? "+" : "-", expire, reason)); return zline_add(cptr, sptr, mask, reason, expire, 0, 0, flags | ZLINE_ACTIVE); } else { /* OK, it's a deactivation/destruction */ if (!azline) /* Z-line doesn't exist, so let's complain... */ return send_reply(sptr, ERR_NOSUCHZLINE, mask); /* Let's now destroy the Z-line */ Debug((DEBUG_DEBUG, "I am destroying a local Z-line here; target %s, " "mask %s, operforce %s, action %s", target, mask, flags & ZLINE_OPERFORCE ? "YES" : "NO", action == ZLINE_ACTIVATE ? "+" : "-")); return zline_destroy(cptr, sptr, azline); } } /* can't modify a Z-line that doesn't exist... * (and if we are creating a new one, we need a reason and expiration) */ if (!azline && (action == ZLINE_MODIFY || action == ZLINE_LOCAL_ACTIVATE || action == ZLINE_LOCAL_DEACTIVATE || !reason || !expire)) return send_reply(sptr, ERR_NOSUCHZLINE, mask); /* check for Z-line permissions... */ if (action == ZLINE_LOCAL_ACTIVATE || action == ZLINE_LOCAL_DEACTIVATE) { /* only need local privileges for locally-limited status changes */ if (!HasPriv(sptr, PRIV_LOCAL_ZLINE)) return send_reply(sptr, ERR_NOPRIVILEGES); } else { /* global privileges required */ if (!feature_bool(FEAT_CONFIG_OPERCMDS)) return send_reply(sptr, ERR_DISABLED, "ZLINE"); else if (!HasPriv(sptr, PRIV_ZLINE)) return send_reply(sptr, ERR_NOPRIVILEGES); } Debug((DEBUG_DEBUG, "I have a global Z-line I am acting upon now; " "target %s, mask %s, operforce %s, action %s, expire %Tu, " "reason: %s; zline %s! (fields present: %s %s)", target, mask, flags & ZLINE_OPERFORCE ? "YES" : "NO", action == ZLINE_ACTIVATE ? "+" : (action == ZLINE_DEACTIVATE ? "-" : (action == ZLINE_LOCAL_ACTIVATE ? ">" : (action == ZLINE_LOCAL_DEACTIVATE ? "<" : "(MODIFY)"))), expire, reason, azline ? "EXISTS" : "does not exist", flags & ZLINE_EXPIRE ? "expire" : "", flags & ZLINE_REASON ? "reason" : "")); if (azline) /* modifying an existing Z-line */ return zline_modify(cptr, sptr, azline, action, reason, expire, TStime(), 0, flags); assert(action != ZLINE_LOCAL_ACTIVATE); assert(action != ZLINE_LOCAL_DEACTIVATE); assert(action != ZLINE_MODIFY); /* create a new Z-line */ return zline_add(cptr, sptr, mask, reason, expire, TStime(), 0, flags | ((action == ZLINE_ACTIVATE) ? ZLINE_ACTIVE : 0)); }
char* android::log_strntok_r(char* s, ssize_t& len, char*& last, ssize_t& sublen) { sublen = 0; if (len <= 0) return nullptr; if (!s) { if (!(s = last)) return nullptr; // fixup for log signature split <, // LESS_THAN_SIG + <digit> if ((*s & SIGNATURE_MASK) == LESS_THAN_SIG) { *s = (*s & ~SIGNATURE_MASK) + '0'; *--s = '<'; ++len; } // fixup for log signature split [, // OPEN_BRACKET_SPACE is space, OPEN_BRACKET_SIG + <digit> if ((*s & SIGNATURE_MASK) == OPEN_BRACKET_SIG) { *s = (*s == OPEN_BRACKET_SPACE) ? ' ' : (*s & ~SIGNATURE_MASK) + '0'; *--s = '['; ++len; } } while ((len > 0) && ((*s == '\r') || (*s == '\n'))) { ++s; --len; } if (len <= 0) return last = nullptr; char *peek, *tok = s; for (;;) { if (len <= 0) { last = nullptr; return tok; } char c = *s++; --len; ssize_t adjust; switch (c) { case '\r': case '\n': s[-1] = '\0'; last = s; return tok; case '<': peek = is_prio(s, len); if (!peek) break; if (s != (tok + 1)) { // not first? s[-1] = '\0'; *s &= ~SIGNATURE_MASK; *s |= LESS_THAN_SIG; // signature for '<' last = s; return tok; } adjust = peek - s; if (adjust > len) { adjust = len; } sublen += adjust; len -= adjust; s = peek; if ((*s == '[') && ((peek = is_timestamp(s + 1, len - 1)))) { adjust = peek - s; if (adjust > len) { adjust = len; } sublen += adjust; len -= adjust; s = peek; } break; case '[': peek = is_timestamp(s, len); if (!peek) break; if (s != (tok + 1)) { // not first? s[-1] = '\0'; if (*s == ' ') { *s = OPEN_BRACKET_SPACE; } else { *s &= ~SIGNATURE_MASK; *s |= OPEN_BRACKET_SIG; // signature for '[' } last = s; return tok; } adjust = peek - s; if (adjust > len) { adjust = len; } sublen += adjust; len -= adjust; s = peek; break; } ++sublen; } // NOTREACHED }
char *log_strtok_r(char *s, char **last) { if (!s) { if (!(s = *last)) { return NULL; } // fixup for log signature split <, // LESS_THAN_SIG + <digit> if ((*s & SIGNATURE_MASK) == LESS_THAN_SIG) { *s = (*s & ~SIGNATURE_MASK) + '0'; *--s = '<'; } // fixup for log signature split [, // OPEN_BRACKET_SPACE is space, OPEN_BRACKET_SIG + <digit> if ((*s & SIGNATURE_MASK) == OPEN_BRACKET_SIG) { if (*s == OPEN_BRACKET_SPACE) { *s = ' '; } else { *s = (*s & ~SIGNATURE_MASK) + '0'; } *--s = '['; } } s += strspn(s, "\r\n"); if (!*s) { // no non-delimiter characters *last = NULL; return NULL; } char *peek, *tok = s; for (;;) { char c = *s++; switch (c) { case '\0': *last = NULL; return tok; case '\r': case '\n': s[-1] = '\0'; *last = s; return tok; case '<': peek = is_prio(s); if (!peek) { break; } if (s != (tok + 1)) { // not first? s[-1] = '\0'; *s &= ~SIGNATURE_MASK; *s |= LESS_THAN_SIG; // signature for '<' *last = s; return tok; } s = peek; if ((*s == '[') && ((peek = is_timestamp(s + 1)))) { s = peek; } break; case '[': peek = is_timestamp(s); if (!peek) { break; } if (s != (tok + 1)) { // not first? s[-1] = '\0'; if (*s == ' ') { *s = OPEN_BRACKET_SPACE; } else { *s &= ~SIGNATURE_MASK; *s |= OPEN_BRACKET_SIG; // signature for '[' } *last = s; return tok; } s = peek; break; } } // NOTREACHED }
/* * mo_jupe - oper message handler * * parv[0] = Send prefix * parv[1] = [[+|-]<server name>] * * Local (to me) style: * * parv[2] = [Expiration offset] * parv[3] = [Comment] * * Global (or remote local) style: * * parv[2] = [target] * parv[3] = [Expiration offset] * parv[4] = [Comment] * */ int mo_jupe(struct Client* cptr, struct Client* sptr, int parc, char* parv[]) { struct Client *acptr = 0; struct Jupe *ajupe; unsigned int flags = 0; time_t expire_off; char *server = parv[1], *target = 0, *reason; if (parc < 2) return jupe_list(sptr, 0); if (*server == '+') { flags |= JUPE_ACTIVE; server++; } else if (*server == '-') server++; else return jupe_list(sptr, server); if (!feature_bool(FEAT_CONFIG_OPERCMDS)) return send_reply(sptr, ERR_DISABLED, "JUPE"); if (parc == 4) { if (is_timestamp(parv[2])) { expire_off = atoi(parv[2]); } else { expire_off = ParseInterval(parv[2]); } reason = parv[3]; flags |= JUPE_LOCAL; } else if (parc > 4) { target = parv[2]; if (is_timestamp(parv[3])) { expire_off = atoi(parv[3]); } else { expire_off = ParseInterval(parv[3]); } reason = parv[4]; } else return need_more_params(sptr, "JUPE"); if (target) { if (!(target[0] == '*' && target[1] == '\0')) { if (!(acptr = find_match_server(target))) return send_reply(sptr, ERR_NOSUCHSERVER, target); if (!IsMe(acptr)) { /* manually propagate, since we don't set it */ if (!HasPriv(sptr, PRIV_JUPE)) return send_reply(sptr, ERR_NOPRIVILEGES); sendcmdto_one(sptr, CMD_JUPE, acptr, "%C %c%s %s %Tu :%s", acptr, flags & JUPE_ACTIVE ? '+' : '-', server, parv[3], TStime(), reason); return 0; } else if (!HasPriv(sptr, PRIV_LOCAL_JUPE)) return send_reply(sptr, ERR_NOPRIVILEGES); flags |= JUPE_LOCAL; } else if (!HasPriv(sptr, PRIV_JUPE)) return send_reply(sptr, ERR_NOPRIVILEGES); } ajupe = jupe_find(server); if (ajupe) { if (JupeIsLocal(ajupe) && !(flags & JUPE_LOCAL)) /* global over local */ jupe_free(ajupe); else { if (flags & JUPE_ACTIVE) return jupe_activate(cptr, sptr, ajupe, TStime(), flags); else return jupe_deactivate(cptr, sptr, ajupe, TStime(), flags); } } return jupe_add(cptr, sptr, server, reason, expire_off, TStime(), flags); }