xml_decode() - Code Metrics - rozhuk-im/ssdpd - Measure and Improve Code Quality continuously with Scrutinizer

xml_decode() A
last analyzed 2025-02-16 22:43 UTC

↳ Parent: Project
Complexity

Conditions	1
Paths	1
Size

Total Lines	6
Code Lines	4
Duplication

Lines	0
Ratio	0 %
Importance

Changes	2
Bugs	0	Features	0
Metric	Value
cc	1
eloc	4
c	2
b	0
f	0
nc	1
nop	1
dl	0
loc	6
rs	10
<?php 
/*-
 * Copyright (c) 2013 - 2021 Rozhuk Ivan <[email protected]>
 * All rights reserved.
 * 
 * Subject to the following obligations and disclaimer of warranty, use and
 * redistribution of this software, in source or object code forms, with or
 * without modifications are expressly permitted by Whistle Communications;
 * provided, however, that:
 * 1. Any and all reproductions of the source or object code must include the
 *    copyright notice above and the following disclaimer of warranties; and
 * 2. No rights are granted, in any manner or form, to use Whistle
 *    Communications, Inc. trademarks, including the mark "WHISTLE
 *    COMMUNICATIONS" on advertising, endorsements, or otherwise except as
 *    such appears in the above copyright notice or in the software.
 * 
 * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND
 * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO
 * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE,
 * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT.
 * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY
 * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS
 * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE.
 * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES
 * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING
 * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
 * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY
 * OF SUCH DAMAGE.
 *
 * Author: Rozhuk Ivan <[email protected]>
 *
 */

/* xml-SOAP MediaServer/ContentDirectory:3 for UPnP/DLNA */
/* http://upnp.org/specs/av/UPnP-av-ContentDirectory-v3-Service.pdf */

 
/* Config.*/
$basedir = dirname(__FILE__).'/../../upnpdata'; /* File system path. */
$baseurl = '/upnpdata'; /* WEB URL path. */

date_default_timezone_set('UTC');


/* File types. */
$file_class = array(
	'm3u' => 'object.container.storageFolder',
	'xspf' => 'object.container.storageFolder',
	'xml' => 'object.container.storageFolder',

	'bmp' => 'object.item.imageItem.photo',
	'gif' => 'object.item.imageItem.photo',
	'ico' => 'object.item.imageItem.photo',
	'png' => 'object.item.imageItem.photo',
	'jpe' => 'object.item.imageItem.photo',
	'jpg' => 'object.item.imageItem.photo',
	'jpeg' => 'object.item.imageItem.photo',
	'tif' => 'object.item.imageItem.photo',
	'tiff' => 'object.item.imageItem.photo',
	'svg' => 'object.item.imageItem.photo',
	'svgz' => 'object.item.imageItem.photo',

	'flac' => 'object.item.audioItem.musicTrack',
	'mp3' => 'object.item.audioItem.musicTrack', 
	'wav' => 'object.item.audioItem.musicTrack',
	'wma' => 'object.item.audioItem.musicTrack',

	'flv' => 'object.item.videoItem',
	'f4v' => 'object.item.videoItem',
	'3g2' => 'object.item.videoItem',
	'3gp' => 'object.item.videoItem',
	'3gp2' => 'object.item.videoItem',
	'3gpp' => 'object.item.videoItem',
	'asf' => 'object.item.videoItem',
	'asx' => 'object.item.videoItem',
	'avi' => 'object.item.videoItem.movie',
	'dat' => 'object.item.videoItem',
	'iso' => 'object.item.videoItem',
	'm2t' => 'object.item.videoItem',
	'm2ts' => 'object.item.videoItem',
	'm2v' => 'object.item.videoItem',
	'm4v' => 'object.item.videoItem',
	'mp2v' => 'object.item.videoItem',
	'mp4' => 'object.item.videoItem',
	'mp4v' => 'object.item.videoItem',
	'mpe' => 'object.item.videoItem',
	'mpeg' => 'object.item.videoItem',
	'mpg' => 'object.item.videoItem',
	'mod' => 'object.item.videoItem',
	'mov' => 'object.item.videoItem',
	'mkv' => 'object.item.videoItem.videoBroadcast',
	'mts' => 'object.item.videoItem',
	'ogg' => 'object.item.videoItem',
	'swf' => 'object.item.videoItem',
	'vob' => 'object.item.videoItem',
	'ts' => 'object.item.videoItem',
	'webm' => 'object.item.videoItem',
	'wm' => 'object.item.videoItem',
	'wmv' => 'object.item.videoItem',
	'wmx' => 'object.item.videoItem',
);

