155682Smarkm/* 2178825Sdfr * Copyright (c) 1997, 1999, 2000, 2003 - 2005 Kungliga Tekniska H�gskolan 355682Smarkm * (Royal Institute of Technology, Stockholm, Sweden). 455682Smarkm * All rights reserved. 555682Smarkm * 655682Smarkm * Redistribution and use in source and binary forms, with or without 755682Smarkm * modification, are permitted provided that the following conditions 855682Smarkm * are met: 955682Smarkm * 1055682Smarkm * 1. Redistributions of source code must retain the above copyright 1155682Smarkm * notice, this list of conditions and the following disclaimer. 1255682Smarkm * 1355682Smarkm * 2. Redistributions in binary form must reproduce the above copyright 1455682Smarkm * notice, this list of conditions and the following disclaimer in the 1555682Smarkm * documentation and/or other materials provided with the distribution. 1655682Smarkm * 1755682Smarkm * 3. Neither the name of the Institute nor the names of its contributors 1855682Smarkm * may be used to endorse or promote products derived from this software 1955682Smarkm * without specific prior written permission. 2055682Smarkm * 2155682Smarkm * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 2255682Smarkm * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 2355682Smarkm * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 2455682Smarkm * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 2555682Smarkm * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 2655682Smarkm * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 2755682Smarkm * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 2855682Smarkm * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 2955682Smarkm * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 3055682Smarkm * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 3155682Smarkm * SUCH DAMAGE. 3255682Smarkm */ 3355682Smarkm 3455682Smarkm#include "gen_locl.h" 3555682Smarkm 36178825SdfrRCSID("$Id: gen_glue.c 15617 2005-07-12 06:27:42Z lha $"); 3755682Smarkm 3855682Smarkmstatic void 39178825Sdfrgenerate_2int (const Type *t, const char *gen_name) 4055682Smarkm{ 4155682Smarkm Member *m; 4255682Smarkm 4355682Smarkm fprintf (headerfile, 4455682Smarkm "unsigned %s2int(%s);\n", 45178825Sdfr gen_name, gen_name); 4655682Smarkm 4755682Smarkm fprintf (codefile, 4855682Smarkm "unsigned %s2int(%s f)\n" 4955682Smarkm "{\n" 5055682Smarkm "unsigned r = 0;\n", 51178825Sdfr gen_name, gen_name); 5255682Smarkm 53178825Sdfr ASN1_TAILQ_FOREACH(m, t->members, members) { 5455682Smarkm fprintf (codefile, "if(f.%s) r |= (1U << %d);\n", 5555682Smarkm m->gen_name, m->val); 5655682Smarkm } 5755682Smarkm fprintf (codefile, "return r;\n" 5855682Smarkm "}\n\n"); 5955682Smarkm} 6055682Smarkm 6155682Smarkmstatic void 62178825Sdfrgenerate_int2 (const Type *t, const char *gen_name) 6355682Smarkm{ 6455682Smarkm Member *m; 6555682Smarkm 6655682Smarkm fprintf (headerfile, 6755682Smarkm "%s int2%s(unsigned);\n", 68178825Sdfr gen_name, gen_name); 6955682Smarkm 7055682Smarkm fprintf (codefile, 7155682Smarkm "%s int2%s(unsigned n)\n" 7255682Smarkm "{\n" 7355682Smarkm "\t%s flags;\n\n", 74178825Sdfr gen_name, gen_name, gen_name); 7555682Smarkm 76178825Sdfr if(t->members) { 77178825Sdfr ASN1_TAILQ_FOREACH(m, t->members, members) { 78178825Sdfr fprintf (codefile, "\tflags.%s = (n >> %d) & 1;\n", 79178825Sdfr m->gen_name, m->val); 80178825Sdfr } 8155682Smarkm } 8255682Smarkm fprintf (codefile, "\treturn flags;\n" 8355682Smarkm "}\n\n"); 8455682Smarkm} 8555682Smarkm 8655682Smarkm/* 8755682Smarkm * This depends on the bit string being declared in increasing order 8855682Smarkm */ 8955682Smarkm 9055682Smarkmstatic void 91178825Sdfrgenerate_units (const Type *t, const char *gen_name) 9255682Smarkm{ 9355682Smarkm Member *m; 9455682Smarkm 9555682Smarkm fprintf (headerfile, 96178825Sdfr "const struct units * asn1_%s_units(void);", 97178825Sdfr gen_name); 9855682Smarkm 9955682Smarkm fprintf (codefile, 100178825Sdfr "static struct units %s_units[] = {\n", 101178825Sdfr gen_name); 10255682Smarkm 103178825Sdfr if(t->members) { 104178825Sdfr ASN1_TAILQ_FOREACH_REVERSE(m, t->members, memhead, members) { 10555682Smarkm fprintf (codefile, 10655682Smarkm "\t{\"%s\",\t1U << %d},\n", m->gen_name, m->val); 10755682Smarkm } 108178825Sdfr } 10955682Smarkm 11055682Smarkm fprintf (codefile, 11155682Smarkm "\t{NULL,\t0}\n" 11255682Smarkm "};\n\n"); 113178825Sdfr 114178825Sdfr fprintf (codefile, 115178825Sdfr "const struct units * asn1_%s_units(void){\n" 116178825Sdfr "return %s_units;\n" 117178825Sdfr "}\n\n", 118178825Sdfr gen_name, gen_name); 119178825Sdfr 120178825Sdfr 12155682Smarkm} 12255682Smarkm 12355682Smarkmvoid 124178825Sdfrgenerate_glue (const Type *t, const char *gen_name) 12555682Smarkm{ 126178825Sdfr switch(t->type) { 127178825Sdfr case TTag: 128178825Sdfr generate_glue(t->subtype, gen_name); 129178825Sdfr break; 13055682Smarkm case TBitString : 131178825Sdfr if (!ASN1_TAILQ_EMPTY(t->members)) { 132178825Sdfr generate_2int (t, gen_name); 133178825Sdfr generate_int2 (t, gen_name); 134178825Sdfr generate_units (t, gen_name); 135178825Sdfr } 13655682Smarkm break; 13755682Smarkm default : 13855682Smarkm break; 13955682Smarkm } 14055682Smarkm} 141