test16.c

安装DDD之前

        if (ptr != NULL)
        {
            printf("/* *INDENT-OFF* */\n");
            printf("static %sClassExtRec _%sCompClassExtRec = {\n",class->core_class.class_name,base->core_class.class_name);
            printf("\t/* next_extension            */   %s,\n", ptr->next_extension == NULL ? "NULL" : "2nd Primitive Class Extension");
            printf("\t/* record_type               */   NULLQUARK,\n");
            printf("\t/* version                   */   %sClassExtVersion,\n",class->core_class.class_name);
            printf("\t/* record_size               */   sizeof(%sClassExtRec),\n",class->core_class.class_name);
            printf("\t/* accepts_objects           */   %s,\n",ptr->accepts_objects ? "True" : "False");
printf("#if XtSpecificationRelease >= 6\n");
#if XtSpecificationRelease >= 6
            printf("\t/* allows_change_managed_set */   %s,\n",ptr->allows_change_managed_set ? "True" : "False");
#else
            printf("\t/* allows_change_managed_set */   False,\n");
#endif
printf("#endif\n");

            printf("};\n");
            printf("/* *INDENT-ON* */\n\n");
        }
    }
    else if (class == (WidgetClass)&constraintClassRec)
    {
    ConstraintClassExtensionRec *ptr = (((ConstraintClassRec *)base)->constraint_class.extension);

        if (ptr != NULL)
        {
            printf("/* *INDENT-OFF* */\n");
            printf("static %sClassExtRec _%sConstraintClassExtRec = {\n",class->core_class.class_name,base->core_class.class_name);
            printf("\t/* next_extension        */       %s,\n", ptr->next_extension == NULL ? "NULL" : "2nd Primitive Class Extension");
            printf("\t/* record_type           */       NULLQUARK,\n");
            printf("\t/* version               */       %sClassExtVersion,\n",class->core_class.class_name);
            printf("\t/* record_size           */       sizeof(%sClassExtRec),\n",class->core_class.class_name);
            printf("\t/* get_values_hook       */       %s,\n",ptr->get_values_hook == NULL ? "NULL" : "constraint_get_values_hook");

            printf("};\n");
            printf("/* *INDENT-ON* */\n\n");
        }
    }
    else if (class == (WidgetClass)&shellClassRec)
    {
    ShellClassExtensionRec *ptr = (((ShellClassRec *)base)->shell_class.extension);

        if (ptr != NULL)
        {
            printf("/* *INDENT-OFF* */\n");
            printf("static %sClassExtRec _%sShellClassExtRec = {\n",class->core_class.class_name,base->core_class.class_name);
            printf("\t/* next_extension        */       %s,\n", ptr->next_extension == NULL ? "NULL" : "2nd Shell Class Extension");
            printf("\t/* record_type           */       NULLQUARK,\n");
            printf("\t/* version               */       %sClassExtVersion,\n",class->core_class.class_name);
            printf("\t/* record_size           */       sizeof(%sClassExtRec),\n",class->core_class.class_name);
            printf("\t/* root_geometry_manager */       %s,\n",ptr->root_geometry_manager == NULL ? "NULL" : ptr->root_geometry_manager == XtInheritRootGeometryManager ? "XtInheritRootGeometryManager" : "root_geometry_manager");

            printf("};\n");
            printf("/* *INDENT-ON* */\n\n");
        }
    }
    else
    {
        printf("/* *INDENT-OFF* */\n");
        printf("static %sClassExtRec _%sXXXClassExtRec = {\n",class->core_class.class_name,base->core_class.class_name);

        printf("DoExtensionRecord(%s) - UNKNOWN\n",class->core_class.class_name);

        printf("};\n");
        printf("/* *INDENT-ON* */\n\n");
    }
}

