Examples with LLVMSourcePointerType com.oracle.truffle.llvm.runtime.debug.LLVMSourcePointerType used on opensource projects

Example 1 with LLVMSourcePointerType

use of com.oracle.truffle.llvm.runtime.debug.LLVMSourcePointerType in project sulong by graalvm.

the class DITypeExtractor method visit.

@Override
public void visit(MDLocalVariable mdLocal) {
    LLVMSourceType type = resolve(mdLocal.getType());
    if (Flags.OBJECT_POINTER.isSetIn(mdLocal.getFlags()) && type instanceof LLVMSourcePointerType) {
        // llvm does not set the objectpointer flag on this pointer type even though it sets
        // it on the pointer type that is used in the function type descriptor
        final LLVMSourcePointerType oldPointer = (LLVMSourcePointerType) type;
        final LLVMSourcePointerType newPointer = new LLVMSourcePointerType(oldPointer.getSize(), oldPointer.getAlign(), oldPointer.getOffset(), true, oldPointer.isReference(), type.getLocation());
        newPointer.setBaseType(oldPointer.getBaseType());
        newPointer.setName(oldPointer::getName);
        type = newPointer;
    }
    parsedTypes.put(mdLocal, type);
}

Example 2 with LLVMSourcePointerType

use of com.oracle.truffle.llvm.runtime.debug.LLVMSourcePointerType in project sulong by graalvm.

the class DITypeExtractor method visit.

@Override
public void visit(MDDerivedType mdType) {
    final long size = mdType.getSize();
    final long align = mdType.getAlign();
    final long offset = mdType.getOffset();
    final LLVMSourceLocation location = scopeBuilder.buildLocation(mdType);
    switch(mdType.getTag()) {
        case DW_TAG_MEMBER:
            {
                if (Flags.ARTIFICIAL.isAllFlags(mdType.getFlags())) {
                    parsedTypes.put(mdType, LLVMSourceType.VOID);
                    break;
                }
                final String name = MDNameExtractor.getName(mdType.getName());
                if (Flags.STATIC_MEMBER.isSetIn(mdType.getFlags())) {
                    final LLVMSourceStaticMemberType type = new LLVMSourceStaticMemberType(name, size, align, location);
                    parsedTypes.put(mdType, type);
                    final LLVMSourceType baseType = resolve(mdType.getBaseType());
                    type.setElementType(baseType);
                    if (mdType.getExtraData() instanceof MDValue) {
                        staticMembers.put(type, ((MDValue) mdType.getExtraData()).getValue());
                    }
                    break;
                }
                final LLVMSourceMemberType type = new LLVMSourceMemberType(name, size, align, offset, location);
                parsedTypes.put(mdType, type);
                LLVMSourceType baseType = resolve(mdType.getBaseType());
                if (Flags.BITFIELD.isSetIn(mdType.getFlags()) || (baseType != UNKNOWN && baseType.getSize() != size)) {
                    final LLVMSourceDecoratorType decorator = new LLVMSourceDecoratorType(size, align, offset, Function.identity(), location);
                    decorator.setBaseType(baseType);
                    baseType = decorator;
                }
                type.setElementType(baseType);
                break;
            }
        case DW_TAG_REFERENCE_TYPE:
        case DW_TAG_POINTER_TYPE:
            {
                final boolean isSafeToDereference = Flags.OBJECT_POINTER.isSetIn(mdType.getFlags());
                final boolean isReference = mdType.getTag() == MDType.DwarfTag.DW_TAG_REFERENCE_TYPE;
                final LLVMSourcePointerType type = new LLVMSourcePointerType(size, align, offset, isSafeToDereference, isReference, location);
                parsedTypes.put(mdType, type);
                // LLVM does not specify a void type, if this is indicated, the reference is simply
                // null
                final LLVMSourceType baseType = resolve(mdType.getBaseType(), LLVMSourceType.VOID);
                type.setBaseType(baseType);
                type.setName(() -> {
                    final String baseName = baseType.getName();
                    final String sym = isReference ? " &" : "*";
                    if (!baseType.isPointer() && baseName.contains(" ")) {
                        return String.format("(%s)%s", baseName, sym);
                    } else {
                        return String.format("%s%s", baseName, sym);
                    }
                });
                break;
            }
        case DW_TAG_TYPEDEF:
        case DW_TAG_VOLATILE_TYPE:
        case DW_TAG_CONST_TYPE:
            {
                final Function<String, String> decorator;
                switch(mdType.getTag()) {
                    case DW_TAG_VOLATILE_TYPE:
                        decorator = s -> String.format("volatile %s", s);
                        break;
                    case DW_TAG_CONST_TYPE:
                        decorator = s -> String.format("const %s", s);
                        break;
                    case DW_TAG_TYPEDEF:
                        {
                            final String name = MDNameExtractor.getName(mdType.getName());
                            decorator = s -> name;
                            break;
                        }
                    default:
                        decorator = Function.identity();
                }
                final LLVMSourceDecoratorType type = new LLVMSourceDecoratorType(size, align, offset, decorator, location);
                parsedTypes.put(mdType, type);
                final LLVMSourceType baseType = resolve(mdType.getBaseType());
                type.setBaseType(baseType);
                type.setSize(baseType.getSize());
                break;
            }
        case DW_TAG_INHERITANCE:
            {
                final LLVMSourceMemberType type = new LLVMSourceMemberType("super", size, align, offset, location);
                parsedTypes.put(mdType, type);
                final LLVMSourceType baseType = resolve(mdType.getBaseType());
                type.setElementType(baseType);
                type.setName(() -> String.format("super (%s)", baseType.getName()));
                break;
            }
        default:
            {
                parsedTypes.put(mdType, LLVMSourceType.UNKNOWN);
            }
    }
}

Example 3 with LLVMSourcePointerType

use of com.oracle.truffle.llvm.runtime.debug.LLVMSourcePointerType in project sulong by graalvm.

the class BasicNodeFactory method registerSourceType.

@Override
public LLVMExpressionNode registerSourceType(FrameSlot valueSlot, LLVMSourceType type) {
    LLVMSourceType actual = type.getActualType();
    if (actual instanceof LLVMSourcePointerType) {
        // only pointer types can contain foreign values
        LLVMSourceType base = ((LLVMSourcePointerType) actual).getBaseType();
        LLVMInteropType interopType = LLVMInteropType.fromSourceType(base);
        if (interopType != null) {
            return new LLVMSetInteropTypeNode(valueSlot, interopType);
        }
    }
    return null;
}