qemu-devel.nongnu.org archive mirror
 help / color / mirror / Atom feed
From: Luiz Capitulino <lcapitulino@redhat.com>
To: Anthony Liguori <anthony@codemonkey.ws>
Cc: Jes.Sorensen@redhat.com, agl@linux.vnet.ibm.com,
	Michael Roth <mdroth@linux.vnet.ibm.com>,
	qemu-devel@nongnu.org
Subject: Re: [Qemu-devel] [PATCH v2][ 05/21] qapi: add qapi-types.py code generator
Date: Tue, 7 Jun 2011 16:12:03 -0300	[thread overview]
Message-ID: <20110607161203.42fc3601@doriath> (raw)
In-Reply-To: <4DEE76CD.9070405@codemonkey.ws>

On Tue, 07 Jun 2011 14:06:53 -0500
Anthony Liguori <anthony@codemonkey.ws> wrote:

> On 06/03/2011 05:33 PM, Michael Roth wrote:
> > This is the code generator for qapi types. It will generation the
> > following files:
> >
> >    $(prefix)qapi-types.h - C types corresponding to types defined in
> >                            the schema you pass in
> >    $(prefix)qapi-types.c - Cleanup functions for the above C types
> >
> > The $(prefix) is used to as a namespace to keep the generated code from
> > one schema/code-generation separated from others so code and be
> > generated from multiple schemas with clobbering previously created code.
> >
> > Signed-off-by: Michael Roth<mdroth@linux.vnet.ibm.com>
> > ---
> >   scripts/qapi-types.py |  221 +++++++++++++++++++++++++++++++++++++++++++++++++
> >   1 files changed, 221 insertions(+), 0 deletions(-)
> >   create mode 100644 scripts/qapi-types.py
> >
> > diff --git a/scripts/qapi-types.py b/scripts/qapi-types.py
> > new file mode 100644
> > index 0000000..15603f3
> > --- /dev/null
> > +++ b/scripts/qapi-types.py
> 
> Other than copyright, I think this is ready to go.
> 
> Haven't seen much comments about this series.  I think we're at the 
> speak now or forever hold your peace moment, so if you've got concerns 
> about this approach, please speak up.

Haven't started reviewing it yet, hope to start doing it tomorrow.

