sys/contrib/ngatm/netnatm/sig/genmsgcpyc.awk

   1 #
   2 # Copyright (c) 2001-2003
   3 # Fraunhofer Institute for Open Communication Systems (FhG Fokus).
   4 #       All rights reserved.
   5 #
   6 # Redistribution and use in source and binary forms, with or without
   7 # modification, are permitted provided that the following conditions
   8 # are met:
   9 # 1. Redistributions of source code must retain the above copyright
  10 #    notice, this list of conditions and the following disclaimer.
  11 # 2. Redistributions in binary form must reproduce the above copyright
  12 #    notice, this list of conditions and the following disclaimer in the
  13 #    documentation and/or other materials provided with the distribution.
  14 #
  15 # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  16 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18 # ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  19 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  23 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  24 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  25 # SUCH DAMAGE.
  26 #
  27 # Author: Hartmut Brandt <harti@freebsd.org>
  28 #
  29 # $Begemot: libunimsg/netnatm/sig/genmsgcpyc.awk,v 1.4 2004/07/08 08:22:18 brandt Exp $
  30 #
  31 # Generate copy functions for messages
  32 #
  33 function begin() {
  34 }
  35
  36 function first_entry() {
  37         print "/* This file was created automatically"
  38         print " * Source file: " id
  39         print " * $FreeBSD$"
  40         print " */"
  41         print ""
  42         print "#include <netnatm/msg/unistruct.h>"
  43         print "#include <netnatm/sig/unimsgcpy.h>"
  44 }
  45
  46 function end() {
  47 }
  48
  49 function start_message() {
  50 }
  51
  52 function end_message() {
  53         print ""
  54         print "void"
  55         print "copy_msg_" msg "(struct uni_" msg " *src, struct uni_" msg " *dst)"
  56         print "{"
  57         for(i = 0; i < cnt; i++) {
  58                 if(ienum[i] != "-") {
  59                         print "\tu_int s, d;"
  60                         print ""
  61                         break
  62                 }
  63         }
  64         for(i = 0; i < cnt; i++) {
  65                 ie = iename[i]
  66                 if(ierep[i]) {
  67                         print "\tif(IE_ISGOOD(src->" ie "_repeat))"
  68                         print "\t\tdst->" ie "_repeat = src->" ie "_repeat;"
  69                 }
  70                 if(ienum[i] != "-") {
  71                         print "\tfor(s = d = 0; s < "ienum[i]"; s++)"
  72                         print "\t\tif(IE_ISGOOD(src->"ie"[s]))"
  73                         print "\t\t\tdst->"ie"[d++] = src->"ie"[s];"
  74                 } else {
  75                         print "\tif(IE_ISGOOD(src->"ie"))"
  76                         print "\t\tdst->"ie" = src->"ie";"
  77                 }
  78         }
  79         print "}"
  80 }