##########################################################
#
# Script-Name: Rss-Read.ps1
#
# authors:     Niklas Goude
#
# Url:         http://www.PowerShell.nu
#              
##########################################################

param ([switch]$help)

function GetHelp() {

$HelpText = @"

DESCRIPTION:

NAME: Rss-Read.ps1
Gets the Latest posts from www.PowerShell.nu and
presents them in PowerShell

PARAMETERS: 

-help        Prints the HelpFile (Optional)

SYNTAX:

Rss-Read.ps1

This script Gets the latest posts from www.PowerShell.nu
and presents the information in the PowerShell host.
The Script also uses the COM Object Sapi.SPVoice to
Read the Headline for each post.

Rss-Read.ps1 -help

Displays the help topic for the script

"@
$HelpText
}

function Get-Rss {

	$WebClient = New-Object Net.WebClient
	$DownloadString = $WebClient.DownloadString("http://www.powershell.nu/feed/rss/")

	$rss = $DownloadString.Split() | select-string -case "<link>" 

	$rss = $rss -replace ".*<link>",""
	$rss = $rss -replace "</link>.*",""
	$rss | ForEach {

		if($_ -eq "http://www.powershell.nu") {

			# Skip the index page

		} else {

			# Collecting information for each Page

			$GetWeb = $WebClient.DownloadString($_)
			$GetWeb = $GetWeb.Split("`n")

			$TextStart = ($GetWeb | Select-string -case '<div class="entry">').LineNumber

			$Text = $GetWeb[$TextStart]
			$Text = $Text  -replace "\<[^<]*\>",""
			$Text = $Text -replace "&#8217;","'"
			$Text = $Text -replace "&#8220;",""
			$Text = $Text.TrimStart()

			$HeadLine = $GetWeb | Select-string -case '<div class="singlepage">'
			$HeadLine = $Headline -replace '<div class="singlepage">',""
			$HeadLine = $HeadLine -replace '</div>',""
			$HeadLine = $HeadLine.TrimStart()

			$WebObject = New-Object PsObject

			$WebObject | Add-Member -memberType NoteProperty "Headline" -Value $HeadLine
			$WebObject | Add-Member -memberType NoteProperty "Url" -Value $_
			$WebObject | Add-Member -memberType NoteProperty "Text" -Value $Text

			# Return HeadLine and Url

			return $WebObject
		}
	}
}

function Rss-Read ([string]$speechy) {

	$SPVoice = New-Object -Com SAPI.SPVoice
	$SPVoice.Speak($speechy) | Out-Null
}

function Get-News {

	$Rss = Get-Rss

	$Rss | ForEach {

		$_ | Format-List

		Rss-Read $_.HeadLine
	}
}

if($help) { GetHelp } else { Get-News }