Basics: make some of the private API more public

This extends the visibility of some of the private implementation to the
package level to allow use for testing without `@testable` imports.

Author: compnerd

Sources/Basics/Archiver/TarArchiver.swift

@@ -25,7 +25,7 @@ public struct TarArchiver: Archiver {
     private let cancellator: Cancellator
 
     /// The underlying command
-    internal let tarCommand: String
+    package let tarCommand: String
 
     /// Creates a `TarArchiver`.
     ///

Sources/Basics/Archiver/ZipArchiver.swift

@@ -31,8 +31,8 @@ public struct ZipArchiver: Archiver, Cancellable {
     #if os(Windows)
         internal let windowsTar: String
     #else
-        internal let unzip = "unzip"
-        internal let zip = "zip"
+        package let unzip = "unzip"
+        package let zip = "zip"
     #endif
 
     #if os(FreeBSD)

Sources/Basics/AuthorizationProvider.swift

@@ -140,7 +140,7 @@ public final class NetrcAuthorizationProvider: AuthorizationProvider, Authorizat
     }
 
     // marked internal for testing
-    internal var machines: [Basics.Netrc.Machine] {
+    package var machines: [Basics.Netrc.Machine] {
         // this ignores any errors reading the file
         // initial validation is done at the time of initializing the provider
         // and if the file becomes corrupt at runtime it will handle it gracefully
@@ -408,16 +408,16 @@ public final class KeychainAuthorizationProvider: AuthorizationProvider, Authori
         return item
     }
 
-    struct ProtocolHostPort: Hashable, CustomStringConvertible {
-        let `protocol`: String?
-        let host: String
-        let port: Int?
+    package struct ProtocolHostPort: Hashable, CustomStringConvertible {
+        package let `protocol`: String?
+        package let host: String
+        package let port: Int?
 
         var server: String {
             self.host
         }
 
-        var protocolCFString: CFString {
+        package var protocolCFString: CFString {
             // See
             // https://developer.apple.com/documentation/security/keychain_services/keychain_items/item_attribute_keys_and_values?language=swift
             // for a list of possible values for the `kSecAttrProtocol` attribute.
@@ -431,7 +431,7 @@ public final class KeychainAuthorizationProvider: AuthorizationProvider, Authori
             }
         }
 
-        init?(from url: URL) {
+        package init?(from url: URL) {
             guard let host = url.host?.lowercased(), !host.isEmpty else {
                 return nil
             }
@@ -441,7 +441,7 @@ public final class KeychainAuthorizationProvider: AuthorizationProvider, Authori
             self.port = url.port
         }
 
-        var description: String {
+        package var description: String {
             "\(self.protocol.map { "\($0)://" } ?? "")\(self.host)\(self.port.map { ":\($0)" } ?? "")"
         }
     }

Sources/Basics/Cancellator.swift

@@ -144,7 +144,7 @@ public final class Cancellator: Cancellable, Sendable {
 
     // marked internal for testing
     @discardableResult
-    internal func _cancel(deadline: DispatchTime? = .none) -> Int {
+    package func _cancel(deadline: DispatchTime? = .none) -> Int {
         self.cancelling.put(true)
 
         self.observabilityScope?

Sources/Basics/Concurrency/SendableBox.swift

@@ -28,17 +28,17 @@ public actor SendableBox<Value: Sendable> {
 }
 
 extension SendableBox where Value == Int {
-    func increment() {
+    package func increment() {
         self.value = value + 1
     }
 
-    func decrement() {
+    package func decrement() {
         self.value = value - 1
     }
 }
 
 extension SendableBox where Value == Date {
-    func resetDate() {
+    package func resetDate() {
         value = Date()
     }
 }

Sources/Basics/Graph/AdjacencyMatrix.swift

@@ -18,7 +18,7 @@
 /// edge exists.
 ///
 /// See https://en.wikipedia.org/wiki/Adjacency_matrix for more details.
-struct AdjacencyMatrix {
+package struct AdjacencyMatrix {
     let columns: Int
     let rows: Int
     private var bytes: [UInt8]
@@ -27,15 +27,15 @@ struct AdjacencyMatrix {
     /// - Parameters:
     ///   - rows: Number of rows in the matrix.
     ///   - columns: Number of columns in the matrix.
-    init(rows: Int, columns: Int) {
+    package init(rows: Int, columns: Int) {
         self.columns = columns
         self.rows = rows
 
         let (quotient, remainder) = (rows * columns).quotientAndRemainder(dividingBy: 8)
         self.bytes = .init(repeating: 0, count: quotient + (remainder > 0 ? 1 : 0))
     }
 
-    var bitCount: Int {
+    package var bitCount: Int {
         bytes.count * 8
     }
 
@@ -44,7 +44,7 @@ struct AdjacencyMatrix {
         return (byteOffset: totalBitOffset / 8, bitOffsetInByte: totalBitOffset % 8)
     }
 
-    subscript(row: Int, column: Int) -> Bool {
+    package subscript(row: Int, column: Int) -> Bool {
         get {
             let (byteOffset, bitOffsetInByte) = calculateOffsets(row: row, column: column)
 

Sources/Basics/HTTPClient/HTTPClientHeaders.swift

@@ -64,8 +64,8 @@ public struct HTTPClientHeaders: Sendable {
     }
 
     public struct Item: Equatable, Sendable {
-        let name: String
-        let value: String
+        package let name: String
+        package let value: String
 
         public init(name: String, value: String) {
             self.name = name

Sources/Basics/HTTPClient/HTTPMethod.swift

@@ -17,7 +17,7 @@ public enum HTTPMethod: Sendable {
     case put
     case delete
 
-    var string: String {
+    package var string: String {
         switch self {
         case .head:
             return "HEAD"

Sources/Basics/HTTPClient/URLSessionHTTPClient.swift

@@ -18,13 +18,13 @@ import struct TSCUtility.Versioning
 import FoundationNetworking
 #endif
 
-final class URLSessionHTTPClient: Sendable {
+package final class URLSessionHTTPClient: Sendable {
     private let dataSession: URLSession
     private let downloadSession: URLSession
     private let dataTaskManager: DataTaskManager
     private let downloadTaskManager: DownloadTaskManager
 
-    init(configuration: URLSessionConfiguration = .default) {
+    package init(configuration: URLSessionConfiguration = .default) {
         let dataDelegateQueue = OperationQueue()
         dataDelegateQueue.name = "org.swift.swiftpm.urlsession-http-client-data-delegate"
         dataDelegateQueue.maxConcurrentOperationCount = 1
@@ -52,7 +52,7 @@ final class URLSessionHTTPClient: Sendable {
     }
 
     @Sendable
-    func execute(
+    package func execute(
         _ request: HTTPClient.Request,
         progress: HTTPClient.ProgressHandler? = nil
     ) async throws -> LegacyHTTPClient.Response {
@@ -364,7 +364,7 @@ private final class DownloadTaskManager: NSObject, URLSessionDownloadDelegate {
 }
 
 extension URLRequest {
-    init(_ request: LegacyHTTPClient.Request) {
+    package init(_ request: LegacyHTTPClient.Request) {
         self.init(url: request.url)
         self.httpMethod = request.method.string
         request.headers.forEach { header in

Sources/Basics/Serialization/SerializedJSON.swift

@@ -13,7 +13,7 @@
 /// Wrapper type representing serialized escaped JSON strings providing helpers
 /// for escaped string interpolations for common types such as `AbsolutePath`.
 public struct SerializedJSON {
-    let underlying: String
+    package let underlying: String
 }
 
 extension SerializedJSON: ExpressibleByStringLiteral {