/* MIME types. */
$mime_types = array(
	'txt' => 'text/plain',
	'htm' => 'text/html',
	'html' => 'text/html',
	'php' => 'text/html',
	'css' => 'text/css',
	'js' => 'application/javascript',
	'json' => 'application/json',
	'xml' => 'application/xml',
	'swf' => 'application/x-shockwave-flash',

	/* Images. */
	'png' => 'image/png',
	'jpe' => 'image/jpeg',
	'jpeg' => 'image/jpeg',
	'jpg' => 'image/jpeg',
	'gif' => 'image/gif',
	'bmp' => 'image/bmp',
	'ico' => 'image/vnd.microsoft.icon',
	'tiff' => 'image/tiff',
	'tif' => 'image/tiff',
	'svg' => 'image/svg+xml',
	'svgz' => 'image/svg+xml',

	/* Audio. */
	'flac' => 'audio/ogg',
	'mp3' => 'audio/mpeg', 
	'wav' => 'audio/vnd.wave',
	'wma' => 'audio/x-ms-wma',

	/* Video. */
	'3gp' => 'video/3gpp',
	'3gpp' => 'video/3gpp',
	'3g2' => 'video/3gpp2',
	'3gpp2' => 'video/3gpp2',
	'flv' => 'video/x-flv',
	'qt' => 'video/quicktime',
	'ogg' => 'video/ogg',
	'mov' => 'video/mpeg',
	'mp4' => 'video/mp4',
	'mkv' => 'video/x-mkv',
	'm2ts' => 'video/MP2T',
	'ts' => 'video/MP2T',
	'webm' => 'video/webm',
);


/* Auto variables. */

/* "urn:schemas-upnp-org:service:ContentDirectory:1#Browse" */
$http_hdr_soapact = $_SERVER['HTTP_SOAPACTION'];
$soap_shemas = strpos($http_hdr_soapact, 'urn:schemas-upnp-org:service:ContentDirectory:');
if (false === $soap_shemas)
	return (500);
$soap_service_ver = substr($http_hdr_soapact, ($soap_shemas + 46), 1);
$soap_service_func = substr($http_hdr_soapact, ($soap_shemas + 48), -1);


if (substr($basedir, -1, 1) !== '/') {
	$basedir = $basedir.'/';
}
$baseurl = implode('/', array_map('rawurlencode', explode('/', $baseurl)));
$baseurlpatch = 'http://'.$_SERVER['HTTP_HOST'].$baseurl;
if ('/' !== substr($baseurlpatch, -1, 1)) {
	$baseurlpatch = $baseurlpatch.'/';
}
/**
 * Apply workaround for the libxml PHP bugs:
 * @link https://bugs.php.net/bug.php?id=62577
 * @link https://bugs.php.net/bug.php?id=64938
 */
if (function_exists('libxml_disable_entity_loader')) {
	libxml_disable_entity_loader(false);
}

# $server = new SoapServer(null, array('uri' => "urn:schemas-upnp-org:service:ContentDirectory:3"));
$server = new SoapServer(dirname(__FILE__)."/../descr/ContentDirectory.wdsl",
		array('cache_wsdl' => WSDL_CACHE_MEMORY,
			'soap_version' => SOAP_1_2,
			'trace' => true
		));


function xml_encode($string) {

	return (str_replace(
	    array("&", "<", ">", /*'"',*/	"'"),
	    array("&amp;", "&lt;", "&gt;", /*"&quot;",*/	"&apos;"), 
	    $string));
}

function xml_decode($string) {

	return (str_replace(
	    array("&amp;", "&lt;", "&gt;", "&quot;", "&apos;"), 
	    array("&", "<", ">", '"', "'"),
	    $string));
}