> 
> Regards,
> 
> Anthony Liguori
> 
> > @@ -0,0 +1,221 @@
> > +from ordereddict import OrderedDict
> > +from qapi import *
> > +import sys
> > +import os
> > +import getopt
> > +
> > +def generate_fwd_struct(name, members):
> > +    return mcgen('''
> > +typedef struct %(name)s %(name)s;
> > +
> > +typedef struct %(name)sList
> > +{
> > +    %(name)s *value;
> > +    struct %(name)sList *next;
> > +} %(name)sList;
> > +''',
> > +                 name=name)
> > +
> > +def generate_struct(structname, fieldname, members):
> > +    ret = mcgen('''
> > +struct %(name)s
> > +{
> > +''',
> > +          name=structname)
> > +
> > +    for argname, argentry, optional, structured in parse_args(members):
> > +        if optional:
> > +            ret += mcgen('''
> > +    bool has_%(c_name)s;
> > +''',
> > +                         c_name=c_var(argname))
> > +        if structured:
> > +            push_indent()
> > +            ret += generate_struct("", argname, argentry)
> > +            pop_indent()
> > +        else:
> > +            ret += mcgen('''
> > +    %(c_type)s %(c_name)s;
> > +''',
> > +                     c_type=c_type(argentry), c_name=c_var(argname))
> > +
> > +    if len(fieldname):
> > +        fieldname = " " + fieldname
> > +    ret += mcgen('''
> > +}%(field)s;
> > +''',
> > +            field=fieldname)
> > +
> > +    return ret
> > +
> > +def generate_handle(name, typeinfo):
> > +    return mcgen('''
> > +typedef struct %(name)s
> > +{
> > +    %(c_type)s handle;
> > +} %(name)s;
> > +
> > +typedef struct %(name)sList
> > +{
> > +    %(name)s *value;
> > +    struct %(name)sList *next;
> > +} %(name)sList;
> > +''',
> > +                 name=name, c_type=c_type(typeinfo))
> > +
> > +def generate_enum(name, values):
> > +    ret = mcgen('''
> > +typedef enum %(name)s
> > +{
> > +''',
> > +                name=name)
> > +
> > +    i = 1
> > +    for value in values:
> > +        ret += mcgen('''
> > +    %(abbrev)s_%(value)s = %(i)d,
> > +''',
> > +                     abbrev=de_camel_case(name).upper(),
> > +                     value=c_var(value).upper(),
> > +                     i=i)
> > +        i += 1
> > +
> > +    ret += mcgen('''
> > +} %(name)s;
> > +''',
> > +                 name=name)
> > +
> > +    return ret
> > +
> > +def generate_union(name, typeinfo):
> > +    ret = mcgen('''
> > +struct %(name)s
> > +{
> > +    %(name)sKind kind;
> > +    union {
> > +''',
> > +                name=name)
> > +
> > +    for key in typeinfo:
> > +        ret += mcgen('''
> > +        %(c_type)s %(c_name)s;
> > +''',
> > +                     c_type=c_type(typeinfo[key]),
> > +                     c_name=c_var(key))
> > +
> > +    ret += mcgen('''
> > +    };
> > +};
> > +''')
> > +
> > +    return ret
> > +
> > +def generate_type_cleanup_decl(name):
> > +    ret = mcgen('''
> > +void qapi_free_%(type)s(%(c_type)s obj);
> > +''',
> > +                c_type=c_type(name),type=name)
> > +    return ret
> > +
> > +def generate_type_cleanup(name):
> > +    ret = mcgen('''
> > +void qapi_free_%(type)s(%(c_type)s obj)
> > +{
> > +    QapiDeallocVisiter *md;
> > +    Visiter *v;
> > +
> > +    if (!obj) {
> > +        return;
> > +    }
> > +
> > +    md = qapi_dealloc_visiter_new();
> > +    v = qapi_dealloc_get_visiter(md);
> > +    visit_type_%(type)s(v,&obj, NULL, NULL);
> > +    qapi_dealloc_visiter_cleanup(md);
> > +}
> > +''',
> > +                c_type=c_type(name),type=name)
> > +    return ret
> > +
> > +
> > +try:
> > +    opts, args = getopt.gnu_getopt(sys.argv[1:], "p:o:", ["prefix=", "output-dir="])
> > +except getopt.GetoptError, err:
> > +    print str(err)
> > +    sys.exit(1)
> > +
> > +output_dir = ""
> > +prefix = ""
> > +c_file = 'qapi-types.c'
> > +h_file = 'qapi-types.h'
> > +
> > +for o, a in opts:
> > +    if o in ("-p", "--prefix"):
> > +        prefix = a
> > +    elif o in ("-o", "--output-dir"):
> > +        output_dir = a + "/"
> > +
> > +c_file = output_dir + prefix + c_file
> > +h_file = output_dir + prefix + h_file
> > +
> > +if os.path.isdir(output_dir) == False:
> > +    os.makedirs(output_dir)
> > +
> > +fdef = open(c_file, 'w')
> > +fdecl = open(h_file, 'w')
> > +
> > +fdef.write(mcgen('''
> > +/* AUTOMATICALLY GENERATED, DO NOT MODIFY */
> > +
> > +#include "qapi/qapi-dealloc-visiter.h"
> > +#include "%(prefix)sqapi-types.h"
> > +#include "%(prefix)sqapi-visit.h"
> > +
> > +''',             prefix=prefix))
> > +
> > +fdecl.write(mcgen('''
> > +/* AUTOMATICALLY GENERATED, DO NOT MODIFY */
> > +#ifndef %(guard)s
> > +#define %(guard)s
> > +
> > +#include "qapi/qapi-types-core.h"
> > +''',
> > +                  guard=guardname(h_file)))
> > +
> > +exprs = parse_schema(sys.stdin)
> > +
> > +for expr in exprs:
> > +    ret = "\n"
> > +    if expr.has_key('type'):
> > +        ret += generate_fwd_struct(expr['type'], expr['data'])
> > +    elif expr.has_key('enum'):
> > +        add_enum(expr['enum'])
> > +        ret += generate_enum(expr['enum'], expr['data'])
> > +    elif expr.has_key('union'):
> > +        add_enum('%sKind' % expr['union'])
> > +        ret += generate_fwd_struct(expr['union'], expr['data']) + "\n"
> > +        ret += generate_enum('%sKind' % expr['union'], expr['data'].keys())
> > +    else:
> > +        continue
> > +    fdecl.write(ret)
> > +
> > +for expr in exprs:
> > +    ret = "\n"
> > +    if expr.has_key('type'):
> > +        ret += generate_struct(expr['type'], "", expr['data']) + "\n"
> > +        ret += generate_type_cleanup_decl(expr['type'])
> > +        fdef.write(generate_type_cleanup(expr['type']) + "\n")
> > +    elif expr.has_key('handle'):
> > +        ret += generate_handle(expr['handle'], expr['data'])
> > +    elif expr.has_key('union'):
> > +        ret += generate_union(expr['union'], expr['data'])
> > +    else:
> > +        continue
> > +    fdecl.write(ret)
> > +
> > +fdecl.write('''
> > +#endif
> > +''')
> > +
> > +fdecl.flush()
> > +fdecl.close()
> 

  reply	other threads:[~2011-06-07 19:12 UTC|newest]

