[3733] | 1 | <?php |
---|
| 2 | |
---|
| 3 | /** |
---|
| 4 | * Given a <response><href>...</href><propstat><prop><someprop/></prop><status>HTTP/1.1 200 OK</status></propstat>...</response> |
---|
| 5 | * pull out the content of <someprop>content</someprop> and check to see if it has any href elements. If it *does* then |
---|
| 6 | * recurse into them, looking for the next deeper nesting of properties. |
---|
| 7 | */ |
---|
| 8 | function get_href_containers( &$multistatus_response ) { |
---|
| 9 | $propstat_set = $multistatus_response->GetElements('propstat'); |
---|
| 10 | $propstat_200 = null; |
---|
| 11 | foreach( $propstat_set AS $k => $v ) { |
---|
| 12 | $status = $v->GetElements('status'); |
---|
| 13 | if ( preg_match( '{^HTTP/\S+\s+200}', $status[0]->GetContent() ) ) { |
---|
| 14 | $propstat_200 = $v; |
---|
| 15 | break; |
---|
| 16 | } |
---|
| 17 | } |
---|
| 18 | if ( isset($propstat_200) ) { |
---|
| 19 | $props = $propstat_200->GetElements('prop'); |
---|
| 20 | $properties = array(); |
---|
| 21 | foreach( $props AS $k => $p ) { |
---|
| 22 | $properties = array_merge($properties,$p->GetElements()); |
---|
| 23 | } |
---|
| 24 | $href_containers = array(); |
---|
| 25 | foreach( $properties AS $k => $property ) { |
---|
| 26 | if ( !is_object($property) ) continue; |
---|
| 27 | // dbg_error_log('REPORT',' get_href_containers: Checking property "%s" for hrefs.', $property->GetNSTag() ); |
---|
| 28 | $hrefs = $property->GetElements('href'); |
---|
| 29 | if ( count($hrefs) > 0 ) { |
---|
| 30 | $href_containers[] = $property; |
---|
| 31 | } |
---|
| 32 | } |
---|
| 33 | if ( count($href_containers) > 0 ) { |
---|
| 34 | return $href_containers; |
---|
| 35 | } |
---|
| 36 | } |
---|
| 37 | return null; |
---|
| 38 | } |
---|
| 39 | |
---|
| 40 | |
---|
| 41 | /** |
---|
| 42 | * Expand the properties, recursing only once |
---|
| 43 | */ |
---|
| 44 | function expand_properties( $urls, $ptree, &$reply, $recurse_again = true ) { |
---|
| 45 | if ( !is_array($urls) ) $urls = array($urls); |
---|
| 46 | if ( !is_array($ptree) ) $ptree = array($ptree); |
---|
| 47 | |
---|
| 48 | $responses = array(); |
---|
| 49 | foreach( $urls AS $m => $url ) { |
---|
| 50 | $resource = new DAVResource($url); |
---|
| 51 | $props = array(); |
---|
| 52 | $subtrees = array(); |
---|
| 53 | foreach( $ptree AS $n => $property ) { |
---|
| 54 | if ( ! is_object($property) ) continue; |
---|
| 55 | $pname = $property->GetAttribute('name'); |
---|
| 56 | $pns = $property->GetAttribute('namespace'); |
---|
| 57 | if ( !isset($pns) || $pns == '' ) $pns = 'DAV:'; // Not sure if this is the correct way to default this. |
---|
| 58 | $pname = $pns .':'. $pname; |
---|
| 59 | $props[] = $pname; |
---|
| 60 | $subtrees[$pname] = $property->GetElements(); |
---|
| 61 | } |
---|
| 62 | $part_response = $resource->RenderAsXML( $props, $reply ); |
---|
| 63 | if ( isset($part_response) ) { |
---|
| 64 | if ( $recurse_again ) { |
---|
| 65 | $href_containers = get_href_containers($part_response); |
---|
| 66 | if ( isset($href_containers) ) { |
---|
| 67 | foreach( $href_containers AS $h => $property ) { |
---|
| 68 | $hrefs = $property->GetElements(); |
---|
| 69 | $pname = $property->GetTag(); |
---|
| 70 | $pns = $property->GetAttribute('xmlns'); |
---|
| 71 | if ( !isset($pns) || $pns == '' ) $pns = 'DAV:'; // Not sure if this is the correct way to default this. |
---|
| 72 | $pname = $pns .':'. $pname; |
---|
| 73 | $paths = array(); |
---|
| 74 | foreach( $hrefs AS $k => $v ) { |
---|
| 75 | $content = $v->GetContent(); |
---|
| 76 | $paths[] = $content; |
---|
| 77 | } |
---|
| 78 | // dbg_error_log('REPORT',' Found property "%s" contains hrefs "%s"', $pname, implode(', ',$paths) ); |
---|
| 79 | $property->SetContent( expand_properties($paths, $subtrees[$pname], $reply, false) ); |
---|
| 80 | } |
---|
| 81 | } |
---|
| 82 | // else { |
---|
| 83 | // dbg_error_log('REPORT',' No href containers in response to "%s"', implode(', ', $props ) ); |
---|
| 84 | // } |
---|
| 85 | } |
---|
| 86 | $responses[] = $part_response; |
---|
| 87 | } |
---|
| 88 | } |
---|
| 89 | |
---|
| 90 | return $responses; |
---|
| 91 | } |
---|
| 92 | |
---|
| 93 | |
---|
| 94 | /** |
---|
| 95 | * Build the array of properties to include in the report output |
---|
| 96 | */ |
---|
| 97 | $property_tree = $xmltree->GetPath('/DAV::expand-property/DAV::property'); |
---|
| 98 | |
---|
| 99 | $multistatus = new XMLElement( "multistatus", expand_properties( $request->path, $property_tree, $reply), $reply->GetXmlNsArray() ); |
---|
| 100 | |
---|
| 101 | $request->XMLResponse( 207, $multistatus ); |
---|