Execute statements.

1 files changed, 118 insertions, 0 deletions

diff --git a/common/execute.c b/common/execute.c
new file mode 100644
index 00000000..c69cf9ef
--- /dev/null
+++ b/common/execute.c
@@ -0,0 +1,118 @@
+/* execute.c
+
+   Support for executable statements. */
+
+/*
+ * Copyright (c) 1998 The Internet Software Consortium.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. Neither the name of The Internet Software Consortium nor the names
+ *    of its contributors may be used to endorse or promote products derived
+ *    from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE INTERNET SOFTWARE CONSORTIUM AND
+ * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
+ * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ * DISCLAIMED.  IN NO EVENT SHALL THE INTERNET SOFTWARE CONSORTIUM OR
+ * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+ * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
+ * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+ * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
+ * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ * This software has been written for the Internet Software Consortium
+ * by Ted Lemon <mellon@fugue.com> in cooperation with Vixie
+ * Enterprises.  To learn more about the Internet Software Consortium,
+ * see ``http://www.vix.com/isc''.  To learn more about Vixie
+ * Enterprises, see ``http://www.vix.com''.
+ */
+
+#ifndef lint
+static char copyright[] =
+"$Id: execute.c,v 1.1 1998/06/25 03:57:00 mellon Exp $ Copyright (c) 1998 The Internet Software Consortium.  All rights reserved.\n";
+#endif /* not lint */
+
+#include "dhcpd.h"
+
+int execute_statements (packet, options, statements)
+	struct packet *packet;
+	struct option_state *options;
+	struct executable_statement *statements;
+{
+	struct executable_statement *r;
+
+	if (!statements)
+		return 1;
+
+	for (r = statements; r; r = r -> next) {
+		switch (r -> op) {
+		      case if_statement:
+			if (!execute_statements
+			    (packet, options,
+			     evaluate_boolean_expression (packet,
+							  r -> data.ie.expr)
+			     ? r -> data.ie.true : r -> data.ie.false))
+				return 0;
+			break;
+
+		      case eval_statement:
+			evaluate_boolean_expression (packet, r -> data.eval);
+			break;
+
+		      case add_statement:
+			classify (packet, r -> data.add);
+			break;
+
+		      case break_statement:
+			return 0;
+
+		      case supersede_option_statement:
+		      case default_option_statement:
+		      case append_option_statement:
+		      case prepend_option_statement:
+			if (r -> data.option -> option -> universe -> set_func)
+				(r -> data.option -> option ->
+				 universe -> set_func) (options,
+							r -> data.option,
+							r -> op);
+			break;
+
+		      default:
+			error ("bogus classification rule type %d\n", r -> op);
+		}
+	}
+
+	return 1;
+}
+
+/* Execute all the statements in a particular scope, and all statements in
+   scopes outer from that scope, but if a particular limiting scope is
+   reached, do not execute statements in that scope or in scopes outer
+   from it. */
+
+void execute_statements_in_scope (packet, options, group, limiting_group)
+	struct packet *packet;
+	struct option_state *options;
+	struct group *group;
+	struct group *limiting_group;
+{
+	struct group *scope;
+
+	for (scope = group;
+	     scope && scope != limiting_group; scope = scope -> next) {
+		execute_statements (packet, options, scope -> statements);
+	}
+}