functions/Get-NCalendar.ps1
|
Function Get-NCalendar { [cmdletbinding()] [alias("ncal")] [OutputType("String")] Param( [Parameter( Position = 0, ValueFromPipeline, ValueFromPipelineByPropertyName, HelpMessage = "Enter the full month name. The default is the current month." )] [ValidateNotNullOrEmpty()] [ValidateScript( { #sometimes this returns an extra and blank entry $m = [System.Globalization.CultureInfo]::CurrentCulture.DateTimeFormat.MonthNames | Where-Object { $_ } if ( $m -contains $_) { $True } Else { Throw "You must enter one of these values: $($m -join ',')" $False } })] [string]$Month = (Get-Date -Format MMMM), [Parameter( Position = 1, ValueFromPipelineByPropertyName, HelpMessage = "Enter the 4 digit year. The default is the current year." )] [ValidatePattern("\d{4}")] [ValidateRange(1000, 9999)] [int]$Year = (Get-Date).Year, [Parameter(HelpMessage = "Don't highlight the current date.")] [Switch]$HideHighlight, [Parameter(HelpMessage = "Start the week on Monday")] [Switch]$Monday ) Begin { #display the module version defined in the psm1 file Write-Verbose "Starting: $($MyInvocation.MyCommand) [v$modVer]" Write-Verbose "Using PowerShell version: $($PSVersionTable.PSVersion)" Write-Verbose "Running in PowerShell host: $($host.name)" #Call .NET for better results when testing this command in different cultures $currentCulture = [System.Globalization.CultureInfo]::CurrentCulture Write-Verbose "Using culture: $($currCulture.DisplayName) [$($currCulture.name)]" #enforce NoAnsi if running in the PowerShell ISE [Issue #30] if ($host.name -Match "ISE Host") { Write-Verbose "PowerShell ISE detected. Turning off highlighting." $HideHighlight = $True } } #begin Process { Write-Verbose "Using month $month and year $year" $today = (Get-Date).Date Write-Verbose "Today is $today" #get month number Write-Verbose "Parsing $month to number" [int]$monthInt = [DateTime]::parse("1 $month $year").month Write-Verbose "Returned month number $monthInt" if ( ($monthInt -eq $today.month) -AND ($year -eq $today.year)) { Write-Verbose "In the current month" $IsCurrentMonth = $True } $startD = [DateTime]::new($year, $monthInt, 1) $max = $CurrentCulture.DateTimeFormat.Calendar.GetDaysInMonth($year, $monthInt) Write-Verbose "Max days in month is $max." $dayNames = $CurrentCulture.DateTimeFormat.AbbreviatedDayNames $dayList = [System.Collections.Generic.list[string]]::new() if ($Monday) { Write-Verbose "Using a Monday-based week" ($dayNames[1..6]).Foreach( { $dayList.add($_) }) $dayList.Add($dayNames[0]) } else { $dayList.AddRange($dayNames) } $dayList | ForEach-Object -Begin { $dayHash = [ordered]@{} } -Process { $dayHash.Add($_, @()) } for ($i = 0; $i -lt $max; $i++) { $day = $startD.AddDays($i).date $dayName = "{0:ddd}" -f $day $dom = $day.day $dayHash[$dayName] += $dom } $dayHash | Out-String | Write-Verbose #make sure month is in title case $head = "$($CurrentCulture.TextInfo.toTitleCase($Month)) $Year" $maxDayLength = $dayHash.keys.length | Sort-Object | Select-Object -Last 1 Write-Verbose "Building day hashtable" $out = $dayHash.GetEnumerator() | ForEach-Object { Write-Verbose $_.name #build a value string $vString = $_.value.Foreach({ "{0,2}" -f $_.toString()}) Write-Verbose "Using days $($vString -join ' ')" $row = "{0}{1}" -f $_.name.PadRight(4), $($vString -join " ").PadLeft(14) if ($isCurrentMonth -AND ($row -match "\b$($Today.day)\b") -AND (-Not $HideHighlight)) { Write-Verbose "Highlighting current day in $row" $row = $row -replace "\b$($Today.day)\b","$($PSCalendarConfiguration.Today)$($today.day)$([char]27)[0m" } write-Verbose "Using row $row" $row } Write-Verbose "display length = $($out[0].length)" #write-Verbose "head length = $($head.length)" $pad = (($out[0].length - $head.length) / 2) + $head.length + 1 #Write-Verbose "padding $pad" if ($HideHighlight) { $head.PadLeft($pad) } else { "$($pscalendarConfiguration.Title)$($head.PadLeft($pad))$([char]27)[0m" } $out #insert a blank line "`r" } End { Write-Verbose "Ending: $($MyInvocation.MyCommand)" } } |