function upnp_url_encode($url) {

	if ('http://' !== substr($url, 0, 7) ||
	    false === ($url_path_off = strrpos($url, '/', 8)))
		return (implode('/', array_map('rawurlencode', explode('/', $url))));
		//return (xml_encode(implode('/', array_map('rawurlencode', explode('/', $url)))));
		//return (xml_encode($url));
		//return ('<![CDATA[' . xml_encode($url) . ']]');

	return (substr($url, 0, $url_path_off).implode('/', array_map('rawurlencode', explode('/', substr($url, $url_path_off)))));
	//return (substr($url, 0, $url_path_off) . xml_encode(implode('/', array_map('rawurlencode', explode('/', substr($url, $url_path_off))))));
	//return (substr($url, 0, $url_path_off) . xml_encode(substr($url, $url_path_off)));
	//return ('<![CDATA[$url]]');
}


function upnp_get_class($file, $def) {
	global $file_class;

	if (!isset($file))
		return ($def);
	$dot = strrpos($file, '.');
	if (false === $dot)
		return ($def);
	$ext = strtolower(substr($file, ($dot + 1)));
	if (isset($file_class[$ext])) /* Skip unsupported file type. */
		return ($file_class[$ext]);

	return ($def);
}


function get_named_val($name, $buf) { /* ...val_name="value"... */

	$st_off = strpos($buf, $name);
	if (false === $st_off)
		return (null);
	$st_off += strlen($name);
	if ('="' !== substr($buf, $st_off, 2))
		return (null);
	$st_off += 2;
	$en_off = strpos($buf, '"', $st_off);
	if (false === $en_off)
		return (null);

	return (substr($buf, $st_off, ($en_off - $st_off)));
}


function m3u_calc_items_count($filename) {

	$items_count = 0;
	$fd = fopen($filename, 'r');
	if (false === $fd)
		return ($items_count);
	while (!feof($fd)) { /* Read the file line by line... */
		$buffer = trim(fgets($fd));
		if (false === strpos($buffer, '#EXTINF:')) /* Skip empty/bad lines. */
			continue;
		$entry = trim(fgets($fd));
		if (false === strpos($entry, '://'))
			continue;
		$items_count++;
	} 
	fclose($fd);

	return ($items_count);
}


function m3u_browse($filename, $ObjectID, $StartingIndex, $RequestedCount,
    $UpdateID, $Result) {
	$NumberReturned = 0;
	$TotalMatches = 0;

	/* Open the file. */
	$fd = fopen($filename, 'r');
	if (false === $fd) {
		return (array('Result' => '',
				'NumberReturned' => 0,
				'TotalMatches' => 0,
				'UpdateID' => $UpdateID));
	}
	$date = upnp_date(filectime($filename), 1);
	if (is_writable($filename)) {
		$Restricted = '0';
	} else {
		$Restricted = '1';
	}

	while (!feof($fd)) { /* Read the file line by line... */
		$buffer = trim(fgets($fd));
		if (false === strpos($buffer, '#EXTINF:')) { /* Skip empty/bad lines. */
			continue;
		}
		$entry = trim(fgets($fd));
		if (false === strpos($entry, '://'))
			continue;
		/* Ok, item matched and may be returned. */
		$TotalMatches++;
		if (0 < $StartingIndex &&
		    $TotalMatches < $StartingIndex)
			continue; /* Skip first items. */
		if (0 < $RequestedCount &&
		    $NumberReturned >= $RequestedCount)
			continue; /* Do not add more than requested. */
		$NumberReturned++;
		/* Add item to result. */
		$title = xml_encode(trim(substr($buffer, (strpos($buffer, ',') + 1))));
		//$en_entry = upnp_url_encode($entry);
		$en_entry = xml_encode($entry);
		$iclass = upnp_get_class($entry, 'object.item.videoItem.videoBroadcast');
		$mimetype = 'video/mpeg';
		if ('object.container.storageFolder' === $iclass) { /* Play list as folder! */
			$Result = $Result.
			    "<container id=\"$en_entry\" parentID=\"$ObjectID\" restricted=\"$Restricted\">".
				"<dc:title>$title</dc:title>".
				'<upnp:class>object.container.storageFolder</upnp:class>'.
			    '</container>';
		} else {
			$Result = $Result.
			    "<item id=\"$en_entry\" parentID=\"$ObjectID\" restricted=\"$Restricted\">".
				"<dc:title>$title</dc:title>".
				"<dc:date>$date</dc:date>".
				"<upnp:class>$iclass</upnp:class>".
				"<res protocolInfo=\"http-get:*:$mimetype:*\">$en_entry</res>".
			    '</item>';
		}
	} 
	fclose($fd);

	$Result = $Result.'</DIDL-Lite>';
	return (array('Result' => $Result,
			'NumberReturned' => $NumberReturned,
			'TotalMatches' => $TotalMatches,
			'UpdateID' => $UpdateID));
}


