- char *sp = NULL;
- char *port = strtok_r(arg, ":q", &sp);
- char *queue = strtok_r(NULL, "", &sp);
- struct ofpact_enqueue *enqueue;
-
- if (port == NULL || queue == NULL) {
- return xstrdup("\"enqueue\" syntax is \"enqueue:PORT:QUEUE\"");
- }
-
- enqueue = ofpact_put_ENQUEUE(ofpacts);
- if (!ofputil_port_from_string(port, &enqueue->port)) {
- return xasprintf("%s: enqueue to unknown port", port);
- }
- return str_to_u32(queue, &enqueue->queue);
-}
-
-/* Parses 'arg' as the argument to an "output" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_output(const char *arg, struct ofpbuf *ofpacts)
-{
- if (strchr(arg, '[')) {
- struct ofpact_output_reg *output_reg;
-
- output_reg = ofpact_put_OUTPUT_REG(ofpacts);
- output_reg->max_len = UINT16_MAX;
- return mf_parse_subfield(&output_reg->src, arg);
- } else {
- struct ofpact_output *output;
-
- output = ofpact_put_OUTPUT(ofpacts);
- output->max_len = output->port == OFPP_CONTROLLER ? UINT16_MAX : 0;
- if (!ofputil_port_from_string(arg, &output->port)) {
- return xasprintf("%s: output to unknown port", arg);
- }
- return NULL;
- }
-}
-
-/* Parses 'arg' as the argument to an "resubmit" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_resubmit(char *arg, struct ofpbuf *ofpacts)
-{
- struct ofpact_resubmit *resubmit;
- char *in_port_s, *table_s;
-
- resubmit = ofpact_put_RESUBMIT(ofpacts);
-
- in_port_s = strsep(&arg, ",");
- if (in_port_s && in_port_s[0]) {
- if (!ofputil_port_from_string(in_port_s, &resubmit->in_port)) {
- return xasprintf("%s: resubmit to unknown port", in_port_s);
- }
- } else {
- resubmit->in_port = OFPP_IN_PORT;
- }
-
- table_s = strsep(&arg, ",");
- if (table_s && table_s[0]) {
- uint32_t table_id = 0;
- char *error;
-
- error = str_to_u32(table_s, &table_id);
- if (error) {
- return error;
- }
- resubmit->table_id = table_id;
- } else {
- resubmit->table_id = 255;
- }
-
- if (resubmit->in_port == OFPP_IN_PORT && resubmit->table_id == 255) {
- return xstrdup("at least one \"in_port\" or \"table\" must be "
- "specified on resubmit");
- }
- return NULL;
-}
-
-/* Parses 'arg' as the argument to a "note" action, and appends such an action
- * to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_note(const char *arg, struct ofpbuf *ofpacts)
-{
- struct ofpact_note *note;
-
- note = ofpact_put_NOTE(ofpacts);
- while (*arg != '\0') {
- uint8_t byte;
- bool ok;
-
- if (*arg == '.') {
- arg++;
- }
- if (*arg == '\0') {
- break;
- }
-
- byte = hexits_value(arg, 2, &ok);
- if (!ok) {
- return xstrdup("bad hex digit in `note' argument");
- }
- ofpbuf_put(ofpacts, &byte, 1);
-
- note = ofpacts->l2;
- note->length++;
-
- arg += 2;
- }
- ofpact_update_len(ofpacts, ¬e->ofpact);
- return NULL;
-}
-
-/* Parses 'arg' as the argument to a "fin_timeout" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_fin_timeout(struct ofpbuf *b, char *arg)
-{
- struct ofpact_fin_timeout *oft = ofpact_put_FIN_TIMEOUT(b);
- char *key, *value;
-
- while (ofputil_parse_key_value(&arg, &key, &value)) {
- char *error;
-
- if (!strcmp(key, "idle_timeout")) {
- error = str_to_u16(value, key, &oft->fin_idle_timeout);
- } else if (!strcmp(key, "hard_timeout")) {
- error = str_to_u16(value, key, &oft->fin_hard_timeout);
- } else {
- error = xasprintf("invalid key '%s' in 'fin_timeout' argument",
- key);
- }
-
- if (error) {
- return error;
- }
- }
- return NULL;
-}
-
-/* Parses 'arg' as the argument to a "controller" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_controller(struct ofpbuf *b, char *arg)
-{
- enum ofp_packet_in_reason reason = OFPR_ACTION;
- uint16_t controller_id = 0;
- uint16_t max_len = UINT16_MAX;
-
- if (!arg[0]) {
- /* Use defaults. */
- } else if (strspn(arg, "0123456789") == strlen(arg)) {
- char *error = str_to_u16(arg, "max_len", &max_len);
- if (error) {
- return error;
- }
- } else {
- char *name, *value;
-
- while (ofputil_parse_key_value(&arg, &name, &value)) {
- if (!strcmp(name, "reason")) {
- if (!ofputil_packet_in_reason_from_string(value, &reason)) {
- return xasprintf("unknown reason \"%s\"", value);
- }
- } else if (!strcmp(name, "max_len")) {
- char *error = str_to_u16(value, "max_len", &max_len);
- if (error) {
- return error;
- }
- } else if (!strcmp(name, "id")) {
- char *error = str_to_u16(value, "id", &controller_id);
- if (error) {
- return error;
- }
- } else {
- return xasprintf("unknown key \"%s\" parsing controller "
- "action", name);
- }
- }
- }
-
- if (reason == OFPR_ACTION && controller_id == 0) {
- struct ofpact_output *output;
-
- output = ofpact_put_OUTPUT(b);
- output->port = OFPP_CONTROLLER;
- output->max_len = max_len;
- } else {
- struct ofpact_controller *controller;
-
- controller = ofpact_put_CONTROLLER(b);
- controller->max_len = max_len;
- controller->reason = reason;
- controller->controller_id = controller_id;
- }
-
- return NULL;
-}
-
-static void
-parse_noargs_dec_ttl(struct ofpbuf *b)
-{
- struct ofpact_cnt_ids *ids;
- uint16_t id = 0;
-
- ids = ofpact_put_DEC_TTL(b);
- ofpbuf_put(b, &id, sizeof id);
- ids = b->l2;
- ids->n_controllers++;
- ofpact_update_len(b, &ids->ofpact);
-}
-
-/* Parses 'arg' as the argument to a "dec_ttl" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_dec_ttl(struct ofpbuf *b, char *arg)
-{
- if (*arg == '\0') {
- parse_noargs_dec_ttl(b);
- } else {
- struct ofpact_cnt_ids *ids;
- char *cntr;
-
- ids = ofpact_put_DEC_TTL(b);
- ids->ofpact.compat = OFPUTIL_NXAST_DEC_TTL_CNT_IDS;
- for (cntr = strtok_r(arg, ", ", &arg); cntr != NULL;
- cntr = strtok_r(NULL, ", ", &arg)) {
- uint16_t id = atoi(cntr);
-
- ofpbuf_put(b, &id, sizeof id);
- ids = b->l2;
- ids->n_controllers++;
- }
- if (!ids->n_controllers) {
- return xstrdup("dec_ttl_cnt_ids: expected at least one controller "
- "id.");
- }
- ofpact_update_len(b, &ids->ofpact);
- }
- return NULL;
-}
-
-/* Parses 'arg' as the argument to a "set_mpls_ttl" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_set_mpls_ttl(struct ofpbuf *b, const char *arg)
-{
- struct ofpact_mpls_ttl *mpls_ttl = ofpact_put_SET_MPLS_TTL(b);
-
- if (*arg == '\0') {
- return xstrdup("parse_set_mpls_ttl: expected ttl.");
- }
-
- mpls_ttl->ttl = atoi(arg);
- return NULL;
-}
-
-/* Parses a "set_field" action with argument 'arg', appending the parsed
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-set_field_parse__(char *arg, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- struct ofpact_reg_load *load = ofpact_put_REG_LOAD(ofpacts);
- char *value;
- char *delim;
- char *key;
- const struct mf_field *mf;
- char *error;
- union mf_value mf_value;
-
- value = arg;
- delim = strstr(arg, "->");
- if (!delim) {
- return xasprintf("%s: missing `->'", arg);
- }
- if (strlen(delim) <= strlen("->")) {
- return xasprintf("%s: missing field name following `->'", arg);
- }
-
- key = delim + strlen("->");
- mf = mf_from_name(key);
- if (!mf) {
- return xasprintf("%s is not a valid OXM field name", key);
- }
- if (!mf->writable) {
- return xasprintf("%s is read-only", key);
- }
-
- delim[0] = '\0';
- error = mf_parse_value(mf, value, &mf_value);
- if (error) {
- return error;
- }
- if (!mf_is_value_valid(mf, &mf_value)) {
- return xasprintf("%s is not a valid value for field %s", value, key);
- }
- ofpact_set_field_init(load, mf, &mf_value);
-
- *usable_protocols &= mf->usable_protocols;
- return NULL;
-}
-
-/* Parses 'arg' as the argument to a "set_field" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-set_field_parse(const char *arg, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- char *copy = xstrdup(arg);
- char *error = set_field_parse__(copy, ofpacts, usable_protocols);
- free(copy);
- return error;
-}
-
-/* Parses 'arg' as the argument to a "write_metadata" instruction, and appends
- * such an action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_metadata(struct ofpbuf *b, char *arg)
-{
- struct ofpact_metadata *om;
- char *mask = strchr(arg, '/');
-
- om = ofpact_put_WRITE_METADATA(b);
-
- if (mask) {
- char *error;
-
- *mask = '\0';
- error = str_to_be64(mask + 1, &om->mask);
- if (error) {
- return error;
- }
- } else {
- om->mask = OVS_BE64_MAX;
- }
-
- return str_to_be64(arg, &om->metadata);
-}
-
-/* Parses 'arg' as the argument to a "sample" action, and appends such an
- * action to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_sample(struct ofpbuf *b, char *arg)
-{
- struct ofpact_sample *os = ofpact_put_SAMPLE(b);
- char *key, *value;
-
- while (ofputil_parse_key_value(&arg, &key, &value)) {
- char *error = NULL;
-
- if (!strcmp(key, "probability")) {
- error = str_to_u16(value, "probability", &os->probability);
- if (!error && os->probability == 0) {
- error = xasprintf("invalid probability value \"%s\"", value);
- }
- } else if (!strcmp(key, "collector_set_id")) {
- error = str_to_u32(value, &os->collector_set_id);
- } else if (!strcmp(key, "obs_domain_id")) {
- error = str_to_u32(value, &os->obs_domain_id);
- } else if (!strcmp(key, "obs_point_id")) {
- error = str_to_u32(value, &os->obs_point_id);
- } else {
- error = xasprintf("invalid key \"%s\" in \"sample\" argument",
- key);
- }
- if (error) {
- return error;
- }
- }
- if (os->probability == 0) {
- return xstrdup("non-zero \"probability\" must be specified on sample");
- }
- return NULL;
-}
-
-/* Parses 'arg' as the argument to action 'code', and appends such an action to
- * 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_named_action(enum ofputil_action_code code,
- char *arg, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- size_t orig_size = ofpacts->size;
- struct ofpact_tunnel *tunnel;
- struct ofpact_vlan_vid *vlan_vid;
- struct ofpact_vlan_pcp *vlan_pcp;
- char *error = NULL;
- uint16_t ethertype = 0;
- uint16_t vid = 0;
- uint8_t tos = 0, ecn, ttl;
- uint8_t pcp = 0;
-
- switch (code) {
- case OFPUTIL_ACTION_INVALID:
- NOT_REACHED();
-
- case OFPUTIL_OFPAT10_OUTPUT:
- case OFPUTIL_OFPAT11_OUTPUT:
- error = parse_output(arg, ofpacts);
- break;
-
- case OFPUTIL_OFPAT10_SET_VLAN_VID:
- case OFPUTIL_OFPAT11_SET_VLAN_VID:
- error = str_to_u16(arg, "VLAN VID", &vid);
- if (error) {
- return error;
- }
-
- if (vid & ~VLAN_VID_MASK) {
- return xasprintf("%s: not a valid VLAN VID", arg);
- }
- vlan_vid = ofpact_put_SET_VLAN_VID(ofpacts);
- vlan_vid->vlan_vid = vid;
- vlan_vid->ofpact.compat = code;
- vlan_vid->push_vlan_if_needed = code == OFPUTIL_OFPAT10_SET_VLAN_VID;
- break;
-
- case OFPUTIL_OFPAT10_SET_VLAN_PCP:
- case OFPUTIL_OFPAT11_SET_VLAN_PCP:
- error = str_to_u8(arg, "VLAN PCP", &pcp);
- if (error) {
- return error;
- }
-
- if (pcp & ~7) {
- return xasprintf("%s: not a valid VLAN PCP", arg);
- }
- vlan_pcp = ofpact_put_SET_VLAN_PCP(ofpacts);
- vlan_pcp->vlan_pcp = pcp;
- vlan_pcp->ofpact.compat = code;
- vlan_pcp->push_vlan_if_needed = code == OFPUTIL_OFPAT10_SET_VLAN_PCP;
- break;
-
- case OFPUTIL_OFPAT12_SET_FIELD:
- return set_field_parse(arg, ofpacts, usable_protocols);
-
- case OFPUTIL_OFPAT10_STRIP_VLAN:
- case OFPUTIL_OFPAT11_POP_VLAN:
- ofpact_put_STRIP_VLAN(ofpacts)->ofpact.compat = code;
- break;
-
- case OFPUTIL_OFPAT11_PUSH_VLAN:
- *usable_protocols &= OFPUTIL_P_OF11_UP;
- error = str_to_u16(arg, "ethertype", ðertype);
- if (error) {
- return error;
- }
-
- if (ethertype != ETH_TYPE_VLAN_8021Q) {
- /* XXX ETH_TYPE_VLAN_8021AD case isn't supported */
- return xasprintf("%s: not a valid VLAN ethertype", arg);
- }
-
- ofpact_put_PUSH_VLAN(ofpacts);
- break;
-
- case OFPUTIL_OFPAT11_SET_QUEUE:
- error = str_to_u32(arg, &ofpact_put_SET_QUEUE(ofpacts)->queue_id);
- break;
-
- case OFPUTIL_OFPAT10_SET_DL_SRC:
- case OFPUTIL_OFPAT11_SET_DL_SRC:
- error = str_to_mac(arg, ofpact_put_SET_ETH_SRC(ofpacts)->mac);
- break;
-
- case OFPUTIL_OFPAT10_SET_DL_DST:
- case OFPUTIL_OFPAT11_SET_DL_DST:
- error = str_to_mac(arg, ofpact_put_SET_ETH_DST(ofpacts)->mac);
- break;
-
- case OFPUTIL_OFPAT10_SET_NW_SRC:
- case OFPUTIL_OFPAT11_SET_NW_SRC:
- error = str_to_ip(arg, &ofpact_put_SET_IPV4_SRC(ofpacts)->ipv4);
- break;
-
- case OFPUTIL_OFPAT10_SET_NW_DST:
- case OFPUTIL_OFPAT11_SET_NW_DST:
- error = str_to_ip(arg, &ofpact_put_SET_IPV4_DST(ofpacts)->ipv4);
- break;
-
- case OFPUTIL_OFPAT10_SET_NW_TOS:
- case OFPUTIL_OFPAT11_SET_NW_TOS:
- error = str_to_u8(arg, "TOS", &tos);
- if (error) {
- return error;
- }
-
- if (tos & ~IP_DSCP_MASK) {
- return xasprintf("%s: not a valid TOS", arg);
- }
- ofpact_put_SET_IP_DSCP(ofpacts)->dscp = tos;
- break;
-
- case OFPUTIL_OFPAT11_SET_NW_ECN:
- error = str_to_u8(arg, "ECN", &ecn);
- if (error) {
- return error;
- }
-
- if (ecn & ~IP_ECN_MASK) {
- return xasprintf("%s: not a valid ECN", arg);
- }
- ofpact_put_SET_IP_ECN(ofpacts)->ecn = ecn;
- break;
-
- case OFPUTIL_OFPAT11_SET_NW_TTL:
- error = str_to_u8(arg, "TTL", &ttl);
- if (error) {
- return error;
- }
-
- ofpact_put_SET_IP_TTL(ofpacts)->ttl = ttl;
- break;
-
- case OFPUTIL_OFPAT11_DEC_NW_TTL:
- NOT_REACHED();
-
- case OFPUTIL_OFPAT10_SET_TP_SRC:
- case OFPUTIL_OFPAT11_SET_TP_SRC:
- error = str_to_u16(arg, "source port",
- &ofpact_put_SET_L4_SRC_PORT(ofpacts)->port);
- break;
-
- case OFPUTIL_OFPAT10_SET_TP_DST:
- case OFPUTIL_OFPAT11_SET_TP_DST:
- error = str_to_u16(arg, "destination port",
- &ofpact_put_SET_L4_DST_PORT(ofpacts)->port);
- break;
-
- case OFPUTIL_OFPAT10_ENQUEUE:
- error = parse_enqueue(arg, ofpacts);
- break;
-
- case OFPUTIL_NXAST_RESUBMIT:
- error = parse_resubmit(arg, ofpacts);
- break;
-
- case OFPUTIL_NXAST_SET_TUNNEL:
- case OFPUTIL_NXAST_SET_TUNNEL64:
- tunnel = ofpact_put_SET_TUNNEL(ofpacts);
- tunnel->ofpact.compat = code;
- error = str_to_u64(arg, &tunnel->tun_id);
- break;
-
- case OFPUTIL_NXAST_WRITE_METADATA:
- error = parse_metadata(ofpacts, arg);
- break;
-
- case OFPUTIL_NXAST_SET_QUEUE:
- error = str_to_u32(arg, &ofpact_put_SET_QUEUE(ofpacts)->queue_id);
- break;
-
- case OFPUTIL_NXAST_POP_QUEUE:
- ofpact_put_POP_QUEUE(ofpacts);
- break;
-
- case OFPUTIL_NXAST_REG_MOVE:
- error = nxm_parse_reg_move(ofpact_put_REG_MOVE(ofpacts), arg);
- break;
-
- case OFPUTIL_NXAST_REG_LOAD:
- error = nxm_parse_reg_load(ofpact_put_REG_LOAD(ofpacts), arg);
- break;
-
- case OFPUTIL_NXAST_NOTE:
- error = parse_note(arg, ofpacts);
- break;
-
- case OFPUTIL_NXAST_MULTIPATH:
- error = multipath_parse(ofpact_put_MULTIPATH(ofpacts), arg);
- break;
-
- case OFPUTIL_NXAST_BUNDLE:
- error = bundle_parse(arg, ofpacts);
- break;
-
- case OFPUTIL_NXAST_BUNDLE_LOAD:
- error = bundle_parse_load(arg, ofpacts);
- break;
-
- case OFPUTIL_NXAST_RESUBMIT_TABLE:
- case OFPUTIL_NXAST_OUTPUT_REG:
- case OFPUTIL_NXAST_DEC_TTL_CNT_IDS:
- NOT_REACHED();
-
- case OFPUTIL_NXAST_LEARN:
- error = learn_parse(arg, ofpacts);
- break;
-
- case OFPUTIL_NXAST_EXIT:
- ofpact_put_EXIT(ofpacts);
- break;
-
- case OFPUTIL_NXAST_DEC_TTL:
- error = parse_dec_ttl(ofpacts, arg);
- break;
-
- case OFPUTIL_NXAST_SET_MPLS_TTL:
- case OFPUTIL_OFPAT11_SET_MPLS_TTL:
- error = parse_set_mpls_ttl(ofpacts, arg);
- break;
-
- case OFPUTIL_OFPAT11_DEC_MPLS_TTL:
- case OFPUTIL_NXAST_DEC_MPLS_TTL:
- ofpact_put_DEC_MPLS_TTL(ofpacts);
- break;
-
- case OFPUTIL_NXAST_FIN_TIMEOUT:
- error = parse_fin_timeout(ofpacts, arg);
- break;
-
- case OFPUTIL_NXAST_CONTROLLER:
- error = parse_controller(ofpacts, arg);
- break;
-
- case OFPUTIL_OFPAT11_PUSH_MPLS:
- case OFPUTIL_NXAST_PUSH_MPLS:
- error = str_to_u16(arg, "push_mpls", ðertype);
- if (!error) {
- ofpact_put_PUSH_MPLS(ofpacts)->ethertype = htons(ethertype);
- }
- break;
-
- case OFPUTIL_OFPAT11_POP_MPLS:
- case OFPUTIL_NXAST_POP_MPLS:
- error = str_to_u16(arg, "pop_mpls", ðertype);
- if (!error) {
- ofpact_put_POP_MPLS(ofpacts)->ethertype = htons(ethertype);
- }
- break;
-
- case OFPUTIL_OFPAT11_GROUP:
- error = str_to_u32(arg, &ofpact_put_GROUP(ofpacts)->group_id);
- break;
-
- case OFPUTIL_NXAST_STACK_PUSH:
- error = nxm_parse_stack_action(ofpact_put_STACK_PUSH(ofpacts), arg);
- break;
- case OFPUTIL_NXAST_STACK_POP:
- error = nxm_parse_stack_action(ofpact_put_STACK_POP(ofpacts), arg);
- break;
-
- case OFPUTIL_NXAST_SAMPLE:
- error = parse_sample(ofpacts, arg);
- break;
- }
-
- if (error) {
- ofpacts->size = orig_size;
- }
- return error;
-}
-
-/* Parses action 'act', with argument 'arg', and appends a parsed version to
- * 'ofpacts'.
- *
- * 'n_actions' specifies the number of actions already parsed (for proper
- * handling of "drop" actions).
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-str_to_ofpact__(char *pos, char *act, char *arg,
- struct ofpbuf *ofpacts, int n_actions,
- enum ofputil_protocol *usable_protocols)
-{
- int code = ofputil_action_code_from_name(act);
- if (code >= 0) {
- return parse_named_action(code, arg, ofpacts, usable_protocols);
- } else if (!strcasecmp(act, "drop")) {
- if (n_actions) {
- return xstrdup("Drop actions must not be preceded by other "
- "actions");
- } else if (ofputil_parse_key_value(&pos, &act, &arg)) {
- return xstrdup("Drop actions must not be followed by other "
- "actions");
- }
- } else {
- ofp_port_t port;
- if (ofputil_port_from_string(act, &port)) {
- ofpact_put_OUTPUT(ofpacts)->port = port;
- } else {
- return xasprintf("Unknown action: %s", act);
- }
- }
-
- return NULL;
-}
-
-/* Parses 'str' as a series of actions, and appends them to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-str_to_ofpacts__(char *str, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- size_t orig_size = ofpacts->size;
- char *pos, *act, *arg;
- int n_actions;
-
- pos = str;
- n_actions = 0;
- while (ofputil_parse_key_value(&pos, &act, &arg)) {
- char *error = str_to_ofpact__(pos, act, arg, ofpacts, n_actions,
- usable_protocols);
- if (error) {
- ofpacts->size = orig_size;
- return error;
- }
- n_actions++;
- }
-
- ofpact_pad(ofpacts);
- return NULL;
-}
-
-
-/* Parses 'str' as a series of actions, and appends them to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-str_to_ofpacts(char *str, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- size_t orig_size = ofpacts->size;
- char *error_s;
- enum ofperr error;
-
- error_s = str_to_ofpacts__(str, ofpacts, usable_protocols);
- if (error_s) {
- return error_s;
- }
-
- error = ofpacts_verify(ofpacts->data, ofpacts->size);
- if (error) {
- ofpacts->size = orig_size;
- return xstrdup("Incorrect action ordering");
- }
-
- return NULL;
-}
-
-/* Parses 'arg' as the argument to instruction 'type', and appends such an
- * instruction to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-parse_named_instruction(enum ovs_instruction_type type,
- char *arg, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- char *error_s = NULL;
- enum ofperr error;
-
- *usable_protocols &= OFPUTIL_P_OF11_UP;
-
- switch (type) {
- case OVSINST_OFPIT11_APPLY_ACTIONS:
- NOT_REACHED(); /* This case is handled by str_to_inst_ofpacts() */
- break;
-
- case OVSINST_OFPIT11_WRITE_ACTIONS: {
- struct ofpact_nest *on;
- size_t ofs;
-
- ofpact_pad(ofpacts);
- ofs = ofpacts->size;
- on = ofpact_put(ofpacts, OFPACT_WRITE_ACTIONS,
- offsetof(struct ofpact_nest, actions));
- error_s = str_to_ofpacts__(arg, ofpacts, usable_protocols);
-
- on = ofpbuf_at_assert(ofpacts, ofs, sizeof *on);
- on->ofpact.len = ofpacts->size - ofs;
-
- if (error_s) {
- ofpacts->size = ofs;
- }
- break;
- }
-
- case OVSINST_OFPIT11_CLEAR_ACTIONS:
- ofpact_put_CLEAR_ACTIONS(ofpacts);
- break;
-
- case OVSINST_OFPIT13_METER:
- *usable_protocols &= OFPUTIL_P_OF13_UP;
- error_s = str_to_u32(arg, &ofpact_put_METER(ofpacts)->meter_id);
- break;
-
- case OVSINST_OFPIT11_WRITE_METADATA:
- *usable_protocols &= OFPUTIL_P_NXM_OF11_UP;
- error_s = parse_metadata(ofpacts, arg);
- break;
-
- case OVSINST_OFPIT11_GOTO_TABLE: {
- struct ofpact_goto_table *ogt = ofpact_put_GOTO_TABLE(ofpacts);
- char *table_s = strsep(&arg, ",");
- if (!table_s || !table_s[0]) {
- return xstrdup("instruction goto-table needs table id");
- }
- error_s = str_to_u8(table_s, "table", &ogt->table_id);
- break;
- }
- }
-
- if (error_s) {
- return error_s;
- }
-
- /* If write_metadata is specified as an action AND an instruction, ofpacts
- could be invalid. */
- error = ofpacts_verify(ofpacts->data, ofpacts->size);
- if (error) {
- return xstrdup("Incorrect instruction ordering");
- }
- return NULL;
-}
-
-/* Parses 'str' as a series of instructions, and appends them to 'ofpacts'.
- *
- * Returns NULL if successful, otherwise a malloc()'d string describing the
- * error. The caller is responsible for freeing the returned string. */
-static char * WARN_UNUSED_RESULT
-str_to_inst_ofpacts(char *str, struct ofpbuf *ofpacts,
- enum ofputil_protocol *usable_protocols)
-{
- size_t orig_size = ofpacts->size;
- char *pos, *inst, *arg;
- int type;
- const char *prev_inst = NULL;
- int prev_type = -1;
- int n_actions = 0;
-
- pos = str;
- while (ofputil_parse_key_value(&pos, &inst, &arg)) {
- type = ovs_instruction_type_from_name(inst);
- if (type < 0) {
- char *error = str_to_ofpact__(pos, inst, arg, ofpacts, n_actions,
- usable_protocols);
- if (error) {
- ofpacts->size = orig_size;
- return error;
- }
-
- type = OVSINST_OFPIT11_APPLY_ACTIONS;
- if (prev_type == type) {
- n_actions++;
- continue;
- }
- } else if (type == OVSINST_OFPIT11_APPLY_ACTIONS) {
- ofpacts->size = orig_size;
- return xasprintf("%s isn't supported. Just write actions then "
- "it is interpreted as apply_actions", inst);
- } else {
- char *error = parse_named_instruction(type, arg, ofpacts,
- usable_protocols);
- if (error) {
- ofpacts->size = orig_size;
- return error;
- }
- }
-
- if (type <= prev_type) {
- ofpacts->size = orig_size;
- if (type == prev_type) {
- return xasprintf("instruction %s may be specified only once",
- inst);
- } else {
- return xasprintf("instruction %s must be specified before %s",
- inst, prev_inst);
- }
- }
-
- prev_inst = inst;
- prev_type = type;
- n_actions++;