More pointer aliases; Unmanaged class (Cocoa)

Author: dwarfland

Source/Aliases.swift

@@ -69,6 +69,15 @@ public typealias CInt = Int32
 public typealias CLong = Int
 public typealias CLongLong = Int64
 #if COCOA || ISLAND
+//UnsafeMutablePointer
+//UnsafePointer
+public typealias UnsafeMutableBufferPointer<T> = UnsafeMutablePointer<T>
+public typealias UnsafeBufferPointer<T> = UnsafePointer<T>
+public typealias UnsafeMutableRawPointer<T> = UnsafeMutablePointer<T>
+public typealias UnsafeRawPointer<T> = UnsafePointer<T>
+public typealias UnsafeMutableRawBufferPointer<T> = UnsafeMutablePointer<T>
+public typealias UnsafeRawBufferPointer<T> = UnsafePointer<T>
+
 public typealias OpaquePointer = UnsafePointer<Void>
 #endif
 public typealias CShort = Int16

Source/Swift.Island.Darwin.iOS.elements

@@ -53,6 +53,7 @@
     <Reference Include="gc" />
     <Reference Include="Island" />
     <Reference Include="rtl" />
+    <Reference Include="CoreFoundation" />
   </ItemGroup>
   <Import Project="$(MSBuildExtensionsPath)\RemObjects Software\Elements\RemObjects.Elements.Island.Darwin.targets" />
   <Import Project="Swift.Shared.projitems" Label="Swift.Shared" />

Source/Swift.Island.Darwin.macOS.elements

@@ -54,6 +54,7 @@
     <Reference Include="gc" />
     <Reference Include="Island" />
     <Reference Include="rtl" />
+    <Reference Include="CoreFoundation" />
   </ItemGroup>
   <Import Project="$(MSBuildExtensionsPath)\RemObjects Software\Elements\RemObjects.Elements.Island.Darwin.targets" />
   <Import Project="Swift.Shared.projitems" Label="Swift.Shared" />

Source/Swift.Island.Darwin.tvOS.elements

@@ -53,6 +53,7 @@
     <Reference Include="gc" />
     <Reference Include="Island" />
     <Reference Include="rtl" />
+    <Reference Include="CoreFoundation" />
   </ItemGroup>
   <Import Project="$(MSBuildExtensionsPath)\RemObjects Software\Elements\RemObjects.Elements.Island.Darwin.targets" />
   <Import Project="Swift.Shared.projitems" Label="Swift.Shared" />

Source/Swift.Island.Darwin.watchOS.elements

@@ -53,6 +53,7 @@
     <Reference Include="gc" />
     <Reference Include="Island" />
     <Reference Include="rtl" />
+    <Reference Include="CoreFoundation" />
   </ItemGroup>
   <Import Project="$(MSBuildExtensionsPath)\RemObjects Software\Elements\RemObjects.Elements.Island.Darwin.targets" />
   <Import Project="Swift.Shared.projitems" Label="Swift.Shared" />

Source/Swift.Shared.projitems

@@ -94,6 +94,7 @@
     <Compile Include="$(MSBuildThisFileDirectory)Dictionary.Java.swift" />
     <Compile Include="$(MSBuildThisFileDirectory)Operators.swift" />
     <Compile Include="$(MSBuildThisFileDirectory)Errors.swift" />
+    <Compile Include="$(MSBuildThisFileDirectory)Unmanaged.swift" />
   </ItemGroup>
   <ItemGroup>
     <Folder Include="Sequences">

Source/Unmanaged.swift

@@ -0,0 +1,54 @@
+#if DARWIN
+public struct Unmanaged<Instance> where Instance : AnyObject {
+
+	#if ISLAND
+	func autorelease() -> Unmanaged<Instance> {
+		CFAutorelease(opaque)
+		return self
+	}
+	func release() {
+		CFRelease(opaque)
+	}
+	func retain() -> Unmanaged<Instance> {
+		CFRetain(opaque)
+		return self
+	}
+	#endif
+
+	func takeRetainedValue() -> Instance {
+		return bridge<Instance>(opaque, BridgeMode.Bridge)
+	}
+
+	func takeUnretainedValue() -> Instance {
+		return bridge<Instance>(opaque, BridgeMode.Transfer)
+	}
+
+	func toOpaque() -> OpaquePointer {
+		return opaque
+	}
+
+	static func fromOpaque(_ value: OpaquePointer) -> Unmanaged<Instance> {
+		Unmanaged<Instance>(with: value)
+	}
+	static func passRetained(_ value: Instance) -> Unmanaged<Instance> {
+		Unmanaged<Instance>(retained: value)
+	}
+	static func passUnretained(_ value: Instance) -> Unmanaged<Instance> {
+		Unmanaged<Instance>(unretained: value)
+	}
+
+	private let opaque: OpaquePointer
+
+	private init(with value: OpaquePointer) {
+		opaque = value
+	}
+
+	private init(withRetained value: Instance) {
+		opaque = bridge<OpaquePointer>(value, BridgeMode.Retained)
+	}
+
+	private init(withUnretained value: Instance) {
+		opaque = bridge<OpaquePointer>(value, BridgeMode.Bridge)
+	}
+}
+#endif