Added assembly information,

Author: A9G-Data-Droid

TextFileConvert/ConvertLineEndings.vb

@@ -3,19 +3,19 @@ Imports System.Text
 
 Public Class ConvertLineEndings
     ''' <summary>
-    ''' These are the different conversions we can handle in this library
+    '''     These are the different conversions that this library can perform.
     ''' </summary>
     Private Enum TextConvertMode
         Dos2Ux
         Ux2Dos
-        Dos2Mac
-        Mac2Dos
-        Mac2Ux
-        Ux2Mac
+        'Dos2Mac
+        'Mac2Dos
+        'Mac2Ux
+        'Ux2Mac
     End Enum
 
     ''' <summary>
-    ''' Converts a DOS text file to have Unix line endings.
+    '''     Converts a DOS text file to have Unix line endings.
     ''' </summary>
     ''' <param name="originalFile">The file to convert.</param>
     ''' <param name="newFile">The name of a new file to create.</param>
@@ -25,7 +25,7 @@ Public Class ConvertLineEndings
     End Function
 
     ''' <summary>
-    ''' Converts a DOS text file to have Unix line endings.
+    '''     Converts a DOS text file to have Unix line endings.
     ''' </summary>
     ''' <param name="originalFile">The file to convert.</param>
     ''' <param name="newFile">The name of a new file to create.</param>
@@ -35,13 +35,14 @@ Public Class ConvertLineEndings
     End Function
 
     ''' <summary>
-    ''' Loads a whole text file in to memory, Performs a find\replace, and writes a new file.
+    '''     Loads a whole text file in to memory, Performs a find\replace, and writes a new file.
     ''' </summary>
     ''' <param name="originalFile">The file to convert.</param>
     ''' <param name="newFile">The name of a new file to create.</param>
     ''' <param name="convertMode">This is the type of conversion we are going to perform</param>
     ''' <returns>Exit code.</returns>
-    Private Shared Async Function ReplaceLineEndings(originalFile As String, newFile As String, convertMode As TextConvertMode) As Task(Of Integer)
+    Private Shared Async Function ReplaceLineEndings(originalFile As String, newFile As String,
+                                                     convertMode As TextConvertMode) As Task(Of Integer)
         Const cr As Char = ChrW(13)
         Const lf As Char = ChrW(10)
 
@@ -55,10 +56,10 @@ Public Class ConvertLineEndings
         Try
             oldFileStream = New FileStream(originalFile, FileMode.Open)
             Using oldFile As New StreamReader(oldFileStream, fileEncoding, True)
-                Do Until oldFile.EndOfStream
+                Do Until oldFile.EndOfStream  ' Read through the whole file
                     Dim readBuffer(0) As Char
                     Dim readChars As Integer = Await oldFile.ReadAsync(readBuffer, 0, 1)
-                    If readChars < 1 Then Exit Do
+                    If readChars < 1 Then Exit Do  ' Short circuit 
                     Select Case convertMode
                         Case TextConvertMode.Dos2Ux
                             If readBuffer(0) = cr AndAlso oldFile.Peek() = 10 Then
@@ -82,9 +83,11 @@ Public Class ConvertLineEndings
                             Debug.Print("Unimplemented text conversion mode")
                             Return -1
                     End Select
+
                     convertedText.Append(readBuffer)
                 Loop
             End Using
+
             oldFileStream = Nothing
         Catch ex As Exception
             Debug.Print("Error: " & ex.Message & Environment.NewLine & "Number: " & ex.HResult.ToString)
