#!/usr/bin/python

# gobject-foo.py: generate standard GObject type macros etc.
#
# The master copy of this program is in the telepathy-glib repository -
# please make any changes there.
#
# Copyright (C) 2007-2010 Collabora Ltd. <http://www.collabora.co.uk/>
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation; either
# version 2.1 of the License, or (at your option) any later version.
#
# This library is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this library; if not, write to the Free Software
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

def gobject_header(head, tail, as_interface=False):
    out = []
    o = out.append

    name = head + '_' + tail
    MixedCase = name.replace('_', '')
    lower_case = name.lower()
    UPPER_CASE = name.upper()

    gtype = head.upper() + '_TYPE_' + tail.upper()

    o("typedef struct _%s %s;" % (MixedCase, MixedCase))

    if as_interface:
        o("typedef struct _%sInterface %sInterface;" % (MixedCase, MixedCase))
    else:
        o("typedef struct _%sClass %sClass;" % (MixedCase, MixedCase))
        o("typedef struct _%sPrivate %sPrivate;" % (MixedCase, MixedCase))

    o("")
    o("GType %s_get_type (void);" % lower_case)
    o("")

    o("#define %s \\" % gtype)
    o("  (%s_get_type ())" % lower_case)

    o("#define %s(obj) \\" % UPPER_CASE)
    o("  (G_TYPE_CHECK_INSTANCE_CAST ((obj), %s, \\" % gtype)
    o("                               %s))" % MixedCase)

    if not as_interface:
        o("#define %s_CLASS(klass) \\" % UPPER_CASE)
        o("  (G_TYPE_CHECK_CLASS_CAST ((klass), %s, \\" % gtype)
        o("                            %sClass))" % MixedCase)

    o("#define %s_IS_%s(obj) \\" % (head.upper(), tail.upper()))
    o("  (G_TYPE_CHECK_INSTANCE_TYPE ((obj), %s))" % gtype)

    if as_interface:
        o("#define %s_GET_IFACE(obj) \\" % UPPER_CASE)
        o("  (G_TYPE_INSTANCE_GET_INTERFACE ((obj), %s, \\" % gtype)
        o("                                  %sInterface))" % MixedCase)
    else:
        o("#define %s_IS_%s_CLASS(klass) \\" % (head.upper(), tail.upper()))
        o("  (G_TYPE_CHECK_CLASS_TYPE ((klass), %s))" % gtype)

        o("#define %s_GET_CLASS(obj) \\" % UPPER_CASE)
        o("  (G_TYPE_INSTANCE_GET_CLASS ((obj), %s, \\" % gtype)
        o("                              %sClass))" % MixedCase)

    return out

if __name__ == '__main__':
    import sys
    from getopt import gnu_getopt

    options, argv = gnu_getopt(sys.argv[1:], '', ['interface'])

    as_interface = False

    for opt, val in options:
        if opt == '--interface':
            as_interface = True

    head, tail = argv

    print('\n'.join(gobject_header(head, tail, as_interface=as_interface)))