static void
DoClass(WidgetClass base, WidgetClass class)
{
        if (class != (WidgetClass)&rectObjClassRec && class != &coreClassRec && class->core_class.superclass != NULL)
        {
            DoClass(base, class->core_class.superclass);
        }
        if (class == (WidgetClass)&coreClassRec ||
            class == (WidgetClass)&rectObjClassRec ||
            class == (WidgetClass)&objectClassRec)
        {
        CoreClassPart *ptr = &(base->core_class);

                printf("\t/* %s class part */\n\t{\n",class->core_class.class_name);
                printf("\t/* superclass            */   (WidgetClass) &%s,\n", ClassRec2String(ptr->superclass));
                printf("\t/* class_name            */   \"%s\",\n", ptr->class_name);
                printf("\t/* widget_size           */   sizeof(%sRec),\n", ptr->class_name);
                printf("\t/* class_initialize      */   %s,\n", ptr->class_initialize == NULL ? "NULL" : "class_initialize");
                printf("\t/* class_part_initialize */   %s,\n", ptr->class_part_initialize == NULL ? "NULL" : "class_part_initialize");
                printf("\t/* class_inited          */   %s,\n", ptr->class_inited == False ? "False" : "True");
                printf("\t/* initialize            */   %s,\n", ptr->initialize == NULL ? "NULL" : "initialize");
                printf("\t/* initialize_hook       */   %s,\n", ptr->initialize_hook == NULL ? "NULL" : "initialize_hook");
                printf("\t/* realize               */   %s,\n", ptr->realize == XtInheritRealize ? "XtInheritRealize" : "realize");
                printf("\t/* actions               */   %s,\n", ptr->actions == NULL ? "NULL" : "actions");
                printf("\t/* num_actions           */   %s,\n", ptr->actions == NULL ? "0" : "XtNumber(actions)");
                printf("\t/* resources             */   %s,\n", ptr->resources == NULL ? "NULL" : "resources");
                printf("\t/* num_resources         */   %s,\n", ptr->resources == NULL ? "0" : "XtNumber(resources)");
                printf("\t/* xrm_class             */   NULLQUARK,\n");
                printf("\t/* compress_motion       */   %s,\n", ptr->compress_motion == False ? "False" : "True");
                printf("\t/* compress_exposure     */   %s,\n", CompressExpose2String(ptr->compress_exposure));
                printf("\t/* compress_enterleave   */   %s,\n", ptr->compress_enterleave == False ? "False" : "True");
                printf("\t/* visible_interest      */   %s,\n", ptr->visible_interest == False ? "False" : "True");
                printf("\t/* destroy               */   %s,\n", ptr->destroy == NULL ? "NULL" : "destroy");
                printf("\t/* resize                */   %s,\n", ptr->resize == NULL ? "NULL" : ptr->resize == XtInheritResize ? "XtInheritResize" : "resize");
                printf("\t/* expose                */   %s,\n", ptr->expose == NULL ? "NULL" : ptr->expose == XtInheritExpose ? "XtInheritExpose" : "expose");
                printf("\t/* set_values            */   %s,\n", ptr->set_values == NULL ? "NULL" : "set_values");
                printf("\t/* set_values_hook       */   %s,\n", ptr->set_values_hook == NULL ? "NULL" : "set_values_hook");
                printf("\t/* set_values_almost     */   %s,\n", ptr->set_values_almost == NULL ? "NULL" : ptr->set_values_almost == XtInheritSetValuesAlmost ? "XtInheritSetValuesAlmost" : "set_values_almost");
                printf("\t/* get_values_hook       */   %s,\n", ptr->get_values_hook == NULL ? "NULL" : "get_values_hook");
                printf("\t/* accept_focus          */   %s,\n", ptr->accept_focus == NULL ? "NULL" : ptr->accept_focus == XtInheritAcceptFocus ? "XtInheritAcceptFocus" : "accept_focus");
                printf("\t/* version               */   %s,\n", ptr->version == XtVersion ? "XtVersion" : "XtVersionDontCheck");
                printf("\t/* callback_private      */   NULL,\n");
                printf("\t/* tm_table              */   %s,\n", ptr->tm_table == NULL ? "NULL" : ptr->tm_table == XtInheritTranslations ? "XtInheritTranslations" : "tm_table");
                printf("\t/* query_geometry        */   %s,\n", ptr->query_geometry == NULL ? "NULL" : ptr->query_geometry == XtInheritQueryGeometry ? "XtInheritQueryGeometry" : "query_geometry");
                printf("\t/* display_accelerator   */   %s,\n", ptr->display_accelerator == NULL ? "NULL" : ptr->display_accelerator == XtInheritDisplayAccelerator ? "XtInheritDisplayAccelerator" : "display_accelerator");
                printf("\t/* extension             */   %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : ptr->class_name,ptr->extension == NULL ? "" : "CoreClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmPrimitiveClassRec)
        {
        XmPrimitiveClassPart *ptr = &(((XmPrimitiveClassRec *)base)->primitive_class);

                printf(",\n\t/* Primitive class part */\n\t{\n");
                printf("\t/* border_highlight      */   %s,\n", ptr->border_highlight == NULL ? "NULL" : ptr->border_highlight == XmInheritBorderHighlight ? "XmInheritBorderHighlight" : "border_highlight");
                printf("\t/* border_unhighlight      */ %s,\n", ptr->border_unhighlight == NULL ? "NULL" : ptr->border_unhighlight == XmInheritBorderUnhighlight ? "XmInheritBorderUnhighlight" : "border_unhighlight");
                printf("\t/* translations            */ %s,\n", ptr->translations == NULL ? "NULL" : ptr->translations == XtInheritTranslations ? "XtInheritTranslations" : "primitive_translations");
                printf("\t/* arm_and_activate        */ %s,\n", ptr->arm_and_activate == NULL ? "NULL" : ptr->arm_and_activate == XmInheritArmAndActivate ? "XmInheritArmAndActivate" : "arm_and_activate");
                printf("\t/* syn_resources           */ %s,\n", ptr->syn_resources == NULL ? "NULL" : "syn_resources");
                printf("\t/* num_syn_resources       */ %s,\n", ptr->syn_resources == NULL ? "0" : "XtNumber(syn_resources)");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "PrimClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmLabelClassRec)
        {
        XmLabelClassPart *ptr = &(((XmLabelClassRec *)base)->label_class);

                printf(",\n\t/* Label class part */\n\t{\n");
                printf("\t/* setOverrideCallback     */ %s,\n", ptr->setOverrideCallback == NULL ? "NULL" : ptr->setOverrideCallback == XmInheritSetOverrideCallback ? "XmInheritSetOverrideCallback" : "setOverrideCallback");
                printf("\t/* menuProcs               */ %s,\n", ptr->menuProcs == NULL ? "NULL" : ptr->menuProcs == XmInheritMenuProc ? "XmInheritMenuProc" : "menuProcs");
                printf("\t/* translations            */ %s\n", ptr->translations == NULL ? "NULL" : ptr->translations == XtInheritTranslations ? "XtInheritTranslations" : "label_translations");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "LabelClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmArrowButtonClassRec)
        {
        XmArrowButtonClassPart *ptr = &(((XmArrowButtonClassRec *)base)->arrowbutton_class);

                printf(",\n\t/* ArrowButton class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "ArrowButtonClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmListClassRec)
        {
        XmListClassPart *ptr = &(((XmListClassRec *)base)->list_class);

                printf(",\n\t/* List class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "ListClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmSashClassRec)
        {
        XmSashClassPart *ptr = &(((XmSashClassRec *)base)->sash_class);

                printf(",\n\t/* Sash class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "SashClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmScrollBarClassRec)
        {
        XmScrollBarClassPart *ptr = &(((XmScrollBarClassRec *)base)->scrollBar_class);

                printf(",\n\t/* ScrollBar class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "ScrollBarClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmSeparatorClassRec)
        {
        XmSeparatorClassPart *ptr = &(((XmSeparatorClassRec *)base)->separator_class);

                printf(",\n\t/* Separator class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "SeparatorClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmTextFieldClassRec)
        {
#ifdef LESSTIF_VERSION
        XmTextFieldClassPart *ptr = &(((XmTextFieldClassRec *)base)->textfield_class);
#else
        XmTextFieldClassPart *ptr = &(((XmTextFieldClassRec *)base)->text_class);
#endif

                printf(",\n\t/* TextField class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "TextFieldClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmTextClassRec)
        {
        XmTextClassPart *ptr = &(((XmTextClassRec *)base)->text_class);

                printf(",\n\t/* Text class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "TextClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&compositeClassRec)
        {
        CompositeClassPart *ptr = &(((CompositeClassRec *)base)->composite_class);

                printf(",\n\t/* Composite class part */\n\t{\n");
                printf("\t/* geometry_manager        */ %s,\n", ptr->geometry_manager == NULL ? "NULL" : ptr->geometry_manager == XtInheritGeometryManager ? "XtInheritGeometryManager" : "geometry_manager");
                printf("\t/* change_managed          */ %s,\n", ptr->change_managed == NULL ? "NULL" : ptr->change_managed == XtInheritChangeManaged ? "XtInheritChangeManaged" : "change_managed");
                printf("\t/* insert_child            */ %s,\n", ptr->insert_child == NULL ? "NULL" : ptr->insert_child == XtInheritInsertChild ? "XtInheritInsertChild" : "insert_child");
                printf("\t/* delete_child            */ %s,\n", ptr->delete_child == NULL ? "NULL" : ptr->delete_child == XtInheritDeleteChild ? "XtInheritDeleteChild" : "delete_child");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "CompositeClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&constraintClassRec)
        {
        ConstraintClassPart *ptr = &(((ConstraintClassRec *)base)->constraint_class);

                printf(",\n\t/* Constraint class part */\n\t{\n");
                printf("\t/* resources               */ %s,\n", ptr->resources == NULL ? "NULL" : "constraint_resources");
                printf("\t/* num_resources           */ %s,\n", ptr->resources == NULL ? "0" : "XtNumber(constraint_resources)");
                printf("\t/* constraint_size       */   sizeof(%sRec),\n", base->core_class.class_name);
                printf("\t/* initialize              */ %s,\n", ptr->initialize == NULL ? "NULL" : /*ptr->initialize == XtInheritChangeManaged ? "XtInheritChangeManaged" :*/ "constraint_initialize");
                printf("\t/* destroy                 */ %s,\n", ptr->destroy == NULL ? "NULL" : /*ptr->destroy == XtInheritInsertChild ? "XtInheritInsertChild" :*/ "constraint_destroy");
                printf("\t/* set_values              */ %s,\n", ptr->set_values == NULL ? "NULL" : /*ptr->set_values == XtInheritDeleteChild ? "XtInheritDeleteChild" :*/ "constraint_set_values");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "CompositeClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmManagerClassRec)
        {
        XmManagerClassPart *ptr = &(((XmManagerClassRec *)base)->manager_class);

                printf(",\n\t/* Manager class part */\n\t{\n");
                printf("\t/* translations            */ %s\n", ptr->translations == NULL ? "NULL" : ptr->translations == XtInheritTranslations ? "XtInheritTranslations" : "manager_translations");
                printf("\t/* syn_resources           */ %s,\n", ptr->syn_resources == NULL ? "NULL" : "manager_syn_resources");
                printf("\t/* num_syn_resources       */ %s,\n", ptr->syn_resources == NULL ? "0" : "XtNumber(manager_syn_resources)");
                printf("\t/* syn_constraint_resources*/ %s,\n", ptr->syn_constraint_resources == NULL ? "NULL" : "manager_syn_constraint_resources");
                printf("\t/* num_syn_constraint_resources*/     %s,\n", ptr->syn_constraint_resources == NULL ? "0" : "XtNumber(manager_syn_constraint_resources)");
                printf("\t/* parent_process          */ %s,\n", ptr->parent_process == NULL ? "NULL" : ptr->parent_process == XmInheritParentProcess ? "XmInheritParentProcess" : "parent_process");
                if (ptr->parent_process != NULL && ptr->parent_process != XmInheritParentProcess)
                {
                    SaveItem(base->core_class.class_name, "parent_process", (XtPointer)ptr->parent_process);
                }
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "ManagerClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmBulletinBoardClassRec)
        {
        XmBulletinBoardClassPart *ptr = &(((XmBulletinBoardClassRec *)base)->bulletin_board_class);

                printf(",\n\t/* BulletinBoard class part */\n\t{\n");
                printf("\t/* always_install_accelerators*/      %s,\n", ptr->always_install_accelerators == False ? "False" : "True");
                printf("\t/* geo_matrix_create       */ %s,\n", ptr->geo_matrix_create == NULL ? "NULL" : ptr->geo_matrix_create == XmInheritGeoMatrixCreate ? "XmInheriteGeoMatrixCreate" : "geo_matrix_create");
                printf("\t/* focus_moved_proc        */ %s,\n", ptr->focus_moved_proc == NULL ? "NULL" : ptr->focus_moved_proc == XmInheritFocusMovedProc ? "XmInheritFocusMovedProc" : "focus_moved_proc");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "BulletinBoardClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmSelectionBoxClassRec)
        {
        XmSelectionBoxClassPart *ptr = &(((XmSelectionBoxClassRec *)base)->selection_box_class);

                printf(",\n\t/* SelectionBox class part */\n\t{\n");
#ifdef LESSTIF_VERSION
                printf("********/* list_callback (missing in LessTif) */        \n");
#else
                printf("\t/* list_callback           */ %s,\n", ptr->list_callback == NULL ? "NULL" : "list_callback");
#endif
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "SelectionBoxClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmFileSelectionBoxClassRec)
        {
        XmFileSelectionBoxClassPart *ptr = &(((XmFileSelectionBoxClassRec *)base)->file_selection_box_class);

                printf(",\n\t/* FileSelectionBox class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "FileSelectionBoxClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmCascadeButtonClassRec)
        {
        XmCascadeButtonClassPart *ptr = &(((XmCascadeButtonClassRec *)base)->cascade_button_class);

                printf(",\n\t/* CascadeButton class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "CascadeButtonClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmCommandClassRec)
        {
        XmCommandClassPart *ptr = &(((XmCommandClassRec *)base)->command_class);

                printf(",\n\t/* Command class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "CommandClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmDrawingAreaClassRec)
        {
        XmDrawingAreaClassPart *ptr = &(((XmDrawingAreaClassRec *)base)->drawing_area_class);

                printf(",\n\t/* DrawingArea class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "DrawingAreaClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)&xmDrawnButtonClassRec)
        {
        XmDrawnButtonClassPart *ptr = &(((XmDrawnButtonClassRec *)base)->drawnbutton_class);

                printf(",\n\t/* DrawnButton class part */\n\t{\n");
                printf("\t/* extension               */ %s%s%s\n", ptr->extension == NULL ? "NULL" : "(XtPointer)&_",ptr->extension == NULL ? "" : base->core_class.class_name,ptr->extension == NULL ? "" : "DrawnButtonClassExtRec");
                printf("\t}");
        }
        else if (class == (WidgetClass)