/// <summary>
/// Returns the textual representation of the SenderID record
/// </summary>
/// <returns> Textual representation </returns>
public override string ToString()
{
StringBuilder res = new StringBuilder();
if (Version == 1)
{
res.Append("v=spf1");
}
else
{
res.Append("v=spf");
res.Append(Version);
res.Append(".");
res.Append(MinorVersion);
res.Append("/");
res.Append(String.Join(",", Scopes.Where(s => s != SenderIDScope.Unknown).Select(s => EnumHelper <SenderIDScope> .ToString(s).ToLower()).ToArray()));
}
if ((Terms != null) && (Terms.Count > 0))
{
foreach (SpfTerm term in Terms)
{
SpfModifier modifier = term as SpfModifier;
if ((modifier == null) || (modifier.Type != SpfModifierType.Unknown))
{
res.Append(" ");
res.Append(term.ToString());
}
}
}
return(res.ToString());
}
public override string ToString()
{
StringBuilder res = new StringBuilder();
res.Append("v=spf1");
if ((Terms != null) && (Terms.Count > 0))
{
foreach (SpfTerm term in Terms)
{
SpfModifier modifier = term as SpfModifier;
if ((modifier == null) || (modifier.Type != SpfModifierType.Unknown))
{
res.Append(" ");
res.Append(term.ToString());
}
}
}
return(res.ToString());
}
private async Task <ValidationResult> CheckHostInternalAsync(IPAddress ip, DomainName domain, string sender, bool expandExplanation, State state, CancellationToken token)
{
if ((domain == null) || (domain.Equals(DomainName.Root)))
{
return(new ValidationResult()
{
Result = SpfQualifier.None, Explanation = String.Empty
});
}
if (String.IsNullOrEmpty(sender))
{
sender = "postmaster@unknown";
}
else if (!sender.Contains('@'))
{
sender = "postmaster@" + sender;
}
LoadRecordResult loadResult = await LoadRecordsAsync(domain, token);
if (!loadResult.CouldBeLoaded)
{
return(new ValidationResult()
{
Result = loadResult.ErrorResult, Explanation = String.Empty
});
}
T record = loadResult.Record;
if ((record.Terms == null) || (record.Terms.Count == 0))
{
return new ValidationResult()
{
Result = SpfQualifier.Neutral, Explanation = String.Empty
}
}
;
if (record.Terms.OfType <SpfModifier>().GroupBy(m => m.Type).Where(g => (g.Key == SpfModifierType.Exp) || (g.Key == SpfModifierType.Redirect)).Any(g => g.Count() > 1))
{
return new ValidationResult()
{
Result = SpfQualifier.PermError, Explanation = String.Empty
}
}
;
ValidationResult result = new ValidationResult()
{
Result = loadResult.ErrorResult
};
#region Evaluate mechanism
foreach (SpfMechanism mechanism in record.Terms.OfType <SpfMechanism>())
{
if (state.DnsLookupCount > DnsLookupLimit)
{
return new ValidationResult()
{
Result = SpfQualifier.PermError, Explanation = String.Empty
}
}
;
SpfQualifier qualifier = await CheckMechanismAsync(mechanism, ip, domain, sender, state, token);
if (qualifier != SpfQualifier.None)
{
result.Result = qualifier;
break;
}
}
#endregion
#region Evaluate modifiers
if (result.Result == SpfQualifier.None)
{
SpfModifier redirectModifier = record.Terms.OfType <SpfModifier>().FirstOrDefault(m => m.Type == SpfModifierType.Redirect);
if (redirectModifier != null)
{
if (++state.DnsLookupCount > 10)
{
return new ValidationResult()
{
Result = SpfQualifier.PermError, Explanation = String.Empty
}
}
;
DomainName redirectDomain = await ExpandDomainAsync(redirectModifier.Domain ?? String.Empty, ip, domain, sender, token);
if ((redirectDomain == null) || (redirectDomain == DomainName.Root) || (redirectDomain.Equals(domain)))
{
result.Result = SpfQualifier.PermError;
}
else
{
result = await CheckHostInternalAsync(ip, redirectDomain, sender, expandExplanation, state, token);
if (result.Result == SpfQualifier.None)
{
result.Result = SpfQualifier.PermError;
}
}
}
}
else if ((result.Result == SpfQualifier.Fail) && expandExplanation)
{
SpfModifier expModifier = record.Terms.OfType <SpfModifier>().FirstOrDefault(m => m.Type == SpfModifierType.Exp);
if (expModifier != null)
{
DomainName target = await ExpandDomainAsync(expModifier.Domain, ip, domain, sender, token);
if ((target == null) || (target.Equals(DomainName.Root)))
{
result.Explanation = String.Empty;
}
else
{
DnsResolveResult <TxtRecord> dnsResult = await ResolveDnsAsync <TxtRecord>(target, RecordType.Txt, token);
if ((dnsResult != null) && (dnsResult.ReturnCode == ReturnCode.NoError))
{
TxtRecord txtRecord = dnsResult.Records.FirstOrDefault();
if (txtRecord != null)
{
result.Explanation = (await ExpandMacroAsync(txtRecord.TextData, ip, domain, sender, token)).ToString();
}
}
}
}
}
#endregion
if (result.Result == SpfQualifier.None)
{
result.Result = SpfQualifier.Neutral;
}
return(result);
}
internal static bool TryParse(string s, out SpfTerm value)
{
if (String.IsNullOrEmpty(s))
{
value = null;
return false;
}
#region Parse Mechanism
Regex regex = new Regex(@"^(\s)*(?<qualifier>[~+?-]?)(?<type>[a-z0-9]+)(:(?<domain>[^/]+))?(/(?<prefix>[0-9]+)(/(?<prefix6>[0-9]+))?)?(\s)*$", RegexOptions.Compiled | RegexOptions.IgnoreCase);
Match match = regex.Match(s);
if (match.Success)
{
SpfMechanism mechanism = new SpfMechanism();
switch (match.Groups["qualifier"].Value)
{
case "+":
mechanism.Qualifier = SpfQualifier.Pass;
break;
case "-":
mechanism.Qualifier = SpfQualifier.Fail;
break;
case "~":
mechanism.Qualifier = SpfQualifier.SoftFail;
break;
case "?":
mechanism.Qualifier = SpfQualifier.Neutral;
break;
default:
mechanism.Qualifier = SpfQualifier.Pass;
break;
}
SpfMechanismType type;
mechanism.Type = EnumHelper<SpfMechanismType>.TryParse(match.Groups["type"].Value, true, out type) ? type : SpfMechanismType.Unknown;
mechanism.Domain = match.Groups["domain"].Value;
string tmpPrefix = match.Groups["prefix"].Value;
int prefix;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix = prefix;
}
tmpPrefix = match.Groups["prefix6"].Value;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix6 = prefix;
}
value = mechanism;
return true;
}
#endregion
#region Parse Modifier
regex = new Regex(@"^(\s)*(?<type>[a-z]+)=(?<domain>[^\s]+)(\s)*$", RegexOptions.Compiled | RegexOptions.IgnoreCase);
match = regex.Match(s);
if (match.Success)
{
SpfModifier modifier = new SpfModifier();
SpfModifierType type;
modifier.Type = EnumHelper<SpfModifierType>.TryParse(match.Groups["type"].Value, true, out type) ? type : SpfModifierType.Unknown;
modifier.Domain = match.Groups["domain"].Value;
value = modifier;
return true;
}
#endregion
value = null;
return false;
}
internal static bool TryParse(string s, out SpfTerm value)
{
if (String.IsNullOrEmpty(s))
{
value = null;
return(false);
}
#region Parse Mechanism
Match match = _parseMechanismRegex.Match(s);
if (match.Success)
{
SpfMechanism mechanism = new SpfMechanism();
switch (match.Groups["qualifier"].Value)
{
case "+":
mechanism.Qualifier = SpfQualifier.Pass;
break;
case "-":
mechanism.Qualifier = SpfQualifier.Fail;
break;
case "~":
mechanism.Qualifier = SpfQualifier.SoftFail;
break;
case "?":
mechanism.Qualifier = SpfQualifier.Neutral;
break;
default:
mechanism.Qualifier = SpfQualifier.Pass;
break;
}
SpfMechanismType type;
mechanism.Type = EnumHelper <SpfMechanismType> .TryParse(match.Groups["type"].Value, true, out type) ? type : SpfMechanismType.Unknown;
mechanism.Domain = match.Groups["domain"].Value;
string tmpPrefix = match.Groups["prefix"].Value;
int prefix;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix = prefix;
}
tmpPrefix = match.Groups["prefix6"].Value;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix6 = prefix;
}
value = mechanism;
return(true);
}
#endregion
#region Parse Modifier
match = _parseModifierRegex.Match(s);
if (match.Success)
{
SpfModifier modifier = new SpfModifier();
SpfModifierType type;
modifier.Type = EnumHelper <SpfModifierType> .TryParse(match.Groups["type"].Value, true, out type) ? type : SpfModifierType.Unknown;
modifier.Domain = match.Groups["domain"].Value;
value = modifier;
return(true);
}
#endregion
value = null;
return(false);
}
private SpfQualifier CheckHostInternal(IPAddress ip, string sender, string domain, bool expandExplanation, out string explanation)
{
explanation = String.Empty;
if (String.IsNullOrEmpty(domain))
{
return(SpfQualifier.None);
}
if (String.IsNullOrEmpty(sender))
{
sender = "postmaster@unknown";
}
else if (!sender.Contains('@'))
{
sender = "postmaster@" + sender;
}
SpfQualifier result;
T record;
if (!TryLoadRecords(domain, out record, out result))
{
return(result);
}
if ((record.Terms == null) || (record.Terms.Count == 0))
{
return(SpfQualifier.Neutral);
}
if (record.Terms.OfType <SpfModifier>().GroupBy(m => m.Type).Where(g => (g.Key == SpfModifierType.Exp) || (g.Key == SpfModifierType.Redirect)).Any(g => g.Count() > 1))
{
return(SpfQualifier.PermError);
}
#region Evaluate mechanism
foreach (SpfMechanism mechanism in record.Terms.OfType <SpfMechanism>())
{
if (LookupCount > DnsLookupLimit)
{
return(SpfQualifier.PermError);
}
SpfQualifier qualifier = CheckMechanism(mechanism, ip, sender, domain);
if (qualifier != SpfQualifier.None)
{
result = qualifier;
break;
}
}
#endregion
#region Evaluate modifiers
if (result == SpfQualifier.None)
{
SpfModifier redirectModifier = record.Terms.OfType <SpfModifier>().FirstOrDefault(m => m.Type == SpfModifierType.Redirect);
if (redirectModifier != null)
{
string redirectDomain = ExpandDomain(redirectModifier.Domain ?? String.Empty, ip, sender, domain);
if (String.IsNullOrEmpty(redirectDomain) || (redirectDomain.Equals(domain, StringComparison.InvariantCultureIgnoreCase)))
{
result = SpfQualifier.PermError;
}
else
{
result = CheckHostInternal(ip, sender, redirectDomain, expandExplanation, out explanation);
if (result == SpfQualifier.None)
{
result = SpfQualifier.PermError;
}
}
}
}
else if ((result == SpfQualifier.Fail) && expandExplanation)
{
SpfModifier expModifier = record.Terms.OfType <SpfModifier>().Where(m => m.Type == SpfModifierType.Exp).FirstOrDefault();
if (expModifier != null)
{
string target = ExpandDomain(expModifier.Domain, ip, sender, domain);
if (String.IsNullOrEmpty(target))
{
explanation = String.Empty;
}
else
{
DnsMessage dnsMessage = ResolveDns(target, RecordType.Txt);
if ((dnsMessage != null) && (dnsMessage.ReturnCode == ReturnCode.NoError))
{
TxtRecord txtRecord = dnsMessage.AnswerRecords.OfType <TxtRecord>().FirstOrDefault();
if (txtRecord != null)
{
explanation = ExpandDomain(txtRecord.TextData, ip, sender, domain);
}
}
}
}
}
#endregion
return((result != SpfQualifier.None) ? result : SpfQualifier.Neutral);
}
internal static bool TryParse(string s, out SpfTerm value)
{
if (String.IsNullOrEmpty(s))
{
value = null;
return false;
}
#region Parse Mechanism
Match match = _parseMechanismRegex.Match(s);
if (match.Success)
{
SpfMechanism mechanism = new SpfMechanism();
switch (match.Groups["qualifier"].Value)
{
case "+":
mechanism.Qualifier = SpfQualifier.Pass;
break;
case "-":
mechanism.Qualifier = SpfQualifier.Fail;
break;
case "~":
mechanism.Qualifier = SpfQualifier.SoftFail;
break;
case "?":
mechanism.Qualifier = SpfQualifier.Neutral;
break;
default:
mechanism.Qualifier = SpfQualifier.Pass;
break;
}
SpfMechanismType type;
mechanism.Type = EnumHelper<SpfMechanismType>.TryParse(match.Groups["type"].Value, true, out type) ? type : SpfMechanismType.Unknown;
mechanism.Domain = match.Groups["domain"].Value;
string tmpPrefix = match.Groups["prefix"].Value;
int prefix;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix = prefix;
}
tmpPrefix = match.Groups["prefix6"].Value;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix6 = prefix;
}
value = mechanism;
return true;
}
#endregion
#region Parse Modifier
match = _parseModifierRegex.Match(s);
if (match.Success)
{
SpfModifier modifier = new SpfModifier();
SpfModifierType type;
modifier.Type = EnumHelper<SpfModifierType>.TryParse(match.Groups["type"].Value, true, out type) ? type : SpfModifierType.Unknown;
modifier.Domain = match.Groups["domain"].Value;
value = modifier;
return true;
}
#endregion
value = null;
return false;
}
internal static bool TryParse(string s, out SpfTerm value)
{
if (String.IsNullOrEmpty(s))
{
value = null;
return(false);
}
#region Parse Mechanism
Regex regex = new Regex(@"^(\s)*(?<qualifier>[~+?-]?)(?<type>[a-z]+)(:(?<domain>[^/]+))?(/(?<prefix>[0-9]+))?(//(?<prefix6>[0-9]+))?(\s)*$", RegexOptions.Compiled | RegexOptions.IgnoreCase);
Match match = regex.Match(s);
if (match.Success)
{
SpfMechanism mechanism = new SpfMechanism();
switch (match.Groups["qualifier"].Value)
{
case "+":
mechanism.Qualifier = SpfQualifier.Pass;
break;
case "-":
mechanism.Qualifier = SpfQualifier.Fail;
break;
case "~":
mechanism.Qualifier = SpfQualifier.SoftFail;
break;
case "?":
mechanism.Qualifier = SpfQualifier.Neutral;
break;
default:
mechanism.Qualifier = SpfQualifier.Pass;
break;
}
SpfMechanismType type;
mechanism.Type = EnumHelper <SpfMechanismType> .TryParse(match.Groups["type"].Value, true, out type) ? type : SpfMechanismType.Unknown;
mechanism.Domain = match.Groups["domain"].Value;
string tmpPrefix = match.Groups["prefix"].Value;
int prefix;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix = prefix;
}
tmpPrefix = match.Groups["prefix6"].Value;
if (!String.IsNullOrEmpty(tmpPrefix) && Int32.TryParse(tmpPrefix, out prefix))
{
mechanism.Prefix6 = prefix;
}
value = mechanism;
return(true);
}
#endregion
#region Parse Modifier
regex = new Regex(@"^(\s)*(?<type>[a-z]+)=(?<domain>[^\s]+)(\s)*$", RegexOptions.Compiled | RegexOptions.IgnoreCase);
match = regex.Match(s);
if (match.Success)
{
SpfModifier modifier = new SpfModifier();
SpfModifierType type;
modifier.Type = EnumHelper <SpfModifierType> .TryParse(match.Groups["type"].Value, true, out type) ? type : SpfModifierType.Unknown;
modifier.Domain = match.Groups["domain"].Value;
value = modifier;
return(true);
}
#endregion
value = null;
return(false);
}
internal SpfQualifier CheckHost(SpfCheckHostParameter parameters)
{
DnsMessage dnsMessage;
SpfMechanism spfMechanism = this as SpfMechanism;
if (spfMechanism != null)
{
switch (spfMechanism.Type)
{
case SpfMechanismType.All:
return(spfMechanism.Qualifier);
case SpfMechanismType.A:
bool?isAMatch = IsIpMatch(String.IsNullOrEmpty(spfMechanism.Domain) ? parameters.CurrentDomain : spfMechanism.Domain, parameters.ClientAddress, spfMechanism.Prefix, spfMechanism.Prefix6);
if (!isAMatch.HasValue)
{
return(SpfQualifier.TempError);
}
if (isAMatch.Value)
{
return(spfMechanism.Qualifier);
}
break;
case SpfMechanismType.Mx:
dnsMessage = DnsClient.Default.Resolve(ExpandDomain(String.IsNullOrEmpty(spfMechanism.Domain) ? parameters.CurrentDomain : spfMechanism.Domain, parameters), RecordType.Mx);
if ((dnsMessage == null) || ((dnsMessage.ReturnCode != ReturnCode.NoError) && (dnsMessage.ReturnCode != ReturnCode.NxDomain)))
{
return(SpfQualifier.TempError);
}
int mxCheckedCount = 0;
foreach (DnsRecordBase dnsRecord in dnsMessage.AnswerRecords)
{
MxRecord mxRecord = dnsRecord as MxRecord;
if (mxRecord != null)
{
if (++mxCheckedCount == 10)
{
break;
}
bool?isMxMatch = IsIpMatch(mxRecord.ExchangeDomainName, parameters.ClientAddress, spfMechanism.Prefix, spfMechanism.Prefix6);
if (!isMxMatch.HasValue)
{
return(SpfQualifier.TempError);
}
if (isMxMatch.Value)
{
return(spfMechanism.Qualifier);
}
}
}
break;
case SpfMechanismType.Ip4:
case SpfMechanismType.Ip6:
IPAddress compareAddress;
if (IPAddress.TryParse(spfMechanism.Domain, out compareAddress))
{
if (spfMechanism.Prefix.HasValue)
{
if (parameters.ClientAddress.GetNetworkAddress(spfMechanism.Prefix.Value).Equals(compareAddress.GetNetworkAddress(spfMechanism.Prefix.Value)))
{
return(spfMechanism.Qualifier);
}
}
else if (parameters.ClientAddress.Equals(compareAddress))
{
return(spfMechanism.Qualifier);
}
}
else
{
return(SpfQualifier.PermError);
}
break;
case SpfMechanismType.Ptr:
dnsMessage = DnsClient.Default.Resolve(parameters.ClientAddress.GetReverseLookupAddress(), RecordType.Ptr);
if ((dnsMessage == null) || ((dnsMessage.ReturnCode != ReturnCode.NoError) && (dnsMessage.ReturnCode != ReturnCode.NxDomain)))
{
return(SpfQualifier.TempError);
}
string ptrCompareName = String.IsNullOrEmpty(spfMechanism.Domain) ? parameters.CurrentDomain : spfMechanism.Domain;
int ptrCheckedCount = 0;
if ((from ptrRecord in dnsMessage.AnswerRecords.OfType <PtrRecord>().TakeWhile(ptrRecord => ++ ptrCheckedCount != 10)
let isPtrMatch = IsIpMatch(ptrRecord.PointerDomainName, parameters.ClientAddress, 0, 0)
where isPtrMatch.HasValue && isPtrMatch.Value
select ptrRecord).Any(ptrRecord => ptrRecord.PointerDomainName.Equals(ptrCompareName, StringComparison.InvariantCultureIgnoreCase) || (ptrRecord.PointerDomainName.EndsWith("." + ptrCompareName, StringComparison.InvariantCultureIgnoreCase))))
{
return(spfMechanism.Qualifier);
}
break;
case SpfMechanismType.Exist:
if (String.IsNullOrEmpty(spfMechanism.Domain))
{
return(SpfQualifier.PermError);
}
dnsMessage = DnsClient.Default.Resolve(ExpandDomain(spfMechanism.Domain, parameters), RecordType.A);
if ((dnsMessage == null) || ((dnsMessage.ReturnCode != ReturnCode.NoError) && (dnsMessage.ReturnCode != ReturnCode.NxDomain)))
{
return(SpfQualifier.TempError);
}
if (dnsMessage.AnswerRecords.Count(record => (record.RecordType == RecordType.A)) > 0)
{
return(spfMechanism.Qualifier);
}
break;
case SpfMechanismType.Include:
if (String.IsNullOrEmpty(spfMechanism.Domain))
{
return(SpfQualifier.PermError);
}
string includeDomain = ExpandDomain(spfMechanism.Domain, parameters);
switch (SpfRecord.CheckHost(includeDomain, new SpfCheckHostParameter(includeDomain, parameters)))
{
case SpfQualifier.Pass:
return(spfMechanism.Qualifier);
case SpfQualifier.Fail:
case SpfQualifier.SoftFail:
case SpfQualifier.Neutral:
return(SpfQualifier.None);
case SpfQualifier.TempError:
return(SpfQualifier.TempError);
case SpfQualifier.PermError:
case SpfQualifier.None:
return(SpfQualifier.PermError);
}
break;
default:
return(SpfQualifier.PermError);
}
}
SpfModifier spfModifier = this as SpfModifier;
if (spfModifier != null)
{
switch (spfModifier.Type)
{
case SpfModifierType.Redirect:
if (String.IsNullOrEmpty(spfModifier.Domain))
{
return(SpfQualifier.PermError);
}
string redirectDomain = ExpandDomain(spfModifier.Domain, parameters);
return(SpfRecord.CheckHost(redirectDomain, new SpfCheckHostParameter(redirectDomain, parameters)));
case SpfModifierType.Exp:
break;
default:
return(SpfQualifier.PermError);
}
}
return(SpfQualifier.None);
}
