4 * Copyright (C) 2006 Hans Leidekker
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
26 const char *dns_type_to_str( unsigned short type
)
30 #define X(x) case (x): return #x;
88 default: { static char tmp
[7]; sprintf( tmp
, "0x%04x", type
); return tmp
; }
92 static int dns_strcmpX( LPCVOID str1
, LPCVOID str2
, BOOL wide
)
95 return lstrcmpiW( str1
, str2
);
97 return lstrcmpiA( str1
, str2
);
100 /******************************************************************************
101 * DnsRecordCompare [DNSAPI.@]
104 BOOL WINAPI
DnsRecordCompare( PDNS_RECORD r1
, PDNS_RECORD r2
)
109 DPRINT( "(%p,%p)\n", r1
, r2
);
111 if (r1
->wType
!= r2
->wType
||
112 r1
->wDataLength
!= r2
->wDataLength
||
113 r1
->Flags
.S
.Section
!= r2
->Flags
.S
.Section
||
114 r1
->Flags
.S
.Delete
!= r2
->Flags
.S
.Delete
||
115 r1
->Flags
.S
.Unused
!= r2
->Flags
.S
.Unused
||
116 r1
->Flags
.S
.Reserved
!= r2
->Flags
.S
.Reserved
||
117 r1
->dwReserved
!= r2
->dwReserved
) return FALSE
;
119 wide
= (r1
->Flags
.S
.CharSet
== DnsCharSetUnicode
|| r1
->Flags
.S
.CharSet
== DnsCharSetUnknown
);
120 if (dns_strcmpX( r1
->pName
, r2
->pName
, wide
)) return FALSE
;
126 if (r1
->Data
.A
.IpAddress
!= r2
->Data
.A
.IpAddress
) return FALSE
;
131 if (r1
->Data
.SOA
.dwSerialNo
!= r2
->Data
.SOA
.dwSerialNo
||
132 r1
->Data
.SOA
.dwRefresh
!= r2
->Data
.SOA
.dwRefresh
||
133 r1
->Data
.SOA
.dwRetry
!= r2
->Data
.SOA
.dwRetry
||
134 r1
->Data
.SOA
.dwExpire
!= r2
->Data
.SOA
.dwExpire
||
135 r1
->Data
.SOA
.dwDefaultTtl
!= r2
->Data
.SOA
.dwDefaultTtl
)
137 if (dns_strcmpX( r1
->Data
.SOA
.pNamePrimaryServer
,
138 r2
->Data
.SOA
.pNamePrimaryServer
, wide
) ||
139 dns_strcmpX( r1
->Data
.SOA
.pNameAdministrator
,
140 r2
->Data
.SOA
.pNameAdministrator
, wide
))
153 if (dns_strcmpX( r1
->Data
.PTR
.pNameHost
,
154 r2
->Data
.PTR
.pNameHost
, wide
)) return FALSE
;
160 if (dns_strcmpX( r1
->Data
.MINFO
.pNameMailbox
,
161 r2
->Data
.MINFO
.pNameMailbox
, wide
) ||
162 dns_strcmpX( r1
->Data
.MINFO
.pNameErrorsMailbox
,
163 r2
->Data
.MINFO
.pNameErrorsMailbox
, wide
))
171 if (r1
->Data
.MX
.wPreference
!= r2
->Data
.MX
.wPreference
)
173 if (dns_strcmpX( r1
->Data
.MX
.pNameExchange
,
174 r2
->Data
.MX
.pNameExchange
, wide
))
183 if (r1
->Data
.TXT
.dwStringCount
!= r2
->Data
.TXT
.dwStringCount
)
185 for (i
= 0; i
< r1
->Data
.TXT
.dwStringCount
; i
++)
187 if (dns_strcmpX( r1
->Data
.TXT
.pStringArray
[i
],
188 r2
->Data
.TXT
.pStringArray
[i
], wide
))
195 if (r1
->Data
.Null
.dwByteCount
!= r2
->Data
.Null
.dwByteCount
)
197 if (memcmp( r1
->Data
.Null
.Data
,
198 r2
->Data
.Null
.Data
, r1
->Data
.Null
.dwByteCount
))
204 for (i
= 0; i
< sizeof(IP6_ADDRESS
)/sizeof(DWORD
); i
++)
206 if (r1
->Data
.AAAA
.Ip6Address
.IP6Dword
[i
] !=
207 r2
->Data
.AAAA
.Ip6Address
.IP6Dword
[i
]) return FALSE
;
213 if (r1
->Data
.KEY
.wFlags
!= r2
->Data
.KEY
.wFlags
||
214 r1
->Data
.KEY
.chProtocol
!= r2
->Data
.KEY
.chProtocol
||
215 r1
->Data
.KEY
.chAlgorithm
!= r2
->Data
.KEY
.chAlgorithm
)
217 if (memcmp( r1
->Data
.KEY
.Key
, r2
->Data
.KEY
.Key
,
218 r1
->wDataLength
- sizeof(DNS_KEY_DATA
) + 1 ))
224 if (dns_strcmpX( r1
->Data
.SIG
.pNameSigner
,
225 r2
->Data
.SIG
.pNameSigner
, wide
))
227 if (r1
->Data
.SIG
.wTypeCovered
!= r2
->Data
.SIG
.wTypeCovered
||
228 r1
->Data
.SIG
.chAlgorithm
!= r2
->Data
.SIG
.chAlgorithm
||
229 r1
->Data
.SIG
.chLabelCount
!= r2
->Data
.SIG
.chLabelCount
||
230 r1
->Data
.SIG
.dwOriginalTtl
!= r2
->Data
.SIG
.dwOriginalTtl
||
231 r1
->Data
.SIG
.dwExpiration
!= r2
->Data
.SIG
.dwExpiration
||
232 r1
->Data
.SIG
.dwTimeSigned
!= r2
->Data
.SIG
.dwTimeSigned
||
233 r1
->Data
.SIG
.wKeyTag
!= r2
->Data
.SIG
.wKeyTag
)
235 if (memcmp( r1
->Data
.SIG
.Signature
, r2
->Data
.SIG
.Signature
,
236 r1
->wDataLength
- sizeof(DNS_SIG_DATAA
) + 1 ))
242 if (r1
->Data
.ATMA
.AddressType
!= r2
->Data
.ATMA
.AddressType
)
244 for (i
= 0; i
< DNS_ATMA_MAX_ADDR_LENGTH
; i
++)
246 if (r1
->Data
.ATMA
.Address
[i
] != r2
->Data
.ATMA
.Address
[i
])
253 if (dns_strcmpX( r1
->Data
.NXT
.pNameNext
,
254 r2
->Data
.NXT
.pNameNext
, wide
)) return FALSE
;
255 if (r1
->Data
.NXT
.wNumTypes
!= r2
->Data
.NXT
.wNumTypes
) return FALSE
;
256 if (memcmp( r1
->Data
.NXT
.wTypes
, r2
->Data
.NXT
.wTypes
,
257 r1
->wDataLength
- sizeof(DNS_NXT_DATAA
) + sizeof(WORD
) ))
263 if (dns_strcmpX( r1
->Data
.SRV
.pNameTarget
,
264 r2
->Data
.SRV
.pNameTarget
, wide
)) return FALSE
;
265 if (r1
->Data
.SRV
.wPriority
!= r2
->Data
.SRV
.wPriority
||
266 r1
->Data
.SRV
.wWeight
!= r2
->Data
.SRV
.wWeight
||
267 r1
->Data
.SRV
.wPort
!= r2
->Data
.SRV
.wPort
)
273 if (dns_strcmpX( r1
->Data
.TKEY
.pNameAlgorithm
,
274 r2
->Data
.TKEY
.pNameAlgorithm
, wide
))
276 if (r1
->Data
.TKEY
.dwCreateTime
!= r2
->Data
.TKEY
.dwCreateTime
||
277 r1
->Data
.TKEY
.dwExpireTime
!= r2
->Data
.TKEY
.dwExpireTime
||
278 r1
->Data
.TKEY
.wMode
!= r2
->Data
.TKEY
.wMode
||
279 r1
->Data
.TKEY
.wError
!= r2
->Data
.TKEY
.wError
||
280 r1
->Data
.TKEY
.wKeyLength
!= r2
->Data
.TKEY
.wKeyLength
||
281 r1
->Data
.TKEY
.wOtherLength
!= r2
->Data
.TKEY
.wOtherLength
||
282 r1
->Data
.TKEY
.cAlgNameLength
!= r2
->Data
.TKEY
.cAlgNameLength
||
283 r1
->Data
.TKEY
.bPacketPointers
!= r2
->Data
.TKEY
.bPacketPointers
)
286 /* FIXME: ignoring pAlgorithmPacket field */
287 if (memcmp( r1
->Data
.TKEY
.pKey
, r2
->Data
.TKEY
.pKey
,
288 r1
->Data
.TKEY
.wKeyLength
) ||
289 memcmp( r1
->Data
.TKEY
.pOtherData
, r2
->Data
.TKEY
.pOtherData
,
290 r1
->Data
.TKEY
.wOtherLength
)) return FALSE
;
295 if (dns_strcmpX( r1
->Data
.TSIG
.pNameAlgorithm
,
296 r2
->Data
.TSIG
.pNameAlgorithm
, wide
))
298 if (r1
->Data
.TSIG
.i64CreateTime
!= r2
->Data
.TSIG
.i64CreateTime
||
299 r1
->Data
.TSIG
.wFudgeTime
!= r2
->Data
.TSIG
.wFudgeTime
||
300 r1
->Data
.TSIG
.wOriginalXid
!= r2
->Data
.TSIG
.wOriginalXid
||
301 r1
->Data
.TSIG
.wError
!= r2
->Data
.TSIG
.wError
||
302 r1
->Data
.TSIG
.wSigLength
!= r2
->Data
.TSIG
.wSigLength
||
303 r1
->Data
.TSIG
.wOtherLength
!= r2
->Data
.TSIG
.wOtherLength
||
304 r1
->Data
.TSIG
.cAlgNameLength
!= r2
->Data
.TSIG
.cAlgNameLength
||
305 r1
->Data
.TSIG
.bPacketPointers
!= r2
->Data
.TSIG
.bPacketPointers
)
308 /* FIXME: ignoring pAlgorithmPacket field */
309 if (memcmp( r1
->Data
.TSIG
.pSignature
, r2
->Data
.TSIG
.pSignature
,
310 r1
->Data
.TSIG
.wSigLength
) ||
311 memcmp( r1
->Data
.TSIG
.pOtherData
, r2
->Data
.TSIG
.pOtherData
,
312 r1
->Data
.TSIG
.wOtherLength
)) return FALSE
;
317 if (r1
->Data
.WINS
.dwMappingFlag
!= r2
->Data
.WINS
.dwMappingFlag
||
318 r1
->Data
.WINS
.dwLookupTimeout
!= r2
->Data
.WINS
.dwLookupTimeout
||
319 r1
->Data
.WINS
.dwCacheTimeout
!= r2
->Data
.WINS
.dwCacheTimeout
||
320 r1
->Data
.WINS
.cWinsServerCount
!= r2
->Data
.WINS
.cWinsServerCount
)
322 if (memcmp( r1
->Data
.WINS
.WinsServers
, r2
->Data
.WINS
.WinsServers
,
323 r1
->wDataLength
- sizeof(DNS_WINS_DATA
) + sizeof(IP4_ADDRESS
) ))
329 if (r1
->Data
.WINSR
.dwMappingFlag
!= r2
->Data
.WINSR
.dwMappingFlag
||
330 r1
->Data
.WINSR
.dwLookupTimeout
!= r2
->Data
.WINSR
.dwLookupTimeout
||
331 r1
->Data
.WINSR
.dwCacheTimeout
!= r2
->Data
.WINSR
.dwCacheTimeout
)
333 if (dns_strcmpX( r1
->Data
.WINSR
.pNameResultDomain
,
334 r2
->Data
.WINSR
.pNameResultDomain
, wide
))
339 DPRINT1( "unknown type: %s\n", dns_type_to_str( r1
->wType
) );
345 static LPVOID
dns_strcpyX( LPCVOID src
, DNS_CHARSET in
, DNS_CHARSET out
)
349 case DnsCharSetUnicode
:
353 case DnsCharSetUnicode
: return dns_strdup_w( src
);
354 case DnsCharSetUtf8
: return dns_strdup_wu( src
);
355 case DnsCharSetAnsi
: return dns_strdup_wa( src
);
357 DPRINT1( "unhandled target charset: %d\n", out
);
365 case DnsCharSetUnicode
: return dns_strdup_uw( src
);
366 case DnsCharSetUtf8
: return dns_strdup_u( src
);
367 case DnsCharSetAnsi
: return dns_strdup_ua( src
);
369 DPRINT1( "unhandled target charset: %d\n", out
);
376 case DnsCharSetUnicode
: return dns_strdup_aw( src
);
377 case DnsCharSetUtf8
: return dns_strdup_au( src
);
378 case DnsCharSetAnsi
: return dns_strdup_a( src
);
380 DPRINT1( "unhandled target charset: %d\n", out
);
385 DPRINT1( "unhandled source charset: %d\n", in
);
391 /******************************************************************************
392 * DnsRecordCopyEx [DNSAPI.@]
395 PDNS_RECORD WINAPI
DnsRecordCopyEx( PDNS_RECORD src
, DNS_CHARSET in
, DNS_CHARSET out
)
398 unsigned int i
, size
;
400 DPRINT( "(%p,%d,%d)\n", src
, in
, out
);
402 size
= FIELD_OFFSET(DNS_RECORD
, Data
) + src
->wDataLength
;
403 dst
= HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY
, size
);
404 if (!dst
) return NULL
;
406 memcpy( dst
, src
, size
);
408 if (src
->Flags
.S
.CharSet
== DnsCharSetUtf8
||
409 src
->Flags
.S
.CharSet
== DnsCharSetAnsi
||
410 src
->Flags
.S
.CharSet
== DnsCharSetUnicode
) in
= src
->Flags
.S
.CharSet
;
412 dst
->Flags
.S
.CharSet
= out
;
413 dst
->pName
= dns_strcpyX( src
->pName
, in
, out
);
414 if (!dst
->pName
) goto error
;
423 for (i
= 0; i
< src
->Data
.TXT
.dwStringCount
; i
++)
425 dst
->Data
.TXT
.pStringArray
[i
] =
426 dns_strcpyX( src
->Data
.TXT
.pStringArray
[i
], in
, out
);
428 if (!dst
->Data
.TXT
.pStringArray
[i
])
430 while (i
> 0) HeapFree( GetProcessHeap(), 0, dst
->Data
.TXT
.pStringArray
[--i
] );
439 dst
->Data
.MINFO
.pNameMailbox
=
440 dns_strcpyX( src
->Data
.MINFO
.pNameMailbox
, in
, out
);
441 if (!dst
->Data
.MINFO
.pNameMailbox
) goto error
;
443 dst
->Data
.MINFO
.pNameErrorsMailbox
=
444 dns_strcpyX( src
->Data
.MINFO
.pNameErrorsMailbox
, in
, out
);
445 if (!dst
->Data
.MINFO
.pNameErrorsMailbox
)
447 HeapFree( GetProcessHeap(), 0, dst
->Data
.MINFO
.pNameMailbox
);
456 dst
->Data
.MX
.pNameExchange
=
457 dns_strcpyX( src
->Data
.MX
.pNameExchange
, in
, out
);
458 if (!dst
->Data
.MX
.pNameExchange
) goto error
;
463 dst
->Data
.NXT
.pNameNext
=
464 dns_strcpyX( src
->Data
.NXT
.pNameNext
, in
, out
);
465 if (!dst
->Data
.NXT
.pNameNext
) goto error
;
477 dst
->Data
.PTR
.pNameHost
=
478 dns_strcpyX( src
->Data
.PTR
.pNameHost
, in
, out
);
479 if (!dst
->Data
.PTR
.pNameHost
) goto error
;
484 dst
->Data
.SIG
.pNameSigner
=
485 dns_strcpyX( src
->Data
.SIG
.pNameSigner
, in
, out
);
486 if (!dst
->Data
.SIG
.pNameSigner
) goto error
;
491 dst
->Data
.SOA
.pNamePrimaryServer
=
492 dns_strcpyX( src
->Data
.SOA
.pNamePrimaryServer
, in
, out
);
493 if (!dst
->Data
.SOA
.pNamePrimaryServer
) goto error
;
495 dst
->Data
.SOA
.pNameAdministrator
=
496 dns_strcpyX( src
->Data
.SOA
.pNameAdministrator
, in
, out
);
497 if (!dst
->Data
.SOA
.pNameAdministrator
)
499 HeapFree( GetProcessHeap(), 0, dst
->Data
.SOA
.pNamePrimaryServer
);
506 dst
->Data
.SRV
.pNameTarget
=
507 dns_strcpyX( src
->Data
.SRV
.pNameTarget
, in
, out
);
508 if (!dst
->Data
.SRV
.pNameTarget
) goto error
;
517 HeapFree( GetProcessHeap(), 0, dst
->pName
);
518 HeapFree( GetProcessHeap(), 0, dst
);
522 /******************************************************************************
523 * DnsRecordListFree [DNSAPI.@]
526 VOID WINAPI
DnsRecordListFree( PDNS_RECORD list
, DNS_FREE_TYPE type
)
528 DNS_RECORD
*r
, *next
;
531 DPRINT( "(%p,%d)\n", list
, type
);
537 case DnsFreeRecordList
:
539 for (r
= list
; (list
= r
); r
= next
)
541 HeapFree( GetProcessHeap(), 0, r
->pName
);
550 for (i
= 0; i
< r
->Data
.TXT
.dwStringCount
; i
++)
551 HeapFree( GetProcessHeap(), 0, r
->Data
.TXT
.pStringArray
[i
] );
558 HeapFree( GetProcessHeap(), 0, r
->Data
.MINFO
.pNameMailbox
);
559 HeapFree( GetProcessHeap(), 0, r
->Data
.MINFO
.pNameErrorsMailbox
);
566 HeapFree( GetProcessHeap(), 0, r
->Data
.MX
.pNameExchange
);
571 HeapFree( GetProcessHeap(), 0, r
->Data
.NXT
.pNameNext
);
583 HeapFree( GetProcessHeap(), 0, r
->Data
.PTR
.pNameHost
);
588 HeapFree( GetProcessHeap(), 0, r
->Data
.SIG
.pNameSigner
);
593 HeapFree( GetProcessHeap(), 0, r
->Data
.SOA
.pNamePrimaryServer
);
594 HeapFree( GetProcessHeap(), 0, r
->Data
.SOA
.pNameAdministrator
);
599 HeapFree( GetProcessHeap(), 0, r
->Data
.SRV
.pNameTarget
);
607 HeapFree( GetProcessHeap(), 0, r
);
612 case DnsFreeParsedMessageFields
:
614 DPRINT1( "unhandled free type: %d\n", type
);
618 DPRINT1( "unknown free type: %d\n", type
);
623 /******************************************************************************
624 * DnsRecordSetCompare [DNSAPI.@]
627 BOOL WINAPI
DnsRecordSetCompare( PDNS_RECORD set1
, PDNS_RECORD set2
,
628 PDNS_RECORD
*diff1
, PDNS_RECORD
*diff2
)
631 DNS_RECORD
*r
, *t
, *u
;
634 DPRINT( "(%p,%p,%p,%p)\n", set1
, set2
, diff1
, diff2
);
636 if (!set1
&& !set2
) return FALSE
;
638 if (diff1
) *diff1
= NULL
;
639 if (diff2
) *diff2
= NULL
;
643 if (diff1
) *diff1
= DnsRecordSetCopyEx( set1
, 0, set1
->Flags
.S
.CharSet
);
648 if (diff2
) *diff2
= DnsRecordSetCopyEx( set2
, 0, set2
->Flags
.S
.CharSet
);
652 DNS_RRSET_INIT( rr1
);
653 DNS_RRSET_INIT( rr2
);
655 for (r
= set1
; r
; r
= r
->pNext
)
657 for (t
= set2
; t
; t
= t
->pNext
)
659 u
= DnsRecordCopyEx( r
, r
->Flags
.S
.CharSet
, t
->Flags
.S
.CharSet
);
662 if (!DnsRecordCompare( t
, u
))
664 DNS_RRSET_ADD( rr1
, u
);
667 else DnsRecordListFree( u
, DnsFreeRecordList
);
671 for (t
= set2
; t
; t
= t
->pNext
)
673 for (r
= set1
; r
; r
= r
->pNext
)
675 u
= DnsRecordCopyEx( t
, t
->Flags
.S
.CharSet
, r
->Flags
.S
.CharSet
);
678 if (!DnsRecordCompare( r
, u
))
680 DNS_RRSET_ADD( rr2
, u
);
683 else DnsRecordListFree( u
, DnsFreeRecordList
);
687 DNS_RRSET_TERMINATE( rr1
);
688 DNS_RRSET_TERMINATE( rr2
);
690 if (diff1
) *diff1
= rr1
.pFirstRR
;
691 else DnsRecordListFree( rr1
.pFirstRR
, DnsFreeRecordList
);
693 if (diff2
) *diff2
= rr2
.pFirstRR
;
694 else DnsRecordListFree( rr2
.pFirstRR
, DnsFreeRecordList
);
699 DNS_RRSET_TERMINATE( rr1
);
700 DNS_RRSET_TERMINATE( rr2
);
702 DnsRecordListFree( rr1
.pFirstRR
, DnsFreeRecordList
);
703 DnsRecordListFree( rr2
.pFirstRR
, DnsFreeRecordList
);
708 /******************************************************************************
709 * DnsRecordSetCopyEx [DNSAPI.@]
712 PDNS_RECORD WINAPI
DnsRecordSetCopyEx( PDNS_RECORD src_set
, DNS_CHARSET in
, DNS_CHARSET out
)
715 DNS_RECORD
*src
, *dst
;
717 DPRINT( "(%p,%d,%d)\n", src_set
, in
, out
);
719 DNS_RRSET_INIT( dst_set
);
721 for (src
= src_set
; (src_set
= src
); src
= src_set
->pNext
)
723 dst
= DnsRecordCopyEx( src
, in
, out
);
726 DNS_RRSET_TERMINATE( dst_set
);
727 DnsRecordListFree( dst_set
.pFirstRR
, DnsFreeRecordList
);
730 DNS_RRSET_ADD( dst_set
, dst
);
733 DNS_RRSET_TERMINATE( dst_set
);
734 return dst_set
.pFirstRR
;
737 /******************************************************************************
738 * DnsRecordSetDetach [DNSAPI.@]
741 PDNS_RECORD WINAPI
DnsRecordSetDetach( PDNS_RECORD set
)
745 DPRINT( "(%p)\n", set
);
747 for (r
= set
; (set
= r
); r
= set
->pNext
)
749 if (r
->pNext
&& !r
->pNext
->pNext
)