Net-DAV-Server-1.305/t/server_propfind.t

117     my $xpc = get_xml_context( $resp->content );
118     has_text( $xpc, '/D:multistatus/D:response/D:href', "$path/", "$label: Path is correct" );
119 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
120     has_nodes( $xpc,
125     like_text( $xpc,
130     has_node( $xpc,
134     hasnt_node( $xpc,
138     has_text( $xpc,
143     like_text( $xpc,
148     has_node( $xpc,
168     my $xpc = get_xml_context( $resp->content );
169     has_text( $xpc, '/D:multistatus/D:response/D:href', "$path/", "$label: Path is correct" );
170 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
171     has_nodes( $xpc,
176     like_text( $xpc,
181     has_node( $xpc,
185     hasnt_node( $xpc,
189     has_text( $xpc,
194     like_text( $xpc,
199     has_node( $xpc,
219     my $xpc = get_xml_context( $resp->content );
220     has_text( $xpc, '/D:multistatus/D:response/D:href', "$path/", "$label: Path is correct" );
221 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
222     has_nodes( $xpc,
240     my $xpc = get_xml_context( $resp->content );
241     has_text( $xpc, '/D:multistatus/D:response/D:href', $path, "$label: Path is correct" );
242 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
243     has_node( $xpc,
247     like_text( $xpc,
265     my $xpc = get_xml_context( $resp->content );
266 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
267     has_node( $xpc,
284     my $xpc = get_xml_context( $resp->content );
285 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
286     has_node( $xpc,
290 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:prop/D:getcontenttype', 'httpd/unix-direct…
304     my $xpc = get_xml_context( $resp->content );
305 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
306     has_node( $xpc,
310     like_text( $xpc,
328     my $xpc = get_xml_context( $resp->content );
329 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
330     has_node( $xpc,
347     my $xpc = get_xml_context( $resp->content );
348 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
349     has_node( $xpc,
366     my $xpc = get_xml_context( $resp->content );
367 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
368     has_node( $xpc,
372     has_node( $xpc,
376     hasnt_node( $xpc,
393     my $xpc = get_xml_context( $resp->content );
394     $xpc->registerNs( 'i0', 'GWJ:' );
395 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 404 Not Found', "$label…
396     has_node( $xpc,
413     my $xpc = get_xml_context( $resp->content );
414 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 404 Not Found', "$label…
430     my $xpc = get_xml_context( $resp->content );
431     has_text( $xpc, '/D:multistatus/D:response/D:href', $path, "$label: Path is correct" );
432 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
433     has_nodes( $xpc,
438     like_text( $xpc,
443     has_node( $xpc,
447     hasnt_node( $xpc,
451     has_text( $xpc,
456     like_text( $xpc,
461     has_text( $xpc,
482     my $xpc = get_xml_context( $resp->content );
483     has_text( $xpc, '/D:multistatus/D:response/D:href', $path, "$label: Path is correct" );
484 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
485     has_nodes( $xpc,
490     like_text( $xpc,
495     has_node( $xpc,
499     hasnt_node( $xpc,
503     has_text( $xpc,
508     like_text( $xpc,
513     has_text( $xpc,
534     my $xpc = get_xml_context( $resp->content );
535     has_text( $xpc, '/D:multistatus/D:response/D:href', $path, "$label: Path is correct" );
536 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
537     has_nodes( $xpc,
555     my $xpc = get_xml_context( $resp->content );
556 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
557     has_node( $xpc,
561     like_text( $xpc,
579     my $xpc = get_xml_context( $resp->content );
580 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
581     has_node( $xpc,
585     has_text( $xpc,
603     my $xpc = get_xml_context( $resp->content );
604 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
605     has_node( $xpc,
609 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:prop/D:getcontenttype', 'httpd/unix-file',…
623     my $xpc = get_xml_context( $resp->content );
624 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
625     has_node( $xpc,
629     like_text( $xpc,
647     my $xpc = get_xml_context( $resp->content );
648 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
649     has_node( $xpc,
666     my $xpc = get_xml_context( $resp->content );
667 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
668     has_node( $xpc,
685     my $xpc = get_xml_context( $resp->content );
686 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
687     has_node( $xpc,
691     hasnt_node( $xpc,
708     my $xpc = get_xml_context( $resp->content );
709 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 404 Not Found', "$label…
724     my $xpc = get_xml_context( $resp->content );
725     has_text( $xpc, '/D:multistatus/D:response/D:href', $uripath, "$label: Path is correct" );
726 …has_text( $xpc, '/D:multistatus/D:response/D:propstat/D:status', 'HTTP/1.1 200 OK', "$label: Statu…
727     has_nodes( $xpc,
732     like_text( $xpc,
737     has_node( $xpc,
741     hasnt_node( $xpc,
745     has_text( $xpc,
750     like_text( $xpc,
755     has_text( $xpc,
774     my $xpc = get_xml_context( $resp->content );
785     has_texts( $xpc, '/D:multistatus/D:response/D:href', \@expected, "$label: Status is correct" );
806     my $xpc = XML::LibXML::XPathContext->new( $doc );
807     $xpc->registerNs( 'D', 'DAV:' );
808     return $xpc;
812     my ($xpc, $xpath, $expect, $label) = @_;
814     my @nodes = $xpc->findnodes( "$xpath/text()" );
823     my ($xpc, $xpath, $expect, $label) = @_;
824     my @nodes = $xpc->findnodes( "$xpath/text()" );
833     my ($xpc, $xpath, $expect, $label) = @_;
834     my @nodes = map { $_->data } $xpc->findnodes( "$xpath/text()" );
843     my ($xpc, $xpath, $tags, $label) = @_;
844     my @nodes = map { $_->localname } $xpc->findnodes( "$xpath/D:*" );
853     my ($xpc, $xpath, $label) = @_;
854     my @nodes = $xpc->findnodes( $xpath );
859     my ($xpc, $xpath, $label) = @_;
860     my @nodes = $xpc->findnodes( $xpath );