function upnp_mime_content_type($filename) {
	global $mime_types;

	$def = 'video/mpeg';

	if (!isset($filename))
		return ($def);
	$dot = strrpos($filename, '.');
	if (false === $dot)
		return ($def);
	$ext = strtolower(substr($filename, ($dot + 1)));
	if (array_key_exists($ext, $mime_types)) {
		return ($mime_types[$ext]);
	} elseif (function_exists('finfo_open')) {
		$finfo = finfo_open(FILEINFO_MIME);
		$mimetype = finfo_file($finfo, $filename);
		finfo_close($finfo);
		return ($mimetype);
	}

	return ($def);
}

/* Format:
 * 0: 2005-02-10
 * 1: 2004-05-08T10:00:00
 * */
function upnp_date($timedate, $format) {
	$res = date('Y-m-d', $timedate);

	if (1 === $format) {
		$res = $res.'T'.date('H:i:s', $timedate);
	}

	return ($res);
}


function browse_metadata($filename, $dir, $ObjectID, $UpdateID, $Result) {

	/* Is file/dir exist? */
	$stat = stat($filename);
	if (false === $stat) { /* No such file/dir. */
		return (array('Result' => '',
				'NumberReturned' => 0,
				'TotalMatches' => 0,
				'UpdateID' => $UpdateID));
	}

	/* Collect data. */
	if (is_writable($filename)) {
		$WriteStatus = 'WRITABLE';
		$Restricted = '0';
	} else {
		$WriteStatus = 'NOT_WRITABLE';
		$Restricted = '1';
	}
	$basefilename = basename($dir);
	if ('0' === $ObjectID) {
		$title = 'root';
		$ParentID = '-1';
	} else {
		$title = xml_encode($basefilename);
		$ParentID = upnp_url_encode(dirname($dir));
	}

	if (is_dir($filename)) { /* Dir. */
		$StorageTotal = disk_total_space($filename);
		$StorageFree = disk_free_space($filename);
		$StorageUsed = ($StorageTotal - $StorageFree);
		$ChildCount = (count(scandir($filename)) - 2);
		$Result = $Result.
		    "<container id=\"$ObjectID\" parentID=\"$ParentID\" restricted=\"$Restricted\" searchable=\"1\" childCount=\"$ChildCount\">".
			"<dc:title>$title</dc:title>".
			'<upnp:class>object.container.storageFolder</upnp:class>'.
			"<upnp:storageTotal>$StorageTotal</upnp:storageTotal>".
			"<upnp:storageFree>$StorageFree</upnp:storageFree>".
			"<upnp:storageUsed>$StorageUsed</upnp:storageUsed>".
			"<upnp:writeStatus>$WriteStatus</upnp:writeStatus>";
		if ('0' === $ObjectID) {
			$Result = $Result.
				'<upnp:searchClass includeDerived="1">object.item.audioItem</upnp:searchClass>'.
				'<upnp:searchClass includeDerived="1">object.item.imageItem</upnp:searchClass>'.
				'<upnp:searchClass includeDerived="1">object.item.videoItem</upnp:searchClass>';
		}
		$Result = $Result.'</container>';
	} else { /* File or playlist. */
		$iclass = upnp_get_class($basefilename, 'object.item.videoItem');
		if ('object.container.storageFolder' === $iclass) { /* Play list as folder! */
			$ChildCount = m3u_calc_items_count($filename);
			$Result = $Result.
			    "<container id=\"$ObjectID\" parentID=\"$ParentID\" restricted=\"$Restricted\" searchable=\"1\" childCount=\"$ChildCount\">".
				"<dc:title>$title</dc:title>".
				'<upnp:class>object.container.storageFolder</upnp:class>'.
			    '</container>';
		} else {
			$date = upnp_date(filectime($filename), 1);
			$size = filesize($filename);
			$mimetype = upnp_mime_content_type($filename);
			$Result = $Result.
			    "<item id=\"$ObjectID\" parentID=\"$ParentID\" restricted=\"$Restricted\">".
				"<dc:title>$title</dc:title>".
				"<dc:date>$date</dc:date>".
				"<upnp:class>$iclass</upnp:class>".
				"<res size=\"$size\" protocolInfo=\"http-get:*:$mimetype:*\">$ObjectID</res>".
			    '</item>';
		}
	}
	$Result = $Result.'</DIDL-Lite>';
	return (array('Result' => $Result,
			'NumberReturned' => 1,
			'TotalMatches' => 1,
			'UpdateID' => $UpdateID));
}


