Initial commit
[com/gs-lite.git] / include / lfta / gengdatinclude.pl
diff --git a/include/lfta/gengdatinclude.pl b/include/lfta/gengdatinclude.pl
new file mode 100644 (file)
index 0000000..6678a1e
--- /dev/null
@@ -0,0 +1,35 @@
+#! /usr/bin/perl
+
+# ------------------------------------------------
+#   Copyright 2014 AT&T Intellectual Property
+#   Licensed under the Apache License, Version 2.0 (the "License");
+#   you may not use this file except in compliance with the License.
+#   You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+#   Unless required by applicable law or agreed to in writing, software
+#   distributed under the License is distributed on an "AS IS" BASIS,
+#   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+#   See the License for the specific language governing permissions and
+#   limitations under the License.
+# -------------------------------------------
+
+open(I,"cat ../packet.h | grep '#define GDATELEMENTS' | cut -f 3 -d ' ' |");
+$num=<I>;
+close(I);
+chomp $num;
+printf("#ifndef GDAT_MACRO_H\n#define GDAT_MACRO_H\n");
+for($x=1;$x<=$num;$x++) {
+       printf "#define get_gdat_uint_pos$x(X,Y) get_gdat_uint((X),(Y),$x)\n";
+    printf "#define get_gdat_ullong_pos$x(X,Y) get_gdat_ullong((X),(Y),$x)\n";
+    printf "#define get_gdat_ip_pos$x(X,Y) get_gdat_ip((X),(Y),$x)\n";
+    printf "#define get_gdat_ipv6_pos$x(X,Y) get_gdat_ipv6((X),(Y),$x)\n";
+    printf "#define get_gdat_string_pos$x(X,Y) get_gdat_string((X),(Y),$x)\n";
+    printf "#define get_gdat_v_str_pos$x(X,Y) get_gdat_string((X),(Y),$x)\n";
+    printf "#define get_gdat_bool_pos$x(X,Y) get_gdat_bool((X),(Y),$x)\n";
+    printf "#define get_gdat_int_pos$x(X,Y) get_gdat_int((X),(Y),$x)\n";
+    printf "#define get_gdat_llong_pos$x(X,Y) get_gdat_llong((X),(Y),$x)\n";
+    printf "#define get_gdat_float_pos$x(X,Y) get_gdat_float((X),(Y),$x)\n";
+}
+print("#endif\n");