Examples of org.openquark.cal.services.MetaModule

org.openquark.cal.services.MetaModule
A metamodule encapsulates a module and all related metadata, including source (if any). @author Edward Lam

            // (Class->QualifiedName) the return value.
            Map<Class<?>, QualifiedName> classToTypeConsNameMap = new HashMap<Class<?>, QualifiedName>();
            
            // Iterate over the modules.
            for (int i = 0, nMetaModules = workspace.getNMetaModules(); i < nMetaModules; i++) {
                MetaModule metaModule = workspace.getNthMetaModule(i);
                
                // We're only interested in modules which are compiled.
                ModuleTypeInfo moduleTypeInfo = metaModule.getTypeInfo();
                if (moduleTypeInfo == null) {
                    // Not compiled.
                    continue;
                }

View Full Code Here

    /**
     * Populates the old name combo box with entities of the relevant type from the current module.
     */
    private void populateOldNameCombo() {
        List<String> entityList = new ArrayList<String>();
        MetaModule module = perspective.getMetaModule((ModuleName)sourceModuleList.getSelectedItem());
        String emptyModuleComboStr = "";    // The string that will be displayed in the name combo box if the module is empty
        String emptyModuleStatusStr = "";   // The string that will be displayed in the status text if the module is empty
        
        if( entityType == EntityType.Gem ) {
            
            for (int i = 0, n = module.getNGemEntities(); i < n; i++) {
                GemEntity entity = module.getNthGemEntity(i);            
                entityList.add(entity.getName().getUnqualifiedName());
            }
            emptyModuleComboStr = GemCutter.getResourceString("RNRD_EmptyModuleComboGem");
            emptyModuleStatusStr = GemCutter.getResourceString("RNRD_EmptyModuleStatusGem");
            
        } else if ( entityType == EntityType.TypeConstructor ) {
            
            TypeConstructor[] typeConstructors = module.getTypeConstructors();
            for (final TypeConstructor typeCons : typeConstructors) {
                if(typeCons.getName().getModuleName().equals(module.getName())) {
                    entityList.add(typeCons.getName().getUnqualifiedName());
                }
            }
            emptyModuleComboStr = GemCutter.getResourceString("RNRD_EmptyModuleComboTypeCons");
            emptyModuleStatusStr = GemCutter.getResourceString("RNRD_EmptyModuleStatusTypeCons");
            
        } else if ( entityType == EntityType.TypeClass ) {
            
            for (int i = 0, n = module.getTypeInfo().getNTypeClasses(); i < n; i++) {
                TypeClass typeClass = module.getTypeInfo().getNthTypeClass(i);
                if(typeClass.getName().getModuleName().equals(module.getName())) {
                    entityList.add(typeClass.getName().getUnqualifiedName());
                }
            }
            emptyModuleComboStr = GemCutter.getResourceString("RNRD_EmptyModuleComboTypeClass");
            emptyModuleStatusStr = GemCutter.getResourceString("RNRD_EmptyModuleStatusTypeClass");

View Full Code Here

                        final ModuleName moduleName = gemDrawer.getModuleName();
                        if (gemDrawer.isNamespaceNode()) {
                            address = NavAddress.getModuleNamespaceAddress(moduleName);
                            navigatorOwner.displayMetadata(address, false);
                        } else {
                            MetaModule metaModule = navigatorOwner.getPerspective().getMetaModule(moduleName);
                            if (metaModule != null) {
                                address = NavAddress.getAddress(metaModule);
                                navigatorOwner.displayMetadata(address, false);
                            }
                        }

View Full Code Here

        buffer.append("<h1>" + NavigatorMessages.getString("NAV_InstanceVault_Header") + "</h1>");
        buffer.append(NavigatorMessages.getString("NAV_InstanceVault_Message", moduleLink));
        buffer.append("<br><br><tt>");
        
        ModuleName moduleName = ModuleName.make(url.getBase());
        MetaModule module = owner.getPerspective().getMetaModule(moduleName);
        SortedSet<ClassInstance> instances = new TreeSet<ClassInstance>(new ClassInstanceComparator());
        int count = module.getTypeInfo().getNClassInstances();
        
        for (int n = 0; n < count; n++) {
            instances.add(module.getTypeInfo().getNthClassInstance(n));
        }


        ScopedEntityNamingPolicy namingPolicy = new UnqualifiedUnlessAmbiguous(module.getTypeInfo());


        for (final ClassInstance instance : instances) {
            NavAddress address = NavAddress.getAddress(instance);
            buffer.append("&nbsp;&nbsp;" + getLinkHtml(address, instance.getNameWithContext(namingPolicy)));
            buffer.append("<br>");

View Full Code Here

        List<TypeClass> classes = new ArrayList<TypeClass>();
        List<ClassInstance> instances = new ArrayList<ClassInstance>();
        
        for (int n = 0, numMods = workspace.getNMetaModules(); n < numMods; n++) {
            
            MetaModule metaModule = workspace.getNthMetaModule(n);
            ModuleTypeInfo moduleTypeInfo = metaModule.getTypeInfo();
            
            for (int i = 0, num = moduleTypeInfo.getNClassInstances(); i < num; i++) {
                
                ClassInstance instance = moduleTypeInfo.getNthClassInstance(i);

View Full Code Here

        List<ClassInstance> instances = new ArrayList<ClassInstance>();
        List<TypeConstructor> types = new ArrayList<TypeConstructor>();
        
        for (int n = 0, numMods = workspace.getNMetaModules(); n < numMods; n++) {
            
            MetaModule metaModule = workspace.getNthMetaModule(n);
            ModuleTypeInfo moduleTypeInfo = metaModule.getTypeInfo();
            
            for (int i = 0, num = moduleTypeInfo.getNClassInstances(); i < num; i++) {
                
                ClassInstance instance = moduleTypeInfo.getNthClassInstance(i);
                if (instance.isUniversalRecordInstance()) {
                    continue;
                }
                
                if (instance.getTypeClass().getName().equals(typeClass.getName())) {                   
                    QualifiedName typeConsName = ((TypeConsApp)instance.getType()).getName();
                    MetaModule typeModule = owner.getPerspective().getMetaModule(typeConsName.getModuleName());
                    TypeConstructor typeCons = typeModule.getTypeInfo().getTypeConstructor(typeConsName.getUnqualifiedName());
                    types.add(typeCons);
                    instances.add(instance);
                }
            }
        }

View Full Code Here

            String typeString = null;
            CALFeatureName featureName = metadata.getFeatureName();
            
            // add link to module
            ModuleName moduleName = featureName.toModuleName();
            MetaModule module = owner.getPerspective().getMetaModule(moduleName);
            NavAddress moduleUrl = NavAddress.getAddress(module);
            buffer.append(getLinkHtml(NavAddress.getAddress(module), moduleName.toSourceText()));
            buffer.append(separator);


            // add link to parent or vault
            if (metadata instanceof FunctionMetadata) {
                NavAddress vaultUrl = moduleUrl.withParameter(NavAddress.VAULT_PARAMETER, NavAddress.FUNCTION_VAULT_VALUE);
                buffer.append(getLinkHtml(vaultUrl, NavigatorMessages.getString("NAV_FunctionVault_Location")));
                typeString = NavigatorMessages.getString("NAV_Function_Location");


            } else if (metadata instanceof TypeConstructorMetadata) {
                NavAddress vaultUrl = moduleUrl.withParameter(NavAddress.VAULT_PARAMETER, NavAddress.TYPE_VAULT_VALUE);
                buffer.append(getLinkHtml(vaultUrl, NavigatorMessages.getString("NAV_TypeVault_Location")));
                typeString = NavigatorMessages.getString("NAV_Type_Location");
                
            } else if (metadata instanceof TypeClassMetadata) {
                NavAddress vaultUrl = moduleUrl.withParameter(NavAddress.VAULT_PARAMETER, NavAddress.CLASS_VAULT_VALUE);
                buffer.append(getLinkHtml(vaultUrl, NavigatorMessages.getString("NAV_ClassVault_Location")));
                typeString = NavigatorMessages.getString("NAV_Class_Location");
                
            } else if (metadata instanceof ClassInstanceMetadata) {
                NavAddress vaultUrl = moduleUrl.withParameter(NavAddress.VAULT_PARAMETER, NavAddress.INSTANCE_VAULT_VALUE);
                buffer.append(getLinkHtml(vaultUrl, NavigatorMessages.getString("NAV_InstanceVault_Location")));
                typeString = NavigatorMessages.getString("NAV_Instance_Location");                    
            
            } else if (metadata instanceof InstanceMethodMetadata) {
                CALFeatureName methodFeatureName = metadata.getFeatureName();
                NavAddress parentUrl = NavAddress.getAddress(CALFeatureName.getClassInstanceFeatureName(
                    methodFeatureName.toInstanceIdentifier(), methodFeatureName.toModuleName()));
                
                buffer.append(getLinkHtml(parentUrl, NavAddressHelper.getDisplayText(owner, parentUrl, ScopedEntityNamingPolicy.UNQUALIFIED)));
                typeString = NavigatorMessages.getString("NAV_InstanceMethod_Location");                    
            
            } else if (metadata instanceof ClassMethodMetadata) {


                typeString = NavigatorMessages.getString("NAV_ClassMethod_Location");


                // figure out the type class this method belongs to
                TypeClass parentClass = null;
                CALFeatureName methodFeatureName = ((ClassMethodMetadata) metadata).getFeatureName();
                QualifiedName methodName = methodFeatureName.toQualifiedName();
                int classCount = module.getTypeInfo().getNTypeClasses();
                
                for (int i = 0; i < classCount; i++) {
                    TypeClass typeClass = module.getTypeInfo().getNthTypeClass(i);
                    
                    int methodCount = typeClass.getNClassMethods();
                    for (int n = 0; n < methodCount; n++) {
                        if (typeClass.getNthClassMethod(n).getName().equals(methodName)) {
                            parentClass = typeClass;
                            break;
                        }
                    }
                    
                    if (parentClass != null) {
                        break;
                    }
                }
                
                if (parentClass != null) {
                    NavAddress parentUrl = NavAddress.getAddress(parentClass);
                    buffer.append(getLinkHtml(parentUrl, NavAddressHelper.getDisplayText(owner, parentUrl, ScopedEntityNamingPolicy.UNQUALIFIED)));
                } else {
                    buffer.append("<font color='red'>" + NavigatorMessages.getString("NAV_ClassNotFound_Location") + "</font>");
                }
                
            } else if (metadata instanceof DataConstructorMetadata) {
                
                typeString = NavigatorMessages.getString("NAV_Constructor_Location");
                
                // figure out the type constructor this data constructor is for
                CALFeatureName dataConsFeatureName = ((DataConstructorMetadata) metadata).getFeatureName();
                QualifiedName dataConsName = dataConsFeatureName.toQualifiedName();
                TypeConstructor parentCons = null;
                int typeConsCount = module.getTypeInfo().getNTypeConstructors();
                
                for (int i = 0; i < typeConsCount; i++) {
                    TypeConstructor typeCons = module.getTypeInfo().getNthTypeConstructor(i);
                    
                    int dataConsCount = typeCons.getNDataConstructors();
                    for (int n = 0; n < dataConsCount; n++) {
                        if (typeCons.getNthDataConstructor(n).getName().equals(dataConsName)) {
                            parentCons = typeCons;

View Full Code Here

            
            if (delims.indexOf(qualifiedToken) == -1 && QualifiedName.isValidCompoundName(qualifiedToken)) {


                // In a TypeExpr we are either dealing with a type class or type constructor.
                QualifiedName name = QualifiedName.makeFromCompoundName(qualifiedToken);
                MetaModule metaModule = owner.getPerspective().getMetaModule(name.getModuleName());
                    
                if (metaModule != null) {
                    
                    TypeClass typeClass = metaModule.getTypeInfo().getTypeClass(name.getUnqualifiedName());
                    TypeConstructor typeCons = metaModule.getTypeInfo().getTypeConstructor(name.getUnqualifiedName());
                    
                    if (typeCons != null) {
                        customToken = getLinkHtml(NavAddress.getAddress(typeCons), customToken);
                        
                    } else if (typeClass != null) {

View Full Code Here

    public boolean doesNamespaceContainVisibleModules(ModuleName namespaceName) {
        if (perspective == null) {
            return false;
        }
        
        final MetaModule workingModule = perspective.getWorkingModule();
        if (workingModule == null) {
            return false;
        }
        
        if (namespaceName.isProperPrefixOf(workingModule.getName())) {
            return true;
        }
        
        final ModuleTypeInfo moduleTypeInfo = workingModule.getTypeInfo();
        final int n = moduleTypeInfo.getNImportedModules();
        for (int i = 0; i < n; i++) {
            if (namespaceName.isProperPrefixOf(moduleTypeInfo.getNthImportedModule(i).getModuleName())) {
                return true;
            }

View Full Code Here


        Collections.sort(visibleModules, getModuleAlphaComparator(workspaceModuleNameResolver, moduleTreeDisplayMode));
        
        // Add drawers for each of the modules.
        for (int i = 0, size = visibleModules.size(); i < size; i++) {
            MetaModule module = visibleModules.get(i);
            ModuleName moduleName = module.getName();
            Set<GemEntity> visibleEntitySet = perspective.getVisibleGemEntities(module);
            addDrawer(moduleName, visibleEntitySet);
            allEntities.addAll(visibleEntitySet);
        }
        
        if (showAllModules) {
            // If we are supposed to show all modules then add the invisible ones.
            Collections.sort(hiddenModules, getModuleAlphaComparator(workspaceModuleNameResolver, moduleTreeDisplayMode));
            
            // Add drawers for each of the modules.
            for (final MetaModule module : hiddenModules) {
                ModuleName moduleName = module.getName();


                // Create a set with all the public entities from the module.
                Set<GemEntity> publicEntitySet = perspective.getVisibleGemEntities(module);
    
                addDrawer(moduleName, publicEntitySet);

View Full Code Here

0 1 2

TOP

Related Classes of org.openquark.cal.services.MetaModule

org.openquark.cal.compiler.ClassInstance

org.openquark.cal.compiler.DataConstructor

org.openquark.cal.compiler.FunctionalAgent

org.openquark.cal.compiler.ModuleTypeInfo

org.openquark.cal.compiler.QualifiedName

org.openquark.cal.compiler.TypeClass

org.openquark.cal.compiler.TypeConstructor

org.openquark.cal.metadata.MetadataManager

org.openquark.gems.client.AutoCompletePopupMenu$AutoCompleteIntellicutAdapter

org.openquark.gems.client.browser.BrowserTree

All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.