/* ContentDirectory funcs */

function GetSearchCapabilities() {
	// 'upnp:class'; /* dc:title,upnp:class,upnp:artist */
	//$SearchCaps = 'dc:creator,dc:date,dc:title,upnp:album,upnp:actor,upnp:artist,upnp:class,upnp:genre,@id,@parentID,@refID';
	$SearchCaps = 'dc:title';

	return ($SearchCaps);
}


function GetSortCapabilities() {
	$SortCaps = 'dc:title';
	/* dc:title,upnp:genre,upnp:album,dc:creator,res@size,
	 * res@duration,res@bitrate,dc:publisher,
	 * upnp:originalTrackNumber,dc:date,upnp:producer,upnp:rating,
	 * upnp:actor,upnp:director,dc:description
	 */

	return ($SortCaps);
}


function GetSortExtensionCapabilities() {
	$SortExtensionCaps = '';

	return ($SortExtensionCaps);
}


function GetFeatureList() {
	$FeatureList = '';

	return ($FeatureList);
}


function GetSystemUpdateID() {
	$Id = '1';

	return ($Id);
}


function GetServiceResetToken() {
	$ResetToken = '1';

	return ($ResetToken);
}


function Browse($ObjectID, $BrowseFlag, $Filter, $StartingIndex,
    $RequestedCount, $SortCriteria) {
	global $basedir, $baseurl, $baseurlpatch;
	$Result = '<DIDL-Lite'.
		    ' xmlns="urn:schemas-upnp-org:metadata-1-0/DIDL-Lite/"'.
		    ' xmlns:dlna="urn:schemas-dlna-org:metadata-1-0/"'.
		    ' xmlns:dc="http://purl.org/dc/elements/1.1/"'.
		    ' xmlns:upnp="urn:schemas-upnp-org:metadata-1-0/upnp/"'.
		    ' xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"'.
		    ' xsi:schemaLocation="'.
			'urn:schemas-upnp-org:metadata-1-0/DIDL-Lite/ http://www.upnp.org/schemas/av/didl-lite.xsd '.
			'urn:schemas-upnp-org:metadata-1-0/upnp/ http://www.upnp.org/schemas/av/upnp.xsd">';
	$NumberReturned = 0;
	$TotalMatches = 0;
	$UpdateID = 1;

	/* Check input param. */
	if (isset($ObjectID)) {
		$ObjectID_len = strlen($ObjectID);
		if ((1 === $ObjectID_len || (

		     3 === $ObjectID_len && (
		      '_T' === substr($ObjectID, 1, 2) ||
		      '_D' === substr($ObjectID, 1, 2) ||
		      '_L' === substr($ObjectID, 1, 2)))) && (
		    '0' === substr($ObjectID, 0, 1) ||
		    'A' === substr($ObjectID, 0, 1) ||
		    'I' === substr($ObjectID, 0, 1) ||
		    'V' === substr($ObjectID, 0, 1) ||
		    'P' === substr($ObjectID, 0, 1) ||
		    'T' === substr($ObjectID, 0, 1))) { /* V, I, A, P, T - from X_GetFeatureList() */
			$ObjectID = '0';
			$dir = '';
		} else {
			$dir = rawurldecode(xml_decode($ObjectID));
			if ('/' !== substr($dir, -1, 1)) {
				$dir = $dir.'/';
			}
			/* Sec check: .. in path */
			$dotdotdir = '';
			$dirnames = explode('/', $dir);
			$dirnames_size = sizeof($dirnames);
			for ($di = 0; $di < $dirnames_size; $di++) {
				if ('.' === $dirnames[$di])
					continue;
				if ('..' === $dirnames[$di]) {
					$dir = '';

					break;
				}
				if ($dirnames_size >= $di) {
					$dotdotdir = $dotdotdir.$dirnames[$di].'/';
				}
			}
			$dir = $dotdotdir;
			if ('/' === substr($dir, 0, 1) /*|| !is_dir($basedir.$dir)*/) {
				$dir = '';
			}
			/* Remove tail slash from file name. */
			if (!is_dir($basedir.$dir) &&
			    '/' === substr($dir, -1, 1)) {
				$dir = substr($dir, 0, -1);
			}
		}
	} else {
		$ObjectID = '0';
		$dir = '';
	}

	if ('BrowseMetadata' === $BrowseFlag) {
		return (browse_metadata($basedir.$dir, $dir, $ObjectID,
		    $UpdateID, $Result));
	}

	if (!isset($StartingIndex)) {
		$StartingIndex = 0;
	}
	if (!isset($RequestedCount)) {
		$RequestedCount = 0;
	}

	if (!is_dir($basedir.$dir)) { /* Play list file? */
		return (m3u_browse($basedir.$dir, $ObjectID,
		    $StartingIndex, $RequestedCount, $UpdateID, $Result));
	}

	/* Scan directory and add to play list.*/
	$entries = scandir($basedir.$dir);
	/* Add dirs to play list. */
	foreach ($entries as $entry) {
		$filename = $basedir.$dir.$entry;
		if ('.' === substr($entry, 0, 1) ||
		    !is_dir($filename)) /* Skip files. */
			continue;
		/* Ok, item matched and may be returned. */
		$TotalMatches++;
		if (0 < $StartingIndex &&
		    $TotalMatches < $StartingIndex)
			continue; /* Skip first items. */
		if (0 < $RequestedCount &&
		    $NumberReturned >= $RequestedCount)
			continue; /* Do not add more than requested. */
		$NumberReturned++;
		/* Add item to result. */
		if (is_writable($filename)) {
			$Restricted = '0';
		} else {
			$Restricted = '1';
		}
		$title = xml_encode($entry);
		$en_entry = upnp_url_encode($dir.$entry);
		$ChildCount = (count(scandir($filename)) - 2);
		$Result = $Result.
		    "<container id=\"$en_entry\" parentID=\"$ObjectID\" restricted=\"$Restricted\" searchable=\"1\" childCount=\"$ChildCount\">".
			"<dc:title>$title</dc:title>".
			'<upnp:class>object.container.storageFolder</upnp:class>'.
		    '</container>';
	}
	/* Add files to play list. */
	foreach ($entries as $entry) {
		$filename = $basedir.$dir.$entry;
		if (is_dir($filename)) /* Skip dirs. */
			continue;
		$iclass = upnp_get_class($entry, null);
		if (null === $iclass) /* Skip unsupported file type. */
			continue;
		/* Ok, item matched and may be returned. */
		$TotalMatches++;
		if (0 < $StartingIndex &&
		    $TotalMatches < $StartingIndex)
			continue; /* Skip first items. */
		if (0 < $RequestedCount &&
		    $NumberReturned >= $RequestedCount)
			continue; /* Do not add more than requested. */
		$NumberReturned++;
		/* Add item to result. */
		if (is_writable($filename)) {
			$Restricted = '0';
		} else {
			$Restricted = '1';
		}
		$title = xml_encode($entry);
		$en_entry = upnp_url_encode($dir.$entry);
		if ('object.container.storageFolder' === $iclass) { /* Play list as folder! */
			$ChildCount = m3u_calc_items_count($filename);
			$Result = $Result.
			    "<container id=\"$en_entry\" parentID=\"$ObjectID\" restricted=\"$Restricted\" searchable=\"1\" childCount=\"$ChildCount\">".
				"<dc:title>$title</dc:title>".
				'<upnp:class>object.container.storageFolder</upnp:class>'.
			    '</container>';
		} else {
			$date = upnp_date(filectime($filename), 1);
			$size = filesize($filename);
			$mimetype = upnp_mime_content_type($filename);
			$res_info_ex = '';
			$Result = $Result.
			    "<item id=\"$en_entry\" parentID=\"$ObjectID\" restricted=\"$Restricted\">".
				"<dc:title>$title</dc:title>".
				"<dc:date>$date</dc:date>".
				"<upnp:class>$iclass</upnp:class>";
			if ('object.item.imageItem' === substr($iclass, 0, 21)) {
				$Result = $Result.
				    "<upnp:albumArtURI>$baseurlpatch$en_entry</upnp:albumArtURI>".
				    "<upnp:icon>$baseurlpatch$en_entry</upnp:icon>";
				$img_info = getimagesize($filename);
				if (false !== $img_info) {
					$res_info_ex = ' resolution="'.$img_info[0].'x'.$img_info[1].'"';
				}
			}
			$Result = $Result.
				"<res size=\"$size\"$res_info_ex protocolInfo=\"http-get:*:$mimetype:*\">$baseurlpatch$en_entry</res>".
			    '</item>';
		}
	}

	$Result = $Result.'</DIDL-Lite>';
	return (array('Result' => $Result,
			'NumberReturned' => $NumberReturned,
			'TotalMatches' => $TotalMatches,
			'UpdateID' => $UpdateID));
}