Thread overview: 52+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-06-03 22:32 [Qemu-devel] [QAPI+QGA 2/3] QAPI code generation infrastructure v2 Michael Roth
2011-06-03 22:32 ` [Qemu-devel] [PATCH v2][ 01/21] Add hard build dependency on glib Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 02/21] qlist: add qlist_first()/qlist_next() Michael Roth
2011-06-08 17:50   ` Luiz Capitulino
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 03/21] qapi: add module init types for qapi Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 04/21] qapi: add ordereddict/qapi.py helper libraries Michael Roth
2011-06-07 19:04   ` Anthony Liguori
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 05/21] qapi: add qapi-types.py code generator Michael Roth
2011-06-07 19:06   ` Anthony Liguori
2011-06-07 19:12     ` Luiz Capitulino [this message]
2011-06-07 19:54       ` Anthony Liguori
2011-06-09  7:00     ` Markus Armbruster
2011-06-09 15:05   ` Luiz Capitulino
2011-06-09 15:28     ` Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 06/21] qapi: add qapi-visit.py " Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 07/21] qapi: add qapi-commands.py " Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 08/21] qapi: add qapi-types-core.h Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 09/21] qapi: add qapi-visit-core.h Michael Roth
2011-06-09 15:14   ` Luiz Capitulino
2011-06-09 18:08     ` Anthony Liguori
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 10/21] qapi: add QMP input visiter Michael Roth
2011-06-09 15:30   ` Luiz Capitulino
2011-06-09 15:41     ` Michael Roth
2011-06-09 15:55       ` Luiz Capitulino
2011-06-09 16:26         ` Michael Roth
2011-06-09 16:26   ` Peter Maydell
2011-06-09 16:41     ` Michael Roth
2011-06-09 18:13       ` Anthony Liguori
2011-06-13 19:12   ` Luiz Capitulino
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 11/21] qapi: add QMP output visiter Michael Roth
2011-06-09 17:47   ` Luiz Capitulino
2011-06-09 19:42     ` Anthony Liguori
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 12/21] qapi: add QAPI dealloc visiter Michael Roth
2011-06-07 19:07   ` Anthony Liguori
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 13/21] qapi: add command registration/lookup functions Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 14/21] qapi: add QMP dispatch functions Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 15/21] qapi: add base declaration/types for QMP Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 16/21] qapi: test schema used for unit tests Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 17/21] qapi: add test-visiter, tests for gen. visiter code Michael Roth
2011-06-07 19:08   ` Anthony Liguori
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 18/21] qapi: Makefile changes to build test-visiter Michael Roth
2011-06-08 17:39   ` Luiz Capitulino
2011-06-08 17:55     ` Michael Roth
2011-06-08 18:00       ` Luiz Capitulino
2011-06-08 18:12     ` Anthony Liguori
2011-06-08 18:16       ` Luiz Capitulino
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 19/21] qapi: add test-qmp-commands, tests for gen. marshalling/dispatch code Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 20/21] qapi: Makefile changes to build test-qmp-commands Michael Roth
2011-06-03 22:33 ` [Qemu-devel] [PATCH v2][ 21/21] qapi: add QAPI code generation documentation Michael Roth
2011-06-08 16:43 ` [Qemu-devel] [QAPI+QGA 2/3] QAPI code generation infrastructure v2 Luiz Capitulino
2011-06-08 17:03   ` Michael Roth
2011-06-08 17:59     ` Luiz Capitulino

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20110607161203.42fc3601@doriath \
    --to=lcapitulino@redhat.com \
    --cc=Jes.Sorensen@redhat.com \
    --cc=agl@linux.vnet.ibm.com \
    --cc=anthony@codemonkey.ws \
    --cc=mdroth@linux.vnet.ibm.com \
    --cc=qemu-devel@nongnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).