\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\tHow to display image inside the XAML with style:\r\n\t\r\n\t\t\t\r\n\r\n\tHow to set image to Content control from code behind:\r\n\r\n\t\tMyIcon.Content = Icons_Default.Current[Icons_Default.Icon_IconFileName];\r\n\t\t\r\n#>\r\nusing namespace System;\r\nusing namespace System.IO;\r\nusing namespace System.Linq;\r\nusing namespace System.Xml.Linq;\r\nusing namespace System.Text.RegularExpressions;\r\nusing namespace System.Collections.Generic;\r\n\r\n[Reflection.Assembly]::LoadWithPartialName(\"System.Xml.Linq\") | Out-Null;\r\n\r\nClear-Host;\r\n\r\n# ----------------------------------------------------------------------------\r\n# Get current command path.\r\n[string]$current = $MyInvocation.MyCommand.Path;\r\n# Get calling command path.\r\n[string]$calling = @(Get-PSCallStack)[1].InvocationInfo.MyCommand.Path;\r\n# If executed directly then...\r\nif ($calling -ne \"\") {\r\n $current = $calling;\r\n}\r\n# ----------------------------------------------------------------------------\r\n[FileInfo]$file = New-Object FileInfo($current);\r\n# Set public parameters.\r\n$global:scriptName = $file.Basename;\r\n$global:scriptPath = $file.Directory.FullName;\r\n# Change current directory.\r\n[Console]::WriteLine(\"Script Path: {0}\", $scriptPath);\r\n[Environment]::CurrentDirectory = $scriptPath;\r\nSet-Location $scriptPath;\r\n# ----------------------------------------------------------------------------\r\n[DirectoryInfo]$root = New-Object DirectoryInfo($scriptPath);\r\n# ----------------------------------------------------------------------------\r\nfunction RemoveAttributes\r\n{\r\n param([XElement]$Node,[string]$Name);\r\n #----------------------------------------------------------\r\n foreach ($attr in $Node.Attributes())\r\n {\r\n if ($attr.Name -eq $Name)\r\n {\r\n $attr.Remove();\r\n }\r\n }\r\n foreach ($child in $Node.Descendants())\r\n {\r\n RemoveAttributes -Node $child -Name $Name;\r\n }\r\n}\r\n# ----------------------------------------------------------------------------\r\nfunction FindParentFile\r\n{\r\n [OutputType([FileInfo[]])] param([string]$pattern);\r\n #----------------------------------------------------------\r\n [DirectoryInfo]$di = new-Object DirectoryInfo $scriptPath;\r\n do\r\n {\r\n $files = $di.GetFiles($pattern);\r\n # Return if project files were found.\r\n if ($files.Count -gt 0)\r\n {\r\n return $files;\r\n }\r\n # Continue to parent.\r\n $di = $di.Parent;\r\n } while($null -ne $di);\r\n return $null;\r\n}\r\n# ----------------------------------------------------------------------------\r\nfunction GetProjectValue\r\n{\r\n [OutputType([string])] param([string]$path, [string]$name);\r\n #----------------------------------------------------------\r\n [string]$content = [File]::ReadAllText($path);\r\n\t[Regex]$rx = New-Object Regex(\"(?<$name>)(?[^<]*)(?<\\/$name>)\");\r\n\t$match = $rx.Match($content);\r\n\tif ($match.Success -eq $true) {\r\n\t\treturn $match.Groups[\"v\"].Value;\r\n\t}\r\n\treturn $null;\r\n}\r\n# ----------------------------------------------------------------------------\r\nfunction FindExistingFile\r\n{\r\n [OutputType([string])] param([string]$path);\r\n #----------------------------------------------------------\r\n [FileInfo]$fi = $null;\r\n # Paths to look for executable.\r\n $ps = @(\r\n $path,\r\n \"${env:ProgramFiles}\\$path\",\r\n \"${env:ProgramFiles(x86)}\\$path\",\r\n \"D:\\Program Files\\$path\",\r\n \"D:\\Program Files (x86)\\$dfe\"\r\n );\r\n foreach ($p in $ps) {\r\n # Fix dot notations.\r\n $fullPath = [Path]::GetFullPath($p);\r\n #Write-Host \"Check... $fullPath\";\r\n if ([File]::Exists($fullPath)) {\r\n $fi = new-Object FileInfo $fullPath;\r\n break;\r\n }\r\n }\r\n return $fi;\r\n}\r\n# ----------------------------------------------------------------------------\r\nfunction SHA256CheckSum\r\n{\r\n param($filePath);\r\n #----------------------------------------------------------\r\n $SHA256 = [System.Security.Cryptography.SHA256Managed]::Create();\r\n $fileStream = [System.IO.File]::OpenRead($filePath);\r\n $bytes = $SHA256.ComputeHash($fileStream);\r\n $hash = ($bytes|ForEach-Object ToString X2) -join '';\r\n $fileStream.Dispose();\r\n $SHA256.Dispose();\r\n return $hash;\r\n}\r\n# ----------------------------------------------------------------------------\r\nfunction FindProjectFile\r\n{\r\n [FileInfo[]]$list = FindParentFile \"*.*proj\";\r\n if ($list -ne $null -and $list.Count -gt 0){\r\n # Order by date descendign to most recent file.\r\n $list = [Enumerable]::OrderByDescending($list, [Func[object,object]]{ param($x) $x.LastWriteTime });\r\n $list = [Enumerable]::ToArray($list);\r\n return $list[0];\r\n }\r\n return $null;\r\n}\r\n# ----------------------------------------------------------------------------\r\n# Show menu\r\n# ----------------------------------------------------------------------------\r\nfunction ShowOptionsMenu\r\n{\r\n param($items);\r\n #----------------------------------------------------------\r\n # Get local configurations.\r\n\t$keys = \"1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ\";\r\n Write-Host \"Options:\";\r\n Write-Host;\r\n for ($i = 0; $i -lt $items.Count; $i++)\r\n {\r\n $item = $items[$i];\r\n Write-Host \" $($keys[$i]) - $($item)\";\r\n }\r\n Write-Host;\r\n $m = Read-Host -Prompt \"Type option and press ENTER to continue\";\r\n $m = $m.ToUpper();\r\n $keyIndex = $keys.IndexOf($m);\r\n # If wrong choice then...\r\n if ($keyIndex -eq -1)\r\n {\r\n return $null;\r\n }\r\n return $items[$keyIndex];\r\n}\r\n# ----------------------------------------------------------------------------\r\n\r\nWrite-Host;\r\n\r\n#------------------------------\r\n# Inkscape program location, which will be used for conversion from SVG format to XAML format.\r\n#------------------------------\r\n\r\n$inkscape = FindExistingFile \"Inkscape\\bin\\inkscape.exe\";\r\nif ($null -eq $inkscape) {\r\n Write-Host \"Inkscape program not found!\";\r\n Write-Host \"Download from https://inkscape.org/release/\";\r\n return;\r\n}\r\nWrite-Host \"Inkscape: $($inkscape.FullName)\";\r\n\r\n#------------------------------\r\n# Get Project file.\r\n#------------------------------\r\n\r\n[FileInfo]$project = FindProjectFile;\r\nif ($null -eq $project) {\r\n Write-Host \"Project file not found.\";\r\n return;\r\n}\r\nWrite-Host \"Project: $($project.FullName)\";\r\n\r\n#------------------------------\r\n# Get Default namespace.\r\n#------------------------------\r\n\r\n# Get from project file.\r\n$defaultNamespace = GetProjectValue $project.FullName \"RootNamespace\";\r\n# If default namespace not found.\r\nif (\"\" -eq \"$defaultNamespace\") {\r\n # Visual studio use Project file name as default assembly and root namespace.\r\n $defaultNamespace = $project.BaseName;\r\n}\r\n# If namespace not found then...\r\nif (\"\" -eq \"$defaultNamespace\") {\r\n\tWrite-Host \"Please provide default namespace\";\r\n $defaultNamespace = Host-Read;\r\n}\r\n#Write-Host \"Default Namespace: $defaultNamespace\";\r\n\r\n# Get Relative namespace.\r\n$relativeNamespace = $scriptPath.Substring($project.Directory.FullName.Length).Replace(\"\\\", \".\");\r\n#Write-Host \"Relative Namespace: $relativeNamespace\";\r\n$namespace = $defaultNamespace + $relativeNamespace;\r\n\r\nWrite-Host;\r\nWrite-Host \"Namespace: $namespace\";\r\n\r\n#------------------------------\r\n# Get Class Name\r\n#------------------------------\r\n\r\n# Get forders with *.svg files inside.\r\n$dirs = $file.Directory.GetDirectories();\r\n$dirNames = new-Object List[string];\r\nforeach ($dir in $dirs) {\r\n $filePattern = \"*.svg\";\r\n # If folder contains images then...\r\n $dirFiles = $dir.GetFiles($filePattern);\r\n if ($dirFiles.Length -gt 0){\r\n $dirNames.Add($dir.Name);\r\n }\r\n #Write-Host \"Source: $($dir.Name), $filePattern Files: $($dirFiles.Length)\";\r\n}\r\n\r\n[string]$className = $null;\r\n\r\nif ($dirNames.Count -eq 1){\r\n $className = $dirNames[0];\r\n} elseif ($dirNames.Count -gt 1){\r\n $className = ShowOptionsMenu $dirNames;\r\n}\r\n\r\nif ($null -eq $className){\r\n Write-Host \"Folder with images not found!\";\r\n return;\r\n}\r\n\r\n$sourceDir = New-Object DirectoryInfo($root.FullName + \"\\\" + $className);\r\n\r\nWrite-Host \"Class: $className\";\r\nWrite-Host;\r\nWrite-Host \"Source: $($sourceDir.Name)\\\";\r\nWrite-Host \"Target: $className.xaml + $className.xaml.cs\";\r\nWrite-Host;\r\npause;\r\n\r\n#------------------------------\r\n# Generate images.\r\n#------------------------------\r\n\r\nWrite-Host;\r\n\r\n#Write-Host \"Done. Press any key to continue...\";\r\n#$null = $Host.UI.RawUI.ReadKey(\"NoEcho,IncludeKeyDown\");\r\n\r\n# Get files.\r\n$files = $sourceDir.GetFiles(\"*.svg\");\r\n# If no SVG images found then skip.\r\nif ($files.Length -eq 0){\r\n continue;\r\n}\r\n\r\n# Create regular expressions for key and names generation.\r\n$RxAllExceptNumbersAndLetters = New-Object Regex(\"[^a-zA-Z0-9]\", [RegexOptions]::IgnoreCase);\r\n$UsRx = New-Object Regex(\"_+\");\r\n# Crate output file name.\r\n$fileName = $RxAllExceptNumbersAndLetters.Replace($sourceDir.Name, \"_\");\r\n$fileName = $UsRx.Replace($fileName, \"_\");\r\n$fileName = \"$className.xaml\";\r\n$fileNameCs = \"$className.xaml.cs\";\r\nif ($files.Length -eq 1){\r\n Write-Host \"Convert $($files.Length) image:\";\r\n}else{\r\n Write-Host \"Convert $($files.Length) images:\";\r\n}\r\n# Start .xaml file.\r\n$xNs = \"http://schemas.microsoft.com/winfx/2006/xaml\";\r\nif ([File]::Exists($fileName) -ne $true)\r\n{\r\n [File]::WriteAllText($fileName, \"');\r\n [File]::AppendAllText($fileName,\"`r`n`r`n\");\r\n}\r\n[XDocument]$xaml = [XDocument]::Load($fileName); \r\n# Create list from existing nodes.\r\n$nodes = $xaml.Root.Nodes();\r\n#$nodes = $xaml.Root.Elements(\"Viewbox\").ToArray();\r\n#$nodes = $xaml.DocumentElement.SelectNodes(\"/*[local-name() = 'ResourceDictionary']/*[local-name() = 'Viewbox']\");\r\n\r\n$nodeList = new-Object System.Collections.Generic.Dictionary[string`,object];\r\n[XElement]$node = $null;\r\nforeach ($node in $nodes)\r\n{\r\n $nodeKey = $node.Attribute([XName]::Get(\"Key\", $xNs)).Value;\r\n $nodeList.Add($nodeKey, $node);\r\n #Write-Host \"Key $nodeKey\";\r\n}\r\n# Cleanup old nodes.\r\n$xaml.Root.RemoveNodes();\r\n\r\n# Start .xaml.cs file.\r\n[File]::WriteAllText($fileNameCs, \"using System.Windows;`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"namespace $namespace`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"{`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`tpartial class $className : ResourceDictionary`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t{`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t`tpublic $className()`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t`t{`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t`t`tInitializeComponent();`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t`t}`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t`tpublic static $className Current => _Current = _Current ?? new $className();`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t`tprivate static $className _Current;`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`r`n\");\r\n\r\nWrite-Host;\r\n\r\n# Process files.\r\nfor ($f = 0; $f -lt $files.Length; $f++) {\r\n $file = $files[$f];\r\n $fileHash = SHA256CheckSum -filePath $file.FullName;\r\n $fileHashNodeName = \"Tag\";\r\n $nodeXml = $null;\r\n # Create unique key.\r\n $key = \"Icon_$($file.BaseName)\";\r\n # Get existing node or create new.\r\n\t$action = \"Insert:\";\r\n if ($nodeList.ContainsKey($key))\r\n {\r\n $action = \"Update:\";\r\n [XElement]$oldNode = $nodeList[$key];\r\n # Get hash of current node.\r\n $oldHash = $oldNode.Attribute([XName]::Get($fileHashNodeName)).Value;\r\n if ($oldHash -eq \"SHA256_$fileHash\")\r\n {\r\n $nodeXml = $oldNode;\r\n $action = \"Keep: \";\r\n }\r\n }\r\n $isNew = ($null -eq $nodeXml);\r\n if ($isNew)\r\n {\r\n $nodeXml = Get-Content \"$($file.FullName)\" | & $inkscape --pipe --export-type=xaml | Out-String;\r\n }\r\n # Show file name.\r\n Write-Host \"`t$action $($sourceDir.Name)\\$($file.Name)\";\r\n # Remove name attributes.\r\n [XDocument]$node = [XDocument]::Parse($nodeXml);\r\n # Remove \"Name\" attributes.\r\n RemoveAttributes -Node $node.Root -Name \"Name\";\r\n\r\n RemoveAttributes -Node $node.Root -Name \"Key\";\r\n RemoveAttributes -Node $node.Root -Name \"Shared\";\r\n\r\n # Add image XML to XAML document.\r\n $xaml.Root.Add($node.Root);\r\n # Remove old attributes.\r\n if ($isNew)\r\n {\r\n # Get node which was just added.\r\n $ln = $xaml.Root.LastNode;\r\n # Give node unique name.\r\n $ln.SetAttributeValue([XName]::Get(\"Key\", $xNs), $key);\r\n # Make sure that image copy is made when it is used.\r\n $ln.SetAttributeValue([XName]::Get(\"Shared\", $xNs), \"False\");\r\n # Set file hash.\r\n $ln.SetAttributeValue([XName]::Get($fileHashNodeName), \"SHA256_$fileHash\");\r\n }\r\n # Write unique name to code file.\r\n [File]::AppendAllText($fileNameCs, \"`t`tpublic const string $key = nameof($key);`r`n\");\r\n}\r\n\r\n# Save XAML file.\r\n$xaml.Save($fileName);\r\n# End .xaml.cs file.\r\n[File]::AppendAllText($fileNameCs, \"`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"`t}`r`n\");\r\n[File]::AppendAllText($fileNameCs, \"}`r`n\");\r\n\r\nWrite-Host;\r\nWrite-Host \"Done. Press any key to continue...\";\r\n$null = $Host.UI.RawUI.ReadKey(\"NoEcho,IncludeKeyDown\");\r\n"
},
{
"path": "FocusLogger/JocysCom/Controls/Themes/Default.xaml",
"content": "\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\r\n\t#ff000000\r\n\r\n\t\r\n\t#FFE6E6\r\n\t#FFF2E6\r\n\t#FFFFE6\r\n\t#F2FFE6\r\n\t#E6FFE6\r\n\t#E6FFF2\r\n\t#E6FFFF\r\n\t#E6F2FF\r\n\t#E6E6FF\r\n\t#F2E6FF\r\n\t#FFE6FF\r\n\t#FFE6F2\r\n\r\n\t\r\n\t#D60000\r\n\t#D66700\r\n\t#D6D600\r\n\t#67D600\r\n\t#00D600\r\n\t#00D667\r\n\t#00D6D6\r\n\t#0067D6\r\n\t#0000D6\r\n\t#6700D6\r\n\t#D600D6\r\n\t#D60067\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\r\n\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\t\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\r\n\r\n\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t-->\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\t\r\n\r\n\t\r\n\t\r\n\r\n\r\n"
},
{
"path": "FocusLogger/JocysCom/Controls/Themes/Default_MultiReplace.ps1",
"content": "<#\r\n.SYNOPSIS\r\n Replace in multiple files.\r\n.NOTES\r\n Author: Evaldas Jocys \r\n Modified: 2021-04-14\r\n.LINK\r\n http://www.jocys.com\r\n#>\r\n\r\nusing namespace System;\r\nusing namespace System.IO;\r\nusing namespace System.Text;\r\nusing namespace System.Text.RegularExpressions;\r\n\r\n# ----------------------------------------------------------------------------\r\n# Get current command path.\r\n[string]$current = $MyInvocation.MyCommand.Path;\r\n# Get calling command path.\r\n[string]$calling = @(Get-PSCallStack)[1].InvocationInfo.MyCommand.Path;\r\n# If executed directly then...\r\nif ($calling -ne \"\") {\r\n $current = $calling;\r\n}\r\n# ----------------------------------------------------------------------------\r\n[FileInfo]$file = New-Object FileInfo($current);\r\n# Set public parameters.\r\n$global:scriptName = $file.Basename;\r\n$global:scriptPath = $file.Directory.FullName;\r\n# Change current directory.\r\n[Console]::WriteLine(\"Path: {0}\", $scriptPath);\r\n[Environment]::CurrentDirectory = $scriptPath;\r\nSet-Location $scriptPath;\r\n# ----------------------------------------------------------------------------\r\nFunction DoReplace\r\n{\r\n\t# Parameters.\r\n\tparam ([string]$path, [string]$filesPattern, [string]$pattern, [string]$replacement);\r\n\tWrite-Output \"`\"$path`\" `\"$filesPattern`\" `\"$pattern`\" `\"$replacement`\"\";\r\n\t# Function.\r\n\t$di = new-Object DirectoryInfo($path);\r\n\t[FileInfo[]]$files = $di.GetFiles($filesPattern, [SearchOption]::AllDirectories);\r\n\t$rx = new-Object Regex($pattern);\r\n\tforeach ($file in $files)\r\n\t{\r\n\t\t[string]$oldContent = [File]::ReadAllText($file.FullName);\r\n\t\t$newContent = $rx.Replace($oldContent, $replacement);\r\n\t\tif ($oldContent -ne $newContent)\r\n\t\t{\r\n\t\t\t$subName = $file.FullName.Substring($di.FullName.Length + 1);\r\n\t\t\tWrite-Output \" $subName\";\r\n\t\t\t[File]::WriteAllText($file.FullName, $newContent);\r\n\t\t}\r\n\t}\r\n}\r\n# Replace default padding and margin from 4 to 3.\r\nDoReplace \".\" \"*.xaml\" \"(4),([034]),([034]),([034])\" \"3,`$2,`$3,`$4\";\r\nDoReplace \".\" \"*.xaml\" \"([034]),(4),([034]),([034])\" \"`$1,3,`$3,`$4\";\r\nDoReplace \".\" \"*.xaml\" \"([034]),([034]),(4),([034])\" \"`$1,`$2,3,`$4\";\r\nDoReplace \".\" \"*.xaml\" \"([034]),([034]),([034]),(4)\" \"`$1,`$2,`$3,3\";\r\npause;\r\n"
},
{
"path": "FocusLogger/JocysCom/Controls/Themes/Icons.xaml",
"content": "\r\n\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n"
},
{
"path": "FocusLogger/JocysCom/Controls/Themes/Icons.xaml.cs",
"content": "using System.Windows;\r\n\r\nnamespace JocysCom.ClassLibrary.Controls.Themes\r\n{\r\n\tpartial class Icons : ResourceDictionary\r\n\t{\r\n\t\tpublic Icons()\r\n\t\t{\r\n\t\t\tInitializeComponent();\r\n\t\t}\r\n\r\n\t\tpublic static Icons Current => _Current = _Current ?? new Icons();\r\n\t\tprivate static Icons _Current;\r\n\r\n\t\tpublic const string Icon_Add = nameof(Icon_Add);\r\n\t\tpublic const string Icon_Cancel = nameof(Icon_Cancel);\r\n\t\tpublic const string Icon_Cleanup = nameof(Icon_Cleanup);\r\n\t\tpublic const string Icon_Delete = nameof(Icon_Delete);\r\n\t\tpublic const string Icon_Edit = nameof(Icon_Edit);\r\n\t\tpublic const string Icon_Error = nameof(Icon_Error);\r\n\t\tpublic const string Icon_Exit = nameof(Icon_Exit);\r\n\t\tpublic const string Icon_Export = nameof(Icon_Export);\r\n\t\tpublic const string Icon_FolderOpen = nameof(Icon_FolderOpen);\r\n\t\tpublic const string Icon_Ignore = nameof(Icon_Ignore);\r\n\t\tpublic const string Icon_Import = nameof(Icon_Import);\r\n\t\tpublic const string Icon_Information = nameof(Icon_Information);\r\n\t\tpublic const string Icon_InformationGrey = nameof(Icon_InformationGrey);\r\n\t\tpublic const string Icon_Maximize = nameof(Icon_Maximize);\r\n\t\tpublic const string Icon_MediaPlay = nameof(Icon_MediaPlay);\r\n\t\tpublic const string Icon_MediaStop = nameof(Icon_MediaStop);\r\n\t\tpublic const string Icon_Minimize = nameof(Icon_Minimize);\r\n\t\tpublic const string Icon_OK = nameof(Icon_OK);\r\n\t\tpublic const string Icon_Play = nameof(Icon_Play);\r\n\t\tpublic const string Icon_ProcessLeft = nameof(Icon_ProcessLeft);\r\n\t\tpublic const string Icon_ProcessRight = nameof(Icon_ProcessRight);\r\n\t\tpublic const string Icon_Question = nameof(Icon_Question);\r\n\t\tpublic const string Icon_Record = nameof(Icon_Record);\r\n\t\tpublic const string Icon_Refresh = nameof(Icon_Refresh);\r\n\t\tpublic const string Icon_Remove = nameof(Icon_Remove);\r\n\t\tpublic const string Icon_Reset = nameof(Icon_Reset);\r\n\t\tpublic const string Icon_Save = nameof(Icon_Save);\r\n\t\tpublic const string Icon_SelectAll = nameof(Icon_SelectAll);\r\n\t\tpublic const string Icon_SelectInverse = nameof(Icon_SelectInverse);\r\n\t\tpublic const string Icon_SelectNone = nameof(Icon_SelectNone);\r\n\t\tpublic const string Icon_Stop = nameof(Icon_Stop);\r\n\t\tpublic const string Icon_ToggleOff = nameof(Icon_ToggleOff);\r\n\t\tpublic const string Icon_ToggleOn = nameof(Icon_ToggleOn);\r\n\t\tpublic const string Icon_Warning = nameof(Icon_Warning);\r\n\r\n\t}\r\n}\r\n"
},
{
"path": "FocusLogger/JocysCom/Controls/ToolStripBorderlessRenderer.cs",
"content": "using System.Windows.Forms;\r\n\r\nnamespace JocysCom.ClassLibrary.Controls\r\n{\r\n\t/// \r\n\t/// Remove white borders from toolstrip.\r\n\t/// How to use:\r\n\t/// toolStrip.Renderer = new ToolStripBorderlessRenderer();\r\n\t/// \r\n\tpublic class ToolStripBorderlessRenderer : ToolStripSystemRenderer\r\n\t{\r\n\t\tprotected override void OnRenderToolStripBorder(ToolStripRenderEventArgs e)\r\n\t\t{\r\n\t\t\tif (e.ToolStrip.GetType() == typeof(ToolStrip))\r\n\t\t\t{\r\n\t\t\t\t// skip render border\r\n\t\t\t}\r\n\t\t\telse\r\n\t\t\t{\r\n\t\t\t\t// do render border\r\n\t\t\t\tbase.OnRenderToolStripBorder(e);\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t}\r\n}\r\n"
},
{
"path": "FocusLogger/JocysCom/Data/SqlHelper.Types.cs",
"content": "using System;\r\n#if NETFRAMEWORK\r\nusing System.Data.SqlClient;\r\n#else\r\n#endif\r\n\r\nnamespace JocysCom.ClassLibrary.Data\r\n{\r\n\tpublic partial class SqlHelper\r\n\t{\r\n\t\t/// Determines whether the given SQL type string supports a size specification (e.g. CHAR, VARCHAR, BINARY).\r\n\t\tpublic static bool HaveSize(string sqlType)\r\n\t\t{\r\n\t\t\tvar name = sqlType.ToLower();\r\n\t\t\treturn name.Contains(\"char\") || name.Contains(\"binary\");\r\n\t\t}\r\n\r\n\t\t/// Determines whether the given SQL type string represents a Unicode type (e.g. NCHAR, NVARCHAR).\r\n\t\tpublic static bool IsUnicode(string sqlType)\r\n\t\t{\r\n\t\t\tvar name = sqlType.ToLower();\r\n\t\t\treturn name.Contains(\"nchar\") || name.Contains(\"nvarchar\");\r\n\t\t}\r\n\r\n\t\t/// Maps a SQL Server type name to its Visual Basic built-in type alias (e.g. Date, Integer) or returns the CLR type name if no VB alias exists.\r\n\t\tpublic static string ToSystemTypeVB(string sqlType)\r\n\t\t{\r\n\t\t\tvar t = ToSystemType(sqlType);\r\n\t\t\tif (t == typeof(DateTime)) return \"Date\";\r\n\t\t\tif (t == typeof(Int16)) return \"Short\";\r\n\t\t\tif (t == typeof(Int32)) return \"Integer\";\r\n\t\t\tif (t == typeof(Int64)) return \"Long\";\r\n\t\t\tif (t == typeof(UInt16)) return \"UShort\";\r\n\t\t\tif (t == typeof(UInt32)) return \"UInteger\";\r\n\t\t\tif (t == typeof(UInt64)) return \"ULong\";\r\n\t\t\treturn t.Name;\r\n\t\t}\r\n\r\n\t\t/// Maps a SQL Server type name to its C# built-in type alias (e.g. int, string) or returns the CLR type name if no alias exists.\r\n\t\tpublic static string ToSystemTypeCS(string sqlType)\r\n\t\t{\r\n\t\t\tvar t = ToSystemType(sqlType);\r\n\t\t\tvar name = ClassLibrary.Runtime.RuntimeHelper.GetBuiltInTypeNameOrAlias(t);\r\n\t\t\treturn name;\r\n\t\t}\r\n\r\n\t\t/// Infers the CLR System.Type for the specified SQL Server data type name.\r\n\t\tpublic static Type ToSystemType(string sqlTypeSring)\r\n\t\t{\r\n\t\t\tvar sqlType = (SqlDataType)Enum.Parse(typeof(SqlDataType), sqlTypeSring, true);\r\n\t\t\tvar t = typeof(String);\r\n\t\t\tswitch (sqlType)\r\n\t\t\t{\r\n\t\t\t\tcase SqlDataType.BigInt:\r\n\t\t\t\t\tt = typeof(Int64);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Bit:\r\n\t\t\t\t\tt = typeof(Boolean);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Char:\r\n\t\t\t\tcase SqlDataType.VarChar:\r\n\t\t\t\tcase SqlDataType.VarCharMax:\r\n\t\t\t\t\tt = typeof(String);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Date:\r\n\t\t\t\tcase SqlDataType.DateTime:\r\n\t\t\t\tcase SqlDataType.DateTime2:\r\n\t\t\t\tcase SqlDataType.SmallDateTime:\r\n\t\t\t\t\tt = typeof(DateTime);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.DateTimeOffset:\r\n\t\t\t\t\tt = typeof(DateTimeOffset);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Time:\r\n\t\t\t\t\tt = typeof(TimeSpan);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Decimal:\r\n\t\t\t\tcase SqlDataType.Money:\r\n\t\t\t\tcase SqlDataType.SmallMoney:\r\n\t\t\t\t\tt = typeof(Decimal);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Int:\r\n\t\t\t\t\tt = typeof(Int32);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.NChar:\r\n\t\t\t\tcase SqlDataType.NText:\r\n\t\t\t\tcase SqlDataType.NVarChar:\r\n\t\t\t\tcase SqlDataType.NVarCharMax:\r\n\t\t\t\tcase SqlDataType.Text:\r\n\t\t\t\t\tt = typeof(String);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Real:\r\n\t\t\t\tcase SqlDataType.Numeric:\r\n\t\t\t\tcase SqlDataType.Float:\r\n\t\t\t\t\tt = typeof(Double);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.Timestamp:\r\n\t\t\t\tcase SqlDataType.Binary:\r\n\t\t\t\t\tt = typeof(Byte[]);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.TinyInt:\r\n\t\t\t\t\tt = typeof(Byte);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.SmallInt:\r\n\t\t\t\t\tt = typeof(Int16);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.UniqueIdentifier:\r\n\t\t\t\t\tt = typeof(Guid);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tcase SqlDataType.UserDefinedDataType:\r\n\t\t\t\tcase SqlDataType.UserDefinedType:\r\n\t\t\t\tcase SqlDataType.Variant:\r\n\t\t\t\tcase SqlDataType.Image:\r\n\t\t\t\t\tt = typeof(Object);\r\n\t\t\t\t\tbreak;\r\n\t\t\t\tdefault:\r\n\t\t\t\t\tt = typeof(String);\r\n\t\t\t\t\tbreak;\r\n\t\t\t}\r\n\t\t\treturn t;\r\n\t\t}\r\n\r\n\t\t/// Infers the SqlDataType for a given CLR TypeCode.\r\n\t\t/// \r\n\t\t/// Chooses VarBinary or VarChar when min != max to indicate variable-length;\r\n\t\t/// uses NChar/NVarChar instead of Char/VarChar when isUnicode is true.\r\n\t\t/// \r\n\t\tpublic static SqlDataType GetSqlDataType(TypeCode code, int min = 0, int max = 0, bool isUnicode = false)\r\n\t\t{\r\n\t\t\tvar v = min != max;\r\n\t\t\tswitch (code)\r\n\t\t\t{\r\n\t\t\t\tcase TypeCode.Empty: return SqlDataType.None;\r\n\t\t\t\tcase TypeCode.Object: return v ? SqlDataType.VarBinary : SqlDataType.Binary;\r\n\t\t\t\tcase TypeCode.DBNull: return SqlDataType.None;\r\n\t\t\t\tcase TypeCode.Boolean: return SqlDataType.Bit;\r\n\t\t\t\tcase TypeCode.Char: return isUnicode ? SqlDataType.NChar : SqlDataType.Char;\r\n\t\t\t\tcase TypeCode.SByte: return SqlDataType.None;\r\n\t\t\t\tcase TypeCode.Byte: return SqlDataType.TinyInt;\r\n\t\t\t\tcase TypeCode.Int16: return SqlDataType.SmallInt;\r\n\t\t\t\tcase TypeCode.UInt16: return SqlDataType.SmallInt;\r\n\t\t\t\tcase TypeCode.Int32: return SqlDataType.Int;\r\n\t\t\t\tcase TypeCode.UInt32: return SqlDataType.Int;\r\n\t\t\t\tcase TypeCode.Int64: return SqlDataType.BigInt;\r\n\t\t\t\tcase TypeCode.UInt64: return SqlDataType.BigInt;\r\n\t\t\t\tcase TypeCode.Single: return SqlDataType.Real;\r\n\t\t\t\tcase TypeCode.Double: return SqlDataType.Float;\r\n\t\t\t\tcase TypeCode.Decimal: return SqlDataType.Money;\r\n\t\t\t\tcase TypeCode.DateTime: return SqlDataType.DateTime;\r\n\t\t\t\tcase TypeCode.String: return v\r\n\t\t\t\t\t? isUnicode ? SqlDataType.NVarChar : SqlDataType.VarChar \r\n\t\t\t\t\t: isUnicode ? SqlDataType.NChar : SqlDataType.Char;\r\n\t\t\t\tdefault: return SqlDataType.None;\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t//public static SqlDataType GetSqlDataType(Type giveType)\r\n\t\t//{\r\n\t\t//\t// Allow nullable types to be handled\r\n\t\t//\tgiveType = Nullable.GetUnderlyingType(giveType) ?? giveType;\r\n\t\t//\treturn GetSqlDataType(giveType);\r\n\t\t//}\r\n\r\n\t\t//public static SqlDataType GetSqlDataType()\r\n\t\t//{\r\n\t\t//\treturn GetSqlDataType(typeof(T));\r\n\t\t//}\r\n\r\n\t\t/// Enumerates SQL Server data types used for mapping between SQL and CLR types.\r\n\t\tpublic enum SqlDataType\r\n\t\t{\r\n\t\t\tBigInt = 1,\r\n\t\t\tBinary = 2,\r\n\t\t\tBit = 3,\r\n\t\t\tChar = 4,\r\n\t\t\tDate = 36,\r\n\t\t\tDateTime = 6,\r\n\t\t\tDateTime2 = 39,\r\n\t\t\tDateTimeOffset = 38,\r\n\t\t\tDecimal = 7,\r\n\t\t\tFloat = 8,\r\n\t\t\tGeography = 43,\r\n\t\t\tGeometry = 42,\r\n\t\t\tHierarchyId = 41,\r\n\t\t\tImage = 9,\r\n\t\t\tInt = 10,\r\n\t\t\tMoney = 11,\r\n\t\t\tNChar = 12,\r\n\t\t\tNone = 0,\r\n\t\t\tNText = 13,\r\n\t\t\tNumeric = 35,\r\n\t\t\tNVarChar = 14,\r\n\t\t\tNVarCharMax = 15,\r\n\t\t\tReal = 16,\r\n\t\t\tSmallDateTime = 17,\r\n\t\t\tSmallInt = 18,\r\n\t\t\tSmallMoney = 19,\r\n\t\t\tSysName = 34,\r\n\t\t\tText = 20,\r\n\t\t\tTime = 37,\r\n\t\t\tTimestamp = 21,\r\n\t\t\tTinyInt = 22,\r\n\t\t\tUniqueIdentifier = 23,\r\n\t\t\tUserDefinedDataType = 24,\r\n\t\t\tUserDefinedTableType = 40,\r\n\t\t\tUserDefinedType = 25,\r\n\t\t\tVarBinary = 28,\r\n\t\t\tVarBinaryMax = 29,\r\n\t\t\tVarChar = 30,\r\n\t\t\tVarCharMax = 31,\r\n\t\t\tVariant = 32,\r\n\t\t\tXml = 33\r\n\t\t}\r\n\t}\r\n}\r\n"
},
{
"path": "FocusLogger/JocysCom/IO/PathHelper.cs",
"content": "using System;\r\nusing System.Collections.Generic;\r\nusing System.IO;\r\nusing System.Linq;\r\n\r\nnamespace JocysCom.ClassLibrary.IO\r\n{\r\n\t/// \r\n\t/// Summary description for PathConvert.\r\n\t/// \r\n\tpublic static partial class PathHelper\r\n\t{\r\n\t\tconst string nullOrEmpty = \"Input cannot be null or empty\";\r\n\r\n\t\tpublic static void ValidateFileName(string name)\r\n\t\t{\r\n\t\t\tif (name is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(name));\r\n\t\t\tvar invalid = name.Intersect(System.IO.Path.GetInvalidFileNameChars());\r\n\t\t\tif (invalid.Any())\r\n\t\t\t\tthrow new ArgumentException(string.Format(\"Invalid file name chars found: {0}\", string.Join(\", \", invalid)), nameof(name));\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Method used to protect from\r\n\t\t/// SUPPRESS: CWE-78: Improper Neutralization of Special Elements used in an OS Command ('OS Command Injection')\r\n\t\t/// https://cwe.mitre.org/data/definitions/78.html\r\n\t\t/// \r\n\t\t/// \r\n\t\tpublic static void ValidatePath(string path)\r\n\t\t{\r\n\t\t\tvar d = System.IO.Path.GetDirectoryName(path);\r\n\t\t\tvar invalid = d.Intersect(System.IO.Path.GetInvalidPathChars());\r\n\t\t\tif (invalid.Any())\r\n\t\t\t\tthrow new ArgumentException(string.Format(\"Invalid path chars found: {0}\", string.Join(\", \", invalid)), nameof(path));\r\n\t\t\tvar name = System.IO.Path.GetFileName(path);\r\n\t\t\tValidateFileName(name);\r\n\t\t}\r\n\r\n\t\t#region Detect Type of Path\r\n\r\n\t\t/// \r\n\t\t/// Virtual path starts from \"/\" or \"\\\" \r\n\t\t/// \r\n\t\tpublic static bool IsPathVirtual(string path)\r\n\t\t{\r\n\t\t\tif (string.IsNullOrEmpty(path))\r\n\t\t\t\tthrow new ArgumentException(nullOrEmpty, nameof(path));\r\n\t\t\tvar newPath = path.Trim();\r\n\t\t\treturn\r\n\t\t\t\tnewPath.StartsWith(\"/\") ||\r\n\t\t\t\tnewPath.StartsWith(\"\\\\\");\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// A physical path is how the OS locates the resource.\r\n\t\t/// \r\n\t\t/// \r\n\t\t/// \r\n\t\tpublic static bool IsPathPhysical(string path)\r\n\t\t{\r\n\t\t\tif (string.IsNullOrEmpty(path))\r\n\t\t\t\tthrow new ArgumentException(nullOrEmpty, nameof(path));\r\n\t\t\tvar newPath = path.Trim();\r\n\t\t\treturn\r\n\t\t\t\tnewPath.Contains(':') ||\r\n\t\t\t\tnewPath.Contains(\"\\\\\");\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t// Get Physical path from any type of path.\r\n\t\tpublic static string GetPathPhysical(string relativeTo, string path)\r\n\t\t{\r\n\t\t\tif (path is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(path));\r\n\t\t\tstring physicalPath;\r\n\t\t\t// If path is Physical. \r\n\t\t\tif (IsPathPhysical(path))\r\n\t\t\t{\r\n\t\t\t\t// Return current path\r\n\t\t\t\tphysicalPath = path;\r\n\t\t\t}\r\n\t\t\telse\r\n\t\t\t{\r\n\t\t\t\t// Convert to physical.\r\n\t\t\t\tphysicalPath = relativeTo + \"/\" + path;\r\n\t\t\t\t// Convert \"/\" separator to \"\\\".\r\n\t\t\t\tphysicalPath = physicalPath.Replace(\"/\", \"\\\\\");\r\n\t\t\t\t// Remove double \"\\\\\".\r\n\t\t\t\tphysicalPath = physicalPath.Replace(\"\\\\\\\\\", \"\\\\\");\r\n\t\t\t}\r\n\t\t\t// Return results.\r\n\t\t\treturn physicalPath;\r\n\t\t}\r\n\r\n\t\t// Get Rooted path.\r\n\t\tpublic static string GetPathRooted(string relativeTo, string path)\r\n\t\t{\r\n\t\t\tif (path is null) throw new ArgumentNullException(nameof(path));\r\n\t\t\t//if path already rooted then...\r\n\t\t\tif (System.IO.Path.IsPathRooted(path))\r\n\t\t\t\treturn path;\r\n\t\t\t// Combine path.\r\n#if NETFRAMEWORK\r\n\t\t\tvar combined = System.IO.Path.Combine(relativeTo, path);\r\n#else\r\n\t\t\tvar combined = System.IO.Path.GetFullPath(path, relativeTo);\r\n#endif\r\n\t\t\t// Fix dot notations.\r\n\t\t\tcombined = Path.GetFullPath(combined);\r\n\t\t\treturn combined;\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// root parent\r\n\t\t/// ----------- --------\r\n\t\t/// ..\\..\\..\r\n\t\t/// c:\\r1\\r2\\r3\\p1\\p2\\p3\\\\\r\n\t\t/// c:\\r1\\r2\\r3\\a1\\file.ext\r\n\t\t/// ----------- \r\n\t\t/// append\r\n\t\t/// Important: if relative is directory then path must end with '\\' or '/'.\r\n\t\t/// \r\n\t\t/// \r\n\t\t/// \r\n\t\t/// \r\n\t\t/// \r\n\t\tpublic static string GetRelativePath(string relativeTo, string path, bool addCurrentDir = true)\r\n\t\t{\r\n\t\t\tif (string.IsNullOrEmpty(relativeTo))\r\n\t\t\t\tthrow new ArgumentException(nullOrEmpty, nameof(relativeTo));\r\n\t\t\tif (string.IsNullOrEmpty(path))\r\n\t\t\t\tthrow new ArgumentException(nullOrEmpty, nameof(path));\r\n\t\t\tvar containsPrimarySeparator = relativeTo.Contains(Path.DirectorySeparatorChar);\r\n\t\t\trelativeTo = Path.GetFullPath(relativeTo);\r\n\t\t\tpath = Path.GetFullPath(path);\r\n\t\t\tvar relativeToUri = new Uri(relativeTo);\r\n\t\t\tvar pathUri = new Uri(path);\r\n\t\t\tvar relativeUri = relativeToUri.MakeRelativeUri(pathUri).ToString();\r\n\t\t\tvar relativePath = Uri.UnescapeDataString(relativeUri);\r\n\t\t\t// Add current folder prefix if output does not contain separators.\r\n\t\t\tif (addCurrentDir && !relativePath.Contains(Path.DirectorySeparatorChar) && !relativePath.Contains(Path.AltDirectorySeparatorChar))\r\n\t\t\t\trelativePath = \".\" + Path.AltDirectorySeparatorChar + relativePath;\r\n\t\t\t// Make sure that output contains same separator type as input.\r\n\t\t\tif (containsPrimarySeparator)\r\n\t\t\t\trelativePath = relativePath.Replace(Path.AltDirectorySeparatorChar, Path.DirectorySeparatorChar);\r\n\t\t\treturn relativePath;\r\n\t\t}\r\n\r\n\t\t// Get Relative path from any type of path.\r\n\t\tpublic static string GetPathVirtual(string relativeTo, string path)\r\n\t\t{\r\n\t\t\tif (path is null) throw new ArgumentNullException(nameof(path));\r\n\t\t\t// If path is not physical then just return.\r\n\t\t\tif (!IsPathPhysical(path))\r\n\t\t\t\treturn path;\r\n\t\t\t// Convert to virtual path by cropping root part.\r\n\t\t\tvar virtualPath = \"/\" + path.Substring(relativeTo.Length);\r\n\t\t\t// Convert \"\\\" separator to \"/\".\r\n\t\t\tvirtualPath = virtualPath.Replace(\"\\\\\", \"/\");\r\n\t\t\t// Remove double \"//\".\r\n\t\t\tvirtualPath = virtualPath.Replace(\"//\", \"/\");\r\n\t\t\t// Return results.\r\n\t\t\treturn virtualPath;\r\n\t\t}\r\n\r\n\t\t// Get parent folder from path.\r\n\t\tpublic static string GetParentFolderPhysical(string relativeTo, string path)\r\n\t\t{\r\n\t\t\tif (path is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(path));\r\n\t\t\t// Get physical path.\r\n\t\t\tvar physicalPath = GetPathPhysical(relativeTo, path);\r\n\t\t\t// Get folder only.\r\n\t\t\tvar folderPath = System.IO.Path.GetDirectoryName(physicalPath);\r\n\t\t\t// Return results.\r\n\t\t\treturn folderPath;\r\n\t\t}\r\n\r\n\t\t// Get parent folder from path.\r\n\t\tpublic static string GetParentFolderVirtual(string relativeTo, string path)\r\n\t\t{\r\n\t\t\tif (path is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(path));\r\n\t\t\t// Get physical parent folder path.\r\n\t\t\tvar folderPath = GetParentFolderPhysical(relativeTo, path);\r\n\t\t\t// Convert to virtual path.\r\n\t\t\tvar virtualPath = GetPathVirtual(relativeTo, folderPath);\r\n\t\t\t// Return results.\r\n\t\t\treturn virtualPath;\r\n\t\t}\r\n\r\n\t\tpublic static string GetFileName(string relativeTo, string path)\r\n\t\t{\r\n\t\t\tif (path is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(path));\r\n\t\t\t// Make sure that path is physical.\r\n\t\t\tvar physicalPath = GetPathPhysical(relativeTo, path);\r\n\t\t\treturn System.IO.Path.GetFileName(physicalPath);\r\n\t\t}\r\n\r\n\r\n\t\t#region Path Converter\r\n\r\n\t\tstatic object SpecialFoldersLock = new object();\r\n\r\n\t\tstatic Dictionary _SpecialFolders;\r\n\r\n\t\tpublic static Dictionary SpecialFolders\r\n\t\t{\r\n\t\t\tget\r\n\t\t\t{\r\n\t\t\t\tlock (SpecialFoldersLock)\r\n\t\t\t\t{\r\n\t\t\t\t\tif (_SpecialFolders is null)\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tvar keys = (System.Environment.SpecialFolder[])Enum.GetValues(typeof(System.Environment.SpecialFolder));\r\n\t\t\t\t\t\tvar items = new List>();\r\n\t\t\t\t\t\tforeach (var key in keys)\r\n\t\t\t\t\t\t{\r\n\t\t\t\t\t\t\tvar item = new KeyValuePair($\"{key}\", System.Environment.GetFolderPath(key));\r\n\t\t\t\t\t\t\t// Make sure all values are not empty and unique.\r\n\t\t\t\t\t\t\tif (!string.IsNullOrEmpty(item.Key) && !string.IsNullOrEmpty(item.Value))\r\n\t\t\t\t\t\t\t\titems.Add(item);\r\n\t\t\t\t\t\t}\r\n\t\t\t\t\t\t_SpecialFolders = new Dictionary();\r\n\t\t\t\t\t\t// Order folders descending.\r\n\t\t\t\t\t\tvar list = items.OrderByDescending(x => x.Value).ToArray();\r\n\t\t\t\t\t\tforeach (var listItem in list)\r\n\t\t\t\t\t\t{\r\n\t\t\t\t\t\t\t// If list doesn't contains key then...\r\n\t\t\t\t\t\t\tif (!_SpecialFolders.ContainsKey(listItem.Key))\r\n\t\t\t\t\t\t\t\t_SpecialFolders.Add(listItem.Key, listItem.Value);\r\n\t\t\t\t\t\t}\r\n\t\t\t\t\t}\r\n\t\t\t\t}\r\n\t\t\t\treturn _SpecialFolders;\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t}\r\n}\r\n"
},
{
"path": "FocusLogger/JocysCom/MakeLinks_Ref.ps1",
"content": "<#\r\n.SYNOPSIS\r\n Thin wrapper that calls the original MakeLinks.ps1 from the Core library.\r\n Place this file in external JocysCom folders instead of duplicating the full script.\r\n#>\r\n$paths = @(\r\n \"d:\\Projects\\Jocys.com\\ClassLibrary\\Core\\_Resources\\MakeLinks.ps1\",\r\n \"c:\\Projects\\Jocys.com\\ClassLibrary\\Core\\_Resources\\MakeLinks.ps1\"\r\n);\r\nforeach ($p in $paths) {\r\n if (Test-Path $p) { & $p; return; }\r\n}\r\nWrite-Host \"ERROR: MakeLinks.ps1 not found in any known location.\" -ForegroundColor Red;\r\n"
},
{
"path": "FocusLogger/JocysCom/Runtime/RuntimeHelper.cs",
"content": "using System;\r\nusing System.Collections.Concurrent;\r\nusing System.Collections.Generic;\r\nusing System.Data;\r\nusing System.IO;\r\nusing System.Linq;\r\nusing System.Reflection;\r\nusing System.Runtime.InteropServices;\r\nusing System.Runtime.Serialization.Json;\r\nusing System.Text;\r\n\r\nnamespace JocysCom.ClassLibrary.Runtime\r\n{\r\n\tpublic static partial class RuntimeHelper\r\n\t{\r\n\r\n\t\t/*\r\n\t\tpublic static bool IsKnownType(Type type)\r\n\t\t{\r\n\t\t\tif (type is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(type));\r\n\t\t\treturn\r\n\t\t\t\ttype == typeof(string)\r\n\t\t\t\t// Note: Every Primitive type (such as int, double, bool, char, etc.) is a ValueType. \r\n\t\t\t\t|| type.IsValueType\r\n\t\t\t\t|| type.IsSerializable;\r\n\t\t}\r\n\t\t*/\r\n\r\n\t\tprivate static readonly HashSet numericTypes = new HashSet\r\n\t\t{\r\n\t\t\ttypeof(int), typeof(double), typeof(decimal),\r\n\t\t\ttypeof(long), typeof(short), typeof(sbyte),\r\n\t\t\ttypeof(byte), typeof(ulong), typeof(ushort),\r\n\t\t\ttypeof(uint), typeof(float),\r\n\t\t};\r\n\r\n\t\tpublic static bool IsNumeric(Type type)\r\n\t\t{\r\n\t\t\treturn numericTypes.Contains(type);\r\n\t\t}\r\n\r\n\t\t/// Built-in types\r\n\t\tpublic static readonly Dictionary TypeAliases = new Dictionary\r\n\t\t{\r\n\t\t\t{ typeof(bool), \"bool\" },\r\n\t\t\t{ typeof(byte), \"byte\" },\r\n\t\t\t{ typeof(char), \"char\" },\r\n\t\t\t{ typeof(decimal), \"decimal\" },\r\n\t\t\t{ typeof(double), \"double\" },\r\n\t\t\t{ typeof(float), \"float\" },\r\n\t\t\t{ typeof(int), \"int\" },\r\n\t\t\t{ typeof(long), \"long\" },\r\n\t\t\t{ typeof(object), \"object\" },\r\n\t\t\t{ typeof(sbyte), \"sbyte\" },\r\n\t\t\t{ typeof(short), \"short\" },\r\n\t\t\t{ typeof(string), \"string\" },\r\n\t\t\t{ typeof(uint), \"uint\" },\r\n\t\t\t{ typeof(ulong), \"ulong\" },\r\n\t\t\t{ typeof(ushort), \"ushort\" },\r\n\t\t\t{ typeof(void), \"void\" }\r\n\t\t};\r\n\r\n\t\tpublic static string GetBuiltInTypeNameOrAlias(Type type)\r\n\t\t{\r\n\t\t\tif (type is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(type));\r\n\t\t\tvar elementType = type.IsArray\r\n\t\t\t\t? type.GetElementType()\r\n\t\t\t\t: type;\r\n\t\t\t// Lookup alias for type\r\n\t\t\tstring alias;\r\n\t\t\tif (TypeAliases.TryGetValue(elementType, out alias))\r\n\t\t\t\treturn alias + (type.IsArray ? \"[]\" : \"\");\r\n\t\t\t// Note: All Nullable are value types.\r\n\t\t\tif (type.IsValueType)\r\n\t\t\t{\r\n\t\t\t\tvar underType = Nullable.GetUnderlyingType(type);\r\n\t\t\t\tif (underType != null)\r\n\t\t\t\t\treturn GetBuiltInTypeNameOrAlias(underType) + \"?\";\r\n\t\t\t}\r\n\t\t\tif (type.IsGenericType && type.GetGenericTypeDefinition() == typeof(List<>))\r\n\t\t\t{\r\n\t\t\t\tvar itemType = type.GetGenericArguments()[0];\r\n\t\t\t\treturn string.Format(\"List<{0}>\", GetBuiltInTypeNameOrAlias(itemType));\r\n\t\t\t}\r\n\t\t\t// Default to CLR type name\r\n\t\t\treturn type.Name;\r\n\t\t}\r\n\r\n\t\tprivate static Type GetFirstArgumentOfGenericType(Type type)\r\n\t\t{\r\n\t\t\treturn type.GetGenericArguments()[0];\r\n\t\t}\r\n\r\n\t\tpublic static bool IsNullableType(Type type)\r\n\t\t{\r\n\t\t\tif (type is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(type));\r\n\t\t\treturn type.IsGenericType\r\n\t\t\t\t? type.GetGenericTypeDefinition() == typeof(Nullable<>)\r\n\t\t\t\t: false;\r\n\t\t}\r\n\r\n\t\tpublic static BindingFlags DefaultBindingFlags = BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic;\r\n\r\n\t\t#region Copy Fields\r\n\r\n\t\t/// \r\n\t\t/// Get source intersecting fields.\r\n\t\t/// \r\n\t\tprivate static FieldInfo[] GetItersectingFields(object source, object target)\r\n\t\t{\r\n\t\t\tvar targetNames = target.GetType().GetFields(DefaultBindingFlags).Select(x => x.Name).ToArray();\r\n\t\t\tvar sourceFields = source\r\n\t\t\t\t.GetType()\r\n\t\t\t\t.GetFields(DefaultBindingFlags)\r\n\t\t\t\t.Where(x => targetNames.Contains(x.Name))\r\n\t\t\t\t.ToArray();\r\n\t\t\treturn sourceFields;\r\n\t\t}\r\n\r\n\t\t/// Cache data for speed.\r\n\t\t/// Cache allows for this class to work 20 times faster.\r\n\t\tprivate static ConcurrentDictionary Fields { get; } = new ConcurrentDictionary();\r\n\r\n\t\tprivate static FieldInfo[] GetFields(Type t, bool cache = true)\r\n\t\t{\r\n\t\t\tvar items = cache\r\n\t\t\t\t? Fields.GetOrAdd(t, x => t.GetFields(DefaultBindingFlags))\r\n\t\t\t\t: t.GetFields(DefaultBindingFlags);\r\n\t\t\treturn items;\r\n\t\t}\r\n\r\n\r\n\t\t/// Cache data for speed.\r\n\t\t/// Cache allows for this class to work 20 times faster.\r\n\t\tprivate static ConcurrentDictionary Properties { get; } = new ConcurrentDictionary();\r\n\r\n\t\tprivate static PropertyInfo[] GetProperties(Type t, bool cache = true)\r\n\t\t{\r\n\t\t\tvar items = cache\r\n\t\t\t\t? Properties.GetOrAdd(t, x => t.GetProperties(DefaultBindingFlags))\r\n\t\t\t\t: t.GetProperties(DefaultBindingFlags);\r\n\t\t\treturn items;\r\n\t\t}\r\n\r\n\t\tpublic static void CopyFields(object source, object target, bool onlyNonByRef = false)\r\n\t\t{\r\n\t\t\tif (source is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(source));\r\n\t\t\tif (target is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(target));\r\n\t\t\t// Get Field Info.\r\n\t\t\tvar sourceFields = GetFields(source.GetType());\r\n\t\t\tvar targetFields = GetFields(target.GetType());\r\n\t\t\tforeach (var sm in sourceFields)\r\n\t\t\t{\r\n\t\t\t\tvar tm = targetFields.FirstOrDefault(x => x.Name == sm.Name);\r\n\t\t\t\tbool useJson;\r\n\t\t\t\tif (!CanCopy(sm.FieldType, tm.FieldType, onlyNonByRef, out useJson))\r\n\t\t\t\t\tcontinue;\r\n\t\t\t\t// Get source value.\r\n\t\t\t\tvar sValue = sm.GetValue(source);\r\n\t\t\t\tif (useJson)\r\n\t\t\t\t\tsValue = Serialize(sValue);\r\n\t\t\t\tvar update = true;\r\n\t\t\t\t// Get target value.\r\n\t\t\t\tvar dValue = tm.GetValue(target);\r\n\t\t\t\tif (useJson)\r\n\t\t\t\t\tdValue = Serialize(dValue);\r\n\t\t\t\t// Update only if values are different.\r\n\t\t\t\tupdate = !Equals(sValue, dValue);\r\n\t\t\t\tif (update)\r\n\t\t\t\t{\r\n\t\t\t\t\tif (useJson)\r\n\t\t\t\t\t\tsValue = Deserialize(sValue as string, tm.FieldType);\r\n\t\t\t\t\ttm.SetValue(target, sValue);\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region Serializer\r\n\r\n\t\t/// Cache data for speed.\r\n\t\t/// Cache allows for this class to work 20 times faster.\r\n\t\tprivate static ConcurrentDictionary JsonSerializers = new ConcurrentDictionary();\r\n\r\n\t\tstatic DataContractJsonSerializer GetJsonSerializer(Type type, DataContractJsonSerializerSettings settings = null)\r\n\t\t{\r\n\t\t\tif (type == null)\r\n\t\t\t\treturn null;\r\n\t\t\treturn JsonSerializers.GetOrAdd(type, x => new DataContractJsonSerializer(type, settings));\r\n\t\t}\r\n\r\n\t\tprivate static string Serialize(object o)\r\n\t\t{\r\n\t\t\tif (o is null)\r\n\t\t\t\treturn null;\r\n\t\t\tvar serializer = GetJsonSerializer(o.GetType());\r\n\t\t\tvar ms = new MemoryStream();\r\n\t\t\tlock (serializer) { serializer.WriteObject(ms, o); }\r\n\t\t\tvar json = Encoding.UTF8.GetString(ms.ToArray());\r\n\t\t\tms.Close();\r\n\t\t\treturn json;\r\n\t\t}\r\n\r\n\t\tprivate static object Deserialize(string json, Type type)\r\n\t\t{\r\n\t\t\tif (json is null)\r\n\t\t\t\treturn null;\r\n\t\t\tvar serializer = GetJsonSerializer(type);\r\n\t\t\tvar bytes = Encoding.UTF8.GetBytes(json);\r\n\t\t\tvar ms = new MemoryStream(bytes);\r\n\t\t\tobject o;\r\n\t\t\tlock (serializer) { o = serializer.ReadObject(ms); }\r\n\t\t\tms.Close();\r\n\t\t\treturn o;\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region Copy Properties\r\n\r\n\t\t/// \r\n\t\t/// Get information about different and intersecting properties.\r\n\t\t/// \r\n\t\tpublic static string GetPropertyDiffInfo()\r\n\t\t{\r\n\t\t\tvar sType = typeof(TSource);\r\n\t\t\tvar tType = typeof(TTarget);\r\n\t\t\tvar sProperties = sType.GetProperties(DefaultBindingFlags);\r\n\t\t\tvar tProperties = tType.GetProperties(DefaultBindingFlags);\r\n\t\t\tvar sNames = sProperties.Select(x => x.Name).ToArray();\r\n\t\t\tvar tNames = tProperties.Select(x => x.Name).ToArray();\r\n\t\t\tvar targetOnly = tProperties.Where(x => !sNames.Contains(x.Name)).OrderBy(x => x.Name).ToArray();\r\n\t\t\tvar sourceOnly = sProperties.Where(x => !tNames.Contains(x.Name)).OrderBy(x => x.Name).ToArray();\r\n\t\t\tvar sourceSame = sProperties.Where(x => tNames.Contains(x.Name)).OrderBy(x => x.Name).ToArray();\r\n\t\t\tvar sb = new StringBuilder();\r\n\t\t\tvar targetOnlyLines = targetOnly.Select(x => string.Format(\"{0} {1}\", GetBuiltInTypeNameOrAlias(x.PropertyType), x.Name));\r\n\t\t\tif (targetOnly.Length > 0)\r\n\t\t\t{\r\n\t\t\t\tsb.AppendFormat(\"// ---- Target Only [{0}] - {1}\\r\\n\\t\", targetOnly.Length, tType.Name);\r\n\t\t\t\tsb.Append(string.Join(\"\\r\\n\\t\", targetOnlyLines));\r\n\t\t\t\tsb.AppendLine();\r\n\t\t\t}\r\n\t\t\tvar sourceOnlyLines = sourceOnly.Select(x => string.Format(\"{0} {1}\", GetBuiltInTypeNameOrAlias(x.PropertyType), x.Name));\r\n\t\t\tif (sourceOnly.Length > 0)\r\n\t\t\t{\r\n\t\t\t\tsb.AppendFormat(\"// ---- Source Only [{0}] - {1}\\r\\n\\t\", sourceOnly.Length, sType.Name);\r\n\t\t\t\tsb.Append(string.Join(\"\\r\\n\\t\", sourceOnlyLines));\r\n\t\t\t\tsb.AppendLine();\r\n\t\t\t}\r\n\t\t\tif (sourceSame.Length > 0)\r\n\t\t\t{\r\n\t\t\t\tsb.AppendFormat(\"// ---- Intersects [{0}]:\\r\\n\\t\", sourceSame.Length);\r\n\t\t\t\tvar intesectsLines = sourceSame.Select(s =>\r\n\t\t\t\t\tstring.Format(\"{0} {1}{2}\",\r\n\t\t\t\t\t\tGetBuiltInTypeNameOrAlias(s.PropertyType),\r\n\t\t\t\t\t\ts.Name,\r\n\t\t\t\t\t\t(GetBuiltInTypeNameOrAlias(tProperties.First(t => t.Name == s.Name).PropertyType) == GetBuiltInTypeNameOrAlias(s.PropertyType))\r\n\t\t\t\t\t\t? \"\"\r\n\t\t\t\t\t\t: \" // \" + GetBuiltInTypeNameOrAlias(tProperties.First(t => t.Name == s.Name).PropertyType)\r\n\t\t\t\t\t)\r\n\t\t\t\t);\r\n\t\t\t\tsb.Append(string.Join(\"\\r\\n\\t\", intesectsLines));\r\n\t\t\t\tsb.AppendLine();\r\n\t\t\t}\r\n\t\t\treturn sb.ToString();\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Retur true if can copy.\r\n\t\t/// \r\n\t\tpublic static bool CanCopy(Type source, Type target, bool onlyNonByRef, out bool useJson)\r\n\t\t{\r\n\t\t\tuseJson = false;\r\n\t\t\t// If target property don't exists.\r\n\t\t\tif (target == null)\r\n\t\t\t\treturn false;\r\n\t\t\t// If target property can't be assigned.\r\n\t\t\tif (!source.IsAssignableFrom(source))\r\n\t\t\t\treturn false;\r\n\t\t\t// If only non reference properties can be compied.\r\n\t\t\tif (onlyNonByRef && source.IsByRef)\r\n\t\t\t\treturn false;\r\n\t\t\t// Use JSON to clone referenced values.\r\n\t\t\tuseJson = source.IsByRef;\r\n\t\t\treturn true;\r\n\t\t}\r\n\r\n\t\tpublic static void CopyProperties(object source, object target, bool onlyNonByRef = false)\r\n\t\t{\r\n\t\t\tif (source is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(source));\r\n\t\t\tif (target is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(target));\r\n\t\t\t// Get type of the destination object.\r\n\t\t\tvar sourceProperties = GetProperties(source.GetType());\r\n\t\t\tvar targetProperties = GetProperties(target.GetType());\r\n\t\t\tforeach (var sm in sourceProperties)\r\n\t\t\t{\r\n\t\t\t\t// Get destination property and skip if not found.\r\n\t\t\t\tvar tm = targetProperties.FirstOrDefault(x => Equals(x.Name, sm.Name));\r\n\t\t\t\tif (!sm.CanRead || !tm.CanWrite)\r\n\t\t\t\t\tcontinue;\r\n\t\t\t\tbool useJson;\r\n\t\t\t\tif (!CanCopy(sm.PropertyType, tm.PropertyType, onlyNonByRef, out useJson))\r\n\t\t\t\t\tcontinue;\r\n\t\t\t\t// Get source value.\r\n\t\t\t\tvar sValue = sm.GetValue(source, null);\r\n\t\t\t\tif (useJson)\r\n\t\t\t\t\tsValue = Serialize(sValue);\r\n\t\t\t\tvar update = true;\r\n\t\t\t\t// If can read target value.\r\n\t\t\t\tif (tm.CanRead)\r\n\t\t\t\t{\r\n\t\t\t\t\t// Get target value.\r\n\t\t\t\t\tvar dValue = tm.GetValue(target, null);\r\n\t\t\t\t\tif (useJson)\r\n\t\t\t\t\t\tdValue = Serialize(dValue);\r\n\t\t\t\t\t// Update only if values are different.\r\n\t\t\t\t\tupdate = !Equals(sValue, dValue);\r\n\t\t\t\t}\r\n\t\t\t\tif (update)\r\n\t\t\t\t{\r\n\t\t\t\t\tif (useJson)\r\n\t\t\t\t\t\tsValue = Deserialize(sValue as string, tm.PropertyType);\r\n\t\t\t\t\ttm.SetValue(target, sValue, null);\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Returns true if all properties with the same name are equal.\r\n\t\t/// \r\n\t\tpublic static bool EqualProperties(object source, object target, bool onlyNonByRef = false)\r\n\t\t{\r\n\t\t\tif (source is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(source));\r\n\t\t\tif (target is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(target));\r\n\t\t\t// Get type of the destination object.\r\n\t\t\tvar sourceProperties = GetProperties(source.GetType());\r\n\t\t\tvar targetProperties = GetProperties(target.GetType());\r\n\t\t\tforeach (var sm in sourceProperties)\r\n\t\t\t{\r\n\t\t\t\t// Get destination property and skip if not found.\r\n\t\t\t\tvar tm = targetProperties.FirstOrDefault(x => Equals(x.Name, sm.Name));\r\n\t\t\t\tif (!sm.CanRead)\r\n\t\t\t\t\tcontinue;\r\n\t\t\t\tbool useJson;\r\n\t\t\t\tif (!CanCopy(sm.PropertyType, tm.PropertyType, onlyNonByRef, out useJson))\r\n\t\t\t\t\tcontinue;\r\n\t\t\t\t// Get source value.\r\n\t\t\t\tvar sValue = sm.GetValue(source, null);\r\n\t\t\t\tif (useJson)\r\n\t\t\t\t\tsValue = Serialize(sValue);\r\n\t\t\t\tvar update = true;\r\n\t\t\t\t// If can read target value.\r\n\t\t\t\tif (tm.CanRead)\r\n\t\t\t\t{\r\n\t\t\t\t\t// Get target value.\r\n\t\t\t\t\tvar dValue = tm.GetValue(target, null);\r\n\t\t\t\t\tif (useJson)\r\n\t\t\t\t\t\tdValue = Serialize(dValue);\r\n\t\t\t\t\t// Update only if values are different.\r\n\t\t\t\t\tupdate = !Equals(sValue, dValue);\r\n\t\t\t\t}\r\n\t\t\t\t// If update needed then not equal.\r\n\t\t\t\tif (update)\r\n\t\t\t\t\treturn false;\r\n\t\t\t}\r\n\t\t\treturn true;\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region Convert: Object <-> Bytes\r\n\r\n\t\t// Note: Similar as \"Structure <-> Bytes\", but with ability to convert variable strings.\r\n\r\n\t\tpublic static byte[] ObjectToBytes(T o)\r\n\t\t{\r\n\t\t\tusing (var ms = new MemoryStream())\r\n\t\t\t{\r\n\t\t\t\tvar flags = BindingFlags.Instance | BindingFlags.Public;\r\n\t\t\t\tvar props = typeof(T).GetProperties(flags);\r\n\t\t\t\tusing (var writer = new BinaryWriter(ms))\r\n\t\t\t\t{\r\n\t\t\t\t\tforeach (var p in props)\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tvar value = p.GetValue(o);\r\n\t\t\t\t\t\tswitch (value)\r\n\t\t\t\t\t\t{\r\n\t\t\t\t\t\t\tcase bool v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase byte v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase byte[] v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase char[] v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase char v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase decimal v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase double v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase float v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase int v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase long v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase sbyte v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase short v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase string v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase uint v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase ulong v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tcase ushort v:\r\n\t\t\t\t\t\t\t\twriter.Write(v); break;\r\n\t\t\t\t\t\t\tdefault:\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t}\r\n\t\t\t\t\t}\r\n\t\t\t\t\tms.Flush();\r\n\t\t\t\t\tms.Seek(0, SeekOrigin.Begin);\r\n\t\t\t\t\treturn ms.ToArray();\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\tpublic static T BytesToObject(byte[] bytes)\r\n\t\t{\r\n\t\t\tusing (var ms = new MemoryStream(bytes))\r\n\t\t\t{\r\n\t\t\t\tvar o = Activator.CreateInstance();\r\n\t\t\t\tvar flags = BindingFlags.Instance | BindingFlags.Public;\r\n\t\t\t\tvar props = typeof(T).GetProperties(flags);\r\n\t\t\t\tusing (var reader = new BinaryReader(ms))\r\n\t\t\t\t{\r\n\t\t\t\t\tforeach (var p in props)\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tvar typeCode = Type.GetTypeCode(p.PropertyType);\r\n\t\t\t\t\t\tobject v;\r\n\t\t\t\t\t\tswitch (typeCode)\r\n\t\t\t\t\t\t{\r\n\t\t\t\t\t\t\tcase TypeCode.Boolean:\r\n\t\t\t\t\t\t\t\tv = reader.ReadBoolean();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Char:\r\n\t\t\t\t\t\t\t\tv = reader.ReadChar();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.DBNull:\r\n\t\t\t\t\t\t\t\tv = DBNull.Value;\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.DateTime:\r\n\t\t\t\t\t\t\t\tv = new DateTime(reader.ReadInt64());\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Decimal:\r\n\t\t\t\t\t\t\t\tv = reader.ReadDecimal();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Double:\r\n\t\t\t\t\t\t\t\tv = reader.ReadDouble();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Empty:\r\n\t\t\t\t\t\t\t\tv = null;\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.SByte:\r\n\t\t\t\t\t\t\t\tv = reader.ReadSByte();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Int16:\r\n\t\t\t\t\t\t\t\tv = reader.ReadInt16();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Int32:\r\n\t\t\t\t\t\t\t\tv = reader.ReadInt32();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Int64:\r\n\t\t\t\t\t\t\t\tv = reader.ReadInt64();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Single:\r\n\t\t\t\t\t\t\t\tv = reader.ReadSingle();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.String:\r\n\t\t\t\t\t\t\t\tv = reader.ReadString();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.Byte:\r\n\t\t\t\t\t\t\t\tv = reader.ReadByte();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.UInt16:\r\n\t\t\t\t\t\t\t\tv = reader.ReadUInt16();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.UInt32:\r\n\t\t\t\t\t\t\t\tv = reader.ReadUInt32();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tcase TypeCode.UInt64:\r\n\t\t\t\t\t\t\t\tv = reader.ReadUInt64();\r\n\t\t\t\t\t\t\t\tbreak;\r\n\t\t\t\t\t\t\tdefault:\r\n\t\t\t\t\t\t\t\tthrow new Exception(\"Non Serializable Object: \" + p.PropertyType);\r\n\t\t\t\t\t\t}\r\n\t\t\t\t\t\tp.SetValue(o, v);\r\n\t\t\t\t\t}\r\n\t\t\t\t}\r\n\t\t\t\treturn o;\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region Convert: Structure <-> Bytes\r\n\r\n\t\t/// \r\n\t\t/// Convert structure to byte array (unmanaged block of memory).\r\n\t\t/// \r\n\t\tpublic static byte[] StructureToBytes(T value) where T : struct\r\n\t\t{\r\n\t\t\tvar size = Marshal.SizeOf(value);\r\n\t\t\tvar bytes = new byte[size];\r\n\t\t\tvar handle = default(GCHandle);\r\n\t\t\ttry\r\n\t\t\t{\r\n\t\t\t\thandle = GCHandle.Alloc(bytes, GCHandleType.Pinned);\r\n\t\t\t\tMarshal.StructureToPtr(value, handle.AddrOfPinnedObject(), false);\r\n\t\t\t}\r\n\t\t\tfinally\r\n\t\t\t{\r\n\t\t\t\tif (handle.IsAllocated)\r\n\t\t\t\t\thandle.Free();\r\n\t\t\t}\r\n\t\t\treturn bytes;\r\n\t\t}\r\n\r\n\t\tpublic static T BytesToStructure(byte[] bytes) where T : struct\r\n\t\t{\r\n\t\t\treturn (T)BytesToStructure(bytes, typeof(T));\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Convert byte array (unmanaged block of memory) to structure.\r\n\t\t/// \r\n\t\tpublic static object BytesToStructure(byte[] bytes, Type type)\r\n\t\t{\r\n\t\t\tif (type is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(type));\r\n\t\t\tvar value = type.IsValueType ? Activator.CreateInstance(type) : null;\r\n\t\t\tvar handle = default(GCHandle);\r\n\t\t\ttry\r\n\t\t\t{\r\n\t\t\t\thandle = GCHandle.Alloc(bytes, GCHandleType.Pinned);\r\n\t\t\t\tvalue = Marshal.PtrToStructure(handle.AddrOfPinnedObject(), type);\r\n\t\t\t}\r\n\t\t\tfinally\r\n\t\t\t{\r\n\t\t\t\tif (handle.IsAllocated)\r\n\t\t\t\t\thandle.Free();\r\n\t\t\t}\r\n\t\t\treturn value;\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region Try Parse\r\n\r\n\t\t/// \r\n\t\t/// Tries to convert the specified string representation of a logical value to\r\n\t\t/// its type T equivalent. A return value indicates whether the conversion\r\n\t\t/// succeeded or failed.\r\n\t\t/// \r\n\t\t/// A string containing the value to try and convert.\r\n\t\t/// target type\r\n\t\t/// If the conversion was successful, the converted value of type T.\r\n\t\t/// If value was converted successfully, true; otherwise false.\r\n\t\tpublic static bool TryParse(object value, Type t, out object result)\r\n\t\t{\r\n\t\t\tif (IsNullable(t))\r\n\t\t\t\tt = Nullable.GetUnderlyingType(t) ?? t;\r\n\t\t\t//var converter = System.ComponentModel.TypeDescriptor.GetConverter(typeof(T));\r\n\t\t\t//if (converter.IsValid(value))\r\n\t\t\t//{\r\n\t\t\t//\tresult = (T)converter.ConvertFromString(value);\r\n\t\t\t//\treturn true;\r\n\t\t\t//}\r\n\t\t\tif (t == typeof(string))\r\n\t\t\t{\r\n\t\t\t\tresult = value;\r\n\t\t\t\treturn true;\r\n\t\t\t}\r\n\t\t\tif (t.IsEnum)\r\n\t\t\t{\r\n\t\t\t\tvar retValue = value is null ? false : Enum.IsDefined(t, value?.ToString());\r\n\t\t\t\tresult = retValue ? Enum.Parse(t, value?.ToString()) : default;\r\n\t\t\t\treturn retValue;\r\n\t\t\t}\r\n\t\t\tvar tryParseMethod = t.GetMethod(\"TryParse\",\r\n\t\t\t\tBindingFlags.Static | BindingFlags.Public, null,\r\n\t\t\t\tnew[] { typeof(string), t.MakeByRefType() }, null);\r\n\t\t\tvar parameters = new object[] { value, null };\r\n\t\t\tvar retVal = (bool)tryParseMethod.Invoke(null, parameters);\r\n\t\t\tresult = parameters[1];\r\n\t\t\treturn retVal;\r\n\t\t}\r\n\r\n\r\n\t\t/// \r\n\t\t/// Tries to convert the specified string representation of a logical value to\r\n\t\t/// its type T equivalent. A return value indicates whether the conversion\r\n\t\t/// succeeded or failed.\r\n\t\t/// \r\n\t\t/// The type to try and convert to.\r\n\t\t/// A string containing the value to try and convert.\r\n\t\t/// If the conversion was successful, the converted value of type T.\r\n\t\t/// If value was converted successfully, true; otherwise false.\r\n\t\tpublic static bool TryParse(string value, out T result)\r\n\t\t{\r\n\t\t\tvar t = typeof(T);\r\n\t\t\tobject o;\r\n\t\t\tvar success = TryParse(value, t, out o);\r\n\t\t\tresult = (T)o;\r\n\t\t\treturn success;\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Tries to convert the specified string representation of a logical value to\r\n\t\t/// its type T equivalent. Returns default value if conversion failed.\r\n\t\t/// \r\n\t\tpublic static T TryParse(string value, T defaultValue = default(T))\r\n\t\t{\r\n\t\t\tvar result = default(T);\r\n\t\t\treturn TryParse(value, out result)\r\n\t\t\t\t? result\r\n\t\t\t\t: defaultValue;\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Tries to convert the specified string representation of a logical value to\r\n\t\t/// its type T equivalent. Returns default value if conversion failed.\r\n\t\t/// \r\n\t\tpublic static bool CanParse(string value)\r\n\t\t{\r\n\t\t\tT result;\r\n\t\t\treturn TryParse(value, out result);\r\n\t\t}\r\n\r\n\t\tpublic static bool IsNullable(Type t)\r\n\t\t{\r\n\t\t\t// Throw exception if type not supplied.\r\n\t\t\tif (t is null)\r\n\t\t\t\tthrow new ArgumentNullException(nameof(t));\r\n\t\t\t// Special Handling - known cases where Exceptions would be thrown\r\n\t\t\telse if (t == typeof(void))\r\n\t\t\t\tthrow new Exception(\"There is no Nullable version of void\");\r\n\t\t\t// If this is not a value type, it is a reference type, so it is automatically nullable.\r\n\t\t\t// (NOTE: All forms of Nullable are value types)\r\n\t\t\tif (!t.IsValueType)\r\n\t\t\t\treturn true;\r\n\t\t\t// Return true if underlying Type exists (this is faster than line above).\r\n\t\t\treturn Nullable.GetUnderlyingType(t) != null;\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t/// \r\n\t\t/// Convert year values from 0 to 99 to the years xx00 to yy99 with appropriate century. \r\n\t\t/// \r\n\t\t/// A two-digit or four-digit integer that represents the year to convert.\r\n\t\t/// The last year of a 100-year range that can be represented by a 2-digit year.\r\n\t\t/// An integer that contains the four-digit representation of year.\r\n\t\t/// \r\n\t\t/// Use C# solution from System.Globalization.Calendar.ToFourDigitYear(System.Int32 year).\r\n\t\t/// For example, if TwoDigitYearMax is set to 2029, the 100-year range is from 1930 to 2029:\r\n\t\t/// a 2-digit value of 30 is interpreted as 1930\r\n\t\t/// a 2-digit value of 29 is interpreted as 2029\r\n\t\t/// \r\n\t\tpublic static int ToFourDigitYear(int year, int? twoDigitYearMax = null)\r\n\t\t{\r\n\t\t\t// If year is outside of the range then return.\r\n\t\t\tif (year < 0 && year > 99)\r\n\t\t\t\treturn year;\r\n\t\t\t// Convert year from 2 to 4 digits with the correct century (-50/+50 rule).\r\n\t\t\t// JavaScript: By default, new Date(..) convert values from 0 to 99 to the years 1900 to 1999.\r\n\t\t\t//var twoDigitYearMax = new Date().getFullYear() + 50;\r\n\t\t\tvar fullYearMax = twoDigitYearMax ?? DateTime.Now.Year + 50;\r\n\t\t\tvar yearMax = fullYearMax % 100;\r\n\t\t\tvar century = (fullYearMax - yearMax) / 100;\r\n\t\t\tvar fullYear = (century - (year > yearMax ? 1 : 0)) * 100 + year;\r\n\t\t\treturn fullYear;\r\n\t\t}\r\n\r\n\t}\r\n}\r\n"
},
{
"path": "FocusLogger/JocysCom/Runtime/Serializer.cs",
"content": "using System;\r\nusing System.Collections.Concurrent;\r\nusing System.Collections.Generic;\r\nusing System.IO;\r\nusing System.Linq;\r\nusing System.Runtime.Serialization;\r\nusing System.Runtime.Serialization.Json;\r\nusing System.Text;\r\nusing System.Xml;\r\nusing System.Xml.Schema;\r\nusing System.Xml.Serialization;\r\n\r\nnamespace JocysCom.ClassLibrary.Runtime\r\n{\r\n\tpublic static class Serializer\r\n\t{\r\n\r\n\t\t#region Helper Functions\r\n\r\n\t\t/// \r\n\t\t/// Read file content in multiple attempts.\r\n\t\t/// \r\n\t\t/// The file to open for reading.\r\n\t\t/// Number of attempts to read from the file. Default 2 times.\r\n\t\t/// Wait time between attempts. Default 500ms.\r\n\t\t/// A byte array containing the contents of the file.\r\n\t\tpublic static byte[] ReadFile(string path, int attempts = 2, int waitTime = 500)\r\n\t\t{\r\n\t\t\twhile (true)\r\n\t\t\t{\r\n\t\t\t\tattempts -= 1;\r\n\t\t\t\ttry\r\n\t\t\t\t{\r\n\t\t\t\t\t// SUPPRESS: CWE-73: External Control of File Name or Path\r\n\t\t\t\t\t// Note: False Positive. File path is not externally controlled by the user.\r\n\t\t\t\t\treturn System.IO.File.ReadAllBytes(path);\r\n\t\t\t\t}\r\n\t\t\t\tcatch (Exception)\r\n\t\t\t\t{\r\n\t\t\t\t\tif (attempts > 0)\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tnew System.Threading.ManualResetEvent(false).WaitOne(waitTime);\r\n\t\t\t\t\t\tcontinue;\r\n\t\t\t\t\t}\r\n\t\t\t\t\tthrow;\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Write file content in multiple attempts.\r\n\t\t/// \r\n\t\t/// The file to open for writing.\r\n\t\t/// The bytes to write to the file.\r\n\t\t/// Number of attempts to write into the file. Default 2 times.\r\n\t\t/// Wait time between attempts. Default 500ms.\r\n\t\tpublic static void WriteFile(string path, byte[] bytes, int attempts = 2, int waitTime = 500)\r\n\t\t{\r\n\t\t\twhile (true)\r\n\t\t\t{\r\n\t\t\t\tattempts -= 1;\r\n\t\t\t\ttry\r\n\t\t\t\t{\r\n\t\t\t\t\t// WriteAllBytes will lock file for writing and reading.\r\n\t\t\t\t\t// SUPPRESS: CWE-73: External Control of File Name or Path\r\n\t\t\t\t\t// Note: False Positive. File path is not externally controlled by the user.\r\n\t\t\t\t\tSystem.IO.File.WriteAllBytes(path, bytes);\r\n\t\t\t\t\treturn;\r\n\t\t\t\t}\r\n\t\t\t\tcatch (Exception)\r\n\t\t\t\t{\r\n\t\t\t\t\tif (attempts > 0)\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tnew System.Threading.ManualResetEvent(false).WaitOne(waitTime);\r\n\t\t\t\t\t\tcontinue;\r\n\t\t\t\t\t}\r\n\t\t\t\t\tthrow;\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region JSON\r\n\r\n#if NETFRAMEWORK\r\n\t\t/// Cache data for speed.\r\n\t\t/// Cache allows for this class to work 20 times faster.\r\n\t\tprivate static ConcurrentDictionary JsonSerializers = new ConcurrentDictionary();\r\n\r\n\t\tstatic DataContractJsonSerializer GetJsonSerializer(Type type, DataContractJsonSerializerSettings settings = null)\r\n\t\t{\r\n\t\t\tif (type == null)\r\n\t\t\t\treturn null;\r\n\t\t\treturn JsonSerializers.GetOrAdd(type, x => new DataContractJsonSerializer(type, settings));\r\n\t\t}\r\n#endif\r\n\r\n\t\tpublic static Func _SerializeToJson;\r\n\t\tpublic static Func _DeserializeFromJson;\r\n\r\n#if !NETFRAMEWORK\r\n\t\tprivate static System.Text.Json.JsonSerializerOptions GetJsonOptions()\r\n\t\t{\r\n\t\t\tvar options = new System.Text.Json.JsonSerializerOptions();\r\n\t\t\toptions.DefaultIgnoreCondition = System.Text.Json.Serialization.JsonIgnoreCondition.WhenWritingNull;\r\n\t\t\toptions.PropertyNamingPolicy = null;\r\n\t\t\toptions.WriteIndented = true;\r\n\t\t\toptions.MaxDepth = 64;\r\n\t\t\t// Add support for de-serializing enumeration strings.\r\n\t\t\toptions.Converters.Add(new System.Text.Json.Serialization.JsonStringEnumConverter());\r\n\t\t\treturn options;\r\n\t\t}\r\n#endif\r\n\r\n\t\t/// \r\n\t\t/// Serialize object to JSON string.\r\n\t\t/// \r\n\t\t/// The object to serialize.\r\n\t\t/// JSON string encoding.\r\n\t\t/// JSON string.\r\n\t\tpublic static string SerializeToJson(object o, Encoding encoding = null)\r\n\t\t{\r\n\t\t\tif (_SerializeToJson != null)\r\n\t\t\t\treturn _SerializeToJson(o, encoding);\r\n\t\t\tif (o is null)\r\n\t\t\t\treturn null;\r\n#if NETFRAMEWORK\r\n\t\t\tvar serializer = GetJsonSerializer(o.GetType());\r\n\t\t\tvar ms = new MemoryStream();\r\n\t\t\tlock (serializer) { serializer.WriteObject(ms, o); }\r\n\t\t\tif (encoding is null)\r\n\t\t\t\tencoding = Encoding.UTF8;\r\n\t\t\tvar json = encoding.GetString(ms.ToArray());\r\n\t\t\tms.Close();\r\n\t\t\treturn json;\r\n#else\r\n\t\t\tvar options = GetJsonOptions();\r\n\t\t\tvar json = System.Text.Json.JsonSerializer.Serialize(o, o.GetType(), options);\r\n\t\t\treturn json;\r\n#endif\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from JSON string.\r\n\t\t/// \r\n\t\t/// JSON string representing object.\r\n\t\t/// Type of object.\r\n\t\t/// JSON string encoding.\r\n\t\t/// The de-serialized object.\r\n\t\tpublic static object DeserializeFromJson(string json, Type type, Encoding encoding = null)\r\n\t\t{\r\n\t\t\tif (_DeserializeFromJson != null)\r\n\t\t\t\treturn _DeserializeFromJson(json, type, encoding);\r\n\t\t\tif (json is null)\r\n\t\t\t\treturn null;\r\n#if NETFRAMEWORK\r\n\t\t\tvar serializer = GetJsonSerializer(type);\r\n\t\t\tif (encoding is null)\r\n\t\t\t\tencoding = Encoding.UTF8;\r\n\t\t\tvar bytes = encoding.GetBytes(json);\r\n\t\t\tvar ms = new MemoryStream(bytes);\r\n\t\t\tobject o;\r\n\t\t\tlock (serializer) { o = serializer.ReadObject(ms); }\r\n\t\t\tms.Close();\r\n\t\t\treturn o;\r\n#else\r\n\t\t\tvar options = GetJsonOptions();\r\n\t\t\tvar o = System.Text.Json.JsonSerializer.Deserialize(json, type, options);\r\n\t\t\treturn o;\r\n#endif\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from JSON string.\r\n\t\t/// \r\n\t\t/// JSON string representing object.\r\n\t\t/// JSON string encoding.\r\n\t\t/// The de-serialized object.\r\n\t\tpublic static T DeserializeFromJson(string json, Encoding encoding = null)\r\n\t\t{\r\n\t\t\treturn (T)DeserializeFromJson(json, typeof(T), encoding);\r\n\t\t}\r\n\r\n\t\t// Created by: https://stackoverflow.com/users/17211/vince-panuccio\r\n\t\t// https://stackoverflow.com/questions/4580397/json-formatter-in-c\r\n\t\tpublic static string FormatJson(string json, string indent = \"\\t\")\r\n\t\t{\r\n\t\t\tvar indentation = 0;\r\n\t\t\tvar quoteCount = 0;\r\n\t\t\tvar escapeCount = 0;\r\n\t\t\tvar result =\r\n\t\t\t\tfrom ch in json ?? string.Empty\r\n\t\t\t\tlet escaped = (ch == '\\\\' ? escapeCount++ : escapeCount > 0 ? escapeCount-- : escapeCount) > 0\r\n\t\t\t\tlet quotes = ch == '\"' && !escaped ? quoteCount++ : quoteCount\r\n\t\t\t\tlet unquoted = quotes % 2 == 0\r\n\t\t\t\tlet colon = ch == ':' && unquoted ? \": \" : null\r\n\t\t\t\tlet nospace = char.IsWhiteSpace(ch) && unquoted ? string.Empty : null\r\n\t\t\t\tlet lineBreak = ch == ',' && unquoted ? ch + Environment.NewLine + string.Concat(Enumerable.Repeat(indent, indentation)) : null\r\n\t\t\t\tlet openChar = (ch == '{' || ch == '[') && unquoted ? ch + Environment.NewLine + string.Concat(Enumerable.Repeat(indent, ++indentation)) : ch.ToString()\r\n\t\t\t\tlet closeChar = (ch == '}' || ch == ']') && unquoted ? Environment.NewLine + string.Concat(Enumerable.Repeat(indent, --indentation)) + ch : ch.ToString()\r\n\t\t\t\tselect colon ?? nospace ?? lineBreak ?? (openChar.Length > 1 ? openChar : closeChar);\r\n\t\t\treturn string.Concat(result);\r\n\t\t}\r\n\r\n\t\t//public static string FormatJson(string json, bool indent = true)\r\n\t\t//{\r\n\t\t//\tusing document = JsonDocument.Parse(json);\r\n\t\t//\tusing var stream = new MemoryStream();\r\n\t\t//\tusing var writer = new Utf8JsonWriter(stream, new JsonWriterOptions() { Indented = indent });\r\n\t\t//\tdocument.WriteTo(writer);\r\n\t\t//\twriter.Flush();\r\n\t\t//\treturn Encoding.UTF8.GetString(stream.ToArray());\r\n\t\t//}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region XML\r\n\r\n\t\t/// \r\n\t\t/// Reformat XML document.\r\n\t\t/// \r\n\t\t/// \r\n\t\t/// \r\n\t\tpublic static string XmlFormat(string xml)\r\n\t\t{\r\n\t\t\tvar xd = new XmlDocument();\r\n\t\t\txd.XmlResolver = null;\r\n\t\t\txd.LoadXml(xml);\r\n\t\t\tvar sb = new StringBuilder();\r\n\t\t\tvar xws = new XmlWriterSettings();\r\n\t\t\txws.Indent = true;\r\n\t\t\txws.CheckCharacters = true;\r\n\t\t\t// XmlReader normalizes all newlines and converts '\\r\\n' to '\\n'.\r\n\t\t\t// This requires to save NewLines with option which\r\n\t\t\t// \"Entitize\" option replace '\\r' with '
' in text node values.\r\n\t\t\txws.NewLineHandling = NewLineHandling.Entitize;\r\n\t\t\tvar xw = XmlWriter.Create(sb, xws);\r\n\t\t\txd.WriteTo(xw);\r\n\t\t\txw.Close();\r\n\t\t\treturn sb.ToString();\r\n\t\t}\r\n\r\n\t\tstatic object XmlSerializersLock = new object();\r\n\t\tstatic Dictionary XmlSerializers;\r\n\t\tpublic static XmlSerializer GetXmlSerializer(Type type)\r\n\t\t{\r\n\t\t\tlock (XmlSerializersLock)\r\n\t\t\t{\r\n\t\t\t\tif (XmlSerializers is null)\r\n\t\t\t\t\tXmlSerializers = new Dictionary();\r\n\t\t\t\tif (!XmlSerializers.ContainsKey(type))\r\n\t\t\t\t{\r\n\t\t\t\t\tvar extraTypes = new Type[] { typeof(string) };\r\n\t\t\t\t\tXmlSerializers.Add(type, new XmlSerializer(type, extraTypes));\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t\treturn XmlSerializers[type];\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region XML: Serialize\r\n\r\n\t\t/// \r\n\t\t/// Serialize object to XML document.\r\n\t\t/// \r\n\t\t/// The object to serialize.\r\n\t\t/// XML document\r\n\t\tpublic static XmlDocument SerializeToXml(object o)\r\n\t\t{\r\n\t\t\tif (o is null)\r\n\t\t\t\treturn null;\r\n\t\t\tvar serializer = GetXmlSerializer(o.GetType());\r\n\t\t\tvar ms = new MemoryStream();\r\n\t\t\tlock (serializer) { serializer.Serialize(ms, o); }\r\n\t\t\tms.Seek(0, SeekOrigin.Begin);\r\n\t\t\tvar doc = new XmlDocument();\r\n\t\t\tdoc.XmlResolver = null;\r\n\t\t\t// Settings used to protect from:\r\n\t\t\t// SUPPRESS: CWE-611: Improper Restriction of XML External Entity Reference('XXE')\r\n\t\t\t// https://cwe.mitre.org/data/definitions/611.html\r\n\t\t\tvar settings = new XmlReaderSettings();\r\n\t\t\tsettings.DtdProcessing = DtdProcessing.Ignore;\r\n\t\t\tsettings.XmlResolver = null;\r\n\t\t\tsettings.CloseInput = false;\r\n\t\t\tvar reader = XmlReader.Create(ms, settings);\r\n\t\t\tdoc.Load(reader);\r\n\t\t\treader.Dispose();\r\n\t\t\tms.Close();\r\n\t\t\treturn doc;\r\n\t\t}\r\n\r\n\t\tstatic T SeriallizeToXml(object o, Encoding encoding = null, bool omitXmlDeclaration = false, string comment = null, bool indent = true)\r\n\t\t{\r\n\t\t\tif (o is null)\r\n\t\t\t\treturn default(T);\r\n\t\t\t// Create serialization settings.\r\n\t\t\tencoding = encoding ?? Encoding.UTF8;\r\n\t\t\tvar settings = new XmlWriterSettings();\r\n\t\t\tsettings.OmitXmlDeclaration = omitXmlDeclaration;\r\n\t\t\tsettings.Encoding = encoding;\r\n\t\t\tsettings.Indent = indent;\r\n\t\t\t// XmlReader normalizes all newlines and converts '\\r\\n' to '\\n'.\r\n\t\t\t// This requires to save NewLines with option which\r\n\t\t\t// \"Entitize\" option replace '\\r' with '
' in text node values.\r\n\t\t\tsettings.NewLineHandling = NewLineHandling.Entitize;\r\n\t\t\t// Serialize.\r\n\t\t\tvar serializer = GetXmlSerializer(o.GetType());\r\n\t\t\t// Serialize in memory first, so file will be locked for shorter times.\r\n\t\t\tvar ms = new MemoryStream();\r\n\t\t\tvar xw = XmlWriter.Create(ms, settings);\r\n\t\t\ttry\r\n\t\t\t{\r\n\t\t\t\tlock (serializer)\r\n\t\t\t\t{\r\n\t\t\t\t\tif (!string.IsNullOrEmpty(comment))\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\txw.WriteStartDocument();\r\n\t\t\t\t\t\txw.WriteComment(comment);\r\n\t\t\t\t\t}\r\n\t\t\t\t\tif (omitXmlDeclaration)\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\t//Create our own namespaces for the output\r\n\t\t\t\t\t\tvar ns = new XmlSerializerNamespaces();\r\n\t\t\t\t\t\t//Add an empty namespace and empty value\r\n\t\t\t\t\t\tns.Add(\"\", \"\");\r\n\t\t\t\t\t\tserializer.Serialize(xw, o, ns);\r\n\t\t\t\t\t}\r\n\t\t\t\t\telse\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tserializer.Serialize(xw, o);\r\n\t\t\t\t\t}\r\n\t\t\t\t\tif (!string.IsNullOrEmpty(comment))\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\txw.WriteEndDocument();\r\n\t\t\t\t\t}\r\n\t\t\t\t\t// Make sure that all data flushed into memory stream.\r\n\t\t\t\t\txw.Flush();\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t\tcatch (Exception)\r\n\t\t\t{\r\n\t\t\t\tthrow;\r\n\t\t\t}\r\n\t\t\tfinally\r\n\t\t\t{\r\n\t\t\t\t// This will close underlying MemoryStream too.\r\n\t\t\t\txw.Close();\r\n\t\t\t}\r\n\t\t\t// ToArray will return all bytes from memory stream despite it being closed.\r\n\t\t\t// Bytes will start with Byte Order Mark(BOM) and are ready to write into file.\r\n\t\t\tvar xmlBytes = ms.ToArray();\r\n\t\t\t// If string must be returned then...\r\n\t\t\tif (typeof(T) == typeof(string))\r\n\t\t\t{\r\n\t\t\t\t// Use StreamReader to remove Byte Order Mark(BOM).\r\n\t\t\t\tvar ms2 = new MemoryStream(xmlBytes);\r\n\t\t\t\tvar sr = new StreamReader(ms2, true);\r\n\t\t\t\tvar xmlString = sr.ReadToEnd();\r\n\t\t\t\t// This will close underlying MemoryStream too.\r\n\t\t\t\tsr.Close();\r\n\t\t\t\treturn (T)(object)xmlString;\r\n\t\t\t}\r\n\t\t\telse\r\n\t\t\t{\r\n\t\t\t\treturn (T)(object)xmlBytes;\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Serialize object to XML string.\r\n\t\t/// \r\n\t\t/// The object to serialize.\r\n\t\t/// The encoding to use (default is UTF8).\r\n\t\t/// Whether to omit the XML declaration.\r\n\t\t/// Optional comment to include in the XML.\r\n\t\t/// Whether to indent the XML output.\r\n\t\t/// XML string.\r\n\t\tpublic static string SerializeToXmlString(object o, Encoding encoding = null, bool omitXmlDeclaration = false, string comment = null, bool indent = true)\r\n\t\t{\r\n\t\t\treturn SeriallizeToXml(o, encoding, omitXmlDeclaration, comment, indent);\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Serialize object to XML file.\r\n\t\t/// \r\n\t\t/// The object to serialize.\r\n\t\t/// The file name to write to.\r\n\t\t/// The encoding to use (default is UTF8).\r\n\t\t/// Whether to omit the XML declaration.\r\n\t\t/// Optional comment to include in the XML.\r\n\t\t/// Number of attempts to write the file.\r\n\t\t/// Wait time between attempts in milliseconds.\r\n\t\tpublic static void SerializeToXmlFile(object o, string path, Encoding encoding = null, bool omitXmlDeclaration = false, string comment = null, int attempts = 2, int waitTime = 500)\r\n\t\t{\r\n\t\t\tvar bytes = (o is null)\r\n\t\t\t\t? new byte[0]\r\n\t\t\t\t: SeriallizeToXml(o, encoding, omitXmlDeclaration, comment);\r\n\t\t\t// Write serialized data into file.\r\n\t\t\tWriteFile(path, bytes, attempts, waitTime);\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// Serialize object to XML bytes with Byte Order Mark (BOM).\r\n\t\t/// \r\n\t\t/// The object to serialize.\r\n\t\t/// The encoding to use (default is UTF8).\r\n\t\t/// Whether to omit the XML declaration.\r\n\t\t/// Optional comment to include in the XML.\r\n\t\t/// XML bytes with Byte Order Mark (BOM).\r\n\t\tpublic static byte[] SerializeToXmlBytes(object o, Encoding encoding = null, bool omitXmlDeclaration = false, string comment = null)\r\n\t\t{\r\n\t\t\tvar bytes = (o is null)\r\n\t\t\t\t? new byte[0]\r\n\t\t\t\t: SeriallizeToXml(o, encoding, omitXmlDeclaration, comment);\r\n\t\t\treturn bytes;\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region XML: De-serialize\r\n\r\n\t\t/// \r\n\t\t/// De-serialize System.Collections.Generic.List to XML document.\r\n\t\t/// \r\n\t\t/// XML document representing object.\r\n\t\t/// Type of object.\r\n\t\t/// XML document\r\n\t\tpublic static object DeserializeFromXml(XmlDocument doc, Type type)\r\n\t\t{\r\n\t\t\tif (doc is null)\r\n\t\t\t\treturn null;\r\n\t\t\treturn DeserializeFromXmlString(doc.OuterXml, type);\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML bytes. XML bytes can contain Byte Order Mark (BOM).\r\n\t\t/// \r\n\t\t/// XML bytes representing object.\r\n\t\t/// Type of object.\r\n\t\t/// Encoding to use (default is UTF8) if Byte Order Mark (BOM) is missing.\r\n\t\t/// Object.\r\n\t\tpublic static object DeserializeFromXmlBytes(byte[] bytes, Type type, Encoding encoding = null)\r\n\t\t{\r\n\t\t\tvar ms = new MemoryStream(bytes);\r\n\t\t\t// Use stream reader (inherits from TextReader) to avoid encoding errors.\r\n\t\t\t// Use specified encoding if Byte Order Mark (BOM) is missing.\r\n\t\t\tvar sr = new StreamReader(ms, encoding ?? Encoding.UTF8, true);\r\n\t\t\t// Settings used to protect from\r\n\t\t\t// SUPPRESS: CWE-611: Improper Restriction of XML External Entity Reference('XXE')\r\n\t\t\t// https://cwe.mitre.org/data/definitions/611.html\r\n\t\t\tvar settings = new XmlReaderSettings();\r\n\t\t\tsettings.DtdProcessing = DtdProcessing.Ignore;\r\n\t\t\tsettings.XmlResolver = null;\r\n\t\t\tsettings.IgnoreWhitespace = true;\r\n\t\t\t// Stream 'ms' and 'sr' will be disposed by the reader.\r\n\t\t\tusing (var reader = XmlReader.Create(sr, settings))\r\n\t\t\t{\r\n\t\t\t\tobject o;\r\n\t\t\t\tvar serializer = GetXmlSerializer(type);\r\n\t\t\t\tlock (serializer) { o = serializer.Deserialize(reader); }\r\n\t\t\t\treturn o;\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t// Example how to add the missing namespaces.\r\n\t\t// \r\n\t\t// Create a new NameTable\r\n\t\t//var nameTable = new NameTable();\r\n\t\t// Create a new NamespaceManager\r\n\t\t//var nsMgr = new XmlNamespaceManager(nameTable);\r\n\t\t// Add namespaces used in the XML\r\n\t\t//nsMgr.AddNamespace(\"xlink\", \"urn:http://namespaceurl.com\");\r\n\t\t// Create the XmlParserContext using the previous declared XmlNamespaceManager\r\n\t\t//var inputContext = new XmlParserContext(null, nsMgr, null, XmlSpace.None);\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML string. XML string must not contain Byte Order Mark (BOM).\r\n\t\t/// \r\n\t\t/// XML string representing object.\r\n\t\t/// Type of object.\r\n\t\t/// You can use inputContext to add missing namespaces.\r\n\t\t/// Object.\r\n\t\tpublic static object DeserializeFromXmlString(string xml, Type type, XmlParserContext inputContext = null, bool ignoreNamespaces = false)\r\n\t\t{\r\n\t\t\t// Note: If you are getting de-serialization error in XML document(1,1) then there is a chance that\r\n\t\t\t// you are trying to de-serialize string which contains Byte Order Mark (BOM) which must not be there.\r\n\t\t\t// Probably you used \"var xml = System.Text.Encoding.GetString(bytes)\" directly on file content.\r\n\t\t\t// You should use \"StreamReader\" on file content, because this method will strip BOM properly\r\n\t\t\t// when converting bytes to string.\r\n\t\t\t// Settings used to protect from\r\n\t\t\t// SUPPRESS: CWE-611: Improper Restriction of XML External Entity Reference('XXE')\r\n\t\t\t// https://cwe.mitre.org/data/definitions/611.html\r\n\t\t\tvar settings = new XmlReaderSettings();\r\n\t\t\tsettings.DtdProcessing = DtdProcessing.Ignore;\r\n\t\t\tsettings.XmlResolver = null;\r\n\t\t\tobject o;\r\n\t\t\tvar serializer = GetXmlSerializer(type);\r\n\t\t\t// Stream 'sr' will be disposed by the reader.\r\n\t\t\tusing (var sr = new StringReader(xml))\r\n\t\t\t{\r\n\t\t\t\tif (ignoreNamespaces)\r\n\t\t\t\t{\r\n\t\t\t\t\tusing (var tr = new XmlTextReader(sr))\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\t// Ignore namespaces.\r\n\t\t\t\t\t\ttr.Namespaces = false;\r\n\t\t\t\t\t\tusing (var reader = XmlReader.Create(tr, settings))\r\n\t\t\t\t\t\t\tlock (serializer) { o = serializer.Deserialize(reader); }\r\n\t\t\t\t\t}\r\n\t\t\t\t\treturn o;\r\n\t\t\t\t}\r\n\t\t\t\tusing (var reader = XmlReader.Create(sr, settings, inputContext))\r\n\t\t\t\t\tlock (serializer) { o = serializer.Deserialize(reader); }\r\n\t\t\t\treturn o;\r\n\t\t\t}\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML file.\r\n\t\t/// \r\n\t\t/// The file name to read from.\r\n\t\t/// Type of object.\r\n\t\t/// Encoding to use (default is UTF8) if file Byte Order Mark (BOM) is missing.\r\n\t\t/// Object.\r\n\t\tpublic static object DeserializeFromXmlFile(string filename, Type type, Encoding encoding = null, int attempts = 1, int waitTime = 500)\r\n\t\t{\r\n\t\t\t// Read full file content first, so file will be locked for shorter period of time.\r\n\t\t\tvar bytes = ReadFile(filename, attempts, waitTime);\r\n\t\t\tif (bytes is null || bytes.Length == 0)\r\n\t\t\t\treturn null;\r\n\t\t\treturn DeserializeFromXmlBytes(bytes, type, encoding);\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML Document.\r\n\t\t/// \r\n\t\t/// XML document representing object.\r\n\t\t/// XML document\r\n\t\tpublic static T DeserializeFromXml(XmlDocument doc)\r\n\t\t{\r\n\t\t\treturn (T)DeserializeFromXml(doc, typeof(T));\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML string.\r\n\t\t/// \r\n\t\t/// XML string representing object.\r\n\t\t/// Object.\r\n\t\tpublic static T DeserializeFromXmlString(string xml)\r\n\t\t{\r\n\t\t\treturn (T)DeserializeFromXmlString(xml, typeof(T));\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML file.\r\n\t\t/// \r\n\t\t/// The file name to read from.\r\n\t\t/// Specified encoding will be used if file Byte Order Mark (BOM) is missing.\r\n\t\t/// Object.\r\n\t\tpublic static T DeserializeFromXmlFile(string filename, Encoding encoding = null, int attempts = 1, int waitTime = 500)\r\n\t\t{\r\n\t\t\treturn (T)DeserializeFromXmlFile(filename, typeof(T), encoding, attempts, waitTime);\r\n\t\t}\r\n\r\n\t\t/// \r\n\t\t/// De-serialize object from XML bytes. XML bytes can contain Byte Order Mark (BOM).\r\n\t\t/// \r\n\t\t/// XML bytes representing object.\r\n\t\t/// The encoding to use (default is UTF8) if Byte Order Mark (BOM) is missing.\r\n\t\t/// Object.\r\n\t\tpublic static T DeserializeFromXmlBytes(byte[] bytes, Encoding encoding = null)\r\n\t\t{\r\n\t\t\treturn (T)DeserializeFromXmlBytes(bytes, typeof(T), encoding);\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t\t#region XSD: Serialize\r\n\r\n\t\t/// \r\n\t\t/// Serialize object schema to XSD file.\r\n\t\t/// \r\n\t\t/// The object to serialize.\r\n\t\t/// The file name to write to.\r\n\t\t/// The encoding to use (default is UTF8).\r\n\t\tpublic static void SerializeToXsdFile(object o, string path, Encoding encoding = null, bool omitXmlDeclaration = false, int attempts = 2, int waitTime = 500)\r\n\t\t{\r\n\t\t\tif (o is null)\r\n\t\t\t{\r\n\t\t\t\tWriteFile(path, new byte[0], attempts, waitTime);\r\n\t\t\t\treturn;\r\n\t\t\t}\r\n\t\t\tencoding = encoding ?? Encoding.UTF8;\r\n\t\t\t// Create serialization settings.\r\n\t\t\tvar settings = new XmlWriterSettings();\r\n\t\t\tsettings.OmitXmlDeclaration = omitXmlDeclaration;\r\n\t\t\tsettings.Encoding = encoding;\r\n\t\t\tsettings.Indent = true;\r\n\t\t\t// XmlReader normalizes all newlines and converts '\\r\\n' to '\\n'.\r\n\t\t\t// This requires to save NewLines with option which\r\n\t\t\t// \"Entitize\" option replace '\\r' with '
' in text node values.\r\n\t\t\tsettings.NewLineHandling = NewLineHandling.Entitize;\r\n\t\t\t// Serialize in memory first, so file will be locked for shorter times.\r\n\t\t\tvar ms = new MemoryStream();\r\n\t\t\tvar xw = XmlWriter.Create(ms, settings);\r\n\t\t\tvar serializer = GetXmlSerializer(o.GetType());\r\n\t\t\ttry\r\n\t\t\t{\r\n\t\t\t\tvar exporter = new XsdDataContractExporter();\r\n\t\t\t\tif (exporter.CanExport(o.GetType()))\r\n\t\t\t\t{\r\n\t\t\t\t\texporter.Export(o.GetType());\r\n\t\t\t\t\t//Console.WriteLine(\"number of schemas: {0}\", exporter.Schemas.Count);\r\n\t\t\t\t\tXmlSchemaSet schemas = exporter.Schemas;\r\n\t\t\t\t\tXmlQualifiedName XmlNameValue = exporter.GetRootElementName(o.GetType());\r\n\t\t\t\t\tstring nameSpace = XmlNameValue.Namespace;\r\n\t\t\t\t\tforeach (XmlSchema schema in schemas.Schemas(nameSpace))\r\n\t\t\t\t\t{\r\n\t\t\t\t\t\tschema.Write(xw);\r\n\t\t\t\t\t}\r\n\t\t\t\t}\r\n\t\t\t}\r\n\t\t\tcatch (Exception)\r\n\t\t\t{\r\n\t\t\t\txw.Close();\r\n\t\t\t\t// CA2202: Do not dispose objects multiple times\r\n\t\t\t\t//ms.Close();\r\n\t\t\t\tthrow;\r\n\t\t\t}\r\n\t\t\txw.Flush();\r\n\t\t\tbyte[] bytes = ms.ToArray();\r\n\t\t\txw.Close();\r\n\t\t\t// CA2202: Do not dispose objects multiple times\r\n\t\t\t//ms.Close();\r\n\t\t\t// Write serialized data into file.\r\n\t\t\tWriteFile(path, bytes, attempts, waitTime);\r\n\t\t}\r\n\r\n\t\t#endregion\r\n\r\n\t}\r\n\r\n}\r\n"
},
{
"path": "FocusLogger/JocysCom/Text/Helper.cs",
"content": "using System;\r\nusing System.Collections.Generic;\r\nusing System.IO;\r\nusing System.Linq;\r\nusing System.Text;\r\nusing System.Text.RegularExpressions;\r\n\r\nnamespace JocysCom.ClassLibrary.Text\r\n{\r\n\r\n\tpublic static class Helper\r\n\t{\r\n\t\tprivate static readonly Regex tagRx = new Regex(\"{((?[\\\\w]+)[.])?(?