function Search($ContainerID, $SearchCriteria, $Filter, $StartingIndex,
    $RequestedCount, $SortCriteria) {
	global $basedir, $baseurl, $baseurlpatch;
	$Result = '<DIDL-Lite'.
		    ' xmlns="urn:schemas-upnp-org:metadata-1-0/DIDL-Lite/"'.
		    ' xmlns:dlna="urn:schemas-dlna-org:metadata-1-0/"'.
		    ' xmlns:dc="http://purl.org/dc/elements/1.1/"'.
		    ' xmlns:upnp="urn:schemas-upnp-org:metadata-1-0/upnp/"'.
		    ' xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"'.
		    ' xsi:schemaLocation="'.
			'urn:schemas-upnp-org:metadata-1-0/DIDL-Lite/ http://www.upnp.org/schemas/av/didl-lite.xsd '.
			'urn:schemas-upnp-org:metadata-1-0/upnp/ http://www.upnp.org/schemas/av/upnp.xsd">';
	$NumberReturned = 0;
	$TotalMatches = 0;
	$UpdateID = 1;

	$Result = $Result.'</DIDL-Lite>';

	return (array('Result' => $Result,
			'NumberReturned' => $NumberReturned,
			'TotalMatches' => $TotalMatches,
			'UpdateID' => $UpdateID));
}


