move namespace

Docker/Arguments/Image.vb

@@ -0,0 +1,51 @@
+Imports System.Runtime.CompilerServices
+
+Namespace Arguments
+
+    ''' <summary>
+    ''' Docker image name
+    ''' </summary>
+    Public Class Image
+
+        Public Property Publisher As String
+        Public Property Package As String
+
+        Public Shared Function ParseEntry(text As String) As Image
+            With text.Trim.Split("/"c)
+                Dim user$, name$
+
+                If .Length = 1 Then
+                    user = Nothing
+                    name = .ElementAt(0)
+                Else
+                    user = .ElementAt(0)
+                    name = .ElementAt(1)
+                End If
+
+                Return New Image With {
+                    .Package = name,
+                    .Publisher = user
+                }
+            End With
+        End Function
+
+        <MethodImpl(MethodImplOptions.AggressiveInlining)>
+        Public Overrides Function ToString() As String
+            If Publisher.StringEmpty Then
+                Return Package
+            Else
+                Return $"{Publisher}/{Package}"
+            End If
+        End Function
+
+        <MethodImpl(MethodImplOptions.AggressiveInlining)>
+        Public Shared Widening Operator CType(repo As String) As Image
+            Return ParseEntry(repo)
+        End Operator
+
+        <MethodImpl(MethodImplOptions.AggressiveInlining)>
+        Public Shared Narrowing Operator CType(img As Image) As String
+            Return img.ToString
+        End Operator
+    End Class
+End Namespace

Docker/Arguments/Mount.vb

@@ -0,0 +1,25 @@
+Namespace Arguments
+
+    ''' <summary>
+    ''' 共享文件夹
+    ''' </summary>
+    Public Class Mount
+
+        ''' <summary>
+        ''' 宿主机内的本地文件夹全路径
+        ''' </summary>
+        Public Property local As String
+        ''' <summary>
+        ''' 虚拟机内的文件路径,共享文件夹将会在虚拟机内被挂载到这个路径上面
+        ''' </summary>
+        Public Property virtual As String
+
+        ''' <summary>
+        ''' ``local:virtual``
+        ''' </summary>
+        ''' <returns></returns>
+        Public Overrides Function ToString() As String
+            Return $"{local.GetDirectoryFullPath}:{virtual}"
+        End Function
+    End Class
+End Namespace

Docker/Captures/Models.vb

@@ -1,4 +1,6 @@
-Namespace Captures
+Imports Darwinism.Docker.Arguments
+
+Namespace Captures
 
     Public Structure Search
         Dim NAME As Image

Docker/Commands.vb

@@ -1,4 +1,5 @@
 Imports System.Text
+Imports Darwinism.Docker.Arguments
 Imports Darwinism.Docker.Captures
 
 ''' <summary>

Docker/Docker.vbproj

@@ -93,9 +93,10 @@
     <Import Include="System.Threading.Tasks" />
   </ItemGroup>
   <ItemGroup>
+    <Compile Include="Arguments\Mount.vb" />
     <Compile Include="Captures\Models.vb" />
     <Compile Include="Captures\ParserHelpers.vb" />
-    <Compile Include="Image.vb" />
+    <Compile Include="Arguments\Image.vb" />
     <Compile Include="PowerShell.vb" />
     <Compile Include="Commands.vb" />
     <Compile Include="My Project\AssemblyInfo.vb" />

Docker/Image.vb

@@ -1,71 +0,0 @@
-Imports System.Runtime.CompilerServices
-
-''' <summary>
-''' Docker image name
-''' </summary>
-Public Class Image
-
-    Public Property Publisher As String
-    Public Property Package As String
-
-    Public Shared Function ParseEntry(text As String) As Image
-        With text.Trim.Split("/"c)
-            Dim user$, name$
-
-            If .Length = 1 Then
-                user = Nothing
-                name = .ElementAt(0)
-            Else
-                user = .ElementAt(0)
-                name = .ElementAt(1)
-            End If
-
-            Return New Image With {
-                .Package = name,
-                .Publisher = user
-            }
-        End With
-    End Function
-
-    <MethodImpl(MethodImplOptions.AggressiveInlining)>
-    Public Overrides Function ToString() As String
-        If Publisher.StringEmpty Then
-            Return Package
-        Else
-            Return $"{Publisher}/{Package}"
-        End If
-    End Function
-
-    <MethodImpl(MethodImplOptions.AggressiveInlining)>
-    Public Shared Widening Operator CType(repo As String) As Image
-        Return ParseEntry(repo)
-    End Operator
-
-    <MethodImpl(MethodImplOptions.AggressiveInlining)>
-    Public Shared Narrowing Operator CType(img As Image) As String
-        Return img.ToString
-    End Operator
-End Class
-
-''' <summary>
-''' 共享文件夹
-''' </summary>
-Public Class Mount
-
-    ''' <summary>
-    ''' 宿主机内的本地文件夹全路径
-    ''' </summary>
-    Public Property local As String
-    ''' <summary>
-    ''' 虚拟机内的文件路径,共享文件夹将会在虚拟机内被挂载到这个路径上面
-    ''' </summary>
-    Public Property virtual As String
-
-    ''' <summary>
-    ''' ``local:virtual``
-    ''' </summary>
-    ''' <returns></returns>
-    Public Overrides Function ToString() As String
-        Return $"{local.GetDirectoryFullPath}:{virtual}"
-    End Function
-End Class

Docker/test/Module1.vb

@@ -1,4 +1,5 @@
 Imports Darwinism
+Imports Darwinism.Docker.Arguments
 Imports Microsoft.VisualBasic.Serialization.JSON
 
 Module Module1
@@ -14,7 +15,7 @@ Module Module1
 
 
         Call Console.WriteLine(Docker.Run("centos", "echo ""hello world"""))
-        Call Console.WriteLine(Docker.Run("centos", "ls -l /mnt/ntfs", New Docker.Mount With {.local = "D:\test", .virtual = "/mnt/ntfs"}))
+        Call Console.WriteLine(Docker.Run("centos", "ls -l /mnt/ntfs", New Mount With {.local = "D:\test", .virtual = "/mnt/ntfs"}))
 
         For Each line In Docker.CommandHistory
             Call Console.WriteLine(line)