@@ -105,14 +108,13 @@ Public Class ConvertLineEndings
     End Function
 
     ''' <summary>
-    ''' Attempt to detect the encoding of a file.
+    '''     Attempt to detect the encoding of a file.
     ''' </summary>
     ''' <param name="filename">The file to get the encoding pattern from.</param>
-    ''' <returns>Encoding type, defaults to ASCII</returns>
+    ''' <returns>Encoding type, defaults to ASCII.</returns>
     Public Shared Function GetEncoding(filename As String) As Encoding
         Dim bom = New Byte(3) {}
-
-        Try
+        Try  ' to read BOM
             Using file = New FileStream(filename, FileMode.Open, FileAccess.Read)
                 file.Read(bom, 0, 4)
             End Using
@@ -121,11 +123,14 @@ Public Class ConvertLineEndings
             Return Nothing
         End Try
 
+        ' Detect BOM type
         If bom(0) = &H2B AndAlso bom(1) = &H2F AndAlso bom(2) = &H76 Then Return Encoding.UTF7
         If bom(0) = &HEF AndAlso bom(1) = &HBB AndAlso bom(2) = &HBF Then Return Encoding.UTF8
         If bom(0) = &HFF AndAlso bom(1) = &HFE Then Return Encoding.Unicode
         If bom(0) = &HFE AndAlso bom(1) = &HFF Then Return Encoding.BigEndianUnicode
         If bom(0) = 0 AndAlso bom(1) = 0 AndAlso bom(2) = &HFE AndAlso bom(3) = &HFF Then Return Encoding.UTF32
+
+        ' Default to
         Return Encoding.ASCII
     End Function
 End Class

TextFileConvert/TextFileConvert.vbproj

@@ -3,6 +3,17 @@
   <PropertyGroup>
     <RootNamespace>TextFileConvert</RootNamespace>
     <TargetFramework>netstandard2.0</TargetFramework>
+    <Authors>Adam Kauffman</Authors>
+    <Company>Cascade Engineering Technologies</Company>
+    <NeutralLanguage>en</NeutralLanguage>
+    <GeneratePackageOnBuild>false</GeneratePackageOnBuild>
+    <Description>This provides text file conversion capabilities like the common Unix utilities "ux2dos" and "dos2ux".</Description>
+    <Copyright>Copyright 2018 Adam Kauffman</Copyright>
+    <PackageLicenseUrl>https://opensource.org/licenses/MIT</PackageLicenseUrl>
+    <AssemblyVersion>0.1.0.0</AssemblyVersion>
+    <Version>0.1.0</Version>
+    <PackageReleaseNotes>This is the alpha build.</PackageReleaseNotes>
+    <PackageTags>ux2dos, dos2ux</PackageTags>
   </PropertyGroup>
 
 </Project>

dos2ux/dos2ux.vbproj

@@ -6,6 +6,14 @@
     <TargetFramework>net461</TargetFramework>
     <StartupObject>Sub Main</StartupObject>
     <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
+    <Version>0.1.0</Version>
+    <Authors>Adam Kauffman</Authors>
+    <Company>Cascade Engineering Technologies</Company>
+    <Description>This provides text file conversion capabilities like the common Unix tool.</Description>
+    <Copyright>Copyright 2018 Adam Kauffman</Copyright>
+    <PackageLicenseUrl>https://opensource.org/licenses/MIT</PackageLicenseUrl>
+    <PackageReleaseNotes>This is the alpha build.</PackageReleaseNotes>
+    <NeutralLanguage>en</NeutralLanguage>
   </PropertyGroup>
 
   <ItemGroup>

ux2dos/My Project/AssemblyInfo.vb

@@ -1,4 +1,5 @@
-Imports System.Reflection
+Imports System.Resources
+Imports System.Reflection
 Imports System.Runtime.InteropServices
 
 ' General Information about an assembly is controlled through the following
@@ -8,10 +9,10 @@ Imports System.Runtime.InteropServices
 ' Review the values of the assembly attributes
 
 <Assembly: AssemblyTitle("ux2dos")>
-<Assembly: AssemblyDescription("")>
-<Assembly: AssemblyCompany("Microsoft")>
+<Assembly: AssemblyDescription("Like the old UNIX command.")>
+<Assembly: AssemblyCompany("Cascade Engineering Technologies")>
 <Assembly: AssemblyProduct("ux2dos")>
-<Assembly: AssemblyCopyright("Copyright © Microsoft 2018")>
+<Assembly: AssemblyCopyright("Copyright © 2018 Adam Kauffman")>
 <Assembly: AssemblyTrademark("")>
 
 <Assembly: ComVisible(False)>
@@ -30,5 +31,6 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.0.0.0")>
-<Assembly: AssemblyFileVersion("1.0.0.0")>
+<Assembly: AssemblyVersion("0.1.0.0")>
+<Assembly: AssemblyFileVersion("0.1.0.0")>
+<Assembly: NeutralResourcesLanguage("en")>