function CreateObject($ContainerID, $Elements) {
	$ObjectID = '';
	$Result = '';

	return (array('ObjectID' => $ObjectID,
			'Result' => $Result));
}


function DestroyObject($ObjectID) {
}


function UpdateObject($ObjectID, $CurrentTagValue, $NewTagValue) {
}


function MoveObject($ObjectID, $NewParentID, $NewObjectID) {
}


/* Samsung private. */
function X_GetFeatureList() {
	$FeatureList = 
		'<?xml version="1.0" encoding="UTF-8"?>'.
		'<Features'.
		' xmlns="urn:schemas-upnp-org:av:avs"'.
		' xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"'.
		' xmlns:sec="http://www.sec.co.kr/dlna"'.
		' xsi:schemaLocation="urn:schemas-upnp-org:av:avs http://www.upnp.org/schemas/av/avs.xsd">'.
			'<Feature name="samsung.com_BASICVIEW" version="1">'.
			    '<container id="A" type="object.item.audioItem"/>'.
			    '<container id="I" type="object.item.imageItem"/>'.
			    '<container id="V" type="object.item.videoItem"/>'.
			    '<container id="P" type="object.item.playlistItem"/>'.
			    '<container id="T" type="object.item.textItem"/>'.
			'</Feature>'.
		'</Features>';

	return ($FeatureList);
}

function X_SetBookmark($CategoryType, $RID, $ObjectID, $PosSecond) {
	/* Return:
	 * <sec:dcmInfo>BM=number of seconds</sec:dcmInfo>
	 * <upnp:lastPlaybackPosition>HH:MM:SS</upnp:lastPlaybackPosition>
	 */
}



/* Process request. */

$request_body = @file_get_contents('php://input');
if (is_string($request_body) === false) {
	header($_SERVER["SERVER_PROTOCOL"]." 400 Bad request");
	die();	
}
try {
	$server->addFunction(array('GetSearchCapabilities',
					'GetSortCapabilities',
					'GetSortExtensionCapabilities',
					'GetFeatureList',
					'GetSystemUpdateID',
					'GetServiceResetToken',
					'Browse',
					'Search',
					'CreateObject',
					'DestroyObject',
					'UpdateObject',
					'MoveObject',
					'X_GetFeatureList',
					'X_SetBookmark'
				));
	ob_start();
	/* Type checking done before, it is safe to ignore type warning here. */
	$server->handle(/** @scrutinizer ignore-type */ $request_body); 
	$soapXml = ob_get_clean();
} catch (Exception $e) {
	$server->fault($e->getCode(), $e->getMessage());
	throw $e;
}


/* Post processing. */


function get_resp_tag_name($sxml) {
	$tag_st = strpos($sxml, '<SOAP-ENV:Body><SOAP-ENV:');
	if (false === $tag_st)
		return (false);
	$tag_st += 25;
	$tag_end = strpos($sxml, '>', $tag_st);
	if (false === $tag_end)
		return (false);
	return (substr($sxml, $tag_st, ($tag_end - $tag_st)));
}

function get_tag_ns($req, $tag) {
	$rreq = strrev($req);
	$ns_st = strpos($rreq, strrev(":$tag>"));
	if (false === $ns_st)
		return (false);
	$ns_st += (strlen($tag) + 2);
	$ns_end = strpos($rreq, '/<', $ns_st);
	if (false === $ns_end)
		return (false);
	return (strrev(substr($rreq, $ns_st, ($ns_end - $ns_st))));
}

function tag_ns_replace($req, $sxml, $tag, $ns = false) {
	if (false === $tag)
		return ($sxml);
	if (false === $ns)
		$ns = get_tag_ns($req, $tag);
	if (false === $ns)
		return ($sxml);
	while ($tag_st = strpos($sxml, "<SOAP-ENV:$tag")) {
		$tag_end = strpos($sxml, '>', $tag_st);
		if (false === $tag_end)
			return ($sxml);
		$old_tag_data = substr($sxml, $tag_st, ($tag_end - $tag_st));
		$new_tag_data = str_replace('SOAP-ENV', $ns, $old_tag_data);
		$sxml = str_replace($old_tag_data, $new_tag_data, $sxml);
	}
	return (str_replace("</SOAP-ENV:$tag>", "</$ns:$tag>", $sxml));
}


/* Add encodingStyle attr. */
$soapXml = str_replace('<SOAP-ENV:Envelope', '<SOAP-ENV:Envelope SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"', $soapXml);

/* Add xmlns:u="urn:schemas-upnp-org:service:ContentDirectory:1" */
$soap_act_resp_tag = get_resp_tag_name($soapXml);
$soapXml = str_replace("<SOAP-ENV:$soap_act_resp_tag", "<SOAP-ENV:$soap_act_resp_tag xmlns:SOAP-ENV=\"urn:schemas-upnp-org:service:ContentDirectory:$soap_service_ver\"", $soapXml);

/* Restore name spaces from request. */
$soapXml = tag_ns_replace($request_body, $soapXml, 'Envelope');
$soapXml = tag_ns_replace($request_body, $soapXml, 'Body');
$soapXml = tag_ns_replace($request_body, $soapXml, $soap_act_resp_tag, get_tag_ns($request_body, $soap_service_func));

$length = strlen($soapXml);
header('Content-Length: '.$length);
echo $soapXml;

?>


rozhuk-im / ssdpd

xml_decode() A last analyzed 2025-02-16 22:43 UTC

Complexity

Size

Duplication

Importance

Duplication Side-by-Side

Filter issues like

xml_decode() A
last analyzed 2025-02-16 22:43 UTC
